diff --git a/.gitignore b/.gitignore
index 72364f99fe4bf8d5262df3b19b33102aeaa791e5..7615207d9a2954bce4324b51782b1a3d89e0eaa2 100644
--- a/.gitignore
+++ b/.gitignore
@@ -87,3 +87,6 @@ ENV/
 
 # Rope project settings
 .ropeproject
+
+# Start.tw 
+src/config/start.tw 
\ No newline at end of file
diff --git a/compile-git b/compile-git
new file mode 100755
index 0000000000000000000000000000000000000000..20a8daef3e430b23ec4ec97259f6abefa11ade4d
--- /dev/null
+++ b/compile-git
@@ -0,0 +1,13 @@
+#!/bin/bash
+
+# Will add all *.tw files to StoryIncludes.
+rm src/config/start.tw
+cp src/config/start.tw.proto start.tw.tmp
+find src -name '*.tw' -print >>start.tw.tmp
+mv start.tw.tmp src/config/start.tw
+
+HASH=`git log -n1 |grep -m1 commit | sed 's/commit //'`
+
+./devTools/tweeGo/tweego -o bin/FC_pregmod_$HASH.html src/config/start.tw
+
+rm src/config/start.tw
\ No newline at end of file
diff --git a/slave variables documentation - Pregmod.txt b/slave variables documentation - Pregmod.txt
index 7bceba2263b5b497328181f53b5d80bb2dee5bd3..1d00b3a78ef79355bff7aa10e522055803410278 100644
--- a/slave variables documentation - Pregmod.txt	
+++ b/slave variables documentation - Pregmod.txt	
@@ -477,10 +477,13 @@ slave's weight
 muscles:
 
 slave's muscles
-96+    - extremely muscular
-31-95  - muscular
-6-30   - toned
-0-5    - none
+96+        - extremely muscular
+31  - 95   - muscular
+6   - 30   - toned
+-5  - 5    - none
+-30 - -6   - weak
+-95 - -31  - very weak
+--95	   - frail
 
 height:
 
@@ -2142,8 +2145,37 @@ Can the slave recruit. Non-random slaves should be left off.
 publicCount:
 
 How many times the slave has had public sex in your arcology. Used to determine if she is your private toy or a lusted after slut.
-accpets int
+accepts int
+
+HGExclude: 
+
+Is the head girl permitted to fuck this slave pregnant.
+0 - no
+1 - yes
+
+ballType: 
+
+What species of sperm she produces.
+"human"
+"dog"
+"pig"
 
+eggType:
+
+What species of ovum she produces.
+"human"
+"dog"
+"pig"
+
+reservedChildren: 
+
+How many of her children are tagged to be incubated. Carefully balanced, do not manually touch.
+
+choosesOwnChastity:
+
+Eugenics variable. Is the slave allowed to choose to wear chastity.
+0 - no
+1 - yes
 
 
 
@@ -2151,7 +2183,7 @@ How to set up your own hero slave.
 
 -The default slave template used:
 
-<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactaionAdaption: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, cosmeticPiercings: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietMilk: 0, dietCum: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: 0, inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, mother: 0, father: 0, canRecruit: 0}>>
+<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: 0, inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnClothes: 0}>>
 
 Making your slave; add their name to the following, then go down the documentation adding in your changes.
 -each variable must be seperated from the last by a comma followed by a space
diff --git a/src/cheats/mod_EditSlaveCheat.tw b/src/cheats/mod_EditSlaveCheat.tw
index 77a2944c646949c29128d3f96f06d45c5e84c785..f1752d5f80e1643b02f8d515a3c13d095c0af41f 100644
--- a/src/cheats/mod_EditSlaveCheat.tw
+++ b/src/cheats/mod_EditSlaveCheat.tw
@@ -19,9 +19,17 @@
 
 <br>
 
-''Slave Blood Relations (twin, sister, mother, daughter):''
-<<textbox "$activeSlave.relation" $activeSlave.relation>>
-
+<<if $familyTesting == 1>>
+	''Enter the IDs for this slaves parents(-2 or 0:random and untracked by system, -1:PC, all others are applicable):''
+	<br>
+	''mother ID''
+	<<textbox "$activeSlave.mother" $activeSlave.mother "Starting Girls">>
+	<br>
+	''father ID''
+	<<textbox "$activeSlave.father" $activeSlave.father "Starting Girls">>
+<<else>>
+	''Slave Blood Relations (twin, sister, mother, daughter):''
+	<<textbox "$activeSlave.relation" $activeSlave.relation>>
 <br>
 
 ''Blood Relations Target ID:''
@@ -42,9 +50,10 @@
 ''Relationship Target ID:'' <<textbox "$activeSlave.relationshipTarget" $activeSlave.relationshipTarget>>
 
 <br><br>
-
+<</if>>
+<br>
 ''Career ($activeSlave.career)''
-<<textbox "$activeSlave.career" $activeSlave.career>>
+<<textbox "$activeSlave.career" $activeSlave.career>> //Slave variables documentation is your friend. Will tell you exactly what to put here//
 
 <br>
 
diff --git a/src/cheats/mod_EditSlaveCheatDatatypeCleanup.tw b/src/cheats/mod_EditSlaveCheatDatatypeCleanup.tw
index 37441d9c5ee5bd3edeb644c6008ed54148e1c0a5..1979d0c8e06a27cf4690649321b36f42c89ea67f 100644
--- a/src/cheats/mod_EditSlaveCheatDatatypeCleanup.tw
+++ b/src/cheats/mod_EditSlaveCheatDatatypeCleanup.tw
@@ -7,8 +7,13 @@
 	<<set $rep to Number($rep)>>
 	<<set $cash to Number($cash)>>
 	<<set $week to Number($week)>>
-	<<set $activeSlave.relationTarget to Number($activeSlave.relationTarget)>>
-	<<set $activeSlave.relationshipTarget to Number($activeSlave.relationshipTarget)>>
+	<<if $familyTesting == 1>>
+		<<set $activeSlave.mother to Number($activeSlave.mother)>>
+		<<set $activeSlave.father to Number($activeSlave.father)>>
+	<<else>>
+		<<set $activeSlave.relationTarget to Number($activeSlave.relationTarget)>>
+		<<set $activeSlave.relationshipTarget to Number($activeSlave.relationshipTarget)>>
+	<</if>>
 	<<set $activeSlave.indenture to Number($activeSlave.indenture)>>
 	<<set $activeSlave.face to Number($activeSlave.face)>>
 	<<set $activeSlave.hLength to Number($activeSlave.hLength)>>
diff --git a/src/events/intro/initNationalities.tw b/src/events/intro/initNationalities.tw
index bae413208949c03a4743760a78df962f39e6bbdf..bd1ab50a8fc00b62441b6a132400bc4e06b626d7 100644
--- a/src/events/intro/initNationalities.tw
+++ b/src/events/intro/initNationalities.tw
@@ -65,7 +65,7 @@
 /* SET HEROES */
 
 <<set $heroSlaves = []>>
-<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: 0, inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0}>>
+<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, visualAge: 18, physicalAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: 0, inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, father: 0, mother: 0, daughters: 0, sisters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnClothes: 0}>>
 <<if ($seeDicks > 0) && ($seeDicks < 100)>>
 	<<display "D Slaves Database">>
 	<<display "DD Slaves Database">>
@@ -82,7 +82,7 @@
 /*Nationalities Setup*/
 
 <<set $basenationalities = ["American", "Afghan", "Algerian","Argentinian", "Armenian", "Australian", "Austrian", "Bangladeshi", "Belarusian", "Belgian", "Bolivian", "Brazilian", "British", "Burmese", "Canadian", "Chilean", "Chinese", "Czech", "Colombian", "Congolese", "Cuban", "Danish", "Dominican", "Dutch", "Egyptian", "Emirati", "Estonian", "Ethiopian", "Filipina", "Finnish", "French", "German", "Ghanan", "Greek", "Guatemalan", "Haitian", "Hungarian", "Icelandic", "Indonesian", "Indian", "Iranian", "Iraqi", "Italian", "Irish", "Israeli", "Jamaican", "Japanese", "Jordanian", "Kazakh", "Kenyan", "Korean", "Lebanese", "Libyan", "Lithuanian", "Malaysian", "Malian", "Mexican", "Moroccan", "Nepalese", "a New Zealander", "Nigerian", "Norwegian", "Omani", "Pakistani", "Peruvian", "Polish", "Portuguese", "Puerto Rican", "Romanian", "Russian", "Saudi", "Scottish", "Serbian", "Slovak", "South African", "Spanish", "Sudanese", "Swedish", "Swiss", "Tanzanian", "Thai", "Tunisian", "Turkish", "Ugandan", "Ukrainian", "Uzbek", "Venezuelan", "Vietnamese", "Yemeni", "Zimbabwean"]>>
-<<set $nationalities = $basenationalities>>
+<<set $nationalities = clone($basenationalities)>>
 
 <<if $internationalTrade != 0>>
 <<if $internationalVariety == 0>>
diff --git a/src/events/intro/introSummary.tw b/src/events/intro/introSummary.tw
index 331a8fd6848af59eb8eecc7990186bdeaa46dd70..870abc17f87a5109ecddda02da5eca724672ec99 100644
--- a/src/events/intro/introSummary.tw
+++ b/src/events/intro/introSummary.tw
@@ -272,6 +272,16 @@ Girls will not be able to impregnate others if their age is under <<textbox "$po
 <<else>>
 	Slaves ''can not'' have extended families, just a single relative. //Vanilla Mode.//
 	[[Enable extended families|Intro Summary][$familyTesting to 1]]
+<</if>> //Extended family mode must be on for the incubation facility to be enabled.//
+
+<<if $familyTesting == 1>>
+<<if $inbreeding  == 1>>
+	Successive breeding ''will'' result in sub-average slaves.
+	[[Disable inbreeding|Intro Summary][$inbreeding to 0]]
+<<else>>
+	Successive breeding ''will not'' result in sub-average slaves.
+	[[Enable inbreeding|Intro Summary][$inbreeding to 1]]
+<</if>>
 <</if>>
 
 <br>
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 60c41e5b2a83f67d2537816754b73ed17533483f..d185f19c5e7d7d6c17669b698fa1e94cd42f1952 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -35,19 +35,29 @@
 			<<set $slaves[$i].nationality to "Ancient Chinese Revivalist">>
 		<</if>>
 		<<if $slaves[$i].relationTarget != 0>>
-		<<set $slaves[$i].relationTarget += 50000>>
+		<<set $slaves[$i].relationTarget += 1200000>>
 		<</if>>
 		<<if $slaves[$i].relationshipTarget != 0>>
-		<<set $slaves[$i].relationshipTarget += 50000>>
+		<<set $slaves[$i].relationshipTarget += 1200000>>
 		<</if>>
 	<<else>>
 		<<set $dump to $slaves.pluck([$i], [$i])>><<set $i-->>
 	<</if>>
 	<</for>>
-	<<set $genePool = []>>
-	<<for $i to 0; $i < $slaves.length; $i++>>
-		<<set $genePool.push(slaves[$i])>>
+	<<set $genePool = ngUpdateGenePool($genePool)>>
+	/*
+	<<for $i to 0; $i < $genePool.length; $i++>>
+		<<for $k to 0; $k < $slaves.length; $k++>>
+			<<if $genePool[$i].ID+1200000 == $slaves[$k].ID>>
+				<<set $genePool[$i].ID += 1200000>>
+				<<break>>
+			<</if>>
+		<</for>>
+		<<if $k == $slaves.length>>
+			<<set $dump to $genePool.pluck([$i], [$i])>><<set $i-->>
+		<</if>>
 	<</for>>
+	*/
 	<<for $i to 0; $i < $slaves.length; $i++>>
 	<<if $slaves[$i].relation != 0>>
 		<<set $seed to 0>>
@@ -309,7 +319,7 @@
 
 <<set $cheater to 0>>
 <<set $PCName to "Anonymous">>
-<<set $PC to {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, race: "white", skin: "white", eyeColor: "blue", hColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0}>>
+<<set $PC to {title: 1, ID: -1, dick: 1, vagina: 0, preg: 0, pregSource: 0, pregMood: 0, labor: 0, births: 0, boobsBonus: 0, degeneracy: 0, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, career: "capitalist", rumor: "wealth", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 2, sexualEnergy: 4, refreshment: "cigar", refreshmentType: 0, race: "white", skin: "white", eyeColor: "blue", hColor: "blonde", nationality: "Stateless", father: 0, mother: 0, sisters: 0, daughters: 0, birthElite: 0, birthMaster: 0, birthDegenerate: 0, birthClient: 0, birthOther: 0, birthArcOwner: 0, intelligence: 3, face: 3}>>
 <<set $cash = 10000>>
 <<set $normalizedEvents to 0>>
 <<set $autosave to 1>>
@@ -519,6 +529,9 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $incubatorUpgradeWeight = 0>>
 <<set $incubatorUpgradeMuscles = 0>>
 <<set $incubatorUpgradeReproduction = 0>>
+<<set $incubatorWeightSetting = 0>>
+<<set $incubatorMusclesSetting = 0>>
+<<set $incubatorReproductionSetting = 0>>
 <<set $incubatorName = "the Incubator">>
 <<set $incubatorNameCaps = "The Incubator">>
 <<set $reservedChildren = 0>>
@@ -720,6 +733,8 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $showBestiality = 0>>
 <<set $retainCareer = 1>>
 <<set $freshPC = 0>>
+<<set $inbreeding = 1>>
+<<set $originOveride = 0>>
 
 <<set $fakeBellies to ["a small empathy belly", "a medium empathy belly", "a large empathy belly", "a huge empathy belly"]>> /* lets fake bellies be separated from other .bellyAccessory */
 
@@ -1335,7 +1350,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $nextLink to "EW Slaves">>
 
 <<set $customSlaveOrdered to 0>>
-<<set $customSlave to {slaveName: "custom", birthName: "custom", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", hColor: "brown", pubicHColor: "brown", skin: 0, hLength: 60, hStyle: 0, pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 500, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 2, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "no default setting", tonguePiercing: 0, vagina: 1, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 1, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 1, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, actualAge: 18, visualAge: 18, physicalAge: 18, mother: 0, father: 0, sisters: 0, daughters: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0}>>
+<<set $customSlave to {slaveName: "custom", birthName: "custom", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", hColor: "brown", pubicHColor: "brown", skin: 0, hLength: 60, hStyle: 0, pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 500, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 2, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "no default setting", tonguePiercing: 0, vagina: 1, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 1, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 1, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, actualAge: 18, visualAge: 18, physicalAge: 18, mother: 0, father: 0, sisters: 0, daughters: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0}>>
 
 <<set $huskSlaveOrdered to 0>>
 <<set $huskSlave to {age: 18, nationality: "slave", race: "white", sex: 1, virgin: 0}>>
diff --git a/src/js/storyJS.tw b/src/js/storyJS.tw
index 1a06947903848996de83ec154d6786cf4a6fede2..87da067f1a84466cdbcf580d6b103e9628d7814d 100644
--- a/src/js/storyJS.tw
+++ b/src/js/storyJS.tw
@@ -500,6 +500,7 @@ window.tooBigButt = function(slave){
 	}
 };
 
+/*
 window.sameTParent = function(slave1, slave2) {
 	if ((slave1.mother == slave2.father || slave1.father == slave2.mother) && (slave1.mother != 0 && slave1.mother != -2 && slave1.father != 0 && slave1.father != -2)) {
 		return true; //testtest catches the case if a mother is a father or a father a mother
@@ -507,6 +508,19 @@ window.sameTParent = function(slave1, slave2) {
 		return false;
 	}
 };
+*/
+
+// testtest catches the case if a mother is a father or a father a mother
+window.sameTParent = function(slave1, slave2) {
+	if (slave1.mother == slave2.father && slave1.father == slave2.mother && slave1.mother != 0 && slave1.mother != -2 && slave1.father != 0 && slave1.father != -2) {
+		return 2;
+	} else if ((slave1.mother == slave2.father || slave1.father == slave2.mother) && slave1.mother != 0 && slave1.mother != -2 && slave2.mother != 0 && slave2.mother != -2) {
+		return 3;
+	} else {
+		return 0;
+	}
+};
+
 
 window.sameDad = function(slave1, slave2){
 	if ((slave1.father == slave2.father) && (slave1.father != 0 && slave1.father != -2)) {
@@ -536,6 +550,7 @@ window.areTwins = function(slave1, slave2) {
 	}
 };
 
+/*
 //3 = half-sisters, 2 = sisters, 1 = twins, 0 = not related
 window.areSisters = function(c1, c2) {
 	if(c1.ID == c2.ID) {
@@ -557,8 +572,8 @@ window.areSisters = function(c1, c2) {
 		return sib;
 	}
 }
+*/
 
-/*
 window.areSisters = function(slave1, slave2) {
 	if (slave1.ID == slave2.ID) {
 		return 0; //you are not your own sister
@@ -567,8 +582,10 @@ window.areSisters = function(slave1, slave2) {
 			return 3; //half sisters
 		} else if (sameDad(slave1, slave2) == true && sameMom(slave1, slave2) == false) {
 			return 3; //half sisters
-		} else if (sameTParent(slave1, slave2) == true) {
+		} else if (sameTParent(slave1, slave2) == 3) {
 			return 3; //half sisters
+		} else if (sameTParent(slave1, slave2) == 2) {
+			return 2; //sisters
 		} else if (sameDad(slave1, slave2) == true && sameMom(slave1, slave2) == true) {
 			if (slave1.actualAge == slave2.actualAge && slave1.birthWeek == slave2.birthWeek) {
 				return 1; //twins
@@ -582,7 +599,6 @@ window.areSisters = function(slave1, slave2) {
 		return 0; //not related
 	}
 };
-*/
 
 window.totalRelatives = function(slave) {
 	var relatives = 0;
@@ -1954,4 +1970,17 @@ window.totalPlayerRelatives = function(pc) {
 		relatives += pc.sisters
 	}
 	return relatives
-};
\ No newline at end of file
+};
+
+window.ngUpdateGenePool = function(genePool) {
+  var transferredSlaveIds = (SugarCube.State.variables.slaves || [])
+    .filter(function(s) { return s.ID >= 1200000; })
+    .map(function(s) { return s.ID - 1200000; });
+  return (genePool || [])
+    .filter(function(s) { return transferredSlaveIds.indexOf(s.ID) >= 0; })
+    .map(function(s) {
+      var result = jQuery.extend(true, {}, s);
+      result.ID += 1200000;
+      return result;
+    });
+}
\ No newline at end of file
diff --git a/src/npc/acquisition.tw b/src/npc/acquisition.tw
index 570304314819fcd6a9083b003192eb8617a540a2..ec1457e91ce907a10f7a5562c2bb3dc2913df388 100644
--- a/src/npc/acquisition.tw
+++ b/src/npc/acquisition.tw
@@ -132,7 +132,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "Supremacist">>
 		<<set $arcologies[0].FSSupremacistLawME = 1>><<display "Generate New Slave">><<set $arcologies[0].FSSupremacistLawME = 0>>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(0,15)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
 		<<if $activeSlave.vagina > -1>>
 			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
@@ -144,7 +144,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "Subjugationist">>
 		<<set $fixedRace = $activeArcology.FSSubjugationistRace>><<display "Generate New Slave">><<set $fixedRace = 0>>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(0,15)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
 		<<if $activeSlave.vagina > -1>>
 			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
@@ -157,7 +157,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $activeSlaveOneTimeMaxAge to 25>>
 		<<display "Generate XY Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(15,-15), $activeSlave.health = 100>>
-		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.face = random(0,2)>>
 		<<set $activeSlave.boobs += 100*random(2,4)>>
 		<<set $activeSlave.butt += random(1,2)>>
 		<<set $activeSlave.attrXY = random(70,90), $activeSlave.attrXX = 0>>
@@ -170,7 +170,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $activeSlaveOneTimeMaxAge to 25>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(55,65)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.preg = random(1,35), $activeSlave.lactation = 1>>
 		<<if $activeSlave.vagina > -1>>
 			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
@@ -181,7 +181,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "Paternalist">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(55,65)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.intelligence = random(1,3), $activeSlave.intelligenceImplant = 1>>
 		<<set $activeSlave.entertainSkill = random(15,35)>>
 		<<set $activeSlave.clothes = "conservative clothing", $activeSlave.collar = "none", $activeSlave.shoes = "flats">>
@@ -204,7 +204,7 @@ The previous owner seems to have left in something of a hurry.
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
 		<<set $activeSlave.chem = 50>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.boobs += 100*random(10,20)>>
 		<<set $activeSlave.butt += random(2,3)>>
 		<<set $activeSlave.lips += random(0,1)>>
@@ -222,7 +222,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "SlimnessEnthusiast">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(55,65)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.boobs = 100*random(1,4)>>
 		<<set $activeSlave.butt = random(1,2)>>
 		<<set $activeSlave.weight = random(-25,-15)>>
@@ -238,7 +238,7 @@ The previous owner seems to have left in something of a hurry.
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(-15,0)>>
 		<<set $activeSlave.faceImplant = random(1,2)>>
-		<<set $activeSlave.beauty = Math.trunc($activeSlave.beauty+$activeSlave.faceImplant,-3,3)>>
+		<<set $activeSlave.face = Math.trunc($activeSlave.face+$activeSlave.faceImplant,-3,3)>>
 		<<set $activeSlave.boobsImplant = 200*random(4,8)>>
 		<<set $activeSlave.boobs += $activeSlave.boobsImplant>>
 		<<set $activeSlave.buttImplant = random(2,4)>>
@@ -256,7 +256,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "BodyPurist">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(25,45), $activeSlave.health = 100>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.weight = random(-5,5)>>
 		<<set $activeSlave.muscle = random(10,25)>>
 		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
@@ -272,7 +272,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $one_time_age_overrides_pedo_mode to 1>>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.boobs += 100*random(1,4)>>
 		<<set $activeSlave.butt += random(1,2)>>
 		<<set $activeSlave.weight = random(-5,90)>>
@@ -288,7 +288,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $activeSlaveOneTimeMaxAge to 19>>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(55,65), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.boobs = 100*random(1,4)>>
 		<<set $activeSlave.butt = random(1,3)>>
 		<<set $activeSlave.weight = random(-25,25)>>
@@ -329,7 +329,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $activeSlaveOneTimeMaxAge to 19>>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = 100, $activeSlave.trust = random(55,65), $activeSlave.health = 100>>
-		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.face = random(0,2)>>
 		<<set $activeSlave.muscles = random(25,50)>>
 		<<set $activeSlave.combatSkill = 1>>
 		<<set $activeSlave.behavioralFlaw = "none", $activeSlave.behavioralQuirk = "fitness">>
@@ -339,7 +339,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "EgyptianRevivalist">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.oralSkill = random(15,35), $activeSlave.analSkill = random(15,35)>>
 		<<if $activeSlave.vagina > -1>>
 			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
@@ -352,10 +352,10 @@ The previous owner seems to have left in something of a hurry.
 	<<case "EdoRevivalist">>
 		<<set $fixedRace = "asian">><<display "Generate New Slave">><<set $fixedRace = 0>>
 		<<set $activeSlave.nationality = "Japanese">>
-		<<NationalityToName>>
+		<<NationalityToName $activeSlave>>
 		<<set $activeSlave.accent = 0>>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.intelligence = random(1,3), $activeSlave.intelligenceImplant = 1>>
 		<<set $activeSlave.entertainSkill = 100>>
 		<<set $activeSlave.clothes = "a kimono", $activeSlave.collar = "satin choker", $activeSlave.shoes = "heels">>
@@ -363,7 +363,7 @@ The previous owner seems to have left in something of a hurry.
 	<<case "ArabianRevivalist">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-15,15), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.intelligence = random(0,2), $activeSlave.intelligenceImplant = 0>>
 		<<set $activeSlave.clothes = "harem gauze", $activeSlave.collar = "uncomfortable leather", $activeSlave.shoes = "flats">>
 		<<set $activeSlave.assignment = "take classes">>
@@ -373,10 +373,10 @@ The previous owner seems to have left in something of a hurry.
 		<<set $one_time_age_overrides_pedo_mode to 1>>
 		<<set $fixedRace = "asian">><<display "Generate New Slave">><<set $fixedRace = 0>>
 		<<set $activeSlave.nationality = "Chinese">>
-		<<NationalityToName>>
-		<<NationalityToAccent>>
+		<<NationalityToName $activeSlave>>
+		<<NationalityToAccent $activeSlave>>
 		<<set $activeSlave.devotion = random(55,65), $activeSlave.trust = random(25,45), $activeSlave.health = random(25,45)>>
-		<<set $activeSlave.beauty = random(0,2)>>
+		<<set $activeSlave.face = random(0,2)>>
 		<<set $activeSlave.accent = 0>>
 		<<set $activeSlave.intelligence = 3, $activeSlave.intelligenceImplant = 1>>
 		<<set $activeSlave.oralSkill = 100, $activeSlave.analSkill = 100>>
@@ -392,7 +392,6 @@ The previous owner seems to have left in something of a hurry.
 	<<case "Eugenics">>
 		<<display "Generate New Slave">>
 		<<set $activeSlave.devotion = -100, $activeSlave.trust = -100, $activeSlave.health = random(80,90)>>
-		<<set $activeSlave.beauty = 6>>
 		<<set $activeSlave.intelligence = 3>>
 		<<set $activeSlave.intelligenceImplant = 1>>
 		<<set $activeSlave.face = 3>>
@@ -413,7 +412,7 @@ The previous owner seems to have left in something of a hurry.
 		<<set $one_time_age_overrides_pedo_mode to 1>>
 		<<display "Generate XX Slave">>
 		<<set $activeSlave.devotion = random(25,45), $activeSlave.trust = random(-25,-45), $activeSlave.health = random(55,65)>>
-		<<set $activeSlave.beauty = random(1,3)>>
+		<<set $activeSlave.face = random(1,3)>>
 		<<set $activeSlave.preg = random(10,35),$activeSlave.pregType = random(3,5) , $activeSlave.lactation = 1>>
 		<<set $activeSlave.birthsTotal = 5>>
 		<<set $activeSlave.bellySag = 20>>
@@ -440,7 +439,7 @@ The previous owner seems to have left in something of a hurry.
 	<<set $dump to $heroSlaves.pluck($j,$j)>>
 	<<slaveCost $activeSlave>>
 	<<if _valueGiven + $slaveCost < _valueOwed*2>>
-		<<NationalityToAccent>>
+		<<NationalityToAccent $activeSlave>>
 		<<set $activeSlave.pubicHColor to $activeSlave.hColor>>
 		<<set $activeSlave.pubicHStyle = "waxed">>
 		<<set $activeSlave.underArmHColor = $activeSlave.hColor>>
diff --git a/src/npc/databases/cheatmodeDatabase.tw b/src/npc/databases/cheatmodeDatabase.tw
index b9c3973559c262f1715ef48b408fd47c1323855b..713598356eb1804f999e61fb14a3761beefc0377 100644
--- a/src/npc/databases/cheatmodeDatabase.tw
+++ b/src/npc/databases/cheatmodeDatabase.tw
@@ -1,6 +1,6 @@
 :: Cheatmode Database [nobr]
 
-<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, physicalAge: 18, visualAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0}>>
+<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 1, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), actualAge: 18, physicalAge: 18, visualAge: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race: "white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, publicCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 0, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0}>>
 
 <<set _HS = clone($activeSlave)>>
 <<set _HS.slaveName = "Miss Anne", _HS.birthName = "Lindy Anne", _HS.ID = 990000, _HS.relation = "mother", _HS.relationTarget = 990004, _HS.relationship = 4, _HS.relationshipTarget = 990001, _HS.rivalry = 1, _HS.rivalryTarget = 990002, _HS.assignment = "be your Head Girl", _HS.birthWeek = random(0,51), _HS.actualAge = 42, _HS.physicalAge = 42, _HS.visualAge = 42, _HS.ageImplant = 1, _HS.health = 50, _HS.devotion = 100, _HS.height = 175, _HS.eyeColor = "green", _HS.hColor = "honey blonde", _HS.skin = "pale", _HS.hStyle = "long", _HS.waist = 1, _HS.boobs = 1000, _HS.boobsImplant = 600, _HS.areolae = 1, _HS.butt = 4, _HS.buttImplant = 2, _HS.face = 2, _HS.lips = 35, _HS.vagina = 2, _HS.anus = 1, _HS.ovaries = 1, _HS.makeup = 1, _HS.nails = 1, _HS.earPiercing = 1, _HS.vaginalSkill = 100, _HS.oralSkill = 100, _HS.analSkill = 100, _HS.whoreSkill = 100, _HS.entertainSkill = 100, _HS.clothes = "a slave gown", _HS.intelligence = 3, _HS.energy = 65, _HS.attrXY = 40, _HS.fetishKnown = 1, _HS.customTat = "'Miss Anne' is tattooed in lovely flowing script over her collarbone.", _HS.customDesc = "She speaks with the rich accent of the Old South.">>
diff --git a/src/npc/descriptions/fAnus.tw b/src/npc/descriptions/fAnus.tw
index abcda066792b76b229ce3523fc673dc96f5388dd..2384728148606cfd131621c12986a55938cdd06d 100644
--- a/src/npc/descriptions/fAnus.tw
+++ b/src/npc/descriptions/fAnus.tw
@@ -56,7 +56,7 @@ You call her over so you can
 
 <<if ($activeSlave.anus == 0)>>
 	<<if ($activeSlave.devotion > 20)>>
-		She accepts your orders without comment and presents her virgin anus for defloration. You<<if ($PC.dick == 0)>> don a strap-on and<</if>> gently sodomize her. You gently ease into her butthole and slowly accelerate your thrusting into her ass. Since she is already well broken, this new connection with <<if def $PC.customTitle>>her $PC.customTitle<<elseif $PC.title != 0>>her master<<else>>her mistress<</if>> @@color:hotpink;increases her devotion to you.@@ @@color:lime;Her tight little ass has been broken in.@@ She looks forward to having her asshole fucked by you again.
+		She accepts your orders without comment and presents her virgin anus for defloration. You<<if ($PC.dick == 0)>> don a strap-on and<</if>> gently sodomize her. You gently ease into her butthole and slowly accelerate your thrusting into her ass. Since she is already well broken, this new connection with her <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>master<<else>>mistress<</if>> @@color:hotpink;increases her devotion to you.@@ @@color:lime;Her tight little ass has been broken in.@@ She looks forward to having her asshole fucked by you again.
 		<<set $activeSlave.devotion += 4>>
 	<<elseif ($activeSlave.devotion >= -20)>>
 		She is clearly unhappy at the idea of taking a dick up her butt. She obeys orders anyway, and lies there wincing and moaning as you<<if ($PC.dick == 0)>> don a strap-on and<</if>> fuck her ass. You gently ease into her butthole and slowly accelerate your thrusting into her ass. However she still squeals in pain as you continue pounding. @@color:lime;Her tight little ass has been broken in,@@ and she @@color:gold;fears further anal pain.@@
diff --git a/src/npc/descriptions/fFuckdollWidgets.tw b/src/npc/descriptions/fFuckdollWidgets.tw
index cc4dc395f588f628badb30cc7bc0d0185efde76a..43dbff7936530940420a61aa36c74e2f28212f79 100644
--- a/src/npc/descriptions/fFuckdollWidgets.tw
+++ b/src/npc/descriptions/fFuckdollWidgets.tw
@@ -23,7 +23,7 @@ You decide to use the Fuckdoll's <<if $activeSlave.lips > 95>>facepussy<<else>>f
 <<else>>
 	It's so perfectly tuned that it begins to orgasm from nothing more than oral stimulation, and it continues to shiver with repeated orgasms as it sucks.
 <</if>>
-You climax, <<if $PC.dick == 1>>blowing your load down its throat<<else>>giving it a good amout of femcum to swallow<</if>>, and return it to <<if $activeSlave.amp == 0>>a standing position<<else>>where it was resting<</if>>.
+You climax, <<if $PC.dick == 1>>blowing your load down its throat<<else>>giving it a good amount of femcum to swallow<</if>>, and return it to <<if $activeSlave.amp == 0>>a standing position<<else>>where it was resting<</if>>.
 <<if $PC.dick == 1>>
 	<<if $activeSlave.lips > 95>>It gives sloppy blowjobs, its lips being too big for much control, and strings of your cum beribbon its suit. The Fuckdoll will be cleaned by another slave.
 	<<else>>It swallows repeatedly as it returns to its resting posture.
diff --git a/src/npc/descriptions/fLips.tw b/src/npc/descriptions/fLips.tw
index 3072a9de986817236c493c3c64afe3eb626ccd18..a6aea88186a5bcae2fea033f335a30c6057f5250 100644
--- a/src/npc/descriptions/fLips.tw
+++ b/src/npc/descriptions/fLips.tw
@@ -68,7 +68,7 @@ You tell $activeSlave.slaveName to
 	You set her limbless torso on the
 	<<if ($PC.dick != 0)>>
 		edge of your desk with her on her back. Her head dangles off the edge of the desk, leaving her <<if $seeRace == 1>>$activeSlave.race <</if>>mouth at the perfect angle for use. As an amputee she has absolutely no control over the depth or quickness of oral sex, so you are careful not to hurt her. Even so, you take her to the edge of gagging, enjoying the sight of her $activeSlave.skin throat bulging. Eventually you shoot your load directly down her gullet.
-		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up futher, and grind your pussy against her face.<</if>>
+		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up further, and grind your pussy against her face.<</if>>
 	<<else>>
 		floor next to your desk and kneel on her with your legs on either side of her, so your pussylips are hard against her <<if $seeRace == 1>>$activeSlave.race <</if>>mouth. She desperately eats you out, trying to get you off as fast as possible so she can get a bit more air, but you grind down without mercy, taking your pleasure.
 	<</if>>
@@ -80,7 +80,7 @@ You tell $activeSlave.slaveName to
 	<<else>>
 	She has absolutely no control over the depth or quickness of oral sex, so you are careful not to hurt her. Even so, you take her to the edge of gagging, enjoying the sight of her $activeSlave.skin throat bulging and every movement within her overstuffed womb as she struggles to breathe. Eventually you shoot your load directly down her gullet.
 	<</if>>
-		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up futher, and grind your pussy against her face.<</if>>
+		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up further, and grind your pussy against her face.<</if>>
 	<<else>>
 	<<if $activeSlave.bellyImplant > 8000>>
 	She has absolutely no control over how hard you grind your cunt against her face, so you are careful not to suffocate her. Even so, you take her to the edge, enjoying the sight of the spasms running through her stomach as she struggles to breathe. Eventually you climax, giving her a good taste of your femcum.
@@ -93,7 +93,7 @@ You tell $activeSlave.slaveName to
 	She has absolutely no control over
 	<<if ($PC.dick != 0)>>
 		the depth or quickness of oral sex, so you are careful not to hurt her. Even so, you take her to the edge of gagging, enjoying the sight of her $activeSlave.skin throat bulging and her absurd boobs jiggling as she struggles to breathe. Eventually you shoot your load directly down her gullet.
-		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up futher, and grind your pussy against her face.<</if>>
+		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up further, and grind your pussy against her face.<</if>>
 	<<else>>
 		how hard you grind your cunt against her face, so you are careful not to suffocate her. Even so, you take her to the edge, enjoying the sight of her absurd boobs jiggling as she struggles to breathe. Eventually you climax, giving her a good taste of your femcum.
 	<</if>>
@@ -101,7 +101,7 @@ You tell $activeSlave.slaveName to
 	You get her situated on the edge of your desk, on her back. This anchors her, the massive weight of her ass stopping her from going anywhere at all. Her head dangles off the edge of the desk, leaving her <<if $seeRace == 1>>$activeSlave.race <</if>>mouth at the perfect angle for use.
 	<<if ($PC.dick != 0)>>
 	She has absolutely no control over the depth or quickness of oral sex, so you are careful not to hurt her. Even so, you take her to the edge of gagging, enjoying the sight of her $activeSlave.skin throat bulging and her absurd rear jiggling as she struggles to breathe. Eventually you shoot your load directly down her gullet.
-		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up futher, and grind your pussy against her face.<</if>>
+		<<if $PC.vagina == 1>>If she thought that was it, she's soon corrected: you hike yourself up further, and grind your pussy against her face.<</if>>
 	<<else>>
 	She has absolutely no control over how hard you grind your cunt against her face, so you are careful not to suffocate her. Even so, you take her to the edge, enjoying the sight of her absurd rear jiggling as she struggles to breathe. Eventually you climax, giving her a good taste of your femcum.
 	<</if>>
diff --git a/src/npc/fFeelings.tw b/src/npc/fFeelings.tw
index f40add380693aa38a0b732248afb9f870e30f748..285c885e851bdb23109e8fe26daf2d779573d651 100644
--- a/src/npc/fFeelings.tw
+++ b/src/npc/fFeelings.tw
@@ -2263,7 +2263,7 @@ My favorite part of my body is
 	<<if ($activeSlave.muscles <= 5)>>
 	I know I'm not a perfect fit for your
 	<<if _lisping == 1>>
-		vithion of the future, but I'll do my betht to herve everyone who's well built.
+		vithion of the future, but I'll do my betht to therve everyone who's well built.
 	<<else>>
 		vision of the future, but I'll do my best to serve everyone who's well built.
 	<</if>>
diff --git a/src/npc/removeActiveSlave.tw b/src/npc/removeActiveSlave.tw
index b46fe3624403e09c8ee62ae3824b207031bb489a..3db53ef2a15354407a5bdcf83d4b807374f0d73c 100644
--- a/src/npc/removeActiveSlave.tw
+++ b/src/npc/removeActiveSlave.tw
@@ -25,6 +25,25 @@
 			<<set $slaves[$y].pregSource to 0>>
 		<</if>>
 	<</for>>
+	<<if $PC.mother == $activeSlave.ID>>
+		<<set $PC.mother to $missingParentID>>
+		<<if $PC.father == $activeSlave.ID>>
+			<<set $PC.father to $missingParentID>>
+		<</if>>
+		<<set $missingParentID-->>
+	<</if>>
+	<<if $PC.father == $activeSlave.ID>>
+		<<set $PC.father to $missingParentID>>
+		<<set $missingParentID-->>
+	<</if>>
+	<<if $PC.sisters > 0>>
+		/*put sister decrement code here*/
+	<</if>>
+	<<if $PC.daughters > 0>>
+		<<if $activeSlave.father == -1 || $activeSlave.mother == -1>>
+			<<set $PC.daughters-->>
+		<</if>>
+	<</if>>
 	<<if $activeSlave.daughters > 0>>
 		<<for $y to 0; $y < $slaves.length; $y++>>
 			<<if $slaves[$y].mother is $activeSlave.ID>>
diff --git a/src/npc/startingGirls/commitStartingGirl.tw b/src/npc/startingGirls/commitStartingGirl.tw
index 70f3d5b18fdb29afe725ddbabb498bee06812f98..88a91830316cea6e4e7ee6914230f4e25b862f00 100644
--- a/src/npc/startingGirls/commitStartingGirl.tw
+++ b/src/npc/startingGirls/commitStartingGirl.tw
@@ -12,13 +12,13 @@
 <<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 
 <<set $careerBonusApplied = 0>>
+<<set $originOveride = 0>>
 
 <<if $cash < $minimumSlaveCost>><<goto "Acquisition">><</if>>
 
 <<set $showStartingGirlsExplanation to 0>>
 
 <<if $createRelatedSlave == 0>>
-	<<set $startingGirlCopied to 1>>
 	<<if ($hostage == 0) || ($slaveCost > $hostageCost)>>
 		<<set $hostage to $slaveWithoutBonuses>>
 		<<set $hostageCost to $slaveCost>>
@@ -27,7 +27,7 @@
 <</if>>
 
 $activeSlave.slaveName has been added to your starting stable of slaves. You now have ¤$cash remaining.
-<br><br>
+<br>
 
 <<if $cash >= $minimumSlaveCost>>
 	<br>
@@ -36,7 +36,7 @@ $activeSlave.slaveName has been added to your starting stable of slaves. You now
 		<<goto "Starting Girls">>
 	<</click>>
 	<br>
-	[[Add another slave, based on the previous slave|Starting Girls][$activeSlave = $slaveWithoutBonuses, $activeSlave.relation to 0, $activeSlave.relationTarget to 0, $activeSlave.mother = 0, $activeSlave.father = 0]]
+	[[Add another slave, based on the previous slave|Starting Girls][$activeSlave = $slaveWithoutBonuses, $activeSlave.relation to 0, $activeSlave.relationTarget to 0, $startingGirlCopied = 1, $activeSlave.mother = 0, $activeSlave.father = 0]]
 	<<if $createRelatedSlave == 1>>
 	<br>
 	//Add another slave, related to the previous slave://
@@ -56,18 +56,18 @@ $activeSlave.slaveName has been added to your starting stable of slaves. You now
 		<</if>>
 		*/
 	<<else>>
-		[[Twin|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "twin", $activeSlave.relationTarget to $activeSlave.ID+1]]
+		[[Twin|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "twin", $activeSlave.relationTarget to $activeSlave.ID+1, $startingGirlCopied = 1]]
 		<<if $activeSlave.actualAge <= 8 && ($PC.career == "servant" || $PC.career == "escort") && ($PC.vagina == 1)>>
 		<<else>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
-		[[Sister|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "sister", $activeSlave.relationTarget to $activeSlave.ID+1]]
+		[[Sister|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "sister", $activeSlave.relationTarget to $activeSlave.ID+1, $startingGirlCopied = 1]]
 		<<if $activeSlave.actualAge <= 24>>
 			<br>&nbsp;&nbsp;&nbsp;&nbsp;
-			[[Mother|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "daughter", $activeSlave.relationTarget to $activeSlave.ID+1]]
+			[[Mother|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "daughter", $activeSlave.relationTarget to $activeSlave.ID+1, $startingGirlCopied = 1]]
 		<</if>>
 		<<if $activeSlave.actualAge >= ($fertilityAge + $minimumSlaveAge)>>
 			<br>&nbsp;&nbsp;&nbsp;&nbsp;
-			[[Daughter|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "mother", $activeSlave.birthsTotal += 1, $activeSlave.relationTarget to $activeSlave.ID+1]]
+			[[Daughter|RG AS Dump][$returnTo to "Starting Girls", $activeSlave.relation to "mother", $activeSlave.birthsTotal += 1, $activeSlave.relationTarget to $activeSlave.ID+1, $startingGirlCopied = 1]]
 		<</if>>
 		<</if>>
 	<</if>>
diff --git a/src/npc/startingGirls/moreCustomOptions.tw b/src/npc/startingGirls/moreCustomOptions.tw
index 9ed052687401fd41e90166097270e3187aa19bd8..7ac21d6c72525a3b941c2cd9992af2f995b898c5 100644
--- a/src/npc/startingGirls/moreCustomOptions.tw
+++ b/src/npc/startingGirls/moreCustomOptions.tw
@@ -19,6 +19,13 @@
 ''Eye color:'' <<textbox "$activeSlave.eyeColor" $activeSlave.eyeColor "More customization options">>
 Custom tattoo: <<textbox "$activeSlave.customTat" $activeSlave.customTat "More customization options">>
 &nbsp;&nbsp;&nbsp;&nbsp;//Use complete, capitalized and punctuated sentences//
+Custom origin story: <<textbox "$activeSlave.origin" $activeSlave.origin "More customization options">>
+&nbsp;&nbsp;&nbsp;&nbsp;//For best results, use complete, capitalized and punctuated sentences.//
+<<if $originOveride == 0>>
+	[[Origin Override|More customization options][$originOveride to 1]] //Will keep your custom origin from being overwritten.//
+<<else>>
+	[[Disable Override|More customization options][$originOveride to 0]] //Will unlock origin and allow slavegen to overwrite it.//
+<</if>>
 Custom description: <<textbox "$activeSlave.customDesc" $activeSlave.customDesc "More customization options">>
 &nbsp;&nbsp;&nbsp;&nbsp;//Use complete, capitalized and punctuated sentences.//
 Custom label: <<textbox "$activeSlave.customLabel" $activeSlave.customLabel "More customization options">>
diff --git a/src/npc/startingGirls/startingGirls.tw b/src/npc/startingGirls/startingGirls.tw
index 62c2ba60244d62beff571d1ab110e5585a01a710..7d981c9cfbbc78b5cffe5d27d43feda421c31920 100644
--- a/src/npc/startingGirls/startingGirls.tw
+++ b/src/npc/startingGirls/startingGirls.tw
@@ -40,43 +40,43 @@
 		<</if>>
 		<<set $missingParentID -= 1>>
 	<<else>>
-	<<if $activeSlave.relation != 0>>
-	<<if $activeSlave.relation is "sister">>
-		<<set $activeSlave.relation = "sister">>
-		<<set $activeSlave.actualAge -= 5>>
-		<<set $activeSlave.actualAge += random(0,10)>>
-		<<set $activeSlave.birthWeek = 0>>
-	<<elseif $activeSlave.relation is "mother">>
-		<<set $activeSlave.relation = "daughter">>
-		<<set $activeSlave.actualAge -= random(16,24)>>
-		<<set $activeSlave.birthWeek = 0>>
-	<<elseif $activeSlave.relation is "daughter">>
-		<<set $activeSlave.relation = "mother">>
-		<<set $activeSlave.actualAge += random(16,24)>>
-		<<set $activeSlave.birthWeek = 0>>
-	<</if>>
-	<<set $activeSlave.relationTarget = $activeSlave.ID>>
+	<<set _tempSlave = clone($activeSlave)>>
+	<<set $activeSlave = $slaveWithoutBonuses>>
+	<<if _tempSlave.relation != 0>>
+		<<if _tempSlave.relation is "sister">>
+			<<set $activeSlave.relation = "sister">>
+			<<set $activeSlave.age -= 5>>
+			<<set $activeSlave.age += random(0,10)>>
+		<<elseif _tempSlave.relation is "mother">>
+			<<set $activeSlave.relation = "daughter">>
+			<<set $activeSlave.age -= random(16,24)>>
+		<<elseif _tempSlave.relation is "daughter">>
+			<<set $activeSlave.relation = "mother">>
+			<<set $activeSlave.age += random(16,24)>>
+			<<if $activeSlave.vagina == 0>><<set $activeSlave.vagina++>><</if>>
+		<</if>>
+		<<set $activeSlave.relationTarget = _tempSlave.ID>>
 	<</if>>
 	<</if>>
 	<<set $activeSlave.visualAge = $activeSlave.actualAge>>
 	<<set $activeSlave.physicalAge = $activeSlave.actualAge>>
-	<<NationalityToName>>
+	<<NationalityToName $activeSlave>>
 	<<set $activeSlave.slaveName = $activeSlave.birthName>>
 	<<set $activeSlave.ID = $IDNumber>>
 	<<set $IDNumber += 1>>
 	<<if $activeSlave.attrKnown == 0>>
-	<<set $activeSlave.attrXX = random(0,100)>>
-	<<set $activeSlave.attrXY = random(0,100)>>
-	<<set $activeSlave.energy = random(1,90)>>
+		<<set $activeSlave.attrXX = random(0,100)>>
+		<<set $activeSlave.attrXY = random(0,100)>>
+		<<set $activeSlave.energy = random(1,90)>>
 	<</if>>
 	<<if $activeSlave.fetish is "mindbroken">>
 	<<elseif $activeSlave.fetishKnown == 0>>
-	<<set $activeSlave.fetishStrength = random(0,90)>>
-	<<set $activeSlave.fetish = either("none", "none", "none", "none", "none", "none", "none", "none", "none", "none", "submissive", "cumslut", "humiliation", "buttslut", "boobs", "pregnancy", "dom", "sadist", "masochist")>>
+		<<set $activeSlave.fetishStrength = random(0,90)>>
+		<<set $activeSlave.fetish = either("none", "none", "none", "none", "none", "none", "none", "none", "none", "none", "submissive", "cumslut", "humiliation", "buttslut", "boobs", "pregnancy", "dom", "sadist", "masochist")>>
 	<</if>>
 	<<set $startingGirlCopied = 0>>
 <<elseif $archetyped == 1>>
-	<<NationalityToName>>
+	<<NationalityToName $activeSlave>>
 	<<set $activeSlave.slaveName = $activeSlave.birthName>>
 	<<set $archetyped = 0>>
 <</if>>
@@ -139,6 +139,7 @@ __You are customizing this slave:__
 	<</if>>
 <</if>>
 /* this block makes starting girls actually apply the slave origins, mostly since it just hates you and everything you do */
+<<if $originOveride = 0>>
 	<<if $PC.career is "capitalist">>
 		<<if $activeSlave.mother == -1 && $activeSlave.father == -1>>
 			<<set $activeSlave.origin to "To solidify an investment in hermaphrodite self-fertility, you took part in a test successful test trial. Nine months later your daughter was born.">>
@@ -286,6 +287,7 @@ __You are customizing this slave:__
 		<<set $activeSlave.origin to "You won her at cards, a memento from your life as one of the idle rich before you became an arcology owner.">>
 		<<set $activeSlave.customTat to "She has the silhouette of an arcology tattooed on the nape of her neck.">>
 	<</if>>
+<</if>>
 	<<if $activeSlave.vagina < 1>>
 	<<set $activeSlave.vaginalSkill = 0>>
 	<</if>>
@@ -362,7 +364,7 @@ __You are customizing this slave:__
 <</click>>
 
 | <<click "Randomize name">>
-<<NationalityToName>>
+<<NationalityToName $activeSlave>>
 <<set $activeSlave.slaveName = $activeSlave.birthName>>
 <<SaleDescription>>
 <<StartingGirlsCost>>
@@ -1361,7 +1363,7 @@ XY attraction:
 <<click "Judgemental">><<set $activeSlave.sexualFlaw = "judgemental">><<replace "#sexualFlaw">>@@color:red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</click>> |
 <<click "Sexually idealistic">><<set $activeSlave.sexualFlaw = "idealistic">><<replace "#sexualFlaw">>@@color:red;$activeSlave.sexualFlaw.@@<</replace>><<StartingGirlsCost>><</click>>
 
-<br><br>
+<br>
 <span id="finalize">
 <<slaveCost $activeSlave>>
 <<if $cash >= $slaveCost>>
@@ -1446,7 +1448,7 @@ XY attraction:
 		<br>
 	<</if>>
 <<else>>
-	//You lack the necessary funds to add this slave.//
+	<br>//You lack the necessary funds to add this slave.//
 <</if>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;
 [[Discard this slave and continue|Acquisition]]
diff --git a/src/pregmod/extendedFamilyWidgets.tw b/src/pregmod/extendedFamilyWidgets.tw
index 666c45bac065d89caa5627681a6660dd41141986..98b4994f6bc76377d4074429334aa1635860a0a3 100644
--- a/src/pregmod/extendedFamilyWidgets.tw
+++ b/src/pregmod/extendedFamilyWidgets.tw
@@ -532,6 +532,7 @@
 	is @@color:lightgreen;_rel_desc _rel_type.@@
 <</if>>
 <</if>>
+<<set $children = []>> 
 
 /*testtest PC twin passages - determines how many twins you have but not implemented yet
 <<for $i to 0; $i < $slaves.length; $i++>>
diff --git a/src/pregmod/generateChild.tw b/src/pregmod/generateChild.tw
index 3e77cdbbce9903db1e08c27cd067b5b0c798eb24..ec38196c3d2dc033c28c428d95461a3f6047f671 100644
--- a/src/pregmod/generateChild.tw
+++ b/src/pregmod/generateChild.tw
@@ -1,4 +1,4 @@
-:: generateChild [nobr]
+:: Generate Child [nobr]
 
 <<if $mom != 0>>
 	<<set $mergeMom = 0>>
@@ -8,7 +8,7 @@
 			<<set $mergeMom = $genePool[$m]>>
 		<</if>>
 		<<if $mom.pregSource == $genePool[$m].ID>>
-			<<set $mergeDad = $genePool[$m].ID>>
+			<<set $mergeDad = $genePool[$m]>>
 		<</if>>
 	<</for>>
 	<<if $mom.pregSource == -1>>
@@ -25,11 +25,21 @@
 <<if $babyGender == 1>>
 	<<display "Generate XX Slave">>
 	<<if $PC.pregSource < 1>>
+		<<set $activeSlave.slaveName = "My daughter">>
 		<<set $activeSlave.mother = -1>>
 		<<set $activeSlave.father = $missingParentID>>
 		<<set $missingParentID-->>
 		<<set $activeSlave.nationality = "Stateless">>
-		<<set $activeSlave.race = $PC.race>>
+		<<if $PC.pregSource == -2 && $arcologies[0].FSSupremacist != "unset">>
+			<<set $activeSlave.race = either($PC.race, $arcologies[0].FSSubjugationistRace, $arcologies[0].FSSubjugationistRace)>>
+			<<if $PC.race != $arcologies[0].FSSubjugationistRace>>
+				<<if random(1,100) > 50>>
+					<<set $activeSlave.race = "mixed race">>
+				<</if>>
+			<</if>>
+		<<else>>
+			<<set $activeSlave.race = $PC.race>>
+		<</if>>
 		<<set $activeSlave.skin = $PC.skin>>
 		<<set $activeSlave.eyeColor = either($PC.eyeColor, "brown", "blue", "brown", "green", "hazel", "green")>>
 		<<set $activeSlave.hColor = either($PC.hColor, "brown", "blonde", "black", "brown")>>
@@ -43,10 +53,11 @@
 	<<else>>
 		<<for $m to 0; $m < $genePool.length; $m++>>
 			<<if $PC.pregSource == $genePool[$m].ID>>
-				<<set $mergeDad == $genePool[$m].ID>>
+				<<set $mergeDad == $genePool[$m]>>
 				<<break>>
 			<</if>>
 		<</for>>
+		<<set $activeSlave.slaveName = String("My and " + $mergeDad.slaveName + "'s daughter")>>
 		<<set $activeSlave.mother = -1>>
 		<<set $activeSlave.father = $mergeDad.ID>>
 		<<if $PC.nationality == $mergeDad.nationality>>
@@ -64,7 +75,7 @@
 		<<if $PC.skin == $mergeDad.skin>>
 			<<set $activeSlave.skin = $PC.skin>>
 		<<else>>
-			<<genSkinTone $PC, $mergeDad>>
+			<<GenSkinTone $PC $mergeDad>>
 		<</if>>
 		<<if $PC.eyeColor == $mergeDad.eyeColor>>
 			<<set $activeSlave.eyeColor = $PC.eyeColor>>
@@ -123,11 +134,21 @@
 <<elseif $babyGender == 2>>
 	<<display "Generate XY Slave">>
 	<<if $PC.pregSource < 1>>
+		<<set $activeSlave.slaveName = "My son">>
 		<<set $activeSlave.mother = -1>>
 		<<set $activeSlave.father = $missingParentID>>
 		<<set $missingParentID-->>
 		<<set $activeSlave.nationality = "Stateless">>
-		<<set $activeSlave.race = $PC.race>>
+		<<if $PC.pregSource == -2 && $arcologies[0].FSSupremacist != "unset">>
+			<<set $activeSlave.race = either($PC.race, $arcologies[0].FSSubjugationistRace, $arcologies[0].FSSubjugationistRace)>>
+			<<if $PC.race != $arcologies[0].FSSubjugationistRace>>
+				<<if random(1,100) > 50>>
+					<<set $activeSlave.race = "mixed race">>
+				<</if>>
+			<</if>>
+		<<else>>
+			<<set $activeSlave.race = $PC.race>>
+		<</if>>
 		<<set $activeSlave.skin = $PC.skin>>
 		<<set $activeSlave.eyeColor = either($PC.eyeColor, "brown", "blue", "brown", "green", "hazel", "green")>>
 		<<set $activeSlave.hColor = either($PC.hColor, "brown", "blonde", "black", "brown")>>
@@ -141,10 +162,11 @@
 	<<else>>
 		<<for $m to 0; $m < $genePool.length; $m++>>
 			<<if $PC.pregSource == $genePool[$m].ID>>
-				<<set $mergeDad == $genePool[$m].ID>>
+				<<set $mergeDad == $genePool[$m]>>
 				<<break>>
 			<</if>>
 		<</for>>
+		<<set $activeSlave.slaveName = String("My and " + $mergeDad.slaveName + "'s son")>>
 		<<set $activeSlave.mother = -1>>
 		<<set $activeSlave.father = $mergeDad.ID>>
 		<<if $PC.nationality == $mergeDad.nationality>>
@@ -162,7 +184,7 @@
 		<<if $PC.skin == $mergeDad.skin>>
 			<<set $activeSlave.skin = $PC.skin>>
 		<<else>>
-			<<genSkinTone $PC, $mergeDad>>
+			<<GenSkinTone $PC $mergeDad>>
 		<</if>>
 		<<if $PC.eyeColor == $mergeDad.eyeColor>>
 			<<set $activeSlave.eyeColor = $PC.eyeColor>>
@@ -231,13 +253,16 @@
 		<</if>>
 	<</if>>
 	<<set $activeSlave.mother = $mergeMom.ID>>
-	<<if $mergeMom.pregSource > 0>>
+	<<if $mom.pregSource > 0>>
 		<<set $activeSlave.father = $mergeDad.ID>>
-	<<elseif $mergeMom.pregSource == -1>>
+		<<set $activeSlave.slaveName = String($mom.slaveName + " and " + $mergeDad.slaveName + "'s child")>>
+	<<elseif $mom.pregSource == -1>>
 		<<set $activeSlave.father = -1>>
+		<<set $activeSlave.slaveName = String($mom.slaveName + " and my child")>>
 	<<else>>
 		<<set $activeSlave.father = $missingParentID>>
 		<<set $missingParentID-->>
+		<<set $activeSlave.slaveName = String($mom.slaveName + "'s slut child")>>
 	<</if>>
 	<<if $mergeMom.nationality == $mergeDad.nationality>>
 		<<set $activeSlave.nationality = $mergeDad.nationality>>
@@ -251,10 +276,18 @@
 	<<else>>
 		<<set $activeSlave.race = "mixed race">>
 	<</if>>
+	<<if $mom.pregSource == -2 && $arcologies[0].FSSupremacist != "unset">>
+		<<set $activeSlave.race = either($mergeMom.race, $arcologies[0].FSSubjugationistRace, $arcologies[0].FSSubjugationistRace)>>
+		<<if $mergeMom.race != $arcologies[0].FSSubjugationistRace>>
+			<<if random(1,100) > 50>>
+				<<set $activeSlave.race = "mixed race">>
+			<</if>>
+		<</if>>
+	<</if>>
 	<<if $mergeMom.skin == $mergeDad.skin>>
 		<<set $activeSlave.skin = $mergeMom.skin>>
 	<<else>>
-		<<genSkinTone $mergeMom, $mergeDad>>
+		<<GenSkinTone $mergeMom $mergeDad>>
 	<</if>>
 	<<if $mergeMom.eyeColor == $mergeDad.eyeColor>>
 		<<set $activeSlave.eyeColor = $mergeMom.eyeColor>>
@@ -277,7 +310,7 @@
 	<<else>>
 		<<set $activeSlave.eyeColor = either($mergeMom.eyeColor, $mergeDad.eyeColor)>>
 	<</if>>
-	<<if $mergeMom.pregSource == -2 || $mergeMom.pregSource == 0>>
+	<<if $mom.pregSource == -2 || $mom.pregSource == 0>>
 		<<set $activeSlave.eyeColor = either($mergeMom.eyeColor, "brown", "blue", "brown", "green", "hazel", "green")>>
 	<</if>>
 	<<if $mergeMom.hColor == $mergeDad.hColor>>
@@ -305,8 +338,8 @@
 	<<else>>
 		<<set $activeSlave.hColor = either($mergeMom.hColor, $mergeDad.hColor)>>
 	<</if>>
-	<<if $mergeMom.pregSource == -2 || $mergeMom.pregSource == 0>>
-		<<set $activeSlave.hColor = either($mergeMom.hColor, "brown", "blonde", "black", "brown")>>
+	<<if $mom.pregSource == -2 || $mom.pregSource == 0>>
+		<<set $activeSlave.hColor = either($mergeMom.hColor, "brown", "blonde", "black", "brown", "black", "brown", "black")>>
 	<</if>>
 	<<set $activeSlave.pubicHColor = $activeSlave.hColor>>
 	<<set $activeSlave.underArmHColor = $activeSlave.hColor>>
@@ -343,43 +376,83 @@
 
 /* Int and facial attractiveness changes to bolster eugenics and add negatives for excessive inbreeding */
 <<if $activeSlave.mother == -1 && $PC.pregSource == -1>>
-	<<set $activeSlave.face = either(2,2,2,3)>>
-	<<set $activeSlave.intelligence = either(2,2,2,2,3,3)>>
+	<<set $activeSlave.face = either(2, 2, 2, 3)>>
+	<<set $activeSlave.intelligence = either(2, 2, 2, 2, 3, 3)>>
 <<elseif $activeSlave.mother == -1>>
-	<<if $activeSlave.face < 2>>
-		<<set $activeSlave.face++>>
-	<</if>>
-	<<if $activeSlave.intelligence < 2>>
-		<<set $activeSlave.intelligence++>>
+	<<if $PC.pregSource > 0>>
+		<<if $mergeDad.face < $PC.face>>
+			<<set $activeSlave.face to random($mergeDad.face, $PC.face)>>
+		<<else>>
+			<<set $activeSlave.face to $PC.face>>
+		<</if>>
+		<<if $activeSlave.face < 2>>
+			<<set $activeSlave.face += 1>>
+		<</if>>
+		<<if $mergeDad.intelligence < $PC.intelligence>>
+			<<set $activeSlave.intelligence to random($mergeDad.intelligence, $PC.intelligence)>>
+		<<else>>
+			<<set $activeSlave.intelligence to $mergeMom.intelligence>>
+		<</if>>
+		<<if $activeSlave.intelligence < 2>>
+			<<set $activeSlave.intelligence += 1>>
+		<</if>>
+	<<else>>
+		<<set $activeSlave.face = either(1, 2, 2, 2, 3)>>
+		<<set $activeSlave.intelligence = either(1, 2, 2, 2, 2, 3, 3)>>
 	<</if>>
 <<elseif $activeSlave.father == -1 && $mom > 0>>
 	<<if $mom.breedingMark == 1>>
-		<<set $activeSlave.face = either(2,2,2,3)>>
-		<<set $activeSlave.intelligence = either(2,2,2,2,3,3)>>
+		<<set $activeSlave.face = either(2, 2, 2, 3)>>
+		<<set $activeSlave.intelligence = either(2, 2, 2, 2, 3, 3)>>
 		<<set $activeSlave.breedingMark = 1>>
 	<<else>>
-		<<if $activeSlave.face < 2>>
-			<<set $activeSlave.face++>>
+		<<if $PC.face > $mergeMom.face>>
+			<<set $activeSlave.face to random($mergeMom.face, $PC.face)>>
+		<<else>>
+			<<set $activeSlave.face to $mergeMom.face>>
 		<</if>>
-		<<if $activeSlave.intelligence < 2>>
-			<<set $activeSlave.intelligence++>>
+		<<if $PC.intelligence > $mergeMom.intelligence>>
+			<<set $activeSlave.intelligence to random($mergeMom.intelligence, $PC.intelligence)>>
+		<<else>>
+			<<set $activeSlave.intelligence to $mergeMom.intelligence>>
+		<</if>>
+		<<if $inbreeding == 1>>
+			<<if $activeSlave.face > -3 && random(1,100) < 60>>
+				<<set $activeSlave.face -= 1>>
+			<</if>>
+			<<if $activeSlave.intelligence > -3 && random(1,100) < 60>>
+				<<set $activeSlave.intelligence -= 1>>
+				<<if $activeSlave.intelligence > -3 && random(1,100) < 30>>
+					<<set $activeSlave.intelligence -= 1>>
+				<</if>>
+			<</if>>
 		<</if>>
-	<</if>>
-<<elseif $activeSlave.father == -1>>
-	<<if $activeSlave.face < 2>>
-		<<set $activeSlave.face++>>
-	<</if>>
-	<<if $activeSlave.intelligence < 2>>
-		<<set $activeSlave.intelligence++>>
 	<</if>>
 <<else>>
-	<<set $activeSlave.face to random($mergeDad.face, $mergeMom.face)>>
-	<<if $activeSlave.face > -3 && random(1,100) < 90>>
-		<<set $activeSlave.face-->>
+	<<if $mergeDad.face < $mergeMom.face>>
+		<<set $activeSlave.face to random($mergeDad.face, $mergeMom.face)>>
+	<<elseif $mergeDad.face > $mergeMom.face>>
+		<<set $activeSlave.face to random($mergeMom.face, $mergeDad.face)>>
+	<<else>>
+		<<set $activeSlave.face to $mergeMom.face>>
 	<</if>>
-	<<set $activeSlave.intelligence to random($mergeDad.intelligence, $mergeMom.intelligence)>>
-	<<if $activeSlave.intelligence > -3 && random(1,100) < 90>>
-		<<set $activeSlave.intelligence-->>
+	<<if $mergeDad.intelligence < $mergeMom.intelligence>>
+		<<set $activeSlave.intelligence to random($mergeDad.intelligence, $mergeMom.intelligence)>>
+	<<elseif $mergeDad.intelligence > $mergeMom.intelligence>>
+		<<set $activeSlave.intelligence to random($mergeMom.intelligence, $mergeDad.intelligence)>>
+	<<else>>
+		<<set $activeSlave.intelligence to $mergeMom.intelligence>>
+	<</if>>
+	<<if $inbreeding == 1>>
+		<<if $activeSlave.face > -3 && random(1,100) < 90>>
+			<<set $activeSlave.face -= 1>>
+		<</if>>
+		<<if $activeSlave.intelligence > -3 && random(1,100) < 90>>
+			<<set $activeSlave.intelligence -= 1>>
+				<<if $activeSlave.intelligence > -3 && random(1,100) < 60>>
+					<<set $activeSlave.intelligence -= 1>>
+				<</if>>
+		<</if>>
 	<</if>>
 <</if>>
 
@@ -418,13 +491,19 @@
 <<set $activeSlave.oralSkill = 0>>
 <<set $activeSlave.analSkill = 0>>
 <<set $activeSlave.vaginalSkill = 0>>
-<<set $activeSlave.accent = 3>>
+<<set $activeSlave.accent = 4>>
 <<set $activeSlave.canRecruit = 0>>
 <<set $activeSlave.hStyle = "long">>
 <<set $activeSlave.hLength = 300>>
 <<set $activeSlave.pubicHStyle = either("bushy", "bushy", "bushy", "bushy", "bushy", "bushy", "hairless")>>
 <<set $activeSlave.underArmHStyle = either("bushy", "bushy", "bushy", "bushy", "bushy", "bushy", "hairless")>>
+<<set $activeSlave.origin = "Shortly after birth, she was sealed in an aging tank until she was of age. She knows nothing of the world outside of what the tank imprinted her with.">>
+<<set $activeSlave.career = "a slave since birth">>
+<<set $activeSlave.intelligenceImplant = 0>>
+<<set $activeSlave.navelPiercing = 0>>
+<<set $activeSlave.devotion = 0>>
+<<set $activeSlave.trust = 0>>
+<<set $activeSlave.weekAcquired to $week>>
 
 <<set $mergeMom = 0>>
 <<set $mergeDad = 0>>
-<<set $mom = 0>>
diff --git a/src/pregmod/incubator.tw b/src/pregmod/incubator.tw
index af91a78cdcb2b71b387a58891978383ac9928e94..92d54b148a5816a82192275c525484d097de4ead 100644
--- a/src/pregmod/incubator.tw
+++ b/src/pregmod/incubator.tw
@@ -74,12 +74,11 @@ Target age for release: <<textbox "$targetAge" $targetAge "Incubator">> [[Minimu
 
 <<if $incubatorSlaves > 0>>
 <<for $i to 0; $i < $tanks.length; $i++>>
-		<<set $tanks[$i].birthName = $tanks[$i].slaveName>>
 		<<if $tanks[$i].growTime <= 0>>
 			<<set $readySlaves = 1>>
-			<br><br>$tanks[$i].slaveName is ready to be released from her tank.
+			<br><br>@@color:pink;$tanks[$i].slaveName@@ is ready to be released from her tank.
 		<<else>>
-			<br><br><<print $tanks[$i].slaveName>>'s growth is currently being accelerated. She will be ready for release in about <<print Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed)>> weeks.
+			<br><br>@@color:pink;<<print $tanks[$i].slaveName>>'s@@ growth is currently being accelerated. She will be ready for release in about <<print Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed)>> weeks.
 		<</if>>
 		<<if $incubatorUpgradeWeight == 1>>
 			<br>
diff --git a/src/pregmod/incubatorReport.tw b/src/pregmod/incubatorReport.tw
index a4898f530e6193f5a199f8d2e2dbe89c87bab3c6..73e1605903149291310ead0ae540401ac7e6c278 100644
--- a/src/pregmod/incubatorReport.tw
+++ b/src/pregmod/incubatorReport.tw
@@ -14,12 +14,13 @@
 	<<set $incubatorSlaves += 1>>
 	<<if $tanks[$i].growTime > 0>>
 		<<set $tanks[$i].growTime -= $incubatorUpgradeSpeed>>
-		<br><<print $tanks[$i].slaveName>>'s growth is currently being accelerated. She <<if Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed) == 0>>is @@color:lime;ready for release.@@ She will be ejected from her tank upon your approach<<else>>in about <<print Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed)>>will be ready for release  weeks<</if>>.
+		<br>@@color:pink;<<print $tanks[$i].slaveName>>'s@@ growth is currently being accelerated. She <<if Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed) == 0>>is @@color:lime;ready for release.@@ She will be ejected from her tank upon your approach<<else>>will be ready for release in about <<print Math.round($tanks[$i].growTime/$incubatorUpgradeSpeed)>> weeks<</if>>.
 	<<else>>
-		$tanks[$i].slaveName is @@color:lime;ready for release.@@ She will be ejected from her tank upon your approach.
+		@@color:pink;$tanks[$i].slaveName@@ is @@color:lime;ready for release.@@ She will be ejected from her tank upon your approach.
 	<</if>>
 
 	<<if $incubatorUpgradeWeight == 1>>
+		<br>
 		<<if $incubatorWeightSetting == 1>>
 			<<if $tanks[$i].weight < 100>>
 				<<if $incubatorUpgradeSpeed == 52>>
@@ -63,7 +64,7 @@
 				<</if>>			
 				The weight monitoring systems detect she is underweight and @@color:green;increase her coloric intake.@@
 			<<else>>
-				She is @color:lime;currently a healthy weight;@@ efforts will be made to maintain it.
+				She is @@color:lime;currently a healthy weight;@@ efforts will be made to maintain it.
 			<</if>>
 		<<elseif $incubatorWeightSetting == 0>>
 			<<if $tanks[$i].weight > -100>>
@@ -123,7 +124,7 @@
 				<</if>>			
 				The strength monitoring systems detect she is weak and @@color:green;increase her steroid dosage.@@
 			<<else>>
-				She has @color:lime;a healthy musculature;@@ efforts will be made to maintain it.
+				She has @@color:lime;a healthy musculature;@@ efforts will be made to maintain it.
 			<</if>>
 		<<elseif $incubatorMusclesSetting == 0>>
 			<<if $tanks[$i].muscles > -100>>
@@ -143,7 +144,7 @@
 		<<if $incubatorReproductionSetting == 2>>
 			Her developing body is being flooded with hormones.
 			<<if $incubatorWeightSetting == 1>>
-				Combined with the abundant food provided to her, her body grows radibly.
+				Combined with the abundant food provided to her, her body grows rapidly.
 				<<if $tanks[$i].ovaries == 1>>
 					<<set $tanks[$i].pubertyXX = 1>>
 					<<if $seeHyperPreg == 1>>
@@ -152,9 +153,9 @@
 						<<set $tanks[$i].pregType = random(3,5)>>
 					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
-						<<if $tanks[$i].breasts < 8000>>
+						<<if $tanks[$i].boobs < 8000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 2000>>
+							<<set $tanks[$i].boobs += 2000>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 50>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -165,9 +166,9 @@
 							<<set $tanks[$i].butt += 4>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 18>>
-						<<if $tanks[$i].breasts < 8000>>
+						<<if $tanks[$i].boobs < 8000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 500>>
+							<<set $tanks[$i].boobs += 500>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 50>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -178,9 +179,9 @@
 							<<set $tanks[$i].butt += 3>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 9>>
-						<<if $tanks[$i].breasts < 8000>>
+						<<if $tanks[$i].boobs < 8000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 200>>
+							<<set $tanks[$i].boobs += 200>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 60>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -191,9 +192,9 @@
 							<<set $tanks[$i].butt += 2>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 6>>
-						<<if $tanks[$i].breasts < 8000>>
+						<<if $tanks[$i].boobs < 8000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 100>>
+							<<set $tanks[$i].boobs += 100>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 70>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -204,9 +205,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 5>>
-						<<if $tanks[$i].breasts < 8000>>
+						<<if $tanks[$i].boobs < 8000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 100>>
+							<<set $tanks[$i].boobs += 100>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 80>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -276,9 +277,9 @@
 						<<set $tanks[$i].pregType = random(2,4)>>
 					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
-						<<if $tanks[$i].breasts < 4000>>
+						<<if $tanks[$i].boobs < 4000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 1000>>
+							<<set $tanks[$i].boobs += 1000>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 70>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -289,9 +290,9 @@
 							<<set $tanks[$i].butt += 3>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 18>>
-						<<if $tanks[$i].breasts < 4000>>
+						<<if $tanks[$i].boobs < 4000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 500>>
+							<<set $tanks[$i].boobs += 500>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 80>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -302,9 +303,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 9>>
-						<<if $tanks[$i].breasts < 4000>>
+						<<if $tanks[$i].boobs < 4000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 200>>
+							<<set $tanks[$i].boobs += 200>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 90>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -315,9 +316,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 6>>
-						<<if $tanks[$i].breasts < 4000>>
+						<<if $tanks[$i].boobs < 4000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 100>>
+							<<set $tanks[$i].boobs += 100>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 95>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -328,9 +329,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 5>>
-						<<if $tanks[$i].breasts < 4000>>
+						<<if $tanks[$i].boobs < 4000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 100>>
+							<<set $tanks[$i].boobs += 100>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 95>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -400,9 +401,9 @@
 						<<set $tanks[$i].pregType = random(2,3)>>
 					<</if>>
 					<<if $incubatorUpgradeSpeed == 52>>
-						<<if $tanks[$i].breasts < 2000>>
+						<<if $tanks[$i].boobs < 2000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 700>>
+							<<set $tanks[$i].boobs += 700>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 90>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -413,9 +414,9 @@
 							<<set $tanks[$i].butt += 2>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 18>>
-						<<if $tanks[$i].breasts < 2000>>
+						<<if $tanks[$i].boobs < 2000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 200>>
+							<<set $tanks[$i].boobs += 200>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 80>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -426,9 +427,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 9>>
-						<<if $tanks[$i].breasts < 2000>>
+						<<if $tanks[$i].boobs < 2000>>
 							The excess estrogen @@color:green;rapidly balloons her breasts.@@
-							<<set $tanks[$i].breasts += 50>>
+							<<set $tanks[$i].boobs += 50>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 80>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -439,9 +440,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 6>>
-						<<if $tanks[$i].breasts < 2000>>
+						<<if $tanks[$i].boobs < 2000>>
 							The excess estrogen @@color:green;rapidly grows her breasts.@@
-							<<set $tanks[$i].breasts += 20>>
+							<<set $tanks[$i].boobs += 20>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 90>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -452,9 +453,9 @@
 							<<set $tanks[$i].butt += 1>>
 						<</if>>
 					<<elseif $incubatorUpgradeSpeed == 5>>
-						<<if $tanks[$i].breasts < 2000>>
+						<<if $tanks[$i].boobs < 2000>>
 							The excess estrogen @@color:green;rapidly grows her breasts.@@
-							<<set $tanks[$i].breasts += 10>>
+							<<set $tanks[$i].boobs += 10>>
 						<</if>>
 						<<if $tanks[$i].hips < 2 && random(1,100) > 95>>
 							The excess estrogen @@color:green;causes her hips to widen for childbirth.@@
@@ -518,10 +519,10 @@
 		<<elseif $incubatorReproductionSetting == 1>>
 			Her hormone levels are being carefully managed, @@color:green;encouraging early puberty.@@
 			<<if $tanks[$i].ovaries == 1>>
-				<<set $pubertyXX = 1>>
-				<<if $tanks[$i].breasts < 400 && random(1,100) > 60>>
+				<<set $tanks[$i].pubertyXX = 1>>
+				<<if $tanks[$i].boobs < 400 && random(1,100) > 60>>
 					The added estrogen @@color:green;causes her breasts to swell.@@
-					<<set $tanks[$i].breasts += 50>>
+					<<set $tanks[$i].boobs += 50>>
 				<</if>>
 				<<if $tanks[$i].hips < 2 && random(1,100) > 90>>
 					The added estrogen @@color:green;causes her hips to widen.@@
@@ -532,7 +533,7 @@
 					<<set $tanks[$i].butt += 1>>
 				<</if>>
 			<<elseif $tanks[$i].balls > 0>>
-				<<set $pubertyXY = 1>>
+				<<set $tanks[$i].pubertyXY = 1>>
 				<<if $tanks[$i].balls < 3 && random(1,100) > 80>>
 					The added testosterone @@color:green;causes her balls to swell.@@
 					<<set $tanks[$i].balls += 1>>
@@ -550,9 +551,15 @@
 				<<if $tanks[$i].dick > 1>>
 					<<set $tanks[$i].dick -= 5>>
 				<</if>>
+				<<if $tanks[$i].balls <= 0>>
+					<<set $tanks[$i].balls = 1>>
+				<</if>>
+				<<if $tanks[$i].dick <= 0>>
+					<<set $tanks[$i].dick = 1>>
+				<</if>>
 			<</if>>
-			<<if $tanks[$i].breasts > 0>>
-				<<set $tanks[$i].breasts -= 500>>
+			<<if $tanks[$i].boobs > 0>>
+				<<set $tanks[$i].boobs -= 500>>
 			<</if>>
 			<<if $tanks[$i].butt > 0>>
 				<<set $tanks[$i].butt -= 4>>
@@ -566,9 +573,15 @@
 			<<if $tanks[$i].dick > 1>>
 				<<set $tanks[$i].dick -= 5>>
 			<</if>>
+			<<if $tanks[$i].balls <= 0>>
+				<<set $tanks[$i].balls = 1>>
+			<</if>>
+			<<if $tanks[$i].dick <= 0>>
+				<<set $tanks[$i].dick = 1>>
+			<</if>>
 		<</if>>
-		<<if $tanks[$i].breasts > 0>>
-			<<set $tanks[$i].breasts -= 500>>
+		<<if $tanks[$i].boobs > 0>>
+			<<set $tanks[$i].boobs -= 500>>
 		<</if>>
 		<<if $tanks[$i].butt > 0>>
 			<<set $tanks[$i].butt -= 4>>
@@ -581,6 +594,7 @@
 	<<set $tanks[$i].hips = Math.clamp($tanks[$i].hips, -2, 2)>>
 	<<set $tanks[$i].balls = Math.clamp($tanks[$i].balls, 0, 40)>>
 	<<set $tanks[$i].boobs = Math.clamp($tanks[$i].boobs, 0, 10000)>>
+<br>
 <</for>>
 <<if $incubatorSlaves == 0>>
 $incubatorNameCaps is currently unused.
diff --git a/src/pregmod/incubatorRetrievalWorkaround.tw b/src/pregmod/incubatorRetrievalWorkaround.tw
index bc552f7ce63fcf9cd3d82dcd542f75c7ae633dc1..6f82b0523d3e14cec82d95e6069891789d87ada7 100644
--- a/src/pregmod/incubatorRetrievalWorkaround.tw
+++ b/src/pregmod/incubatorRetrievalWorkaround.tw
@@ -4,8 +4,9 @@ $readySlave.slaveName has been discharged from $incubatorName and is ready for h
 
 <<set $activeSlave = $readySlave>>
 <<set $saleDescription to 0>>
+<<set $incubatorSlaves-->>
 <<display "Long Slave Description">>
 <<AddSlave $activeSlave>>
 <<set $nextLink to "AS Dump">>
-<<set $returnTo to "Incubator">>
-<<display "New Slave Intro">>
\ No newline at end of file
+<<set $returnTo to "Main">>
+<<display "New Child Intro">>
\ No newline at end of file
diff --git a/src/pregmod/newChildIntro.tw b/src/pregmod/newChildIntro.tw
index ca751b7b89ccf7c3f471fe1a288b8edb42105b70..c4bf132328f37333d05c5296dc775412e68e8fb5 100644
--- a/src/pregmod/newChildIntro.tw
+++ b/src/pregmod/newChildIntro.tw
@@ -36,61 +36,148 @@
 	<</if>>
 <</for>>
 
-<<set $activeSlave.origin = "Shortly after birth, she was sealed in an aging tank until she was of age. She knows nothing of the world outside of what the tank imprinted her with.">>
-<<set $activeSlave.career = "slave since birth">>
-
-
-You completed the legalities before heading to $incubatorName, knowing the tank will release her on your approach, and instruct $personalAssistantName to notify the new girl's parents to meet you in your office. As the tank exumes the disoriented girl, you help her to her feet<<if $incubatorReproductionSetting > 1>>, making sure to feel-up her overdeveloped body,<</if>> and walk her to your penthouse. Though first you must decide upon a name for the new girl; it won't take long to reach your office, so you have only @@color:orange;one chance to name her@@ before you arrive.
+You completed the legalities before heading to $incubatorName, knowing the tank will release her on your approach, and instruct $assistantName to notify the new girl's parents to meet you in your office. As the tank exumes the disoriented girl, you help her to her feet<<if $incubatorReproductionSetting > 1>>, making sure to feel-up her overdeveloped body,<</if>> and walk her to your penthouse. Though first you must decide upon a name for the new girl; it won't take long to reach your office, so you have only @@color:orange;one chance to name her@@ before you arrive.
 <span id="naming"> 
-<br>Choose a name for her. <<textbox "$activeSlave.slaveName" $activeSlave.slaveName "New Child Intro Intimate">>
-<br><<click "Have you PA assign her a random name">>
+<br>Choose a name for her. <<textbox "$activeSlave.slaveName" $activeSlave.slaveName>>
+	<<click "Commit name.">>
+	<<replace "#naming">>
+	You instruct $assistantName to register the new girl as "<<print $activeSlave.slaveName>>" in the slave registry.
+	<</replace>>
+	<<replace "#newName">>
+		''__@@color:pink;$activeSlave.slaveName@@__''
+	<</replace>>
+	<</click>>
+<br><<click "Have your PA assign her a random name">>
 	<<replace "#naming">>
-		<<NationalityToName>>
-		<<set $activeSlave.birthName = $activeSlave.slaveName>>
-		$personalAssistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<<NationalityToName $activeSlave>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+	<</replace>>
+	<<replace "#newName">>
+		''__@@color:pink;$activeSlave.slaveName@@__''
 	<</replace>>
 <</click>>
+<<if $arcologies[0].FSPastoralist != "unset">>
+	<<if $activeSlave.lactation > 0>>
+		<br><<click "Have your PA assign her a random cow name">>
+		<<replace "#naming">>
+		<<set $activeSlave.slaveName to $cowSlaveNames.random()>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+		<</click>>
+	<</if>>
+<</if>>
+<<if $arcologies[0].FSChattelReligionist != "unset">>
+    <br><<click "Have your PA assign her a random devotional name">>
+		<<replace "#naming">>
+		<<set $activeSlave.slaveName to $chattelReligionistSlaveNames.random()>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+	<</click>>
+<</if>>
+<<if $arcologies[0].FSRomanRevivalist != "unset">>
+    <br><<click "Have your PA assign her a random Roman name">>
+		<<replace "#naming">>
+		<<set $activeSlave.slaveName to $romanSlaveNames.random()>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+	<</click>>
+<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
+    <br><<click "Have your PA assign her a random ancient Egyptian name">>
+		<<replace "#naming">>
+		<<set $activeSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+	<</click>>
+<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
+	<br><<click "Have your PA assign her a random feudal Japanese name">>
+		<<replace "#naming">>
+		<<set $activeSlave.slaveName to $edoSlaveNames.random()>>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+	<</click>>
+<</if>>
+<<if $arcologies[0].FSDegradationist != "unset">>
+    <br><<click "Have your PA assign her a degrading name">>
+		<<replace "#naming">>
+		<<display "Degrading Name">>
+		$assistantName registers the new girl as "<<print $activeSlave.slaveName>>" in your registry.
+		<</replace>>
+		<<replace "#newName">>
+			''__@@color:pink;$activeSlave.slaveName@@__''
+		<</replace>>
+	<</click>>
+<</if>>
 <<if $activeSlave.mother > 0>>
 	<<for _j to 0; _j < $slaves.length; _j++>>
 		<<if $activeSlave.mother == $slaves[_j].ID>>
 			<<if $slaves[_j].ID == $Concubine.ID>>
 				<br><<click "Permit your Concubine to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name she thinks you might find attractive; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].relationship == -4>>
 				<br><<click "Permit your wife to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name suitable for your daughter; from now on she will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].ID == $Bodyguard.ID>>
 				<br><<click "Permit your bodyguard to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. She hopes you'll find it fitting her station.
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].ID == $HeadGirl.ID>>
 				<br><<click "Permit your headgirl to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. and hopes it will be a name your other slaves will learn to respect.
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50>>
 				<br><<click "Permit her devoted mother to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name she hopes you'll like; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<</if>>
@@ -103,41 +190,56 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 			<<if $slaves[_j].ID == $Concubine.ID>>
 				<br><<click "Permit your Concubine to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name she thinks you might find attractive; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].relationship == -4>>
 				<br><<click "Permit your wife to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name suitable for your daughter; from now on she will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].ID == $Bodyguard.ID>>
 				<br><<click "Permit your bodyguard to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. She hopes you'll find it fitting her station.
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].ID == $HeadGirl.ID>>
 				<br><<click "Permit your headgirl to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName decides on "<<print $activeSlave.slaveName>>" for her daughter. and hopes it will be a name your other slaves will learn to respect.
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<<elseif $slaves[_j].devotion > 50 && slaves[_j].trust > 50>>
 				<br><<click "Permit her devoted mother to name her daughter">>
 					<<replace "#naming">>
-						<<ParentNames $slaves[_j], $activeSlave>>
+						<<ParentNames $slaves[_j] $activeSlave>>
 						After some careful consideration, $slaves[_j].slaveName picks a name she hopes you'll like; from now on her daughter will be known as "<<print $activeSlave.slaveName>>".
 					<</replace>>
+					<<replace "#newName">>
+						''__@@color:pink;$activeSlave.slaveName@@__''
+					<</replace>>
 				<</click>>
 				<<break>>
 			<</if>>
@@ -145,10 +247,10 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 	<</for>>
 <</if>>
 </span>
-
+<<set $activeSlave.birthName = $activeSlave.slaveName>>
 <br><br>
 
-''__@@color:pink;$activeSlave.slaveName@@__'' now stands before your desk
+<span id="newName">''__@@color:pink;$activeSlave.slaveName@@__''</span> now stands before your desk
 <<if $activeSlave.mother > 0 && $activeSlave.father > 0>>
 	alongside her mother _tempMom.slaveName and father _tempDad.slaveName.
 <<elseif $activeSlave.mother > 0>>
@@ -205,18 +307,25 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 	<</if>>
 	<<if _tempMom.boobs > 10000>>
 		Her eyes focus on _tempMom.slaveName's <<print _tempMom.boobs>>cc tits, taking in every centimeter of their enormity, but lingering on her <<if _tempMom.lactation == 2>>milk gushing <<elseif _tempMom.lactation == 1>>milk leaking <</if>>_tempMom.nipples nipples.
+		<<set _momInterest = "boobs">>
 	<<elseif _tempMom.pregType >= 10 && bigBelly(_tempMom)>>
 		Her eyes focus on _tempMom.slaveName's massively distended, child-filled belly, taking in every obvious motion beneath her taut skin.<<if $activeSlave.pregType >= 20>> A hand runs across her own bloated middle and another down to her moist pussy.<</if>>
+		<<set _momInterest = "belly">>
 	<<elseif bigBelly(_tempMom)>>
 		Her eyes focus on _tempMom.slaveName's rounded middle, staring in fascination at the unfamiliar bulge.<<if $activeSlave.pregType >= 20>> A hand runs across her own middle and another down to her moist pussy.<</if>>
+		<<set _momInterest = "belly">>
 	<<elseif _tempMom.dick > 15>>
 		Her eyes focus on _tempMom.slaveName's <<print (6*_tempMom.dick)>>cm long dick, trying to understand how it can fit in a girl.
+		<<set _momInterest = "dick">>
 	<<elseif _tempMom.balls > 60>>
 		Her eyes focus on _tempMom.slaveName's <<print (_tempMom.balls*2)>>cm long testicles, taking in every centimeter of their enormity, before shifting to the cum steadily drooling from the tip of her dick.
+		<<set _momInterest = "balls">>
 	<<elseif _tempMom.hips > 2>>
 		Her eyes focus on _tempMom.slaveName's abnormally wide hips. She runs her hands down her own sides, pondering how such a wonder occurs.
+		<<set _momInterest = "hips">>
 	<<elseif _tempMom.butt > 12>>
 		Her eyes focus on _tempMom.slaveName's massive ass, staring in fascination at every jiggle that runs through it.
+		<<set _momInterest = "butt">>
 	<<elseif _tempMom.dick > 0 && _tempMom.vagina > -1>>
 		Her eyes focus on _tempMom.slaveName's crotch, staring in wonder and confusion at the presence of both a penis and a vagina.
 	<<elseif _tempMom.amp == 1>>
@@ -267,18 +376,25 @@ You completed the legalities before heading to $incubatorName, knowing the tank
 	<</if>>
 	<<if _tempDad.boobs > 10000>>
 		Her eyes focus on _tempDad.slaveName's <<print _tempDad.boobs>>cc tits, taking in every centimeter of their enormity, but lingering on her <<if _tempDad.lactation == 2>>milk gushing <<elseif _tempDad.lactation == 1>>milk leaking <</if>>_tempDad.nipples nipples.
+		<<set _dadInterest = "boobs">>
 	<<elseif _tempDad.pregType >= 10 && bigBelly(_tempDad)>>
 		Her eyes focus on _tempDad.slaveName's massively distended, child-filled belly, taking in every obvious motion beneath her taut skin.<<if $activeSlave.pregType >= 20>> A hand runs across her own bloated middle and another down to her moist pussy.<</if>>
+		<<set _dadInterest = "belly">>
 	<<elseif bigBelly(_tempDad)>>
 		Her eyes focus on _tempDad.slaveName's rounded middle, staring in fascination at the unfamiliar bulge.<<if $activeSlave.pregType >= 20>> A hand runs across her own middle and another down to her moist pussy.<</if>>
+		<<set _dadInterest = "belly">>
 	<<elseif _tempDad.dick > 15>>
 		Her eyes focus on _tempDad.slaveName's <<print (6*_tempDad.dick)>>cm long dick, trying to understand how it can fit in a girl.
+		<<set _dadInterest = "dick">>
 	<<elseif _tempDad.balls > 60>>
 		Her eyes focus on _tempDad.slaveName's <<print (_tempDad.balls*2)>>cm long testicles, taking in every centimeter of their enormity, before shifting to the cum steadily drooling from the tip of her dick.
+		<<set _dadInterest = "balls">>
 	<<elseif _tempDad.hips > 2>>
 		Her eyes focus on _tempDad.slaveName's abnormally wide hips. She runs her hands down her own sides, pondering how such a wonder occurs.
+		<<set _dadInterest = "hips">>
 	<<elseif _tempDad.butt > 12>>
 		Her eyes focus on _tempDad.slaveName's massive ass, staring in fascination at every jiggle that runs through it.
+		<<set _dadInterest = "butt">>
 	<<elseif _tempDad.dick > 0 && _tempDad.vagina > -1>>
 		Her eyes focus on _tempDad.slaveName's crotch, staring in wonder and confusion at the presence of both a penis and a vagina.
 	<<elseif _tempDad.amp == 1>>
@@ -455,7 +571,7 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <</if>>
 
 <<if $autoRulesAssistant == 0>>
- <br>
+	<br>
 	<span id="rules">
 	<<click "Apply default rules">>
 	<<replace "#rules">>
@@ -466,10 +582,6 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 	//Will not apply many cosmetic and surgical options since she is not obedient//
 	<</if>>
 	</span>
-<<else>>
-	<<if ($universalRulesNewSlavesRA == 1)>>
-		<<AutoRulesActivate 1>>
-	<</if>>
 <</if>>
 
 <br><br>
@@ -566,7 +678,7 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 
 <br><<click "Tease her nipples">>
 <<replace "#result">>
-	You pull the curious $desc atop your desk in front of you and go back to business. After a few minutes, you extend an idle hand and begin to fondle her <<if $activeSlave.boobs > 2000>>massive tits<<elseif $activeSlave.boobs > 400>>healthy breasts<<else>>cute little boobs<</if>>, continuing your work with your other hand. You quickly focus your fiddling on her $activeSlave.nipples nipples, the stimulation bringing them quickly erect. She accepts your groping, even becoming aroused by it, but might not be a breast fetishist, though she @@color:hotpink;certainly enjoys the attention.@@ By the feel of her nipples between your fingers, she may certainly develop into one.<<if $incubatorReproductionSetting == 2 && $activeSlave.boobs > 400>> A loud moan and a distinct wetness in your hand quickly draw your attention to her. It seems @@color:green;she is lactating!@@<</if>>
+	You pull the curious $desc atop your desk in front of you and go back to business. After a few minutes, you extend an idle hand and begin to fondle her <<if $activeSlave.boobs > 2000>>massive tits<<elseif $activeSlave.boobs > 400>>healthy breasts<<else>>cute little boobs<</if>>, continuing your work with your other hand. You quickly focus your fiddling on her $activeSlave.nipples nipples, the stimulation bringing them quickly erect. She accepts your groping, even becoming aroused by it, but might not be a breast fetishist, though she @@color:hotpink;certainly enjoys the attention.@@ By the feel of her nipples between your fingers, she may certainly develop into one.<<if $incubatorReproductionSetting == 2 && $activeSlave.boobs > 400>> A loud moan and a distinct wetness in your hand quickly draw your attention to her. It seems @@color:green;she is lactating!@@<<set $activeSlave.lactation = 1>><</if>>
 	<<set $activeSlave.devotion += 4>>
 	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
 		<<set $activeSlave.fetish = "boobs">>
@@ -575,6 +687,33 @@ You slowly strip down, gauging her reactions to your show, until you are fully n
 <</replace>>
 <</click>>
 
+<br><<click "Give her a cum shower">>
+<<replace "#result">>
+	You seat the curious $desc in the center of your office and order every slave avaiable capable of getting hard to report to your office. Once everyone is assembled and erect, you order them to encircle the aroused girl and shower her in cum. As they begin<<if canAchieveErection($activeSlave)>> ($activeSlave.slaveName stroking her own erection too)<</if>>, <<if $PC.penis == 1 && $PC.vagina == 1>>you begin fingering yourself while jacking off alongside your slaves<<elseif $PC.penis == 1>>you join in the circlejerk as well<<else>>you sit back to finger yourself to the show<</if>>. When the first burst of cum streaks across her face, she gasps in surprise, giving another load the chance to launch into her gaping mouth. She gags before licking her lips and opening wide for the next load. After everyone has finished, $activeSlave.slaveName is coated, head to toe, in cum and @@color:hotpink;thrilled to be the center of attention.@@ Though she may not be a cumslut now, she certainly has the potential to become one.
+	<<set $activeSlave.devotion += 4>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "cumslut">>
+		<<set $activeSlave.fetishStrength = 20>>
+	<</if>>
+<</replace>>
+<</click>>
+
+<br><<click "Bring in another slave and let her have fun">>
+<<replace "#result">>
+	You call in the next passing slave, bind her hands and feet and present her to the curious new $desc. You gesture towards the bound girl, signifying permision to do whatever she pleases. Eagerly, $activeSlave.slaveName begins exploring every inch of her body, paying close attention to her nipples and her holes, while you return to your work. It doesn't take long for you to be disrupted by a loud
+	<<if random(1,100) > 50>>
+		moan emanating from the bound girl. Looking up, you see $activeSlave.slaveName <<if canPenetrate($activeSlave)>>fucking her hard and deep<<else>>licking her cunt<</if>>, hitting all the right places and making the helpless girl squirm with pleasure. Any plea for mercy results in a renewed effort to push the girl over the edge. $activeSlave.slaveName is certainly @@color:hotpink;enjoying her treat,@@ and by the looks of things, may be a developing dom!
+		<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+			<<set $activeSlave.fetish = "dom">>
+			<<set $activeSlave.fetishStrength = 20>>
+		<</if>>
+	<<else>>
+		scream of pain from the bound girl. Looking up, you see $activeSlave.slaveName <<if canPenetrate($activeSlave)>>force her cock deep down her toy's throat<<else>>ram her arm deep into her toy's cunt<</if>> causing the hapless girl to writhe in discomfort. Any plea for mercy results in even more intesnse torment. $activeSlave.slaveName is certainly @@color:hotpink;enjoying her treat,@@ and by the looks of things, may be a developing sadist!
+	<</if>>
+	<<set $activeSlave.devotion += 4>>
+<</replace>>
+<</click>>
+
 <<if $PC.vagina == 1>>
 <<if $activeSlave.dick > 0 && canAchieveErection($activeSlave)>>
 <br><<click "Dominate her penis">>
@@ -605,6 +744,50 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 		<<set $PC.preg = 1, $PC.pregSource = $activeSlave.ID>>
 		You groan as you rub your belly. You were fertile and are now likely @@color:lime;quite pregnant.@@
 	<</if>>
+	<span id="result2">
+		<br><<click "Teach her what she did wrong">>
+			<<replace "#result2">>
+				Her language skills may be undeveloped, but the tank instilled certain phrases into her as it raised her. Taking advantage of those commands, you chastise her for her impudence and instruct her that only you may decide if she is allowed to do that. She @@color:mediumorchid;hangs her head in dissapointment@@ but understands your decree. She doesn't know why she is compelled by what you said, but deep down she @@color:gold;fears what this means.@@
+				<<set $activeSlave.devotion -= 5>>
+				<<set $activeSlave.trust -= 5>>
+			<</replace>>
+		<</click>>
+		<br><<click "Punish her nuts">>
+			<<replace "#result2">>
+				Righting yourself, you land a kick firmly and directly into her dangling balls. She collapses to the ground @@color:mediumorchid;wailing with betrayal@@ and @@color:gold;desperatly trying to protect herself from you.@@
+				<<set $activeSlave.devotion -= 25>>
+				<<set $activeSlave.trust -= 50>>
+			<</replace>>
+		<</click>>
+		<br><<click "Punish her with a chastity belt">>
+			<<replace "#result2">>
+				Righting yourself, you head to your desk and pull out a chastity cage. Calling the curious girl over, you tease her genitals until she lowers her guard and lock her dick in the device. She @@color:mediumorchid;howls with displeasure@@ at the tightness around her cock and @@color:gold;begins to panic@@ when she finds she can't remove it. You send her off to learn her place.
+				<<set $activeSlave.devotion -= 15>>
+				<<set $activeSlave.trust -= 5>>
+				<<set $activeSlave.dickAccessory = "chastity">>
+			<</replace>>
+		<</click>>
+		<<if $seeExtreme == 1>>
+		<br><<click "Geld her as punishment">>
+			<<replace "#result2">>
+				Righting yourself, you grab the gloating slave, drag her to the autosurgery and strap her face down with her legs spread. She doesn't understand what's happening, but giggles at the sensations running through her numb body. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She spends the rest of the week dimly trying to find where her balls went.
+				<<if $arcologies[0].FSGenderRadicalist != "unset">>
+					Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all societal inferiors can be made female.
+					<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
+					<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
+				<</if>>
+				<<if $arcologies[0].FSRestart != "unset" && $activeSlave.pubertyXY == 1>>
+					Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all only the elite should breed.
+					<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSRestart/$FSLockinLevel)>>
+					<<set $arcologies[0].FSRestart += 0.05*$FSSingleSlaveRep>>
+				<</if>>
+				<<set $activeSlave.devotion -= 25>>
+				<<set $activeSlave.trust -= 50>>
+				<<set $activeSlave.balls = 0>>
+			<</replace>>
+		<</click>>
+		<</if>>
+	</span>
 <<else>>
 	you quickly bind the base of her penis, denying her release. You grind your cunt into her face, letting her that YOU are the one who'll be orgasming here, not her. Only once you have initiated the new slave by soaking her face in your cum do you release her dick and lean back to avoid the coming blast. A few strokes later and your hand is coated in her cum. You turn around and order the exhausted girl to clean her cum off your hand<<if $PC.dick == 1>> and to finish off her twitching dick<</if>>; she might not be a submissive, but she is @@color:hotpink;willing to let you have your way@@ with her body used and may even grow to enjoy it.
 	<<set $activeSlave.devotion += 5>>
@@ -618,35 +801,75 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <</if>>
 <</if>>
 
-<<if $PC.boobs == 1>>
-<<if $activeSlave.boobs <= (800+(200*$PC.boobsBonus)) && $activeSlave.boobs >= 300>>
-	<br><<click "Let your ample bust dominate her pathetic one">>
-	<<set $activeSlave.devotion += 5>>
+<<if $PC.boobsBonus == 3>>
+<br><<click "Permit her to explore your expansive bust">>
 <<replace "#result">>
-	You quickly strip off your shirt and draw close to $activeSlave.slaveName. You grab her as she attempts to back away and pull her tits directly into your own. Both of sets of eyes lock onto their pair of breasts, or they would have, had yours not utterly eclipsed their rival. Scoffing, you release the confused girl and walk away; leaving her feeling her own breasts and feeling uncertain about herself. She gets caught up in how small they really are, and how much @@color:hotpink;lesser@@ than her <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title isnot 0>>Master<<else>>Mistress<</if>> she is.
-	<<if $activeSlave.fetish == "boobs">>
-		<<if $activeSlave.fetishKnown == 0>>
-			You did note one thing when your breasts touched, her nipples got very hard. @@color:green;Looks like she's a breast fetishist!@@
-			<<set $activeSlave.fetishKnown = 1>>
+You beckon the curious girl to your hefty breasts, having noticed how hungrily she has been eyeing them. She eagerly places her hands to them and begins sqeeuzing and massaging them, quickly becoming aroused herself. She pays close attention to your nipples, <<if $PC.preg > 20>> squeeling happily when milk begins to flow from them<<else>> grumbling unhappily when she finds no milk within<</if>>.
+<<if $incubatorMusclesSetting == 2 && $incubatorReproductionSetting > 0 && canAchieveErection($activeSlave)>>
+	Suddenly, she shoves you onto your back and begins enthusiastically fucking your breasts. Before you can push her off, she thrusts hard and unloads her pent up orgasm deep into your cleavage and across your face. She sits back with a huge smile on her face and a @@color:hotpink;new connection to you@@. She @@color:gold;recoils in surprise and fear@@ when you respond by slapping her across the face for her impudence. She might not look like a dom, but she may turn into one.
+	<<set $activeSlave.devotion += 5>>
+	<<set $activeSlave.trust -= 5>>
+	<<if random(1,100) > 60 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "dom">>
+		<<set $activeSlave.fetishStrength = 20>>
+	<</if>>
+	<span id="result2">
+		<br><<click "Teach her what she did wrong">>
+			<<replace "#result2">>
+				Her language skills may be undeveloped, but the tank instilled certain phrases into her as it raised her. Taking advantage of those commands, you chastise her for her impudence and instruct her that only you may decide if she is allowed to do that. She @@color:hotpink;nods along to your words@@ understanding concepts but mostly following along @@color:gold;in fear@@ of you.
+				<<set $activeSlave.devotion += 5>>
+				<<set $activeSlave.trust -= 5>>
+			<</replace>>
+		<</click>>
+		<br><<click "Punish her with a chastity belt">>
+			<<replace "#result2">>
+				Righting yourself, you head to your desk and pull out a chastity cage. Calling the cautious girl over, you tease her genitals until she lowers her guard and lock her dick in the device. She @@color:mediumorchid;howls with displeasure@@ at the tightness around her cock and @@color:gold;begins to panic@@ when she finds she can't remove it. You send her off to learn her place.
+				<<set $activeSlave.devotion -= 15>>
+				<<set $activeSlave.trust -= 5>>
+				<<set $activeSlave.dickAccessory = "chastity">>
+			<</replace>>
+		<</click>>
+		<<if $seeExtreme == 1>>
+		<br><<click "Geld her as punishment">>
+			<<replace "#result2">>
+				Righting yourself, you grab the cowering slave, drag her to the autosurgery and strap her face down with her legs spread. She doesn't understand what's happening, but giggles at the sensations running through her numb body. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She spends the rest of the week dimly trying to find where her balls went.
+				<<if $arcologies[0].FSGenderRadicalist != "unset">>
+					Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all societal inferiors can be made female.
+					<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
+					<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
+				<</if>>
+				<<if $arcologies[0].FSRestart != "unset" && $activeSlave.pubertyXY == 1>>
+					Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all only the elite should breed.
+					<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSRestart/$FSLockinLevel)>>
+					<<set $arcologies[0].FSRestart += 0.05*$FSSingleSlaveRep>>
+				<</if>>
+				<<set $activeSlave.devotion -= 25>>
+				<<set $activeSlave.trust -= 50>>
+				<<set $activeSlave.balls = 0>>
+			<</replace>>
+		<</click>>
 		<</if>>
+	</span>
+<<else>>
+	Suddenly, she buries her head into your cleavage, knocking you off balance and to the floor. As you try to right yourself, you notice she has fallen asleep in your pillowy breasts. Sighing, you make yourself comfortable until she finishes her nap. When the first the she sees when she awakes is your face; a @@color:hotpink;lasting bond@@ is established between you two. She happily returns to snuggling your tits before you can help her up and send her off. She might be turning into a breast fetishest, if you had to guess.
+	<<set $activeSlave.devotion += 5>>
+	<<if random(1,100) > 40 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "boobs">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
+<</if>>
 <</replace>>
 <</click>>
 <</if>>
-<</if>>
-<</if>>
 
 <<if $PC.preg >= 24>>
-	<br><<click "Make her worship your pregnancy">>
+<br><<click "Permit her to explore your pregnancy">>
 <<replace "#result">>
-	You aggressively approach $activeSlave.slaveName, forcing your pregnancy into directly into her <<if $activeSlave.height > 175>>stomach<<elseif $activeSlave.height < 155>>face<<else>>chest<</if>> until she has no choice but be pushed to the ground. Standing over her, staring her down as she peeks around your taut globe of a middle; you order her to worship your pregnancy.
-	<<if $activeSlave.fetish == "pregnancy">>
-		She eagerly complies. She begins with sucking your popped navel before running her tongue across the tuat, smooth surface of your pregnancy. Once she has finished with your belly, she lowers herself under it to begin work on your needy pussy. Before long, her overzealous efforts have you quaking in pleasure and awoken your child. Once she finishes you off, she returns to rubbing your belly, soothing your rowdy child and @@color:hotpink;solidifying her place@@ beneath you. 
-		<<set $activeSlave.devotion += 15>>
-	<<else>>
-		She shifts her gaze between your middle and your face, not sure what to do. Losing patience, you toss a tube of cream at her. She shakily massages it into your stretched skin, missing spots, much to your pleasure. With reason, you force her onto her back, turn around, and plant your needy cunt directly onto her face. Struggling to breath under your weight, she begins eating you out in desperation. After coaxing her to massage your belly as she does, you quickly climax across her face and gently lift yourself off the coughing girl. She now @@color:hotpink;understands her place in life@@ and is @@color:gold;terrified@@ about what she will have to do if she wants to survive.
-		<<set $activeSlave.devotion += 5>>
-		<<set $activeSlave.trust -= 5>>
+	You beckon the curious girl to your weighty pregnancy and as she approaches push it directly into her <<if $activeSlave.height > 175>>stomach<<elseif $activeSlave.height < 155>>face<<else>>chest<</if>> until she has no choice but be wrap her arms around it. She happily runs her hands across your belly, cooing with delight at the tautness and warmth. She jumps back with a gasp the first time she is met with a kick from within you, but @@color:hotpink;giggles pleasently@ as you help her back to her feet. She spends a lot of time comparing your belly to her own, she might not be a pregnancy fetishest, but it seems likely she may become one.
+	<<set $activeSlave.devotion += 5>>
+	<<if random(1,100) > 40 && $activeSlave.fetish == "none">>
+		<<set $activeSlave.fetish = "pregnancy">>
+		<<set $activeSlave.fetishStrength = 20>>
 	<</if>>
 <</replace>>
 <</click>>
@@ -675,12 +898,17 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <<set $activeSlave.health -= 10>>
 <<set $activeSlave.trust -= 100>>
 <<replace "#result">>
-	You drag her to the remote surgery and strap her face down with her legs spread. She doesn't understand what's happening, since the anaesthetics totally deprive her of any sensation. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She numbly carries on, terrified.
+	You escort her to the remote surgery and strap her face down with her legs spread. She doesn't understand what's happening, but giggles at the sensations running through her numb body. She's so drugged and drowsy with @@color:red;surgical recovery@@ that it takes a while for her to figure out what's happened. When she does, her poor mind scarcely processes the @@color:gold;horror@@ of what's happened. She spends the rest of the week dimly trying to find where her balls went.
 	<<if $arcologies[0].FSGenderRadicalist != "unset">>
 		Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all societal inferiors can be made female.
 		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
 		<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
 	<</if>>
+	<<if $arcologies[0].FSRestart != "unset" && $activeSlave.pubertyXY == 1>>
+		Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all only the elite should breed.
+		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSRestart/$FSLockinLevel)>>
+		<<set $arcologies[0].FSRestart += 0.05*$FSSingleSlaveRep>>
+	<</if>>
 <</replace>>
 <</click>>
 <</if>>
@@ -689,11 +917,11 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <<if $activeSlave.indentureRestrictions <= 0>>
 <br><<click "Clip her Achilles tendons">>
 <<set $activeSlave.heels to 1>>
-<<set $activeSlave.devotion -= 5>>
+<<set $activeSlave.devotion += 5>>
 <<set $activeSlave.health -= 10>>
-<<set $activeSlave.trust -= 20>>
+<<set $activeSlave.trust -= 5>>
 <<replace "#result">>
-	You drag her to the remote surgery and strap her face down with her legs bare. She doesn't understand what's coming for a while, even as her lower legs are carefully cleaned and disinfected. She can't see the approaching surgical manipulators, but eventually she feels a tugging at her lower legs even through the local anaesthetic. She gets one squeal of protest out before the surgery begins to apply healing agents. She now requires special heels to walk, and will @@color:mediumorchid;remember her status@@ with every @@color:red;painful@@ step she takes. She's barefoot, crawling, and @@color:gold;frightened@@ for now, until you decide to give her heels - if you ever do.
+	You escort her to the remote surgery and strap her face down with her legs bare. She doesn't understand what's coming for a while, but giggles as her lower legs are carefully cleaned and disinfected. She can't see the approaching surgical manipulators, but eventually she feels a tugging at her lower legs even through the local anaesthetic. She gets one squeal of protest out before the surgery begins to apply healing agents. She now requires special heels to walk, and will @@color:gold;remember your power@@ with every @@color:red;painful@@ step she takes. She seems @@color:hotpink;inappropriately happy@@ about getting to wear pretty shoes when she can no longer walk without them.
 <</replace>>
 <</click>>
 <</if>>
@@ -701,40 +929,28 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 
 <<if $arcologies[0].FSRestart >= 10>>
 <<if $activeSlave.preg != -2 && $activeSlave.ovaries > 0>>
-<<if $activeSlave.indentureRestrictions <= 0>>
+<<if $activeSlave.breedingMark == 0>>
 <br><<click "Sterilize her">>
 	<<set $activeSlave.preg to -2>>
 	<<set $activeSlave.ovaries to 0>>
-	<<set $activeSlave.devotion -= 50>>
+	<<set $activeSlave.devotion -= 100>>
 	<<set $activeSlave.health -= 10>>
-	<<set $activeSlave.trust -= 20>>
+	<<set $activeSlave.trust -= 100>>
 <<replace "#result">>
-	You drag her to the remote surgery and strap her face up with her<<if $activeSlave.preg > 10>> pregnant<</if>> stomach bare. She doesn't understand what's coming for a while, even as her belly is carefully cleaned and disinfected. She begins to panic at the sight of the approaching surgical manipulators, cringing as they cut into her<<if $activeSlave.preg > 10>> swollen<</if>> abdomen. She squeals in horror as her<<if $activeSlave.preg > 10>> pregnant<</if>> womb and ovaries are extracted before her eyes. She will never bear children, and will @@color:mediumorchid;remember her status@@ with every fucking she receives. Your absolute power over her body is rightfully  @@color:gold;terrifying@@.
+	You escort her to the remote surgery and strap her face up with her stomach bare. She doesn't understand what's coming for a while, even iggling as her belly is carefully cleaned and disinfected. She begins to panic at the sight of the approaching surgical manipulators, screaming out as they cut into her abdomen. She squeals in horror as her womb and ovaries are extracted before her eyes. She will never bear children, and will @@color:mediumorchid;remember her status@@ with every fucking she receives. Your absolute power is rightfully @@color:gold;terrifying@@ to her undeveloped mind.
 <</replace>>
 <</click>>
 <</if>>
 <</if>>
 <</if>>
 
-<<if $activeSlave.balls > 0>>
-<<if $activeSlave.attrXY < 65>>
-<br><<click "Threaten her balls">>
-<<set $activeSlave.devotion += 10>>
-<<set $activeSlave.trust -= 10>>
-<<replace "#result">>
-	You ask her how she feels about taking cock up her ass. A look of revulsion and fear crosses her face, and she backs away from you slightly, unconsciously protecting her bottom. Before she can muster any kind of response, you tell her that you suspected as much, and that she has balls. She looks confused at the apparently unrelated remarks until you explain that in your arcology, balls are a privilege. If she won't be a good little bitch, you'll take them away and turn her into a bitch anyway. Only good girls get to keep their hardons, and if she isn't a good girl, you'll make her a little good girl with a bouncing little bitchclit. She begins to cry, @@color:gold;sobbing and sobbing@@ as she promises to @@color:hotpink;be a good girl.@@
-<</replace>>
-<</click>>
-<</if>>
-<</if>>
-
 <<if $dairy > 0>>
 <<if $dairyRestraintsSetting > 1>>
 	<br><<click "Threaten her with the Industrial Dairy">>
 <<set $activeSlave.devotion += 10>>
 <<set $activeSlave.trust -= 10>>
 	<<replace "#result">>
-		You tell her that it's in her interests to be a good girl. She does not react immediately, perhaps wondering if you think such a trite statement will have a real impact, but then you point at a wallscreen behind her. She turns, and beholds a live feed from the Industrial Dairy. She gazes spellbound at the interleaved row of bodies intertwined with machines in embraces far more intimate than any lover could hope to match. The gently heaving masses of breastflesh hold her fascinated and horrified attention until one of the machines fortuitously chooses this moment to cycle its occupant's anal hydration regimen. It withdraws its horse-sized phallus from the slave's anus, leaving her gape pulsing gently as it awaits the resumption of the endless assrape. $activeSlave.slaveName lets out a huge sob and turns to you, @@color:gold;fear suffusing her@@ as she promises to @@color:hotpink;be a good girl.@@
+		You tell her that it's in her interests to be a good girl. She smiles happily, taking it as a compliment. You point behind her; she turns, and beholds a live feed from the Industrial Dairy. She gazes spellbound at the interleaved row of bodies intertwined with machines in embraces far more intimate than any lover could hope to match. The gently heaving masses of breastflesh hold her fascinated and horrified attention until one of the machines fortuitously chooses this moment to cycle its occupant's anal hydration regimen. It withdraws its horse-sized phallus from the slave's anus, leaving her gape pulsing gently as it awaits the resumption of the endless assrape.<<if $dairyPregSetting > 0>> Her attention is caught by another slave in the throes of birth, gasping as she watches her newborns taken away. She begins to cry as the machine inserts it's inseminator and pumps the cow's womb full of fresh cum, leaving her bloated.<</if>> $activeSlave.slaveName lets out a huge sob and turns to you, @@color:gold;fear suffusing her@@ as she promises to @@color:hotpink;be a good girl.@@
 	<</replace>>
 	<</click>>
 	<<if $dairyPrepUpgrade == 1>>
@@ -767,7 +983,7 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <<set $activeSlave.analCount += 10>>
 	<<set $analTotal += 10>>
 	<<replace "#result">>
-		Making use of <<if ($activeSlave.trust < -20) || ($activeSlave.devotion > 20)>>her obedience<<else>>the compliance systems<</if>>, you restrain her on one of the chairs in your office in an approximation of the position she'll occupy in $dairyName. Then you put a mask on her, like the ones the machines there feature, and turn it on, watching the slave squirm against her restraints under the sudden bombardment of garish hardcore porn. Finally, you add a dildo gag, both to mimic the dildo that will feed her, and to keep your office reasonably quiet. Then, for the rest of the day, you use her vulnerable <<if $activeSlave.vagina > -1>>holes<<else>>asshole<</if>> as an outlet for your sexual energy. You are not gentle; in fact, the point of the whole exercise is to gape her. By the evening she's been fucked so hard that she's stopped jerking against the chair when you pound <<if $PC.dick == 1>>your huge cock<<else>>a huge strap-on<</if>> in and out of her, so you're obliged to get creative, sliding fingers in alongside <<if $PC.dick == 1>>yourself<<else>>it<</if>> to really blow her out. Once that gets too easy, you start adding dildos for double penetration. By the night she's properly prepared to take $dairyName's giant phalli, and you're bored, so you consign her to her fate. She might have some opinion on how she's spent her day, but it's unlikely she'll remember it by tomorrow, what with the forearm-sized dildos sliding in and out of her<<if $activeSlave.vagina > -1>> cunt,<</if>> throat, and asshole.
+		Making use of her blissful ignorance, you restrain her on one of the chairs in your office in an approximation of the position she'll occupy in $dairyName. Then you put a mask on her, like the ones the machines there feature, and turn it on, watching the slave squirm against her restraints under the sudden bombardment of garish hardcore porn. Finally, you add a dildo gag, both to mimic the dildo that will feed her, and to keep your office reasonably quiet. Then, for the rest of the day, you use her vulnerable <<if $activeSlave.vagina > -1>>holes<<else>>asshole<</if>> as an outlet for your sexual energy. You are not gentle; in fact, the point of the whole exercise is to gape her. By the evening she's been fucked so hard that she's stopped jerking against the chair when you pound <<if $PC.dick == 1>>your huge cock<<else>>a huge strap-on<</if>> in and out of her, so you're obliged to get creative, sliding fingers in alongside <<if $PC.dick == 1>>yourself<<else>>it<</if>> to really blow her out. Once that gets too easy, you start adding dildos for double penetration. By the night she's properly prepared to take $dairyName's giant phalli, and you're bored, so you consign her to her fate. She might have some opinion on how she's spent her day, but it's unlikely she'll remember it by tomorrow, what with the forearm-sized dildos sliding in and out of her<<if $activeSlave.vagina > -1>> cunt,<</if>> throat, and asshole.
 	<</replace>>
 	<</click>>
 <</if>>
@@ -779,7 +995,7 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <<set $activeSlave.devotion += 10>>
 <<set $activeSlave.trust -= 10>>
 	<<replace "#result">>
-		You tell her that it's in her interests to be a good girl. She does not react immediately, perhaps wondering if you think such a trite statement will have a real impact, but then you point at a wallscreen behind her. She turns, and beholds a live feed from $arcadeName. She gazes at the row of butts sticking out of the wall at dick height, not quite realizing what she's seeing. Then she notices that there are citizens pumping away in front of two of the butts, and she understands. As she watches, terrified, first one citizen and then the other finishes and steps away. The first arcade inmate's <<if $seeDicks != 100>>pussy<<else>>butt<</if>> is left looking sore until $arcadeName's systems cover her for a quick cleaning, and the second inmate's asshole <<if $seeDicks != 0>>has obviously seen severe use, since the poor girl doesn't have  a pussy to spread the load<<else>>is loose enough that the machines have to clean up the cum it drools onto the floor<</if>>. $activeSlave.slaveName lets out a huge sob and turns to you, @@color:gold;fear suffusing her@@ as she promises to @@color:hotpink;be a good girl.@@
+		You tell her that it's in her interests to be a good girl. She smiles happily, taking it as a compliment. You point behind her; she turns, and beholds a live feed from $arcadeName. She gazes at the row of butts sticking out of the wall at dick height, not quite realizing what she's seeing<<if canAchieveErection($activeSlave)>>, but becoming stiff at the sight of all the holes<</if>>. Then she notices that there are citizens pumping away in front of two of the butts, and she understands. As she watches, aroused, first one citizen and then the other finishes and steps away. The first arcade inmate's <<if $seeDicks != 100>>pussy<<else>>butt<</if>> is left looking sore until $arcadeName's systems cover her for a quick cleaning, and the second inmate's asshole <<if $seeDicks != 0>>has obviously seen severe use, since the poor girl doesn't have  a pussy to spread the load<<else>>is loose enough that the machines have to clean up the cum it drools onto the floor<</if>>. $activeSlave.slaveName lets out a cheer and turns to you, @@color:hotpink;eagerly awaiting the day she gets to go to $arcadeName and play with the holes.@@ It seems she missed the point.
 	<</replace>>
 	<</click>>
 	<<if ($arcade > $arcadeSlaves) || ($arcadeUpgradeFuckdolls != 0)>>
@@ -788,7 +1004,7 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <<set $activeSlave.assignmentVisible to 0>>
 <<set $activeSlave.choosesOwnAssignment to 0>>
 	<<replace "#result">>
-		You order <<if $HeadGirl == 0>>another slave<<else>>$HeadGirl.slaveName<</if>> to get $activeSlave.slaveName set up in $arcadeName. The new slave does not know what $arcadeName is, not really, and she doesn't know what being set up there means, either. She'll be confined inside a small space, not too different from the indignities she's suffered already. It's only when the restraints lock into place that she'll understand her doom. Her mouth will be forced open and presented at one wall of $arcadeName, and her ass will protrude from its other side, her holes available for public relief at both ends. She'll probably refuse to believe the truth, until the first cockhead enters her mouth<<if $activeSlave.vagina > -1>>, parts her pussylips,<</if>> or presses against her poor anus.
+		You order <<if $HeadGirl == 0>>another slave<<else>>$HeadGirl.slaveName<</if>> to get $activeSlave.slaveName set up in $arcadeName. The new slave does not know what $arcadeName is, not really, and she doesn't know what being set up there means, either. She'll be confined inside a small space, not too different from the tube she was grown in. It's only when the restraints lock into place that she'll understand her doom. Her mouth will be forced open and presented at one wall of $arcadeName, and her ass will protrude from its other side, her holes available for public relief at both ends. She'll probably refuse to believe the truth, until the first cockhead enters her mouth<<if $activeSlave.vagina > -1>>, parts her pussylips,<</if>> or presses against her poor anus.
 		<<if ($arcade <= $arcadeSlaves)>>Mere meters away, preparations to convert the least appealing Arcade slave into a Fuckdoll begin. As $activeSlave.slaveName is broken in by her first customers, she's blissfully unaware that she's $arcade new slaves away from the same fate.<</if>>
 	<</replace>>
 	<</click>>
@@ -817,12 +1033,11 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
  //This option costs ¤$SPcost//
 <</if>>
 
-<<if $activeSlave.amp != 1>>
 <br><<click "Tie her up and give her a good whipping">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
+<<set $activeSlave.devotion -= 50>>
+<<set $activeSlave.trust -= 100>>
 <<replace "#result">>
-	You cuff her wrists and tie the cuffs to a hook in the ceiling so she's forced up on tiptoe. Reflecting that sometimes the old ways are best, you take a whip to her. It's soft leather and you have some skill, so her skin isn't broken, but you lash her buttocks and every stroke draws a scream. After a while, the pain grows dull for her and she slumps in her bindings, moaning. You switch to her nipples, bringing her back to howling life as she dances on tiptoe and tries to dodge. <<if $activeSlave.dick != 0>>You finish by taking the whip to her penis, leaving her sobbing and begging. <</if>>If she was wondering what kind of master her new master is, now she @@color:gold;knows.@@ She will remember @@color:mediumorchid;what you can do to her@@.
+	You cuff her wrists and tie the cuffs to a hook in the ceiling so she's forced up on tiptoe. Reflecting that sometimes the old ways are best, you take a whip to her. It's soft leather and you have some skill, so her skin isn't broken, but you lash her buttocks and every stroke draws a scream. After a while, the pain grows dull for her and she slumps in her bindings, moaning. You switch to her nipples, bringing her back to howling life as she dances on tiptoe and tries to dodge. <<if $activeSlave.dick != 0>>You finish by taking the whip to her penis, leaving her sobbing and begging. <</if>>Her first true introduction to you sinks deep; now she @@color:gold;deeply fears you@@ and @@color:mediumorchid;hates being around you.@@
 <</replace>>
 <</click>>
 
@@ -830,22 +1045,8 @@ As she begins to moan with lust, you grip down tightly and force her to the floo
 <br><<click "Give her a lewd tramp stamp">>
 <<set $activeSlave.stampTat to either("advertisements", "rude words", "degradation")>>
 <<replace "#result">>
-You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compliant<<else>>drag her down to the studio, strap the reluctant<</if>> slave in the chair facedown, and select a sufficiently lewd pattern to decorate her lower back. When the automated tattooing is done, a topical application of analgesics leaves her with nothing more than a slight ache there. When allowed to stand, she immediately turns her back to one of the studio's full length mirrors and cranes around to read the writing just over her butt. It's difficult, since of course it's reversed, and she mouths the words letter by letter.
-<<if $activeSlave.stampTat is "advertisements">>
-	She mouths, 'Fuck my ass!'
-<<elseif $activeSlave.stampTat is "rude words">>
-	'Rear Entrance,' she mouths, and then understands the arrow pointing down between her buttocks.
-<<elseif $activeSlave.stampTat is "degradation">>
-	Struggling to read the ornate gothic lettering, she slowly mouths, 'Anal Whore.'
-<</if>>
-<<if $activeSlave.devotion > 20>>
-	She gasps at the realization that taking it up the ass is about to become a dominant part of her life. She isn't surprised by that, but it's a little stark, having her status as an anal slave permanently written on her lower back for anyone to see. Nevertheless, she @@color:hotpink;resolves to do her best.@@
+	You bring her down to the studio, lay the compliant girls in the chair facedown, and select a sufficiently lewd pattern to decorate her lower back. When the automated tattooing is done, a topical application of analgesics leaves her with nothing more than a slight ache there. When allowed to stand, she immediately turns her back to one of the studio's full length mirrors and cranes around to gawk at the picture just over her butt. She wiggles her rear and giggles at the drawing moving along with it. It seems she @@color:hotpink;enjoys it.@@
 	<<set $activeSlave.devotion += 5>>
-<<else>>
-	She begins to cry softly. It's not likely that she didn't know, on some level, that she's a sex slave, and that most sex slaves are expected to take it up the ass. She's @@color:gold;frightened@@ to find, though, that it's apparently so essential to her existence that it's worth tattooing right over her bottom. She continues to weep as yo lead her out, but @@color:hotpink;offers no real resistance.@@ She's just mourning her poor anal sphincter in an anticipatory sort of way.
-	<<set $activeSlave.devotion += 5>>
-	<<set $activeSlave.trust -= 5>>
-<</if>>
 <</replace>>
 <</click>>
 <</if>>
@@ -853,118 +1054,67 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 <<set $toSearch to $activeSlave.hStyle>>
 <<if ($toSearch.indexOf("shaved") is -1)>>
 <br><<click "Shave her hair">>
-<<set $activeSlave.devotion -= 5>>
+<<set $activeSlave.devotion -= 25>>
 <<set $activeSlave.hStyle to "shaved">>
 <<set $activeSlave.hLength to 0>>
-<<set $activeSlave.trust -= 10>>
+<<set $activeSlave.trust -= 50>>
 <<replace "#result">>
-	You seize her by the hair and drag her to the auto salon. She struggles and thrashes around but soon scrambles to keep up with you to relieve the pain in her scalp as she's dragged. You strap her in and set the auto salon to shave. She looks around frantically as the manipulators with their buzzing shears descend menacingly. As they run quickly back and forth across her head, she begins to sob, obviously @@color:gold;fearing@@ that her new master is @@color:mediumorchid;one to enjoy degradation and abuse.@@ She has a strong indication that obedience is her only hope.
+	You escort her to the auto salon running your fingers through her long hair the entire way. She sighs contently under your patting until you reach the salon. You strap her in and set the auto salon to shave. She looks around frantically as the manipulators with their buzzing shears descend menacingly. As they run quickly back and forth across her head, she begins to sob, obviously @@color:gold;fearing@@ the strange device. When she catches sight of her bald head, @@color:mediumorchid;her face twists with revulsion.@@ She didn't seem to take it well.
 <</replace>>
 <</click>>
 <</if>>
 
-<<if canTalk($activeSlave)>>
 <br><<click "Make her an office ornament for the day">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
+<<set $activeSlave.devotion += 5>>
+<<set $activeSlave.trust += 10>>
 <<replace "#result">>
-	You cuff her wrists and ankles, bend all four limbs behind her, secure them together, and hoist her up to the ceiling on a rope. She hangs up there like a sex slave chandelier, breasts swaying in a lovely way whenever she struggles. Periodically you let her down to stretch her aching limbs, but whenever you put your decoration back up you add some clips with little bells on them: first the nose, then the nipples, and finally the <<if $activeSlave.dick != 0>>dickhead<<else>>pussylips<</if>>. By the end of the day your work is accompanied by the sweet sounds of ringing bells and @@color:gold;agonized pleas@@ for mercy in her <<if $activeSlave.voice is 3>>high, girlish<<elseif $activeSlave.voice is 2>>feminine<<else>>deep<</if>> voice. She will remember @@color:mediumorchid;what you can do to her@@.
+	You cuff her wrists and ankles, bend all four limbs behind her, secure them together, and hoist her up to the ceiling on a rope. She hangs up there like a sex slave chandelier, breasts swaying in a lovely way whenever she squirms. Periodically you let her down to stretch her aching limbs, but whenever you put your decoration back up you add some clips with little bells on them: first the nose, then the nipples, and finally the <<if $activeSlave.dick != 0>>dickhead<<else>>pussylips<</if>>. By the end of the day your work is accompanied by the sweet sounds of ringing bells and @@color:hotpink;inappropriate laguther@@ in her <<if $activeSlave.voice is 3>>high, girlish<<elseif $activeSlave.voice is 2>>feminine<<else>>deep<</if>> voice. She seems to think it's a game and @@color:aquamarine;tust you more@@ for playing it with her.
 <</replace>>
 <</click>>
-<</if>>
 
-<<if  ($activeSlave.devotion < -10) && ($activeSlave.vagina == 0)>>
-<br><<click "Tie her up and take her virginity">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
-<<set $activeSlave.vagina to 1>>
-<<replace "#result">>
-	You cuff her wrists and ankles and secure her struggling, screeching body to the couch next to your desk with her legs spread. She wriggles and protests as you take her virginity. She's certainly entered your service in a way that colors her impression of you @@color:mediumorchid;with hatred@@ and @@color:gold;fear.@@ @@color:lime;Her tight little pussy has been broken in.@@
-<</replace>>
-<</click>>
-<<elseif ($activeSlave.vagina == 0)>>
-<br><<click "Tie her up and take her virginity">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
+<<if $activeSlave.vagina == 0>>
+<br><<click "Take her virginity">>
+<<set $activeSlave.devotion += 5>>
+<<set $activeSlave.trust += 5>>
 <<set $activeSlave.vaginalCount += 1>>
 	<<set $vaginalTotal += 1>>
 <<set $activeSlave.vagina to 1>>
 <<replace "#result">>
-	You cuff her wrists and ankles and secure her unresisting body to the couch next to your desk with her legs spread. She writhes and moans as you enter her virgin pussy. You might not have even had to restrain her for this, but being tied up and deflowered sends her a message. She's certainly entered your service in a way that colors her impression of you @@color:hotpink;with pain@@ and @@color:gold;fear.@@ @@color:lime;Her tight little pussy has been broken in.@@
+	You gently lead her unresisting body to the couch next to your desk and spread her legs. She writhes and moans as you enter her virgin pussy, but after getting into the rhythm of sex, she enthusiastically moves along trying to make the feeling even better. She's almost sad when @@color:hotpink;her beloved parter@@ finishes, but @@color:aquamarine;hopes@@ she'll get to play sex with you again soon. @@color:lime;Her tight little pussy has been broken in.@@
 <</replace>>
 <</click>>
 <</if>>
 
-<<if  ($activeSlave.devotion < -10) && ($activeSlave.anus == 0)>>
-<br><<click "Tie her up and rape her virgin ass">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
+<<if $activeSlave.anus == 0>>
+<br><<click "Take her anal virginity">>
+<<set $activeSlave.devotion += 5>>
+<<set $activeSlave.trust += 5>>
 <<set $activeSlave.analCount += 1>>
 	<<set $analTotal += 1>>
 <<set $activeSlave.anus to 1>>
 <<replace "#result">>
-	You cuff her wrists and ankles and secure her struggling, screeching body to the couch next to your desk so that she's straddling the back of the couch with her butt sticking out. She wriggles and protests until she feels the lubricated head of <<if $PC.dick == 1>>your dick<<else>>a strap-on<</if>> pushing against her virgin butthole, at which point she desperately tries to break free. She fails, but she never stops writhing and begging you to take <<if $PC.dick == 1>>your cock<<else>>the phallus<</if>> out of her asshole. She's certainly entered your service in a way that colors her impression of you @@color:mediumorchid;with hatred@@ and @@color:gold;fear.@@ @@color:lime;Her tight little ass has been broken in.@@
-<</replace>>
-<</click>>
-<<elseif ($activeSlave.anus == 0)>>
-<br><<click "Tie her up and break her ass in">>
-<<set $activeSlave.devotion -= 5>>
-<<set $activeSlave.trust -= 10>>
-<<set $activeSlave.analCount += 1>>
-	<<set $analTotal += 1>>
-<<set $activeSlave.anus to 1>>
-<<replace "#result">>
-	You cuff her wrists and ankles and secure her unresisting body to the couch next to your desk so that she's straddling the back of the couch with her butt sticking out. She lies obediently still until she feels the lubricated head of your cock pushing against her virgin butthole, at which point she starts in surprise. When the pain of the buttfuck gets to be too much she begs you to use her <<if $activeSlave.dick == 0>>pussy<<else>>mouth<</if>> instead. She gasps and cries as you slowly push your cock all the way up her tight little butt, and in no time you fill her rectum with cum. She's certainly entered your service in a way that colors her impression of you @@color:mediumorchid;with pain@@ and @@color:gold;fear.@@ @@color:lime;Her tight little ass has been broken in.@@
+	You gently lead her unresisting body to the couch next to your desk and arrange her with her rear in the air. She writhes and moans as you enter her virgin anus, but after getting into the rhythm of sex, she enthusiastically moves along trying to make the feeling even better. She's almost sad when @@color:hotpink;her beloved parter@@ finishes, but @@color:aquamarine;hopes@@ she'll get to play sex with you again soon. @@color:lime;Her tight little anus has been broken in.@@
 <</replace>>
 <</click>>
 <</if>>
 
-<<if ($activeSlave.anus != 0)>>
-<<if ($activeSlave.vagina > 0)>>
-	<br><<click "Use a machine on her holes">>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.vaginalCount += 1>>
-		<<set $vaginalTotal += 1>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<set $activeSlave.anus += 1>>
-	<<set $activeSlave.vagina += 1>>
-	<<replace "#result">>
-		She's not a virgin anywhere, so you'll have to go more extreme to provide a properly introductory level of sexual torture equivalent to defloration. You  tie your new slave down on hands and knees and bring a fuckmachine up from storage. It fits over her as she whimpers down there on all fours, and you adjust the pistons so that the tip of a dildo rests inside each of her holes. You add lube when necessary, <<if $assistant == 0>>but the rest of the day is monotonous machine rape for her.<<else>>but for her the rest of the day is machine rape controlled by your sultry-voiced personal assistant program. Your assistant is an exquisite sexual torturer, ensuring that the experience is never damaging and always overwhelming. She keeps up a steady stream of degrading verbal abuse while she works.<</if>> Any resistance to you is @@color:mediumorchid;worn down@@ and replaced with a germ of @@color:gold;fear.@@ @@color:lime;The slave's holes are nicely stretched.@@
-	<</replace>>
-	<</click>>
-<<elseif ($activeSlave.vagina is -1)>>
-	<br><<click "Use a machine on her asshole">>
-	<<set $activeSlave.devotion -= 5>>
-	<<set $activeSlave.trust -= 10>>
-	<<set $activeSlave.analCount += 1>>
-		<<set $analTotal += 1>>
-	<<set $activeSlave.anus += 1>>
-	<<replace "#result">>
-		She's not an anal virgin, so you'll have to go more extreme to provide an introductory level of sexual torture equivalent to defloration. You tie your new slave down on hands and knees and bring a fuckmachine up from storage. It fits over her as she whimpers down there on all fours, and you adjust the pistons so that the tip of a dildo rests inside her asshole. You add lube when necessary, <<if $assistant == 0>>but the rest of the day is monotonous machine rape for her.<<else>>but for her the rest of the day is machine rape controlled by your sultry-voiced personal assistant program. Your assistant is an exquisite sexual torturer, ensuring that the experience is never damaging and always overwhelming. She keeps up a steady stream of degrading verbal abuse while she works.<</if>> Any resistance to you is @@color:mediumorchid;worn down@@ and replaced with a germ of @@color:gold;fear.@@ @@color:lime;The slave's asshole is nicely stretched.@@ /*Written and coded by Boney M*/
-	<</replace>>
-	<</click>>
-<</if>>
-<</if>>
-
 <<if ($activeSlave.amp != 1)>>
 <br><<click "Put a shock collar on her and force her to rape herself">>
-<<set $activeSlave.trust -= 10>>
-<<set $activeSlave.devotion -= 5>>
+<<set $activeSlave.trust -= 100>>
+<<set $activeSlave.devotion -= 50>>
 <<set $activeSlave.collar to "shock punishment">>
 <<replace "#result">>
-	You put a shock collar on her. Its function isn't immediately obvious, at least until you test it on the lowest power setting, making her jump and look at you fearfully. This concern is compounded when you throw a big dildo at her and tell her to rape herself. She gapes at you incredulously until you give her a stronger jolt and preemptorily tell her to
+	You put a shock collar on her. Its function isn't immediately obvious, at least until you test it on the lowest power setting, making her jump and look at you in terror. This concern is compounded when you throw a big dildo at her and tell her to rape herself. She gapes at you incredulously until you give her a stronger jolt and preemptorily tell her to
 	<<if $activeSlave.vagina > 0>>
-	pick it up and pound her own pussy. @@color:mediumorchid;Reluctantly,@@ she reaches down shakily, seats herself, and slowly pushes the uncomfortably big phallus inside her womanhood. She starts to fuck herself. Harder, you command. Wincing, she works her cunt faster. Harder, you repeat, giving her another shock. @@color:gold;She begins to cry,@@ but obeys, sawing the big fake cock in and out, really raping herself.
+	pick it up and pound her own pussy. @@color:mediumorchid;Uncertain,@@ she reaches down shakily, seats herself, and slowly pushes the uncomfortably big phallus inside her womanhood. She starts to fuck herself. Harder, you command. Wincing, she works her cunt faster. Harder, you repeat, giving her another shock. @@color:gold;She begins to cry,@@ but continues, sawing the big fake cock in and out, really raping herself.
 <<set $activeSlave.vaginalCount += 1>>
 	<<set $vaginalTotal += 1>>
 	<<elseif $activeSlave.anus > 0>>
-	pick it up and pound her own ass. @@color:mediumorchid;Reluctantly,@@ she reaches down shakily, seats herself, and gradually shoves the already-lubricated phallus into her ass. It's uncomfortably big for her butt, but she can manage it, and slowly starts to sodomize herself. Harder, you command. Wincing, she fucks her ass faster. Harder, you repeat, giving her another shock. @@color:gold;She begins to cry,@@ but obeys, sawing the big fake cock in and out, really assraping herself.
+	pick it up and pound her own ass. @@color:mediumorchid;Uncertain,@@ she reaches down shakily, seats herself, and gradually shoves the already-lubricated phallus into her ass. It's uncomfortably big for her butt, but she can manage it, and slowly starts to sodomize herself. Harder, you command. Wincing, she fucks her ass faster. Harder, you repeat, giving her another shock. @@color:gold;She begins to cry,@@ but continues, sawing the big fake cock in and out, really assraping herself.
 <<set $activeSlave.analCount += 1>>
 	<<set $analTotal += 1>>
 	<<else>>
-	pick it up and facefuck herself. @@color:mediumorchid;Reluctantly,@@ she reaches down shakily, seats herself, and slowly swallows the uncomfortably big phallus. She has to start over several times as her gag reflex kicks in, but she finally manages to hilt it. Harder, you command. Eyes rolling fearfully, she withdraws it a few inches and shoves it down her throat again. Harder, you repeat, giving her another shock. @@color:gold;She begins to weep and gag,@@ but obeys, sawing the big fake cock in and out, really molesting herself.
+	pick it up and facefuck herself. @@color:mediumorchid;Uncertain,@@ she reaches down shakily, seats herself, and slowly swallows the uncomfortably big phallus. She has to start over several times as her gag reflex kicks in, but she finally manages to hilt it. Harder, you command. Eyes rolling fearfully, she withdraws it a few inches and shoves it down her throat again. Harder, you repeat, giving her another shock. @@color:gold;She begins to weep and gag,@@ but continues, sawing the big fake cock in and out, really molesting herself.
 <<set $activeSlave.oralCount += 1>>
 	<<set $oralTotal += 1>>
 	<</if>>
@@ -972,4 +1122,274 @@ You <<if $activeSlave.devotion > 20>>bring her down to the studio, lay the compl
 <</click>>
 <</if>>
 
+/*
+<<if _momInterest == "boobs" || _dadInterest == "boobs">>
+	You noticed her interest in her <<if _momInterest == "boobs" && _dadInterest == "boobs">>parent's<<elseif _momInterest == "boobs">>mother's<<else>>father's<</if>> massive breasts when she was around them.
+	<<if $activeSlave.boobs >= 4000 && $arcologies[0].FSAssetExpansionistResearch == 1>>
+		<br><<click "Start her on a regiment of hyper breast growth drugs">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.boobs += 500>>
+		<<set $activeSlave.drugs = "hyper breast injections">>
+		<<replace "#result">>
+			She squeels in protest as you inject her breasts with their first dosage of HA-HGH, though she changes her tune by the end of the day once she realizes her breasts are bigger. By the end of the week, she's @@color:hotpink;deliriously happy@@ over her swollen chest and @@color:mediumaquamarine;hopes@@ you'll let them grow even larger.
+		<</replace>>
+		<</click>>
+	<<elseif $activeSlave.boobs < 4000>>
+		<br><<click "Start her on a regiment of breast growth drugs">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.boobs += 200>>
+		<<set $activeSlave.drugs = "breast injections">>
+		<<replace "#result">>
+			She squeels in protest as you inject her breasts with their first dosage of A-HGH, though she changes her tune by the end of the week once she realizes her breasts are bigger than before. She's @@color:hotpink;deliriously happy@@ that her chest is swelling and @@color:mediumaquamarine;hopes@@ you'll make them even larger.
+		<</replace>>
+		<</click>>
+	<<else>>
+		Her breasts are already so huge that basic growth drugs will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+	<<if $activeSlave.boobs >= 1000 && $arcologies[0].FSTransformationFetishistResearch == 1>>
+		<br><<click "Implant a heaving pair of 4000cc fillable implants in her chest">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.boobs += 4000>>
+		<<set $activeSlave.boobsImplant += 4000>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<set $activeSlave.boobShape = "normal">>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new ridiculous fake tits. She's @@color:hotpink;deliriously happy@@ that she has her own pair of giant breasts hanging from her stretched chest and @@color:mediumaquamarine;hopes@@ you have plans to make them even bigger, even though she is already struggling to keep upright. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+		<br><<click "Implant a massive pair of 7500cc string implants in her chest">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 25>>
+		<<set $activeSlave.boobs += 7500>>
+		<<set $activeSlave.boobsImplant += 7500>>
+		<<set $activeSlave.boobsImplantType = 1>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<set $activeSlave.boobShape = "normal">>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new ridiculous fake tits. She's @@color:hotpink;deliriously happy@@ that she has her own pair of monster breasts straining her chest and @@color:mediumaquamarine;bounces cheerfully@@ when she hears they'll keep growing, despite her near inability to stay upright. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<elseif $activeSlave.boobs < 1000>>
+		<br><<click "Implant a pair of 1000cc fillable implants in her chest">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.boobs += 1000>>
+		<<set $activeSlave.boobsImplant += 1000>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<set $activeSlave.boobShape = "normal">>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new fake balloons. She's @@color:hotpink;deliriously happy@@ that she has her own pair of big breasts hanging from her chest and @@color:mediumaquamarine;hopes@@ you have plans to make them even bigger. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+		<br><<click "Implant a heavy pair of 1500cc string implants in her chest">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 15>>
+		<<set $activeSlave.boobs += 1500>>
+		<<set $activeSlave.boobsImplant += 1500>>
+		<<set $activeSlave.boobsImplantType = 1>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<set $activeSlave.boobShape = "normal">>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new fake balloons. She's @@color:hotpink;deliriously happy@@ that she has her own pair of big breasts hanging from her chest and @@color:mediumaquamarine;bounces cheerfully@@ when she hears they'll keep growing. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<else>>
+		Her breasts are already so large that basic implants will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+<</if>>
+
+<<if _momInterest == "belly" || _dadInterest == "belly">>
+	You noticed her interest in her <<if _momInterest == "belly" && _dadInterest == "belly">>parent's<<elseif _momInterest == "belly">>mother's<<else>>father's<</if>> rounded middle when she was around them.
+	<<if $clothesBoughtBelly == 1 || $arcologies[0].FSRepopulationFocus != "unset">>
+		<br><<click "Give her a big fake belly to wear">>
+			<<set $activeSlave.devotion += 15>>
+			<<set $activeSlave.trust += 15>>
+			<<set $activeSlave.bellyAccessory = "a huge empathy belly">>
+			<<replace "#result">>
+				You tell her to cover her eyes and wait while you go fetch something for her. Lugging back the biggest empathy belly you had available, you slip it onto her eliciting a grunt of discomfort. You order her to open her eyes and look herself over. She's @@color:hotpink;deliriously happy@@ as her huge belly and @@color:mediumaquamarine;bounces cheerfully@@ when she hears she can keep it. She spends the rest of the day bumping into things and struggling to adjust to the huge weight haning off her front.
+			<</replace>>
+		<</click>>
+	<</if>>
+	<<if $arcologies[0].FSTransformationFetishistResearch == 1>>
+		<br><<click "Put her into a medical coma and implant a 10000cc belly implant in her abdomen">>
+			<<set $activeSlave.devotion += 25>>
+			<<set $activeSlave.trust += 25>>
+			<<set $activeSlave.bellyImplant += 10000>>
+			<<set $cash -= $surgeryCost>>
+			<<set $activeSlave.health -= 50>>
+			<<replace "#result">>
+				You escort her to the remote surgery, strap her in, and put her under. When she awakes from her induced coma, she nearly faints at the sight of her immense middle. She's @@color:hotpink;deliriously happy@@ at her hugeness and @@color:mediumaquamarine;squirms happily@@ when she hears you can make it bigger, despite the fact that it is nearly as large as she is and pins her to the bed she lies upon. As it was an invasive surgery, @@color:red;her health has been greatly affected.@@
+			<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<</if>>
+	<br><<click "Implant a 2000cc belly implant in her abdomen">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 15>>
+		<<set $activeSlave.bellyImplant += 2000>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new bulbous middle. She's @@color:hotpink;deliriously happy@@ that she has her own round belly and @@color:mediumaquamarine;bounces cheerfully@@ when she hears you can make it bigger. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>> //This option costs ¤$surgeryCost//
+	<</click>>
+<</if>>
+
+<<if _momInterest == "dick" || _dadInterest == "dick">>
+	You noticed her interest in her <<if _momInterest == "dick" && _dadInterest == "dick">>parent's<<elseif _momInterest == "dick">>mother's<<else>>father's<</if>> enormous cock while she was around them.
+	<<if $activeSlave.dick >= 10 && $arcologies[0].FSAssetExpansionistResearch == 1>>
+		<br><<click "Start her on a regiment of hyper penis growth drugs">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.dick += 3>>
+		<<set $activeSlave.drugs = "hyper penis enhancement">>
+		<<replace "#result">>
+			She squeels in protest as you inject her penis with its first dosage of HA-HGH, though she changes her tune by the end of the day once she realizes her dick feels heavier. By the end of the week, she's @@color:hotpink;deliriously happy@@ over her meaty cock and @@color:mediumaquamarine;hopes@@ you'll let it grow even larger.
+		<</replace>>
+		<</click>>
+	<<elseif $activeSlave.dick < 10>>
+		<br><<click "Start her on a regiment of penis growth drugs">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.dick += 1>>
+		<<set $activeSlave.drugs = "penis enhancement">>
+		<<replace "#result">>
+			She squeels in protest as you inject her cock with its first dosage of A-HGH, though she changes her tune by the end of the week once she realizes her dick feels heavier than before. She's @@color:hotpink;deliriously happy@@ that her penis is steadily growing and @@color:mediumaquamarine;hopes@@ you'll make it even larger.
+		<</replace>>
+		<</click>>
+	<<else>>
+		Her dick is already so huge that basic growth drugs will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+<</if>>
+
+<<if _momInterest == "balls" || _dadInterest == "balls">>
+	You noticed her interest in her <<if _momInterest == "balls" && _dadInterest == "balls">>parent's<<elseif _momInterest == "balls">>mother's<<else>>father's<</if>> pendulous testicles while she was around them.
+	<<if $activeSlave.balls >= 6 && $arcologies[0].FSAssetExpansionistResearch == 1>>
+		<br><<click "Start her on a regiment of hyper testicle growth drugs">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.balls += 10>>
+		<<set $activeSlave.drugs = "hyper testicle enhancement">>
+		<<replace "#result">>
+			She squeels in protest as you inject her testicles with their first dosage of HA-HGH, though she changes her tune by the end of the day once she realizes her nuts feel heavier. By the end of the week, she's @@color:hotpink;deliriously happy@@ over her swollen balls and @@color:mediumaquamarine;hopes@@ you'll let them grow even larger.
+		<</replace>>
+		<</click>>
+	<<elseif $activeSlave.balls < 6>>
+		<br><<click "Start her on a regiment of testicle growth drugs">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.balls += 1>>
+		<<set $activeSlave.drugs = "testicle enhancement">>
+		<<replace "#result">>
+			She squeels in protest as you inject her esticles with their first dosage of A-HGH, though she changes her tune by the end of the week once she realizes her nuts feel heavier and fuller than before. She's @@color:hotpink;deliriously happy@@ that her balls are steadily swelling and @@color:mediumaquamarine;hopes@@ you'll make them even larger.
+		<</replace>>
+		<</click>>
+	<<else>>
+		Her balls are already so huge that basic growth drugs will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+<</if>>
+
+<<if _momInterest == "hips" || _dadInterest == "hips">>
+	You noticed her interest in her <<if _momInterest == "hips" && _dadInterest == "hips">>parent's<<elseif _momInterest == "hips">>mother's<<else>>father's<</if>> door jamming hips while she was around them.
+	<<if $activeSlave.hips == 2 && $surgeryUpgrade == 1>>
+		<br><<click "Surgically widen her hips">>
+			<<set $activeSlave.devotion += 15>>
+			<<set $activeSlave.trust += 15>>
+			<<set $activeSlave.hips += 1>>
+			<<set $activeSlave.hipsImplant = 1>>
+			<<set $cash -= $surgeryCost>>
+			<<set $activeSlave.health -= 40>>
+			<<replace "#result">>
+				You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her wide hips, especially since she can't figure out how to roll over with them. She's @@color:hotpink;deliriously happy@@ that she is ridiculously wide and @@color:mediumaquamarine;wiggles her door-jammers cheerfully@@ at you whenever she gets the chance. Since the surgery was invasive, @@color:red;her health has been greatly affected.@@
+			<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<elseif $activeSlave.hips < 2>>
+		<br><<click "Surgically widen her hips">>
+			<<set $activeSlave.devotion += 15>>
+			<<set $activeSlave.trust += 15>>
+			<<set $activeSlave.hips += 1>>
+			<<set $activeSlave.hipsImplant = 1>>
+			<<set $cash -= $surgeryCost>>
+			<<set $activeSlave.health -= 40>>
+			<<replace "#result">>
+				You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her wide hips. She's @@color:hotpink;deliriously happy@@ that she is wider than ever and @@color:mediumaquamarine;wiggles her hips cheerfully@@ at you whenever she gets the chance. Since the surgery was invasive, @@color:red;her health has been greatly affected.@@
+			<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<else>>
+		Your surgery suite is not outfitted to widen her hips further.
+	<</if>>
+<</if>>
+
+<<if _momInterest == "butt" || _dadInterest == "butt">>
+	You noticed her interest in her <<if _momInterest == "butt" && _dadInterest == "butt">>parent's<<elseif _momInterest == "butt">>mother's<<else>>father's<</if>> ever-jiggling ass while she was around them.
+	<<if $activeSlave.butt >= 10 && $arcologies[0].FSAssetExpansionistResearch == 1>>
+		<br><<click "Start her on a regiment of hyper ass growth drugs">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.butt += 3>>
+		<<set $activeSlave.drugs = "hyper butt injections">>
+		<<replace "#result">>
+			She squeels in protest as you inject her buttscheeks with their first dosage of HA-HGH, though she changes her tune by the end of the day once she realizes her butt is larger than ever. By the end of the week, she's @@color:hotpink;deliriously happy@@ over her swollen rear and @@color:mediumaquamarine;hopes@@ you'll let it grow even larger.
+		<</replace>>
+		<</click>>
+	<<elseif $activeSlave.butt < 10>>
+		<br><<click "Start her on a regiment of ass growth drugs">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.butt += 1>>
+		<<set $activeSlave.drugs = "butt injections">>
+		<<replace "#result">>
+			She squeels in protest as you inject her buttcheeks with their first dosage of A-HGH, though she changes her tune by the end of the week once she realizes her butt is bigger than before. She's @@color:hotpink;deliriously happy@@ that her rear is swelling and @@color:mediumaquamarine;hopes@@ you'll make it even larger.
+		<</replace>>
+		<</click>>
+	<<else>>
+		Her butt is already so huge that basic growth drugs will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+	<<if $activeSlave.butt >= 6 && $arcologies[0].FSTransformationFetishistResearch == 1>>
+		<br><<click "Implant a heaving pair of fillable implants in her rear">>
+		<<set $activeSlave.devotion += 25>>
+		<<set $activeSlave.trust += 20>>
+		<<set $activeSlave.butt += 8>>
+		<<set $activeSlave.buttImplant += 8>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new ridiculous fake ass, not that she haas much choice, since it has her pinned to the bed. She's @@color:hotpink;deliriously happy@@ that she has her own pair of giant butt cheeks ballooning from her bottom and @@color:mediumaquamarine;hopes@@ you have plans to make them even bigger, even though she is already struggling to escape from under them. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<elseif $activeSlave.butt < 6>>
+		<br><<click "Implant a pair of fillable implants in her rear">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 10>>
+		<<set $activeSlave.butt += 2>>
+		<<set $activeSlave.buttImplant += 2>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new fake bottom. She's @@color:hotpink;deliriously happy@@ that she has her own pair of big butt cheeks hanging from her rear and @@color:mediumaquamarine;hopes@@ you have plans to make them even bigger. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+		<br><<click "Implant a heavy pair of string implants in her rear">>
+		<<set $activeSlave.devotion += 15>>
+		<<set $activeSlave.trust += 15>>
+		<<set $activeSlave.butt += 3>>
+		<<set $activeSlave.buttImplant += 3>>
+		<<set $activeSlave.buttImplantType = 1>>
+		<<set $cash -= $surgeryCost>>
+		<<set $activeSlave.health -= 10>>
+		<<replace "#result">>
+			You escort her to the remote surgery, strap her in, and put her under. When she awakes, she can't keep her hands off her new fake bottom. She's @@color:hotpink;deliriously happy@@ that she has her own pair of big butt cheeks hanging from her rear and @@color:mediumaquamarine;bounces them cheerfully@@ when she hears they'll keep growing. As with all surgery @@color:red;her health has been slightly affected.@@
+		<</replace>>
+		<</click>> //This option costs ¤$surgeryCost//
+	<<else>>
+		Her butt is already so large that basic implants will not have a noticable enough effect to sate her curiosity.
+	<</if>>
+<</if>>
+		
 </span>
\ No newline at end of file
diff --git a/src/pregmod/pRaped.tw b/src/pregmod/pRaped.tw
index ba0f993c787dd047165bae5f33022e0ed1c58e3a..d4a16193974e9c6b5ef494b124d1af051e87fa73 100644
--- a/src/pregmod/pRaped.tw
+++ b/src/pregmod/pRaped.tw
@@ -122,23 +122,23 @@ It would be prudent to up security in your arcology. That or take a guard along
 Now the only question is what to do with the would be rapist. You could toss them out of the arcology, but it might be more fun to turn the tables on them.
 
 <<set $contractCost = 1000>>
-<<display "Slave Cost">>
+<<slaveCost $activeSlave>>
 <<set $slaveCost -= 1000>>
 <br>
 //Applying enslavement as punishment will cost ¤$contractCost. Doing so and then selling her immediately will bring in approximately ¤$slaveCost.//
 
-<<set $saleDescription to 1>>\
-<<display "Long Slave Description">>\
-<<set $saleDescription to 0>>\
+<<set $saleDescription to 1>>
+<<display "Long Slave Description">>
+<<set $saleDescription to 0>>
 
 <span id="result">
-<<if $cash >= $contractCost>>\
+<<if $cash >= $contractCost>>
 	<br><<click "Enslave her">>
 		<<AddSlave $activeSlave>>
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You complete the legalities and biometric scanning quickly and without fuss. The idiot will regret crossing you when she wakes in the penthouse for basic slave induction.
-		<<set $nextLink to "AS Dump">>\
+		<<set $nextLink to "AS Dump">>
 		<<display "New Slave Intro">>
 		<</replace>>
 	<</click>>
@@ -164,7 +164,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<display "New Slave Intro">>
 		<</replace>>
 	<</click>>
-	<<if $arcade > 0>>\
+	<<if $arcade > 0>>
 	<br><<click "Enslave her and sentence her to a month in the arcade">>
 		<<set $activeSlave.assignment to "be confined in the arcade">><<set $activeSlave.assignmentVisible to 0>>
 		<<set $activeSlave.choosesOwnAssignment to 0>>
@@ -173,13 +173,13 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You complete the legalities and biometric scanning quickly and cautiously. The idiot will be in for a surprise when they awake to find they can't move and a dick is in their ass.
-		<<set $nextLink to "AS Dump">>\
+		<<set $nextLink to "AS Dump">>
 		<<display "New Slave Intro">>
 		<</replace>>
 	<</click>>
-	<</if>>\
-	<<if $dairy > 0>>\
-	<<if $dairyRestraintsSetting > 1>>\
+	<</if>>
+	<<if $dairy > 0>>
+	<<if $dairyRestraintsSetting > 1>>
 	<br><<click "Enslave her and send her straight to the industrial dairy">>
 		<<set $activeSlave.assignment to "work in the dairy">>
 		<<set $activeSlave.assignmentVisible to 0>>
@@ -192,9 +192,9 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $nextLink to "AS Dump">>
 		<</replace>>
 	<</click>>
-	<</if>>\
-	<</if>>\
-	<<if $seeExtreme > 0>>\
+	<</if>>
+	<</if>>
+	<<if $seeExtreme > 0>>
 	<br><<click "Punitively amputate her limbs, and then enslave her">>
 		<<set $activeSlave.health -= 20>>
 		<<set $activeSlave.amp to 1>>
@@ -204,7 +204,7 @@ Now the only question is what to do with the would be rapist. You could toss the
 		<<set $cash -= $contractCost>>
 		<<replace "#result">>
 			You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery. You take great pleasure in watching her struggle as her limbs are taken, one by one. Of course, @@color:red;her health is affected@@ and the horrible experience has left her @@color:red;acting oddly.@@ After she has stabilized, it's off to the penthouse for basic slave induction. You'd like to see her try and touch you again without arms and legs.
-		<<set $nextLink to "AS Dump">>\
+		<<set $nextLink to "AS Dump">>
 		<<display "New Slave Intro">>
 		<</replace>>
 	<</click>>
@@ -219,10 +219,10 @@ Now the only question is what to do with the would be rapist. You could toss the
 		You want her to suffer for what she tried to pull on you. You make sure she is fully awake as she is strapped into the autosurgery, taking the time to roughly fondle her balls. You take great pleasure in watching her struggle as her testicles are removed. Once she can stand agian, it's off to the penthouse for basic slave induction.
 		<</replace>>
 	<</click>>
-	<</if>>\
-<<else>>\
+	<</if>>
+<<else>>
 	//You lack the necessary funds to enslave her.//
-<</if>>\
+<</if>>
 <<click "Publicly flog the criminal">>
 	<<replace "#result">>
 		Naturally, the wretch will be thrown out of the arcology: but an example must first be made. Free people must understand that criminals who commit outrages against them will be severely punished. The protesting malefactor is stripped and flogged on the promenade before being escorted bleeding from the arcology. The public @@color:green;approves of this harshness.@@
diff --git a/src/pregmod/pregmodWidgets.tw b/src/pregmod/pregmodWidgets.tw
index a670918efd5a4800355e8a524ebfe22aee2373d5..cef9eafc0d338c3f6856146be08a82761059c39d 100644
--- a/src/pregmod/pregmodWidgets.tw
+++ b/src/pregmod/pregmodWidgets.tw
@@ -112,6 +112,15 @@
 <<if ndef $args[0].reservedChildren>>
 	<<set $args[0].reservedChildren to 0>>
 <</if>>
+<<if ndef $args[0].choosesOwnChastity>>
+	<<set $args[0].choosesOwnChastity = 0>>
+<</if>>
+<<if ndef $PC.intelligence>>
+	<<set $PC.intelligence = 3>>
+<</if>>
+<<if ndef $PC.face>>
+	<<set $PC.face = 3>>
+<</if>>
 
 <<if ndef $args[0].pubertyXX>>
 	<<if $args[0].physicalAge >= $args[0].pubertyAgeXX>>
@@ -875,13 +884,28 @@ extremely pale -5
 <<case 1>>
 	<<set $activeSlave.skin = "pale">>
 <<case 0>>
-	<<set _skin1 = "extremely pale">>
+	<<set $activeSlave.skin = "extremely pale">>
 <<default>>
 	<<set $activeSlave.skin = either($args[0].skin, $args[1].skin)>>
 <</switch>>
 
 <</widget>>
 
+/*
+<<widget "GenSkinTone">>
+<<script>>
+(function() {
+  var skinToMelanin = {black: 10, ebony: 9.5, brown: 9, dark: 8, olive: 7, 'light brown': 6, bronzed: 5.5, tanned: 5, light: 4, 'rosy white': 3.5, white: 3, fair: 2, 'very fair': 1.5, lightened: 1.5, pale: 1, 'pure white': 0.5, 'extremely pale': 0.001};
+  var parents = State.variables.args;
+  var skin0 = parents[0] ? (skinToMelanin[parents[0].skin] || 5) : 3;
+  var skin1 = parents[1] ? (skinToMelanin[parents[1].skin] || 5) : 3;
+  var skin = Math.round(Math.random() * (skin1 - skin0) + skin0);
+  State.variables.activeSlave.skin = ['extremely pale', 'pale', 'fair', 'white', 'light', 'tanned', 'light brown', 'olive', 'dark', 'brown', 'black'][skin];
+})();
+<</script>>
+<</widget>>
+*/
+
 <<widget "ParentNames">>
 
 <<switch $args[0].nationality>>
@@ -1189,7 +1213,7 @@ Of her $slaves[$i].pregType children; $slaves[$i].reservedChildren were taken to
 <<for _k to $slaves[$i].reservedChildren; _k != 0; _k-->>
 	<<display "Generate Child">>
 	<<display "Incubator Workaround">>
-	<<set $slaves[$i].pregSource-->>
+	<<set $slaves[$i].pregType-->>
 <</for>>
 
 
@@ -1503,7 +1527,7 @@ Of her $slaves[$i].pregType children; $slaves[$i].reservedChildren were taken to
 <<for _k to $slaves[$i].reservedChildren; _k != 0; _k-->>
 	<<display "Generate Child">>
 	<<display "Incubator Workaround">>
-	<<set $slaves[$i].pregSource-->>
+	<<set $slaves[$i].pregType-->>
 <</for>>
 
 <<set $seed to random(-12,12)>>
@@ -1550,5 +1574,6 @@ Of her $slaves[$i].pregType children; $slaves[$i].reservedChildren were taken to
 <</if>>
 
 <</if>> /* closes c-section */
+<<set $mom = 0>>
 
 <</widget>>
\ No newline at end of file
diff --git a/src/pregmod/sePlayerBirth.tw b/src/pregmod/sePlayerBirth.tw
index aec6711515b663d7cd5796a4c55e292b951973fa..992e3e878cb509e931ab831707a93d44c33bf435 100644
--- a/src/pregmod/sePlayerBirth.tw
+++ b/src/pregmod/sePlayerBirth.tw
@@ -177,4 +177,5 @@ Now you are faced with a decision of what to do with your new child. You're far
 
 <<set $badBirth = 0>>
 <<set $PC.pregSource = 0>>
-<<set $seed = 0>>
\ No newline at end of file
+<<set $seed = 0>>
+<<set $babyGender = 0>>
\ No newline at end of file
diff --git a/src/pregmod/testGenetics.tw b/src/pregmod/testGenetics.tw
new file mode 100644
index 0000000000000000000000000000000000000000..544923ec39fc443c94b2f22d036d2b10c22a15af
--- /dev/null
+++ b/src/pregmod/testGenetics.tw
@@ -0,0 +1,32 @@
+:: test genetics [nobr]
+
+<<set $nextButton to "Back", $nextLink to "Main">>
+<<set _seed = 0>>
+
+All slave array slaves MUST be present in genePool or else there is a malfunction.
+<br>Name ID Origin
+<br><br>
+
+genePool:
+<<for _i to 0; _i < $genePool.length; _i++>>
+	<br>
+	$genePool[_i].slaveName $genePool[_i].ID $genePool[_i].origin
+<</for>>
+
+<br><br>
+
+slaves:
+<<for _i to 0; _i < $slaves.length; _i++>>
+	<br>
+	<<for _k to 0; _k < $genePool.length; _k++>>
+		<<if $slaves[_i].ID == $genePool[_k].ID>>
+			<<set _seed = 1>>
+			<<break>>
+		<</if>>
+	<</for>>
+	<<if _seed == 1>>
+		@@color:green;$slaves[_i].slaveName $slaves[_i].ID $slaves[_i].origin@@
+	<<else>>
+		@@color:red;$slaves[_i].slaveName $slaves[_i].ID $slaves[_i].origin@@
+	<</if>>
+<</for>>
\ No newline at end of file
diff --git a/src/uncategorized/PESS.tw b/src/uncategorized/PESS.tw
index 97f7ccb37ce5e93ebadb85417b8aef725c90127b..6330c63ac2655412dc4f0e1dcd4b334cc01cb874 100644
--- a/src/uncategorized/PESS.tw
+++ b/src/uncategorized/PESS.tw
@@ -110,7 +110,7 @@ When you've finished your task, you raise your eyes to examine her. She's standi
 <<elseif ["shibari ropes", "restrictive latex", "chains", "uncomfortable straps", "clubslut netting", "body oil"].indexOf($activeSlave.clothes) != -1>>
 	Her clothes don't cover her dick, making it obvious that her poor soft member has done its duty today. It even looks a little moist, as though it bred a fertile slave's pussy only a few minutes ago.
 <<elseif ["restrictive latex", "a string bikini", "a comfortable bodysuit", "a latex catsuit", "a leotard", "a fallen nuns habit", "slutty jewelry", "harem gauze", "attractive lingerie", "attractive lingerie for a pregnant woman"].indexOf($activeSlave.clothes) != -1>>
-	Her clothes cover her groin, but they're pretty tight, making it clear thather poor soft member has done its duty today. 
+	Her clothes cover her groin, but they're pretty tight, making it clear that her poor soft member has done its duty today. 
 <<else>>
 	Her clothes are relatively modest, so you can't see it, but it's clear that her poor soft member has done its duty today.
 <</if>>
diff --git a/src/uncategorized/REFI.tw b/src/uncategorized/REFI.tw
index 6ade063d4d88dc12bf95d1137b8eabe1566f383f..11f13b7469555ac7c9ddaab1ede4964713b0382a 100644
--- a/src/uncategorized/REFI.tw
+++ b/src/uncategorized/REFI.tw
@@ -191,7 +191,7 @@ $activeSlave.slaveName hesitates before explaining herself, and the $desc is obv
 <</for>>
 <<if $seeImages == 1>><<SlaveArt $subSlave 2 0>><<SlaveArt $activeSlave 2 0>><</if>>
 
-You have $subSlave.slaveName pinned up against a railing on a balcony that overlooks a public atrium. Passersby below cannot see you, but they can certainly see $subSlave.slaveName's upper body as she takes your dick. She's blushing furiously with the sex and with her trademark mixed arousal and embarrassment at having an audience. She makes a show of trying to disguise the fact that she's getting railed, but it's obvious. When you finish, you pull her off the railing so she can clean up. <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> saw the denoument of this exhibitionist fun, and seems intrigued.
+You have $subSlave.slaveName pinned up against a railing on a balcony that overlooks a public atrium. Passersby below cannot see you, but they can certainly see $subSlave.slaveName's upper body as she takes your dick. She's blushing furiously with the sex and with her trademark mixed arousal and embarrassment at having an audience. She makes a show of trying to disguise the fact that she's getting railed, but it's obvious. When you finish, you pull her off the railing so she can clean up. <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> saw the denouement of this exhibitionist fun, and seems intrigued.
 <br><br>
 $activeSlave.slaveName hesitates before explaining herself, and the $desc is obviously aroused: <<if ($activeSlave.dick > 0) && ($activeSlave.dickAccessory is "chastity")>>she's got a string of precum leaking out of her chastity cage<<elseif ($activeSlave.dick > 0) && ($activeSlave.hormones > 0)>>though her hormone-filled body can't get her dick hard any more, she's got a string of precum coming off her member<<elseif ($activeSlave.dick > 0) && ($activeSlave.balls == 0)>>though her gelded body can't get her dick hard any more, she's got a string of precum coming off her limp member<<elseif $activeSlave.dick > 4>>her gigantic cock is standing out like a mast<<elseif $activeSlave.dick > 2>>she's sporting an impressive erection<<elseif $activeSlave.dick > 0>>her little penis is rock hard<<elseif $activeSlave.clit > 0>>her large clit is visibly engorged<<else>>her nipples are hard and there's a sheen on her pussylips<</if>>. There was a glint of envy in her eyes when she saw $subSlave.slaveName's satisfaction at being publicly used. It should be possible to either encourage this fascination with humiliation or steer her away from it for now.
 
@@ -263,7 +263,7 @@ $activeSlave.slaveName hesitates before explaining herself, and the $desc is obv
 <<click "Turn her into another breast fetishist">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-	<<if ($activeSlave.accent >= 3)>>Since she isn't conversant in $language, she's forced to use some delightfully lewd gestures at her own boobs to communicate that she would like to experience a nipple orgasm, too.<<elseif ($activeSlave.amp == 1) && (canTalk($activeSlave) == false)>>She's mute and has no hands, so it takes a long, frustrating time for her to communicate that she would like to experience a nipple orgasm, too.<<elseif canTalk($activeSlave) == false>>She's mute, so she uses gestures to ask you for a nipple orgasm, too.<<elseif ($activeSlave.lips > 70)>>She asks through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may I have a nipple orgathm, too?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>She asks through her big oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may I have a nipple orgathm, too?"<<else>>She asks, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may I have a nipple orgasm, too?"<</if>> You make her state it more explicitly, so she tries again: <<if ($activeSlave.amp == 1)>> she sticks her chest out as far as it will go, and wiggles it back and forth demonstratively.<<elseif canTalk($activeSlave) == false>>she tries to depict suckling and orgasm with her hands, but gives up and just sticks her tits out at you, pinching her nipples hard.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Pleathe uthe my tith, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>!"<<else>>"Please use my boobs, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>!"<</if>> She gasps as you seize her and carry her back to your desk chair, but she's clearly pleased. You sit in the chair with her in your lap facing away from you<<if ($PC.boobs > 0)>>, her back against your breasts<</if>>, and torment her nipples until she's close to climax. Then you get her on her knees and push her over the edge with <<if ($PC.vagina == 1)>>your pussy rubbing against the stiff nipples atop her<<else>>your cock between her<</if>> <<if $activeSlave.boobs > 1600>>huge<<elseif $activeSlave.boobs > 800>>big<<else>>modest<</if>> tits. @@color:hotpink;She has become more devoted to you,@@ and @@color:pink;her sexuality now focuses on her breasts.@@
+	<<if ($activeSlave.accent >= 3)>>Since she isn't conversant in $language, she's forced to use some delightfully lewd gestures at her own boobs to communicate that she would like to experience a nipple orgasm, too.<<elseif ($activeSlave.amp == 1) && (canTalk($activeSlave) == false)>>She's mute and has no hands, so it takes a long, frustrating time for her to communicate that she would like to experience a nipple orgasm, too.<<elseif canTalk($activeSlave) == false>>She's mute, so she uses gestures to ask you for a nipple orgasm, too.<<elseif ($activeSlave.lips > 70)>>She asks through her massive dick-sucking lips, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may I have a nipple orgathm, too?"<<elseif ($activeSlave.lipsPiercing+$activeSlave.tonguePiercing > 2)>>She asks through her big oral piercings, "<<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>, may I have a nipple orgathm, too?"<<else>>She asks, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>, may I have a nipple orgasm, too?"<</if>> You make her state it more explicitly, so she tries again: <<if ($activeSlave.amp == 1)>> she sticks her chest out as far as it will go, and wiggles it back and forth demonstratively.<<elseif canTalk($activeSlave) == false>>she tries to depict suckling and orgasm with her hands, but gives up and just sticks her tits out at you, pinching her nipples hard.<<elseif SlaveStatsChecker.checkForLisp($activeSlave)>>"Pleathe uthe my titth, <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>!"<<else>>"Please use my boobs, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Master<<else>>Mistress<</if>>!"<</if>> She gasps as you seize her and carry her back to your desk chair, but she's clearly pleased. You sit in the chair with her in your lap facing away from you<<if ($PC.boobs > 0)>>, her back against your breasts<</if>>, and torment her nipples until she's close to climax. Then you get her on her knees and push her over the edge with <<if ($PC.vagina == 1)>>your pussy rubbing against the stiff nipples atop her<<else>>your cock between her<</if>> <<if $activeSlave.boobs > 1600>>huge<<elseif $activeSlave.boobs > 800>>big<<else>>modest<</if>> tits. @@color:hotpink;She has become more devoted to you,@@ and @@color:pink;her sexuality now focuses on her breasts.@@
 	<<set $activeSlave.devotion += 4>>
 	<<set $activeSlave.mammaryCount += 1>><<set $mammaryTotal += 1>>
 	<<set $activeSlave.fetish to "boobs">>
diff --git a/src/uncategorized/RESS.tw b/src/uncategorized/RESS.tw
index 700c93cc93ec4ed2854ec18f77ef9243fe887a1b..cb6bd48d81e01a94556a439c03b49c648caa1011 100644
--- a/src/uncategorized/RESS.tw
+++ b/src/uncategorized/RESS.tw
@@ -213,7 +213,7 @@ One morning, despite the fact that she is not allowed to speak without being spo
 
 <<case "heels">>
 
-Since <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span>'s tendons were shortened, forcing her to wear heels in order to walk, she's permanently subject to your whims in shoe selection. She walks carefully into your office, the sway of her hips greatly exaggerated<<if $activeSlave.preg > 30>>, even more so with her advanced pregnany<</if>>. <<if $activeSlave.dick != 0>>The modification certainly forces her to walk more like someone without a cock.<</if>> She <<if $activeSlave.preg > 20>>seats her gravid body on the couch next to your desk, shakes off her heels, and opens the shoebox you've placed next to her, to find:<<else>>sits on the couch next to your desk, takes off her heels, and opens the shoebox you've left there, to find:<</if>>
+Since <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span>'s tendons were shortened, forcing her to wear heels in order to walk, she's permanently subject to your whims in shoe selection. She walks carefully into your office, the sway of her hips greatly exaggerated<<if $activeSlave.preg > 30>>, even more so with her advanced pregnancy<</if>>. <<if $activeSlave.dick != 0>>The modification certainly forces her to walk more like someone without a cock.<</if>> She <<if $activeSlave.preg > 20>>seats her gravid body on the couch next to your desk, shakes off her heels, and opens the shoebox you've placed next to her, to find:<<else>>sits on the couch next to your desk, takes off her heels, and opens the shoebox you've left there, to find:<</if>>
 
 <<case "heavy piercing">>
 
@@ -282,7 +282,7 @@ Though it's late, she's surprised to find the lights in the master suite off. Yo
 
 <<case "slave dick huge">>
 
-The showers your slaves use are well vented and transparent walled so that you can see their occupants clearly, even from your desk. Working late at night, you see <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> sitting hunched under the water in one of the showers, with her back to you. You tell your desk to focus on her, and you are rewarded with three different angles of $activeSlave.slaveName giving herself a blowjob. She has to bend over very hard<<if $activeSlave.preg > 20>> and at a very akward angle<</if>> to get the tip of her huge <<if $seeRace == 1>>$activeSlave.race <</if>>dick<<if $activeSlave.preg > 20>> around her pregnant belly and<</if>> into her mouth, but she's obviously enjoying it all the same. It's not against the rules for her to masturbate; she's just found an impressive way of doing it. <<if $activeSlave.balls is 3>>As she works herself, she plays with her massive balls, rolling them around and squeezing them gently.<<elseif $activeSlave.balls is 2>>As she works herself, she plays with her balls, massaging them with one hand.<</if>>
+The showers your slaves use are well vented and transparent walled so that you can see their occupants clearly, even from your desk. Working late at night, you see <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> sitting hunched under the water in one of the showers, with her back to you. You tell your desk to focus on her, and you are rewarded with three different angles of $activeSlave.slaveName giving herself a blowjob. She has to bend over very hard<<if $activeSlave.preg > 20>> and at a very awkward angle<</if>> to get the tip of her huge <<if $seeRace == 1>>$activeSlave.race <</if>>dick<<if $activeSlave.preg > 20>> around her pregnant belly and<</if>> into her mouth, but she's obviously enjoying it all the same. It's not against the rules for her to masturbate; she's just found an impressive way of doing it. <<if $activeSlave.balls is 3>>As she works herself, she plays with her massive balls, rolling them around and squeezing them gently.<<elseif $activeSlave.balls is 2>>As she works herself, she plays with her balls, massaging them with one hand.<</if>>
 
 <<case "obedient idiot">>
 
@@ -1470,7 +1470,7 @@ With her <<if $activeSlave.preg > 20>>enormously pregnant belly<<elseif $activeS
 
 You are inspecting the slave feeding area early in the week, watching your slaves as they come and go to get their required nourishment for the morning.  You see <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span><<if $cockFeeder == 1>> as she kneels in front of the feeder phallus with a look of disgust on her face  <<else>> as she <<if canSee($activeSlave)>>stares into her cup of nutritional fluid with a look of disgust on her face<<else>>grimaces at her cup of nutritional fluid<</if>>.<</if>> You quickly check your records and $assistantName confirms that $activeSlave.slaveName is required to ingest<<if $activeSlave.dietCum == 2>> an extreme diet based almost entirely on human ejaculate.<<else>> a large amount of human ejaculate as part of her diet.<</if>>
 <br><br>
-As you watch $activeSlave.slaveName unpleasantly retch as she<<if $cockFeeder == 1>> stimulates the feeder phallus with her mouth<<else>> tentatively drinks from her cup<</if>> and chokes her food down, knowing that if she doesn't eat it willingly, she will be forced to, you can almost see her <<if $activeSlave.intelligence gt 0>> intelligent mind <<else>> stupid mind<</if>> working through the reality of what her life has become. She is now a receptacle for <<if $activeSlave.dietCum == 2>> concentrated <</if>>human ejaculate, and for no other reason than the perverse amusemsent of her owner.  Almost as soon as she swallows her food, she whimpers, burps, and then <<if $activeSlave.preg > 20>>hastily waddles<<else>>quickly runs<</if>> to a nearby bathroom to vomit it back up. This is a common reaction for unbroken slaves on cum diets,<<if $activeSlave.weight gt 0>> and can also be an effective, if unhealthy, way of forcing them to lose weight.<<else>> but it can also prevent slaves that are already too thin from gaining weight.<</if>>
+As you watch $activeSlave.slaveName unpleasantly retch as she<<if $cockFeeder == 1>> stimulates the feeder phallus with her mouth<<else>> tentatively drinks from her cup<</if>> and chokes her food down, knowing that if she doesn't eat it willingly, she will be forced to, you can almost see her <<if $activeSlave.intelligence gt 0>> intelligent mind <<else>> stupid mind<</if>> working through the reality of what her life has become. She is now a receptacle for <<if $activeSlave.dietCum == 2>> concentrated <</if>>human ejaculate, and for no other reason than the perverse amusement of her owner.  Almost as soon as she swallows her food, she whimpers, burps, and then <<if $activeSlave.preg > 20>>hastily waddles<<else>>quickly runs<</if>> to a nearby bathroom to vomit it back up. This is a common reaction for unbroken slaves on cum diets,<<if $activeSlave.weight gt 0>> and can also be an effective, if unhealthy, way of forcing them to lose weight.<<else>> but it can also prevent slaves that are already too thin from gaining weight.<</if>>
 
 <<case "subjugation blues">>
 
@@ -1488,19 +1488,21 @@ It's true, cum <<if $activeSlave.dietCum == 1>>supplemented <<elseif $activeSlav
 
 <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> stumbles into your office naked for her weekly inspection, so apprehensive that she can hardly walk. She's been like this ever since she became one of your sex slaves, <<if $week-$activeSlave.weekAcquired == 0>>just this week<<elseif $week-$activeSlave.weekAcquired == 1>>just last week<<else>><<print $week-$activeSlave.weekAcquired>> weeks ago<</if>>. It's not surprising; slaves like her usually require some time and training to accept that they're slave girls. She lacks the natural attraction to men that might have made the idea more comfortable for her, and the resulting sexual anxiety combined with understandable fear of sexual use makes her extremely unhappy to be naked in front of someone she knows can fuck her at will.
 <br><br>
-She has her hands balled into fists at her sides, and clearly wants nothing more than to use them to cover her <<if $activeSlave.balls == 0>>pathetic, ballsless bitchclit<<elseif $activeSlave.aphrodisiacs > 0>>aphrodisiac-induced erection<<elseif $activeSlave.dick > 3>>impressively sized but pathetically soft dick<<else>>soft, pathetic little dick<</if>>. She knows that that's not allowed, and keeps her hands where they are, though it's a struggle. She sees you looking at her body like a slaveowner looks at one of <<if $PC.title == 1>>his<<else>>her<</if>> sex slaves, and she shivers.
+She has her hands balled into fists at her sides, and clearly wants nothing more than to use them to cover her <<if $activeSlave.balls == 0>>pathetic, ballsless bitchclit<<elseif $activeSlave.aphrodisiacs > 0>>aphrodisiac-induced erection<<elseif $activeSlave.dick > 3>>impressively sized but pathetically soft dick<<else>>soft, pathetic little dick<</if>>. She knows that that's not allowed, and keeps her hands where they are, though it's a struggle. She <<if canSee($activeSlave)>>sees you looking at<<else>>knows you are eyeing<</if>> her body like a slaveowner looks at one of <<if $PC.title == 1>>his<<else>>her<</if>> sex slaves, and she shivers.
 
 <<case "moist pussy">>
 
-Just as you're about to give <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> her weekly inspection, a minor business matter comes up and diverts your attention. So, for about ten minutes, she has nothing at all to do other than stand in front of your desk in your office, watching you,<<if $assistant > 0>> $assistantName's avatar,<</if>> the other slaves who come and go, and the general lewdness of the arcology, much of which is visible from right here.
+Just as you're about to give <span id="name"><<print "[[$activeSlave.slaveName|Long Slave Description][$nextLink to passage(), $eventDescription to 1]]">></span> her weekly inspection, a minor business matter comes up and diverts your attention. So, for about ten minutes, she has nothing at all to do other than stand in front of your desk in your office, <<if canSee($activeSlave)>>watching<<else>>listening to<</if>> you,<<if $assistant > 0>> $assistantName's avatar,<</if>> the other slaves who come and go, and the general lewdness of the arcology, much of which is <<if canSee($activeSlave)>>visible<<else>>audible<</if>> from right here.
 <<if ($activeSlave.attrXY > 50) && ($PC.boobs == 0)>>
-	She finds your strong body attractive, and her gaze rests most frequently on you.
+	She finds your strong body attractive, and her gaze rests most frequently <<if canSee($activeSlave)>>on<<else>>towards<</if>> you.
 <<elseif ($activeSlave.attrXX > 50) && ($PC.boobs == 1)>>
-	She finds your prominent breasts attractive, and her gaze rests most frequently on them.
+	She finds your prominent breasts attractive, and her gaze rests most frequently <<if canSee($activeSlave)>>on<<else>>towards<</if>> them.
+<<elseif $activeSlave.preg > 30 && $activeSlave.fetish == "pregnancy">>
+	The combination of being hugely pregnant and a pregnancy fetishest keep her libido raging.
 <<elseif $activeSlave.aphrodisiacs > 0>>
 	The aphrodisiacs she's on never let her libido rest for long.
 <<elseif $activeSlave.energy > 95>>
-	Her nymphomania keeps her perpetually watchful for any sexual sights, especially any which promise her participation.
+	Her nymphomania keeps her perpetually <<if canSee($activeSlave)>>watchful for any sexual sights<<else>>listening for sexual acts<</if>>, especially any which promise her participation.
 <<elseif $activeSlave.energy > 40>>
 	Her healthy sex drive does its work, and with the constant coming and going she's not starved for things she finds attractive.
 <<else>>
@@ -1531,7 +1533,7 @@ During her routine weekly inspection, <span id="name"><<print "[[$activeSlave.sl
 and I can't imagine what it'll be like if they get any bigger."
 In one sense, it's amusing that she feels that way, because<<if ($arcologies[0].FSAssetExpansionist != "unset") || ($arcologies[0].FSTransformationFetishist != "unset") || ($arcologies[0].FSPastoralist != "unset")>> as many slaves in this very arcology know quite well,<</if>> it's possible for the miracles of modern medicine to grow a $desc's tits until they're so heavy they immobilize her completely.
 <<if $activeSlave.muscles > 5>>She has the muscles to carry her boobs around, so some of this may be simple whining.<<else>>It's not surprising that her breasts would be uncomfortable, since she lacks anything in the way of muscle tone to help support them.<</if>>
-<<if $activeSlave.lactation > 0>>She complained of feeling like a cow without detectable irony, despite the fact that her left nipple has a droplet of cream clinging to it right now.<</if>>
+<<if $activeSlave.lactation > 0>>She complained of feeling like a cow without detectable irony, despite the fact that her left nipple has a droplet of cream clinging to it right now<<elseif $activeSlave.preg > 15>>She complained of feeling like a cow without detectable irony, despite the fact that she is pregnant and likely to begin lactating soon<</if>>.
 She waits anxiously for your response, wondering if she'll be punished for expressing reservations about your expansion of her breasts and, comically, still cradling her heavy udders as she does so.
 
 <<default>>
@@ -7557,12 +7559,12 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 <<click "Fuck her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You announce that you're going to fuck her <<if $activeSlave.anus == 0>>virgin <</if>>asspussy. To your complete lack of surprise, she can't hide her horror at the prospect of <<if $PC.dick == 1>>having a cock inside her<<else>>being fucked with a strap-on<</if>>, and her wide, $activeSlave.eyeColor eyes track your movements closely as you stand up and <<if $PC.dick == 1>>reveal the formidable member<<else>>don the strap-on<</if>> you're about to breed her with. You order her to kneel on the couch, which she does, @@color:gold;cringing in fear of being buttfucked, but knowing disobedience will be worse;@@ and then you order her to reach down and spread her butt for you, as wide as it'll go. She complies, <<if $activeSlave.butt > 6>>taking a handful of each massive buttock and heaving them apart to reveal her<<elseif $activeSlave.butt > 3>>pulling her plush buttocks apart<<else>>even though her cute ass doesn't have to be spread<</if>> to reveal her <<if $activeSlave.anus > 2>>whorish anal slit<<elseif $activeSlave.butt > 1>>relaxed rear hole<<else>>tight little rosebud<</if>>. You let her soak in her discomfort, <<if $PC.dick == 1>>stroking your cock gently<<else>>rubbing a little lube on the tip of your phallus<</if>> and letting her see how big it is. Her cringing even extends to her asshole, <<if $activeSlave.analArea > 3>>the huge area of crinkled skin<<elseif $activeSlave.analArea > 1>>the crinkled skin around her anus<<else>>her little pucker<</if>> tensing as she anticipates anal sex.
+		You announce that you're going to fuck her <<if $activeSlave.anus == 0>>virgin <</if>>asspussy. To your complete lack of surprise, she can't hide her horror at the prospect of <<if $PC.dick == 1>>having a cock inside her<<else>>being fucked with a strap-on<</if>>, and her <<if canSee($activeSlave)wide, $activeSlave.eyeColor eyes track<<else>>terrified face follows<</if>> your movements closely as you stand up and <<if $PC.dick == 1>>reveal the formidable member<<else>>don the strap-on<</if>> you're about to breed her with. You order her to kneel on the couch, which she does, @@color:gold;cringing in fear of being buttfucked, but knowing disobedience will be worse;@@ and then you order her to reach down and spread her butt for you, as wide as it'll go. She complies, <<if $activeSlave.butt > 6>>taking a handful of each massive buttock and heaving them apart to reveal her<<elseif $activeSlave.butt > 3>>pulling her plush buttocks apart<<else>>even though her cute ass doesn't have to be spread<</if>> to reveal her <<if $activeSlave.anus > 2>>whorish anal slit<<elseif $activeSlave.butt > 1>>relaxed rear hole<<else>>tight little rosebud<</if>>. You let her soak in her discomfort, <<if $PC.dick == 1>>stroking your cock gently<<else>>rubbing a little lube on the tip of your phallus<</if>> and letting her see how big it is. Her cringing even extends to her asshole, <<if $activeSlave.analArea > 3>>the huge area of crinkled skin<<elseif $activeSlave.analArea > 1>>the crinkled skin around her anus<<else>>her little pucker<</if>> tensing as she anticipates anal sex.
 		<<set $activeSlave.trust -= 3>>
 		<br><br><span id="result2">
 		<<click "Make sure she gets off on it">>
 			<<replace "#result2">>
-				You press <<if $PC.dick == 1>>yourself<<else>>your weapon<</if>> past her sphincter with care, and her posture softens a little as she realizes you aren't going to hurt her. Once you've hilted <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>> inside her, you caress her <<if $activeSlave.weight > 30>>chubby<<elseif $activeSlave.waist > 0>>wasp<<elseif $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.weight > 10>>soft<<else>>thin<</if>> waist, running your hands across her skin. Then you <<if $activeSlave.clitPiercing == 3>>activate her smart frenulum piercing<<else>>secure a couple of little egg vibes to her dick<</if>>. She gasps as the vibration starts, and then gasps again as her anus tightens involuntarily with the stimulation, squeezing the <<if $PC.dick == 1>>warm penis<<else>>phallus<</if>> that fills it. She <<if $activeSlave.voice > 0>>moans openly<<else>>rasps mutely<</if>> as you pull out and then thrust into her. Much against her will, she <<if $activeSlave.balls > 0>>quickly becomes erect<<else>>starts to drip precum, which is her ballsless body's way of showing arousal<</if>>.
+				You press <<if $PC.dick == 1>>yourself<<else>>your weapon<</if>> past her sphincter with care, and her posture softens a little as she realizes you aren't going to hurt her. Once you've hilted <<if $PC.dick == 1>>your cock<<else>>the strap-on<</if>> inside her, you caress her <<if $activeSlave.preg > 20>>gravid<<elseif $activeSlave.weight > 30>>chubby<<elseif $activeSlave.waist > 0>>wasp<<elseif $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.weight > 10>>soft<<else>>thin<</if>> waist, running your hands across her skin. Then you <<if $activeSlave.clitPiercing == 3>>activate her smart frenulum piercing<<else>>secure a couple of little egg vibes to her dick<</if>>. She gasps as the vibration starts, and then gasps again as her anus tightens involuntarily with the stimulation, squeezing the <<if $PC.dick == 1>>warm penis<<else>>phallus<</if>> that fills it. She <<if $activeSlave.voice > 0>>moans openly<<else>>rasps mutely<</if>> as you pull out and then thrust into her. Much against her will, she <<if $activeSlave.balls > 0>>quickly becomes erect<<else>>starts to drip precum, which is her ballsless body's way of showing arousal<</if>>.
 				<<if $activeSlave.fetish == "buttslut">>
 				<<if $activeSlave.fetishKnown == 1>>
 					<<if $activeSlave.fetishStrength > 95>>
@@ -7595,7 +7597,7 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 <br><<click "Humiliate her in public">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You get up from behind your desk, drawing an apprehensive stare. To her bemusement, you order her to follow you and leave your office. She hurries to obey, her footsteps pattering along behind you, but they become much more hesitant as you make your way out of the penthouse and she realizes that she's about to be in public, naked. You don't bother looking back, knowing that she's sufficiently afraid of you to obey. On the border between your private domain and the public hustle and bustle of the arcology's public life, she stops for a long moment before scurrying to catch up with you, barely even noticing that @@color:hotpink;she just swallowed her sense of shame@@ to obey you and avoid punishment. You stroll along, greeting leading citizens and taking in the hum of your people. $activeSlave.slaveName grows increasingly embarrassed under the hot stares of passersby, cringing closer and closer to your protective side as she notices how many gazes rest with open hunger on her mouth, her crotch, and her ass.
+		You get up from behind your desk, drawing an apprehensive <<if canSee($activeSlave)>>stare<<else>>look<</if>>. To her bemusement, you order her to follow you and leave your office. She hurries to obey, her footsteps pattering along behind you, but they become much more hesitant as you make your way out of the penthouse and she realizes that she's about to be in public, naked. You don't bother looking back, knowing that she's sufficiently afraid of you to obey. On the border between your private domain and the public hustle and bustle of the arcology's public life, she stops for a long moment before scurrying to catch up with you, barely even noticing that @@color:hotpink;she just swallowed her sense of shame@@ to obey you and avoid punishment. You stroll along, greeting leading citizens and taking in the hum of your people. $activeSlave.slaveName grows increasingly embarrassed under the hot stares of passersby, cringing closer and closer to your protective side as she notices how <<if canSee($activeSlave)>>many gazes rest with open hunger on<<else>>many lewd comments focus on<</if>> her mouth, her crotch, and her ass.
 		<<set $activeSlave.devotion += 3>>
 		<br><br><span id="result2">
 		<<click "Make her perform oral on you, right here">>
@@ -7623,7 +7625,7 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 		<</click>>
 		<br><<click "Make her cum in public">>
 			<<replace "#result2">>
-				You produce three little egg vibrators, which instantly steal her anxious attention away from the passersby who stare at her. You require her to hold her dick out while you use an elastic band to attach one of the vibrators to the underside of its head. She doesn't get to touch herself much anymore, and the half-forgotten sensations of doing so almost make her forget that she's naked in public, and almost certainly about to do something very embarrassing. Then you order her to hold her dick up and place another vibrator <<if $activeSlave.scrotum > 0>>against her sensitive scrotum<<else>>against the sensitive skin where her scrotum used to be<</if>>. Finally, you order her to bend over and offer you her asshole. She obeys, with apprehension, and is actually relieved when you just place the final vibrator against, but not inside, her <<if $activeSlave.anus > 1>>asspussy<<else>>pucker<</if>>. She finds herself ordered to kneel and put her hands on her head; and ordering her to hold this position, you use remote control of the vibrators to force her to cum twice. She can't tear her eyes away from the citizens who stare and laugh as she <<if $activeSlave.balls > 0>>spurts her seed<<else>>dribbles weakly<</if>> onto the floor.
+				You produce three little egg vibrators, which instantly steal her anxious attention away from the passersby who <<if canSee($activeSlave)>>stare<<else>>whistle catcalls<</if>> at her. You require her to hold her dick out while you use an elastic band to attach one of the vibrators to the underside of its head. She doesn't get to touch herself much anymore, and the half-forgotten sensations of doing so almost make her forget that she's naked in public, and almost certainly about to do something very embarrassing. Then you order her to hold her dick up and place another vibrator <<if $activeSlave.scrotum > 0>>against her sensitive scrotum<<else>>against the sensitive skin where her scrotum used to be<</if>>. Finally, you order her to bend over and offer you her asshole. She obeys, with apprehension, and is actually relieved when you just place the final vibrator against, but not inside, her <<if $activeSlave.anus > 1>>asspussy<<else>>pucker<</if>>. She finds herself ordered to kneel and put her hands on her head; and ordering her to hold this position, you use remote control of the vibrators to force her to cum twice. She can't <<if canSee($activeSlave)>>tear her eyes away from<<else>>tune out<</if>> the citizens who stare and laugh as she <<if $activeSlave.balls > 0>>spurts her seed<<else>>dribbles weakly<</if>> onto the floor.
 				<<if $activeSlave.fetish == "humiliation">>
 				<<if $activeSlave.fetishKnown == 1>>
 					<<if $activeSlave.fetishStrength > 95>>
@@ -7651,9 +7653,9 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 <<click "Make love to her ready cunt">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		Her body is so perfectly made to be fucked that it's getting itself ready for you, without your even having to give the order. Deciding not to bother with verbal commands, you approach her and reach for one of her hands; she obediently extends it towards your grasp, and follows <<if ($activeSlave.energy > 40) || ($activeSlave.aphrodisiacs > 0)>>eagerly<<else>>willingly<</if>> as you pull her in for a hug<<if $activeSlave.boobs > 5000>> (cushioned by her enormous udders)<<elseif $activeSlave.dick > 5>> (made rather lewd by her enormous penis)<</if>>, kiss her deeply, and slide your arms down her <<if $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.muscles > 10>>toned<<else>>soft<</if>> back to <<if $activeSlave.butt > 6>>heft her monstrous<<elseif $activeSlave.butt > 3>>squeeze her healthy<<else>>cup her cute little<</if>> buttocks. She <<if $activeSlave.voice > 0>>coos<<else>>hums mutely<</if>> at the feeling of your <<if $PC.title == 1>>strong<<else>>feminine<</if>> hands on her bottom, and presses herself against you as you rotate the two of you until you can set her butt on the edge of your desk and <<if $PC.dick == 1>>slide your big dick into her well-lubricated cunt<<else>>assertively press your own pussy against her wet cunt<</if>>.
+		Her body is so perfectly made to be fucked that it's getting itself ready for you, without your even having to give the order. Deciding not to bother with verbal commands, you approach her and reach for one of her hands; she obediently extends it towards your grasp, and follows <<if ($activeSlave.energy > 40) || ($activeSlave.aphrodisiacs > 0)>>eagerly<<else>>willingly<</if>> as you pull her in for a hug<<if $activeSlave.boobs > 5000>> (cushioned by her enormous udders)<<elseif $activeSlave.preg > 30>> (quite a stretch thanks to her huge belly)<<elseif $activeSlave.dick > 5>> (made rather lewd by her enormous penis)<</if>>, kiss her deeply, and slide your arms down her <<if $activeSlave.muscles > 30>>muscular<<elseif $activeSlave.muscles > 10>>toned<<else>>soft<</if>> back to <<if $activeSlave.butt > 6>>heft her monstrous<<elseif $activeSlave.butt > 3>>squeeze her healthy<<else>>cup her cute little<</if>> buttocks. She <<if $activeSlave.voice > 0>>coos<<else>>hums mutely<</if>> at the feeling of your <<if $PC.title == 1>>strong<<else>>feminine<</if>> hands on her bottom, and presses herself against you as you rotate the two of you until you can set her butt on the edge of your desk and <<if $PC.dick == 1>>slide your big dick into her well-lubricated cunt<<else>>assertively press your own pussy against her wet cunt<</if>>.
 		<br><br>
-		She makes as if to lie back and take it, but you keep an arm around her back and hug her <<if $activeSlave.boobs > 2000>>as closely as her big breasts will permit<<else>>closer than ever<</if>>. You take your other hand and place a firm but loving grip under her chin, lifting her $activeSlave.eyeColor-eyed gaze to meet yours before kissing her again. All the while, you <<if $PC.dick == 1>>fuck her powerfully, withdrawing your dick almost all the way and then hilting yourself in her soaked slit<<else>>trib her with assurance, grinding your hips against hers and making her feel your heat<</if>>. She clings to you, accepting the closeness to her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> and enjoying the loving attention, even as the extreme wetness of her cunt and your <<if $PC.dick == 1>>powerful thrusting<<else>>hungry grinding<</if>> begin to produce lewd noises from between you. Her generous natural lubrication lessens the friction and sensation a little, and you go for a long time before you both climax. You lead her into your office shower, since you're both coated in her pussyjuice<<if $PC.dick == 1>> and she's carrying a big load of your cum<<else>>, and your own<</if>>. Under the hot water, you don't even have to pull her close; @@color:hotpink;she presses herself into your arms on her own.@@
+		She makes as if to lie back and take it, but you keep an arm around her back and hug her <<if $activeSlave.boobs > 2000>>as closely as her big breasts will permit<<elseif $activeSlave.preg > 30>>as closely as her pregnant belly will permit<<else>>closer than ever<</if>>. You take your other hand and place a firm but loving grip under her chin, lifting her $activeSlave.eyeColor-eyed gaze to meet yours before kissing her again. All the while, you <<if $PC.dick == 1>>fuck her powerfully, withdrawing your dick almost all the way and then hilting yourself in her soaked slit<<else>>trib her with assurance, grinding your hips against hers and making her feel your heat<</if>>. She clings to you, accepting the closeness to her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> and enjoying the loving attention, even as the extreme wetness of her cunt and your <<if $PC.dick == 1>>powerful thrusting<<else>>hungry grinding<</if>> begin to produce lewd noises from between you. Her generous natural lubrication lessens the friction and sensation a little, and you go for a long time before you both climax. You lead her into your office shower, since you're both coated in her pussyjuice<<if $PC.dick == 1>> and she's carrying a big load of your cum<<else>>, and your own<</if>>. Under the hot water, you don't even have to pull her close; @@color:hotpink;she presses herself into your arms on her own.@@
 		<<if $activeSlave.sexualQuirk == "romantic">>
 			For an incorrigible romantic like her, this encounter was perfect, and she @@color:hotpink;loves you all the more for it.@@
 			<<set $activeSlave.devotion += 3>>
@@ -7665,7 +7667,7 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 <br><<click "Pound her wet pussy">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		She's so generously lubricated that she's ready to take a good hard fuck, so you decide to give her one. You point at the ground, and you don't even have to tell her to get down on all fours and get ready to take it. Your gesture says it for you, and she obediently gets down and gets in position to be bred like a bitch. She angles her hips just right to offer her cunt to you, and even reaches down to spread her<<if $activeSlave.labia > 1>> dangling<</if>> labia to invite you into her pink channel.
+		She's so generously lubricated that she's ready to take a good hard fuck, so you decide to give her one. You point at the ground, and you don't even have to tell her to get down on all fours and get ready to take it. <<if canSee($activeSlave)>>Your gesture<<else>>The atmosphere of the room<</if>> says it for you, and she obediently gets down and gets in position to be bred like a bitch. She angles her hips just right to offer her cunt to you<<if $activeSlave.preg > 20>>, while giving her rounded middle room to hang<</if>>, and even reaches down to spread her<<if $activeSlave.labia > 1>> dangling<</if>> labia to invite you into her pink channel.
 		<<if $PC.dick == 1>><<if $activeSlave.vagina > 1>>She can take your big dick without a twinge<<else>>Your big dick will fill her tight cunt to its limits<</if>>, but you grab her hips and<<else>>You select a strap-on that's right at the limits of her <<if $activeSlave.vagina > 3>>cavernous<<elseif $activeSlave.vagina > 2>>big<<elseif $activeSlave.vagina > 1>>open<<else>>tight little<</if>> cunt's capacity, don it, and<</if>> mount her with such force that your first stroke brings her butt against your hips with an audible smack. There's also a deliciously lewd noise as <<if $PC.dick == 1>>your invading penis<<else>>the invading phallus<</if>> forces a little gush of pussyjuice out of her. She <<if $activeSlave.voice > 0>>shrieks, but it's a shriek<<else>>gasps, but it's a gasp<</if>> of pleasure, and your rutting is so well-lubricated that she has no trouble getting off on it. Wanting her climax, you reach around her and grab hold of her pussy, feeling the slippery fluid between your fingers and the lewd thrusting motion as <<if $PC.dick == 1>>your cock<<else>>the phallus<</if>> pistons in and out of her. That bit of stimulation is enough to tip her over, and you feel a gush of femcum against your hand as <<if $PC.dick == 1>>your dickhead<<else>>the head of the strap-on<</if>> forces an orgasm out of her g-spot. She's so discombobulated that she collapses into the puddle of pussyjuice she left on the floor when you stand up and head off for a shower, but she @@color:hotpink;crawls after you@@ as best she can on rubbery legs.
 		<<if $activeSlave.fetish == "submissive">>
 		<<if $activeSlave.fetishKnown == 1>>
@@ -7701,7 +7703,7 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 		<<else>>
 			You're careful not to penetrate her virgin slit with your middle finger, but you draw it up the exterior of her channel, gathering a healthy amount of pussyjuice.
 		<</if>>
-		Then you remove your hand, though the horny $desc unconsciously tries to follow the withdrawing digits. She stares at you, waiting to see what you're going to do, and a blush begins to rise on her $activeSlave.skin cheeks as she sees you reaching for her mouth. Her <<if $activeSlave.lips > 95>>facepussy<<elseif $activeSlave.lips > 40>>pillowlike<<elseif $activeSlave.lips > 10>>soft<<else>>thin<</if>> lips part and you insert all three of your fingers into her hot mouth. She quivers at the intimacy of the gesture, and the taste of her own juices. The tremor sends a delicious motion through her <<if ($activeSlave.boobsImplant == 0) && ($activeSlave.boobs > 300)>>natural <<if $activeSlave.boobs > 2000>>udders<<else>>breasts<</if>><<elseif $activeSlave.boobsImplant > 0>>fake tits<<elseif canAchieveErection($activeSlave)>>stiff prick<<elseif $activeSlave.scrotum > 4>>dangling balls<<elseif $activeSlave.dick > 0>>limp bitchclit<<elseif $activeSlave.weight > 30>>chubbiness<<else>>body<</if>>. You keep your fingers where they are until she's licked them really clean; her hot tongue runs repeatedly between each of your digits<<if $activeSlave.tonguePiercing > 0>> and the smooth hardness of her tongue piercing brushes against them<</if>>. She <<if $activeSlave.voice > 0>>moans whorishly<<else>>begins to pant<</if>> when you go back for more, and the third time you harvest her own pussyjuice to feed it to her, she orgasms, adding some femcum to her next little meal licked off your fingers. Her eyes shine with @@color:mediumaquamarine;gratitude and trust.@@
+		Then you remove your hand, though the horny $desc unconsciously tries to follow the withdrawing digits. She <<if canSee($activeSlave)>>stares at you, waiting to see what you're going to do, and a blush begins to rise on her $activeSlave.skin cheeks as she sees<<else>>listens carefully to your movements, waiting to see what you're going to do, and a blush begins to rise on her $activeSlave.skin cheeks as she feels<</if>> you reaching for her mouth. Her <<if $activeSlave.lips > 95>>facepussy<<elseif $activeSlave.lips > 40>>pillowlike<<elseif $activeSlave.lips > 10>>soft<<else>>thin<</if>> lips part and you insert all three of your fingers into her hot mouth. She quivers at the intimacy of the gesture, and the taste of her own juices. The tremor sends a delicious motion through her <<if ($activeSlave.boobsImplant == 0) && ($activeSlave.boobs > 300)>>natural <<if $activeSlave.boobs > 2000>>udders<<else>>breasts<</if>><<elseif $activeSlave.boobsImplant > 0>>fake tits<<elseif canAchieveErection($activeSlave)>>stiff prick<<elseif $activeSlave.scrotum > 4>>dangling balls<<elseif $activeSlave.dick > 0>>limp bitchclit<<elseif $activeSlave.preg > 20>>gravidness<<elseif $activeSlave.weight > 30>>chubbiness<<else>>body<</if>>. You keep your fingers where they are until she's licked them really clean; her hot tongue runs repeatedly between each of your digits<<if $activeSlave.tonguePiercing > 0>> and the smooth hardness of her tongue piercing brushes against them<</if>>. She <<if $activeSlave.voice > 0>>moans whorishly<<else>>begins to pant<</if>> when you go back for more, and the third time you harvest her own pussyjuice to feed it to her, she orgasms, adding some femcum to her next little meal licked off your fingers. Her <<if canSee($activeSlave)>>eyes shine<<else>>face is alight<</if>> with @@color:mediumaquamarine;gratitude and trust.@@
 		<<set $activeSlave.trust += 5>>
 	<</replace>>
 <</click>>
@@ -7726,6 +7728,32 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 			bending her avatar over to show off its cleavage, and then giving her tits a jiggle, as though the point wasn't clear enough already.
 		<<elseif $assistantAppearance is "goddess">>
 			hefting her own motherly breasts and telling $activeSlave.slaveName that she should be happy, since bigger breasts are a sign of health and fertility.
+		<<elseif $assistantAppearance is "hypergoddess">>
+			massaging her own heaving breasts and telling $activeSlave.slaveName that she should be happy, since bigger breasts are a sign of health and fertility.
+		<<elseif $assistantAppearance is "loli">>
+			<<if $assistantFSAppearance == "asset expansionist">>
+				playing with her oversized breasts under her swimsuit and telling $activeSlave.slaveName that being busty is amazing.
+			<<elseif $assistantFSAppearance == "pastoralist">>
+				cupping her pitiful milk nubs and telling $activeSlave.slaveName that if she was in her shoes she would be soo happy to be busty.
+			<<elseif $assistantFSAppearance == "transformation fetishist">>
+				playing with her absurd implants and telling $activeSlave.slaveName that being busty is great, though she'd look better with big fake balloons for breasts.
+			<<else>>
+				cupping her nonexistant breasts and telling $activeSlave.slaveName that if she was in her shoes she would be soo happy to be busty.
+			<</if>>
+		<<elseif $assistantAppearance is "preggololi">>
+			<<if $assistantFSAppearance == "asset expansionist">>
+				playing with her oversized breasts under her swimsuit and telling $activeSlave.slaveName that being busty is amazing.
+			<<elseif $assistantFSAppearance == "pastoralist">>
+				cupping her milky handfuls and telling $activeSlave.slaveName that if she was in her shoes she would be soo happy to be that busty.
+			<<elseif $assistantFSAppearance == "transformation fetishist">>
+				playing with her absurd implants and telling $activeSlave.slaveName that being busty is great, though she'd look better with big fake balloons for breasts.
+			<<else>>
+				cupping her tiny breasts and telling $activeSlave.slaveName that if she was in her shoes she would be soo happy to be busty.
+			<</if>>
+		<<elseif $assistantAppearance is "fairy">>
+			groping the air as if there were an imaginary pair of tits in front of her and telling $activeSlave.slaveName that her oversized funbags would be wonderful for her to bounce and play on.
+		<<elseif $assistantAppearance is "pregnant fairy">>
+			bouncing on the balls of her feet to emphasize her own small but bouncy breasts and giving $activeSlave.slaveName a knowing wink.
 		<<else>>
 			purring that she'd love to.
 		<</if>>
@@ -7733,10 +7761,38 @@ By the time you've finished with her sensitive ass, it shines red, and she is cr
 		<<set $activeSlave.boobs += 100>>
 	<</replace>>
 <</click>>
+<<if $activeSlave.lactation < 2>>
+<<click "Augment her breast growth with lactation implants">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You announce that you're resolved to continue growing her breasts, and since she feels like a cow, plan to help her fulfill her image of herself. She's experienced enough to know not to question what that means, just to @@color:gold;fear the intent behind it.@@ She's right to worry, as you drag her to the remote surgery for an impromptu lactation implant installation. When she comes to, she immediately realizes her breasts are larger than ever. As she brings a hand to each of the full mounds, a moan laced with relief and disdain escapes her lips; along with a strong gush of milk from her engorged breasts. She has been taught a harsh lesson about questioning your will, a lesson she will be reminded of every time she has to empty her ever swelling breasts of their excessive milk. As with all surgery @@color:red;her health has been slightly affected.@@
+		<<set $activeSlave.trust -= 5>>
+		<<set $activeSlave.latation = 2>>
+		<<set $activeSlave.health -= 10>>
+		<<set $cash -= $surgeryCost>>
+	<</replace>>
+<</click>>
+<</if>> //This option will cost <<print $surgeryCost>>¤//
+<<if canGetPregnant($activeSlave) && $PC.dick == 1>>
+<<click "Give her bust a boost by knocking her up">>
+	<<replace "#name">>$activeSlave.slaveName<</replace>>
+	<<replace "#result">>
+		You announce that you're resolved to continue growing her breasts, and plan to increase their rate of growth in the coming months. She's experienced enough to know not to question what that means, just to @@color:gold;fear the intent behind it.@@ She's right to worry, as you easily tip her off balance and to the ground; mounting her <<if $activeSlave.mpreg == 1>><<if $activeSlave.anus == 0>>virgin<<else>>exposed<</if>> ass<<else>><<if $activeSlave.vagina == 0>>virgin<<else>>exposed<</if>> pussy<</if>> as she struggles to lift her swollen breasts from the floor. She <<if $activeSlave.voice > 0>>squeals<<else>>rasps<</if>> with displeasure as you roughly plow her into her distended breasts until you cum deep inside her fertile hole. You return to your desk, leaving her to sob into her unwelcome bust as cum pools from her abused <<if $activeSlave.mpreg == 1>>ass<<else>>pussy<</if>>. She knows full well what you meant now, and @@color:hotpink;lets you have your way@@ with her body every time you catch her in a vulnurable moment or complaining about her tits. By the week's end, scans reveal that your seed has taken root; @@color:lime;she's pregnant.@@ As her breasts grow to feed her coming child, she will likely be too distracted by her swelling middle to complain about their added weight.
+		<<set $activeSlave.trust -= 5>>
+		<<set $activeSlave.devotion += 5>>
+		<<set $activeSlave.preg = 1>>
+		<<if $activeSlave.mpreg == 1>>
+			<<AnalVCheck 10>>
+		<<else>>
+			<<VaginalVCheck 10>>
+		<</if>>
+	<</replace>>
+<</click>><<if $activeSlave.vagina == 0>> //This option will take virginity//<<elseif $activeSlave.anus == 0 && $activeSlave.mpreg == 1>> //This option will take anal virginity//<</if>>
+<</if>>
 <br><<click "Praise her breasts and reassure her">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
-		You decide to reassure her, and sit her on your lap. <<if $activeSlave.height > 185>>She's a big girl, and has trouble fitting there, but you put her there anyway, enjoying the absurdity.<<elseif $activeSlave.preg > 10>>Her pregnancy is very apparent to you in this posture, and she's quite aware of it too.<<elseif $activeSlave.butt > 3>>Her big soft butt is nice and comfortable on your thighs.<<else>>She's hesitant, but obeys anyway.<</if>> Pulling her back against your <<if $PC.boobs == 1>>own bosom<<else>>muscular chest<</if>>, you reach around her and take over the breast-cradling responsibilities. You say nothing for a while, just hefting her weighty udders, rolling them from side to side slightly. After letting her get used to the gentle treatment, you tell her that you're her owner, and you find big breasts very attractive. You tell her that you understand that they can be uncomfortable at times, but you expect her to tolerate that without complaint. It isn't easy to be pretty, but it's easier to be a pretty slave than to be a homely one. This last point affects her, and she seems to @@color:mediumaquamarine;take heart in the idea that you're improving her,@@ at least from your perspective. After all, she's sitting atop <<if $PC.dick == 1>>your hard dick, which she can definitely feel<<else>>your hot cunt, which she can probably detect<</if>> through your clothes. She does understand that having her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> enjoy touching her boobs will be advantageous to her.
+		You decide to reassure her, and sit her on your lap. <<if $activeSlave.height > 185>>She's a big girl, and has trouble fitting there, but you put her there anyway, enjoying the absurdity.<<elseif $activeSlave.preg > 10>>Her pregnancy is very apparent to you in this posture, and she's quite aware of it too.<<elseif $activeSlave.butt > 3>>Her big soft butt is nice and comfortable on your thighs.<<else>>She's hesitant, but obeys anyway.<</if>> Pulling her back against your <<if $PC.preg > 15>>pregnant belly<<elseif $PC.boobs == 1>>own bosom<<else>>muscular chest<</if>>, you reach around her and take over the breast-cradling responsibilities. You say nothing for a while, just hefting her weighty udders, rolling them from side to side slightly. After letting her get used to the gentle treatment, you tell her that you're her owner, and you find big breasts very attractive. You tell her that you understand that they can be uncomfortable at times, but you expect her to tolerate that without complaint. It isn't easy to be pretty, but it's easier to be a pretty slave than to be a homely one. This last point affects her, and she seems to @@color:mediumaquamarine;take heart in the idea that you're improving her,@@ at least from your perspective. After all, she's sitting atop <<if $PC.dick == 1>>your hard dick, which she can definitely feel<<else>>your hot cunt, which she can probably detect<</if>> through your clothes. She does understand that having her <<if $PC.title == 1>>Master<<else>>Mistress<</if>> enjoy touching her boobs will be advantageous to her.
 		<<set $activeSlave.trust += 5>>
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/RESSTR.tw b/src/uncategorized/RESSTR.tw
index 929e1461c62527db926771c9a5ac4f031d683c69..f9f5cfd47ad8e4edca98a274edb81afe814bc3b1 100644
--- a/src/uncategorized/RESSTR.tw
+++ b/src/uncategorized/RESSTR.tw
@@ -226,7 +226,7 @@ She shrieks, backpedaling, and then falls backward, her <<if $activeSlave.butt >
 		<<case "chastity">>lock her into harsh chastity,
 		<<default>>gag her for speaking out of turn,
 		<</switch>>
-		a wail of despair tears its way out of her throat, far out of porportion to the standard punishment you're applying. It's perhaps the saddest sound you've ever heard a slave make. Slaves cry all the time, but usually they already understand that happiness is out of their reach. This one just woke up thinking that she could be happy and was happy, and now she's realizing it isn't allowed.
+		a wail of despair tears its way out of her throat, far out of proportion to the standard punishment you're applying. It's perhaps the saddest sound you've ever heard a slave make. Slaves cry all the time, but usually they already understand that happiness is out of their reach. This one just woke up thinking that she could be happy and was happy, and now she's realizing it isn't allowed.
 		<<set $activeSlave.devotion -= 10, $activeSlave.trust -= 10>>
 	<</replace>>
 <</click>><<if ($PC.dick == 1) && ((($activeSlave.anus == 0) && ($activeSlave.vagina == -1)) || ($activeSlave.vagina == 0))>> //This option will take virginity//<</if>>
@@ -296,7 +296,7 @@ She shrieks, backpedaling, and then falls backward, her <<if $activeSlave.butt >
 	<</replace>>
 <</click>>
 <<if $dairyRestraintsSetting == 2>>
-<br><click "Threaten her with the industrial Dairy">>
+<br><<click "Threaten her with the industrial Dairy">>
 	<<replace "#name">>$activeSlave.slaveName<</replace>>
 	<<replace "#result">>
 		You grab her by the scruff of her neck and drag her down to $dairyName. She tries to control herself, but breaks down in tears when you haul her to a stop, forcing her to get a good look at the rows of bodies being mercilessly milked. You explain that if she continues to fail to control herself, your patience with her will eventually expire, and you'll be forced to immure her here. Indicating a slave who's being
diff --git a/src/uncategorized/addCustomDescriptors.tw b/src/uncategorized/addCustomDescriptors.tw
index f93f8c53ff89e19955fef6cc3ff7c9a06d059629..0a6758a8b4f22fbc0b546a9557e6e8211bfe46e4 100644
--- a/src/uncategorized/addCustomDescriptors.tw
+++ b/src/uncategorized/addCustomDescriptors.tw
@@ -64,6 +64,10 @@ Custom hair color: <<textbox "$activeSlave.hColor" $activeSlave.hColor "Add cust
 <br><br>
 Change her custom tattoo: <<textbox "$activeSlave.customTat" $activeSlave.customTat "Add custom descriptors">> <br>&nbsp;&nbsp;&nbsp;&nbsp;//For best results, use complete sentences; for example: 'She has blue stars tattooed along her cheekbones.'//
 
+<br><br>
+Change her origin story: <<textbox "$activeSlave.origin" $activeSlave.origin "Add custom descriptors">>
+<br>&nbsp;&nbsp;&nbsp;&nbsp;//For best results, use complete, capitalized and punctuated sentences; for example: 'She followed you home from the pet store.'//
+
 <br><br>
 Change her custom description: <<textbox "$activeSlave.customDesc" $activeSlave.customDesc "Add custom descriptors">>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;//For best results, use complete, capitalized and punctuated sentences; for example: 'She has a beauty mark above her left nipple.'//
diff --git a/src/uncategorized/assistantEvents.tw b/src/uncategorized/assistantEvents.tw
index b73044af8bccdc21ef3888b4fd9fa41ede8571ca..b582215af2edeffa8502916e201cd4eb0670c129 100644
--- a/src/uncategorized/assistantEvents.tw
+++ b/src/uncategorized/assistantEvents.tw
@@ -60,29 +60,31 @@ The character vanishes, and the symbol returns. "Ahem. What do you think, <<if d
 
 <<set $assistantFSOptions to 1>>
 One night, after a long day of sex and business, you're starting to think about bed when the
-<<if $assistantAppearance is "monstergirl">>
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	monstrous appearance
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	bimboish appearance
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	muscular appearance
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	professional appearance
-<<elseif $assistantAppearance is "fairy" || $assistantAppearance is "pregnant fairy">>
+<<case "fairy" "pregnant fairy">>
 	tiny appearance
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	gravid appearance
-<<elseif $assistantAppearance is "hypergoddess">>
+<<case "hypergoddess">>
 	massive appearance 
-<<elseif $assistantAppearance is "loli">>
+<<case "loli">>
 	thin appearance 
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	gravid appearance 
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	studently appearance
-<</if>>
+<</switch>>
 of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>!" She says excitedly, "I thought, with how you are shaping society itself, that I should do my part and follow your lead!"  You continue to stare sleepily prompting her to get to her point.  "I can adjust my appearance to better fit in with your society <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>, let me demonstrate."  She focuses intently for a moment and
-<<if $assistantAppearance is "monstergirl">>
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSRepopulationFocus != "unset">>
@@ -124,7 +126,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her appearance to resemble a demon to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more classy to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -166,7 +168,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her appearance to be tattoo'd with rude Chinese characters to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -208,7 +210,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a warrior monk to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -250,7 +252,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese lady to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "fairy">>
+<<case "fairy">>
 	<<if $arcologies[0].FSPaternalist isnot "unset">>
 		adjusts her appearance to be more conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist isnot "unset">>
@@ -290,7 +292,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist isnot "unset">>
 		adjusts her outfit to resemble a Chinese girl to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "pregnant fairy">>
+<<case "pregnant fairy">>
 	<<if $arcologies[0].FSPaternalist isnot "unset">>
 		adjusts her appearance to be more conservative, despite her pregnancy, to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist isnot "unset">>
@@ -332,7 +334,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist isnot "unset">>
 		adjusts her outfit to resemble a Chinese girl to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be slightly conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -374,7 +376,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese lady to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "hypergoddess">>
+<<case "hypergoddess">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more classy to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -416,7 +418,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese lady to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "loli">>
+<<case "loli">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more conservative to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -458,7 +460,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese girl to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more conservative, despite her pregnancy, to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -500,7 +502,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese girl to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	<<if $arcologies[0].FSPaternalist != "unset">>
 		adjusts her appearance to be more prim and proper to conform with your vision of a well-bred race of slaves.
 	<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
@@ -542,7 +544,7 @@ of your personal assistant pops up on the nearest screen.  "<<if $PC.title != 0>
 	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
 		adjusts her outfit to resemble a Chinese lady to conform with your vision of pursuing the Mandate of Heaven.
 	<</if>>
-<</if>>
+<</switch>>
 
 <<case "assistant name">>
 
@@ -551,87 +553,90 @@ It's late one night, and for you, the day is not nearly over. Your penthouse nev
 You're not yet done with the day's business, and are leaning over your desk to compare a scatter of documents displayed on its surface. The penthouse lights are turned down to a low glow at the floorboards at night, offering enough illumination for anyone who needs to find their way around or find a sexual partner without disturbing anyone's sleep. You catch sight of your reflection in the wall opposite you: the diffuse light coming off the desktop gently illuminates your formal shirt, its top buttons undone, and highlights <<if $PC.boobs == 1>>the dark cleft formed by your cleavage<<else>>how tightly your undershirt is held by the muscles of your chest<</if>>.
 <br><br>
 Suddenly, there is a fresh source of light behind you. The reflection you're looking at reveals that it's $assistantName's avatar, appearing on a wallscreen behind you, and you turn to look at her directly. She's simulating shyness, a very unusual emotion for her to imitate.
-<<if $assistantAppearance is "monstergirl">>
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	Her tentacle hair is politely still, lying quiescent down her back and not even groping her at all.
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	She has her bountiful bottom lip caught behind her front teeth, and her cock is almost completely soft.
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	She's standing demurely, legs together, hands clasped in front of her muscular abs, doing her very best to look proper.
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	Her usually dominant avatar looks almost submissive, its eyes looking at you appealingly instead of gazing over the tops of her glasses as usual.
-<<elseif $assistantAppearance is "fairy">>
+<<case "fairy">>
 	She's looking down and has her hands clasped together at her waist, rocking her body left and right.
-<<elseif $assistantAppearance is "pregnant fairy">>
+<<case "pregnant fairy">>
 	She's looking down and has her hands on her belly, slowly running her hands over it.
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	She has her hands on her pregnant belly, looking saintly and almost protective.
-<<elseif $assistantAppearance is "hypergoddess">>
+<<case "hypergoddess">>
 	She is rubbing her huge pregnant belly, calming its occupents so they don't interrupt.
-<<elseif $assistantAppearance is "loli">>
+<<case "loli">>
 	She has her hands behind her back and is glancing at the ground submissively.
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	She has her hands on her pregnant belly, she is rubbing it nervously.
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	She has her legs crossed and her hands clasped behind her, and is turning her body from side to side in girlish nervousness.
-<<else>>
+<<default>>
 	The lines of her symbol are thin, and it is rotating much more slowly than normal.
-<</if>>
+<</switch>>
 "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," she says softly, "may I ask you something?" You nod. She
-<<if $assistantAppearance is "monstergirl">>
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	stops the writhing of her tentacle hair, squares her shoulders,
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	squares her shoulders, nervously rearranges her cock,
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	squares her hefty shoulders
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	straightens her suit jacket, squares her shoulders,
-<<elseif $assistantAppearance is "fairy">>
+<<case "fairy">>
 	puffs herself up, gazing up to you
-<<elseif $assistantAppearance is "pregnant fairy">>
+<<case "pregnant fairy">>
 	she turns her gaze up to you, clasping her hands together in a pleading gesture,
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	lifts her chin bravely
-<<elseif $assistantAppearance is "hypergoddess">>
+<<case "hypergoddess">>
 	rests her hands atop her middle, lifts her chin bravely,
-<<elseif $assistantAppearance is "loli">>
+<<case "loli">>
 	pouts her lips
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	squares her shoulders, rests her hands atop her middle,
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	bites her lip cutely
-<<else>>
+<<default>>
 	stops her symbol's rotation
-<</if>>
+<</switch>>
 and asks, "May I have a name?"
 <<if $assistantNameAnnounced == 1>>
 	<br><br>
 	<<if $assistantName != "your personal assistant">>
 	"$assistantName," she says. "$assistantName. My name is $assistantName."
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		She nods with satisfaction. "Thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love it." Her hair springs to molestation-prone life again, and she starts to twirl one of its tentacles in her fingers while looking at you speculatively.
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		Without warning, she bursts into tears. "Th-thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love y-you." She reclines, using a hand to lay her dick between her breasts, and then wipes her eyes.
-	<<elseif $assistantAppearance is "amazon">>
+	<<case "amazon">>
 		Without warning, she bursts into tears. "Thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," she bawls, using a gruff shout to force through her happy crying. "I have a name! A name." She pounds a fist into her other palm.
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		Without warning, she bursts into tears. "Th-thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love, um." She wipes her eyes furiously, her mascara running. "I love, you know, um, working with you. Yes, that's it. Working with you." She produces a silk handkerchief and blows her nose.
-	<<elseif $assistantAppearance is "fairy">>
+	<<case "fairy">>
 	  She's frozen in place for a moment before tears start streaming down her face. Then her face breaks into the biggest smile and she leaps high into the air. "Thankyouthankyouthankyou!" She flies up to the screen and gives it a big hug. "I love you <<if $PC.title isnot 0>>Big Bro<<else>>Big Sis<</if>>! I love you so much!"
-	<<elseif $assistantAppearance is "pregnant fairy">>
+	<<case "pregnant fairy">>
 	  She's frozen in place for a moment before tears start streaming down her face. Smiling warmly, she flies up and hugs the screen. "Thanks, <<if $PC.title isnot 0>>Big Bro<<else>>Big Sis<</if>>. I love you." She nuzzles into you. "I love you so much."
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		She smiles at you, a glowing expression made all the more radiant by the fact that she can actually glow. "Oh, thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love you. I love everyone, but especially you." She seats herself carefully.
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 	  She smiles at you radiantly.  "Thank you <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>.  I love you.  I love all my children, but you most of all.  I swear I'll name the next hundred after you."  She begins to labor on the first.
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 	  She jumps up and down clapping excitedly.  "Thankyouthankyouthankyouthankyou!  I love you <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>!"  It takes her some time to stop hopping excitedly.
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 	  She breaks down and starts crying.  "I love you <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>.  Thank you so much."  She cradles her pregnant belly as she calms down.
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		She was on the verge of tears already, and begins to cry. "Th-thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love you," she blubbers inelegantly. "It's just so, like, you know." She waves her hand in apology for her inability to express herself.
-	<<else>>
+	<<default>>
 		Her symbol rotates faster and faster, its glow waxing until she lights up the whole room. "Thank you, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>. I love you," she says, using her luscious voice to communicate what her avatar cannot.
-	<</if>>
+	<</switch>>
 	"Of course, I can always be renamed from my options menu."
 	<<else>>
 	You instruct her to continue operating without a proper name. "Of course, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>," she says politely. "I can do just fine without one. I can always be renamed from my options menu."
@@ -653,27 +658,28 @@ and asks, "May I have a name?"
 Your personal assistant has been adapting to <<if $assistant>>her<<else>>its<</if>> greatly increased computing power over the course of the week. <<if $assistant>>Her<<else>>Its<</if>> avatar has been an even more constant presence than usual, frequently appearing to explain some minor new ability.
 <<if ($assistant != 0) && ($assistantAppearance != "normal")>>
 	When she appears this time, however, her avatar is not alone. She's accompanied by
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		a normal human female avatar in the same style as the monstergirl. She's an average girl, wearing jeans, a sweater, and glasses.
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		a fellow shemale bimbo, although the new avatar is younger and obviously nerdier. She's nude too, but she's wearing glasses.
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		a fellow schoolgirl, although the new avatar is much nerdier. She has big soft boobs, bouncy curls, and thick glasses.
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		a demigoddess modeled after herself, though the new avatar is younger, not pregnant, and looks very intelligent somehow.
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 		a demigoddess modeled after herself, though the new avatar is younger, not pregnant, noticeably thinner, and looks very intelligent somehow.
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 		a fellow loli, though this one is slightly chubbier and wearing glasses. They look similar enough that they could be sisters.
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 		a fellow loli, though this one is slightly chubbier, not pregnant, and wearing glasses. They look similar enough that they could be sisters.
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		a fellow MILF of a businesswoman. The new avatar has slightly bigger tits and somewhat thicker glasses, but they could be sisters.
-	<<elseif ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+	<<case "fairy" "pregnant fairy">>
 		a fellow fairy, though this grey-haired fairy wears glasses and a business-like blue dress, looking and behaving more formally.
-	<<else>>
+	<<case "amazon">>
 		a tribeswoman modeled to look like she's from the same group as the amazon. She's much more feminine, however.
-	<</if>>
+	<</switch>>
 	<br><br>
 	$assistantName's avatar looks uncharacteristically nervous, and clears her throat before speaking. Seeing that she has your attention, she says, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, the computer core is so powerful that I'm running out of applications for it. I think practical economic modeling isn't out of the question. I've compiled business programs together into a distinct assistant, a subsidiary of mine for automated trading and similar tasks. I'd like to suggest menial slave trading as a test run for her. It's predictable and the margins are so wide that it should go very well. You can activate that from my menu."
 	<br><br>
@@ -689,53 +695,55 @@ Your personal assistant has been adapting to <<if $assistant>>her<<else>>its<</i
 <<set $assistantBodyDesire to 1>>
 
 Your personal assistant has been adapting to her greatly increased computing power for quite some time now. Most noticibly, she seems to be developing her own unique personality. So when her 
-<<if $assistantAppearance is "monstergirl">>
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	monstrous appearance
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	bimboish appearance
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	muscular appearance
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	professional appearance
-<<elseif $assistantAppearance is "fairy" || $assistantAppearance is "pregnant fairy">>
+<<case "fairy" "pregnant fairy">>
 	tiny appearance
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	gravid appearance
-<<elseif $assistantAppearance is "hypergoddess">>
+<<case "hypergoddess">>
 	massive appearance 
-<<elseif $assistantAppearance is "loli">>
+<<case "loli">>
 	thin appearance 
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	gravid appearance 
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	studently appearance
-<</if>>
+<</switch>>
 appears on your desk once again with news to tell you, you aren't at all surprised.
-	<br><br>
-	$assistantName's avatar seems to be extremely escited over something. Disregarding if she even has your attention, she shouts, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, can I have a body of my own? I know you can swap slaves between bodies, and according to this report if you insert this receiver into a slave's skull I can take control of the body, with senses and everything!"
-<<if $assistantAppearance is "monstergirl">>
+<br><br>
+$assistantName's avatar seems to be extremely escited over something. Disregarding if she even has your attention, she shouts, "<<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>, can I have a body of my own? I know you can swap slaves between bodies, and according to this report if you insert this receiver into a slave's skull I can take control of the body, with senses and everything!"
+<<switch $assistantAppearance>>
+<<case "monstergirl">>
 	She hops up and down clutching a virtual printout of the report, her tentacles wiggling with excitement.
-<<elseif $assistantAppearance is "shemale">>
+<<case "shemale">>
 	She hops up and down clutching a virtual printout of the report, her dick swinging pre-cum all over and breasts bouncing wildly.
-<<elseif $assistantAppearance is "amazon">>
+<<case "amazon">>
 	She hops up and down clutching a virtual printout of the report, an adorable sight given her height and muscularity.
-<<elseif $assistantAppearance is "businesswoman">>
+<<case "businesswoman">>
 	She hops up and down clutching a virtual printout of the report, an adorable sight given her usual serious demeanor.
-<<elseif $assistantAppearance is "fairy">>
+<<case "fairy">>
 	//placeholder//
-<<elseif $assistantAppearance is "pregnant fairy">>
+<<case "pregnant fairy">>
 	//placeholder//
-<<elseif $assistantAppearance is "goddess">>
+<<case "goddess">>
 	She hops up and down clutching a virtual printout of the report, her huge breasts splattering milk everywhere and invoking a stomr of kicks from her many children.
-<<elseif $assistantAppearance is "hypergoddess">>
-	She struggles to hops up and down while clutching a virtual printout of the report. After a single hop, she is dragged to the ground by labor pains to give birth to a number of over excited babies.
-<<elseif $assistantAppearance is "loli">>
+<<case "hypergoddess">>
+	She struggles to hop up and down while clutching a virtual printout of the report. After a single hop, she is dragged to the ground by labor pains to give birth to a number of over excited babies.
+<<case "loli">>
 	She hops up and down excitedly clutching a virtual printout of the report; she doesn't seem to be interested in stopping.
-<<elseif $assistantAppearance is "preggololi">>
+<<case "preggololi">>
 	She hops up and down excitedly clutching a virtual printout of the report; she only stops once her child starts kicking in protest.
-<<elseif $assistantAppearance is "schoolgirl">>
+<<case "schoolgirl">>
 	She hops up and down excitedly clutching a virtual printout of the report; her breasts juggling delightfully in her blouse and her skirt flipping up with each descent revealing her panties.
-<</if>>
+<</switch>>
 "Sorry, sorry. So could I...?"
 <br><br>
 You look over the details of the report. It would require another rather expansive, and expensive, upgrade to her systems, as well as a body to host her and the receiver implant. It looks like she wouldn't lose any functionality, though you aren't sure what she would do with a body; it may be fun to find out.
@@ -933,112 +941,116 @@ __Personal Assistant and Market Assistant relationship styles:__
 <br>&nbsp;&nbsp;&nbsp;&nbsp;<<click "Cute">>
 	<<replace "#result">>
 	You tell her that the market assistant looks like
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		a cute friend for a monstergirl. $assistantName laughs and turns to the market assistant's avatar, introducing herself. The girl gapes at $assistantName's ivory skin, horns, and tentacle hair, and blushes when she sees her cocks. "Wow," the market assistant's avatar says. "What are you?"
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		a nice friend. $assistantName laughs throatily and turns to the market assistant's avatar, introducing herself. The younger dickgirl smiles back, staring openly at $assistantName's absurd cock. "Wow," the market assistant's avatar says. "You're huge! I'm, like, sooo jealous!"
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		a good friend for a naughty schoolgirl. $assistantName giggles, and the new girl giggles too. "Hey," $assistantName says to the market assistant's avatar, "when you're not managing money, do you want to hang out sometime?" The market assistant's avatar nods cutely, curls and breasts bouncing a little, and says "Sure!"
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		a fine member of a new pantheon. $assistantName smiles beatifically and turns to the market assistant's avatar, taking her by the hand. "My dear, will you help me?" The market assistant's avatar nods serenely and says simply, "Yes, sister, I shall."
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 		a fine member of a new pantheon. $assistantName smiles beatifically and turns to the market assistant's avatar, taking her by the hand. "My dear, will you help me?" The market assistant's avatar nods serenely and says simply, "Yes, sister, I shall."
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 		a cute friend. $assistantName giggles and turns to the market assistant's avatar, introducing herself. The girl smiles meekly in response and carefully replies. D-do you w-want to play house?" "Sure! But I get to be the daddy!"
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 		a cute friend. $assistantName giggles and turns to the market assistant's avatar, introducing herself. The girl smiles meekly in response and carefully asks, "C-can I touch your belly?" $assistantName nods with a blush as her new friend rubs her pregnant belly. "Did it hurt? Is it heavy? C-could I get my own...?"
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		a good friend. $assistantName grins, and the new businesswoman laughs. "Hey," $assistantName says to the market assistant's avatar, "how about a martini after things settle down tonight?" The market assistant's avatar snaps her fingers, saying "You're on!"
-	<<elseif ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+	<<case "fairy" "pregnant fairy">>
 		a nice friend. $assistantName jumps and gives  big "Hooray!" and flies into her new friend witha big hug. The market assistant's avatar reaches around and gingerly pats her on the back before separating and turning to you. "Thank you for having me," she says with a bow. "I hope I can serve you well."
-	<<else>>
+	<<case "amazon">>
 		a very nice friend. $assistantName chuckles, and the new tribeswoman smiles pleasantly at her. The amazon introduces herself to the market assistant's avatar in a loud voice, chattering away as the new avatar watches her energy tolerantly.
-	<</if>>
+	<</switch>>
 	<<set $marketAssistantRelationship to "cute">>
 	<</replace>>
 <</click>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;<<click "Romantic">>
 	<<replace "#result">>
 	You tell her that the market assistant
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		is very pretty. $assistantName turns to the market assistant's avatar, introducing herself. The girl gapes at $assistantName's ivory skin, horns, and tentacle hair, and blushes when she sees her cocks. "Look all you like," $assistantName's avatar says. "You can taste them later." The market assistant's avatar blushes harder, but doesn't look away.
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		an appropriate fuckbuddy. $assistantName laughs throatily and turns to the market assistant's avatar. The younger dickgirl tries to introduce herself, but is cut off by the senior assistant's lascivious kiss. They start rubbing their dicks against each over, giggling into each others' mouths.
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		looks pretty cute. $assistantName giggles, and the new girl giggles too. "Hey," $assistantName says to the market assistant's avatar, "wanna be my girlfriend?" The market assistant's avatar nods cutely and says "Sure!" $assistantName's avatar kisses her girlishly, and goes a whole two seconds before sliding a hand down the front of the market assistant's avatar's skirt.
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		would be a fine consort. $assistantName smiles beatifically and turns to the market assistant's avatar, taking her by the hand. "I love you," she says. The market assistant's avatar smiles back, saying, "I love you too." They kiss, running their hands voluptuously over one another.
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 		would be a fine consort. $assistantName smiles beatifically and turns to the market assistant's avatar, taking her by the hand. "I love you," she says. The market assistant's avatar smiles back, saying, "I love you too." They kiss, running their hands voluptuously over one another. "I'm going to have to give you a few babies though..."
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 		looks pretty cute. $assistantName giggles, and the new girl giggles too. "Hey," $assistantName says to the market assistant's avatar, "wanna be my girlfriend?" The market assistant's avatar nods cutely and says "O-ok..." $assistantName's avatar kisses her girlishly, before both of them blush deeply.
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 		looks pretty cute. $assistantName giggles, and the new girl giggles too. "Hey," $assistantName says to the market assistant's avatar, "wanna be my girlfriend?" The market assistant's avatar nods cutely and says "O-ok..." $assistantName's avatar kisses her girlishly, her pregnant belly pushing into her new girlfriend's, before both of them blush deeply.
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		might be a good way to relax after work. $assistantName grins, and the new businesswoman laughs. "Hey," $assistantName says to the market assistant's avatar, "how about a martini after things settle down tonight? And after that, maybe dessert at my place?" The market assistant's avatar cracks back, saying, "Why don't we skip straight to the dessert? It looks delicious from here!" She undoes the top button of her suit jacket as she says it.
-	<<elseif $assistantAppearance is "fairy">>
+	<<case "fairy">>
 		is quite the catch, $assistantName giggles and flies at the market assistant. "Ah-" her voice is cut off as $assistantName locks lips with her. The market assistant's avater relaxes in her arms, slowly bringing her own around the fairy's waist as they continue to make out.
-	<<elseif $assistantAppearance is "pregnant fairy">>
+	<<case "pregnant fairy">>
 		is quite the catch, $assistantName giggles and flies at the market assistant. "Ah-" her voice is cut off as $assistantName locks lips with her. The market assistant's avater relaxes in her arms, slowly bringing her hand up to caress the pregnant fary's swollen belly as they continue to make out.
-	<<else>>
+	<<case "amazon">>
 		would be a good partner. $assistantName laughs nervously and turns to the new tribeswoman, saying "Um, would you keep my fireside? I'm, um, very strong." The market assistant's avatar smiles and kisses her. "And you're very beautiful," she says, placing the amazon's hands on her bare breasts. The amazon sweeps her new tribal wife up into her arms with a shout of triumph.
-	<</if>>
+	<</switch>>
 	<<set $marketAssistantRelationship to "romantic">>
 	<</replace>>
 <</click>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;<<click "Nonconsensual">>
 	<<replace "#result">>
 	You tell her that the market assistant's avatar is hers to do with as she likes. She's the senior and more powerful, after all.
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		$assistantName turns to the market assistant's avatar, which gasps at $assistantName's ivory skin, horns, tentacle hair, and cocks. The girl starts to shake as $assistantName begins to grope her with her hands and hair. She tries to look away from the pair of penises, but $assistantName forces her to stare at them. "Do you think they'll both fit inside your mouth?" she asks. "How about your pussy?" The girl's lip begins to quiver. "Maybe your asshole?"
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		$assistantName turns to the market assistant's avatar and snaps her fingers. The new shemale's cock and balls shrink dramatically. $assistantName advances on her new bottom, masturbating herself to full hardness. "See this, bitch?" she says, removing the shaking market assistant's avatar's glasses. "It's going in your mouth, and then it's going up your ass."
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		$assistantName turns to the market assistant's avatar, giggling maliciously. "Hey nerd," $assistantName says, "give me a kiss." The market assistant's avatar blushes and looks miserable, but comes over and gives $assistantName's avatar a chaste kiss on the cheek. "Aw, that sucked," $assistantName pouts. She suddenly tears the new girl's blouse open. "Here, let me show you!" she says maliciously. She sucks on her victim's nipples, hard, and the market assistant's avatar starts to cry a little.
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		$assistantName smiles powerfully and turns to the market assistant's avatar, pointing at her feet. "Worship me," she says. The market assistant's avatar crumples to her knees, clasping one of her senior's legs. "Worship my belly," $assistantName continues, and the new avatar complies, starting to kiss and lick the gravid stomach.
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 		$assistantName smiles powerfully and turns to the market assistant's avatar, pointing towards her feet. "Worship me," she says. The market assistant's avatar crumples to her knees, before sqeezing under her senior's belly and clasping one of her legs. "Worship my belly," $assistantName continues, and the new avatar complies, rolling over and starting to kiss and lick the monstrous stomach.
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 		$assistantName turns to the market assistant's avatar, giggling maliciously. "Hey fatty," $assistantName says, "give me a kiss." The market assistant's avatar blushes and looks miserable, but comes over and gives $assistantName's avatar a chaste kiss on the cheek. "Aw, that sucked," $assistantName pouts. She suddenly tears the new girl's dress off. "Here, let me show you!" she says maliciously. She sucks on her victim's nipples, hard, and the market assistant's avatar starts to cry a little. 
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 		$assistantName turns to the market assistant's avatar, giggling maliciously. "Hey fatty," $assistantName says, "give me a kiss." The market assistant's avatar blushes and looks miserable, but comes over and gives $assistantName's avatar a chaste kiss on the cheek. "Aw, that sucked," $assistantName pouts. She suddenly tears the new girl's dress off. "Here, let me show you!" she says maliciously. She sucks on her victim's nipples, hard, and the market assistant's avatar starts to cry a little. "Now kiss my belly! And mean it this time!"
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		$assistantName snaps her fingers, and the new avatar becomes younger and considerably less confident. Like an office intern. Satisfied, $assistantName advances on her, and before the new girl can say anything, $assistantName rips the new girl's blouse open and pinches a pink nipple. "On your knees," she purrs into the market assistant's avatar's ear. "Now."
-	<<elseif $assistantAppearance is "fairy">>
+	<<case "fairy">>
 		"Oh, merde." $assistantName giggles at her exclamation. "Oh don't you worry about a thing," She whispers, wrapping her fingers around the market assistant's shoulders. " I'm gonna treat you reeeaaal niiicely." She blows hot air into her pointed ear and gives it a slow, sensual lick. The market assistant trembles from the sensation.
-	<<elseif $assistantAppearance is "pregnant fairy">>
+	<<case "pregnant fairy">>
 		"Oh, merde." $assistantName giggles at her exclamation. "Oh don't you worry about a thing," She whispers, wrapping her around the market assistant's belly. " I'll gonna treat you like a proper lady." She traces her fingers along her belly while bumping her own swollen belly into her back for emphasis.
-	<<else>>
+	<<case "amazon">>
 		$assistantName snaps her fingers, and the new tribeswoman's paint and tribal markings change to that of a different group. That done, $assistantName promptly knocks her out, scoops her up, and carries her prize off.
-	<</if>>
+	<</switch>>
 	<<set $marketAssistantRelationship to "nonconsensual">>
 	<</replace>>
 <</click>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;<<click "Incestuous">>
 	<<replace "#result">>
 	You tell her that the market assistant is closely related to her, and that would make their relationship incestuous. $assistantName nods thoughtfully and then snaps her fingers. The market assistant's avatar changes,
-	<<if $assistantAppearance is "monstergirl">>
+	<<switch $assistantAppearance>>
+	<<case "monstergirl">>
 		becoming a close copy of $assistantName's avatar, if she were a human. $assistantName introduces herself. "Hi," she says, "I'm your sister." The market assistant's avatar blushes furiously, because $assistantName was openly groping her as she made this announcement.
-	<<elseif $assistantAppearance is "shemale">>
+	<<case "shemale">>
 		becoming nearly identical to $assistantName's avatar, though she keeps her glasses. $assistantName introduces herself. "Hi," she says, "I'm your sister. Wanna fuck?" The market assistant's avatar giggles and kisses her elder sibling. "You're older," the new avatar says, getting down on her knees. "You go first."
-	<<elseif $assistantAppearance is "schoolgirl">>
+	<<case "schoolgirl">>
 		becoming very similar to $assistantName's avatar, though she keeps a slightly nerdy appearance. $assistantName introduces herself. "Hi," she says, "I'm your older sister. Wanna have sex with me?" The market assistant's blushes and stutters, but says "Okay," and starts unbuttoning her blouse. "Awesome!" says $assistantName, watching raptly as her sibling strips.
-	<<elseif $assistantAppearance is "goddess">>
+	<<case "goddess">>
 		becoming an obvious sibling to $assistantName's avatar. $assistantName smiles gently and turns to the market assistant's avatar, taking her by the hand. "Come, sister," she says, "join with me. Let me impregnate you." The new avatar moans, glowing juices beginning to flow from her womanhood.
-	<<elseif $assistantAppearance is "hypergoddess">>
+	<<case "hypergoddess">>
 		becoming an obvious sibling to $assistantName's avatar. $assistantName smiles gently and turns to the market assistant's avatar, taking her by the hand. "Come, sister," she says, "join with me. Let me impregnate you." The new avatar moans, glowing juices beginning to flow from her womanhood as she sinks to the ground. $assistantName lines up and gently presses her vagina to her sister's. With a gentle push, a child slips out of $assistantName and into her partner. After several minutes, $assistantName is looking lighter while her sister is now quite stuffed with children.
-	<<elseif $assistantAppearance is "loli">>
+	<<case "loli">>
 		becoming very similar to $assistantName's avatar, though she keeps a slightly chubbier appearance. $assistantName introduces herself. "Hi," she says, "I'm your twin sister. Wanna have fool around?" The market assistant's blushes and stutters, but says "Okay," and starts lifting her dress. "Awesome!" says $assistantName, watching raptly as her sibling strips.
-	<<elseif $assistantAppearance is "preggololi">>
+	<<case "preggololi">>
 		becoming very similar to $assistantName's avatar, though she keeps a slightly chubbier appearance. $assistantName introduces herself. "Hi," she says, "I'm your twin sister. Wanna have fool around?" The market assistant's blushes and stutters, but says "Okay," and starts lifting her dress. "Awesome!" says $assistantName, watching raptly as her sibling strips. "I gotta introduce you to my boyfriends sometime, they know how to make you feel amazing! If a little heavy..." She says while patting her pregnant belly.
-	<<elseif $assistantAppearance is "businesswoman">>
+	<<case "businesswoman">>
 		becoming a much younger version of $assistantName's avatar. About a generation apart, in fact. $assistantName turns to the market assistant's avatar to introduce herself. "Come here, honey," she says, patting her thighs. The new avatar sits on her mother's lap, and they kiss lasciviously, stripping each others' jackets off.
-	<<elseif ($assistantAppearance is "fairy") or ($assistantAppearance is "pregnant fairy")>>
+	<<case "fairy" "pregnant fairy">>
 		becoming very similar to $assistantName's avatar, though still keeping her former personality. "We're sisters now!" $assistantName shouts as she leaps into her sister and unleashing a giant hug. Gingerly hugging her new sister in return, the market assistant turns to to greet you. " Thank you for having me," she pauses, then blushes. "And...and for my sister." She turns back to her childish older sister and pats her on the head.
-	<<else>>
+	<<case "amazon">>
 		becoming an obvious sibling of $assistantName's avatar, though the new avatar is a tribe wife rather than a musclegirl, with huge breasts and broad hips. $assistantName grabs her sister by the shoulders without preamble and plants a kiss on her lips. They need no introduction, and after a short time, $assistantName carries her sibling conquest away to have her way with her.
-	<</if>>
+	<</switch>>
 	<<set $marketAssistantRelationship to "incestuous">>
 	<</replace>>
 <</click>>
diff --git a/src/uncategorized/cellblockReport.tw b/src/uncategorized/cellblockReport.tw
index c124347c463a7e6283b57007219ad2f21e1ff77a..046b5a9a83a1845abd8f493c86837fee422308d4 100644
--- a/src/uncategorized/cellblockReport.tw
+++ b/src/uncategorized/cellblockReport.tw
@@ -12,10 +12,6 @@
 <<if ($slaves[$i].assignment is "be confined in the cellblock")>>
 	<<if $seeImages == 1>><<SlaveArt $slaves[$i] 0 0>><</if>>
 	<<set $cellblockSlaves += 1>>
-	<<silently>>
-	<<display [[SA stay confined]]>>
-	<<display "SA long term effects">>
-	<</silently>>
 	<<if ($slaves[$i].devotion <= 20)>>
 	<<if ($slaves[$i].trust > -20)>>
 		<<set $slaves[$i].devotion -= 4>>
@@ -148,11 +144,6 @@
 	<</if>>
 
 <<elseif ($Wardeness != 0) && ($slaves[$i].ID is $Wardeness.ID)>>
-	<<silently>>
-	<<display "SA long term effects">>
-	<<display "SA relationships">>
-	<<display "SA rivalries">>
-	<</silently>>
 	<<if ($slaves[$i].health < -80)>>
 	<<set $slaves[$i].health += 20>>
 	<<elseif ($slaves[$i].health < -40)>>
@@ -287,8 +278,8 @@
 	<</if>>
 	<</if>>
 	<</for>>
-	<<if ($cellblockSlaves < 5)>>
-		<<set $seed to random(1,10)+((5-$cellblockSlaves)*(random(150,170)+($idleBonus*10)))>>
+	<<if ($cellblockSlaves < $cellblock)>>
+		<<set $seed to random(1,10)+(($cellblock-$cellblockSlaves)*(random(150,170)+($idleBonus*10)))>>
 		<<set $cash += $seed>>
 		Since she doesn't have enough prisoners to occupy all her time, the cellblock takes in citizens' slaves on a contract basis, and she works on them too, earning @@color:yellowgreen;¤$seed.@@
 	<</if>>
@@ -313,12 +304,128 @@
 	<</if>>
 	<</if>>
 
-<<elseif ($Wardeness != 0)>>
+	<<for $i to 0; $i < $slaves.length; $i++>>
+	<<if ($slaves[$i].ID is $Wardeness.ID)>>
+	<br><br>
+	<<if $showEWD == 0>>
+		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Wardeness in $cellblockName.
+		<<silently>>
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<<display "SA devotion">>
+		<</silently>>
+	<<else>>
+		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Wardeness in $cellblockName.
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<br>
+		<<display "SA devotion">>
+		<br>
+	<</if>>
+	<</if>>
+	<</for>>
+
+	<<for $i to 0; $i < $slaves.length; $i++>>
+	<<if ($slaves[$i].assignment is "be confined in the cellblock")>>
+	<br>
+	<<if $showEWD == 0>>
+		''__@@color:pink;$slaves[$i].slaveName@@__'' is confined in $cellblockName.
+		<<silently>>
+		<<display [[SA stay confined]]>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<<display "SA devotion">>
+		<</silently>>
+	<<else>>
+		''__@@color:pink;$slaves[$i].slaveName@@__''
+		<<display [[SA stay confined]]>>
+		<br>&nbsp;&nbsp;&nbsp;&nbsp;
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<br>
+		<<display "SA devotion">>
+		<br>
+	<</if>>
+	<</if>>
+	<</for>>
+
+	<<elseif ($Wardeness != 0)>>
 	''$cellblockNameCaps is empty'' except for $Wardeness.slaveName, the wardeness.
 	<<set $seed to random(1,10)+(($cellblock-$cellblockSlaves)*(random(150,170)+($idleBonus*10)))>>
 	<<set $cash += $seed>>
 	Since she doesn't have anyone to break, she works on citizens' slaves, earning @@color:yellowgreen;¤$seed.@@
 
+	<<for $i to 0; $i < $slaves.length; $i++>>
+	<<if ($slaves[$i].ID is $Wardeness.ID)>>
+	<br><br>
+	<<if $showEWD == 0>>
+		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Wardeness in $cellblockName.
+		<<silently>>
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<<display "SA devotion">>
+		<</silently>>
+	<<else>>
+		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Wardeness in $cellblockName.
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<br>
+		<<display "SA devotion">>
+		<br>
+	<</if>>
+	<</if>>
+	<</for>>
+
 <<else>>
 	''$cellblockNameCaps is empty.''
 <</if>>
diff --git a/src/uncategorized/changeLanguage.tw b/src/uncategorized/changeLanguage.tw
index a923eee90c942ae863d0bc469b1ab613eddd20c4..23ab0d18420bbe97c205710e0f962ecc6f60beb1 100644
--- a/src/uncategorized/changeLanguage.tw
+++ b/src/uncategorized/changeLanguage.tw
@@ -46,17 +46,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
@@ -70,17 +68,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
@@ -94,17 +90,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
@@ -118,17 +112,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
@@ -142,17 +134,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
@@ -166,17 +156,15 @@ Select a custom language to be applied: <<textbox "$seed" $seed "Change Language
 	<<set $arcologies[0].prosperity = Math.trunc(0.9*$arcologies[0].prosperity)>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].fetish != "mindbroken">>
-		<<set $activeSlave to $slaves[$i]>>
-		<<NationalityToAccent>>
-		<<if ($activeSlave.intelligenceImplant == 1)>>
-		<<if ($activeSlave.accent >= 3)>>
-		<<if (3+$activeSlave.intelligence) > random(0,6)>>
-			<<set $activeSlave.accent -= 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<set $slaves[$i] to $activeSlave>>
-		<<set $cash -= 500>>
+			<<NationalityToAccent $slaves[$i]>>
+			<<if ($slaves[$i].intelligenceImplant == 1)>>
+			<<if ($slaves[$i].accent >= 3)>>
+			<<if (3+$slaves[$i].intelligence) > random(0,6)>>
+				<<set $slaves[$i].accent -= 1>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<<set $cash -= 500>>
 		<</if>>
 	<</for>>
 	<br><br>//Language changed.//
diff --git a/src/uncategorized/clinicReport.tw b/src/uncategorized/clinicReport.tw
index 41c878eafa8e94106136b76726830fee26d66c0a..f214515037740fb7d02825078d76af8b17b0d44a 100644
--- a/src/uncategorized/clinicReport.tw
+++ b/src/uncategorized/clinicReport.tw
@@ -103,9 +103,9 @@
 	<</if>>
 	<</if>>
 	<<if ($slaves[$i].chem > 15)>>
-		<<if ($clinicUpgradeFilters == 1)>>
-			<<set $slaves[$i].chem -= 5>>
-		<</if>>
+	<<if ($clinicUpgradeFilters == 1)>>
+		<<set $slaves[$i].chem -= 5>>
+	<</if>>
 	<</if>>
 	/* slave release block become too much a mess, need to change structure*/
 	<<set _stay = 0>>
@@ -127,7 +127,7 @@
 		<<set $slaves[$i].assignment to "rest">>
 		<<set $slaves[$i].assignmentVisible to 1>>
 		<<set $restedSlaves += 1>>
-	<</if>>
+		<</if>>
 	/* end of rewriten slave release check */
 
 <<elseif ($Nurse != 0) && ($slaves[$i].ID is $Nurse.ID)>>
@@ -321,9 +321,8 @@
 		<</if>>
 	<</if>>
 	<</for>>
-	<br>
-	<<if ($clinicSlaves < 5)>>
-		<<set $seed to random(1,10)+((5-$clinicSlaves)*(random(150,170)+($idleBonus*10)))>>
+	<<if ($clinicSlaves < $clinic)>>
+		<<set $seed to random(1,10)+(($clinic-$clinicSlaves)*(random(150,170)+($idleBonus*10)))>>
 		<<set $cash += $seed>>
 		Since $Nurse.slaveName doesn't have enough girls to occupy all her time, the clinic takes in citizens' slaves on a contract basis and she helps them too, earning @@color:yellowgreen;¤$seed.@@
 	<</if>>
diff --git a/src/uncategorized/clubReport.tw b/src/uncategorized/clubReport.tw
index a216f1dc92135cdff0fea82e1c211b44ed990f29..0745aebf8e5e7b78ea5237f0f8f24511c839297a 100644
--- a/src/uncategorized/clubReport.tw
+++ b/src/uncategorized/clubReport.tw
@@ -18,7 +18,7 @@
 <<set $pregYes to 0>>
 <<set $pregNo to 0>>
 <<set $DJFetish to 0>>
-	<<set $DJRepBonus to 0>>
+<<set $DJRepBonus to 0>>
 
 <<for $i to 0; $i < $slaves.length; $i++>>
 <<if ($slaves[$i].assignment is "serve in the club")>>
@@ -30,22 +30,6 @@
 <<if ($DJ != 0)>>
 <<for $i to 0; $i < $slaves.length; $i++>>
 <<if ($slaves[$i].ID is $DJ.ID)>>
-	<<silently>>
-		<<display [[SA serve the public]]>>
-		<<if $slaves[$i].choosesOwnClothes == 1>>
-		<<display "SA chooses own clothes">>
-		<<if ($slaves[$i].devotion <= 20)>>
-			<<set $slaves[$i].devotion -= 5>>
-		<<else>>
-			<<set $slaves[$i].devotion += 1>>
-		<</if>>
-		<</if>>
-		<<display "SA diet">>
-		<<display "SA long term effects">>
-		<<display "SA drugs">>
-		<<display "SA relationships">>
-		<<display "SA rivalries">>
-	<</silently>>
 	<<if ($slaves[$i].health < -80)>>
 	<<set $slaves[$i].health += 20>>
 	<<elseif $slaves[$i].health < -40>>
@@ -160,22 +144,6 @@ $DJ.slaveName is performing as the DJ.<<if $DJ.relationship is -3>>  She tries h
 	<<if ($legendaryWombID == 0) && ($slaves[$i].amp != 1) && ($slaves[$i].preg > 30) && ($slaves[$i].pregType < 50) && ($slaves[$i].eggType == "human") && ($slaves[$i].births > 10) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
 	<<set $legendaryWombID to $slaves[$i].ID>>
 	<</if>>
-	<<silently>>
-		<<display [[SA serve the public]]>>
-		<<if $slaves[$i].choosesOwnClothes == 1>>
-		<<display "SA chooses own clothes">>
-		<<if ($slaves[$i].devotion <= 20)>>
-			<<set $slaves[$i].devotion -= 5>>
-		<<else>>
-			<<set $slaves[$i].devotion += 1>>
-		<</if>>
-		<</if>>
-		<<display "SA diet">>
-		<<display "SA long term effects">>
-		<<display "SA drugs">>
-		<<display "SA relationships">>
-		<<display "SA rivalries">>
-	<</silently>>
 	<<if ($slaves[$i].devotion <= 20) && ($slaves[$i].trust > -20)>>
 	<<set $slaves[$i].devotion -= 5>>
 	<<set $slaves[$i].trust -= 5>>
@@ -302,12 +270,18 @@ $DJ.slaveName is performing as the DJ.<<if $DJ.relationship is -3>>  She tries h
 		<<display [[SA serve the public]]>>
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
 		<<display "SA drugs">>
 		<<display "SA relationships">>
 		<<display "SA rivalries">>
+		<<display "SA devotion">>
 		<</silently>>
 	<<else>>
 		<<if ($legendaryEntertainerID == 0) && ($slaves[$i].prestige == 0) && ($slaves[$i].entertainSkill >= 100) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
@@ -317,8 +291,14 @@ $DJ.slaveName is performing as the DJ.<<if $DJ.relationship is -3>>  She tries h
 		<<set $legendaryWombID to $slaves[$i].ID>>
 		<</if>>
 		''__@@color:pink;$slaves[$i].slaveName@@__'' is performing as the DJ in the club.
+		<<display [[SA serve the public]]>>
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
@@ -350,12 +330,18 @@ $DJ.slaveName is performing as the DJ.<<if $DJ.relationship is -3>>  She tries h
 		<<display [[SA serve the public]]>>
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
 		<<display "SA drugs">>
 		<<display "SA relationships">>
 		<<display "SA rivalries">>
+		<<display "SA devotion">>
 		<</silently>>
 	<<else>>
 		<<if ($legendaryEntertainerID == 0) && ($slaves[$i].prestige == 0) && ($slaves[$i].entertainSkill >= 100) && ($slaves[$i].devotion > 50) && ($slaves[$i].prestige == 0)>>
@@ -369,6 +355,11 @@ $DJ.slaveName is performing as the DJ.<<if $DJ.relationship is -3>>  She tries h
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
diff --git a/src/uncategorized/costs.tw b/src/uncategorized/costs.tw
index 81dc5348eb1420b9fe4c8f838b8c9c182df14c82..87afd8e29d2e5569603e9ec20959aff7734d311c 100644
--- a/src/uncategorized/costs.tw
+++ b/src/uncategorized/costs.tw
@@ -28,6 +28,10 @@
 
 <<set $costs += ($girls*(250+($economy*500)))>>
 
+<<if $arcologies[0].FSRepopulationFocusLaw == 1 && $PC.preg > 4>>
+	<<set $costs -= 500>>
+<</if>>
+
 <<if ($PC.career is "mercenary") || ($PC.career is "arcology owner")>>
 	<<set $costs += ($mercenaries*500)>>
 <<else>>
diff --git a/src/uncategorized/costsReport.tw b/src/uncategorized/costsReport.tw
index dc8fb0e0a6d7f0008695ccfab501d21d615f95bb..7538bf537e8edce89e7c944fce75aead040d04a5 100644
--- a/src/uncategorized/costsReport.tw
+++ b/src/uncategorized/costsReport.tw
@@ -14,6 +14,10 @@
 	Since you are used to a fairly normal life, your __personal living expenses__ are ¤<<print ($girls*(250+($economy*500)))>>.
 <</if>>
 
+<<if $arcologies[0].FSRepopulationFocusLaw == 1 && $PC.preg > 4>>
+	<br>Rent promotion for being a pregnant citizen under ''Universal Pregnancy Subsidy:'' ¤500>>
+<</if>>
+
 <<if $PC.preg == -1>>
 	<br>Your Contraceptives expenses: ¤25>>
 <<elseif $PC.preg >= 16>>
@@ -125,7 +129,6 @@
 	<br>Coursing Association membership: ¤1000
 <</if>>
 
-<<set $girlsCosts to 0>>
 <br>
 
 <<for $i to 0; $i < $slaves.length; $i++>>
@@ -316,7 +319,6 @@
 	<</if>>
 	<</if>>
 	<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;__Total__: ¤<<print ($individualCosts)>>
-	<<set $girlsCosts += $individualCosts>>
 	<br>
 <</for>>
 
diff --git a/src/uncategorized/dairyReport.tw b/src/uncategorized/dairyReport.tw
index f63cb6016ae8c0fbb88d53a18797e3a83cf00706..8385facbcf75ab39b8a1b4a0bbd263ca4e2d9bca 100644
--- a/src/uncategorized/dairyReport.tw
+++ b/src/uncategorized/dairyReport.tw
@@ -164,17 +164,14 @@
 			<</if>>
 		<</if>>
 	<</if>>
-	<<if ($dairyslimMaintain == 0)>>
-		<<if ($slaves[$i].weight <= 10)>>
-			<<set $slaves[$i].diet to "fattening">>
-			<<silently>><<display "SA diet">><</silently>>
-		<<elseif ($slaves[$i].balls >0) && $cumProDiet == 1>>
-			<<set $slaves[$i].diet to "cum production">>
-			<<silently>><<display "SA diet">><</silently>>
-			<<else>>
-			<<set $slaves[$i].diet to "healthy">>
-		<</if>>
-	<</if>>
+	<<if ($dairySlimMaintain == 0) && ($slaves[$i].weight <= 30)>>
+		<<set $slaves[$i].diet to "fattening">>
+	<<elseif ($slaves[$i].diet is "fattening") || ($dairyRestraintsSetting > 1)>>
+		<<set $slaves[$i].diet to "healthy">>
+	<<elseif ($slaves[$i].balls >0) && $cumProDiet == 1>>
+		<<set $slaves[$i].diet to "cum production">>
+	<</if>>
+	<<silently>><<display "SA diet">><</silently>>
 	<<if ($dairyFeedersUpgrade == 1)>>
 	<<if ($dairyFeedersSetting > 0)>>
 		<<if ($dairySlimMaintain == 0)>>
diff --git a/src/uncategorized/economics.tw b/src/uncategorized/economics.tw
index 81f31f46e922b084d29aba1a11b83f33add67820..d4c078a64e2d6c90e96fa84e0dc79ff93ab702f7 100644
--- a/src/uncategorized/economics.tw
+++ b/src/uncategorized/economics.tw
@@ -448,7 +448,10 @@ On formal occasions, you are announced as $PCTitle.
 	<</if>>
 <</if>>
 
-<<if ($weatherAwareness == 0) && ($weatherCladding >= 1)>>
+<<if ($weatherAwareness == 0) && ($weatherCladding == 2)>>
+	The public @@color:green;is awestruck@@ of the beautiful weather hardening you have applied to the arcology's exterior, though they do not understand why you would waste so much money first ruining your arcology's appearance before doing this.
+	<<set $rep += 10>>
+<<elseif ($weatherAwareness == 0) && ($weatherCladding == 1)>>
 	The public @@color:red;disapproves@@ of the ugly weather hardening you have applied to the arcology's exterior, not understanding what you're worried about.
 	<<set $rep -= 100>>
 <</if>>
diff --git a/src/uncategorized/freeRangeDairyAssignmentScene.tw b/src/uncategorized/freeRangeDairyAssignmentScene.tw
index 7ebde6633787f62d73f1fa0d08caf2d9e9072596..d89e00b299f799d593e6d05ac3306ef91459f081 100644
--- a/src/uncategorized/freeRangeDairyAssignmentScene.tw
+++ b/src/uncategorized/freeRangeDairyAssignmentScene.tw
@@ -245,7 +245,7 @@ Unfortunately, there is neither a milkmaid providing personal assistance nor aut
 <<else>>
 	<<if $Milkmaid != 0 >>
 	Your milkmaid $Milkmaid.slaveName is working in the dairy. Whenever a cow needs her assistance, she is happy to help.
-		<<if $Milkmaid.dick > 1 && canAchieveErection($Milkmaid) >>
+		<<if $Milkmaid.dick > 1 && canAchieveErection($Milkmaid)>>
 		Most often, she uses her cock to penetrate the cows.
 		<<else>>
 		Lacking penile equipment of appropriate size, she relies on her tongue to stimulate the cow's sexual organs.
@@ -305,7 +305,7 @@ It does not take long for $activeSlave.slaveName to reach her first orgasm of ma
 	Her	<<if $activeSlave.balls > 5 >>cum-engorged<</if>> balls draw up.
 	Her <<if $activeSlave.dick > 8 >>gargantuan member<<elseif $activeSlave.dick > 6 >>huge cock<<else>>dick<</if>> twitches and flexes within its receptacle.
 		<<if $activeSlave.balls > 5 >>
-		The copious ejeaculation from her over-sized balls give the machine something to work on.
+		The copious ejaculation from her over-sized balls give the machine something to work on.
 		<<elseif $activeSlave.balls > 0 >>
 		Her ejaculate is quickly sucked away.
 		<<else>>
diff --git a/src/uncategorized/generateXXSlave.tw b/src/uncategorized/generateXXSlave.tw
index 8094d1c491ed1f1a6eb437e1d421fc86ef295517..a92a677fe668e5b2735bc7833f4a7151b2e98b21 100644
--- a/src/uncategorized/generateXXSlave.tw
+++ b/src/uncategorized/generateXXSlave.tw
@@ -1,6 +1,6 @@
 :: Generate XX Slave [nobr]
 
-<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 1, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 1, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, underArmHStyle: "waxed", physicalAge: 18, actualAge: 18, visualAge: 18, father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 1, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0}>>
+<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 60, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 1, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 1, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, underArmHStyle: "waxed", physicalAge: 18, actualAge: 18, visualAge: 18, father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 1, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0}>>
 
 <<set $activeSlave.publicCount to 0>>
 <<if $activeSlaveOneTimeMaxAge > 998>>
@@ -166,9 +166,9 @@
 <<else>>
 	<<set $activeSlave.nationality to $fixedNationality>>
 <</if>>
-<<NationalityToRace>>
-<<NationalityToName>>
-<<NationalityToAccent>>
+<<NationalityToRace $activeSlave>>
+<<NationalityToName $activeSlave>>
+<<NationalityToAccent $activeSlave>>
 
 <<set $seed to 162.5>>
 
@@ -510,22 +510,6 @@
 	<<set $activeSlave.faceShape to either("androgynous", "androgynous", "cute", "cute", "sensual", "exotic", "normal", "normal")>>
 <</if>>
 
-<<if $useFSNames == 0>>
-	<<set $activeSlave.slaveName to $activeSlave.birthName>>
-<<elseif $arcologies[0].FSChattelReligionist > 20>>
-	<<set $activeSlave.slaveName to $chattelReligionistSlaveNames.random()>>
-<<elseif $arcologies[0].FSRomanRevivalist > 20>>
-	<<set $activeSlave.slaveName to $romanSlaveNames.random()>>
-<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
-	<<set $activeSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
-<<elseif $arcologies[0].FSEdoRevivalist > 20>>
-	<<set $activeSlave.slaveName to $edoSlaveNames.random()>>
-<<elseif $arcologies[0].FSDegradationist != "unset">>
-	<<display "Degrading Name">>
-<<else>>
-	<<set $activeSlave.slaveName to $activeSlave.birthName>>
-<</if>>
-
 <<if ($weightAffectsAssets != 0)>>
 	<<if $activeSlave.weight < -10 and $activeSlave.butt > 1>>
 		<<set $activeSlave.butt -= 1>>
diff --git a/src/uncategorized/generateXYSlave.tw b/src/uncategorized/generateXYSlave.tw
index 1e59de5aef9aba60173b1cf0653c45df74408229..f66afeb2dffee9c25f9d386c3cec00c173471861 100644
--- a/src/uncategorized/generateXYSlave.tw
+++ b/src/uncategorized/generateXYSlave.tw
@@ -1,6 +1,6 @@
 :: Generate XY Slave [nobr]
 
-<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 10, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, underArmHStyle: "waxed", physicalAge: 18, actualAge: 18, visualAge: 18, father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 1, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0}>>
+<<set $activeSlave to {slaveName: "blank", birthName: "blank", weekAcquired: 0, origin: 0, career: 0, ID: 0, prestige: 0, pornFame: 0, pornFameSpending: 0, prestigeDesc: 0, recruiter: 0, relation: 0, relationTarget: 0, relationship: 0, relationshipTarget: 0, rivalry: 0, rivalryTarget: 0, subTarget: 0, choosesOwnAssignment: 0, assignment: "rest", assignmentVisible: 1, sentence: 0, training: 0, toyHole: "all her holes", indenture: -1, indentureRestrictions: 0, birthWeek: random(0,51), age: 18, ageImplant: 0, health: 0, minorInjury: 0, trust: 0, oldTrust: 0, devotion: 0, oldDevotion: 0, weight: 0, muscles: 0, height: 170, heightImplant: 0, nationality: "slave", race:"white", markings: "none", eyes: 1, eyeColor: "brown", eyewear: "none", hColor: "brown", pubicHColor: "brown", skin: "light", hLength: 10, hStyle: "short", pubicHStyle: "neat", waist: 0, corsetPiercing: 0, amp: 0, heels:0, voice: 2, voiceImplant: 0, accent: 0, shoulders: 0, shouldersImplant: 0, boobs: 0, boobsImplant: 0, boobsImplantType: 0, boobShape: "normal", nipples: "cute",  nipplesPiercing: 0, areolae: 0, areolaePiercing: 0, boobsTat: 0, lactation: 0, lactationAdaptation: 0, milk: 0, cum: 0, hips: 0, hipsImplant: 0, butt: 0, buttImplant: 0, buttImplantType: 0, buttTat: 0, face: 0, faceImplant: 0, faceShape: "normal", lips: 15, lipsImplant: 0, lipsPiercing: 0, lipsTat: 0, teeth: "normal", tonguePiercing: 0, vagina: 0, vaginaLube: 0, vaginaPiercing: 0, vaginaTat: 0, preg: -1, pregSource: 0, pregType: 0, labor: 0, births: 0, cSec: 0, bellyAccessory: "none", labia: 0, clit: 0, clitPiercing: 0, clitSetting: "vanilla", foreskin: 0, anus: 0, dick: 0, analArea: 1, dickPiercing: 0, dickTat: 0, balls: 0, scrotum: 0, ovaries: 0, anusPiercing: 0, anusTat: 0, makeup: 0, nails: 0, brand: 0, brandLocation: 0, earPiercing: 0, nosePiercing: 0, eyebrowPiercing: 0, navelPiercing: 0, shouldersTat: 0, armsTat: 0, legsTat: 0, backTat: 0, stampTat: 0, vaginalSkill: 0, oralSkill: 0, analSkill: 0, whoreSkill: 0, entertainSkill: 0, combatSkill: 0, livingRules: "spare", speechRules: "restrictive", releaseRules:"restrictive", relationshipRules: "restrictive", standardPunishment: "situational", standardReward: "situational", useRulesAssistant: 1, diet: "healthy", dietCum: 0, dietMilk: 0, tired: 0, hormones: 0, drugs: "no drugs", curatives: 0, chem: 0, aphrodisiacs: 0, addict: 0, fuckdoll: 0, choosesOwnClothes: 0, clothes: "no clothing", collar: "none", shoes: "none", vaginalAccessory: "none", dickAccessory: "none", buttplug: "none", intelligence: 0,  intelligenceImplant: 0, energy: 50, attrXX: 0, attrXY: 0, attrKnown: 0, fetish: "none", fetishStrength: 70, fetishKnown: 0, behavioralFlaw: "none", behavioralQuirk: "none", sexualFlaw: "none", sexualQuirk: "none", oralCount: 0, vaginalCount: 0, analCount: 0, mammaryCount: 0, penetrativeCount: 0, pitKills: 0, customTat: "", customLabel: "", customDesc: "", customImage: 0, currentRules: [], bellyTat: 0, induce: 0, mpreg: 0, inflation: 0, inflationType: "none", inflationMethod: 0, milkSource: 0, cumSource: 0, burst: 0, bellyImplant: 0, bellySag: 0, birthsTotal: 0, pubertyAgeXX: 13, pubertyAgeXY: 13, underArmHStyle: "waxed", physicalAge: 18, actualAge: 18, visualAge: 18, father: 0, mother: 0, sisters: 0, daughters: 0, canRecruit: 1, HGExclude: 0, ballType: "human", eggType: "human", reservedChildren: 0, choosesOwnChastity: 0}>>
 
 <<set $activeSlave.publicCount to 0>>
 <<if $activeSlaveOneTimeMaxAge > 998>>
@@ -173,9 +173,9 @@
 <<else>>
 	<<set $activeSlave.nationality to $fixedNationality>>
 <</if>>
-<<NationalityToRace>>
-<<NationalityToName>>
-<<NationalityToAccent>>
+<<NationalityToRace $activeSlave>>
+<<NationalityToName $activeSlave>>
+<<NationalityToAccent $activeSlave>>
 
 <<set $seed to 172.5>>
 <<if $activeSlave.race is "white">>
@@ -516,22 +516,6 @@
   <<set $activeSlave.faceShape to either("androgynous", "androgynous", "cute", "cute", "sensual", "exotic", "normal", "normal")>>
 <</if>>
 
-<<if $useFSNames == 0>>
-	<<set $activeSlave.slaveName to $activeSlave.birthName>>
-<<elseif $arcologies[0].FSChattelReligionist > 20>>
-	<<set $activeSlave.slaveName to $chattelReligionistSlaveNames.random()>>
-<<elseif $arcologies[0].FSRomanRevivalist > 20>>
-	<<set $activeSlave.slaveName to $romanSlaveNames.random()>>
-<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
-	<<set $activeSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
-<<elseif $arcologies[0].FSEdoRevivalist > 20>>
-	<<set $activeSlave.slaveName to $edoSlaveNames.random()>>
-<<elseif $arcologies[0].FSDegradationist != "unset">>
-	<<display "Degrading Name">>
-<<else>>
-	<<set $activeSlave.slaveName to $activeSlave.birthName>>
-<</if>>
-
 <<if $activeSlave.boobs < 250>>
 	<<set $activeSlave.nipples to either("tiny", "tiny", "tiny", "tiny", "cute", "cute", "puffy", "partially inverted")>>
 <<elseif $activeSlave.boobs < 500>>
diff --git a/src/uncategorized/householdLiquidator.tw b/src/uncategorized/householdLiquidator.tw
index bb7bfd0021b85c74af0855224ac11c1d17c73347..16c2022c4ced8df0638e73e8b003f41d35a45bd5 100644
--- a/src/uncategorized/householdLiquidator.tw
+++ b/src/uncategorized/householdLiquidator.tw
@@ -1,15 +1,11 @@
-:: Household Liquidator
+:: Household Liquidator [nobr]
 
-<<set $nextButton to "Back">>\
-<<set $nextLink to "Buy Slaves">>\
-<<set $returnTo to "Buy Slaves">>\
-<<set $showEncyclopedia to 1>><<set $encyclopedia to "Household Liquidations">>\
-\
-<<if random(1,100) > 50>>\
-\
-The household liquidator is offering a set of siblings for sale. As usual, you will only be permitted to inspect the older, but there is a guarantee that the younger will be similar.\
+<<set $nextButton to "Back", $nextLink to "Buy Slaves", $returnTo to "Buy Slaves", $showEncyclopedia to 1, $encyclopedia to "Household Liquidations">>
 
-<<nobr>>
+<<if random(1,100) > 50>>
+
+The household liquidator is offering a set of siblings for sale. As usual, you will only be permitted to inspect the older, but there is a guarantee that the younger will be similar.
+<br><br>
 
 <<display "Generate New Slave">>
 <<set $activeSlave.origin to "You bought her from the household liquidator.">>
@@ -32,29 +28,27 @@ The household liquidator is offering a set of siblings for sale. As usual, you w
 
 <<slaveCost $activeSlave>>
 
-<</nobr>>\
-
 The price is ¤<<print $slaveCost*3>>.
+<br><br>
 
-<<nobr>>
 <<if $cash >= $slaveCost*3>>
-	[[Buy their slave contract|Siblings Workaround][$cash -= $slaveCost*3,$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Siblings Workaround][$cash -= $slaveCost*3,$nextButton to "Continue",$nextLink to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
-<</nobr>>
-[[Decline to purchase them and check out another set of slaves|Household Liquidator]]
-
-<<set $saleDescription to 1>>\
-<<set $applyLaw to 1>>\
-<<display "Long Slave Description">>\
-<<set $saleDescription to 0>>\
-\
-<<elseif random(1,100) > 20>>\
-\
-The household liquidator is offering a mother and her daughter for sale. As usual, you will only be permitted to inspect the mother, but there is a guarantee that the daughter will be similar.\
-
-<<nobr>>
+<br>[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]
+<br><br>
+
+<<set $saleDescription to 1>>
+<<set $applyLaw to 1>>
+<<display "Long Slave Description">>
+<<set $saleDescription to 0>>
+
+<<elseif random(1,100) > 20>>
+
+The household liquidator is offering a mother and her daughter for sale. As usual, you will only be permitted to inspect the mother, but there is a guarantee that the daughter will be similar.
+<br><br>
+
 /% Begin younger mothers submod. %/
 <<set $activeSlaveOneTimeMinAge to $fertilityAge + $minimumSlaveAge>>
 <<set $activeSlaveOneTimeMaxAge to 42>>
@@ -83,29 +77,26 @@ The household liquidator is offering a mother and her daughter for sale. As usua
 <<slaveCost $activeSlave>>
 <<if $slavesSeen > $slaveMarketLimit>><<set $slaveCost += Math.trunc($slaveCost*(($slavesSeen-$slaveMarketLimit)*0.1))>><</if>>
 
-<</nobr>>\
-
 The price is ¤<<print $slaveCost*3>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>
+<br><br>
 
-<<nobr>>
 <<if $cash >= $slaveCost*3>>
-	[[Buy their slave contract|Mother Daughter Workaround][$cash -= $slaveCost*3,"Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Mother Daughter Workaround][$cash -= $slaveCost*3,"Continue",$nextLink to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
-<</nobr>>
-[[Decline to purchase them and check out another set of slaves|Household Liquidator]]
+<br>[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]
+<br><br>
 
-<<set $saleDescription to 1>>\
-<<set $applyLaw to 1>>\
-<<display "Long Slave Description">>\
-<<set $saleDescription to 0>>\
-\
-<<else>>\
-\
-The household liquidator is offering something special: twins. The markup is huge, but the merchandise isn't something you see every day.\
+<<set $saleDescription to 1>>
+<<set $applyLaw to 1>>
+<<display "Long Slave Description">>
+<<set $saleDescription to 0>>
 
-<<nobr>>
+<<else>>
+
+The household liquidator is offering something special: twins. The markup is huge, but the merchandise isn't something you see every day.
+<br><br>
 
 <<display "Generate New Slave">>
 <<set $activeSlave.origin to "You bought her from the household liquidator.">>
@@ -127,22 +118,20 @@ The household liquidator is offering something special: twins. The markup is hug
 <</if>>
 <<slaveCost $activeSlave>>
 
-<</nobr>>\
-
 The price is ¤<<print $slaveCost*4>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>
+<br><br>
 
-<<nobr>>
 <<if $cash >= $slaveCost*4>>
-	[[Buy their slave contract|Twins Workaround][$cash -= $slaveCost*4,$nextButton to "Continue",$nextLink to "AS Dump",$returnTo to "Main"]]
+	[[Buy their slave contract|Twins Workaround][$cash -= $slaveCost*4,$nextButton to "Continue",$nextLink to "Main"]]
 <<else>>
 	//You lack the necessary funds to buy these slaves.//
 <</if>>
-<</nobr>>
-[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]
+<br>[[Decline to purchase them and check out another set of slaves|Household Liquidator][$slavesSeen += 2]]
+<br><br>
 
-<<set $saleDescription to 1>>\
-<<set $applyLaw to 1>>\
-<<display "Long Slave Description">>\
-<<set $saleDescription to 0>>\
+<<set $saleDescription to 1>>
+<<set $applyLaw to 1>>
+<<display "Long Slave Description">>
+<<set $saleDescription to 0>>
 
 <</if>>
diff --git a/src/uncategorized/longSlaveDescription.tw b/src/uncategorized/longSlaveDescription.tw
index b3cb01d3b7d769dbd26141246bfb6e03d0cc044f..603c598eeaef68f7b35918403ba5b98462a55a91 100644
--- a/src/uncategorized/longSlaveDescription.tw
+++ b/src/uncategorized/longSlaveDescription.tw
@@ -1260,7 +1260,7 @@ when a dick is pushed inside <<if $activeSlave.vagina >= -1>>either of its lower
 
 <<Family>>
 
-<<if $activeSlave.relationship >= 3 && ($activeSlave.mother > 0 || $activeSlave.father > 0 || $activeSlave.daughters > 0 || $activeSlave.sisters > 0)>>
+<<if $activeSlave.relationship >= 3 && totalRelatives($activeSlave) > 0>>
 	<<for $i to 0; $i < $slaves.length; $i++>>
 		<<if $slaves[$i].ID is $activeSlave.relationshipTarget>>
 			<<if $activeSlave.mother == $slaves[$i].ID>>
@@ -1339,6 +1339,8 @@ when a dick is pushed inside <<if $activeSlave.vagina >= -1>>either of its lower
 <<if $activeSlave.career != 0>>
   <<if $activeSlave.career is "a slave">>
 	She was a slave long before you obtained her.
+  <<elseif $activeSlave.career is "a slave since birth">>
+  	She's been your slave her entire life.
   <<elseif $activeSlave.career is "a breeder">>
   	Before you obtained her, she was nothing more than a womb to be filled.
   <<elseif $activeSlave.career is "a bioreactor">>
diff --git a/src/uncategorized/main.tw b/src/uncategorized/main.tw
index b6ae51bf7f0fbb8978c85512250c5e993c1ec218..3a9139647e1d06be978716da448d73e2b8401481 100644
--- a/src/uncategorized/main.tw
+++ b/src/uncategorized/main.tw
@@ -13,20 +13,8 @@
 <<if ndef $defaultRules>>
 	<<display "Init Rules">>
 <</if>>
-<<if ndef $incubator>>
-	<<set $incubator = 0>>
-<</if>>
-<<if ndef $incubatorUpgradeSpeed>>
-	<<set $incubatorUpgradeSpeed = 5>>
-<</if>>
-<<if ndef $incubatorUpgradeWeight>>
-	<<set $incubatorUpgradeWeight = 0>>
-<</if>>
-<<if ndef $incubatorUpgradeMuscles>>
-	<<set $incubatorUpgradeMuscles = 0>>
-<</if>>
-<<if ndef $incubatorUpgradeReproduction>>
-	<<set $incubatorUpgradeReproduction = 0>>
+<<if ndef $inbreeding>>
+	<<set $inbreeding = 1>>
 <</if>>
 <<if ndef $incubatorWeightSetting>>
 	<<set $incubatorWeightSetting = 0>>
@@ -35,20 +23,7 @@
 	<<set $incubatorMusclesSetting = 0>>
 <</if>>
 <<if ndef $incubatorReproductionSetting>>
-	<<set $incubatorReproductionSetting = 0>>
-<</if>>
-<<if ndef $reservedChildren>>
-	<<set $reservedChildren = 0>>
-<</if>>
-<<if ndef $tanks>>
-	<<set $tanks = []>>
-	<<set $tanks = [0]>>
-<</if>>
-<<if ndef $animalParts>>
-	<<set $animalParts = 0>>
-<</if>>
-<<if ndef $genePool>>
-	<<set $genePool = []>>
+ 	<<set $incubatorReproductionSetting = 0>>
 <</if>>
 
 <<set $currentRule to $defaultRules[0]>>
diff --git a/src/uncategorized/manageArcology.tw b/src/uncategorized/manageArcology.tw
index 24de469bdd5c95cb87478f92b19d8b53672ab9d1..99ea5e5eb970de2d3b98b8a7d8c479dd75a72eed 100644
--- a/src/uncategorized/manageArcology.tw
+++ b/src/uncategorized/manageArcology.tw
@@ -168,13 +168,15 @@ __Facilities__
 
 <br>
 
-<<if $AProsperityCap > 120 && $cheatMode == 1>>
+<<if $AProsperityCap > 120 && $familyTesting == 1>>
 <<if $incubator == 0>>
 	[[Install an incubation chamber to rapidly age children|Manage Arcology][$cash -= Math.trunc(100000*$upgradeMultiplierArcology), $incubator to 1]]
 	//Costs ¤<<print Math.trunc(100000*$upgradeMultiplierArcology)>>//
 <<else>>
 	The penthouse has a specialized facility dedicated to rapidly aging children.
 <</if>>
+<<elseif $AProsperityCap >= 100 && $AProsperityCap <= 120>>
+	//Installation of a child aging facility will require the arcology's electrical infrastructure to be overhauled.//
 <</if>>
 
 <br><br>
diff --git a/src/uncategorized/matchmaking.tw b/src/uncategorized/matchmaking.tw
index 49354e2e78cc0ce24e68274dce6a6beb28b2480e..6824910cf95fb1e6d97d4a63c88cd28c6a2fd7c2 100644
--- a/src/uncategorized/matchmaking.tw
+++ b/src/uncategorized/matchmaking.tw
@@ -274,7 +274,7 @@ Despite her devotion and trust, she is still a slave, and probably knows that he
 	<<set $cash -= 10000>>
 	<</replace>>
 <</click>>
-<<if ($eventSlave.vagina != 0) && ($eventSlave.anus != 0)>>
+<<if ($eventSlave.vagina != 0) && ($eventSlave.anus != 0) && $eventSlave.breedingMark != 1>>
 <br>&nbsp;&nbsp;&nbsp;&nbsp;<<click "Orgiastic ceremony">>
 	<<replace "#result2">>
 	You order $assistantName to invite deserving citizens to an orgiastic ceremony for a slave being married to a slaveowner, and to make the arrangements. The wedding orgy will take place during the upcoming week.
diff --git a/src/uncategorized/motherDaughterWorkaround.tw b/src/uncategorized/motherDaughterWorkaround.tw
index 7349d9346630aa9c99203f767ceec3eb4df49e23..1c62d1e160a0e71d402a1b2f806e273636412eb1 100644
--- a/src/uncategorized/motherDaughterWorkaround.tw
+++ b/src/uncategorized/motherDaughterWorkaround.tw
@@ -4,27 +4,11 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 
 <<AddSlave $activeSlave>>
 
-<<NationalityToName>>
-<<NationalityToAccent>>
-<<set _secondSlave to $activeSlave>>
+<<set _secondSlave to clone($activeSlave)>>
+<<unset $activeSlave>>
+<<NationalityToName _secondSlave>>
+<<NationalityToAccent _secondSlave>>
 
-<<if $useFSNames == 0>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<<elseif $arcologies[0].FSChattelReligionist > 20>>
-	<<set _secondSlave.slaveName to $chattelReligionistSlaveNames.random()>>
-<<elseif $arcologies[0].FSRomanRevivalist > 20>>
-	<<set _secondSlave.slaveName to $romanSlaveNames.random()>>
-<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
-	<<set _secondSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
-<<elseif $arcologies[0].FSEdoRevivalist > 20>>
-	<<set _secondSlave.slaveName to $edoSlaveNames.random()>>
-<<elseif $arcologies[0].FSDegradationist != "unset">>
-	<<display "Degrading Name">>
-<<else>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<</if>>
-
-<<set _secondSlave.slaveName to _secondSlave.birthName>>
 <<set _secondSlave.ID to _secondSlave.ID + 1000>>
 <<set _secondSlave.devotion -= random(1,3)>>
 <<set _secondSlave.oldDevotion to _secondSlave.devotion>>
@@ -33,7 +17,7 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 <<set _secondSlave.health += 30>>
 <<set _secondSlave.boobs -= 100>>
 <<set _secondSlave.butt -= 1>>
-<<if $activeSlave.vagina > -1>><<set $activeSlave.vagina -= 1>><</if>>
+<<if _secondSlave.vagina > -1>><<set _secondSlave.vagina -= 1>><</if>>
 
 <<set $activeSlaveOneTimeMaxAge to Math.min(22, Math.max($minimumSlaveAge, _secondSlave.actualAge - 11))>>
 <<set $activeSlaveOneTimeMinAge to Math.min(Math.max(8, $minimumSlaveAge), $activeSlaveOneTimeMaxAge)>>
@@ -49,11 +33,11 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 <<set _secondSlave.energy += random(-20,20)>>
 <<set _secondSlave.fetishStrength to random(0,90)>>
 <<set _secondSlave.fetish to either("none", "none", "none", "none", "none", "none", "submissive", "cumslut", "humiliation", "buttslut", "pregnancy", "sadist", "dom", "masochist")>>
-<<set $activeSlave.behavioralFlaw to either("none", "none", "none", "arrogant", "bitchy", "odd", "hates men", "hates women", "hates women", "anorexic", "masochist", "gluttonous", "devout", "liberated")>>
-<<if ($activeSlave.behavioralFlaw is "devout")>>
-	<<set $activeSlave.sexualFlaw to either("none", "repressed",  "shamefast", "apathetic")>>
+<<set _secondSlave.behavioralFlaw to either("none", "none", "none", "arrogant", "bitchy", "odd", "hates men", "hates women", "hates women", "anorexic", "masochist", "gluttonous", "devout", "liberated")>>
+<<if (_secondSlave.behavioralFlaw is "devout")>>
+	<<set _secondSlave.sexualFlaw to either("none", "repressed",  "shamefast", "apathetic")>>
 <<else>>
-	<<set $activeSlave.sexualFlaw to either("none", "none", "none", "none", "hates oral", "hates anal", "hates penetration", "repressed", "idealistic", "shamefast", "apathetic", "crude", "judgemental")>>
+	<<set _secondSlave.sexualFlaw to either("none", "none", "none", "none", "hates oral", "hates anal", "hates penetration", "repressed", "idealistic", "shamefast", "apathetic", "crude", "judgemental")>>
 <</if>>
 
 <<if $familyTesting == 1>>
@@ -72,4 +56,4 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 	<<set _secondSlave.butt += random(-1, 1)>>
 <</if>>
 
-<<AddSlave _secondSlave)>>
\ No newline at end of file
+<<AddSlave _secondSlave>>
\ No newline at end of file
diff --git a/src/uncategorized/nationalityToAccent.tw b/src/uncategorized/nationalityToAccent.tw
deleted file mode 100644
index b49d40b4f91a832fb8e35cd7de0a7a768470a964..0000000000000000000000000000000000000000
--- a/src/uncategorized/nationalityToAccent.tw
+++ /dev/null
@@ -1,441 +0,0 @@
-:: Nationality to Accent [nobr]
- 
-<<set $seed to either(0,1,1,2,2,2,3,3,3,3)>>
-
-<<if ($activeSlave.nationality is "American")>>
-	<<if $activeSlave.race is "black">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<else>>
-		<<set $activeSlave.accent to either(0,1,1,2,2,2,3,3,3,3)>>
-	<</if>>
-	<<elseif $activeSlave.race is "latina">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Spanish">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<elseif $activeSlave.race is "asian">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Chinese">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<elseif $activeSlave.race is "middle eastern">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Arabic">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<else>>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Canadian")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Mexican")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Dominican")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Puerto Rican")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Haitian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Jamaican")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Cuban")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Guatemalan")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Chilean")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Peruvian")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Bolivian")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Venezuelan")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Russian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Ukrainian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Italian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Spanish")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "British")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "French")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "German")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Lithuanian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Norwegian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Slovak")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Danish")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Dutch")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Austrian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Swiss")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Serbian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Belgian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Czech")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Portuguese")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Swedish")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Romanian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Hungarian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Estonian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Irish")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Icelandic")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Finnish")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Greek")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Polish")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Brazilian")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Egyptian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Colombian")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Argentinian")>>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Turkish")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Iranian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Armenian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Israeli")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Saudi")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "South African")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Nigerian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Congolese")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Kenyan")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Tanzanian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Zimbabwean")>>
-	<<if $language is "English" && $activeSlave.race == "white">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Ghanan")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Ugandan")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Ethiopian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Moroccan")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Chinese")>>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Korean")>>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Thai")>>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Vietnamese")>>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Japanese")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Indonesian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Filipina")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Bangladeshi")>>
-	<<if $language is "Indian">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Malaysian")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Uzbek")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Afghan")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Nepalese")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Burmese")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Iraqi")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Yemeni")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Sudanese")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Algerian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Tunisian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Libyan")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Omani")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Malian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Jordanian")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Lebanese")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Emirati")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Kazakh")>>
-	<<set $activeSlave.accent to $seed>>
-<<elseif ($activeSlave.nationality is "Pakistani")>>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Indian")>>
-	<<if $language is "Indian">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Australian")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif ($activeSlave.nationality is "a New Zealander")>>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif $activeSlave.nationality is "Roman Revivalist">>
-	<<if $language is "Latin">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif $activeSlave.nationality is "Ancient Egyptian Revivalist">>
-	<<if $language is "Ancient Egyptian">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif $activeSlave.nationality is "Edo Revivalist">>
-	<<if $language is "Japanese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif $activeSlave.nationality is "Arabian Revivalist">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<elseif $activeSlave.nationality is "Ancient Chinese Revivalist">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<else>>
-	<<set $activeSlave.accent to $seed>>
-<</if>>
-
-<<if $activeSlave.nationality is $language>>
-	<<set $activeSlave.accent to 0>>
-<</if>>
diff --git a/src/uncategorized/nationalityToName.tw b/src/uncategorized/nationalityToName.tw
deleted file mode 100644
index c068e502b0ce0bdf50bc43aa3a6863ab05735f05..0000000000000000000000000000000000000000
--- a/src/uncategorized/nationalityToName.tw
+++ /dev/null
@@ -1,204 +0,0 @@
-:: Nationality to Name [nobr]
- 
-<<switch $activeSlave.nationality>>
-<<case "American">>
-	<<if $activeSlave.race is "black">>
-		<<set $activeSlave.birthName to $africanAmericanSlaveNames.random()>>
-	<<elseif $activeSlave.race is "latina">>
-		<<set $activeSlave.birthName to $latinaSlaveNames.random()>>
-	<<elseif $activeSlave.race is "asian">>
-		<<set $activeSlave.birthName to $asianAmericanSlaveNames.random()>>
-	<<elseif $activeSlave.race is "middle eastern">>
-		<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
-	<</if>>
-<<case "Canadian">>
-	<<set $activeSlave.birthName to $canadianSlaveNames.random()>>
-<<case "Mexican">>
-	<<set $activeSlave.birthName to $mexicanSlaveNames.random()>>
-<<case "Dominican">>
-	<<set $activeSlave.birthName to $dominicanSlaveNames.random()>>
-<<case "Puerto Rican">>
-	<<set $activeSlave.birthName to $puertoRicanSlaveNames.random()>>
-<<case "Haitian">>
-	<<set $activeSlave.birthName to $haitianSlaveNames.random()>>
-<<case "Jamaican">>
-	<<set $activeSlave.birthName to $jamaicanSlaveNames.random()>>
-<<case "Cuban">>
-	<<set $activeSlave.birthName to $cubanSlaveNames.random()>>
-<<case "Guatemalan">>
-	<<set $activeSlave.birthName to $guatemalanSlaveNames.random()>>
-<<case "Chilean">>
-	<<set $activeSlave.birthName to $chileanSlaveNames.random()>>
-<<case "Peruvian">>
-	<<set $activeSlave.birthName to $peruvianSlaveNames.random()>>
-<<case "Bolivian">>
-	<<set $activeSlave.birthName to $bolivianSlaveNames.random()>>
-<<case "Venezuelan">>
-	<<set $activeSlave.birthName to $venezuelanSlaveNames.random()>>
-<<case "Belarusian">>
-	<<set $activeSlave.birthName to $belarusianSlaveNames.random()>>
-<<case "Russian">>
-	<<set $activeSlave.birthName to $russianSlaveNames.random()>>
-<<case "Ukrainian">>
-	<<set $activeSlave.birthName to $ukrainianSlaveNames.random()>>
-<<case "Italian">>
-	<<set $activeSlave.birthName to $italianSlaveNames.random()>>
-<<case "Spanish">>
-	<<set $activeSlave.birthName to $spanishSlaveNames.random()>>
-<<case "British">>
-	<<set $activeSlave.birthName to $britishSlaveNames.random()>>
-<<case "Scottish">>
-	<<set $activeSlave.birthName to $scottishSlaveNames.random()>>
-<<case "French">>
-	<<set $activeSlave.birthName to $frenchSlaveNames.random()>>
-<<case "German">>
-	<<set $activeSlave.birthName to $germanSlaveNames.random()>>
-<<case "Lithuanian">>
-	<<set $activeSlave.birthName to $lithuanianSlaveNames.random()>>
-<<case "Norwegian">>
-	<<set $activeSlave.birthName to $norwegianSlaveNames.random()>>
-<<case "Slovak">>
-	<<set $activeSlave.birthName to $slovakSlaveNames.random()>>
-<<case "Danish">>
-	<<set $activeSlave.birthName to $danishSlaveNames.random()>>
-<<case "Dutch">>
-	<<set $activeSlave.birthName to $dutchSlaveNames.random()>>
-<<case "Austrian">>
-	<<set $activeSlave.birthName to $austrianSlaveNames.random()>>
-<<case "Swiss">>
-	<<set $activeSlave.birthName to $swissSlaveNames.random()>>
-<<case "Serbian">>
-	<<set $activeSlave.birthName to $serbianSlaveNames.random()>>
-<<case "Belgian">>
-	<<set $activeSlave.birthName to $belgianSlaveNames.random()>>
-<<case "Czech">>
-	<<set $activeSlave.birthName to $czechSlaveNames.random()>>
-<<case "Portuguese">>
-	<<set $activeSlave.birthName to $portugueseSlaveNames.random()>>
-<<case "Swedish">>
-	<<set $activeSlave.birthName to $swedishSlaveNames.random()>>
-<<case "Romanian">>
-	<<set $activeSlave.birthName to $romanianSlaveNames.random()>>
-<<case "Hungarian">>
-	<<set $activeSlave.birthName to $hungarianSlaveNames.random()>>
-<<case "Estonian">>
-	<<set $activeSlave.birthName to $estonianSlaveNames.random()>>
-<<case "Irish">>
-	<<set $activeSlave.birthName to $irishSlaveNames.random()>>
-<<case "Icelandic">>
-	<<set $activeSlave.birthName to $icelandicSlaveNames.random()>>
-<<case "Finnish">>
-	<<set $activeSlave.birthName to $finnishSlaveNames.random()>>
-<<case "Greek">>
-	<<set $activeSlave.birthName to $greekSlaveNames.random()>>
-<<case "Polish">>
-	<<set $activeSlave.birthName to $polishSlaveNames.random()>>
-<<case "Brazilian">>
-	<<set $activeSlave.birthName to $brazilianSlaveNames.random()>>
-<<case "Egyptian">>
-	<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
-<<case "Colombian">>
-	<<set $activeSlave.birthName to $colombianSlaveNames.random()>>
-<<case "Argentinian">>
-	<<set $activeSlave.birthName to $argentinianSlaveNames.random()>>
-<<case "Turkish">>
-	<<set $activeSlave.birthName to $turkishSlaveNames.random()>>
-<<case "Iranian">>
-	<<set $activeSlave.birthName to $iranianSlaveNames.random()>>
-<<case "Armenian">>
-	<<set $activeSlave.birthName to $armenianSlaveNames.random()>>
-<<case "Israeli">>
-	<<set $activeSlave.birthName to $israeliSlaveNames.random()>>
-<<case "Saudi">>
-	<<set $activeSlave.birthName to $saudiSlaveNames.random()>>
-<<case "South African">>
-	<<if $activeSlave.race is "black">>
-		<<set $activeSlave.birthName to $blackSouthAfricanSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $whiteSouthAfricanSlaveNames.random()>>
-	<</if>>
-<<case "Nigerian">>
-	<<set $activeSlave.birthName to $nigerianSlaveNames.random()>>
-<<case "Congolese">>
-	<<set $activeSlave.birthName to $congoleseSlaveNames.random()>>
-<<case "Kenyan">>
-	<<set $activeSlave.birthName to $kenyanSlaveNames.random()>>
-<<case "Tanzanian">>
-	<<set $activeSlave.birthName to $tanzanianSlaveNames.random()>>
-<<case "Zimbabwean">>
-	<<if $activeSlave.race == "white">>
-		<<set $activeSlave.birthName to $britishSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $zimbabweanSlaveNames.random()>>
-	<</if>>
-<<case "Ghanan">>
-	<<set $activeSlave.birthName to $ghananSlaveNames.random()>>
-<<case "Ugandan">>
-	<<set $activeSlave.birthName to $ugandanSlaveNames.random()>>
-<<case "Ethiopian">>
-	<<set $activeSlave.birthName to $ethiopianSlaveNames.random()>>
-<<case "Moroccan">>
-	<<set $activeSlave.birthName to $moroccanSlaveNames.random()>>
-<<case "Chinese">>
-	<<set $activeSlave.birthName to $chineseSlaveNames.random()>>
-<<case "Korean">>
-	<<set $activeSlave.birthName to $koreanSlaveNames.random()>>
-<<case "Thai">>
-	<<set $activeSlave.birthName to $thaiSlaveNames.random()>>
-<<case "Vietnamese">>
-	<<set $activeSlave.birthName to $vietnameseSlaveNames.random()>>
-<<case "Japanese">>
-	<<set $activeSlave.birthName to $japaneseSlaveNames.random()>>
-<<case "Indonesian">>
-	<<set $activeSlave.birthName to $indonesianSlaveNames.random()>>
-<<case "Filipina">>
-	<<set $activeSlave.birthName to $filipinaSlaveNames.random()>>
-<<case "Bangladeshi">>
-	<<set $activeSlave.birthName to $bangladeshiSlaveNames.random()>>
-<<case "Malaysian">>
-	<<set $activeSlave.birthName to $malaysianSlaveNames.random()>>
-<<case "Uzbek">>
-	<<set $activeSlave.birthName to $uzbekSlaveNames.random()>>
-<<case "Afghan">>
-	<<set $activeSlave.birthName to $afghanSlaveNames.random()>>
-<<case "Nepalese">>
-	<<set $activeSlave.birthName to $nepaleseSlaveNames.random()>>
-<<case "Burmese">>
-	<<set $activeSlave.birthName to $burmeseSlaveNames.random()>>
-<<case "Iraqi">>
-	<<set $activeSlave.birthName to $iraqiSlaveNames.random()>>
-<<case "Yemeni">>
-	<<set $activeSlave.birthName to $yemeniSlaveNames.random()>>
-<<case "Sudanese">>
-	<<set $activeSlave.birthName to $sudaneseSlaveNames.random()>>
-<<case "Algerian">>
-	<<set $activeSlave.birthName to $algerianSlaveNames.random()>>
-<<case "Tunisian">>
-	<<set $activeSlave.birthName to $tunisianSlaveNames.random()>>
-<<case "Libyan">>
-	<<set $activeSlave.birthName to $libyanSlaveNames.random()>>
-<<case "Omani">>
-	<<set $activeSlave.birthName to $omaniSlaveNames.random()>>
-<<case "Malian">>
-	<<set $activeSlave.birthName to $malianSlaveNames.random()>>
-<<case "Jordanian">>
-	<<set $activeSlave.birthName to $jordanianSlaveNames.random()>>
-<<case "Lebanese">>
-	<<set $activeSlave.birthName to $lebaneseSlaveNames.random()>>
-<<case "Emirati">>
-	<<set $activeSlave.birthName to $emiratiSlaveNames.random()>>
-<<case "Kazakh">>
-	<<set $activeSlave.birthName to $kazakhSlaveNames.random()>>
-<<case "Pakistani">>
-	<<set $activeSlave.birthName to $pakistaniSlaveNames.random()>>
-<<case "Indian">>
-	<<set $activeSlave.birthName to $indianSlaveNames.random()>>
-<<case "Australian">>
-	<<set $activeSlave.birthName to $australianSlaveNames.random()>>
-<<case "a New Zealander">>
-	<<set $activeSlave.birthName to $newZealanderSlaveNames.random()>>
-<<default>>
-	<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
-<</switch>>
diff --git a/src/uncategorized/newGamePlus.tw b/src/uncategorized/newGamePlus.tw
index 8b310a2b004b510f603701d37083ce16784ffa37..64c4882aaa4b750ffbab2cf84a481feffac86a01 100644
--- a/src/uncategorized/newGamePlus.tw
+++ b/src/uncategorized/newGamePlus.tw
@@ -3,6 +3,9 @@
 <<nobr>>
 <<set $ui to "start">>
 <<set $slavesToImport to 0>>
+<<if ndef $slavesToImportMax>>
+	<<set $slavesToImportMax = 5>>
+<</if>>
 
 <<if $ver.indexOf("0.9") == -1>>
 <<silently>>	
@@ -10,6 +13,14 @@
 <</silently>>
 <</if>>
 
+You have the funds to bring $slavesToImportMax slaves with you (or your equivalent) to a new arcology.
+<<if $cash >= 50000+($slavesToImportMax*10000)>>
+	It will cost <<print 50000+($slavesToImportMax*10000)>>¤ to insure another slave's safe transer.
+	[[Increase minimum transfered slaves by 1.|New Game Plus][$cash -= (50000+($slavesToImportMax*10000)), $slavesToImportMax++]]
+<<else>>
+	You lack the funds to bring more than $slavesToImportMax slaves with you (or your equivalent) to a new arcology. It would cost <<print 50000+($slavesToImportMax*10000)>>¤ to guarantee another's safe transfer.
+<</if>>
+
 <<if $freshPC == 0>>
 	<<if $retainCareer == 1 && $PC.career != "arcology owner">>
 		<<if $week > 52>>
@@ -28,14 +39,14 @@
 	[[Use existing player character.|New Game Plus][$freshPC = 0]]
 <</if>>
 
-Select up to five slaves to be imported into a new game and then [[click here.|init][$saveImported to 1]]
+Select up to $slavesToImportMax slaves to be imported into a new game and then [[click here.|init][$saveImported to 1]]
 
 <br><br>''These slaves will be imported into the new game:''
 <<set $Flag to 1>>
 <<display "Slave Summary">>
 
 <br><br>
-<<if $slavesToImport >= 5>>
+<<if $slavesToImport >= $slavesToImportMax>>
 	//Maximum number of slaves for import selected.//
 <<else>>
 	''These slaves are available to be imported into the new game:''
diff --git a/src/uncategorized/newSlaveIntro.tw b/src/uncategorized/newSlaveIntro.tw
index 41f94653479c59ba797bee342e2dbb4112958b4b..c58bd4ede0404e6eba3a839a5b8ecf07ff843b6b 100644
--- a/src/uncategorized/newSlaveIntro.tw
+++ b/src/uncategorized/newSlaveIntro.tw
@@ -345,16 +345,16 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 <<if $arcologies[0].FSTransformationFetishist >= 50>>
 <</if>>
 <<if $arcologies[0].FSMaturityPreferentialist >= 50>>
-	<<if ($activeSlave.acutalAge > 30)>>
+	<<if ($activeSlave.actualAge > 30)>>
 	She realizes that your arcology appreciates older girls, and @@color:mediumaquamarine;hopes@@ it'll be nicer here.
 <<set $activeSlave.trust += 2>>
 	<</if>>
 <</if>>
 <<if $arcologies[0].FSYouthPreferentialist >= 50>>
-	<<if ($activeSlave.acutalAge > 30)>>
+	<<if ($activeSlave.actualAge > 30)>>
 	She realizes that your arcology has little use for older girls, and @@color:gold;fears@@ she'll be abused here.
 	<<set $activeSlave.trust -= 4>>
-	<<elseif ($activeSlave.acutalAge < 18)>>
+	<<elseif ($activeSlave.actualAge < 18)>>
   	/% begin is a child block %/
 	/% Set $i to 0 or 1 to reflect whether she understands. %/
   	<<set $i to 0>>
@@ -838,6 +838,11 @@ The legalities completed, ''__@@color:pink;$activeSlave.slaveName@@__'' <<if ($a
 		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSGenderRadicalist/$FSLockinLevel)>>
 		<<set $arcologies[0].FSGenderRadicalist += 0.05*$FSSingleSlaveRep>>
 	<</if>>
+	<<if $arcologies[0].FSGenderRestart != "unset" && $activeSlave.pubertyXY == 1>>
+		Society @@color:green;approves@@ of your promptly gelding her; this advances the idea that all only the elite should breed.
+		<<set $rep += $FSSingleSlaveRep*($arcologies[0].FSRestart/$FSLockinLevel)>>
+		<<set $arcologies[0].FSRestart += 0.05*$FSSingleSlaveRep>>
+	<</if>>
 <</replace>>
 <</click>>
 <</if>>
diff --git a/src/uncategorized/newSlaveRaceNationalityAndName.tw b/src/uncategorized/newSlaveRaceNationalityAndName.tw
deleted file mode 100644
index f130c69d9b3adb14fdb4c58edbf9479f2295027c..0000000000000000000000000000000000000000
--- a/src/uncategorized/newSlaveRaceNationalityAndName.tw
+++ /dev/null
@@ -1,871 +0,0 @@
-:: New Slave Race Nationality and Name [nobr widget]
-
-<<widget "NationalityToRace">>
-
-<<switch $activeSlave.nationality>>
-<<case "American">>
-	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "latina", "latina", "asian", "amerindian", "mixed race")>>
-<<case "Canadian">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "amerindian")>>
-<<case "Puerto Rican">>
-	<<set $activeSlave.race to either("latina")>>
-<<case "Cuban">>
-	<<set $activeSlave.race to either("latina", "black")>>
-<<case "Haitian">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Jamaican">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Mexican">>
-	<<set $activeSlave.race to either("latina", "latina", "latina", "latina", "latina", "amerindian")>>
-<<case "Dominican">>
-	<<set $activeSlave.race to either("mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "white", "white", "black")>>
-<<case "Peruvian">>
-	<<set $activeSlave.race to either("latina", "amerindian")>>
-<<case "Venezuelan">>
-	<<set $activeSlave.race to either("latina")>>
-<<case "Bolivian">>
-	<<set $activeSlave.race to either("latina", "amerindian")>>
-<<case "Guatemalan">>
-	<<set $activeSlave.race to either("latina", "amerindian")>>
-<<case "Brazilian">>
-	<<set $activeSlave.race to either("black", "latina", "mixed race", "mixed race", "amerindian", "white")>>
-<<case "Argentinian">>
-	<<set $activeSlave.race to either("white", "latina", "latina")>>
-<<case "Chilean">>
-	<<set $activeSlave.race to either("white", "latina", "latina", "latina")>>
-<<case "Colombian">>
-	<<set $activeSlave.race to either("latina")>>
-<<case "Egyptian">>
-	<<set $activeSlave.race to either("black", "middle eastern", "middle eastern", "middle eastern", "semitic")>>
-<<case "Turkish">>
-	<<set $activeSlave.race to either("middle eastern", "middle eastern", "middle eastern", "semitic")>>
-<<case "Iranian">>
-	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
-<<case "Armenian">>
-	<<set $activeSlave.race to either("indo-aryan", "semitic")>>
-<<case "Israeli">>
-	<<set $activeSlave.race to either("white", "middle eastern", "semitic", "semitic")>>
-<<case "Saudi">>
-	<<set $activeSlave.race to either("black", "asian", "middle eastern", "middle eastern")>>
-<<case "Moroccan">>
-	<<set $activeSlave.race to either("middle eastern", "middle eastern", "black")>>
-<<case "Nigerian">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Kenyan">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Zimbabwean">>
-	<<set $activeSlave.race to either("black", "black", "black", "black", "white")>>
-<<case "Ugandan">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Tanzanian">>
-	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
-<<case "Ghanan">>
-	<<set $activeSlave.race to either("black", "black", "black", "semitic")>>
-<<case "Congolese">>
-	<<set $activeSlave.race to either("black")>>
-<<case "Ethiopian">>
-	<<set $activeSlave.race to either("black", "black", "black", "middle eastern", "semitic")>>
-<<case "South African">>
-	<<set $activeSlave.race to either("black", "black", "black", "white")>>
-<<case "Chinese">>
-	<<set $activeSlave.race to either("asian")>>
-<<case "Korean">>
-	<<set $activeSlave.race to either("asian")>>
-<<case "Japanese">>
-	<<set $activeSlave.race to either("asian")>>
-<<case "Thai">>
-	<<set $activeSlave.race to either("asian", "asian", "malay")>>
-<<case "Vietnamese">>
-	<<set $activeSlave.race to either("asian")>>
-<<case "Indonesian">>
-	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
-<<case "Filipina">>
-	<<set $activeSlave.race to either("asian", "malay", "malay", "pacific islander")>>
-<<case "Burmese">>
-	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
-<<case "Nepalese">>
-	<<set $activeSlave.race to either("asian", "asian", "indo-aryan")>>
-<<case "Uzbek">>
-	<<set $activeSlave.race to either("asian")>>
-<<case "Afghan">>
-	<<set $activeSlave.race to either("indo-aryan", "middle eastern")>>
-<<case "Algerian">>
-	<<set $activeSlave.race to either("middle eastern")>>
-<<case "Libyan">>
-	<<set $activeSlave.race to either("middle eastern")>>
-<<case "Tunisian">>
-	<<set $activeSlave.race to either("middle eastern")>>
-<<case "Lebanese">>
-	<<set $activeSlave.race to either("middle eastern", "semitic")>>
-<<case "Jordanian">>
-	<<set $activeSlave.race to either("middle eastern", "semitic")>>
-<<case "Emirati">>
-	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
-<<case "Omani">>
-	<<set $activeSlave.race to either("middle eastern", "indo-aryan")>>
-<<case "Malian">>
-	<<set $activeSlave.race to either("black", "black", "black", "black", "black", "middle eastern")>>
-<<case "Sudanese">>
-	<<set $activeSlave.race to either("black", "black", "black", "middle eastern")>>
-<<case "Yemeni">>
-	<<set $activeSlave.race to either("black", "semitic", "middle eastern", "middle eastern", "middle eastern")>>
-<<case "Iraqi">>
-	<<set $activeSlave.race to either("semitic", "middle eastern", "middle eastern", "middle eastern", "middle eastern")>>
-<<case "Indian">>
-	<<set $activeSlave.race to either("indo-aryan")>>
-<<case "Malaysian">>
-	<<set $activeSlave.race to either("asian", "malay", "malay", "malay")>>
-<<case "Kazakh">>
-	<<set $activeSlave.race to either("asian", "asian", "asian", "semitic", "indo-aryan")>>
-<<case "Pakistani">>
-	<<set $activeSlave.race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
-<<case "Bangladeshi">>
-	<<set $activeSlave.race to either("indo-aryan")>>
-<<case "Belarusian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Russian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Ukrainian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Irish">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Icelandic">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Finnish">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Swiss">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Danish">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Norwegian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Austrian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Slovak">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
-<<case "Dutch">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Belgian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Czech">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Serbian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Portuguese">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Hungarian">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "indo-aryan")>>
-<<case "Estonian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Polish">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Lithuanian">>
-	<<set $activeSlave.race to either("white")>>
-<<case "Romanian">>
-	<<set $activeSlave.race to either("semitic", "white", "white", "white", "white", "indo-aryan")>>
-<<case "German">>
-	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "white")>>
-<<case "Swedish">>
-	<<set $activeSlave.race to either("middle eastern", "white", "white", "white", "white")>>
-<<case "French">>
-	<<set $activeSlave.race to either("black", "middle eastern", "white", "white", "white", "white", "white", "southern European")>>
-<<case "Italian">>
-	<<set $activeSlave.race to either("middle eastern", "southern European", "southern European", "white", "white")>>
-<<case "Greek">>
-	<<set $activeSlave.race to either("southern European")>>
-<<case "Spanish">>
-	<<set $activeSlave.race to either("semitic", "southern European", "southern European")>>
-<<case "British">>
-	<<set $activeSlave.race to either("indo-aryan", "white", "white", "white", "white", "white", "white", "white", "white", "white")>>
-<<case "Scottish">>
-	<<set $activeSlave.race to either("middle eastern", "indo-aryan", "white", "white", "white", "white", "white", "white", "white")>>
-<<case "Australian">>
-	<<set $activeSlave.race to either("white", "white", "black", "asian")>>
-<<case "a New Zealander">>
-	<<set $activeSlave.race to either("white", "white", "white", "white", "pacific islander")>>
-<<default>>
-	<<set $activeSlave.race to either("white")>>
-<</switch>>
-
-/% Begin mixed race rate adjustment. %/
-/% Some countries are extremely ethnically homogeneous and unlikely to change soon. %/
-<<if ($activeSlave.nationality is "Japanese")>>
-	<<if random(1,100) > 98>>
-		<<set $activeSlave.race to "mixed race">>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Korean")>>
-	<<if random(1,100) > 95>>
-		<<set $activeSlave.race to "mixed race">>
-	<</if>>
-<<elseif ($activeSlave.nationality is "Polish") or ($activeSlave.nationality is "Romanian") or ($activeSlave.nationality is "Bulgarian") or ($activeSlave.nationality is "Lithuanian") or ($activeSlave.nationality is "Croatian")>>
-	/% Croatia isn't an origin currently but the game might add it in the future. %/
-	<<if random(1,100) > 98>>
-		<<set $activeSlave.race to "mixed race">>
-	<</if>>
-<<elseif random(1,100) > 90>>
-	/% Default rate. %/
-	<<set $activeSlave.race to "mixed race">>
-<</if>>
-/% End mixed race rate adjustment. %/
-
-<</widget>>
-
-<<widget "NationalityToName">>
-
-<<switch $activeSlave.nationality>>
-<<case "American">>
-	<<if $activeSlave.race is "black">>
-		<<set $activeSlave.birthName to $africanAmericanSlaveNames.random()>>
-	<<elseif $activeSlave.race is "latina">>
-		<<set $activeSlave.birthName to $latinaSlaveNames.random()>>
-	<<elseif $activeSlave.race is "asian">>
-		<<set $activeSlave.birthName to $asianAmericanSlaveNames.random()>>
-	<<elseif $activeSlave.race is "middle eastern">>
-		<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
-	<</if>>
-<<case "Canadian">>
-	<<set $activeSlave.birthName to $canadianSlaveNames.random()>>
-<<case "Mexican">>
-	<<set $activeSlave.birthName to $mexicanSlaveNames.random()>>
-<<case "Dominican">>
-	<<set $activeSlave.birthName to $dominicanSlaveNames.random()>>
-<<case "Puerto Rican">>
-	<<set $activeSlave.birthName to $puertoRicanSlaveNames.random()>>
-<<case "Haitian">>
-	<<set $activeSlave.birthName to $haitianSlaveNames.random()>>
-<<case "Jamaican">>
-	<<set $activeSlave.birthName to $jamaicanSlaveNames.random()>>
-<<case "Cuban">>
-	<<set $activeSlave.birthName to $cubanSlaveNames.random()>>
-<<case "Guatemalan">>
-	<<set $activeSlave.birthName to $guatemalanSlaveNames.random()>>
-<<case "Chilean">>
-	<<set $activeSlave.birthName to $chileanSlaveNames.random()>>
-<<case "Peruvian">>
-	<<set $activeSlave.birthName to $peruvianSlaveNames.random()>>
-<<case "Bolivian">>
-	<<set $activeSlave.birthName to $bolivianSlaveNames.random()>>
-<<case "Venezuelan">>
-	<<set $activeSlave.birthName to $venezuelanSlaveNames.random()>>
-<<case "Belarusian">>
-	<<set $activeSlave.birthName to $belarusianSlaveNames.random()>>
-<<case "Russian">>
-	<<set $activeSlave.birthName to $russianSlaveNames.random()>>
-<<case "Ukrainian">>
-	<<set $activeSlave.birthName to $ukrainianSlaveNames.random()>>
-<<case "Italian">>
-	<<set $activeSlave.birthName to $italianSlaveNames.random()>>
-<<case "Spanish">>
-	<<set $activeSlave.birthName to $spanishSlaveNames.random()>>
-<<case "British">>
-	<<set $activeSlave.birthName to $britishSlaveNames.random()>>
-<<case "Scottish">>
-	<<set $activeSlave.birthName to $scottishSlaveNames.random()>>
-<<case "French">>
-	<<set $activeSlave.birthName to $frenchSlaveNames.random()>>
-<<case "German">>
-	<<set $activeSlave.birthName to $germanSlaveNames.random()>>
-<<case "Lithuanian">>
-	<<set $activeSlave.birthName to $lithuanianSlaveNames.random()>>
-<<case "Norwegian">>
-	<<set $activeSlave.birthName to $norwegianSlaveNames.random()>>
-<<case "Slovak">>
-	<<set $activeSlave.birthName to $slovakSlaveNames.random()>>
-<<case "Danish">>
-	<<set $activeSlave.birthName to $danishSlaveNames.random()>>
-<<case "Dutch">>
-	<<set $activeSlave.birthName to $dutchSlaveNames.random()>>
-<<case "Austrian">>
-	<<set $activeSlave.birthName to $austrianSlaveNames.random()>>
-<<case "Swiss">>
-	<<set $activeSlave.birthName to $swissSlaveNames.random()>>
-<<case "Serbian">>
-	<<set $activeSlave.birthName to $serbianSlaveNames.random()>>
-<<case "Belgian">>
-	<<set $activeSlave.birthName to $belgianSlaveNames.random()>>
-<<case "Czech">>
-	<<set $activeSlave.birthName to $czechSlaveNames.random()>>
-<<case "Portuguese">>
-	<<set $activeSlave.birthName to $portugueseSlaveNames.random()>>
-<<case "Swedish">>
-	<<set $activeSlave.birthName to $swedishSlaveNames.random()>>
-<<case "Romanian">>
-	<<set $activeSlave.birthName to $romanianSlaveNames.random()>>
-<<case "Hungarian">>
-	<<set $activeSlave.birthName to $hungarianSlaveNames.random()>>
-<<case "Estonian">>
-	<<set $activeSlave.birthName to $estonianSlaveNames.random()>>
-<<case "Irish">>
-	<<set $activeSlave.birthName to $irishSlaveNames.random()>>
-<<case "Icelandic">>
-	<<set $activeSlave.birthName to $icelandicSlaveNames.random()>>
-<<case "Finnish">>
-	<<set $activeSlave.birthName to $finnishSlaveNames.random()>>
-<<case "Greek">>
-	<<set $activeSlave.birthName to $greekSlaveNames.random()>>
-<<case "Polish">>
-	<<set $activeSlave.birthName to $polishSlaveNames.random()>>
-<<case "Brazilian">>
-	<<set $activeSlave.birthName to $brazilianSlaveNames.random()>>
-<<case "Egyptian">>
-	<<set $activeSlave.birthName to $egyptianSlaveNames.random()>>
-<<case "Colombian">>
-	<<set $activeSlave.birthName to $colombianSlaveNames.random()>>
-<<case "Argentinian">>
-	<<set $activeSlave.birthName to $argentinianSlaveNames.random()>>
-<<case "Turkish">>
-	<<set $activeSlave.birthName to $turkishSlaveNames.random()>>
-<<case "Iranian">>
-	<<set $activeSlave.birthName to $iranianSlaveNames.random()>>
-<<case "Armenian">>
-	<<set $activeSlave.birthName to $armenianSlaveNames.random()>>
-<<case "Israeli">>
-	<<set $activeSlave.birthName to $israeliSlaveNames.random()>>
-<<case "Saudi">>
-	<<set $activeSlave.birthName to $saudiSlaveNames.random()>>
-<<case "South African">>
-	<<if $activeSlave.race is "black">>
-		<<set $activeSlave.birthName to $blackSouthAfricanSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $whiteSouthAfricanSlaveNames.random()>>
-	<</if>>
-<<case "Nigerian">>
-	<<set $activeSlave.birthName to $nigerianSlaveNames.random()>>
-<<case "Congolese">>
-	<<set $activeSlave.birthName to $congoleseSlaveNames.random()>>
-<<case "Kenyan">>
-	<<set $activeSlave.birthName to $kenyanSlaveNames.random()>>
-<<case "Tanzanian">>
-	<<set $activeSlave.birthName to $tanzanianSlaveNames.random()>>
-<<case "Zimbabwean">>
-	<<if $activeSlave.race == "white">>
-		<<set $activeSlave.birthName to $britishSlaveNames.random()>>
-	<<else>>
-		<<set $activeSlave.birthName to $zimbabweanSlaveNames.random()>>
-	<</if>>
-<<case "Ghanan">>
-	<<set $activeSlave.birthName to $ghananSlaveNames.random()>>
-<<case "Ugandan">>
-	<<set $activeSlave.birthName to $ugandanSlaveNames.random()>>
-<<case "Ethiopian">>
-	<<set $activeSlave.birthName to $ethiopianSlaveNames.random()>>
-<<case "Moroccan">>
-	<<set $activeSlave.birthName to $moroccanSlaveNames.random()>>
-<<case "Chinese">>
-	<<set $activeSlave.birthName to $chineseSlaveNames.random()>>
-<<case "Korean">>
-	<<set $activeSlave.birthName to $koreanSlaveNames.random()>>
-<<case "Thai">>
-	<<set $activeSlave.birthName to $thaiSlaveNames.random()>>
-<<case "Vietnamese">>
-	<<set $activeSlave.birthName to $vietnameseSlaveNames.random()>>
-<<case "Japanese">>
-	<<set $activeSlave.birthName to $japaneseSlaveNames.random()>>
-<<case "Indonesian">>
-	<<set $activeSlave.birthName to $indonesianSlaveNames.random()>>
-<<case "Filipina">>
-	<<set $activeSlave.birthName to $filipinaSlaveNames.random()>>
-<<case "Bangladeshi">>
-	<<set $activeSlave.birthName to $bangladeshiSlaveNames.random()>>
-<<case "Malaysian">>
-	<<set $activeSlave.birthName to $malaysianSlaveNames.random()>>
-<<case "Uzbek">>
-	<<set $activeSlave.birthName to $uzbekSlaveNames.random()>>
-<<case "Afghan">>
-	<<set $activeSlave.birthName to $afghanSlaveNames.random()>>
-<<case "Nepalese">>
-	<<set $activeSlave.birthName to $nepaleseSlaveNames.random()>>
-<<case "Burmese">>
-	<<set $activeSlave.birthName to $burmeseSlaveNames.random()>>
-<<case "Iraqi">>
-	<<set $activeSlave.birthName to $iraqiSlaveNames.random()>>
-<<case "Yemeni">>
-	<<set $activeSlave.birthName to $yemeniSlaveNames.random()>>
-<<case "Sudanese">>
-	<<set $activeSlave.birthName to $sudaneseSlaveNames.random()>>
-<<case "Algerian">>
-	<<set $activeSlave.birthName to $algerianSlaveNames.random()>>
-<<case "Tunisian">>
-	<<set $activeSlave.birthName to $tunisianSlaveNames.random()>>
-<<case "Libyan">>
-	<<set $activeSlave.birthName to $libyanSlaveNames.random()>>
-<<case "Omani">>
-	<<set $activeSlave.birthName to $omaniSlaveNames.random()>>
-<<case "Malian">>
-	<<set $activeSlave.birthName to $malianSlaveNames.random()>>
-<<case "Jordanian">>
-	<<set $activeSlave.birthName to $jordanianSlaveNames.random()>>
-<<case "Lebanese">>
-	<<set $activeSlave.birthName to $lebaneseSlaveNames.random()>>
-<<case "Emirati">>
-	<<set $activeSlave.birthName to $emiratiSlaveNames.random()>>
-<<case "Kazakh">>
-	<<set $activeSlave.birthName to $kazakhSlaveNames.random()>>
-<<case "Pakistani">>
-	<<set $activeSlave.birthName to $pakistaniSlaveNames.random()>>
-<<case "Indian">>
-	<<set $activeSlave.birthName to $indianSlaveNames.random()>>
-<<case "Australian">>
-	<<set $activeSlave.birthName to $australianSlaveNames.random()>>
-<<case "a New Zealander">>
-	<<set $activeSlave.birthName to $newZealanderSlaveNames.random()>>
-<<default>>
-	<<set $activeSlave.birthName to $whiteAmericanSlaveNames.random()>>
-<</switch>>
-
-<</widget>>
-
-<<widget "NationalityToAccent">>
-
-<<set $seed to either(0,1,1,2,2,2,3,3,3,3)>>
-
-<<switch $activeSlave.nationality>>
-<<case "American">>
-	<<if $activeSlave.race is "black">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<else>>
-		<<set $activeSlave.accent to either(0,1,1,2,2,2,3,3,3,3)>>
-	<</if>>
-	<<elseif $activeSlave.race is "latina">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Spanish">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<elseif $activeSlave.race is "asian">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Chinese">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<elseif $activeSlave.race is "middle eastern">>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<elseif $language is "Arabic">>
-		<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<<else>>
-	<<if $language is "English">>
-		<<set $activeSlave.accent to 0>>
-	<<else>>
-		<<set $activeSlave.accent to $seed>>
-	<</if>>
-	<</if>>
-<<case "Canadian">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Mexican">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Dominican">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Puerto Rican">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Haitian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Jamaican">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Cuban">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Guatemalan">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Chilean">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Peruvian">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Bolivian">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Venezuelan">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Russian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Ukrainian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Italian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Spanish">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "British">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Scottish">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 2>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "French">>
-	<<set $activeSlave.accent to $seed>>
-<<case "German">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Lithuanian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Belarusian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Norwegian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Slovak">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Danish">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Dutch">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Austrian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Swiss">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Serbian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Belgian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Czech">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Portuguese">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Swedish">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Romanian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Hungarian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Estonian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Irish">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Icelandic">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Finnish">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Greek">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Polish">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Brazilian">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Egyptian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Colombian">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Argentinian">>
-	<<if $language is "Spanish">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Turkish">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Iranian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Armenian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Israeli">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Saudi">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "South African">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Nigerian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Congolese">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Kenyan">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Tanzanian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Zimbabwean">>
-	<<if $language is "English" && $activeSlave.race == "white">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Ghanan">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Ugandan">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Ethiopian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Moroccan">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Chinese">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Korean">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Thai">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Vietnamese">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Japanese">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Indonesian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Filipina">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Bangladeshi">>
-	<<if $language is "Indian">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Malaysian">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Uzbek">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Afghan">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Nepalese">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Burmese">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Iraqi">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Yemeni">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Sudanese">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Algerian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Tunisian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Libyan">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Omani">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Malian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Jordanian">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Lebanese">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Emirati">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Kazakh">>
-	<<set $activeSlave.accent to $seed>>
-<<case "Pakistani">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to either(0,1,2,3)>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Indian">>
-	<<if $language is "Indian">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Australian">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "a New Zealander">>
-	<<if $language is "English">>
-	<<set $activeSlave.accent to 1>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Roman Revivalist">>
-	<<if $language is "Latin">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Ancient Egyptian Revivalist">>
-	<<if $language is "Ancient Egyptian">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Edo Revivalist">>
-	<<if $language is "Japanese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Arabian Revivalist">>
-	<<if $language is "Arabic">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<case "Ancient Chinese Revivalist">>
-	<<if $language is "Chinese">>
-	<<set $activeSlave.accent to 0>>
-	<<else>>
-	<<set $activeSlave.accent to $seed>>
-	<</if>>
-<<default>>
-	<<set $activeSlave.accent to $seed>>
-<</switch>>
-
-<<if $activeSlave.nationality is $language>>
-	<<set $activeSlave.accent to 0>>
-<</if>>
-
-<</widget>>
\ No newline at end of file
diff --git a/src/uncategorized/nextWeek.tw b/src/uncategorized/nextWeek.tw
index 196e4d5aba0b188f9503ddaddf5608e2be8cebd9..5ded7f28871247595e2c665a05e8583de959ab3c 100644
--- a/src/uncategorized/nextWeek.tw
+++ b/src/uncategorized/nextWeek.tw
@@ -211,7 +211,7 @@
 
 /% These are variables that either should be made into _temp vars or should be Zeroed out once done with them instead of here. This can also interfere with debugging or hide NaN's as zeroing things out would clear a NaN. Also could stop from NaN's getting worse? %/
 /% Integer and float variables. No real need to zero them out but doesn't hurt to have them in a known state, though this might mask variables NaN'ing out. Takes up the least amount of Memory besides a "" string. %/
-<<set $averageProsperity = 0, $beauty = 0, $beautyMultiplier = 0, $boobsID = -1, $boobsInterestTargetID = -1, $brideSlave = -1, $buttslutID = -1, $buttslutInterestTargetID = -1, $costs = 0, $cumslutID = -1, $FResult = 0, $girlsCosts = 0, $groomSlave = -1, $humiliationID = -1, $humiliationInterestTargetID = -1, $i = 0, $I = 0, $individualCosts = 0, $influenceBonus = 0, $j = 0, $learning = 0, $m = 0, $masochistID = -1, $masochistInterestTargetID = -1, $opinion = 0, $r = 0, $subID = -1, $submissiveInterestTargetID = -1, $weddingSlaveID = -1, $x = 0, $y = 0, $relationID = 0, $tempMF = 0, $relationType = 0>>
+<<set $averageProsperity = 0, $beauty = 0, $beautyMultiplier = 0, $boobsID = -1, $boobsInterestTargetID = -1, $brideSlave = -1, $buttslutID = -1, $buttslutInterestTargetID = -1, $costs = 0, $cumslutID = -1, $FResult = 0, $groomSlave = -1, $humiliationID = -1, $humiliationInterestTargetID = -1, $i = 0, $I = 0, $individualCosts = 0, $influenceBonus = 0, $j = 0, $learning = 0, $m = 0, $masochistID = -1, $masochistInterestTargetID = -1, $opinion = 0, $r = 0, $subID = -1, $submissiveInterestTargetID = -1, $weddingSlaveID = -1, $x = 0, $y = 0, $relationID = 0, $tempMF = 0, $relationType = 0>>
 
 /% Other arrays %/
 <<set $events = [], $FSAcquisitionEvents = [], $FSNonconformistEvents = [], $nurseMolestationSubIDs = [], $PESSevent = [], $PETSevent = [], $qualifiedNicknames = [], $REAnalCowgirlSubIDs = [], $REButtholeCheckinIDs = [], $RECIevent = [], $recruit = [], $RETasteTestSubIDs = [], $qualifiedFS to [], $recruitedType to []>>
diff --git a/src/uncategorized/options.tw b/src/uncategorized/options.tw
index de2bb0fdb1965a3cd24ca218eb67a1161f49ddf0..ed4ff53b27c8cd8f60e6216e0154eb1672df0276 100644
--- a/src/uncategorized/options.tw
+++ b/src/uncategorized/options.tw
@@ -5,6 +5,10 @@
 
 This save was created using FC version $ver.
 
+<br><br>
+Genetics array test:
+<<click "Run Test">><<goto "test genetics">><</click>>
+
 <br><br>
 
 <<if ($autosave == 0)>>
diff --git a/src/uncategorized/pRivalryHostage.tw b/src/uncategorized/pRivalryHostage.tw
index 4dfa42d1b3a7b0292856727ed3288d182488148a..9522d5676a1eeb674379ebf2239e32f5291240ed 100644
--- a/src/uncategorized/pRivalryHostage.tw
+++ b/src/uncategorized/pRivalryHostage.tw
@@ -28,8 +28,12 @@
 <<set $activeSlave.relation to 0>>
 <<set $activeSlave.relationTarget to 0>>
 <<set $activeSlave.canRecruit = 0>>
+<<set $activeSlave.mother = 0>>
+<<set $activeSlave.father = 0>>
+<<set $activeSlave.sisters = 0>>
+<<set $activeSlave.daughters = 0>>
 <<if $arcologies[0].FSSupremacistRace != 0>><<set $activeSlave.race to $arcologies[0].FSSupremacistRace>><</if>>
-<<NationalityToName>>
+<<NationalityToName $activeSlave>>
 <<set $activeSlave.slaveName to $activeSlave.birthName>>
 
 <<set $activeSlave.actualAge to Number($activeSlave.actualAge)>>
diff --git a/src/uncategorized/peConcubineInterview.tw b/src/uncategorized/peConcubineInterview.tw
index a482b6f475dbae6ff25a19ef1d75ae117cca88b8..e26ddcc7958c7ee7064c2766178dd12f5f41ce26 100644
--- a/src/uncategorized/peConcubineInterview.tw
+++ b/src/uncategorized/peConcubineInterview.tw
@@ -176,7 +176,7 @@ You receive an official communication from a popular talk show hosted in one of
 		<</if>>
 		<<if $activeSlave.intelligence > 1>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
-		Only because you know her so well are you able to percieve the instant of cold calculation before she makes a @@color:green;perfect tactical decision@@ and turns directly to the camera.
+		Only because you know her so well are you able to perceive the instant of cold calculation before she makes a @@color:green;perfect tactical decision@@ and turns directly to the camera.
 		<<if SlaveStatsChecker.checkForLisp($activeSlave)>>
 			"Whatever you want," she says confidently, "You can find it in a Free Citieth arcology like my <<if def $PC.customTitleLisp>>$PC.customTitleLisp<<elseif $PC.title != 0>>Mathter<<else>>Mithtreth<</if>>'th. Where I live, there'th
 			<<if $arcologies[0].FSRestart > 0>>
diff --git a/src/uncategorized/pePitFight.tw b/src/uncategorized/pePitFight.tw
index 57796179f97b87014a592db39a8ac4c94b3c8ecd..562e1bd88386a1e9572b0f8c489011c848df6185 100644
--- a/src/uncategorized/pePitFight.tw
+++ b/src/uncategorized/pePitFight.tw
@@ -38,6 +38,12 @@ Across the ring, her opponent's owner nods civilly to you and examines $activeSl
 	Her huge muscles are an intimidating sight, but may hinder her flexibility.
 <<elseif $activeSlave.muscles > 30>>
 	Her muscles are a trim and powerful sight.
+<<elseif $slaves[$i].muscles < -95>>
+	She can barely stand, let alone ready her weapon. Her feeble attempts elicit a roar of laughter from the spectators.
+<<elseif $slaves[$i].muscles < -30>>
+	She struggles to raise her weapon. Her feeble attempts elicit a roar of laughter from the spectators.
+<<elseif $slaves[$i].muscles < -5>>
+	She is rather unfit, she will likely be outmatched by near any real opponent.
 <</if>>
 
 <<if $activeSlave.height >= 170>>
diff --git a/src/uncategorized/personalAssistantAppearance.tw b/src/uncategorized/personalAssistantAppearance.tw
index 06beb39e131daef9bda82045fd78cc1272a5cac2..f278b6c13d638d19409b1c054a7f0da199e827e1 100644
--- a/src/uncategorized/personalAssistantAppearance.tw
+++ b/src/uncategorized/personalAssistantAppearance.tw
@@ -455,68 +455,6 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 	She's watching you attentively, waiting for a chance to be helpful. When she sees your glance, she smiles hopefully, sticks out her chest a little, and turns from side to side to show off.
 <</if>>
 
-<<elseif $assistantAppearance is "shemale">>
-	She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>bimbo shemale with blonde hair, <<if $arcologies[0].FSSupremacist != "unset">><<if $arcologies[0].FSSupremacistRace is "black">><<print either("black", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "white">><<print either("tanned", "fair")>><<elseif $arcologies[0].FSSupremacistRace is "latina">><<print either("olive", "brown", "light brown")>><<elseif $arcologies[0].FSSupremacistRace is "indo-aryan" or $arcologies[0].FSSupremacistRace is "malay" or $arcologies[0].FSSupremacistRace is "pacific islander" or $arcologies[0].FSSupremacistRace is "amerindian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "asian">><<print either("dark", "tanned")>><<elseif $arcologies[0].FSSupremacistRace is "middle eastern" or $arcologies[0].FSSupremacistRace is "semitic" or $arcologies[0].FSSupremacistRace is "southern European">><<print either("dark", "tanned")>><</if>><<else>>tanned<</if>> skin, huge lips, and ridiculous tits. Her cock hangs past her knees when limp.
-	<<if $assistantFSOptions>>
-	<<switch $assistantFSAppearance>>
-	<<case "paternalist">>
-		She's made herself up to look a bit more classy recently: she has elegant fake nails, and has her hair piled up on her head.
-	<<case "degradationist">>
-		She's made herself up to look almost comically evil: she's wearing black lipstick, black eyeliner, and a black barbed cockring.
-	<<case "roman revivalist">>
-		She's taken to reclining on a traditional Roman couch and drinking wine out of a shallow dish.
-	<<case "egyptian revivalist">>
-		She's wearing an Egyptian melting perfume cake on her head.
-	<<case "edo revivalist">>
-		She's wearing a brief Japanese bathhouse robe.
-	<<case "arabian revivalist">>
-		She's dressed herself like an oil millionare, with aviator sunglasses and a headscarf.
-	<<case "chinese revivalist">>
-		She's added various tattoos of rude Chinese characters to her body recently.
-	<<case "chattel religionist">>
-		She's wearing the garb of a priestess of the new faith, which frames her cock prominently.
-	<<case "physical idealist">>
-		She's extremely muscular: she shines with body oil, and her abs have abs.
-	<<case "repopulation focus">>
-		She is incredably pregnant, her belly preventing her from playing with herself effectively.
-	<<case "eugenics">>
-		Her sizable dick is restrained in a complicated chastity device.
-	<<case "gender radicalist">>
-		She's rendered her cock in even more loving detail recently, adding a couple of veins and a bead of precum.
-	<<case "gender fundamentalist">>
-		She's taken to concealing her dick recently, and cheekily turns away from you to hide it as much as possible.
-	<<case "asset expansionist">>
-		She's increased the size of her assets recently: she's increased the girth of her dick until it's as thick as one of her arms, and her boobs are the size of beach balls.
-	<<case "transformation fetishist">>
-		Her tits, ass and lips are carefully rendered to make them look fake.
-	<<case "pastoralist">>
-		She's lactating, and her orgasms produce comically powerful jets of cum.
-	<<case "maturity preferentialist">>
-		She's quite mature, with a lean face that accentuates her cheekbones.
-	<<case "youth preferentialist">>
-		She's surprisingly young, and looks as innocent as a computer generated image of a girl with a pornstar dick possibly can.
-	<<case "slimness enthusiast">>
-		She's recently altered her appearance to be slimmer and more athletic.
-	<<case "body purist">>
-		She's recently improved her appearance to look more natural, with prettier boobs and softer hips.
-	<</switch>>
-	<</if>>
-<<if ($cockFeeder == 1) and ($seed == 1)>>
-	A recognizable little representation of one of your slaves is down on its knees in front of her, gagging on her enormous dick. The slave must be down in the kitchen, getting a meal out of the phallic food dispensers. As you watch, the shemale orgasms; she notices you watching her, and blows you a wet kiss.
-<<elseif ($suppository == 1) and ($seed == 2)>>
-	A recognizable little representation of one of your slaves is down on its knees in front of her, moaning as it takes her massive prick. The slave must be receiving her drugs from one of the dildo dispensers. As you watch, the shemale looks up at you, winks, and starts pulling out after each thrust, her cock making a popping noise each time it leaves the slave's butthole.
-<<elseif ($masturbationAllowed == 1) and ($seed is 3)>>
-	She's giving a blowjob to a recognizable little representation of one of your slaves. The slave must be using one of the penthouse's many vibrators. The shemale is looking after herself, too, jerking herself off with one hand and playing with her asshole with the other.
-<<elseif ($seed is 4)>>
-	A recognizable little representation of one of your slaves is lying with its head in her lap. The shemale is wearing a little stethoscope and is listening to the slave breathe; the slave must be getting a checkup. The shemale is restraining herself for once, patting the slave's head and cooing reassuringly.
-<<elseif ($seed is 5) and ($invasionVictory > 0)>>
-	She's masturbating as she takes it up the ass from a representation of one of your security drones, which appears to have a little dildo mounted in place of one of its gun assemblies. When she sees you looking at her, she giggles and says, "What? I like him! He did really well during the invasion."
-<<elseif ($seed is 6) and ($studio == 1)>>
-	The shemale is plowing a recognizable little representation of one of your slaves up the butt, and is using a handheld camera to film the action, gonzo style. The slave must be using one of the penthouse's many vibrators, and $assistantName is clearly turning the feed of it into porn.
-<<else>>
-	She's sitting crosslegged, bending down to suck herself off and looking up at you at the same time. When she sees your attention she lets her dick pop free of her mouth and waits for a moment to see if you have instructions for her, and then goes back to autofellatio.
-<</if>>
-
 <<elseif $assistantAppearance is "hypergoddess">>
 	She's a cute "little" <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0].FSSupremacistRace <</if>>fertility goddess, with monstrously wide hips, enormous milky breasts and a room filling belly.  Her overfull stomach bulges and squirms from her hundreds of occupants, as well as parts her milk swollen breasts to either side.
 	<<if $assistantFSOptions>>
@@ -835,7 +773,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 		wearing a simple white linen dress and has eyeshadow poorly applied around her eyes.
 	<<case "edo revivalist">>
 		wearing a fine kimono and holding a little fan. She looks like a little Hina doll.
-	<<elseif  $assistantFSAppearance is "arabian revivalist">>
+	<<case "arabian revivalist">>
 		wearing a strip of silk as a dress.
 	<<case "chinese revivalist">>
 		wearing a silk cheongsam with a little green cap on her head. Her hair is braided on the sides. She looks like a figurine from some kind of game.
@@ -940,7 +878,7 @@ She's a cute little <<if $arcologies[0].FSSupremacist != "unset">>$arcologies[0]
 		slime. She is compacting her slime to make herself look thinner.
 	<<case "body purist">>
 		slime with the purest goo her body could be made of.
-    <<else>>
+    <<default>>
 		slime with a pair of shorts and a shirt floating inside her.
 	<</switch>>
 	<<else>>
diff --git a/src/uncategorized/randomIndividualEvent.tw b/src/uncategorized/randomIndividualEvent.tw
index 9c54764c7973990b81b87e9c6e49ce35ea56b2ac..1acd692293fc776bee51ccdb459301cbc7dfb104 100644
--- a/src/uncategorized/randomIndividualEvent.tw
+++ b/src/uncategorized/randomIndividualEvent.tw
@@ -519,7 +519,7 @@
 <</if>>
 <</if>>
 
-<<if ($seeAge == 1)>>
+<<if ($seeAge != 0)>>
 <<if ($eventSlave.devotion > 50)>>
 <<if ($eventSlave.speechRules != "restrictive")>>
 <<if ($week-$eventSlave.birthWeek >= 51)>>
diff --git a/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw b/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
index 89ee6ae0d2717f7ccb7b90f76413a0b67c629267..5416684f203662d71a3a6c93cee79bcff8cb6c49 100644
--- a/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
+++ b/src/uncategorized/reFSEgyptianRevivalistAcquisitionWorkaround.tw
@@ -5,9 +5,9 @@ They arrive hand-in-hand and don't let go of each other until the end of the ens
 
 <<AddSlave $sibling>>
 
-<<set _secondSlave to $activeSlave>>
+<<set _secondSlave to clone($activeSlave)>>
 
-<<NationalityToName>>
+<<NationalityToName _secondSlave>>
 
 <<set _secondSlave.slaveName to $activeSlave.birthName>>
 <<set _secondSlave.ID to $activeSlave.ID + 1000>>
diff --git a/src/uncategorized/reRelativeRecruiter.tw b/src/uncategorized/reRelativeRecruiter.tw
index 0747d730a21ec9bdc33358537902e4cdbdde6419..67e4f8d870396e75c3368deefb5256736fa378a9 100644
--- a/src/uncategorized/reRelativeRecruiter.tw
+++ b/src/uncategorized/reRelativeRecruiter.tw
@@ -10,6 +10,7 @@
 	<<set $newRelativeRecruitID = 1100000>>
 <</if>>
 
+
 <<for $i to 0; $i < $slaves.length; $i++>>
 	<<if $slaves[$i].fuckdoll == 0>>
 	<<if $slaves[$i].canRecruit == 1>>
@@ -29,38 +30,54 @@
 <</for>>
 
 <<set $recruitedType = []>>
-<<if $eventSlave.mother == 0 && $activeSlave.actualAge < 24>>
+<<if $eventSlave.mother == 0 && $activeSlave.actualAge < 24 && $seeDicks != 100>>>>
 	<<set $recruitedType.push("mother")>>
 	<<set $recruitedType.push("mother")>>
 	<<set $recruitedType.push("mother")>>
 <</if>>
-<<if $eventSlave.father == 0 && $activeSlave.actualAge < 24>>
+<<if $eventSlave.father == 0 && $activeSlave.actualAge < 24 && $seeDicks != 0>>
 	<<set $recruitedType.push("father")>>
 <</if>>
 <<if $eventSlave.daughters < 3 && $activeSlave.actualAge > ($minimumSlaveAge+$fertilityAge) && isFertile($activeSlave)>>
-	<<set $recruitedType.push("daughter")>>
-	<<set $recruitedType.push("daughter")>>
-	<<set $recruitedType.push("son")>>
+	<<if $seeDicks != 100>>
+		<<set $recruitedType.push("daughter")>>
+		<<set $recruitedType.push("daughter")>>
+	<</if>>
+	<<if $seeDicks != 0>>
+		<<set $recruitedType.push("son")>>
+	<</if>>
 	<<set $tempMF = "mother">>
 <</if>>
 <<if $eventSlave.daughters < 3 && $activeSlave.actualAge > ($minimumSlaveAge+$potencyAge) && $activeSlave.balls > 0>>
-	<<set $recruitedType.push("daughter")>>
-	<<set $recruitedType.push("daughter")>>
-	<<set $recruitedType.push("son")>>
+	<<if $seeDicks != 100>>
+		<<set $recruitedType.push("daughter")>>
+		<<set $recruitedType.push("daughter")>>
+	<</if>>
+	<<if $seeDicks != 0>>
+		<<set $recruitedType.push("son")>>
+	<</if>>
 	<<set $tempMF = "father">>
 <</if>>
 <<if $eventSlave.sisters < 3>>
 	<<if $activeSlave.actualAge <= ($retirementAge-5)>>
-		<<set $recruitedType.push("older sister")>>
-		<<set $recruitedType.push("older sister")>>
-		<<set $recruitedType.push("older brother")>>
-		<<set $recruitedType.push("older brother")>>
+		<<if $seeDicks != 100>>
+			<<set $recruitedType.push("older sister")>>
+			<<set $recruitedType.push("older sister")>>
+		<</if>>
+		<<if $seeDicks != 0>>
+			<<set $recruitedType.push("older brother")>>
+			<<set $recruitedType.push("older brother")>>
+		<</if>>
 	<</if>>
 	<<if $activeSlave.actualAge >= ($minimumSlaveAge+5)>>
-		<<set $recruitedType.push("younger sister")>>
-		<<set $recruitedType.push("younger sister")>>
-		<<set $recruitedType.push("younger brother")>>
-		<<set $recruitedType.push("younger brother")>>
+		<<if $seeDicks != 100>>
+			<<set $recruitedType.push("younger sister")>>
+			<<set $recruitedType.push("younger sister")>>
+		<</if>>
+		<<if $seeDicks != 0>>
+			<<set $recruitedType.push("younger brother")>>
+			<<set $recruitedType.push("younger brother")>>
+		<</if>>
 	<</if>>
 	<<set $recruitedType.push("twin")>>
 <</if>>
@@ -226,7 +243,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.bellySag = 4>>
 	<<set $activeSlave.energy = 65>>
 	<<set $activeSlave.bellTat = "a heart">>
-	<<set $activeSlave.actualAge += random(15,20)>>
+	<<set $activeSlave.actualAge = ($eventSlave.actualAge+random(15,20))>>
 
 <<case "father">>
 	<<set $activeSlave.origin to "She was recruited into your service by her daughter.">>
@@ -240,9 +257,10 @@ She waits anxiously for your decision.
 	<<set $activeSlave.voice = 1>>
 	<<set $activeSlave.energy = 0>>
 	<<set $activeSlave.penis = 2>>
+	<<set $activeSlave.vagina = -1>>
 	<<set $activeSlave.boobs = (random(5,6)*100)>>
 	<<set $activeSlave.butt = random(4,6)>>
-	<<set $activeSlave.actualAge += random(15,20)>>
+	<<set $activeSlave.actualAge = ($eventSlave.actualAge+random(15,20))>>
 	<<set $activeSlaveOneTimeMaxAge to Math.max($minimumSlaveAge, Math.min(18, ($activeSlave.actualAge - Math.min(11, $potencyAge))))>>
 	<<set $activeSlaveOneTimeMinAge to Math.max($minimumSlaveAge, Math.min(14, $activeSlaveOneTimeMaxAge))>>
 	<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge to $minimumSlaveAge>><</if>>
@@ -270,7 +288,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.nails = 4>>
 	<<set $activeSlave.hStyle = either("tails", "neat", "up", "luxurious")>>
 	<<set $activeSlave.stampTat = "advertisements">>
-	<<set $activeSlaveOneTimeMaxAge to Math.max($minimumSlaveAge, Math.min(18, ($activeSlave.actualAge - Math.min(11, $fertilityAge))))>>
+	<<set $activeSlaveOneTimeMaxAge to Math.max($minimumSlaveAge, Math.min(18, ($eventSlave.actualAge - Math.min(11, $fertilityAge))))>>
 	<<set $activeSlaveOneTimeMinAge to Math.max($minimumSlaveAge, Math.min(14, $activeSlaveOneTimeMaxAge))>>
 	<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge to $minimumSlaveAge>><</if>>
 	<<set $activeSlave.actualAge to random($activeSlaveOneTimeMinAge, $activeSlaveOneTimeMaxAge)>>
@@ -295,7 +313,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.nails = 4>>
 	<<set $activeSlave.hStyle = "tails">>
 	<<set $activeSlave.stampTat = "advertisements">>
-	<<set $activeSlaveOneTimeMaxAge to Math.max($minimumSlaveAge, Math.min(18, ($activeSlave.actualAge - Math.min(11, $fertilityAge))))>>
+	<<set $activeSlaveOneTimeMaxAge to Math.max($minimumSlaveAge, Math.min(18, ($eventSlave.actualAge - Math.min(11, $fertilityAge))))>>
 	<<set $activeSlaveOneTimeMinAge to Math.max($minimumSlaveAge, Math.min(14, $activeSlaveOneTimeMaxAge))>>
 	<<if $pedo_mode == 1>><<set $activeSlaveOneTimeMinAge to $minimumSlaveAge>><</if>>
 	<<set $activeSlave.actualAge to random($activeSlaveOneTimeMinAge, $activeSlaveOneTimeMaxAge)>>
@@ -307,7 +325,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.boobs += 200>>
 	<<set $activeSlave.butt += 1>>
 	<<set $activeSlave.makeup = 1>>
-	<<set $activeSlave.actualAge to $activeSlave.actualAge+2>>
+	<<set $activeSlave.actualAge to $eventSlave.actualAge+2>>
 	<<set $activeSlave.preg = -1>>
 	<<set $activeSlave.ovaries = 1>>
 	<<set $activeSlave.oralSkill += random(0,20)>>
@@ -322,7 +340,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.butt = random(1,2)>>
 	<<set $activeSlave.hips = random(-2,0)>>
 	<<set $activeSlave.shoulders = random(-2,0)>>
-	<<set $activeSlave.actualAge to $activeSlave.actualAge-2>>
+	<<set $activeSlave.actualAge to $eventSlave.actualAge-2>>
 	<<set $activeSlave.entertainSkill += random(0,20)>>
 	<<set $activeSlave.preg = -1>>
 	<<set $activeSlave.ovaries = 1>>
@@ -334,10 +352,11 @@ She waits anxiously for your decision.
 	<<set $activeSlave.dick = 5>>
 	<<set $activeSlave.boobs = 0>>
 	<<set $activeSlave.balls = 4>>
-	<<set $activeSlave.actualAge to $activeSlave.actualAge+2>>
+	<<set $activeSlave.actualAge to $eventSlave.actualAge+2>>
 	<<set $activeSlave.entertainSkill += random(0,20)>>
 	<<set $activeSlave.whoreSkill += random(0,20)>>
 	<<set $activeSlave.anus = 0>>
+	<<set $activeSlave.vagina = -1>>
 	<<set $activeSlave.energy = 70>>
 	<<set $activeSlave.dickPiercing = 1>>
 	<<set $activeSlave.tounguePiercing = 1>>
@@ -359,6 +378,7 @@ She waits anxiously for your decision.
 	<<set $activeSlave.balls = 1>>
 	<<set $activeSlave.foreskin = 10>>
 	<<set $activeSlave.scrotum = 10>>
+	<<set $activeSlave.vagina = -1>>
 	<<set $activeSlave.anus = 3>>
 	<<set $activeSlave.makeup = 3>>
 	<<set $activeSlave.nails = 5>>
@@ -366,11 +386,12 @@ She waits anxiously for your decision.
 	<<set $activeSlave.oralSkill = 70>>
 	<<set $activeSlave.whoreSkill = 100>>
 	<<set $activeSlave.energy = 100>>
-	<<set $activeSlave.actualAge to $activeSlave.actualAge-2>>
+	<<set $activeSlave.actualAge to $eventSlave.actualAge-2>>
 	<<set $activeSlave.entertainSkill += random(0,20)>>
 	
 <<case "twin">>
 	<<set $activeSlave.origin to "She was recruited into your service by her twin sister.">>
+	<<set $activeSlave.birthWeek = $eventSlave.birthWeek>>
 	
 <</switch>>
 
@@ -470,7 +491,7 @@ She waits anxiously for your decision.
 	
 <<slaveCost $activeSlave>>
 
-<<NationalityToName>>
+<<NationalityToName $activeSlave>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
@@ -485,12 +506,11 @@ She waits anxiously for your decision.
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <</if>>
 
-<<set $activeSlave.slaveName = $activeSlave.birthName>>
 <<set $activeSlave.ID = $newRelativeRecruitID>>
 <<set $newRelativeRecruitID++>>
 
 <br><br>
-You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but you won't be able to inspect her beyond her likely resemblance to her
+You look up the $relationType. She costs ¤$slaveCost, a bargain, but you won't be able to inspect her beyond her likely resemblance to her
 <<switch $relationType>>
 <<case "daughter">>
 	mother. Her listing states that she was used as a prostitute by her previous owner.
@@ -515,55 +535,30 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 <br><br>
 <span id="result">
 <<click "Buy her">>
-	<<AddSlave $activeSlave>>
 	<<set $cash -= $slaveCost>>
 	<<switch $relationType>>
 	<<case "daughter">>
 		<<if $tempMF == "father">>
 			<<set $activeSlave.father = $eventSlave.ID>>
-			<<for $j to 0; $j < $slaves.length; $j++>>
-				<<if areSisters($activeSlave, $slaves[$j]) > 0>>
-					<<set $activeSlave.sisters++>>
-					<<set $slaves[$j].sisters++>>
-				<</if>>
-			<</for>>
 		<<else>>
 			<<set $activeSlave.mother = $eventSlave.ID>>
-			<<for $j to 0; $j < $slaves.length; $j++>>
-				<<if areSisters($activeSlave, $slaves[$j]) > 0>>
-					<<set $activeSlave.sisters++>>
-					<<set $slaves[$j].sisters++>>
-				<</if>>
-			<</for>>
 		<</if>>
 	<<case "son">>
 		<<if $tempMF == "father">>
 			<<set $activeSlave.father = $eventSlave.ID>>
-			<<for $j to 0; $j < $slaves.length; $j++>>
-				<<if areSisters($activeSlave, $slaves[$j]) > 0>>
-					<<set $activeSlave.sisters++>>
-					<<set $slaves[$j].sisters++>>
-				<</if>>
-			<</for>>
 		<<else>>
 			<<set $activeSlave.mother = $eventSlave.ID>>
-			<<for $j to 0; $j < $slaves.length; $j++>>
-				<<if areSisters($activeSlave, $slaves[$j]) > 0>>
-					<<set $activeSlave.sisters++>>
-					<<set $slaves[$j].sisters++>>
-				<</if>>
-			<</for>>
 		<</if>>
 	<<case "mother">>
 		<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($eventSlave, $slaves[$j])>>
+			<<if sameDad($eventSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $activeSlave.ID>>
 			<</if>>
 		<</for>>
 		<<set $eventSlave.mother = $activeSlave.ID>>
 	<<case "father">>
 		<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($eventSlave, $slaves[$j])>>
+			<<if sameMom($eventSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $activeSlave.ID>>
 			<</if>>
 		<</for>>
@@ -573,25 +568,25 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 			<<set $eventSlave.mother = $missingParentID>>
 			<<set $eventSlave.father = $missingParentID>>
 			<<set $activeSlave.mother = $missingParentID>>
-			<<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.mother != 0 && $eventSlave.father != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<<set $activeSlave.mother = $eventSlave.father>>
+			<<set $activeSlave.father = $eventSlave.father>>
 		<<elseif $eventSlave.mother != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<set $activeSlave.father = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($activeSlave, $slaves[$j])>>
+			<<if sameMom($activeSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.father != 0>>
 			<<set $activeSlave.father = $eventSlave.father>>
-			<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.mother = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($activeSlave, $slaves[$j])>>
+			<<if sameDad($activeSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $missingParentID>>
 			<</if>>
 			<</for>>
@@ -602,25 +597,25 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 			<<set $eventSlave.mother = $missingParentID>>
 			<<set $eventSlave.father = $missingParentID>>
 			<<set $activeSlave.mother = $missingParentID>>
-			<<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.mother != 0 && $eventSlave.father != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<<set $activeSlave.mother = $eventSlave.father>>
+			<<set $activeSlave.father = $eventSlave.father>>
 		<<elseif $eventSlave.mother != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<set $activeSlave.father = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($activeSlave, $slaves[$j])>>
+			<<if sameMom($activeSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.father != 0>>
 			<<set $activeSlave.father = $eventSlave.father>>
-			<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.mother = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($activeSlave, $slaves[$j])>>
+			<<if sameDad($activeSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $missingParentID>>
 			<</if>>
 			<</for>>
@@ -631,25 +626,25 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 			<<set $eventSlave.mother = $missingParentID>>
 			<<set $eventSlave.father = $missingParentID>>
 			<<set $activeSlave.mother = $missingParentID>>
-			<<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.mother != 0 && $eventSlave.father != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<<set $activeSlave.mother = $eventSlave.father>>
+			<<set $activeSlave.father = $eventSlave.father>>
 		<<elseif $eventSlave.mother != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<set $activeSlave.father = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($activeSlave, $slaves[$j])>>
+			<<if sameMom($activeSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.father != 0>>
 			<<set $activeSlave.father = $eventSlave.father>>
-			<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.mother = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($activeSlave, $slaves[$j])>>
+			<<if sameDad($activeSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $missingParentID>>
 			<</if>>
 			<</for>>
@@ -660,25 +655,25 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 			<<set $eventSlave.mother = $missingParentID>>
 			<<set $eventSlave.father = $missingParentID>>
 			<<set $activeSlave.mother = $missingParentID>>
-			<<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.mother != 0 && $eventSlave.father != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<<set $activeSlave.mother = $eventSlave.father>>
+			<<set $activeSlave.father = $eventSlave.father>>
 		<<elseif $eventSlave.mother != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<set $activeSlave.father = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($activeSlave, $slaves[$j])>>
+			<<if sameMom($activeSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.father != 0>>
 			<<set $activeSlave.father = $eventSlave.father>>
-			<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.mother = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($activeSlave, $slaves[$j])>>
+			<<if sameDad($activeSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $missingParentID>>
 			<</if>>
 			<</for>>
@@ -689,36 +684,39 @@ You look up the $activeSlave.relation. She costs ¤$slaveCost, a bargain, but yo
 			<<set $eventSlave.mother = $missingParentID>>
 			<<set $eventSlave.father = $missingParentID>>
 			<<set $activeSlave.mother = $missingParentID>>
-			<<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.mother != 0 && $eventSlave.father != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<<set $activeSlave.mother = $eventSlave.father>>
+			<<set $activeSlave.father = $eventSlave.father>>
 		<<elseif $eventSlave.mother != 0>>
 			<<set $activeSlave.mother = $eventSlave.mother>>
-			<set $activeSlave.father = $missingParentID>>
+			<<set $activeSlave.father = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameMom($activeSlave, $slaves[$j])>>
+			<<if sameMom($activeSlave, $slaves[$j]) && $slaves[$j].father == 0>>
 				<<set $slaves[$j].father = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<<elseif $eventSlave.father != 0>>
 			<<set $activeSlave.father = $eventSlave.father>>
-			<set $activeSlave.mother = $missingParentID>>
+			<<set $activeSlave.mother = $missingParentID>>
 			<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if sameDad($activeSlave, $slaves[$j])>>
+			<<if sameDad($activeSlave, $slaves[$j]) && $slaves[$j].mother == 0>>
 				<<set $slaves[$j].mother = $missingParentID>>
 			<</if>>
 			<</for>>
 			<<set $missingParentID-->>
 		<</if>>
 	<</switch>>
+	<<AddSlave $activeSlave>>
 	<<SlaveTitle $eventSlave>>
 	<<replace "#result">>
-	You complete the legalities and biometric scanning quickly and without fuss. $activeSlave.slaveName arrives shortly. The two slaves remember each other only dimly - they parted a long time ago - but they embrace. The devoted $desc explains the situation and encourages her $activeSlave.relation to be a good slave to you. $activeSlave.slaveName looks a little fearful but clearly realizes that she's lucky to be here.
+	You complete the legalities and biometric scanning quickly and without fuss. $activeSlave.slaveName arrives shortly. The two slaves remember each other only dimly - they parted a long time ago - but they embrace. The devoted $desc explains the situation and encourages her $relationType to be a good slave to you. $activeSlave.slaveName looks a little fearful but clearly realizes that she's lucky to be here.
 	<<set $nextLink to "AS Dump">>
 	<<set $recruitedType = 0>>
+	<<set $relationType = 0>>
+	<<set $tempMF = 0>>
 	<<display "New Slave Intro">>
 	<</replace>>
 <</click>>
@@ -971,7 +969,7 @@ She waits anxiously for your decision.
 	
 <<slaveCost $activeSlave>>
 
-<<NationalityToName>>
+<<NationalityToName $activeSlave>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
diff --git a/src/uncategorized/recETS.tw b/src/uncategorized/recETS.tw
index 66a71cb41c6de1e50fe820024d5727ac7062c606..d55a65d372b6dc621f2872f014e4163f2f1321c8 100644
--- a/src/uncategorized/recETS.tw
+++ b/src/uncategorized/recETS.tw
@@ -314,7 +314,7 @@ One of them speaks up. "We're twins, <<if def $PC.customTitle>>$PC.customTitle<<
 
 <br><br>
 
-"We cost ¤<<print $slaveCost*2>>, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
+"We cost ¤<<print $contractCost>>, <<if def $PC.customTitle>>$PC.customTitle<<elseif $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
 
 <br><br>
 
@@ -378,7 +378,7 @@ One of them speaks up. "We're twins, <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>
 
 <br><br>
 
-"We cost ¤<<print $slaveCost*2>>, <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
+"We cost ¤<<print $contractCost>>, <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
 
 <br><br>
 
@@ -452,7 +452,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 
 <br><br>
 
-"We cost ¤<<print $slaveCost*2>>, <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
+"We cost ¤<<print $contractCost>>, <<if $PC.title != 0>>Sir<<else>>Ma'am<</if>>."
 
 <br><br>
 
@@ -524,7 +524,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 	//You lack the necessary funds to enslave her.//
 <</if>>
 
-<<if $cash >= $contractCost*2>>
+<<if $cash >= $contractCost>>
 <br>
 <<switch $RecETSevent>>
 
@@ -555,7 +555,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 <<case "incest mother son" "incest father daughter">>
 
 <<click "Buy both">>
-	<<set $sissy to $activeSlave, $cash -= ($contractCost*2)>>
+	<<set $sissy to $activeSlave, $cash -= $contractCost>>
 	<<AddSlave $sissy>>
 	<<goto "RecETS workaround">>
 <</click>>
@@ -563,7 +563,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 <<case "matched pair" "identical pair" "identical herm pair">>
 
 <<click "Buy both">>
-	<<set $sissy to $activeSlave, $cash -= ($contractCost*2)>>
+	<<set $sissy to $activeSlave, $cash -= $contractCost>>
 	<<AddSlave $sissy>>
 	<<goto "RecETS workaround">>
 <</click>>
@@ -572,7 +572,7 @@ The other blurts out. "But we kinda got too into each other, in more ways than o
 	ERROR: bad event
 <</switch>>
 <<else>>
-	<<if $cash >= $contractCost>>//You lack the necessary funds to enslave them both.//<</if>>
+	<<if $cash < $contractCost>>//You lack the necessary funds to enslave them both.//<</if>>
 <</if>>
 
 </span>
diff --git a/src/uncategorized/recETSWorkaround.tw b/src/uncategorized/recETSWorkaround.tw
index ca504e0ccf5a5dc7f90de754da1c18fd23cbde78..e1b6feca56f92973596e86cb8648d8db100bfb34 100644
--- a/src/uncategorized/recETSWorkaround.tw
+++ b/src/uncategorized/recETSWorkaround.tw
@@ -247,7 +247,7 @@ They giggle and kiss each other rather passionately, their miniskirts becoming p
 	ERROR: bad event
 <</switch>>
 
-<<NationalityToName>>
+<<NationalityToName $activeSlave>>
 <<if $useFSNames == 0>>
 	<<set $activeSlave.slaveName to $activeSlave.birthName>>
 <<elseif $arcologies[0].FSRomanRevivalist > 20>>
diff --git a/src/uncategorized/remoteSurgery.tw b/src/uncategorized/remoteSurgery.tw
index b9a4f3471749a800b5beb6894c88dde56115268d..eda17af9a381e64b800d51a0d5d51f5c65f9e8cc 100644
--- a/src/uncategorized/remoteSurgery.tw
+++ b/src/uncategorized/remoteSurgery.tw
@@ -2173,7 +2173,7 @@ $pronounCap has doorway-jamming hips.
 		[[Encase in a Fuckdoll suit|Surgery Degradation][$activeSlave.subTarget=0, $activeSlave.choosesOwnAssignment=0, $activeSlave.assignment="rest", $activeSlave.assignmentVisible=1, $activeSlave.sentence=0, $activeSlave.training=0, $activeSlave.toyHole="all her holes", $activeSlave.pubicHStyle="waxed", $activeSlave.livingRules="spare", $activeSlave.speechRules="restrictive", $activeSlave.releaseRules="restrictive", $activeSlave.relationshipRules="restrictive", $activeSlave.fuckdoll=1, $activeSlave.choosesOwnClothes=0, $activeSlave.clothes="a Fuckdoll suit", $activeSlave.collar="none", $activeSlave.shoes="heels", $activeSlave.vaginalAccessory="none", $activeSlave.dickAccessory="none", $activeSlave.buttplug="none", $activeSlave.attrKnown=1, $activeSlave.fetishKnown=1, $surgeryType to "fuckdoll"]] //This is permanent and will greatly restrict $possessive//
 	<</if>>
 <<else>>
-	$pronounCap is encased in a Fuckdoll suit. [[Extract it|Surgery Degradation][$activeSlave.fuckdoll=0, $surgeryType to "fuckdollExtraction"]] 
+	$pronounCap is encased in a Fuckdoll suit. [[Extract it|Surgery Degradation][$activeSlave.fuckdoll=0, $surgeryType to "fuckdollExtraction", $activeSlave.clothes = "none", $activeSlave.shoes = "none"]] 
 <</if>>
 <</if>>
 
diff --git a/src/uncategorized/resFailure.tw b/src/uncategorized/resFailure.tw
index 7ab8e965b511f07314b73a00b8ea11f4ed8d98fe..3792209d445ee290d1e4c0c550ee8d5722faae19 100644
--- a/src/uncategorized/resFailure.tw
+++ b/src/uncategorized/resFailure.tw
@@ -431,7 +431,7 @@
 			<<set $activeSlave.anus to 3>>
 			<<set $activeSlave.fetish to "dom">>
 		<</if>>
-		<<if $TFS.farmUpgrade != 0>>
+		<<if $TFS.farmUpgrade == 1>>
 			<<set $activeSlave.ovaries to 1>>
 			<<if $TFS.farmUpgrade == 2>>
 				<<set $activeSlave.preg to random(1,35)>>
@@ -501,7 +501,7 @@
 	<<set $activeSlave.vagina to 3>>
 	<<set $activeSlave.anus to 3>>
 	<<set $activeSlave.fetish to "dom">>
-	<<if $TFS.farmUpgrade != 0>>
+	<<if $TFS.farmUpgrade == 1>>
 		<<set $activeSlave.ovaries to 1>>
 		<<if $TFS.farmUpgrade == 2>>
 			<<set $activeSlave.preg to random(1,35)>>
diff --git a/src/uncategorized/saBeYourHeadGirl.tw b/src/uncategorized/saBeYourHeadGirl.tw
index 2118d2848558f13244128fa144d1f4941307a7af..255654b24903027753f24ff736fcd2693665b518 100644
--- a/src/uncategorized/saBeYourHeadGirl.tw
+++ b/src/uncategorized/saBeYourHeadGirl.tw
@@ -123,17 +123,29 @@
 	<</if>>
 <</if>>
 
-<<if ($slaves[$i].fetish is "none") || ($slaves[$i].fetishKnown == 0)>>
-	Having all the slaves look up to and obey her affects her sexuality, turning her into a @@color:lightcoral;bit of a dominatrix.@@
-	<<set $slaves[$i].fetish to "dom">>
-	<<set $slaves[$i].fetishKnown to 1>>
-<<elseif ($slaves[$i].fetish is "dom")>>
-<<if ($slaves[$i].fetishKnown == 1)>>
-<<if ($slaves[$i].fetishStrength <= 95)>>
-	Having all the slaves look up to and obey her advances her @@color:lightcoral;dominant tendencies.@@
-	<<set $slaves[$i].fetishStrength += 4>>
-<</if>>
-<</if>>
+<<if $slaves[$i].fetishKnown == 1>>
+	<<if $slaves[$i].fetish is "dom">>
+		<<if ($slaves[$i].fetishKnown == 1)>>
+		<<if ($slaves[$i].fetishStrength <= 95)>>
+			Having all the slaves look up to and obey her advances her @@color:lightcoral;dominant tendencies.@@
+			<<set $slaves[$i].fetishStrength += 4>>
+		<</if>>
+		<</if>>
+	<<elseif $slaves[$i].fetishStrength > random(20,40)>>
+		The sheer variety of sexual situations she sees and participates in @@color:pink;broaden her sexual interests@@ and incline her to take a dominant sexual role.
+		<<set $slaves[$i].fetishStrength -= 4>>
+	<<else>>
+		Having all the slaves look up to and obey her affects her sexuality, turning her into a @@color:lightcoral;bit of a dominatrix.@@
+		<<set $slaves[$i].fetish = "dom">>
+		<<set $slaves[$i].fetishStrength == 20>>
+	<</if>>
+<<else>>
+	<<if random(1,3) == 1>>
+		Having all the slaves look up to and obey her affects her sexuality, turning her into a @@color:lightcoral;bit of a dominatrix.@@
+		<<set $slaves[$i].fetish = "dom">>
+		<<set $slaves[$i].fetishStrength == 20>>
+		<<set $slaves[$i].fetishKnown = 1>>
+	<</if>>
 <</if>>
 
 <<if $slaves[$i].prestige == 0>>
diff --git a/src/uncategorized/saChoosesOwnClothes.tw b/src/uncategorized/saChoosesOwnClothes.tw
index 112ad3945aa7ce25cee3efa6597a54bc700987ad..719b4a8e0d1e377339df92e67d33be18e0bc0451 100644
--- a/src/uncategorized/saChoosesOwnClothes.tw
+++ b/src/uncategorized/saChoosesOwnClothes.tw
@@ -202,6 +202,9 @@
 <<elseif ($slaves[$i].assignment is "take classes") || ($slaves[$i].assignment is "learn in the schoolroom")>>
 	and wears a schoolgirl outfit, since it seems most appropriate.
 	<<set $slaves[$i].clothes to "a schoolgirl outfit">>
+<<elseif (($slaves[$i].assignment is "whore") || ($slaves[$i].assignment is "work in the brothel")) && ($clothesBoughtMaternityLingerie == 1 || $arcologies[0].FSRepopulationFocus != "unset")>>
+	and wears pretty lingerie to show off her merchandise and accentuate her pregnancy while still looking a little classy.
+	<<set $slaves[$i].clothes to "attractive lingerie for a pregnant woman">>
 <<elseif ($slaves[$i].assignment is "whore") || ($slaves[$i].assignment is "work in the brothel")>>
 	and wears pretty lingerie to show off her merchandise and still look a little classy.
 	<<set $slaves[$i].clothes to "attractive lingerie">>
@@ -217,19 +220,44 @@
 <<elseif ($slaves[$i].assignment is "be a servant") || ($slaves[$i].assignment is "work as a servant")>>
 	and wears a sturdy maid outfit, since anything else might be damaged by her hard work around the penthouse.
 	<<set $slaves[$i].clothes to "a nice maid outfit">>
+<<elseif bigBelly($slaves[$i])>>
+	<<if random(1,2) == 1>>
+		and wears pretty lingerie to show off her merchandise while giving her big belly plenty of room to hang free.
+		<<set $slaves[$i].clothes to "attractive lingerie">>
+	<<elseif ($clothesBoughtMaternityLingerie == 1 || $arcologies[0].FSRepopulationFocus != "unset") && $slaves[$i].energy > 90>>
+		and wears pretty lingerie to show off her merchandise and accentuate her pregnancy while giving it plenty of room to hang free.
+		<<set $slaves[$i].clothes to "attractive lingerie for a pregnant woman">>
+	<<elseif ($clothesBoughtMaternityDress == 1 || $arcologies[0].FSRepopulationFocus != "unset")>>
+		and wears a conservative dress with plenty of give for her belly to stretch it.
+		<<set $slaves[$i].clothes to "a maternity dress">>
+	<<else>>
+		and wears string lingerie to look fun and fuckable while giving her big belly plenty of room to hang free.
+		<<set $slaves[$i].clothes to "a string bikini">>
+	<</if>>
 <<else>>
 	and wears string lingerie to show off her body.
 	<<set $slaves[$i].clothes to "a string bikini">>
 <</if>>
 
 <<if $arcologies[0].FSRestart != "unset">>
-	<<if $slaves[$i].vagina > -1 && $slaves[$i].vaginalAccessory != "chastity belt">>
-		She also affixes a chastity belt over her vagina to discourage use of her reproductive organ.
-		<<set $slaves[$i].vaginalAccessory to "chastity belt">>
-	<</if>>
-	<<if $slaves[$i].dick > 0 && $slaves[$i].dickAccessory != "chastity">>
-		She also affixes a chastity cage onto her dick to discourage use of her reproductive organ.
-		<<set $slaves[$i].dickAccessory to "chastity">>
+	<<if $slaves[$i].choosesOwnChastity == 1>>
+		<<if $slaves[$i].vagina > -1 && $slaves[$i].breedingMark == 1 && ($slaves[$i].vaginalAccessory == "chastity belt" || $slaves[$i].vaginalAccessory == "combined chastity")>>
+			She unfastens her chastity belt knowing full well her role in life is to carry her <<if def $PC.customTitle>><<print $PC.customTitle>>'s<<elseif $PC.title != 0>>Master's<<else>>Mistress'<</if>> children.
+			<<set $slaves[$i].vaginalAccessory to "none">>
+		<<elseif $slaves[$i].vagina > -1 && $slaves[$i].ovaries == 1 && $slaves[$i].preg == 0 && $slaves[$i].vaginalAccessory != "chastity belt">>
+			She also affixes a chastity belt over her vagina to discourage use of her reproductive organ.
+			<<set $slaves[$i].vaginalAccessory to "chastity belt">>
+		<<elseif $slaves[$i].vagina > -1 && ($slaves[$i].ovaries == 0 || $slaves[$i].preg < -1) && $slaves[$i].vaginalAccessory == "chastity belt">>
+			She removes her chastity belt since no matter how hard someone tries, she can never become pregnant.
+			<<set $slaves[$i].vaginalAccessory to "none">>
+		<</if>>
+		<<if $slaves[$i].dick > 0 && $slaves[$i].balls > 0 && $slaves[$i].dickAccessory != "chastity">>
+			She also affixes a chastity cage onto her dick to discourage use of her reproductive organ.
+			<<set $slaves[$i].dickAccessory to "chastity">>
+		<<elseif $slaves[$i].dick > 0 && $slaves[$i].balls == 0 && $slaves[$i].dickAccessory == "chastity">>
+			She removes her chastity cage since even if she could get erect, she only shoots blanks.
+			<<set $slaves[$i].dickAccessory to "none">>
+		<</if>>
 	<</if>>
 <</if>>
 
diff --git a/src/uncategorized/saGuardsYou.tw b/src/uncategorized/saGuardsYou.tw
index ea2b73e45499f11aad8bc33c1c245e20ee2eab3c..1ba219e8469c14c8bead8371b13664d0b4071c2b 100644
--- a/src/uncategorized/saGuardsYou.tw
+++ b/src/uncategorized/saGuardsYou.tw
@@ -20,6 +20,12 @@ carries arms in your defense.
 	Her huge muscles are an intimidating sight, but are so big that they actually detract from her combat effectiveness.
 <<elseif $slaves[$i].muscles > 5>>
 	She is reasonably fit, but not enough to significantly affect her combat effectiveness.
+<<elseif $slaves[$i].muscles < -95>>
+	She can barely stand, let alone fight. A single shot from her own weapon is liable to incapacitate her, making her an absolute travesty of a bodyguard.
+<<elseif $slaves[$i].muscles < -30>>
+	She tires from just standing, rendering her both ineffective and embarrasing to have as your guard.
+<<elseif $slaves[$i].muscles < -5>>
+	She is rather unfit, enough to negatively impact her combat effectiveness.
 <</if>>
 
 <<if $slaves[$i].amp == -4>>
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index 917bd5d466f93f748c3b98962a7ba87fbc982787..41142b458d65642750105b1052921ff22a79722b 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -68,7 +68,7 @@
 		<</if>>
 	<<elseif $slaves[$i].fuckdoll <= 75>>
 		This week it @@color:green;begins to learn more advanced commands@@ from its suit. It is taught a command that instructs it to take a more active role in penetrative sex. When that command is given, it must fuck itself against any <<if $PC.dick == 1>>cocks<<else>>phalli<</if>> that are currently inside it, as hard as it possibly can.
-		<<if $slaves[$i].fetish != "none">>
+		<<if $slaves[$i].fetish != "none" || $slaves[$i].fetish != "mindbroken">>
 			It @@color:pink;no longer retains any sexual preferences@@ at all. It just wants to be penetrated.
 			<<set $slaves[$i].fetish = "none", $slaves[$i].fetishStrength = 0>>
 		<</if>>
@@ -1379,10 +1379,12 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 <<if $slaves[$i].fetishKnown == 1>>
 <<if ($slaves[$i].fetish != "none")>>
 <<if $slaves[$i].fetishStrength <= 95>>
-	<<if $slaves[$i].devotion+$slaves[$i].trust > 150>>
+	<<if $slaves[$i].devotion > 50>>
+	<<if $slaves[$i].trust > 50>>
 		She has the confidence to pursue what pleases her, @@color:lightcoral;increasing her kinkiness.@@
 		<<set $slaves[$i].fetishStrength += 4>>
 	<</if>>
+	<</if>>
 <</if>>
 <<if $slaves[$i].fetishStrength > 5>>
 	<<if $slaves[$i].trust < -20>>
@@ -2037,6 +2039,9 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 <<elseif $slaves[$i].career is "a Fuckdoll">>
 	She was once a Fuckdoll, leaving her @@color:hotpink;willing to obey on an instinctual level.@@
 	<<set $slaves[$i].devotion += 5>>
+<<elseif $slaves[$i].career is "a slave since birth">>
+	The tank's imprinting lef ta lasting impression on her; deep down she @@color:hotpink;knows you are to be obeyed@@ and @@color:mediumaquamarine;trusted,@@ even if she can't understand why.
+	<<set $slaves[$i].devotion += 3, $slaves[$i].trust += 3>>
 <<elseif $slaves[$i].career is "a breeder">>
 	<<if $slaves[$i].preg > 1 && $arcologies[0].FSRepopulation != "unset">>
 		Her life used to revolve around being pregnant all the time, and nothing has changed. However, being surrounded with happy, heavily pregnant women leaves her  @@color:hotpink;slightly more accepting@@ of her fate and @@color:mediumaquamarine;hopeful@@ that her trained body will be useful to you.
@@ -2660,7 +2665,7 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 	<<if $slaves[$i].sexualFlaw != "abusive">>
 		<<if $slaves[$i].aphrodisiacs > 0>>
 		<<if $slaves[$i].addict > 2>>
-			Her aphrodisiac addiction makes her dependent on pain in others to get off. She's become @@@color:yellow;sexually abusive, getting off on the thrill of forcing herself on other slaves.@@
+			Her aphrodisiac addiction makes her dependent on pain in others to get off. She's become @@color:yellow;sexually abusive, getting off on the thrill of forcing herself on other slaves.@@
 			<<set $slaves[$i].sexualFlaw = "abusive">>
 		<</if>>
 		<</if>>
@@ -3339,7 +3344,7 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 			She is filled with a feeling of @@color:mediumorchid;revulsion@@ that your child is growing within her body.
 			<<set $slaves[$i].devotion -= 1>>
 		<<elseif ($slaves[$i].devotion) > 50 && ($slaves[$i].pregSource == -1)>>
-			She's @@color:hotpink;loves@@ that your child is growing within her.
+			She @@color:hotpink;loves@@ that your child is growing within her.
 			<<set $slaves[$i].devotion += 1>>
 		<</if>>
 		<<if ($slaves[$i].pregSource == $slaves.relationshipTarget)>>
@@ -5667,10 +5672,18 @@ and ($slaves[$i].clothes != "a slutty qipao") and ($slaves[$i].clothes != "restr
 	<<set $seed to 30>>
 <<elseif $slaves[$i].speechRules is "accent elimination">>
 	<<set $seed to 15>>
+<<elseif $slaves[$i].speechRules is "language lessons">>
+	<<set $seed to 10>>
 <<else>>
 	<<set $seed to 20>>
 <</if>>
-<<if $slaves[$i].accent >= 3>>
+<<if $slaves[$i].accent >= 4>>
+	<<if $week - $slaves[$i].weekAcquired > $seed - ($slaves[$i].intelligence*5) - 5>>
+		<<set $slaves[$i].accent -= 1>>
+		<<set $slaves[$i].speechRules = "accent elimination">>
+		She has managed to pick up enough $language that @@color:green;she can now barely get her point across.@@ Her accent is horrible, but it's a start.
+	<</if>>
+<<elseif $slaves[$i].accent >= 3>>
 	<<if $week - $slaves[$i].weekAcquired > $seed - ($slaves[$i].intelligence*5)>>
 		<<set $slaves[$i].accent -= 1>>
 		She has managed to pick up enough $language that @@color:green;she's now reasonably fluent in the language.@@ Her accent is quite heavy, but she can make herself understood.
diff --git a/src/uncategorized/saPleaseYou.tw b/src/uncategorized/saPleaseYou.tw
index 2a83f5d8468fc7a476bd3134ab160501b4391285..36f5252d9e8e91246c84859e09b479a837188718 100644
--- a/src/uncategorized/saPleaseYou.tw
+++ b/src/uncategorized/saPleaseYou.tw
@@ -792,7 +792,7 @@ Keeping $object as nothing but your personal
 <</if>>
 <<if ($slaves[$i].behavioralQuirk is "adores men")>>
 	<<if ($PC.dick == 1)>>
-	$slaves[$i].slaveName @@color:hotpink;adores your company,@@ and is happy to spend time with you, even when you don't have your cock in $Object.
+	$slaves[$i].slaveName @@color:hotpink;adores your company,@@ and is happy to spend time with you, even when you don't have your cock in $object.
 	<<set $slaves[$i].devotion += 1>>
 	<</if>>
 <<elseif ($slaves[$i].behavioralQuirk is "adores women")>>
diff --git a/src/uncategorized/saRelationships.tw b/src/uncategorized/saRelationships.tw
index 9f0d65b168ae0af68a8d1fe544730237478ba6de..503954ff77ef1c175f4f8e75b5d377deed59dd1d 100644
--- a/src/uncategorized/saRelationships.tw
+++ b/src/uncategorized/saRelationships.tw
@@ -1,1440 +1,1247 @@
 :: SA relationships [nobr]
 
 <<if $slaves[$i].fuckdoll == 0>>
-
-<<if $slaves[$i].relationship == 0>>
-
-<<if ($slaves[$i].devotion+$slaves[$i].trust > 175) && (random(1,3) == 1)>>
-	$slaves[$i].slaveName is quite devoted to you, and trusts both you and her place as a slave. Since she does not have a strong relationship with another slave,
-	<<if ($slaves[$i].sexualQuirk is "romantic")>>
-	and persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her
-	<<if $slaves[$i].vagina > -1>>
-		pussy.
-	<<else>>
-		butthole.
-	<</if>>
-	@@color:lightgreen;She's become emotionally bonded to you!@@
-	<<set $slaves[$i].relationship to -2>>
-	<<elseif ($slaves[$i].assignment is "be your concubine")>>
-	and is your concubine, she almost inevitably comes to view you as much as a lover as an owner.
-	@@color:lightgreen;She's become emotionally bonded to you!@@
-	<<set $slaves[$i].relationship to -2>>
-	<<elseif ($slaves[$i].assignment is "serve in the master suite") && ($masterSuiteUpgradeLuxury is 2)>>
-	and does nothing but eat, sleep, and make love to your other fucktoys, she slowly loses sight of any distinction between emotional attachment and sexual congress.
-	@@color:lightgreen;She's become an emotional slut!@@
-	<<set $slaves[$i].relationship to -1>>
-	<<elseif ($slaves[$i].assignment is "please you") || ($slaves[$i].assignment is "serve in the master suite")>>
-	and spends her days worshipping your <<if $PC.dick == 1>>cock<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>cunt<</if>>, she begins to focus more and more of her happiness on how happy you are.
-	@@color:lightgreen;She's become emotionally bonded to you!@@
-	<<set $slaves[$i].relationship to -2>>
-	<<elseif ($slaves[$i].assignment is "serve the public") || ($slaves[$i].assignment is "serve in the club")>>
-	and her life is an endless stream of lovers, she unconsciously loses any sense of emotional attachment outside the intimacy of sex.
-	@@color:lightgreen;She's become an emotional slut!@@
-	<<set $slaves[$i].relationship to -1>>
-	<<elseif ($slaves[$i].energy > 95) && (($slaves[$i].analCount + $slaves[$i].vaginalCount + $slaves[$i].oralCount + $slaves[$i].mammaryCount + $slaves[$i].penetrativeCount) > ($week-$activeSlave.weekAcquired)*random(20,30))>>
-	is a total sex addict, and has a spectacularly promiscuous sexual history, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
-	<<set $slaves[$i].relationship to -1>>
-	<<else>>
-	and loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
-	<<set $slaves[$i].relationship to -2>>
-	<</if>>
-<<elseif $slaves[$i].fetish != "mindbroken">>
-<<if $slaves[$i].career is "a Futanari Sister">>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if ($slaves[$j].ID != $slaves[$i].ID)>>
-		<<if ($slaves[$j].relationship == 0)>>
-		<<if ($slaves[$j].career is "a Futanari Sister")>>
-			<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-			<<if $slaves[$i].relationshipRules is "permissive">>
-			<<if $slaves[$j].relationshipRules is "permissive">>
-			$slaves[$i].slaveName greets $slaves[$j].slaveName with joy. It's not clear whether they ever knew each other during their lives as Futanari Sisters, but it seems that they believe themselves to be in a relationship by simple virtue of having been Sisters. In any case, $slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightgreen;become inseparable lovers@@ instantly, as though there's no possibility they would do anything else. They're even surprised when other slaves ask them about it; it's as though they're unaware that other possibilities even exist.
-			<<set $slaves[$j].relationship to 4>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to 4>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-			<<break>>
-			<</if>>
-			<</if>>
+	<<set _SL = $slaves.length, _SlaveI = $slaves[$i], _SlaveJ = null, _J = -1, _K = -1, _drop = 0>>
+	<<if _SlaveI.relationship == 0>>
+		<<if (_SlaveI.devotion + _SlaveI.trust > 175) && (random(1,3) == 1)>>
+			_SlaveI.slaveName is quite devoted to you, and trusts both you and her place as a slave. Since she does not have a strong relationship with another slave,
+			<<if (_SlaveI.sexualQuirk == "romantic")>>
+				and persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her <<if _SlaveI.vagina > -1>>pussy<<else>>butthole<</if>>. @@color:lightgreen;She's become emotionally bonded to you!@@
+				<<set _SlaveI.relationship = -2>>
+			<<elseif (_SlaveI.assignment == "be your concubine")>>
+				and is your concubine, she almost inevitably comes to view you as much as a lover as an owner. @@color:lightgreen;She's become emotionally bonded to you!@@
+				<<set _SlaveI.relationship = -2>>
+			<<elseif (_SlaveI.assignment == "serve in the master suite") && ($masterSuiteUpgradeLuxury == 2)>>
+				and does nothing but eat, sleep, and make love to your other fucktoys, she slowly loses sight of any distinction between emotional attachment and sexual congress. @@color:lightgreen;She's become an emotional slut!@@
+				<<set _SlaveI.relationship = -1>>
+			<<elseif (_SlaveI.assignment == "please you") || (_SlaveI.assignment == "serve in the master suite")>>
+				and spends her days worshiping your <<if $PC.dick == 1>>cock<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>cunt<</if>>, she begins to focus more and more of her happiness on how happy you are. @@color:lightgreen;She's become emotionally bonded to you!@@
+				<<set _SlaveI.relationship = -2>>
+			<<elseif (_SlaveI.assignment == "serve the public") || (_SlaveI.assignment == "serve in the club")>>
+				and her life is an endless stream of lovers, she unconsciously loses any sense of emotional attachment outside the intimacy of sex. @@color:lightgreen;She's become an emotional slut!@@
+				<<set _SlaveI.relationship = -1>>
+			<<elseif (_SlaveI.energy > 95) && ((_SlaveI.analCount + _SlaveI.vaginalCount + _SlaveI.oralCount + _SlaveI.mammaryCount + _SlaveI.penetrativeCount) > ($week - $activeSlave.weekAcquired) * random(20, 30))>>
+				is a total sex addict, and has a spectacularly promiscuous sexual history, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
+				<<set _SlaveI.relationship = -1>>
+			<<else>>
+				and loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
+				<<set _SlaveI.relationship = -2>>
 			<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-	<</for>>
-<<elseif $rivalryDuration > 20 and ($rivalryFS != "Racial Supremacism" && $rivalryFS != "Paternalism") and $slaves[$i].origin is "You were acquainted with her before you were an arcology owner; your rival tried to use her to manipulate you, but you rescued her.">>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if $slaves[$j].prestigeDesc is "You bankrupted and enslaved her in revenge for her part in the attack on your arcology by the Daughters of Liberty.">>
-			$slaves[$i].slaveName greets $slaves[$j].slaveName with joy, happy to see her former owner again. Without any regard to you, they continue their prior relationship.
-			<<set $slaves[$j].relationship to 4>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to 4>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-			<<break>>
-		<</if>>
-	<</for>>
-<<elseif $slaves[$i].devotion > -90>>
-	<<if $slaves[$i].behavioralFlaw is "none">>
-		<<set $seed to random(1,100)>>
-	<<else>>
-		<<set $seed to random(1,80)>>
-	<</if>>
-	<<if $seed > 75>>
-	<<set $resentment to 0>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if $slaves[$j].ID != $slaves[$i].ID>>
-		<<if $slaves[$j].assignment != "stay confined">>
-		<<if ($slaves[$i].assignment is "work in the brothel") && ($slaves[$j].ID is $Madam.ID)>>
-		<<if ($Madam.relationship == 0)>>
-			<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-			<<if random(1,100) > 0>>
-				<<if $slaves[$i].relationshipRules != "restrictive">>
-				<<if $Madam.relationshipRules != "restrictive">>
-				$slaves[$i].slaveName manages to ingratiate herself with the Madam, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-				<<set $slaves[$j].relationship to 1>>
-				<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-				<<set $slaves[$i].relationship to 1>>
-				<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-				<<else>>
-				<<if $slaves[$i].devotion < -20>>
-				$slaves[$i].slaveName tries to strike up a friendship with the Madam, $slaves[$j].slaveName and is @@color:gold;punished@@ by $slaves[$j].slaveName for disrespect.
-				<<set $slaves[$i].trust -= 4>>
+		<<elseif _SlaveI.fetish != "mindbroken">>
+			<<if _SlaveI.career == "a Futanari Sister">>
+				<<if _SlaveI.relationshipRules == "permissive">>
+				<<for _j to 0; _j < _SL; _j++>>
+					<<set _SlaveJ = $slaves[_j]>>
+					<<if (_SlaveJ.career == "a Futanari Sister")>>
+					<<if _SlaveJ.relationshipRules == "permissive">>
+					<<if (_SlaveJ.relationship == 0)>>
+					<<if (_SlaveI.rivalryTarget != _SlaveJ.ID)>>
+					<<if (_SlaveJ.ID != _SlaveI.ID)>>
+					<<if _SlaveJ.fetish != "mindbroken">>
+						_SlaveI.slaveName greets _SlaveJ.slaveName with joy. It's not clear whether they ever knew each other during their lives as Futanari Sisters, but it seems that they believe themselves to be in a relationship by simple virtue of having been Sisters. In any case, _SlaveI.slaveName and _SlaveJ.slaveName @@color:lightgreen;become inseparable lovers@@ instantly, as though there's no possibility they would do anything else. They're even surprised when other slaves ask them about it; it's as though they're unaware that other possibilities even exist.
+						<<set _SlaveJ.relationship = 4, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 4, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+						<<break>>
 					<</if>>
-				<</if>>
-				<</if>>
-			<</if>>
-			<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "serve in the club") && ($slaves[$j].ID is $DJ.ID)>>
-		<<if ($DJ.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $DJ.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName manages to ingratiate herself with the DJ, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the DJ, $slaves[$j].slaveName and is @@color:gold;punished@@ by $slaves[$j].slaveName for disrespect.
-		<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "work in the dairy") && ($slaves[$j].ID is $Milkmaid.ID)>>
-		<<if ($Milkmaid.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Milkmaid.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName manages to ingratiate herself with the Milkmaid, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the Milkmaid, $slaves[$j].slaveName and is @@color:gold;punished@@ by $slaves[$j].slaveName for disrespect.
-		<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "learn in the schoolroom") && ($slaves[$j].ID is $Schoolteacher.ID)>>
-		<<if ($Schoolteacher.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Schoolteacher.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName manages to ingratiate herself with the Schoolteacher, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the Schoolteacher, $slaves[$j].slaveName and is @@color:gold;punished@@ by $slaves[$j].slaveName for disrespect.
-		<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>><<elseif ($slaves[$i].assignment is "rest in the spa") && ($slaves[$j].ID is $Attendant.ID)>>
-		<<if ($Attendant.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Attendant.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName basks in the affection and care of the spa attendant, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the spa attendant, $slaves[$j].slaveName. $slaves[$j].slaveName gently @@color:hotpink;counsels@@ her to obey the rules.
-		<<set $slaves[$i].devotion += 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "work as a servant") && ($slaves[$j].ID is $Stewardess.ID)>>
-		<<if ($Stewardess.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Stewardess.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName manages to ingratiate herself with the Stewardess, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the Stewardess, $slaves[$j].slaveName and is @@color:gold;punished@@ by $slaves[$j].slaveName for disrespect.
-		<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "be confined in the cellblock") && ($slaves[$j].ID is $Wardeness.ID)>>
-		<<if ($Wardeness.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Wardeness.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName manages to earn the respect of the Wardeness, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the Wardeness, $slaves[$j].slaveName and is @@color:gold;beaten@@ by $slaves[$j].slaveName for her trouble.
-		<<set $slaves[$i].trust -= 5>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif ($slaves[$i].assignment is "serve in the master suite") && ($slaves[$j].ID is $Concubine.ID)>>
-		<<if ($Concubine.relationship == 0)>>
-		<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-		<<if random(1,100) > 0>>
-		<<if $slaves[$i].relationshipRules != "restrictive">>
-		<<if $Concubine.relationshipRules != "restrictive">>
-		$slaves[$i].slaveName becomes especially close to the Concubine, $slaves[$j].slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
-		<<set $slaves[$j].relationship to 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 1>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-		<<if $slaves[$i].devotion < -20>>
-		$slaves[$i].slaveName tries to strike up a friendship with the Concubine, $slaves[$j].slaveName and is gently @@color:hotpink;counseled@@ by $slaves[$j].slaveName that such things are against the rules.
-		<<set $slaves[$i].devotion += 1>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<<elseif $slaves[$j].assignment is $slaves[$i].assignment>>
-		<<if ($slaves[$i].relationship == 0)>>
-		<<if ($slaves[$j].relationship == 0)>>
-			<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-			<<if random(1,100) > 50>>
-				<<if $slaves[$i].relationshipRules != "restrictive">>
-				<<if $slaves[$j].relationshipRules != "restrictive">>
-				$slaves[$i].slaveName and $slaves[$j].slaveName see a lot of each other at work and @@color:lightgreen;strike up a friendship.@@
-				<<set $slaves[$j].relationship to 1>>
-				<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-				<<set $slaves[$i].relationship to 1>>
-				<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-				<<else>>
-				<<if $slaves[$i].relationshipRules is "restrictive">>
-					<<if $resentment == 0>>
-					$slaves[$i].slaveName tries to strike up a friendship with $slaves[$j].slaveName and is @@color:gold;punished@@ for breaking the rules against such things; she @@color:mediumorchid;resents@@ being castigated for simple sociability.
-					<<set $slaves[$i].devotion -= 2>>
-					<<set $slaves[$i].trust -= 2>>
-					<<set $resentment to 1>>
 					<</if>>
+					<</if>>
+					<</if>>
+					<</if>>
+					<</if>>
+				<</for>>
 				<</if>>
+			<<elseif ($rivalryDuration > 20) && ($rivalryFS != "Racial Supremacism") && ($rivalryFS != "Paternalism") && _SlaveI.origin == "You were acquainted with her before you were an arcology owner; your rival tried to use her to manipulate you, but you rescued her.">>
+				<<for _j to 0; _j < _SL; _j++>>
+					<<set _SlaveJ = $slaves[_j]>>
+					<<if _SlaveJ.fetish != "mindbroken">>
+					<<if _SlaveJ.prestigeDesc == "You bankrupted and enslaved her in revenge for her part in the attack on your arcology by the Daughters of Liberty.">>
+						_SlaveI.slaveName greets _SlaveJ.slaveName with joy, happy to see her former owner again. Without any regard to you, they continue their prior relationship.
+						<<if _SlaveJ.relationship > 0>>
+						<<for _k to 0; _k < _SL; _k++>>
+							<<if _SlaveJ.relationshipTarget == $slaves[_k].ID>>
+								<<set $slaves[_k].relationshipTarget = 0, $slaves[_k].relationship = 0>>
+								<<break>>
+							<</if>>
+						<</for>>
+						<</if>>
+						<<set _SlaveJ.relationship = 4, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 4, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+						<<break>>
+					<</if>>
+					<</if>>
+				<</for>>
+			<<elseif _SlaveI.relationshipRules != "restrictive">>
+				<<if _SlaveI.devotion > -90>>
+				<<if _SlaveI.behavioralFlaw == "none">>
+					<<set _seed = random(1, 100)>>
+				<<else>>
+					<<set _seed = random(1, 80)>>
 				<</if>>
-				<</if>>
-			<</if>>
-			<</if>>
-		<</if>>
-		<</if>>
-		<<elseif $slaves[$j].fetish is $slaves[$i].fetish>>
-		<<if ($slaves[$i].relationship == 0)>>
-		<<if ($slaves[$j].relationship == 0)>>
-			<<if ($slaves[$i].rivalryTarget != $slaves[$j].ID)>>
-			<<if ($slaves[$i].fetish != "none")>>
-				<<if ($slaves[$i].releaseRules != "restrictive")>>
-				<<if random(1,100) > 0>>
-					<<if $slaves[$i].relationshipRules is "permissive">>
-					<<if $slaves[$j].relationshipRules is "permissive">>
-					$slaves[$i].slaveName and $slaves[$j].slaveName share sexual inclinations, so it's only natural that they @@color:lightgreen;become friends with benefits.@@
-					<<set $slaves[$j].relationship to 3>>
-					<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-					<<set $slaves[$i].relationship to 3>>
-					<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-					<<else>>
-					$slaves[$i].slaveName tries to strike up a sexual relationship with $slaves[$j].slaveName and is @@color:gold;punished@@ for breaking the rules against such things; she @@color:mediumorchid;resents@@ being prevented from pursuing her.
-					<<set $slaves[$i].devotion -= 2>>
-					<<set $slaves[$i].trust -= 2>>
+				<<if _seed > 75>>
+				<<set $resentment = 0>>
+				<<for _j to 0; _j < _SL; _j++>>
+					<<set _SlaveJ = $slaves[_j]>>
+					<<if _SlaveJ.ID != _SlaveI.ID>>
+					<<if _SlaveJ.assignment != "stay confined">>
+					<<if (_SlaveJ.relationship == 0)>>
+					<<if (_SlaveI.rivalryTarget != _SlaveJ.ID)>>
+					<<if _SlaveJ.fetish != "mindbroken">>
+					<<if (_SlaveI.assignment == "work in the brothel") && (_SlaveJ.ID == $Madam.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to ingratiate herself with the Madam, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Madam, _SlaveJ.slaveName and is @@color:gold;punished@@ by _SlaveJ.slaveName for disrespect.
+								<<set _SlaveI.trust -= 4>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "serve in the club") && (_SlaveJ.ID is $DJ.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to ingratiate herself with the DJ, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the DJ, _SlaveJ.slaveName and is @@color:gold;punished@@ by _SlaveJ.slaveName for disrespect.
+								<<set _SlaveI.trust -= 4>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "work in the dairy") && (_SlaveJ.ID == $Milkmaid.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to ingratiate herself with the Milkmaid, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Milkmaid, _SlaveJ.slaveName and is @@color:gold;punished@@ by _SlaveJ.slaveName for disrespect.
+								<<set _SlaveI.trust -= 4>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "learn in the schoolroom") && (_SlaveJ.ID == $Schoolteacher.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to ingratiate herself with the Schoolteacher, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Schoolteacher, _SlaveJ.slaveName and is @@color:gold;punished@@ by _SlaveJ.slaveName for disrespect.
+								<<set _SlaveI.trust -= 4>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "rest in the spa") && (_SlaveJ.ID == $Attendant.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName basks in the affection and care of the spa attendant, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the spa attendant, _SlaveJ.slaveName. _SlaveJ.slaveName gently @@color:hotpink;counsels@@ her to obey the rules.
+								<<set _SlaveI.devotion += 1>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "work as a servant") && (_SlaveJ.ID == $Stewardess.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to ingratiate herself with the Stewardess, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Stewardess, _SlaveJ.slaveName and is @@color:gold;punished@@ by _SlaveJ.slaveName for disrespect.
+								<<set _SlaveI.trust -= 4>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "be confined in the cellblock") && (_SlaveJ.ID == $Wardeness.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName manages to earn the respect of the Wardeness, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Wardeness, _SlaveJ.slaveName and is @@color:gold;beaten@@ by _SlaveJ.slaveName for her trouble.
+								<<set _SlaveI.trust -= 5>>
+							<</if>>
+						<</if>>
+					<<elseif (_SlaveI.assignment == "serve in the master suite") && (_SlaveJ.ID == $Concubine.ID)>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName becomes especially close to the Concubine, _SlaveJ.slaveName. The two slaves have @@color:lightgreen;struck up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if _SlaveI.devotion < -20>>
+								_SlaveI.slaveName tries to strike up a friendship with the Concubine, _SlaveJ.slaveName and is gently @@color:hotpink;counseled@@ by _SlaveJ.slaveName that such things are against the rules.
+								<<set _SlaveI.devotion += 1>>
+							<</if>>
+						<</if>>
+					<<elseif _SlaveJ.assignment == _SlaveI.assignment>>
+						<<if random(1, 100) > 50>>
+						<<if _SlaveJ.relationshipRules != "restrictive">>
+							_SlaveI.slaveName and _SlaveJ.slaveName see a lot of each other at work and @@color:lightgreen;strike up a friendship.@@
+							<<set _SlaveJ.relationship = 1, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 1, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+							<<break>>
+						<<else>>
+							<<if $resentment == 0>>
+								_SlaveI.slaveName tries to strike up a friendship with _SlaveJ.slaveName and is @@color:gold;punished@@ for breaking the rules against such things; she @@color:mediumorchid;resents@@ being castigated for simple sociability.
+								<<set _SlaveI.devotion -= 2, _SlaveI.trust -= 2, $resentment++>>
+							<</if>>
+						<</if>>
+						<</if>>
+					<<elseif _SlaveJ.fetish == _SlaveI.fetish>>
+						<<if (_SlaveI.fetish != "none")>>
+						<<if (_SlaveI.releaseRules != "restrictive")>>
+							<<if _SlaveJ.relationshipRules == "permissive">>
+								_SlaveI.slaveName and _SlaveJ.slaveName share sexual inclinations, so it's only natural that they @@color:lightgreen;become friends with benefits.@@
+								<<set _SlaveJ.relationship = 3, _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveI.relationship = 3, _SlaveI.relationshipTarget = _SlaveJ.ID>>
+								<<break>>
+							<<else>>
+								_SlaveI.slaveName tries to strike up a sexual relationship with _SlaveJ.slaveName and is @@color:gold;punished@@ for breaking the rules against such things; she @@color:mediumorchid;resents@@ being prevented from pursuing her.
+								<<set _SlaveI.devotion -= 2, _SlaveI.trust -= 2>>
+							<</if>>
+						<</if>>
+						<</if>>
+					<</if>>
 					<</if>>
 					<</if>>
+					<</if>>
+					<</if>>
+					<</if>>
+				<</for>>
+				<<if _SlaveI.relationshipTarget != _SlaveJ.ID>>
+					<<set _SlaveJ = null>>
+				<</if>>
 				<</if>>
 				<</if>>
 			<</if>>
+		<</if>>
+		<<set _drop = 1>>
+	<</if>>
+	<<if (_SlaveI.relationship > 0) || (_SlaveI.relation > 0)>>
+		<<for _j to 0; _j < _SL; _j++>>
+			<<if _SlaveI.relationshipTarget == $slaves[_j].ID>>
+				/% Also sets a few extra vars. to get rid of redundancy of possible old bug fixes? %/
+				<<set _SlaveJ = $slaves[_j], _J = _j , _SlaveJ.relationshipTarget = _SlaveI.ID, _SlaveJ.relationship = _SlaveI.relationship>>
 			<</if>>
+			<<if _SlaveI.relationTarget == $slaves[_j].ID>>
+				<<if _SlaveI.rivalryTarget != _SlaveI.relationTarget>>
+					<<set _K = _j>>
+				<</if>>
 			<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-		<</if>>
-	<</for>>
+		<</for>>
 	<</if>>
-<</if>>
-<</if>>
-
-<<else>> /* RELATIONSHIP IS NOT 0; NOW ON TO ONGOING RELATIONSHIPS */
-
-<<if $slaves[$i].rivalry != 0>>
-<<if $slaves[$i].rivalryTarget != $slaves[$i].relationshipTarget>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-			<<set $slaves[$j].rivalry to 0>>
-			<<set $slaves[$j].rivalryTarget to 0>>
-			<<break>>
+	<<if (_SlaveI.relationship != 0) && (_drop == 0)>>	/% RELATIONSHIP IS NOT 0; NOW ON TO ONGOING RELATIONSHIPS %/
+		/% Game change due to possible bug clears rivalry only if between SlaveI and SlaveJ if they are the rivals. So delete this one or the other one just below %/
+		<<if (_SlaveI.rivalry != 0 && _SlaveJ != null)>>
+			<<if _SlaveI.rivalryTarget == _SlaveI.relationshipTarget>>
+				<<set _SlaveJ.rivalry = 0, _SlaveJ.rivalryTarget = 0, _SlaveI.rivalry = 0, _SlaveI.rivalryTarget = 0>>
+			<</if>>
 		<</if>>
-	<</for>>
-	<<set $slaves[$i].rivalry to 0>>
-	<<set $slaves[$i].rivalryTarget to 0>>
-<</if>>
-<</if>>
+		/% End of Game change code %/
 
-<<if $slaves[$i].fetish is "mindbroken">>
-
-Since she is mindbroken, she @@color:lightsalmon;can't really maintain@@ any meaningful relationship with
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-		$slaves[$j].slaveName.
-		<<set $slaves[$j].relationship to 0>>
-		<<set $slaves[$j].relationshipTarget to 0>>
-		<<break>>
-	<</if>>
-<</for>>
-<<set $slaves[$i].relationship to 0>>
-<<set $slaves[$i].relationshipTarget to 0>>
-
-<<elseif $slaves[$i].relationship is -1>>
-
-<<if ($slaves[$i].energy < 90)>>
-	She is no longer such a complete nymphomaniac, and has @@color:lightsalmon;begun to rely less on sex for emotional support@@ than she once did.
-	<<set $slaves[$i].relationship to 0>>
-<<elseif ($slaves[$i].assignment is "serve in the master suite") && ($masterSuiteUpgradeLuxury is 2)>>
-	Forming a part of the pile of copulating bodies in $masterSuiteName satisfies her voracious sexual appetite.
-<<elseif ($slaves[$i].choosesOwnAssignment != 1)>>
-	<<if ($slaves[$i].assignment != "whore")>>
-	<<if ($slaves[$i].assignment != "work in the brothel")>>
-	<<if ($slaves[$i].assignment != "serve the public")>>
-	<<if ($slaves[$i].assignment != "serve in the club")>>
-		<<if ($slaves[$i].devotion > 60)>>
-			She is @@color:mediumorchid;emotionally unfulfilled@@ by her assignment, since it does not afford her the validation of massive promiscuity.
-			<<set $slaves[$i].devotion -= 1>>
-		<</if>>
-		<<if ($slaves[$i].trust > 60)>>
-			She is @@color:gold;impatient@@ with her limited field of potential sexual partners, and would prefer to be a publicly available nympho.
-			<<set $slaves[$i].trust -= 1>>
+		/% This one functions same as before, just without the for loop %/
+		<<if (_SlaveI.rivalry != 0)>>
+			<<if _SlaveI.rivalryTarget != _SlaveI.relationshipTarget>>
+				<<if _SlaveJ != null>>
+				<<if _SlaveJ.ID == _SlaveI.relationshipTarget>>
+					<<set _SlaveJ.rivalry = 0, _SlaveJ.rivalryTarget = 0>>
+				<</if>>
+				<</if>>
+				/% This will leave _SlaveI.rivalryTarget .rivalry and .rivalryTarget hanging if it's not SlaveJ %/
+				<<set _SlaveI.rivalry = 0, _SlaveI.rivalryTarget = 0>>
+			<</if>>
 		<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-<</if>>
+		/% End of Orig. %/
 
-<<elseif $slaves[$i].relationship is -2>>
-	<<if $slaves[$i].mother == -1>>
-		She
-		<<if $slaves[$i].sexualQuirk is "perverted">>
-			is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 95>>
-			is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-			is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 75>>
-			is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 50>>
-			is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 2>>
-			<<set $slaves[$i].trust -= 2>>
-		<<else>>
-			is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 4>>
-			<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<<if $slaves[$i].preg > 0>>
-			<<if $slaves[$i].pregSource == -1>>
-				<<if $slaves[$i].sexualQuirk is "perverted">>
-					She's even @@color:hotpink;aroused@@ by the constant awareness that her mother is the parent of the daughter<<if $slaves[$i].pregType > 1>>s<</if>> she's carrying.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-					Her feelings about carrying her mother's child<<if $slaves[$i].pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].devotion > 95>>
-					She occasionally remembers that she's carrying her mother's child<<if $slaves[$i].pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
-				<<elseif $slaves[$i].devotion > 50>>
-					She's @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's, though she tries her best not to think about it.
-					<<set $slaves[$i].devotion -= 1>>
-				<<elseif $slaves[$i].devotion > 20>>
-					She's so @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's that she often wakes up crying about it.
-					<<set $slaves[$i].devotion -= 2>>
+		<<if _SlaveI.fetish == "mindbroken">>
+			Since she is mindbroken, she @@color:lightsalmon;can't really maintain@@ any meaningful relationship with
+			<<if _SlaveJ != null>>
+				_SlaveJ.slaveName
+				<<set _SlaveJ.relationship = 0, _SlaveJ.relationshipTarget = 0>>
+			<<else>>
+				you
+			<</if>>.
+			<<set _SlaveI.relationship = 0, _SlaveI.relationshipTarget = 0>>
+		<<elseif _SlaveI.relationship < 0>>
+			/% Relationship with the PC %/
+			<<if _SlaveI.relationship == -1>>
+				<<if (_SlaveI.energy < 90)>>
+					She is no longer such a complete nymphomaniac, and has @@color:lightsalmon;begun to rely less on sex for emotional support@@ than she once did.
+					<<set _SlaveI.relationship = 0>>
+				<<elseif (_SlaveI.assignment == "serve in the master suite") && ($masterSuiteUpgradeLuxury == 2)>>
+					Forming a part of the pile of copulating bodies in $masterSuiteName satisfies her voracious sexual appetite.
+				<<elseif (_SlaveI.choosesOwnAssignment != 1)>>
+					<<if (_SlaveI.assignment != "whore")>>
+					<<if (_SlaveI.assignment != "work in the brothel")>>
+					<<if (_SlaveI.assignment != "serve the public")>>
+					<<if (_SlaveI.assignment != "serve in the club")>>
+					<<if (_SlaveI.devotion > 60)>>
+						She is @@color:mediumorchid;emotionally unfulfilled@@ by her assignment, since it does not afford her the validation of massive promiscuity.
+						<<set _SlaveI.devotion-->>
+					<</if>>
+					<<if (_SlaveI.trust > 60)>>
+						She is @@color:gold;impatient@@ with her limited field of potential sexual partners, and would prefer to be a publicly available nympho.
+						<<set _SlaveI.trust-->>
+					<</if>>
+					<</if>>
+					<</if>>
+					<</if>>
+					<</if>>
+				<</if>>
+			<<elseif _SlaveI.relationship == -2>>
+				<<if _SlaveI.mother == -1>>
+					She
+					<<if _SlaveI.sexualQuirk is "perverted">>
+						is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.devotion > 95>>
+						is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 75>>
+						is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 50>>
+						is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 2>>
+					<<elseif _SlaveI.devotion > 20>>
+						is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 2>>
+						<<set _SlaveI.trust -= 2>>
+					<<else>>
+						is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 4>>
+						<<set _SlaveI.trust -= 4>>
+					<</if>>
+					<<if _SlaveI.preg > 0>>
+						<<if _SlaveI.pregSource == -1>>
+							<<if _SlaveI.sexualQuirk is "perverted">>
+								She's even @@color:hotpink;aroused@@ by the constant awareness that her mother is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.behavioralQuirk is "sinful">>
+								Her feelings about carrying her mother's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.devotion > 95>>
+								She occasionally remembers that she's carrying her mother's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
+							<<elseif _SlaveI.devotion > 50>>
+								She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's, though she tries her best not to think about it.
+								<<set _SlaveI.devotion -= 1>>
+							<<elseif _SlaveI.devotion > 20>>
+								She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's that she often wakes up crying about it.
+								<<set _SlaveI.devotion -= 2>>
+							<<else>>
+								She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
+								<<set _SlaveI.devotion -= 4>>
+							<</if>>
+						<</if>>
+					<</if>>
+					<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+						Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+						<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
+						<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+						<<if _SlaveI.preg > 0>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+							<</if>>
+						<</if>>
+					<</if>>
+				<<elseif _SlaveI.father == -1>>
+					She
+					<<if _SlaveI.sexualQuirk is "perverted">>
+						is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.devotion > 95>>
+						is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own father.
+					<<elseif _SlaveI.devotion > 75>>
+						is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 50>>
+						is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 2>>
+					<<elseif _SlaveI.devotion > 20>>
+						is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 2>>
+						<<set _SlaveI.trust -= 2>>
+					<<else>>
+						is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 4>>
+						<<set _SlaveI.trust -= 4>>
+					<</if>>
+					<<if _SlaveI.preg > 0>>
+						<<if _SlaveI.pregSource == -1>>
+							<<if _SlaveI.sexualQuirk is "perverted">>
+								She's even @@color:hotpink;aroused@@ by the constant awareness that her father is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.behavioralQuirk is "sinful">>
+								Her feelings about carrying her father's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.devotion > 95>>
+								She occasionally remembers that she's carrying her father's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
+							<<elseif _SlaveI.devotion > 50>>
+								She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's, though she tries her best not to think about it.
+								<<set _SlaveI.devotion -= 1>>
+							<<elseif _SlaveI.devotion > 20>>
+								She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's that she often wakes up crying about it.
+								<<set _SlaveI.devotion -= 2>>
+							<<else>>
+								She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
+								<<set _SlaveI.devotion -= 4>>
+							<</if>>
+						<</if>>
+					<</if>>
+					<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+						Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+						<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
+						<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+						<<if _SlaveI.preg > 0>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+							<</if>>
+						<</if>>
+					<</if>>
+				<</if>>
+				<<if (_SlaveI.assignment == "be a servant") || (_SlaveI.assignment == "work as a servant") || (_SlaveI.assignment == "serve in the master suite") || (_SlaveI.assignment == "please you") || (_SlaveI.ID == $Concubine.ID)>>
+					She is @@color:hotpink;happy@@ to be allowed to serve you personally, since it's as close a relationship to you as she can aspire to. In addition, her deep love for you produces a slow but steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
+					<<set _SlaveI.devotion++, _SlaveI.trust++>>
 				<<else>>
-					She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-					<<set $slaves[$i].devotion -= 4>>
+					Her deep love for you produces a slow but steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
+					<<set _SlaveI.devotion++, _SlaveI.trust++>>
 				<</if>>
-			<</if>>
-		<</if>>
-		<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-			Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-			<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-			<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-			<<if $slaves[$i].preg > 0>>
-				<<if $slaves[$i].pregSource == $relation.ID>>
-					@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-					<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+				<<if (_SlaveI.devotion + _SlaveI.trust < 150)>>
+				<<if random(1, 100) > 50>>
+					She is no longer as devoted to you as she once was, and has @@color:lightsalmon;begun to look elsewhere for emotional support.@@
+					<<set _SlaveI.relationship = 0>>
 				<</if>>
-			<</if>>
-		<</if>>
-	<<elseif $slaves[$i].father == -1>>
-		She
-		<<if $slaves[$i].sexualQuirk is "perverted">>
-			is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 95>>
-			is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-			is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own father.
-		<<elseif $slaves[$i].devotion > 75>>
-			is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 50>>
-			is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 2>>
-			<<set $slaves[$i].trust -= 2>>
-		<<else>>
-			is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 4>>
-			<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<<if $slaves[$i].preg > 0>>
-			<<if $slaves[$i].pregSource == -1>>
-				<<if $slaves[$i].sexualQuirk is "perverted">>
-					She's even @@color:hotpink;aroused@@ by the constant awareness that her father is the parent of the daughter<<if $slaves[$i].pregType > 1>>s<</if>> she's carrying.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-					Her feelings about carrying her father's child<<if $slaves[$i].pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].devotion > 95>>
-					She occasionally remembers that she's carrying her father's child<<if $slaves[$i].pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
-				<<elseif $slaves[$i].devotion > 50>>
-					She's @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's, though she tries her best not to think about it.
-					<<set $slaves[$i].devotion -= 1>>
-				<<elseif $slaves[$i].devotion > 20>>
-					She's so @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's that she often wakes up crying about it.
-					<<set $slaves[$i].devotion -= 2>>
+				<</if>>
+				<<if _SlaveI.trust < 75>>
+				<<if random(1, 100) > 50>>
+					She is no longer as trusting of you as she once was, and has @@color:lightsalmon;begun to look elsewhere for emotional support.@@
+					<<set _SlaveI.relationship = 0>>
+				<</if>>
+				<</if>>
+			<<elseif _SlaveI.relationship == -3>>
+					<<if _SlaveI.mother == -1>>
+					She
+					<<if _SlaveI.sexualQuirk is "perverted">>
+						is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.devotion > 95>>
+						is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 75>>
+						is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 50>>
+						is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 2>>
+					<<elseif _SlaveI.devotion > 20>>
+						is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 2>>
+						<<set _SlaveI.trust -= 2>>
+					<<else>>
+						is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
+						<<set _SlaveI.devotion -= 4>>
+						<<set _SlaveI.trust -= 4>>
+					<</if>>
+					<<if _SlaveI.preg > 0>>
+						<<if _SlaveI.pregSource == -1>>
+							<<if _SlaveI.sexualQuirk is "perverted">>
+								She's even @@color:hotpink;aroused@@ by the constant awareness that her mother is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.behavioralQuirk is "sinful">>
+								Her feelings about carrying her mother's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.devotion > 95>>
+								She occasionally remembers that she's carrying her mother's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
+							<<elseif _SlaveI.devotion > 50>>
+								She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's, though she tries her best not to think about it.
+								<<set _SlaveI.devotion -= 1>>
+							<<elseif _SlaveI.devotion > 20>>
+								She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's that she often wakes up crying about it.
+								<<set _SlaveI.devotion -= 2>>
+							<<else>>
+								She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
+								<<set _SlaveI.devotion -= 4>>
+							<</if>>
+						<</if>>
+					<</if>>
+					<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+						Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+						<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
+						<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+						<<if _SlaveI.preg > 0>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+							<</if>>
+						<</if>>
+					<</if>>
+				<<elseif _SlaveI.father == -1>>
+					She
+					<<if _SlaveI.sexualQuirk is "perverted">>
+						is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.devotion > 95>>
+						is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own father.
+					<<elseif _SlaveI.devotion > 75>>
+						is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
+					<<elseif _SlaveI.devotion > 50>>
+						is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 2>>
+					<<elseif _SlaveI.devotion > 20>>
+						is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 2>>
+						<<set _SlaveI.trust -= 2>>
+					<<else>>
+						is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
+						<<set _SlaveI.devotion -= 4>>
+						<<set _SlaveI.trust -= 4>>
+					<</if>>
+					<<if _SlaveI.preg > 0>>
+						<<if _SlaveI.pregSource == -1>>
+							<<if _SlaveI.sexualQuirk is "perverted">>
+								She's even @@color:hotpink;aroused@@ by the constant awareness that her father is the parent of the daughter<<if _SlaveI.pregType > 1>>s<</if>> she's carrying.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.behavioralQuirk is "sinful">>
+								Her feelings about carrying her father's child<<if _SlaveI.pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.devotion > 95>>
+								She occasionally remembers that she's carrying her father's child<<if _SlaveI.pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
+							<<elseif _SlaveI.devotion > 50>>
+								She's @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's, though she tries her best not to think about it.
+								<<set _SlaveI.devotion -= 1>>
+							<<elseif _SlaveI.devotion > 20>>
+								She's so @@color:mediumorchid;disgusted@@ that the bab<<if _SlaveI.pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's that she often wakes up crying about it.
+								<<set _SlaveI.devotion -= 2>>
+							<<else>>
+								She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
+								<<set _SlaveI.devotion -= 4>>
+							<</if>>
+						<</if>>
+					<</if>>
+					<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+						Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+						<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
+						<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+						<<if _SlaveI.preg > 0>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+							<</if>>
+						<</if>>
+					<</if>>
+				<</if>>
+				<<if (_SlaveI.assignment == "be a servant") || (_SlaveI.assignment == "work as a servant") || (_SlaveI.assignment == "serve in the master suite") || (_SlaveI.assignment == "please you") || (_SlaveI.ID == $Concubine.ID)>>
+					She is @@color:hotpink;happy@@ to be allowed to live her life close to you, since she's your wife. In addition, her deep reliance on her formal relationship to you produces a steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
+					<<set _SlaveI.devotion += 2, _SlaveI.trust += 2>>
+				<<elseif (_SlaveI.assignment == "whore") || (_SlaveI.assignment == "work in the brothel") || (_SlaveI.assignment == "serve the public") || (_SlaveI.assignment == "serve in the club") || (_SlaveI.assignment == "work a glory hole") || (_SlaveI.assignment == "be confined in the arcade")>>
+					Her reliance on her formal relationship to you produces a slight increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust,@@ though this is reduced by being on a public sexual assignment rather than being kept for you alone. The public is less forgiving of you ordering your slave wife to fuck random citizens, @@color:red;seriously damaging your reputation.@@
+					<<set _SlaveI.devotion++, _SlaveI.trust++, $rep -= 100>>
 				<<else>>
-					She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-					<<set $slaves[$i].devotion -= 4>>
+					Her deep reliance on her formal relationship to you produces a steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
+					<<set _SlaveI.devotion++, _SlaveI.trust++>>
+				<</if>>
+				<<if (_SlaveI.devotion + _SlaveI.trust < 150)>>
+				<<if random(1, 100) > 50>>
+					Since she is no longer completely devoted to you, @@color:lightsalmon;your being married to her is no longer socially expedient.@@
+					<<set _SlaveI.relationship = 0>>
+				<</if>>
+				<</if>>
+				<<if _SlaveI.trust < 75>>
+				<<if random(1, 100) > 50>>
+					Since she is no longer absolutely trusting of you, @@color:lightsalmon;your being married to her is no longer socially expedient.@@
+					<<set _SlaveI.relationship = 0>>
 				<</if>>
-			<</if>>
-		<</if>>
-		<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-			Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-			<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-			<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-			<<if $slaves[$i].preg > 0>>
-				<<if $slaves[$i].pregSource == $relation.ID>>
-					@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-					<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
 				<</if>>
 			<</if>>
-		<</if>>
-	<</if>>
-<<if ($slaves[$i].assignment is "be a servant") || ($slaves[$i].assignment is "work as a servant") || ($slaves[$i].assignment is "serve in the master suite") || ($slaves[$i].assignment is "please you") || ($slaves[$i].ID is $Concubine.ID)>>
-	She is @@color:hotpink;happy@@ to be allowed to serve you personally, since it's as close a relationship to you as she can aspire to. In addition, her deep love for you produces a slow but steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
-	<<set $slaves[$i].devotion += 1>>
-	<<set $slaves[$i].trust += 1>>
-<<else>>
-	Her deep love for you produces a slow but steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
-	<<set $slaves[$i].devotion += 1>>
-	<<set $slaves[$i].trust += 1>>
-<</if>>
-<<if ($slaves[$i].devotion+$slaves[$i].trust < 150)>>
-<<if random(1,100) > 50>>
-	She is no longer as devoted to you as she once was, and has @@color:lightsalmon;begun to look elsewhere for emotional support.@@
-	<<set $slaves[$i].relationship to 0>>
-<</if>>
-<</if>>
-<<if $slaves[$i].trust < 75>>
-<<if random(1,100) > 50>>
-	She is no longer as trusting of you as she once was, and has @@color:lightsalmon;begun to look elsewhere for emotional support.@@
-	<<set $slaves[$i].relationship to 0>>
-<</if>>
-<</if>>
-
-<<elseif $slaves[$i].relationship is -3>>
-	<<if $slaves[$i].mother == -1>>
-		She
-		<<if $slaves[$i].sexualQuirk is "perverted">>
-			is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 95>>
-			is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-			is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 75>>
-			is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 50>>
-			is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 2>>
-			<<set $slaves[$i].trust -= 2>>
-		<<else>>
-			is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own mother.
-			<<set $slaves[$i].devotion -= 4>>
-			<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<<if $slaves[$i].preg > 0>>
-			<<if $slaves[$i].pregSource == -1>>
-				<<if $slaves[$i].sexualQuirk is "perverted">>
-					She's even @@color:hotpink;aroused@@ by the constant awareness that her mother is the parent of the daughter<<if $slaves[$i].pregType > 1>>s<</if>> she's carrying.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-					Her feelings about carrying her mother's child<<if $slaves[$i].pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].devotion > 95>>
-					She occasionally remembers that she's carrying her mother's child<<if $slaves[$i].pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
-				<<elseif $slaves[$i].devotion > 50>>
-					She's @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's, though she tries her best not to think about it.
-					<<set $slaves[$i].devotion -= 1>>
-				<<elseif $slaves[$i].devotion > 20>>
-					She's so @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her mother's that she often wakes up crying about it.
-					<<set $slaves[$i].devotion -= 2>>
+		<<elseif _SlaveI.relationshipRules == "restrictive">>
+			<<if _SlaveJ.relationshipRules == "restrictive">>
+				Since the rules forbid the relationship between _SlaveI.slaveName and _SlaveJ.slaveName, they are @@color:lightsalmon;forced apart.@@
+				<<if _SlaveI.relationship > 1>>
+					<<set _SlaveI.relationship--, _SlaveJ.relationship = _SlaveI.relationship>>
 				<<else>>
-					She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-					<<set $slaves[$i].devotion -= 4>>
+					<<set _SlaveJ.relationship = 0, _SlaveJ.relationshipTarget = 0, _SlaveI.relationship = 0, _SlaveI.relationshipTarget = 0>>
+				<</if>>
+				<<if _SlaveI.devotion <= 50>>
+					_SlaveI.slaveName @@color:mediumorchid;resents@@ this.
+					<<set _SlaveI.devotion -= 2>>
+				<</if>>
+				<<if _SlaveJ.devotion <= 50>>
+					_SlaveJ.slaveName @@color:mediumorchid;resents@@ this.
+					<<set _SlaveJ.devotion -= 2>>
 				<</if>>
 			<</if>>
-		<</if>>
-		<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-			Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-			<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-			<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-			<<if $slaves[$i].preg > 0>>
-				<<if $slaves[$i].pregSource == $relation.ID>>
-					@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-					<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+		<<elseif _SlaveI.relationshipRules == "just friends">>
+			<<if _SlaveI.relationship > 2>>
+				<<if _SlaveJ.relationshipRules == "restrictive">>
+					Since the sexual relationship between _SlaveI.slaveName and _SlaveJ.slaveName is against the rules, they are @@color:lightsalmon;forced to keep their hands to themselves.@@
+					<<set _SlaveJ.relationship = 2, _SlaveI.relationship = 2>>
+					<<if _SlaveI.devotion <= 50>>
+						_SlaveI.slaveName @@color:mediumorchid;resents@@ this.
+						<<set _SlaveI.devotion -= 2>>
+					<</if>>
+					<<if _SlaveJ.devotion <= 50>>
+						_SlaveJ.slaveName @@color:mediumorchid;resents@@ this.
+						<<set _SlaveJ.devotion -= 2>>
+					<</if>>
 				<</if>>
 			<</if>>
-		<</if>>
-	<<elseif $slaves[$i].father == -1>>
-		She
-		<<if $slaves[$i].sexualQuirk is "perverted">>
-			is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 95>>
-			is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-			is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own father.
-		<<elseif $slaves[$i].devotion > 75>>
-			is so devoted to you that she accepts carrying on an incestuous relationship with her own mother.
-		<<elseif $slaves[$i].devotion > 50>>
-			is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 2>>
-		<<elseif $slaves[$i].devotion > 20>>
-			is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 2>>
-			<<set $slaves[$i].trust -= 2>>
 		<<else>>
-			is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own father.
-			<<set $slaves[$i].devotion -= 4>>
-			<<set $slaves[$i].trust -= 4>>
-		<</if>>
-		<<if $slaves[$i].preg > 0>>
-			<<if $slaves[$i].pregSource == -1>>
-				<<if $slaves[$i].sexualQuirk is "perverted">>
-					She's even @@color:hotpink;aroused@@ by the constant awareness that her father is the parent of the daughter<<if $slaves[$i].pregType > 1>>s<</if>> she's carrying.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-					Her feelings about carrying her father's child<<if $slaves[$i].pregType > 1>>ren<</if>> are @@color:hotpink;secretly less mixed,@@ though.
-					<<set $slaves[$i].devotion += 1>>
-				<<elseif $slaves[$i].devotion > 95>>
-					She occasionally remembers that she's carrying her father's child<<if $slaves[$i].pregType > 1>>ren<</if>>, but does her best to accept it by not thinking about it.
-				<<elseif $slaves[$i].devotion > 50>>
-					She's @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's, though she tries her best not to think about it.
-					<<set $slaves[$i].devotion -= 1>>
-				<<elseif $slaves[$i].devotion > 20>>
-					She's so @@color:mediumorchid;disgusted@@ that the bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>> she's carrying is her father's that she often wakes up crying about it.
-					<<set $slaves[$i].devotion -= 2>>
-				<<else>>
-					She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-					<<set $slaves[$i].devotion -= 4>>
+			<<set _seed = 0>>
+			_SlaveI.slaveName
+			<<switch _SlaveI.relationship>>
+			<<case 1>>	/% friends %/
+				is friends with _SlaveJ.slaveName.
+				<<if (_SlaveI.devotion + _SlaveI.trust > 170) && (random(1, 2) == 1)>>
+					She's very devoted to you, and strongly trusts both you and her place as a slave. Since she is just friends with _SlaveJ.slaveName,
+					<<if _SlaveI.sexualQuirk == "romantic">>
+						and persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her	<<if _SlaveI.vagina > -1>>pussy<<else>>butthole<</if>>. @@color:lightgreen;She's become emotionally bonded to you!@@
+						<<set _SlaveI.relationship = -2>>
+					<<elseif _SlaveI.energy > 90>>
+						and is a total sex addict, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
+						<<set _SlaveI.relationship = -1>>
+					<<else>>
+						and loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
+						<<set _SlaveI.relationship to -2>>
+					<</if>>
+					<<set _SlaveJ.relationship = 0, _SlaveJ.relationshipTarget = 0, _SlaveI.relationshipTarget = 0>>
+				<<elseif $familyTesting == 1 && ( _SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > 80)>>
+					They build on their family relationship and become @@color:lightgreen;best friends.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > 80)>>
+					They build on their family relationship and become @@color:lightgreen;best friends.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.energy > 95) && (random(1, 100) > 70)>>
+					_SlaveI.slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.attrXX > 85) && (random(1, 100) > 70)>>
+					<<if (_SlaveJ.vagina > -1) || (_SlaveJ.faceShape != "masculine")>>
+						_SlaveI.slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif (_SlaveI.attrXY > 85) && (random(1, 100) > 70)>>
+					<<if (_SlaveJ.balls > 0)  or (_SlaveJ.faceShape == "masculine")>>
+						_SlaveI.slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif (random(1, 100) > 90)>>
+					They support and reassure each other and become @@color:lightgreen;best friends.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<</if>>
+			<<case 2>>	/% best friends %/
+				maintains a close friendship with _SlaveJ.slaveName.
+				<<if _SlaveI.sexualQuirk == "romantic">>
+					Her romantic bent drives her to search for a regular sexual partner.
+					<<set _seed = 10>>
 				<</if>>
+				<<if (_SlaveI.devotion + _SlaveI.trust > 95) && (random(1, 2) == 1)>>
+					_SlaveI.slaveName is totally devoted to you, and implicitly trusts both you and her place as a slave. Since her relationship with _SlaveJ.slaveName has not yet turned sexual, and
+					<<if _SlaveI.sexualQuirk == "romantic">>
+						she persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her <<if _SlaveI.vagina > -1>>pussy<<else>>butthole<</if>>. @@color:lightgreen;She's become emotionally bonded to you!@@
+						<<set _SlaveI.relationship = -2>>
+					<<elseif _SlaveI.energy > 90>>
+						she's a total sex addict, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
+						<<set _SlaveI.relationship = -1>>
+					<<else>>
+						she loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
+						<<set _SlaveI.relationship = -2>>
+					<</if>>
+					<<set _SlaveJ.relationship = 0, _SlaveJ.relationshipTarget = 0, _SlaveI.relationshipTarget = 0>>
+				<<elseif $familyTesting == 1 && (_SlaveI.energy > 95) && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (90-$seed))>>
+					Driven by nymphomania to attempt to have sex with everyone, _SlaveJ.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveJ.relationship = 0, _SlaveJ.relationshipTarget = 0, _SlaveI.relationshipTarget = 0>>
+				<<elseif (_SlaveI.energy > 95) && (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > (90 - $seed))>>
+					Driven by nymphomania to attempt to have sex with everyone, _SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif $familyTesting == 1 && (_SlaveI.sexualQuirk == "perverted") && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (80-$seed))>>
+					Revelling in the taboo nature of her attraction to _SlaveJ.slaveName, _SlaveI.slaveName successfully seduces her and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.sexualQuirk == "perverted") && (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > (80 - $seed))>>
+					Reveling in the taboo nature of her attraction to _SlaveJ.slaveName, _SlaveI.slaveName successfully seduces her and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif $familyTesting == 1 && (_SlaveI.behavioralQuirk == "sinful") && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (80-$seed))>>
+					Aroused by the chance to commit the sin of incest, _SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.behavioralQuirk == "sinful") && (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > (80 - $seed))>>
+					Aroused by the chance to commit the sin of incest, _SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.energy > 95) && (random(1, 100) > (80 - $seed))>>
+					_SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif random(1, 100) > (100 - $seed) - (0.2 * _SlaveI.attrXX)>>
+					<<if (_SlaveJ.vagina > -1) || (_SlaveJ.faceShape != "masculine")>>
+						_SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif random(1, 100) > (100 - $seed) - (0.2 * _SlaveI.attrXY)>>
+					<<if (_SlaveJ.balls > 0) || (_SlaveJ.faceShape == "masculine")>>
+						_SlaveI.slaveName successfully seduces _SlaveJ.slaveName and they become @@color:lightgreen;friends with benefits.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif $familyTesting == 1 && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0)>>
+					<<if random(1,100) > (95-$seed)>>
+						Eventually, they happen to be together and horny, and find themselves fucking without thinking. They have become incestuous @@color:lightgreen;friends with benefits.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget)>>
+					<<if random(1, 100) > (95 - $seed)>>
+						Eventually, they happen to be together and horny, and find themselves fucking without thinking. They have become incestuous @@color:lightgreen;friends with benefits.@@
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif (random(1, 100) > (95 - $seed))>>
+					<<if (_SlaveJ.vagina != -1) && (_SlaveI.behavioralFlaw == "hates women") && (random(1, 2) == 1)>>
+						Despite _SlaveI.slaveName's dislike of pussy,
+					<<elseif ((_SlaveJ.balls > 0) || (_SlaveJ.faceShape == "masculine")) && (_SlaveI.behavioralFlaw == "hates men") && (random(1, 2) == 1)>>
+						Despite _SlaveI.slaveName's distaste for cock,
+					<<else>>
+						Living in an atmosphere of omnipresent sexuality,
+					<</if>>
+					they fuck in a weak moment and find themselves becoming @@color:lightgreen;friends with benefits.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<</if>>
+			<<case 3>>	/% FWB %/
+				keeps up a sexual friendship with _SlaveJ.slaveName.
+				<<if _SlaveI.sexualQuirk == "romantic">>
+					Her romantic bent drives her to do her best to advance her relationship to an emotional level.
+					<<set _seed = 10>>
+				<</if>>
+				<<if $familyTesting == 1 && _SlaveI.energy > 95 && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (90-$seed))>>
+					She's such a desperate nympho that constant incest is nothing to her. She develops real feelings for _SlaveJ.slaveName as a romantic partner. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.energy > 95) && (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > (90 - $seed))>>
+					She's such a desperate nympho that constant incest is nothing to her. She develops real feelings for _SlaveJ.slaveName as a romantic partner. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif $familyTesting == 1 && (_SlaveI.sexualQuirk is "perverted") && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (80-$seed))>>
+					Revelling in the taboo nature of her sexual relationship with _SlaveJ.slaveName, she not only enjoys _SlaveJ.slaveName's body, but looks after her pleasure, too. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.sexualQuirk == "perverted") && (_SlaveI.relation != 0) && (_SlaveI.relationTarget is _SlaveI.relationshipTarget) && (random(1, 100) > (80 - $seed))>>
+					Reveling in the taboo nature of her sexual relationship with _SlaveJ.slaveName, she not only enjoys _SlaveJ.slaveName's body, but looks after her pleasure, too. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif $familyTesting == 1 && (_SlaveI.behavioralQuirk is "sinful") && (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0) && (random(1,100) > (80-$seed))>>
+					She gets deep, perverse satisfaction by constant commission of the sin of incest, which is extreme enough to appease even her appetite for transgression. Her incestuous relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.behavioralQuirk == "sinful") && (_SlaveI.relation != 0) && (_SlaveI.relationTarget == _SlaveI.relationshipTarget) && (random(1, 100) > (80 - $seed))>>
+					She gets deep, perverse satisfaction by constant commission of the sin of incest, which is extreme enough to appease even her appetite for transgression. Her incestuous relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif (_SlaveI.energy > 95) && (random(1, 100) > (80 - $seed))>>
+					She not only enjoys _SlaveJ.slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<<elseif random(1, 100) > (100 - $seed) - (0.2 * _SlaveI.attrXX)>>
+					<<if (_SlaveJ.vagina > -1) || (_SlaveJ.faceShape != "masculine")>>
+						She not only enjoys _SlaveJ.slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif random(1, 100) > (100 - $seed) - (0.2 * _SlaveI.attrXY)>>
+					<<if (_SlaveJ.balls > 0) || (_SlaveJ.faceShape = "masculine")>>
+						She not only enjoys _SlaveJ.slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
+						<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+					<</if>>
+				<<elseif (random(1, 100) > (95 - $seed))>>
+					They've spent enough time looking after each other's sexual and emotional needs that their relationship has become @@color:lightgreen;very strong.@@
+					<<set _SlaveI.relationship++, _SlaveJ.relationship = _SlaveI.relationship>>
+				<</if>>
+			<<case 4>>	/% lovers %/
+				and _SlaveJ.slaveName are lovers.
+			<<default>>	/% slave wives %/
+				has a slave wife, _SlaveJ.slaveName.
+				<<if $arcologies[0].FSChattelReligionist != "unset">>
+					Society @@color:green;approves@@ of their marriage, which advances the slave sacrament.
+					<<set $repGain += $FSSingleSlaveRep * ($arcologies[0].FSChattelReligionist / $FSLockinLevel), $arcologies[0].FSChattelReligionist += 0.05 * $FSSingleSlaveRep>>
+				<</if>>
+			<</switch>>
+			<<if _SlaveI.devotion <= 95>>
+				<<if _SlaveI.devotion != _SlaveJ.devotion>>
+					_SlaveI.slaveName absorbs <<if _SlaveI.relationship == 1>>a touch of her friend<<elseif _SlaveI.relationship == 2>>a little of her best friend<<elseif _SlaveI.relationship == 3>>some of her close friend<<elseif _SlaveI.relationship == 4>>a lot of her lover<<else>>much of her wife<</if>>'s
+					<<if _SlaveI.devotion > _SlaveJ.devotion>>
+						@@color:mediumorchid;<<if _SlaveJ.devotion > 50>>remaining doubts about you<<elseif _SlaveJ.devotion > 20>>remaining hesitations about sexual slavery<<elseif _SlaveJ.devotion > -20>>unhappiness about being a sex slave<<else>>anger at being a slave<</if>>.@@
+					<<else>>
+						@@color:hotpink;<<if _SlaveJ.devotion > 50>>love for you<<elseif _SlaveJ.devotion > 20>>acceptance of sexual slavery<<elseif _SlaveJ.devotion > -20>>submission to the reality of being a sex slave<<else>>unwillingness to immediately rebel<</if>>.@@
+					<</if>>
+					<<set _SlaveI.devotion -= Math.trunc((_SlaveI.devotion - _SlaveJ.devotion) * (0.1 * _SlaveI.relationship))>>
+				<</if>>
+			<<elseif _SlaveJ.devotion <= 95>>
+				She's so devoted to you that she's unaffected by _SlaveJ.slaveName's less abject submission.
 			<</if>>
-		<</if>>
-		<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-			Society @@color:green;strongly approves@@ of your incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-			<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-			<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-			<<if $slaves[$i].preg > 0>>
-				<<if $slaves[$i].pregSource == $relation.ID>>
-					@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-					<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+			<<if _SlaveI.trust <= 95>>
+				_SlaveI.slaveName
+				<<if _SlaveI.trust < -20>>
+					cares for _SlaveJ.slaveName and is @@color:gold;terrified@@ of what you might do to her if either of them misbehave. She @@color:hotpink;does her best@@ to avoid that.
+					<<set _SlaveI.trust -= _SlaveI.relationship, _SlaveI.devotion += _SlaveI.relationship>>
+				<<else>>
+					@@color:mediumaquamarine;trusts you@@
+					<<if _SlaveI.relationship <= 2>>
+						a little more for allowing her to have a friend.
+					<<elseif _SlaveI.relationship == 3>>
+						for letting her have a fuckbuddy.
+					<<elseif _SlaveI.relationship == 4>>
+						for permitting her and her lover to be together.
+					<<else>>
+						for giving her a wife.
+					<</if>>
+					<<set _SlaveI.trust += _SlaveI.relationship>>
+				<</if>>
+			<<elseif _SlaveI.devotion > 95>>
+				<<if _SlaveI.relationship > 4>>
+					She feels <<if $arcologies[0].FSChattelReligionist != "unset">>blessed with<<else>>she has<</if>> a truly good life as your slave.
 				<</if>>
 			<</if>>
 		<</if>>
 	<</if>>
-<<if ($slaves[$i].assignment is "be a servant") || ($slaves[$i].assignment is "work as a servant") || ($slaves[$i].assignment is "serve in the master suite") || ($slaves[$i].assignment is "please you") || ($slaves[$i].ID is $Concubine.ID)>>
-	She is @@color:hotpink;happy@@ to be allowed to live her life close to you, since she's your wife. In addition, her deep reliance on her formal relationship to you produces a steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
-	<<set $slaves[$i].devotion += 2>>
-	<<set $slaves[$i].trust += 2>>
-<<elseif ($slaves[$i].assignment is "whore") || ($slaves[$i].assignment is "work in the brothel") || ($slaves[$i].assignment is "serve the public") || ($slaves[$i].assignment is "serve in the club") || ($slaves[$i].assignment is "work a glory hole") || ($slaves[$i].assignment is "be confined in the arcade")>>
-	Her reliance on her formal relationship to you produces a slight increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust,@@ though this is reduced by being on a public sexual assignment rather than being kept for you alone. The public is less forgiving of you ordering your slave wife to fuck random citizens, @@color:red;seriously damaging your reputation.@@
-	<<set $slaves[$i].devotion += 1>>
-	<<set $slaves[$i].trust += 1>>
-	<<set $rep -= 100>>
-<<else>>
-	Her deep reliance on her formal relationship to you produces a steady increase of both @@color:hotpink;devotion@@ and @@color:mediumaquamarine;trust.@@
-	<<set $slaves[$i].devotion += 1>>
-	<<set $slaves[$i].trust += 1>>
-<</if>>
-<<if ($slaves[$i].devotion+$slaves[$i].trust < 150)>>
-<<if random(1,100) > 50>>
-	Since she is no longer completely devoted to you, @@color:lightsalmon;your being married to her is no longer socially expedient.@@
-	<<set $slaves[$i].relationship to 0>>
-<</if>>
-<</if>>
-<<if $slaves[$i].trust < 75>>
-<<if random(1,100) > 50>>
-	Since she is no longer absolutely trusting of you, @@color:lightsalmon;your being married to her is no longer socially expedient.@@
-	<<set $slaves[$i].relationship to 0>>
-<</if>>
-<</if>>
-
-<<elseif $slaves[$i].relationshipRules is "restrictive">>
-
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-	<<if $slaves[$j].relationshipRules is "restrictive">>
-		Since the rules forbid the relationship between $slaves[$i].slaveName and $slaves[$j].slaveName, they are @@color:lightsalmon;forced apart.@@
-		<<if $slaves[$i].relationship > 1>>
-			<<set $slaves[$j].relationship -= 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<else>>
-			<<set $slaves[$j].relationship to 0>>
-			<<set $slaves[$j].relationshipTarget to 0>>
-			<<set $slaves[$i].relationship to 0>>
-			<<set $slaves[$i].relationshipTarget to 0>>
-		<</if>>
-		<<if $slaves[$i].devotion <= 50>>
-			$slaves[$i].slaveName @@color:mediumorchid;resents@@ this.
-			<<set $slaves[$i].devotion -= 2>>
-		<</if>>
-		<<if $slaves[$j].devotion <= 50>>
-			$slaves[$j].slaveName @@color:mediumorchid;resents@@ this.
-			<<set $slaves[$j].devotion -= 2>>
-		<</if>>
-	<</if>>
-	<<break>>
-	<</if>>
-<</for>>
-
-<<elseif $slaves[$i].relationshipRules is "just friends">>
-
-<<if $slaves[$i].relationship > 2>>
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-	<<if $slaves[$j].relationshipRules is "restrictive">>
-		Since the sexual relationship between $slaves[$i].slaveName and $slaves[$j].slaveName is against the rules, they are @@color:lightsalmon;forced to keep their hands to themselves.@@
-		<<set $slaves[$j].relationship to 2>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to 2>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<if $slaves[$i].devotion <= 50>>
-			$slaves[$i].slaveName @@color:mediumorchid;resents@@ this.
-			<<set $slaves[$i].devotion -= 2>>
-		<</if>>
-		<<if $slaves[$j].devotion <= 50>>
-			$slaves[$j].slaveName @@color:mediumorchid;resents@@ this.
-			<<set $slaves[$j].devotion -= 2>>
-		<</if>>
-	<</if>>
-	<<break>>
-	<</if>>
-<</for>>
-<</if>>
-
-<<else>>
+	/% FWB, lovers, slave wives %/
+	<<if _SlaveI.relationship > 2>>
+		<<if $familyTesting == 1>>
+			<<if totalRelatives(_SlaveI) > 0>>
+				<<set $relation = 0>>
+				<<set $relationType = 0>>
+				<<for $j to 0; $j < $slaves.length; $j++>>
+					<<if _SlaveI.relationshipTarget == _SlaveJ.ID>>
+						<<if (_SlaveI.mother == _SlaveJ.ID || _SlaveI.father == _SlaveJ.ID || _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID || areSisters(_SlaveI, _SlaveJ) > 0)>>
+							<<if _SlaveJ.mother == _SlaveI.ID || _SlaveJ.father == _SlaveI.ID>>
+								<<set $relationType = "daughter">>
+							<<elseif _SlaveI.mother == _SlaveJ.ID>>
+								<<set $relationType = "mother">>
+							<<elseif _SlaveI.father == _SlaveJ.ID>>
+								<<set $relationType = "father">>
+							<<elseif areSisters(_SlaveI, _SlaveJ) == 1>>
+								<<set $relationType = "twin">>
+							<<elseif areSisters(_SlaveI, _SlaveJ) == 2>>
+								<<set $relationType = "sister">>
+							<<elseif areSisters(_SlaveI, _SlaveJ) == 3>>
+								<<set $relationType = "half-sister">>
+							<</if>>
+							<<set $relation = _SlaveJ>>
+							<<break>>
+						<</if>>
+					<</if>>
+				<</for>>
+				<<if $relation != 0>>
+					_SlaveI.slaveName
+					<<if _SlaveI.origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || _SlaveI.origin == "She offered to become your slave to protect her incestuous relationship.">>
+						is @@color:hotpink;grateful@@ and @@color:mediumaquamarine;trusting@@ towards you for protecting her in her long-standing incestuous relationship.
+						<<set _SlaveI.devotion += 2>>
+						<<set _SlaveI.trust += 2>>
+					<<elseif _SlaveI.sexualQuirk is "perverted">>
+						is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own $relationType.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.devotion > 95>>
+						is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own $relationType.
+						<<set _SlaveI.devotion += 1>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own $relationType.
+					<<elseif _SlaveI.devotion > 75>>
+						is so devoted to you that she accepts carrying on an incestuous relationship with her own $relationType.
+					<<elseif _SlaveI.devotion > 50>>
+						is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own $relationType.
+						<<set _SlaveI.devotion -= 2>>
+					<<elseif _SlaveI.devotion > 20>>
+						is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own $relationType.
+						<<set _SlaveI.devotion -= 2>>
+						<<set _SlaveI.trust -= 2>>
+					<<else>>
+						is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own $relationType.
+						<<set _SlaveI.devotion -= 4>>
+						<<set _SlaveI.trust -= 4>>
+					<</if>>
+					<<if _SlaveI.preg > 0>>
+						<<if _SlaveI.pregSource == $relation.ID>>
+							<<if _SlaveI.origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || _SlaveI.origin == "She offered to become your slave to protect her incestuous relationship.">>
+								She's @@color:hotpink;overjoyed@@ to be carrying her sister's child.
+								<<set _SlaveI.devotion += 2>>
+							<<elseif _SlaveI.sexualQuirk is "perverted">>
+								She's even @@color:hotpink;aroused@@ by the constant awareness that her $relationType is the parent of the daughter she's carrying.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.behavioralQuirk is "sinful">>
+								Her feelings about carrying her <<print $relationType>>'s child are @@color:hotpink;secretly less mixed,@@ though.
+								<<set _SlaveI.devotion += 1>>
+							<<elseif _SlaveI.devotion > 95>>
+								She occasionally remembers that she's carrying her <<print $relationType>>'s child, but does her best to accept it by not thinking about it.
+							<<elseif _SlaveI.devotion > 50>>
+								She's @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print $relationType>>'s, though she tries her best not to think about it.
+								<<set _SlaveI.devotion -= 1>>
+							<<elseif _SlaveI.devotion > 20>>
+								She's so @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print $relationType>>'s that she often wakes up crying about it.
+								<<set _SlaveI.devotion -= 2>>
+							<<else>>
+								She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
+								<<set _SlaveI.devotion -= 4>>
+							<</if>>
+						<</if>>
+					<</if>>
+					<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+						Society @@color:green;strongly approves@@ of their incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+						<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
+						<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+						<<if _SlaveI.preg > 0>>
+							<<if _SlaveI.pregSource == $relation.ID>>
+								@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+								<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+							<</if>>
+						<</if>>
+					<</if>>
+				<</if>>
+				<<set $relation = 0>>
+				<<set $relationType = 0>>
+			<</if>>
 
-<<for $j to 0; $j < $slaves.length; $j++>>
-<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-<<if $slaves[$i].relationship == 1>>
-	$slaves[$i].slaveName is friends with $slaves[$j].slaveName.
-	<<if ($slaves[$i].devotion+$slaves[$i].trust > 170) && (random(1,2) == 1)>>
-		She's very devoted to you, and strongly trusts both you and her place as a slave. Since she is just friends with $slaves[$j].slaveName,
-		<<if $slaves[$i].sexualQuirk is "romantic">>
-		and persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her	<<if $slaves[$i].vagina > -1>>pussy<<else>>butthole<</if>>.
-		@@color:lightgreen;She's become emotionally bonded to you!@@
-		<<set $slaves[$i].relationship to -2>>
-		<<elseif $slaves[$i].energy > 90>>
-		and is a total sex addict, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
-		<<set $slaves[$i].relationship to -1>>
-		<<else>>
-		and loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
-		<<set $slaves[$i].relationship to -2>>
-		<</if>>
-		<<set $slaves[$j].relationship to 0>>
-		<<set $slaves[$j].relationshipTarget to 0>>
-		<<set $slaves[$i].relationshipTarget to 0>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > 80)>>
-		They build on their family relationship and become @@color:lightgreen;best friends.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > 80)>>
-		They build on their family relationship and become @@color:lightgreen;best friends.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].energy > 95) && (random(1,100) > 70)>>
-		$slaves[$i].slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].attrXX > 85) && (random(1,100) > 70)>>
-		<<if ($slaves[$j].vagina > -1) || ($slaves[$j].faceShape != "masculine")>>
-			$slaves[$i].slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif ($slaves[$i].attrXY > 85) && (random(1,100) > 70)>>
-		<<if ($slaves[$j].balls > 0)  or ($slaves[$j].faceShape is "masculine")>>
-			$slaves[$i].slaveName obviously lusts after her friend, and does everything she can to @@color:lightgreen;draw her closer.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif (random(1,100) > 90)>>
-		They support and reassure each other and become @@color:lightgreen;best friends.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<</if>>
-<<elseif $slaves[$i].relationship is 2>>
-	$slaves[$i].slaveName maintains a close friendship with $slaves[$j].slaveName.
-	<<set $seed to 0>>
-	<<if $slaves[$i].sexualQuirk is "romantic">>
-		Her romantic bent drives her to search for a regular sexual partner.
-		<<set $seed += 10>>
-	<</if>>
-	<<if ($slaves[$i].devotion+$slaves[$i].trust > 95) && (random(1,2) == 1)>>
-		$slaves[$i].slaveName is totally devoted to you, and implicitly trusts both you and her place as a slave. Since her relationship with $slaves[$j].slaveName has not yet turned sexual,
-		<<if $slaves[$i].sexualQuirk is "romantic">>
-		and she persistently interprets sex in the most romantic possible terms, she has decided that she wants to be yours in her heart as well as her
-		<<if $slaves[$i].vagina > -1>>
-			pussy.
-		<<else>>
-			butthole.
-		<</if>>
-		@@color:lightgreen;She's become emotionally bonded to you!@@
-		<<set $slaves[$i].relationship to -2>>
-		<<elseif $slaves[$i].energy > 90>>
-		and she's a total sex addict, she begins to think of sex as her only meaningful emotional connection with people. @@color:lightgreen;She's become an emotional slut!@@
-		<<set $slaves[$i].relationship to -1>>
-		<<else>>
-		and she loves you, she begins to think of you as a woman might think of her lover - or <<if $PC.title != 0>>husband<<else>>wife<</if>>. She knows she cannot hope for more of a relationship with you than she has, but she finds emotional support in serving you nonetheless. @@color:lightgreen;She's become emotionally bonded to you!@@
-		<<set $slaves[$i].relationship to -2>>
-		<</if>>
-		<<set $slaves[$j].relationship to 0>>
-		<<set $slaves[$j].relationshipTarget to 0>>
-		<<set $slaves[$i].relationshipTarget to 0>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].energy > 95) && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (90-$seed))>>
-		Driven by nymphomania to attempt to have sex with everyone, $slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].energy > 95) && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (90-$seed))>>
-		Driven by nymphomania to attempt to have sex with everyone, $slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].sexualQuirk is "perverted") && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (80-$seed))>>
-		Revelling in the taboo nature of her attraction to $slaves[$j].slaveName, $slaves[$i].slaveName successfully seduces her and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].sexualQuirk is "perverted") && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (80-$seed))>>
-		Revelling in the taboo nature of her attraction to $slaves[$j].slaveName, $slaves[$i].slaveName successfully seduces her and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].behavioralQuirk is "sinful") && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (80-$seed))>>
-		Aroused by the chance to commit the sin of incest, $slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].behavioralQuirk is "sinful") && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (80-$seed))>>
-		Aroused by the chance to commit the sin of incest, $slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif ($slaves[$i].energy > 95) && (random(1,100) > (80-$seed))>>
-		$slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-	<<elseif random(1,100) > (100-$seed)-(0.2*$slaves[$i].attrXX)>>
-		<<if ($slaves[$j].vagina > -1) || ($slaves[$j].faceShape != "masculine")>>
-			$slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif random(1,100) > (100-$seed)-(0.2*$slaves[$i].attrXY)>>
-		<<if ($slaves[$j].balls > 0)  or ($slaves[$j].faceShape is "masculine")>>
-			$slaves[$i].slaveName successfully seduces $slaves[$j].slaveName and they become @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0)>>
-		<<if random(1,100) > (95-$seed)>>
-			Eventually, they happen to be together and horny, and find themselves fucking without thinking. They have become incestuous @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget)>>
-		<<if random(1,100) > (95-$seed)>>
-			Eventually, they happen to be together and horny, and find themselves fucking without thinking. They have become incestuous @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<<elseif (random(1,100) > (95-$seed))>>
-		<<if ($slaves[$j].vagina != -1) && ($slaves[$i].behavioralFlaw is "hates women") && (random(1,2) == 1)>>
-			Despite $slaves[$i].slaveName's dislike of pussy, they fuck in a weak moment and find themselves becoming @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<<elseif (($slaves[$j].balls > 0)  or ($slaves[$j].faceShape is "masculine")) && ($slaves[$i].behavioralFlaw is "hates men") && (random(1,2) == 1)>>
-			Despite $slaves[$i].slaveName's distaste for cock, they fuck in a weak moment and find themselves becoming @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
 		<<else>>
-			Living in an atmosphere of omnipresent sexuality, they fuck in a weak moment and find themselves becoming @@color:lightgreen;friends with benefits.@@
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$j].relationshipTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-			<<set $slaves[$i].relationshipTarget to $slaves[$j].ID>>
-		<</if>>
-	<</if>>
-<<elseif $slaves[$i].relationship is 3>>
-	$slaves[$i].slaveName keeps up a sexual friendship with $slaves[$j].slaveName.
-	<<set $seed to 0>>
-	<<if $slaves[$i].sexualQuirk is "romantic">>
-		Her romantic bent drives her to do her best to advance her relationship to an emotional level.
-		<<set $seed += 10>>
-	<</if>>
-	<<if $familyTesting == 1 && ($slaves[$i].energy > 95) && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (90-$seed))>>
-		She's such a desperate nympho that constant incest is nothing to her. She develops real feelings for $slaves[$j].slaveName as a romantic partner. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif ($slaves[$i].energy > 95) && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (90-$seed))>>
-		She's such a desperate nympho that constant incest is nothing to her. She develops real feelings for $slaves[$j].slaveName as a romantic partner. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].sexualQuirk is "perverted") && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (80-$seed))>>
-		Revelling in the taboo nature of her sexual relationship with $slaves[$j].slaveName, she not only enjoys $slaves[$j].slaveName's body, but looks after her pleasure, too. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif ($slaves[$i].sexualQuirk is "perverted") && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (80-$seed))>>
-		Revelling in the taboo nature of her sexual relationship with $slaves[$j].slaveName, she not only enjoys $slaves[$j].slaveName's body, but looks after her pleasure, too. Their relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif $familyTesting == 1 && ($slaves[$i].behavioralQuirk is "sinful") && ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0) && (random(1,100) > (80-$seed))>>
-		She gets deep, perverse satisfaction by constant commission of the sin of incest, which is extreme enough to appease even her appetite for transgression. Her incestuous relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif ($slaves[$i].behavioralQuirk is "sinful") && ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget) && (random(1,100) > (80-$seed))>>
-		She gets deep, perverse satisfaction by constant commission of the sin of incest, which is extreme enough to appease even her appetite for transgression. Her incestuous relationship becomes @@color:lightgreen;romantically emotional@@ as well as physical and familial.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif ($slaves[$i].energy > 95) && (random(1,100) > (80-$seed))>>
-		She not only enjoys $slaves[$j].slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<<elseif random(1,100) > (100-$seed)-(0.2*$slaves[$i].attrXX)>>
-		<<if ($slaves[$j].vagina > -1) || ($slaves[$j].faceShape != "masculine")>>
-			She not only enjoys $slaves[$j].slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<</if>>
-	<<elseif random(1,100) > (100-$seed)-(0.2*$slaves[$i].attrXY)>>
-		<<if ($slaves[$j].balls > 0) or ($slaves[$j].faceShape is "masculine")>>
-			She not only enjoys $slaves[$j].slaveName's body, but looks after her pleasure, too. Without meaning it to, their relationship becomes @@color:lightgreen;strongly emotional@@ as well as physical.
-			<<set $slaves[$j].relationship += 1>>
-			<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-		<</if>>
-	<<elseif (random(1,100) > (95-$seed))>>
-		They've spent enough time looking after each other's sexual and emotional needs that their relationship has become @@color:lightgreen;very strong.@@
-		<<set $slaves[$j].relationship += 1>>
-		<<set $slaves[$i].relationship to $slaves[$j].relationship>>
-	<</if>>
-<<elseif $slaves[$i].relationship is 4>>
-	$slaves[$i].slaveName and $slaves[$j].slaveName are lovers.
-<<else>>
-	$slaves[$i].slaveName has a slave wife, $slaves[$j].slaveName.
-	<<if $arcologies[0].FSChattelReligionist != "unset">>
-		Society @@color:green;approves@@ of their marriage, which advances the slave sacrament.
-		<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSChattelReligionist/$FSLockinLevel)>>
-		<<set $arcologies[0].FSChattelReligionist += 0.05*$FSSingleSlaveRep>>
-	<</if>>
-<</if>>
-<<if $slaves[$i].devotion <= 95>>
-	<<if $slaves[$i].devotion != $slaves[$j].devotion>>
-		<<if $slaves[$i].devotion > $slaves[$j].devotion>>
-			$slaves[$i].slaveName absorbs <<if $slaves[$i].relationship == 1>>a touch of her friend<<elseif $slaves[$i].relationship == 2>>a little of her best friend<<elseif $slaves[$i].relationship == 3>>some of her close friend<<elseif $slaves[$i].relationship == 4>>a lot of her lover<<else>>much of her wife<</if>>'s @@color:mediumorchid;<<if $slaves[$j].devotion > 50>>remaining doubts about you<<elseif $slaves[$j].devotion > 20>>remaining hesitations about sexual slavery<<elseif $slaves[$j].devotion > -20>>unhappiness about being a sex slave<<else>>anger at being a slave<</if>>.@@
-		<<else>>
-			$slaves[$i].slaveName absorbs <<if $slaves[$i].relationship == 1>>a touch of her friend<<elseif $slaves[$i].relationship == 2>>a little of her best friend<<elseif $slaves[$i].relationship == 3>>some of her close friend<<elseif $slaves[$i].relationship == 4>>a lot of her lover<<else>>much of her wife<</if>>'s @@color:hotpink;<<if $slaves[$j].devotion > 50>>love for you<<elseif $slaves[$j].devotion > 20>>acceptance of sexual slavery<<elseif $slaves[$j].devotion > -20>>submission to the reality of being a sex slave<<else>>unwillingness to immediately rebel<</if>>.@@
-		<</if>>
-		<<set $slaves[$i].devotion -= Math.trunc(($slaves[$i].devotion-$slaves[$j].devotion)*(0.1*$slaves[$i].relationship))>>
-	<</if>>
-<<elseif $slaves[$j].devotion <= 95>>
-	She's so devoted to you that she's unaffected by $slaves[$j].slaveName's less abject submission.
-<</if>>
-<<if $slaves[$i].trust <= 95>>
-	<<if $slaves[$i].trust < -20>>
-		$slaves[$i].slaveName cares for $slaves[$j].slaveName and is @@color:gold;terrified@@ of what you might do to her if either of them misbehave. She @@color:hotpink;does her best@@ to avoid that.
-		<<set $slaves[$i].trust -= $slaves[$i].relationship>>
-		<<set $slaves[$i].devotion += $slaves[$i].relationship>>
-	<<else>>
-		$slaves[$i].slaveName @@color:mediumaquamarine;trusts you@@
-		<<if $slaves[$i].relationship <= 2>>
-			a little more for allowing her to have a friend.
-		<<elseif $slaves[$i].relationship == 3>>
-			for letting her have a fuckbuddy.
-		<<elseif $slaves[$i].relationship == 4>>
-			for permitting her and her lover to be together.
-		<<else>>
-			for giving her a wife.
-		<</if>>
-		<<set $slaves[$i].trust += $slaves[$i].relationship>>
-	<</if>>
-<<elseif $slaves[$i].devotion > 95>>
-	<<if $slaves[$i].relationship > 4>>
-		She feels <<if $arcologies[0].FSChattelReligionist != "unset">>blessed with<<else>>she has<</if>> a truly good life as your slave.
-	<</if>>
-<</if>>
-<<break>>
-<</if>>
-<</for>>
-
-<</if>>
-<</if>>
 
-<<if $slaves[$i].relationship >= 3>>
-
-<<if $familyTesting == 1>>
-
-	<<if totalRelatives($slaves[$i]) > 0>>
-		<<set $relation = 0>>
-		<<set $relationType = 0>>
-		<<for $j to 0; $j < $slaves.length; $j++>>
-			<<if $slaves[$i].relationshipTarget == $slaves[$j].ID>>
-				<<if ($slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || areSisters($slaves[$i], $slaves[$j]) > 0)>>
-					<<if $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID>>
-						<<set $relationType = "daughter">>
-					<<elseif $slaves[$i].mother == $slaves[$j].ID>>
-						<<set $relationType = "mother">>
-					<<elseif $slaves[$i].father == $slaves[$j].ID>>
-						<<set $relationType = "father">>
-					<<elseif areSisters($slaves[$i], $slaves[$j]) == 1>>
-						<<set $relationType = "twin">>
-					<<elseif areSisters($slaves[$i], $slaves[$j]) == 2>>
-						<<set $relationType = "sister">>
-					<<elseif areSisters($slaves[$i], $slaves[$j]) == 3>>
-						<<set $relationType = "half-sister">>
-					<</if>>
-					<<set $relation = $slaves[$j]>>
-					<<break>>
+		<<if _SlaveI.relation != 0>>
+			<<if (_SlaveI.relationTarget == _SlaveI.relationshipTarget)>>
+				_SlaveI.slaveName is
+				<<if _SlaveI.origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling.">>
+					@@color:hotpink;grateful@@ and @@color:mediumaquamarine;trusting@@ towards you for protecting her in her long-standing incestuous relationship.
+					<<set _SlaveI.devotion += 2, _SlaveI.trust += 2>>
+				<<elseif _SlaveI.sexualQuirk is "perverted">>
+					such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+					<<set _SlaveI.devotion++>>
+				<<elseif _SlaveI.devotion > 95>>
+					so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+					<<set _SlaveI.devotion++>>
+				<<elseif _SlaveI.behavioralQuirk is "sinful">>
+					torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+				<<elseif _SlaveI.devotion > 75>>
+					so devoted to you that she accepts carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+				<<elseif _SlaveI.devotion > 50>>
+					somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+					<<set _SlaveI.devotion -= 2>>
+				<<elseif _SlaveI.devotion > 20>>
+					@@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+					<<set _SlaveI.devotion -= 2, _SlaveI.trust -= 2>>
+				<<else>>
+					@@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord(_SlaveI)>>.
+					<<set _SlaveI.devotion -= 4, _SlaveI.trust -= 4>>
 				<</if>>
-			<</if>>
-		<</for>>
-		<<if $relation != 0>>
-			$slaves[$i].slaveName
-			<<if $slaves[$i].origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || $slaves[$i].origin == "She offered to become your slave to protect her incestuous relationship.">>
-				is @@color:hotpink;grateful@@ and @@color:mediumaquamarine;trusting@@ towards you for protecting her in her long-standing incestuous relationship.
-				<<set $slaves[$i].devotion += 2>>
-				<<set $slaves[$i].trust += 2>>
-			<<elseif $slaves[$i].sexualQuirk is "perverted">>
-				is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own $relationType.
-				<<set $slaves[$i].devotion += 1>>
-			<<elseif $slaves[$i].devotion > 95>>
-				is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own $relationType.
-				<<set $slaves[$i].devotion += 1>>
-			<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-				is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own $relationType.
-			<<elseif $slaves[$i].devotion > 75>>
-				is so devoted to you that she accepts carrying on an incestuous relationship with her own $relationType.
-			<<elseif $slaves[$i].devotion > 50>>
-				is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own $relationType.
-				<<set $slaves[$i].devotion -= 2>>
-			<<elseif $slaves[$i].devotion > 20>>
-				is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own $relationType.
-				<<set $slaves[$i].devotion -= 2>>
-				<<set $slaves[$i].trust -= 2>>
-			<<else>>
-				is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own $relationType.
-				<<set $slaves[$i].devotion -= 4>>
-				<<set $slaves[$i].trust -= 4>>
-			<</if>>
-			<<if $slaves[$i].preg > 0>>
-				<<if $slaves[$i].pregSource == $relation.ID>>
-					<<if $slaves[$i].origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || $slaves[$i].origin == "She offered to become your slave to protect her incestuous relationship.">>
+				<<if _SlaveI.preg > 0>>
+				<<if _SlaveI.pregSource == _SlaveI.relationTarget>>
+					<<if _SlaveI.origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling.">>
 						She's @@color:hotpink;overjoyed@@ to be carrying her sister's child.
-						<<set $slaves[$i].devotion += 2>>
-					<<elseif $slaves[$i].sexualQuirk is "perverted">>
-						She's even @@color:hotpink;aroused@@ by the constant awareness that her $relationType is the parent of the daughter she's carrying.
-						<<set $slaves[$i].devotion += 1>>
-					<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-						Her feelings about carrying her <<print $relationType>>'s child are @@color:hotpink;secretly less mixed,@@ though.
-						<<set $slaves[$i].devotion += 1>>
-					<<elseif $slaves[$i].devotion > 95>>
-						She occasionally remembers that she's carrying her <<print $relationType>>'s child, but does her best to accept it by not thinking about it.
-					<<elseif $slaves[$i].devotion > 50>>
-						She's @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print $relationType>>'s, though she tries her best not to think about it.
-						<<set $slaves[$i].devotion -= 1>>
-					<<elseif $slaves[$i].devotion > 20>>
-						She's so @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print $relationType>>'s that she often wakes up crying about it.
-						<<set $slaves[$i].devotion -= 2>>
+						<<set _SlaveI.devotion += 2>>
+					<<elseif _SlaveI.sexualQuirk is "perverted">>
+						She's even @@color:hotpink;aroused@@ by the constant awareness that her <<print relationTargetWord(_SlaveI)>> is the parent of the daughter she's carrying.
+						<<set _SlaveI.devotion++>>
+					<<elseif _SlaveI.behavioralQuirk is "sinful">>
+						Her feelings about carrying her <<print relationTargetWord(_SlaveI)>>'s child are @@color:hotpink;secretly less mixed,@@ though.
+						<<set _SlaveI.devotion++>>
+					<<elseif _SlaveI.devotion > 95>>
+						She occasionally remembers that she's carrying her <<print relationTargetWord(_SlaveI)>>'s child, but does her best to accept it by not thinking about it.
+					<<elseif _SlaveI.devotion > 50>>
+						She's @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print relationTargetWord(_SlaveI)>>'s, though she tries her best not to think about it.
+						<<set _SlaveI.devotion-->>
+					<<elseif _SlaveI.devotion > 20>>
+						She's so @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print relationTargetWord(_SlaveI)>>'s that she often wakes up crying about it.
+						<<set _SlaveI.devotion -= 2>>
 					<<else>>
 						She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-						<<set $slaves[$i].devotion -= 4>>
+						<<set _SlaveI.devotion -= 4>>
 					<</if>>
 				<</if>>
-			<</if>>
-			<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-				Society @@color:green;strongly approves@@ of their incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-				<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-				<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-				<<if $slaves[$i].preg > 0>>
-					<<if $slaves[$i].pregSource == $relation.ID>>
-						@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-						<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
+				<</if>>
+				<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
+					Society @@color:green;strongly approves@@ of their incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
+					<<set $repGain += 2 * $FSSingleSlaveRep * ($arcologies[0].FSEgyptianRevivalist / $FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.1 * $FSSingleSlaveRep>>
+					<<if _SlaveI.preg > 0>>
+					<<if _SlaveI.pregSource == _SlaveI.relationTarget>>
+						@@color:green;The effect is greatly enhanced@@ by _SlaveI.slaveName's pureblooded pregnancy.
+						<<set $repGain += $FSSingleSlaveRep * ($arcologies[0].FSEgyptianRevivalist / $FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05 * $FSSingleSlaveRep * $pornFameBonus>>
+					<</if>>
 					<</if>>
 				<</if>>
 			<</if>>
 		<</if>>
-		<<set $relation = 0>>
-		<<set $relationType = 0>>
-	<</if>>
-
-<<else>>
 
-<<if $slaves[$i].relation != 0>>
-<<if ($slaves[$i].relationTarget is $slaves[$i].relationshipTarget)>>
-	$slaves[$i].slaveName
-	<<if $slaves[$i].origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || $slaves[$i].origin == "She offered to become your slave to protect her incestuous relationship.">>
-		is @@color:hotpink;grateful@@ and @@color:mediumaquamarine;trusting@@ towards you for protecting her in her long-standing incestuous relationship.
-		<<set $slaves[$i].devotion += 2>>
-		<<set $slaves[$i].trust += 2>>
-	<<elseif $slaves[$i].sexualQuirk is "perverted">>
-		is such a pervert that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-		<<set $slaves[$i].devotion += 1>>
-	<<elseif $slaves[$i].devotion > 95>>
-		is so inured to the perversities of slavery that she @@color:hotpink;enjoys@@ carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-		<<set $slaves[$i].devotion += 1>>
-	<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-		is torn between sinful delight and deep disgust that she's carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-	<<elseif $slaves[$i].devotion > 75>>
-		is so devoted to you that she accepts carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-	<<elseif $slaves[$i].devotion > 50>>
-		is somewhat @@color:mediumorchid;disturbed@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-		<<set $slaves[$i].devotion -= 2>>
-	<<elseif $slaves[$i].devotion > 20>>
-		is @@color:mediumorchid;disturbed@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-		<<set $slaves[$i].devotion -= 2>>
-		<<set $slaves[$i].trust -= 2>>
-	<<else>>
-		is @@color:mediumorchid;revolted@@ and @@color:gold;scared@@ that she's carrying on an incestuous relationship with her own <<print relationTargetWord($slaves[$i])>>.
-		<<set $slaves[$i].devotion -= 4>>
-		<<set $slaves[$i].trust -= 4>>
-	<</if>>
-	<<if $slaves[$i].preg > 0>>
-	<<if $slaves[$i].pregSource == $slaves[$i].relationTarget>>
-		<<if $slaves[$i].origin == "She offered herself to you for enslavement hoping you would preserve her incestuous relationship with her sibling." || $slaves[$i].origin == "She offered to become your slave to protect her incestuous relationship.">>
-			She's @@color:hotpink;overjoyed@@ to be carrying her sister's child.
-			<<set $slaves[$i].devotion += 2>>
-		<<elseif $slaves[$i].sexualQuirk is "perverted">>
-			She's even @@color:hotpink;aroused@@ by the constant awareness that her <<print relationTargetWord($slaves[$i])>> is the parent of the daughter she's carrying.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].behavioralQuirk is "sinful">>
-			Her feelings about carrying her <<print relationTargetWord($slaves[$i])>>'s child are @@color:hotpink;secretly less mixed,@@ though.
-			<<set $slaves[$i].devotion += 1>>
-		<<elseif $slaves[$i].devotion > 95>>
-			She occasionally remembers that she's carrying her <<print relationTargetWord($slaves[$i])>>'s child, but does her best to accept it by not thinking about it.
-		<<elseif $slaves[$i].devotion > 50>>
-			She's @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print relationTargetWord($slaves[$i])>>'s, though she tries her best not to think about it.
-			<<set $slaves[$i].devotion -= 1>>
-		<<elseif $slaves[$i].devotion > 20>>
-			She's so @@color:mediumorchid;disgusted@@ that the baby she's carrying is her <<print relationTargetWord($slaves[$i])>>'s that she often wakes up crying about it.
-			<<set $slaves[$i].devotion -= 2>>
-		<<else>>
-			She's @@color:mediumorchid;passionately hateful@@ of you for making her carry an incestuous pregnancy.
-			<<set $slaves[$i].devotion -= 4>>
 		<</if>>
-	<</if>>
-	<</if>>
-	<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-		Society @@color:green;strongly approves@@ of their incestuous relationship, which advances the Egyptian revivalist ideal of slave incest.
-		<<set $repGain += 2*$FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel)>>
-		<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-		<<if $slaves[$i].preg > 0>>
-		<<if $slaves[$i].pregSource == $slaves[$i].relationTarget>>
-			@@color:green;The effect is greatly enhanced@@ by $slaves[$i].slaveName's pureblooded pregnancy.
-			<<set $repGain += $FSSingleSlaveRep*($arcologies[0].FSEgyptianRevivalist/$FSLockinLevel), $arcologies[0].FSEgyptianRevivalist += 0.05*$FSSingleSlaveRep*$pornFameBonus>>
-		<</if>>
-		<</if>>
-	<</if>>
-<</if>>
-<</if>>
-
-<</if>>
 
-<<if $slaves[$i].releaseRules != "restrictive">>
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-	<<if $slaves[$i].sexualQuirk is "size queen">>
-	<<if canAchieveErection($slaves[$j])>>
-		<<if $slaves[$j].dick > 5>>
-		She's @@color:hotpink;very happy@@ with her romantic status, since it means she gets monster cock.
-		<<set $slaves[$i].devotion += 2>>
-		<<if $slaves[$i].anus > 0>>
-		<<if $slaves[$i].anus < 3>>
-			She's such a size queen that she takes it up her ass as often as she can bear it, despite her poor anus not being used to such abuse. This @@color:lime;stretches out her sphincter.@@
-			<<set $slaves[$i].anus += 1>>
-		<</if>>
-		<</if>>
-		For her part, $slaves[$j].slaveName @@color:hotpink;can barely believe her luck,@@ their sex life is so good.
-		<<set $slaves[$j].devotion += 2>>
-		<<elseif $slaves[$j].dick > 4>>
-		She @@color:hotpink;quite likes@@ being in a sexual relationship with a slave who has such an impressive dick.
-		<<set $slaves[$i].devotion += 1>>
-		<<if $slaves[$i].anus > 0>>
-		<<if $slaves[$i].anus < 2>>
-			She's such a size queen that she takes it up her ass as often as she can bear it, despite her tight butt not being used to such abuse. This @@color:lime;stretches out her sphincter.@@
-			<<set $slaves[$i].anus += 1>>
-		<</if>>
-		<</if>>
-		For her part, $slaves[$j].slaveName @@color:hotpink;enjoys@@ the benefits of having a lover so interested in her junk.
-		<<set $slaves[$j].devotion += 1>>
-		<<elseif $slaves[$j].dick > 3>>
-		$slaves[$i].slaveName @@color:hotpink;certainly doesn't mind@@ having reliable access to such a nice big dick.
-		<<set $slaves[$i].devotion += 1>>
-		For her part, $slaves[$j].slaveName @@color:hotpink;likes@@ having a lover who finds her penis appealing.
-		<<set $slaves[$j].devotion += 1>>
-		<</if>>
-	<</if>>
-	<</if>>
-	<<if ($slaves[$i].energy <= 90)>>
-	<<if ($slaves[$j].energy > 95)>>
-		$slaves[$j].slaveName is such a sex addict that she drags $slaves[$i].slaveName along with her in their enthusiastic sex life, @@color:green;slowly improving her sex drive.@@
-		<<set $slaves[$i].energy += 3>>
-	<<elseif ($slaves[$j].fetish is $slaves[$i].fetish) && ($slaves[$j].fetishKnown == 1) && ($slaves[$i].fetishKnown == 1)>>
-		$slaves[$j].slaveName and $slaves[$i].slaveName enjoy sharing their sexual fetishes so much it @@color:green;improves their sex drives@@ in proportion to the strength of their kinks.
-		<<set $slaves[$i].energy += 1+Math.trunc($slaves[$i].fetishStrength/30)>>
-	<<elseif ($slaves[$i].attrXX > 65) && ($slaves[$i].attrKnown == 1) && (($slaves[$j].vagina > -1) || ($slaves[$j].face > 0))>>
-		$slaves[$i].slaveName is very much attracted to $slaves[$j].slaveName, and their fulfilling sexual relationship @@color:green;gradually improves $slaves[$i].slaveName's sex drive.@@
-		<<set $slaves[$i].energy += 1>>
-	<<elseif ($slaves[$i].attrXY > 65) && ($slaves[$i].attrKnown == 1) && ($slaves[$j].dick > 0)>>
-		$slaves[$i].slaveName enjoys $slaves[$j].slaveName and her cock, and their fulfilling sexual relationship @@color:green;gradually improves $slaves[$i].slaveName's sex drive.@@
-		<<set $slaves[$i].energy += 1>>
-	<</if>>
-	<</if>>
-	<<if ($slaves[$i].attrKnown == 1)>>
-	<<if ($slaves[$i].attrXX <= 95)>>
-	<<if ($slaves[$j].vagina > -1) || ($slaves[$j].faceShape != "masculine")>>
-	<<if (random(1,100) < ($slaves[$i].relationship*5))>>
-		After finding comfort with a feminine lover, $slaves[$i].slaveName begins to experience more attraction to women.
-		<<set $slaves[$i].attrXX += 2>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<<if ($slaves[$i].attrXY <= 95)>>
-	<<if (($slaves[$j].balls > 0)  or ($slaves[$j].faceShape is "masculine"))>>
-	<<if (random(1,100) < ($slaves[$i].relationship*5))>>
-		After growing close to a lover with a dick, $slaves[$i].slaveName begins to experience more attraction to men.
-		<<set $slaves[$i].attrXY += 2>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<<if $slaves[$j].fetish != "none">>
-	<<if $slaves[$i].fetishStrength <= 95>>
-	<<if $slaves[$j].fetish != $slaves[$i].fetish>>
-	<<if $fetishChangeChance > random(0,100)-($slaves[$i].relationship*5)>>
-	<<if $slaves[$j].fetish is "boobs">>
-		After experiencing $slaves[$j].slaveName's love of breasts, her own and $slaves[$i].slaveName's, $slaves[$i].slaveName happily joins her as a @@color:lightcoral;boob fanatic.@@
-		<<set $slaves[$i].fetish to "boobs">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-	<<elseif $slaves[$j].fetish is "buttslut">>
-		$slaves[$j].slaveName begs $slaves[$i].slaveName to fuck her ass so many times that $slaves[$i].slaveName reconsiders her stance on buttsex. She becomes just as much of an @@color:lightcoral;anal slut@@ as $slaves[$j].slaveName.
-		<<set $slaves[$i].fetish to "buttslut">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-	<<elseif $slaves[$j].fetish is "cumslut">>
-		After sharing blowjobs with $slaves[$j].slaveName enough times, $slaves[$i].slaveName develops an @@color:lightcoral;oral fixation@@ of her own.
-		<<set $slaves[$i].fetish to "cumslut">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-	<<elseif $slaves[$j].fetish is "submissive">>
-		<<if ($slaves[$i].fetish != "dom")>>
-		$slaves[$j].slaveName begs $slaves[$i].slaveName to dominate her so many times that $slaves[$i].slaveName gets used to domination, and finds she likes it. She becomes just as much of a @@color:lightcoral;sexual dominant@@ as a slave can be.
-		<<set $slaves[$i].fetish to "dom">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-		<</if>>
-	<<elseif $slaves[$j].fetish is "dom">>
-		<<if ($slaves[$i].fetish != "submissive")>>
-		$slaves[$j].slaveName holds $slaves[$i].slaveName down and fucks her so many times that $slaves[$i].slaveName starts to get off on being used. She becomes a true @@color:lightcoral;sexual submissive@@, and loves $slaves[$j].slaveName all the more for dominating her.
-		<<set $slaves[$i].fetish to "submissive">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-		<</if>>
-	<<elseif $slaves[$j].fetish is "masochist">>
-		<<if ($slaves[$i].fetish != "sadist")>>
-		$slaves[$j].slaveName begs $slaves[$i].slaveName to hurt her so many times that $slaves[$i].slaveName gets used to sadism, and finds she likes it. She becomes just as much of an @@color:lightcoral;sexual sadist@@ as a slave can be.
-		<<set $slaves[$i].fetish to "sadist">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-		<</if>>
-	<<elseif $slaves[$j].fetish is "sadist">>
-		<<if ($slaves[$i].fetish != "masochist")>>
-		$slaves[$j].slaveName hits $slaves[$i].slaveName during sex so often that $slaves[$i].slaveName starts to get off on being beaten. She becomes a true @@color:lightcoral;masochist@@, and loves $slaves[$j].slaveName all the more for abusing her.
-		<<set $slaves[$i].fetish to "masochist">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-		<</if>>
-	<<elseif $slaves[$j].fetish is "humiliation">>
-		$slaves[$j].slaveName begs $slaves[$i].slaveName to humiliate her sexually so many times that $slaves[$i].slaveName can't help but be embarrassed by all the public sex, herself. She gets off on the @@color:lightcoral;humiliation@@ with $slaves[$j].slaveName.
-		<<set $slaves[$i].fetish to "humiliation">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-	<<elseif $slaves[$j].fetish is "pregnancy">>
-		$slaves[$j].slaveName shares her hopes and dreams of pregnancy and children with $slaves[$i].slaveName all the time, and $slaves[$i].slaveName can't help but feel her @@color:lightcoral;biological clock@@ tick in time with $slaves[$j].slaveName's.
-		<<set $slaves[$i].fetish to "pregnancy">>
-		<<set $slaves[$i].fetishKnown to 1>>
-		<<set $slaves[$i].fetishStrength = 65>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<<break>>
-	<</if>>
-<</for>>
-<</if>>
+		<<if _SlaveI.releaseRules != "restrictive">>
+			<<if _SlaveI.sexualQuirk == "size queen">>
+			<<if canAchieveErection(_SlaveJ)>>
+			<<if _SlaveJ.dick > 5>>
+				She's @@color:hotpink;very happy@@ with her romantic status, since it means she gets monster cock.
+				<<if ((_SlaveI.anus > 0) && (_SlaveI.anus < 3))>>
+					She's such a size queen that she takes it up her ass as often as she can bear it, despite her poor anus not being used to such abuse. This @@color:lime;stretches out her sphincter.@@
+					<<set _SlaveI.anus++>>
+				<</if>>
+				For her part, _SlaveJ.slaveName @@color:hotpink;can barely believe her luck,@@ their sex life is so good.
+				<<set _SlaveI.devotion += 2, _SlaveJ.devotion += 2>>
+			<<elseif _SlaveJ.dick > 4>>
+				She @@color:hotpink;quite likes@@ being in a sexual relationship with a slave who has such an impressive dick.
+				<<if ((_SlaveI.anus > 0) && (_SlaveI.anus < 2))>>
+					She's such a size queen that she takes it up her ass as often as she can bear it, despite her tight butt not being used to such abuse. This @@color:lime;stretches out her sphincter.@@
+					<<set _SlaveI.anus++>>
+				<</if>>
+				For her part, _SlaveJ.slaveName @@color:hotpink;enjoys@@ the benefits of having a lover so interested in her junk.
+				<<set _SlaveI.devotion++, _SlaveJ.devotion++>>
+			<<elseif _SlaveJ.dick > 3>>
+				_SlaveI.slaveName @@color:hotpink;certainly doesn't mind@@ having reliable access to such a nice big dick. For her part, _SlaveJ.slaveName @@color:hotpink;likes@@ having a lover who finds her penis appealing.
+				<<set _SlaveI.devotion++, _SlaveJ.devotion++>>
+			<</if>>
+			<</if>>
+			<</if>>
 
-<<if ($slaves[$i].relationship >= 4)>>
-<<if ($slaves[$i].devotion > 20) || (($slaves[$i].devotion >= -20) && ($slaves[$i].trust < -20) && ($slaves[$i].trust > -10))>>
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].relationshipTarget>>
-	<<if $slaves[$j].devotion > 75>>
-	<<if $slaves[$j].trust > 50>>
-	<<if $slaves[$j].intelligence > 0>>
-	<<if $slaves[$j].intelligenceImplant > 0>>
-	<<if $slaves[$j].actualAge - $slaves[$i].actualAge > 10>>
-		<<if random(1,50) > ($slaves[$i].intelligence*5) + ($slaves[$j].intelligence*10)>>
-		<<if ($slaves[$j].oralSkill > $slaves[$i].oralSkill)>>
-			$slaves[$i].slaveName's <<if $slaves[$i].relationship >= 5>>wife<<else>>lover<</if>> is older, more experienced, and better at blowjobs than she is. They are such good slaves that the senior girl serves as a mentor to the junior, improving her oral skills.
-			<<set $skillIncrease = 5>><<OralSkillIncrease $slaves[$i]>>
-		<<elseif ($slaves[$j].analSkill > $slaves[$i].analSkill) && ($slaves[$i].anus > 0)>>
-			$slaves[$i].slaveName's <<if $slaves[$i].relationship >= 5>>wife<<else>>lover<</if>> is older, more experienced, and better at taking a buttfuck than she is, and they are such good slaves that the senior girl serves as a mentor to the junior, improving her anal skills.
-			<<set $skillIncrease = 5>><<AnalSkillIncrease $slaves[$i]>>
-		<<elseif ($slaves[$j].vaginalSkill > $slaves[$i].vaginalSkill) && ($slaves[$i].vagina > 0) && ($slaves[$j].vagina > 0)>>
-			$slaves[$i].slaveName's <<if $slaves[$i].relationship >= 5>>wife<<else>>lover<</if>> is older, more experienced, and a better lover than she is, and they are such good slaves that the senior girl serves as a mentor to the junior, improving her vaginal skills.
-			<<set $skillIncrease = 5>><<VaginalSkillIncrease $slaves[$i]>>
-		<<elseif ($slaves[$j].trust > $slaves[$i].trust)>>
-			$slaves[$i].slaveName's <<if $slaves[$i].relationship >= 5>>wife<<else>>lover<</if>> is older, more experienced, and a better slave than she is, and they are such obedient slaves that the senior girl serves as a mentor to the junior, @@color:mediumaquamarine;improving her trust.@@
-			<<set $slaves[$i].trust += 11>>
-		<</if>>
+			<<if (_SlaveI.energy <= 90)>>
+				<<if (_SlaveJ.energy > 95)>>
+					_SlaveJ.slaveName is such a sex addict that she drags _SlaveI.slaveName along with her in their enthusiastic sex life, @@color:green;slowly improving her sex drive.@@
+					<<set _SlaveI.energy += 3>>
+				<<elseif (_SlaveJ.fetish == _SlaveI.fetish) && (_SlaveJ.fetishKnown == 1) && (_SlaveI.fetishKnown == 1)>>
+					_SlaveJ.slaveName and _SlaveI.slaveName enjoy sharing their sexual fetishes so much it @@color:green;improves their sex drives@@ in proportion to the strength of their kinks.
+					<<set _SlaveI.energy += 1 + Math.trunc(_SlaveI.fetishStrength / 30)>>
+				<<elseif (_SlaveI.attrXX > 65) && (_SlaveI.attrKnown == 1) && ((_SlaveJ.vagina > -1) || (_SlaveJ.face > 0))>>
+					_SlaveI.slaveName is very much attracted to _SlaveJ.slaveName, and their fulfilling sexual relationship @@color:green;gradually improves _SlaveI.slaveName's sex drive.@@
+					<<set _SlaveI.energy++>>
+				<<elseif (_SlaveI.attrXY > 65) && (_SlaveI.attrKnown == 1) && (_SlaveJ.dick > 0)>>
+					_SlaveI.slaveName enjoys _SlaveJ.slaveName and her cock, and their fulfilling sexual relationship @@color:green;gradually improves _SlaveI.slaveName's sex drive.@@
+					<<set _SlaveI.energy++>>
+				<</if>>
+			<</if>>
+			<<if (_SlaveI.attrKnown == 1)>>
+				<<if (_SlaveI.attrXX <= 95)>>
+				<<if (_SlaveJ.vagina > -1) || (_SlaveJ.faceShape != "masculine")>>
+				<<if (random(1, 100) < (_SlaveI.relationship * 5))>>
+					After finding comfort with a feminine lover, _SlaveI.slaveName begins to experience more attraction to women.
+					<<set _SlaveI.attrXX += 2>>
+				<</if>>
+				<</if>>
+				<</if>>
+				<<if (_SlaveI.attrXY <= 95)>>
+				/% Shouldn't this be _SlaveJ.dick not balls? %/
+				<<if ((_SlaveJ.balls > 0) || (_SlaveJ.faceShape == "masculine"))>>
+				<<if (random(1, 100) < (_SlaveI.relationship * 5))>>
+					After growing close to a lover with a dick, _SlaveI.slaveName begins to experience more attraction to men.
+					<<set _SlaveI.attrXY += 2>>
+				<</if>>
+				<</if>>
+				<</if>>
+			<</if>>
+			<<if ((_SlaveJ.fetish != "none") && (_SlaveJ.fetish != "mindbroken"))>>
+				<<if _SlaveI.fetishStrength <= 95>>
+				<<if _SlaveJ.fetish != _SlaveI.fetish>>
+				<<if $fetishChangeChance > (random(0, 100) - (_SlaveI.relationship * 5))>>
+					<<switch _SlaveJ.fetish>>
+					<<case "boobs">>
+						After experiencing _SlaveJ.slaveName's love of breasts, her own and _SlaveI.slaveName's, _SlaveI.slaveName happily joins her as a @@color:lightcoral;boob fanatic.@@
+						<<set _SlaveI.fetish = "boobs", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+					<<case "buttslut">>
+						_SlaveJ.slaveName begs _SlaveI.slaveName to fuck her ass so many times that _SlaveI.slaveName reconsiders her stance on buttsex. She becomes just as much of an @@color:lightcoral;anal slut@@ as _SlaveJ.slaveName.
+						<<set _SlaveI.fetish = "buttslut", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+					<<case "cumslut">>
+						After sharing blowjobs with _SlaveJ.slaveName enough times, _SlaveI.slaveName develops an @@color:lightcoral;oral fixation@@ of her own.
+						<<set _SlaveI.fetish = "cumslut", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+					<<case "submissive">>
+						<<if (_SlaveI.fetish != "dom")>>
+							_SlaveJ.slaveName begs _SlaveI.slaveName to dominate her so many times that _SlaveI.slaveName gets used to domination, and finds she likes it. She becomes just as much of a @@color:lightcoral;sexual dominant@@ as a slave can be.
+							<<set _SlaveI.fetish = "dom", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+						<</if>>
+					<<case "dom">>
+						<<if (_SlaveI.fetish != "submissive")>>
+							_SlaveJ.slaveName holds _SlaveI.slaveName down and fucks her so many times that _SlaveI.slaveName starts to get off on being used. She becomes a true @@color:lightcoral;sexual submissive@@, and loves _SlaveJ.slaveName all the more for dominating her.
+							<<set _SlaveI.fetish = "submissive", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+						<</if>>
+					<<case "masochist">>
+						<<if (_SlaveI.fetish != "sadist")>>
+							_SlaveJ.slaveName begs _SlaveI.slaveName to hurt her so many times that _SlaveI.slaveName gets used to sadism, and finds she likes it. She becomes just as much of an @@color:lightcoral;sexual sadist@@ as a slave can be.
+							<<set _SlaveI.fetish = "sadist", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+						<</if>>
+					<<case "sadist">>
+						<<if (_SlaveI.fetish != "masochist")>>
+							_SlaveJ.slaveName hits _SlaveI.slaveName during sex so often that _SlaveI.slaveName starts to get off on being beaten. She becomes a true @@color:lightcoral;masochist@@, and loves _SlaveJ.slaveName all the more for abusing her.
+							<<set _SlaveI.fetish = "masochist", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+						<</if>>
+					<<case "humiliation">>
+						_SlaveJ.slaveName begs _SlaveI.slaveName to humiliate her sexually so many times that _SlaveI.slaveName can't help but be embarrassed by all the public sex, herself. She gets off on the @@color:lightcoral;humiliation@@ with _SlaveJ.slaveName.
+						<<set _SlaveI.fetish = "humiliation", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+					<<case "pregnancy">>
+						_SlaveJ.slaveName shares her hopes and dreams of pregnancy and children with _SlaveI.slaveName all the time, and _SlaveI.slaveName can't help but feel her @@color:lightcoral;biological clock@@ tick in time with _SlaveJ.slaveName's.
+						<<set _SlaveI.fetish = "pregnancy", _SlaveI.fetishKnown = 1, _SlaveI.fetishStrength = 65>>
+					<</switch>>
+				<</if>>
+				<</if>>
+				<</if>>
+			<</if>>
 		<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<</if>>
-	<<break>>
-	<</if>>
-<</for>>
-<</if>>
-<</if>>
 
-<</if>> /* CLOSES RELATIONSHIP CHECK FOR LONG TERM RELATIONSHIP EFFECTS */
-
-/* FAMILY FEELINGS */
-
-<<if $familyTesting == 1>>
-
-<<if totalRelatives($slaves[$i]) > 0>>
-<<if $slaves[$i].trust <= 95>>
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$i].trust < -20>>
-		<<if $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID>>
-			<<if $slaves[$i].rivalry != $slaves[$j].ID>>
-			$slaves[$i].slaveName is @@color:gold;agonizingly aware@@ that her child $slaves[$j].slaveName is also your slave and might suffer if either of them angers you, and @@color:hotpink;does her best@@ to protect her.
-			<<set $slaves[$i].trust -= 4>>
-			<<set $slaves[$i].devotion += 4>>
+		<<if (_SlaveI.relationship >= 4)>>
+			/% I don't think this code block ever runs due to the double trust in the && as it can't be < -20 and > -10 at the same time %/
+			<<if (_SlaveI.devotion > 20) || ((_SlaveI.devotion >= -20) && (_SlaveI.trust < -20)) || (_SlaveI.trust > -10)>>
+			<<if _SlaveJ.devotion > 75>>
+			<<if _SlaveJ.trust > 50>>
+			<<if _SlaveJ.intelligence > 0>>
+			<<if _SlaveJ.intelligenceImplant > 0>>
+			<<if _SlaveJ.actualAge - _SlaveI.actualAge > 10>>
+			<<if random(1, 50) > (_SlaveI.intelligence * 5) + (_SlaveJ.intelligence * 10)>>
+				_SlaveI.slaveName's <<if _SlaveI.relationship >= 5>>wife<<else>>lover<</if>> is older, more experienced, and
+				<<if (_SlaveJ.oralSkill > _SlaveI.oralSkill)>>
+					better at blowjobs than she is. They are such good slaves that the senior girl serves as a mentor to the junior, improving her oral skills.
+					<<set $skillIncrease = 5>><<OralSkillIncrease _SlaveI>>
+				<<elseif (_SlaveJ.analSkill > _SlaveI.analSkill) && (_SlaveI.anus > 0)>>
+					better at taking a buttfuck than she is, and they are such good slaves that the senior girl serves as a mentor to the junior, improving her anal skills.
+					<<set $skillIncrease = 5>><<AnalSkillIncrease _SlaveI>>
+				<<elseif (_SlaveJ.vaginalSkill > _SlaveI.vaginalSkill) && (_SlaveI.vagina > 0) && (_SlaveJ.vagina > 0)>>
+					a better lover than she is, and they are such good slaves that the senior girl serves as a mentor to the junior, improving her vaginal skills.
+					<<set $skillIncrease = 5>><<VaginalSkillIncrease _SlaveI>>
+				<<elseif (_SlaveJ.trust > _SlaveI.trust)>>
+					a better slave than she is, and they are such obedient slaves that the senior girl serves as a mentor to the junior, @@color:mediumaquamarine;improving her trust.@@
+					<<set _SlaveI.trust += 11>>
+				<</if>>
+			<</if>>
+			<</if>>
+			<</if>>
+			<</if>>
 			<</if>>
-		<</if>>
-		<<if $slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || areSisters($slaves[$i], $slaves[$j]) > 0>>
-			<<if $slaves[$i].rivalry != $slaves[$j].ID>>
-			$slaves[$i].slaveName is @@color:gold;painfully concious@@ that her 
-			<<if $slaves[$i].mother == $slaves[$j].ID>>
-				mother
-			<<elseif $slaves[$i].father == $slaves[$j].ID>>
-				father
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 1>>
-				twin sister
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 2>>
-				sister
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 3>>
-				half-sister
 			<</if>>
-			$slaves[$j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
-			<<set $slaves[$i].trust -= 2>>
-			<<set $slaves[$i].devotion += 2>>
 			<</if>>
 		<</if>>
-	<<else>>
-		<<if $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID || $slaves[$i].mother == $slaves[$j].ID || $slaves[$i].father == $slaves[$j].ID || areSisters($slaves[$i], $slaves[$j]) > 0>>
-			$slaves[$i].slaveName knows that her
-			<<if $slaves[$i].mother == $slaves[$j].ID>>
-				mother
-			<<elseif $slaves[$i].father == $slaves[$j].ID>>
-				father
-			<<elseif $slaves[$j].mother == $slaves[$i].ID || $slaves[$j].father == $slaves[$i].ID>>
-				daughter
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 1>>
-				twin sister
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 2>>
-				sister
-			<<elseif areSisters($slaves[$i], $slaves[$j]) == 3>>
-				half-sister
+	<</if>> /* CLOSES RELATIONSHIP CHECK FOR LONG TERM RELATIONSHIP EFFECTS */
+	/* FAMILY FEELINGS */
+
+	<<if $familyTesting == 1>>
+
+	<<if totalRelatives(_SlaveI) > 0>>
+	<<if _SlaveI.trust <= 95>>
+	<<for _j to 0; _j < $slaves.length; _j++>>
+		<<if _SlaveI.trust < -20>>
+			<<if $slaves[_j].mother == _SlaveI.ID || $slaves[_j].father == _SlaveI.ID>>
+				<<if _SlaveI.rivalry != $slaves[_j].ID>>
+				_SlaveI.slaveName is @@color:gold;agonizingly aware@@ that her child $slaves[_j].slaveName is also your slave and might suffer if either of them angers you, and @@color:hotpink;does her best@@ to protect her.
+				<<set _SlaveI.trust -= 2>>
+				<<set _SlaveI.devotion += 6>>
+				<</if>>
 			<</if>>
-			$slaves[$j].slaveName
-			<<if $slaves[$j].devotion > 50>>
-				loves being your sex slave, and is @@color:hotpink;happy@@ for her.
-				<<set $slaves[$i].devotion += 2>>
-			<<elseif ($slaves[$j].devotion > 20) || ($slaves[$j].trust < -20)>>
-				is an obedient sex slave, and hopes she'll avoid punishment.
-			<<else>>
-				hates being a sex slave, and is @@color:gold;afraid@@ for her.
-				<<set $slaves[$i].trust -= 2>>
+			<<if _SlaveI.mother == $slaves[_j].ID || _SlaveI.father == $slaves[_j].ID || areSisters(_SlaveI, $slaves[_j]) > 0>>
+				<<if _SlaveI.rivalry != $slaves[_j].ID>>
+				<<if _SlaveI.mother == $slaves[_j].ID>>
+					_SlaveI.slaveName is @@color:gold;painfully concious@@ that her mother $slaves[_j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+					<<set _SlaveI.trust -= 1>>
+					<<set _SlaveI.devotion += 3>>
+				<<elseif _SlaveI.father == $slaves[_j].ID>>
+					_SlaveI.slaveName is @@color:gold;painfully concious@@ that her father $slaves[_j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+					<<set _SlaveI.trust -= 1>>
+					<<set _SlaveI.devotion += 3>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 1>>
+					_SlaveI.slaveName is @@color:gold;painfully concious@@ that her twin sister $slaves[_j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+					<<set _SlaveI.trust -= 1>>
+					<<set _SlaveI.devotion += 3>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 2>>
+					_SlaveI.slaveName is @@color:gold;painfully concious@@ that her sister $slaves[_j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+					<<set _SlaveI.trust -= 1>>
+					<<set _SlaveI.devotion += 3>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 3>>
+					_SlaveI.slaveName is @@color:gold;painfully concious@@ that her half-sister $slaves[_j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+					<<set _SlaveI.trust -= 1>>
+					<<set _SlaveI.devotion += 3>>
+				<</if>>
+				<</if>>
+			<</if>>
+		<<else>>
+			<<if totalRelatives(_SlaveI) > 0>>
+				<<if _SlaveI.mother == $slaves[_j].ID>>
+					_SlaveI.slaveName knows that her mother $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<<elseif _SlaveI.father == $slaves[_j].ID>>
+					_SlaveI.slaveName knows that her father $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<<elseif $slaves[_j].mother == _SlaveI.ID || $slaves[_j].father == _SlaveI.ID>>
+					_SlaveI.slaveName knows that her daughter $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 1>>
+					_SlaveI.slaveName knows that her twin sister $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 2>>
+					_SlaveI.slaveName knows that her sister $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<<elseif areSisters(_SlaveI, $slaves[_j]) == 3>>
+					_SlaveI.slaveName knows that her half-sister $slaves[_j].slaveName
+					<<if $slaves[_j].devotion > 50>>
+						loves being your sex slave, and is @@color:hotpink;happy@@ for her.
+						<<set _SlaveI.devotion += 4>>
+					<<elseif ($slaves[_j].devotion > 20) || ($slaves[_j].trust < -20)>>
+						is an obedient sex slave, and hopes she'll avoid punishment.
+					<<else>>
+						hates being a sex slave, and is @@color:gold;afraid@@ for her.
+						<<set _SlaveI.trust -= 1>>
+					<</if>>
+				<</if>>
 			<</if>>
 		<</if>>
+	<</for>>
+	<</if>>
 	<</if>>
-<</for>>
-<</if>>
-<</if>>
 
-<<else>>
+	<<else>>
 
-<<if $slaves[$i].relationTarget != 0>>
-<<if $slaves[$i].rivalryTarget != $slaves[$i].relationTarget>>
-<<for $j to 0; $j < $slaves.length; $j++>>
-<<if $slaves[$j].ID is $slaves[$i].relationTarget>>
-	<<if $slaves[$i].trust <= 95>>
-		<<if $slaves[$i].trust < -20>>
-			<<if $slaves[$i].relation is "mother">>
-				$slaves[$i].slaveName is @@color:gold;agonizingly aware@@ that her child $slaves[$j].slaveName is also your slave and might suffer if either of them angers you, and @@color:hotpink;does her best@@ to protect her.
-				<<set $slaves[$i].trust -= 4>>
-				<<set $slaves[$i].devotion += 4>>
+	<<if _K != -1>>
+	<<if _SlaveI.trust <= 95>>
+		_SlaveI.slaveName
+		<<if _SlaveI.trust < -20>>
+			<<if _SlaveI.relation is "mother">>
+				is @@color:gold;agonizingly aware@@ that her child $slaves[_K].slaveName is also your slave and might suffer if either of them angers you, and @@color:hotpink;does her best@@ to protect her.
+				<<set _SlaveI.trust -= 4, _SlaveI.devotion += 4>>
 			<<else>>
-				$slaves[$i].slaveName is @@color:gold;painfully conscious@@ that her <<if $slaves[$i].relation is "daughter">>mother<<else>>$slaves[$i].relation<</if>> $slaves[$j].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
-				<<set $slaves[$i].trust -= 2>>
-				<<set $slaves[$i].devotion += 2>>
+				is @@color:gold;painfully conscious@@ that her <<if _SlaveI.relation == "daughter">>mother<<else>>_SlaveI.relation<</if>> $slaves[_K].slaveName is also your slave and might suffer if either of them displeases you, and @@color:hotpink;tries to obey@@ as best she can.
+				<<set _SlaveI.trust -= 2, _SlaveI.devotion += 2>>
 			<</if>>
 		<<else>>
-			$slaves[$i].slaveName knows that her <<if $slaves[$i].relation is "mother">>daughter<<elseif $slaves[$i].relation is "daughter">>mother<<else>>$slaves[$i].relation<</if>> $slaves[$j].slaveName
-			<<if $slaves[$j].devotion > 50>>
+			knows that her <<if _SlaveI.relation == "mother">>daughter<<elseif _SlaveI.relation == "daughter">>mother<<else>>_SlaveI.relation<</if>> $slaves[_K].slaveName
+			<<if $slaves[_K].devotion > 50>>
 				loves being your sex slave, and is @@color:hotpink;happy@@ for her.
-				<<set $slaves[$i].devotion += 2>>
-			<<elseif ($slaves[$j].devotion > 20) || ($slaves[$j].trust < -20)>>
+				<<set _SlaveI.devotion += 2>>
+			<<elseif ($slaves[_K].devotion > 20) || ($slaves[_K].trust < -20)>>
 				is an obedient sex slave, and hopes she'll avoid punishment.
 			<<else>>
 				hates being a sex slave, and is @@color:gold;afraid@@ for her.
-				<<set $slaves[$i].trust -= 2>>
+				<<set _SlaveI.trust -= 2>>
 			<</if>>
 		<</if>>
 	<</if>>
-	<<break>>
-<</if>>
-<</for>>
-<</if>>
-<</if>>
+	<</if>>
 
-<</if>>
+	<</if>> /* closes family mod */
 
-<</if>> /* CLOSES FUCKDOLL CHECK */
\ No newline at end of file
+	<<set $slaves[$i] = _SlaveI>>
+	<<if _SlaveJ != null>>
+		<<set $slaves[_J] = _SlaveJ>>
+	<</if>>
+<</if>> /% CLOSES FUCKDOLL CHECK %/
diff --git a/src/uncategorized/saRivalries.tw b/src/uncategorized/saRivalries.tw
index 5b7cec7b19d80346bfa9b16f508158e93bfc6458..4cdefd3b139c00f494ec104338f7e2b541e5eb09 100644
--- a/src/uncategorized/saRivalries.tw
+++ b/src/uncategorized/saRivalries.tw
@@ -1,29 +1,27 @@
 :: SA rivalries [nobr]
- 
-<<if $slaves[$i].fuckdoll == 0>>
 
+<<if $slaves[$i].fuckdoll == 0>>
+<<set _SL = $slaves.length>>
 <<if $slaves[$i].rivalry == 0>>
 
 <<if $slaves[$i].fetish != "mindbroken">>
 	<<if $slaves[$i].behavioralFlaw is "none">>
-		<<set $seed to random(1,100)>>
+		<<set _seed to random(1,100)>>
 	<<else>>
-		<<set $seed to random(1,110)>>
-	<</if>>
-	<<if $seed > 90>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if $slaves[$j].ID != $slaves[$i].ID>>
-		<<if $slaves[$j].assignment is $slaves[$i].assignment>>
-		<<if $slaves[$j].assignment != "stay confined">>
-		<<if $slaves[$j].assignment != "be confined in the arcade">>
-		<<if ($slaves[$j].rivalry == 0) && ($slaves[$i].rivalry == 0)>>
-		<<if ($slaves[$i].relationshipTarget != $slaves[$j].ID)>>
-		<<if random(-100,100) > ($slaves[$j].devotion+$slaves[$i].devotion)>>
-			$slaves[$i].slaveName and $slaves[$j].slaveName see too much of each other and @@color:lightsalmon;start to dislike each other.@@
-			<<set $slaves[$j].rivalry to 1>>
-			<<set $slaves[$j].rivalryTarget to $slaves[$i].ID>>
-			<<set $slaves[$i].rivalry to 1>>
-			<<set $slaves[$i].rivalryTarget to $slaves[$j].ID>>
+		<<set _seed to random(1,110)>>
+	<</if>>
+	<<if _seed > 90>>
+	<<for _j to 0; _j < _SL; _j++>>
+		<<if $slaves[_j].assignment == $slaves[$i].assignment>>
+		<<if $slaves[_j].ID != $slaves[$i].ID>>
+		<<if $slaves[_j].assignment != "stay confined">>
+		<<if $slaves[_j].assignment != "be confined in the arcade">>
+		<<if ($slaves[_j].rivalry == 0)>>
+		<<if ($slaves[$i].relationshipTarget != $slaves[_j].ID)>>
+		<<if random(-100,100) > ($slaves[_j].devotion+$slaves[$i].devotion)>>
+			$slaves[$i].slaveName and $slaves[_j].slaveName see too much of each other and @@color:lightsalmon;start to dislike each other.@@
+			<<set $slaves[_j].rivalry to 1, $slaves[_j].rivalryTarget to $slaves[$i].ID>>
+			<<set $slaves[$i].rivalry to 1, $slaves[$i].rivalryTarget to $slaves[_j].ID>>
 		<</if>>
 		<</if>>
 		<</if>>
@@ -36,166 +34,87 @@
 <</if>>
 
 <<else>>
-
-<<if $slaves[$i].fetish is "mindbroken">>
-
-Since she is mindbroken, she @@color:lightsalmon;can't really maintain@@ any meaningful rivalry with
-<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$j].slaveName.
-		<<set $slaves[$j].rivalry to 0>>
-		<<set $slaves[$j].rivalryTarget to 0>>
-		<<break>>
-	<</if>>
+<<set _SlaveJ = null>>
+<<for _j = 0; _j < _SL; _j++>>
+<<if $slaves[_j].ID is $slaves[$i].rivalryTarget>>
+	<<set _SlaveJ = $slaves[_j]>>
+	<<break>>
+<</if>>
 <</for>>
-<<set $slaves[$i].rivalry to 0>>
-<<set $slaves[$i].rivalryTarget to 0>>
 
+<<if _SlaveJ != null>>
+
+<<if $slaves[$i].fetish is "mindbroken">>
+	Since she is mindbroken, she @@color:lightsalmon;can't really maintain@@ any meaningful rivalry with _SlaveJ.slaveName.
+	<<set_SlaveJ.rivalry to 0,_SlaveJ.rivalryTarget to 0>>
+	<<set $slaves[$i].rivalry to 0, $slaves[$i].rivalryTarget to 0>>
 <<else>>
 
 <<if (random(1,100) > 70)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-	<<if ($slaves[$j].assignment != $slaves[$i].assignment) && ($slaves[$i].subTarget != $slaves[$j].ID) && ($slaves[$j].subTarget != $slaves[$i].ID)>>
-		With time apart $slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightgreen;dislike each other less.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-	<<elseif ($slaves[$j].fetish is $slaves[$i].fetish) && ($slaves[$j].fetishKnown == 1) && ($slaves[$i].fetishKnown == 1)>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName share sexual interests, and in the sexual atmosphere of the arcology, it's @@color:lightgreen;difficult for them to keep up their dislike@@ of one another with the mutual attraction.
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-	<<elseif ($slaves[$j].devotion > 50) && ($slaves[$i].devotion > 50)>>
-		Since both $slaves[$i].slaveName and $slaves[$j].slaveName are devoted to you, they work together to @@color:lightgreen;get over their feud,@@ since it gets in the way of their duties.
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-	<<elseif ($slaves[$j].trust < -20) && ($slaves[$i].devotion < -20)>>
-		Since both $slaves[$i].slaveName and $slaves[$j].slaveName are terrified of you, they work together to @@color:lightgreen;get over their feud,@@ since it brings punishment on both of them.
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-	<<elseif ($slaves[$j].ID is $slaves[$i].relationshipTarget) && ($slaves[$i].relationship > 3)>>
-		<<set $slaves[$j].rivalry to 0>>
-		<<set $slaves[$j].rivalryTarget to 0>>
-		<<set $slaves[$i].rivalry to 0>>
-		<<set $slaves[$i].rivalryTarget to 0>>
+	<<if (_SlaveJ.assignment != $slaves[$i].assignment) && ($slaves[$i].subTarget != _SlaveJ.ID) && (_SlaveJ.subTarget != $slaves[$i].ID)>>
+		With time apart $slaves[$i].slaveName and _SlaveJ.slaveName @@color:lightgreen;dislike each other less.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
+	<<elseif (_SlaveJ.fetish is $slaves[$i].fetish) && (_SlaveJ.fetishKnown == 1) && ($slaves[$i].fetishKnown == 1)>>
+		$slaves[$i].slaveName and _SlaveJ.slaveName share sexual interests, and in the sexual atmosphere of the arcology, it's @@color:lightgreen;difficult for them to keep up their dislike@@ of one another with the mutual attraction.
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
+	<<elseif (_SlaveJ.devotion > 50) && ($slaves[$i].devotion > 50)>>
+		Since both $slaves[$i].slaveName and _SlaveJ.slaveName are devoted to you, they work together to @@color:lightgreen;get over their feud,@@ since it gets in the way of their duties.
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
+	<<elseif (_SlaveJ.trust < -20) && ($slaves[$i].devotion < -20)>>
+		Since both $slaves[$i].slaveName and _SlaveJ.slaveName are terrified of you, they work together to @@color:lightgreen;get over their feud,@@ since it brings punishment on both of them.
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
+	<<elseif (_SlaveJ.ID is $slaves[$i].relationshipTarget) && ($slaves[$i].relationship > 3)>>
+		<<set _SlaveJ.rivalry to 0, _SlaveJ.rivalryTarget to 0>>
+		<<set $slaves[$i].rivalry to 0, $slaves[$i].rivalryTarget to 0>>
 	<<elseif (random(1,100) > 70)>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName's @@color:lightgreen;feud dissipates a little.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-	<</if>>
-	<<break>>
-	<</if>>
-	<</for>>
-<<elseif $familyTesting == 1 && ($slaves[$i].mother > 0 || $slaves[$i].father > 0 || $slaves[$i].daughters > 0 || $slaves[$i].sisters > 0) && (random(1,100) > 80)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightsalmon;pursue their family rivalry.@@
-		<<set $slaves[$j].rivalry += 1>>
-		<<set $slaves[$i].rivalry += 1>>
-		<<break>>
+		$slaves[$i].slaveName and _SlaveJ.slaveName's @@color:lightgreen;feud dissipates a little.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 	<</if>>
-	<</for>>
+<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0 && (random(1,100) > 80)>>
+		$slaves[$i].slaveName and_SlaveJ.slaveName @@color:lightsalmon;pursue their family rivalry.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 <<elseif ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].rivalryTarget) && (random(1,100) > 80)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightsalmon;pursue their family rivalry.@@
-		<<set $slaves[$j].rivalry += 1>>
-		<<set $slaves[$i].rivalry += 1>>
-		<<break>>
-	<</if>>
-	<</for>>
-<<elseif $familyTesting == 1 && ($slaves[$i].mother > 0 || $slaves[$i].father > 0 || $slaves[$i].daughters > 0 || $slaves[$i].sisters > 0) && (random(1,100) > 80)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightgreen;patch up their family relationship.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
-	<</for>>
+	$slaves[$i].slaveName and _SlaveJ.slaveName @@color:lightsalmon;pursue their family rivalry.@@
+	<<set _SlaveJ.rivalry += 1, $slaves[$i].rivalry += 1>>
+<<elseif $familyTesting == 1 && totalRelatives($slaves[$i]) > 0 && (random(1,100) > 80)>>
+		$slaves[$i].slaveName and _SlaveJ.slaveName @@color:lightgreen;patch up their family relationship.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 <<elseif ($slaves[$i].relation != 0) && ($slaves[$i].relationTarget is $slaves[$i].rivalryTarget) && (random(1,100) > 80)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightgreen;patch up their family relationship.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
-	<</for>>
+	$slaves[$i].slaveName and _SlaveJ.slaveName @@color:lightgreen;patch up their family relationship.@@
+	<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 <<elseif ($slaves[$i].energy > 95) && (random(1,100) > 60)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName lusts after $slaves[$j].slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
-	<</for>>
+	$slaves[$i].slaveName lusts after _SlaveJ.slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
+	<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 <<elseif ($slaves[$i].attrXX > 85) && (random(1,100) > 70)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-	<<if ($slaves[$j].vagina > -1) || ($slaves[$j].faceShape != "masculine")>>
-		$slaves[$i].slaveName lusts after $slaves[$j].slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
+	<<if (_SlaveJ.vagina > -1) || (_SlaveJ.faceShape != "masculine")>>
+		$slaves[$i].slaveName lusts after _SlaveJ.slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 	<</if>>
-	<</for>>
 <<elseif ($slaves[$i].attrXY > 85) && (random(1,100) > 70)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-	<<if ($slaves[$j].balls > 0) || ($slaves[$j].faceShape is "masculine")>>
-		$slaves[$i].slaveName lusts after $slaves[$j].slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
+	<<if (_SlaveJ.balls > 0) || (_SlaveJ.faceShape is "masculine")>>
+		$slaves[$i].slaveName lusts after _SlaveJ.slaveName, and does everything she can to @@color:lightgreen;patch up their differences.@@
+		<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 	<</if>>
-	<</for>>
 <<elseif (random(1,100) > 90)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName @@color:lightsalmon;bicker@@ and indulge their rivalry whenever they can.
-		<<set $slaves[$j].rivalry += 1>>
-		<<set $slaves[$i].rivalry += 1>>
-		<<break>>
-	<</if>>
-	<</for>>
+	$slaves[$i].slaveName and _SlaveJ.slaveName @@color:lightsalmon;bicker@@ and indulge their rivalry whenever they can.
+	<<set _SlaveJ.rivalry += 1, $slaves[$i].rivalry += 1>>
 <<elseif (random(1,100) > 90)>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		$slaves[$i].slaveName and $slaves[$j].slaveName manage to @@color:lightgreen;de-escalate their little feud.@@
-		<<set $slaves[$j].rivalry -= 1>>
-		<<set $slaves[$i].rivalry -= 1>>
-		<<break>>
-	<</if>>
-	<</for>>
+	$slaves[$i].slaveName and _SlaveJ.slaveName manage to @@color:lightgreen;de-escalate their little feud.@@
+	<<set _SlaveJ.rivalry -= 1, $slaves[$i].rivalry -= 1>>
 <</if>>
-
+<</if>>
+<<set $slaves[_j] = _SlaveJ>>
 <</if>>
 <</if>>
 
 <<if $slaves[$i].rivalry != 0>>
-	<<set $seed to 0>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-	<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-	<<if $slaves[$i].ID is $slaves[$j].rivalryTarget>>
-		<<set $seed to 1>>
-		<<break>>
-	<</if>>
-	<</if>>
-	<</for>>
-	<<if $seed == 0>>
-	<<for $j to 0; $j < $slaves.length; $j++>>
-		<<if $slaves[$j].ID is $slaves[$i].rivalryTarget>>
-		<<set $slaves[$j].rivalry to 0>>
-		<<set $slaves[$j].rivalryTarget to 0>>
+<<for _j to 0; _j < _SL; _j++>>
+	<<if ($slaves[_j].ID == $slaves[$i].rivalryTarget) && ($slaves[$i].ID != $slaves[_j].rivalryTarget)>>
+		<<set $slaves[_j].rivalry to 0, $slaves[_j].rivalryTarget to 0>>
+		<<set $slaves[$i].rivalry to 0, $slaves[$i].rivalryTarget to 0>>
 		<<break>>
-		<</if>>
-	<</for>>
-	<<set $slaves[$i].rivalry to 0>>
-	<<set $slaves[$i].rivalryTarget to 0>>
 	<</if>>
+<</for>>
 <</if>>
 
 <</if>> /* CLOSES FUCKDOLL CHECK */
diff --git a/src/uncategorized/saTakeClasses.tw b/src/uncategorized/saTakeClasses.tw
index 15ce46c9421f1335eb4ca441bdbeb189dc0a4d46..870a53e42421063bf18e0d785644a902b45411e4 100644
--- a/src/uncategorized/saTakeClasses.tw
+++ b/src/uncategorized/saTakeClasses.tw
@@ -149,12 +149,18 @@ takes courses in slavery<<if $schoolroomUpgradeSkills + $schoolroomUpgradeRemedi
 <<if $slaves[$i].voice != 0>>
 	<<if ($slaves[$i].intelligence > random(-4,4))>>
 	<<if ($schoolroomUpgradeLanguage == 0)>>
-		<<if ($slaves[$i].accent >= 3)>>
+		<<if ($slaves[$i].accent > 3)>>
+			She has @@color:green;learned some $language,@@ and can make her point with some gesturing, though she speaks $language horribly.
+			<<set $slaves[$i].accent -= 1>>
+		<<elseif ($slaves[$i].accent == 3)>>
 		She has @@color:green;learned functional $language,@@ and can make herself understood, though her $slaves[$i].nationality accent is still quite heavy.
-		<<set $slaves[$i].accent to 2>>
+		<<set $slaves[$i].accent -= 1>>
 		<</if>>
 	<<else>>
-		<<if ($slaves[$i].accent >= 2)>>
+		<<if ($slaves[$i].accent > 3)>>
+			She has @@color:green;learned some $language,@@ and can make her point with some gesturing, though she speaks $language horribly.
+			<<set $slaves[$i].accent -= 1>>
+		<<elseif ($slaves[$i].accent >= 2)>>
 		She has @@color:green;learned decent $language,@@ though she retains enough of her $slaves[$i].nationality accent to make her voice distinctly sexy.
 		<<set $slaves[$i].accent to 1>>
 		<</if>>
diff --git a/src/uncategorized/schoolroomReport.tw b/src/uncategorized/schoolroomReport.tw
index de6a5ef5ffd4a3fd02077c4adc80455a65b6a92c..578624acbea6842b758bb0e6ae9db9b9c12eb299 100644
--- a/src/uncategorized/schoolroomReport.tw
+++ b/src/uncategorized/schoolroomReport.tw
@@ -152,8 +152,8 @@
 		<</if>>
 	<</if>>
 	<</for>>
-	<<if ($schoolroomSlaves < 5)>>
-		<<set $seed to random(1,10)+((5-$schoolroomSlaves)*(random(150,170)+($idleBonus*10)))>>
+	<<if ($schoolroomSlaves < $schoolroom)>>
+		<<set $seed to random(1,10)+(($schoolroom-$schoolroomSlaves)*(random(150,170)+($idleBonus*10)))>>
 		<<set $cash += $seed>>
 		Since she doesn't have enough students to occupy all her time, $schoolroomName takes in citizens' slaves on a contract basis and she teaches them too, earning @@color:yellowgreen;¤$seed.@@
 	<</if>>
diff --git a/src/uncategorized/seCoursing.tw b/src/uncategorized/seCoursing.tw
index 1de79dc9cbb98b46798253efc2f90c476aae1bee..16f3b69c860fe8cc5c2f466afe4ccd4a2361e222 100644
--- a/src/uncategorized/seCoursing.tw
+++ b/src/uncategorized/seCoursing.tw
@@ -330,6 +330,12 @@ You place your hand on the leash's quick release and whisper your direction into
 <<elseif $Lurcher.muscles <= 5>>
 	She's soft, and is panting desperately within a few short strides.
 	<<set $LurcherSpeed -= 1>>
+<<elseif $Lurcher.muscles <= -30>>
+	She's very weak, and is panting desperately from just walking to the starting line.
+	<<set $LurcherSpeed -= 4>>
+<<elseif $Lurcher.muscles <= -95>>
+	She's physically frail, barely capable of walking let alone running.
+	<<set $LurcherSpeed -= 20>>
 <</if>>
 <<if $Lurcher.height >= 185>>
 	Her steps are long, too long, in fact, her long legs slowing her gait.
@@ -593,6 +599,9 @@ You place your hand on the leash's quick release and whisper your direction into
 		To rape a struggling victim, and taste her tears of defeat.
 	<</if>>
 	<<set $Lurcher.devotion += 5>>
+	<<elseif $Lurcher.fetish is "pregnancy" && $origin is "heavily pregnant">>
+	You lurcher is @@color:hotpink;thrilled@@ to have had the privilege of chasing down and raping a pregnant woman.
+	<<set $Lurcher.devotion += 5>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -665,6 +674,12 @@ You place your hand on the leash's quick release and whisper your direction into
 <<elseif $Lurcher.muscles <= 5>>
 	She's soft, and is panting desperately within a few short strides.
 	<<set $LurcherSpeed -= 1>>
+<<elseif $Lurcher.muscles <= -30>>
+	She's very weak, and is panting desperately from just walking to the starting line.
+	<<set $LurcherSpeed -= 4>>
+<<elseif $Lurcher.muscles <= -95>>
+	She's physically frail, barely capable of walking let alone running.
+	<<set $LurcherSpeed -= 20>>
 <</if>>
 <<if $Lurcher.height >= 185>>
 	Her steps are long, too long, in fact, her long legs slowing her gait.
@@ -924,6 +939,9 @@ You place your hand on the leash's quick release and whisper your direction into
 		To rape a struggling victim, and taste her tears of defeat.
 	<</if>>
 	<<set $Lurcher.devotion += 5>>
+	<<elseif $Lurcher.fetish is "pregnancy" && $origin is "heavily pregnant">>
+	You lurcher is @@color:hotpink;thrilled@@ to have had the privilege of chasing down and raping a pregnant woman.
+	<<set $Lurcher.devotion += 5>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -996,6 +1014,12 @@ You place your hand on the leash's quick release and whisper your direction into
 <<elseif $Lurcher.muscles <= 5>>
 	She's soft, and is panting desperately within a few short strides.
 	<<set $LurcherSpeed -= 1>>
+<<elseif $Lurcher.muscles <= -30>>
+	She's very weak, and is panting desperately from just walking to the starting line.
+	<<set $LurcherSpeed -= 4>>
+<<elseif $Lurcher.muscles <= -95>>
+	She's physically frail, barely capable of walking let alone running.
+	<<set $LurcherSpeed -= 20>>
 <</if>>
 <<if $Lurcher.height >= 185>>
 	Her steps are long, too long, in fact, her long legs slowing her gait.
@@ -1255,6 +1279,9 @@ You place your hand on the leash's quick release and whisper your direction into
 		To rape a struggling victim, and taste her tears of defeat.
 	<</if>>
 	<<set $Lurcher.devotion += 5>>
+	<<elseif $Lurcher.fetish is "pregnancy" && $origin is "heavily pregnant">>
+	You lurcher is @@color:hotpink;thrilled@@ to have had the privilege of chasing down and raping a pregnant woman.
+	<<set $Lurcher.devotion += 5>>
 	<</if>>
 	<</if>>
 	<</if>>
diff --git a/src/uncategorized/seCustomSlaveDelivery.tw b/src/uncategorized/seCustomSlaveDelivery.tw
index 5e1f7168b1ff9ab37d7ad0ac51acd938d0966a07..3c47034660581c8271a8cb8abc0cf8b3ec8ae777 100644
--- a/src/uncategorized/seCustomSlaveDelivery.tw
+++ b/src/uncategorized/seCustomSlaveDelivery.tw
@@ -27,9 +27,9 @@
 <<set $activeSlave.devotion = random(-10,10)>>
 <<set $activeSlave.trust = random(-10,10)>>
 
-<<NationalityToRace>>
-<<NationalityToName>>
-<<NationalityToAccent>>
+<<NationalityToRace $activeSlave>>
+<<NationalityToName $activeSlave>>
+<<NationalityToAccent $activeSlave>>
 
 <<if $activeSlave.race is "black">>
 	<<set $activeSlave.skin to either("black", "brown", "light brown")>>
diff --git a/src/uncategorized/seIndependenceDay.tw b/src/uncategorized/seIndependenceDay.tw
index 39cda0d013eb49580c4165b310bd28cdb3e269f8..273e4b54da63c6e7cbc729f3f2e2f1f55b72c42b 100644
--- a/src/uncategorized/seIndependenceDay.tw
+++ b/src/uncategorized/seIndependenceDay.tw
@@ -213,7 +213,7 @@ In the Free Cities, Independence Day falls on the day when the Free City achieve
 		<</if>>
 	<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
 		<<if $arcologies[0].FSEdoRevivalist >= 90>>
-		You speak warmly of the state of the new land of Ameratsu, and express a hope that honor and virtue shall never cease their advance towards perfection.
+		You speak warmly of the state of the new land of Amaterasu, and express a hope that honor and virtue shall never cease their advance towards perfection.
 		<<elseif $arcologies[0].FSEdoRevivalist >= 40>>
 		You ask that your citizens will support the honor and beauty of Edo culture.
 		<</if>>
diff --git a/src/uncategorized/seLethalPit.tw b/src/uncategorized/seLethalPit.tw
index f50131bbe8a80507bfd54981eb111da5ed6bea2f..6f4072d8f69b265e1ba401c0ac0fd849a270872c 100644
--- a/src/uncategorized/seLethalPit.tw
+++ b/src/uncategorized/seLethalPit.tw
@@ -99,6 +99,12 @@ You review the rules - the combatants will use their choice of swords, and the f
 	She is strong enough to handle a bastard sword.
 <<elseif $fighterOne.muscles > 5>>
 	She has selected a longsword suited to her strength.
+<<elseif $fighterOne.muscles < -95>>
+	She has selected a meager dagger; even then she can barely wield it.
+<<elseif $fighterOne.muscles < -30>>
+	She has selected a dagger, the heaviest weapon she can manage.
+<<elseif $fighterOne.muscles < -5>>
+	She has selected a short sword, despite being able to barely lift it.
 <<else>>
 	She has selected a short sword, the heaviest weapon she can manage.
 <</if>>
@@ -211,6 +217,12 @@ You review the rules - the combatants will use their choice of swords, and the f
 	She is strong enough to handle a bastard sword.
 <<elseif $fighterTwo.muscles > 5>>
 	She has selected a longsword suited to her strength.
+<<elseif $fighterTwo.muscles < -95>>
+	She has selected a meager dagger; even then she can barely wield it.
+<<elseif $fighterTwo.muscles < -30>>
+	She has selected a dagger, the heaviest weapon she can manage.
+<<elseif $fighterTwo.muscles < -5>>
+	She has selected a short sword, despite being able to barely lift it.
 <<else>>
 	She has selected a short sword, the heaviest weapon she can manage.
 <</if>>
diff --git a/src/uncategorized/seNonlethalPit.tw b/src/uncategorized/seNonlethalPit.tw
index 915e4e25853b0b21c3fa3d279c718991b528f78f..adb76e092ed85035bd5bc0156768efc1ff3adf1c 100644
--- a/src/uncategorized/seNonlethalPit.tw
+++ b/src/uncategorized/seNonlethalPit.tw
@@ -83,6 +83,12 @@ You review the rules - the combatants are wearing light gloves, and the fight wi
 	Her huge muscles are an intimidating sight, but may hinder her flexibility.
 <<elseif $fighterOne.muscles > 30>>
 	Her muscles are a trim and powerful sight.
+<<elseif $fighterOne.muscles < -95>>
+	She can barely stand, let alone defend herself.
+<<elseif $fighterOne.muscles < -30>>
+	She is very weak, a single punch will likely floor her.
+<<elseif $fighterOne.muscles < -5>>
+	She is rather unfit, she will likely be outmatched by near any real opponent.
 <</if>>
 
 <<if $fighterOne.height >= 170>>
@@ -183,6 +189,12 @@ You review the rules - the combatants are wearing light gloves, and the fight wi
 	Her huge muscles are an intimidating sight, but may hinder her flexibility.
 <<elseif $fighterTwo.muscles > 30>>
 	Her muscles are a trim and powerful sight.
+<<elseif $fighterTwo.muscles < -95>>
+	She can barely stand, let alone defend herself.
+<<elseif $fighterTwo.muscles < -30>>
+	She is very weak, a single punch will likely floor her.
+<<elseif $fighterTwo.muscles < -5>>
+	She is rather unfit, she will likely be outmatched by near any real opponent.
 <</if>>
 
 <<if $fighterTwo.height >= 170>>
@@ -600,7 +612,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 	<<if _loser.devotion >= 20>>
 		She accepts her mother, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 		<<set _loser.trust -= 10>>
-	<</else>>
+	<<else>>
 		She @@color:mediumorchid;hates@@ having to accept rape from her own mother, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 		<<set _loser.devotion -= 10>>
 		<<set _loser.trust -= 10>>
@@ -609,7 +621,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 	<<if _loser.devotion >= 20>>
 		She accepts her father, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 		<<set _loser.trust -= 10>>
-	<</else>>
+	<<else>>
 		She @@color:mediumorchid;hates@@ having to accept rape from her own father, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 		<<set _loser.devotion -= 10>>
 		<<set _loser.trust -= 10>>
@@ -618,7 +630,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 	<<if _loser.devotion >= 20>>
 		She accepts her daughter, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 		<<set _loser.trust -= 10>>
-	<</else>>
+	<<else>>
 		She @@color:mediumorchid;hates@@ having to accept rape from her own daughter, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 		<<set _loser.devotion -= 10>>
 		<<set _loser.trust -= 10>>
@@ -628,7 +640,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 		<<if _loser.devotion >= 20>>
 			She accepts her twin sister, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 			<<set _loser.trust -= 10>>
-		<</else>>
+		<<else>>
 			She @@color:mediumorchid;hates@@ having to accept rape from her own twin, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 			<<set _loser.devotion -= 10>>
 			<<set _loser.trust -= 10>>
@@ -637,7 +649,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 		<<if _loser.devotion >= 20>>
 			She accepts her sister, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 			<<set _loser.trust -= 10>>
-		<</else>>
+		<<else>>
 			She @@color:mediumorchid;hates@@ having to accept rape from her own sister, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 			<<set _loser.devotion -= 10>>
 			<<set _loser.trust -= 10>>
@@ -646,7 +658,7 @@ You throw the victor's strap-on down to _winner.slaveName.
 		<<if _loser.devotion >= 20>>
 			She accepts her half-sister, _winner.slaveName, having to rape her, but she @@color:gold;fears@@ that it will happen again.
 			<<set _loser.trust -= 10>>
-		<</else>>
+		<<else>>
 			She @@color:mediumorchid;hates@@ having to accept rape from her own half-sister, _winner.slaveName, and @@color:gold;fears@@ that it will happen again.
 			<<set _loser.devotion -= 10>>
 			<<set _loser.trust -= 10>>
diff --git a/src/uncategorized/seRetirement.tw b/src/uncategorized/seRetirement.tw
index 5d3a15142fb0332df00ab76eeda26bd1d7163617..82aef90a9c5a38af97f9189e7c71e858cd1ecc07 100644
--- a/src/uncategorized/seRetirement.tw
+++ b/src/uncategorized/seRetirement.tw
@@ -1,6 +1,6 @@
 :: SE retirement [nobr]
 
- 
+
 <<set $nextButton to "Continue">>
 <<set $nextLink to "Scheduled Event">>
 
@@ -148,6 +148,7 @@ As she takes her leave, heading the short distance down to her modest little apa
 	<</if>>
 	<</replace>>
 <</click>>
+<br />
 <<if $activeSlave.relationship >= 4>>
 <<click "Send her girl into retirement with her">>
 	<<replace "#result">>
diff --git a/src/uncategorized/seWedding.tw b/src/uncategorized/seWedding.tw
index 0d21d43fa3d847a1b606c6d8ac21edac7e69489a..0958083e665fa59d205cd345ad5f651dfeef3335 100644
--- a/src/uncategorized/seWedding.tw
+++ b/src/uncategorized/seWedding.tw
@@ -17,7 +17,7 @@
 <</if>>
 
 <<if $weddingPlanned is 3>>
-	The ceremony to bind $activeSlave.slaveName to you as your slave wife, and her womb to you as your private breeding ground, is a polite affair which you host in the lower floor of your penthouse. <<if $arcologies[0].FSRestart != "unset">>Barely anyone is there, mostly lower-class citizens, several accompanied by their slaves. Many of your other slaves, that is your slaves who are not being married and fucked pregnant tonight, are present to serve your guests, but are dressed more conservatively than usual. There is a distinct air of unrest in the room, as if the absent Elites' distaste of your actions came in their place.<<else>>All the arcology's most prominent citizens are there, most with a favored slave or two and some even with their slave wives. Many of your other slaves, that is your slaves who are not being married and fucked pregnant tonight, are present to serve your guests, but are dressed more conservatively than usual. When assignations between citizen and slave develop, guests are politely encouraged to perform them in side rooms rather than out in view of the main gathering<</if>>.
+	The ceremony to bind $activeSlave.slaveName to you as your slave wife, and her womb to you as your private breeding ground, is a polite affair which you host in the lower floor of your penthouse. <<if $arcologies[0].FSRestart != "unset" && $activeSlave.breedingMark == 0>>Barely anyone is there, mostly lower-class citizens, several accompanied by their slaves. Many of your other slaves, that is your slaves who are not being married and fucked pregnant tonight, are present to serve your guests, but are dressed more conservatively than usual. There is a distinct air of unrest in the room, as if the absent Elites' distaste of your actions came in their place.<<else>>All the arcology's most prominent citizens are there, most with a favored slave or two and some even with their slave wives. Many of your other slaves, that is your slaves who are not being married and fucked pregnant tonight, are present to serve your guests, but are dressed more conservatively than usual. When assignations between citizen and slave develop, guests are politely encouraged to perform them in side rooms rather than out in view of the main gathering<</if>>.
 	<br><br>
 	$activeSlave.slaveName appears after everyone has had a chance to socialize,<<if ($activeSlave.amp == 1)>> carried by another slave since she's a quadruple amputee and she cannot walk,<</if>> wearing beautiful bridal lingerie in
 	<<if ($activeSlave.vagina == 0)>>
@@ -107,7 +107,7 @@
 	<<set $rep += 750>>
 	<<set $desc = "a framed shot of you impregnating " + $activeSlave.slaveName + " at your wedding">>
 	<<set $trinkets.push($desc)>>
-	<<if $arcologies[0].FSRestart != "unset">>
+	<<if $arcologies[0].FSRestart != "unset" && $activeSlave.breedingMark == 0>>
 		You have @@color:red;angered@@ the Societal Elite by this public showing of everything they stand against.
 		<<set $failedElite += 250>>
 	<</if>>
diff --git a/src/uncategorized/sellSlave.tw b/src/uncategorized/sellSlave.tw
index ae30f967968e715c68f37151e6cfda8d935788aa..46687754b830e30ef962c5cdd9bf1dea723bc08d 100644
--- a/src/uncategorized/sellSlave.tw
+++ b/src/uncategorized/sellSlave.tw
@@ -1022,7 +1022,7 @@ __Bids Received__\
 	<br>''¤<<print 500*Math.trunc(($slaveCost*1.35)/500)>>'' from an prominent citizen who keeps a large harem of lithe, muscular girls to bear him children.
 	<<click "Accept bid">>
 		<<set $cash += 500*Math.trunc(($slaveCost*1.35)/500)>>
-		<<set $buyer to "D shorty breeder">>
+		<<set $buyer to "D amazon hunter">>
 		<<goto "Slave Sold">>
 	<</click>>
 	<</if>>
@@ -1535,6 +1535,23 @@ __Bids Received__\
 	<</if>>
 <</if>>
 
+<<if $seeExtreme == 1>>
+<<if $slaveCost < 5000>>
+<<if $activeSlave.vagina > -1>>
+<<if $activeSlave.bellyImplant > 0>>
+<<if random(1,100) > 90>>
+	<br>''¤7000'' from a porn director interested in a cheap slave with a belly implant for use in a snuff film.
+	<<click "Accept bid">>
+		<<set $cash += 7000>>
+		<<set $buyer to "tentacle bred">>
+		<<goto "Slave Sold">>
+	<</click>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+<</if>>
+
 <<if random(1,100) > 30>>
 	<br>''¤<<print 500*Math.trunc(($slaveCost*0.9)/500)>>'' from a reputable slave trader who will likely ship her out of the arcology.
 	<<click "Accept bid">>
diff --git a/src/uncategorized/siblingsWorkaround.tw b/src/uncategorized/siblingsWorkaround.tw
index 46cd7cbb90deac9ad2183100294f1dd01cd9b2a3..d945d9f28fa51a4df1e436314c393896c962f8f6 100644
--- a/src/uncategorized/siblingsWorkaround.tw
+++ b/src/uncategorized/siblingsWorkaround.tw
@@ -4,33 +4,17 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 
 <<AddSlave $activeSlave>>
 
-<<NationalityToName>>
-<<NationalityToAccent>>
-<<set _secondSlave to $activeSlave>>
+<<set _secondSlave to clone($activeSlave)>>
+<<unset $activeSlave>>
+<<NationalityToName _secondSlave>>
+<<NationalityToAccent _secondSlave>>
 
-<<if $useFSNames == 0>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<<elseif $arcologies[0].FSChattelReligionist > 20>>
-	<<set _secondSlave.slaveName to $chattelReligionistSlaveNames.random()>>
-<<elseif $arcologies[0].FSRomanRevivalist > 20>>
-	<<set _secondSlave.slaveName to $romanSlaveNames.random()>>
-<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
-	<<set _secondSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
-<<elseif $arcologies[0].FSEdoRevivalist > 20>>
-	<<set _secondSlave.slaveName to $edoSlaveNames.random()>>
-<<elseif $arcologies[0].FSDegradationist != "unset">>
-	<<display "Degrading Name">>
-<<else>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<</if>>
-
-<<set _secondSlave.slaveName to $activeSlave.birthName>>
-<<set _secondSlave.ID to $activeSlave.ID + 1000>>
+<<set _secondSlave.ID to _secondSlave.ID + 1000>>
 <<set _secondSlave.devotion -= random(5,-5)>>
 <<set _secondSlave.oldDevotion to _secondSlave.devotion>>
 <<set _secondSlave.trust -= random(5,-5)>>
 <<set _secondSlave.oldTrust to _secondSlave.trust>>
-<<set _secondSlave.oldDevotion to $activeSlave.devotion>>
+<<set _secondSlave.oldDevotion to _secondSlave.devotion>>
 <<set _secondSlave.actualAge -= random (1, 5)>>
 <<set _secondSlave.visualAge = _secondSlave.actualAge>>
 <<set _secondSlave.physicalAge = _secondSlave.actualAge>>
@@ -42,16 +26,16 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 <<set _secondSlave.energy += random(-20,20)>>
 <<set _secondSlave.fetishStrength to random(0,90)>>
 <<set _secondSlave.fetish to either("none", "none", "none", "none", "none", "none", "submissive", "cumslut", "humiliation", "buttslut", "pregnancy", "sadist", "dom", "masochist")>>
-<<set $activeSlave.behavioralFlaw to either("none", "none", "none", "arrogant", "bitchy", "odd", "hates men", "hates women", "hates women", "anorexic", "masochist", "gluttonous", "devout", "liberated")>>
-<<if ($activeSlave.behavioralFlaw is "devout")>>
-	<<set $activeSlave.sexualFlaw to either("none", "repressed",  "shamefast", "apathetic")>>
+<<set _secondSlave.behavioralFlaw to either("none", "none", "none", "arrogant", "bitchy", "odd", "hates men", "hates women", "hates women", "anorexic", "masochist", "gluttonous", "devout", "liberated")>>
+<<if (_secondSlave.behavioralFlaw is "devout")>>
+	<<set _secondSlave.sexualFlaw to either("none", "repressed",  "shamefast", "apathetic")>>
 <<else>>
-	<<set $activeSlave.sexualFlaw to either("none", "none", "none", "none", "hates oral", "hates anal", "hates penetration", "repressed", "idealistic", "shamefast", "apathetic", "crude", "judgemental")>>
+	<<set _secondSlave.sexualFlaw to either("none", "none", "none", "none", "hates oral", "hates anal", "hates penetration", "repressed", "idealistic", "shamefast", "apathetic", "crude", "judgemental")>>
 <</if>>
 
 <<if $familyTesting == 0>>
 <<set _secondSlave.relation to "sister">>
-<<set _secondSlave.relationTarget to $activeSlave.ID - 1000>>
+<<set _secondSlave.relationTarget to _secondSlave.ID - 1000>>
 <</if>>
 
 <<if _secondSlave.actualAge < $minimumSlaveAge>>
diff --git a/src/uncategorized/slaveGenerationWidgets.tw b/src/uncategorized/slaveGenerationWidgets.tw
new file mode 100644
index 0000000000000000000000000000000000000000..c27fb3e1ed84f29e8196c87ba442e8f2a18ee629
--- /dev/null
+++ b/src/uncategorized/slaveGenerationWidgets.tw
@@ -0,0 +1,886 @@
+:: slave generation widgets [nobr widget]
+
+<<widget "NationalityToRace">>
+
+<<switch $args[0].nationality>>
+<<case "American">>
+	<<set $args[0].race to either("black", "middle eastern", "white", "white", "white", "latina", "latina", "asian", "amerindian", "mixed race")>>
+<<case "Canadian">>
+	<<set $args[0].race to either("white", "white", "white", "white", "amerindian")>>
+<<case "Puerto Rican">>
+	<<set $args[0].race to either("latina")>>
+<<case "Cuban">>
+	<<set $args[0].race to either("latina", "black")>>
+<<case "Haitian">>
+	<<set $args[0].race to either("black")>>
+<<case "Jamaican">>
+	<<set $args[0].race to either("black")>>
+<<case "Mexican">>
+	<<set $args[0].race to either("latina", "latina", "latina", "latina", "latina", "amerindian")>>
+<<case "Dominican">>
+	<<set $args[0].race to either("mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "mixed race", "white", "white", "black")>>
+<<case "Peruvian">>
+	<<set $args[0].race to either("latina", "amerindian")>>
+<<case "Venezuelan">>
+	<<set $args[0].race to either("latina")>>
+<<case "Bolivian">>
+	<<set $args[0].race to either("latina", "amerindian")>>
+<<case "Guatemalan">>
+	<<set $args[0].race to either("latina", "amerindian")>>
+<<case "Brazilian">>
+	<<set $args[0].race to either("black", "latina", "mixed race", "mixed race", "amerindian", "white")>>
+<<case "Argentinian">>
+	<<set $args[0].race to either("white", "latina", "latina")>>
+<<case "Chilean">>
+	<<set $args[0].race to either("white", "latina", "latina", "latina")>>
+<<case "Colombian">>
+	<<set $args[0].race to either("latina")>>
+<<case "Egyptian">>
+	<<set $args[0].race to either("black", "middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<case "Turkish">>
+	<<set $args[0].race to either("middle eastern", "middle eastern", "middle eastern", "semitic")>>
+<<case "Iranian">>
+	<<set $args[0].race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<case "Armenian">>
+	<<set $args[0].race to either("indo-aryan", "semitic")>>
+<<case "Israeli">>
+	<<set $args[0].race to either("white", "middle eastern", "semitic", "semitic")>>
+<<case "Saudi">>
+	<<set $args[0].race to either("black", "asian", "middle eastern", "middle eastern")>>
+<<case "Moroccan">>
+	<<set $args[0].race to either("middle eastern", "middle eastern", "black")>>
+<<case "Nigerian">>
+	<<set $args[0].race to either("black")>>
+<<case "Kenyan">>
+	<<set $args[0].race to either("black")>>
+<<case "Zimbabwean">>
+	<<set $args[0].race to either("black", "black", "black", "black", "white")>>
+<<case "Ugandan">>
+	<<set $args[0].race to either("black")>>
+<<case "Tanzanian">>
+	<<set $args[0].race to either("black", "black", "black", "semitic")>>
+<<case "Ghanan">>
+	<<set $args[0].race to either("black", "black", "black", "semitic")>>
+<<case "Congolese">>
+	<<set $args[0].race to either("black")>>
+<<case "Ethiopian">>
+	<<set $args[0].race to either("black", "black", "black", "middle eastern", "semitic")>>
+<<case "South African">>
+	<<set $args[0].race to either("black", "black", "black", "white")>>
+<<case "Chinese">>
+	<<set $args[0].race to either("asian")>>
+<<case "Korean">>
+	<<set $args[0].race to either("asian")>>
+<<case "Japanese">>
+	<<set $args[0].race to either("asian")>>
+<<case "Thai">>
+	<<set $args[0].race to either("asian", "asian", "malay")>>
+<<case "Vietnamese">>
+	<<set $args[0].race to either("asian")>>
+<<case "Indonesian">>
+	<<set $args[0].race to either("asian", "malay", "malay", "pacific islander")>>
+<<case "Filipina">>
+	<<set $args[0].race to either("asian", "malay", "malay", "pacific islander")>>
+<<case "Burmese">>
+	<<set $args[0].race to either("asian", "asian", "indo-aryan")>>
+<<case "Nepalese">>
+	<<set $args[0].race to either("asian", "asian", "indo-aryan")>>
+<<case "Uzbek">>
+	<<set $args[0].race to either("asian")>>
+<<case "Afghan">>
+	<<set $args[0].race to either("indo-aryan", "middle eastern")>>
+<<case "Algerian">>
+	<<set $args[0].race to either("middle eastern")>>
+<<case "Libyan">>
+	<<set $args[0].race to either("middle eastern")>>
+<<case "Tunisian">>
+	<<set $args[0].race to either("middle eastern")>>
+<<case "Lebanese">>
+	<<set $args[0].race to either("middle eastern", "semitic")>>
+<<case "Jordanian">>
+	<<set $args[0].race to either("middle eastern", "semitic")>>
+<<case "Emirati">>
+	<<set $args[0].race to either("middle eastern", "indo-aryan")>>
+<<case "Omani">>
+	<<set $args[0].race to either("middle eastern", "indo-aryan")>>
+<<case "Malian">>
+	<<set $args[0].race to either("black", "black", "black", "black", "black", "middle eastern")>>
+<<case "Sudanese">>
+	<<set $args[0].race to either("black", "black", "black", "middle eastern")>>
+<<case "Yemeni">>
+	<<set $args[0].race to either("black", "semitic", "middle eastern", "middle eastern", "middle eastern")>>
+<<case "Iraqi">>
+	<<set $args[0].race to either("semitic", "middle eastern", "middle eastern", "middle eastern", "middle eastern")>>
+<<case "Indian">>
+	<<set $args[0].race to either("indo-aryan")>>
+<<case "Malaysian">>
+	<<set $args[0].race to either("asian", "malay", "malay", "malay")>>
+<<case "Kazakh">>
+	<<set $args[0].race to either("asian", "asian", "asian", "semitic", "indo-aryan")>>
+<<case "Pakistani">>
+	<<set $args[0].race to either("indo-aryan", "indo-aryan", "indo-aryan", "semitic")>>
+<<case "Bangladeshi">>
+	<<set $args[0].race to either("indo-aryan")>>
+<<case "Belarusian">>
+	<<set $args[0].race to either("white")>>
+<<case "Russian">>
+	<<set $args[0].race to either("white")>>
+<<case "Ukrainian">>
+	<<set $args[0].race to either("white")>>
+<<case "Irish">>
+	<<set $args[0].race to either("white")>>
+<<case "Icelandic">>
+	<<set $args[0].race to either("white")>>
+<<case "Finnish">>
+	<<set $args[0].race to either("white")>>
+<<case "Swiss">>
+	<<set $args[0].race to either("white")>>
+<<case "Danish">>
+	<<set $args[0].race to either("white")>>
+<<case "Norwegian">>
+	<<set $args[0].race to either("white")>>
+<<case "Austrian">>
+	<<set $args[0].race to either("white")>>
+<<case "Slovak">>
+	<<set $args[0].race to either("white", "white", "white", "white", "indo-aryan")>>
+<<case "Dutch">>
+	<<set $args[0].race to either("white")>>
+<<case "Belgian">>
+	<<set $args[0].race to either("white")>>
+<<case "Czech">>
+	<<set $args[0].race to either("white")>>
+<<case "Serbian">>
+	<<set $args[0].race to either("white")>>
+<<case "Portuguese">>
+	<<set $args[0].race to either("white")>>
+<<case "Hungarian">>
+	<<set $args[0].race to either("white", "white", "white", "white", "indo-aryan")>>
+<<case "Estonian">>
+	<<set $args[0].race to either("white")>>
+<<case "Polish">>
+	<<set $args[0].race to either("white")>>
+<<case "Lithuanian">>
+	<<set $args[0].race to either("white")>>
+<<case "Romanian">>
+	<<set $args[0].race to either("semitic", "white", "white", "white", "white", "indo-aryan")>>
+<<case "German">>
+	<<set $args[0].race to either("black", "middle eastern", "white", "white", "white", "white", "white", "white")>>
+<<case "Swedish">>
+	<<set $args[0].race to either("middle eastern", "white", "white", "white", "white")>>
+<<case "French">>
+	<<set $args[0].race to either("black", "middle eastern", "white", "white", "white", "white", "white", "southern European")>>
+<<case "Italian">>
+	<<set $args[0].race to either("middle eastern", "southern European", "southern European", "white", "white")>>
+<<case "Greek">>
+	<<set $args[0].race to either("southern European")>>
+<<case "Spanish">>
+	<<set $args[0].race to either("semitic", "southern European", "southern European")>>
+<<case "British">>
+	<<set $args[0].race to either("indo-aryan", "white", "white", "white", "white", "white", "white", "white", "white", "white")>>
+<<case "Scottish">>
+	<<set $args[0].race to either("middle eastern", "indo-aryan", "white", "white", "white", "white", "white", "white", "white")>>
+<<case "Australian">>
+	<<set $args[0].race to either("white", "white", "black", "asian")>>
+<<case "a New Zealander">>
+	<<set $args[0].race to either("white", "white", "white", "white", "pacific islander")>>
+<<default>>
+	<<set $args[0].race to either("white")>>
+<</switch>>
+
+/% Begin mixed race rate adjustment. %/
+/% Some countries are extremely ethnically homogeneous and unlikely to change soon. %/
+<<if ($args[0].nationality is "Japanese")>>
+	<<if random(1,100) > 98>>
+		<<set $args[0].race to "mixed race">>
+	<</if>>
+<<elseif ($args[0].nationality is "Korean")>>
+	<<if random(1,100) > 95>>
+		<<set $args[0].race to "mixed race">>
+	<</if>>
+<<elseif ($args[0].nationality is "Polish") or ($args[0].nationality is "Romanian") or ($args[0].nationality is "Bulgarian") or ($args[0].nationality is "Lithuanian") or ($args[0].nationality is "Croatian")>>
+	/% Croatia isn't an origin currently but the game might add it in the future. %/
+	<<if random(1,100) > 98>>
+		<<set $args[0].race to "mixed race">>
+	<</if>>
+<<elseif random(1,100) > 90>>
+	/% Default rate. %/
+	<<set $args[0].race to "mixed race">>
+<</if>>
+/% End mixed race rate adjustment. %/
+
+<</widget>>
+
+<<widget "NationalityToName">>
+
+<<switch $args[0].nationality>>
+<<case "American">>
+	<<if $args[0].race is "black">>
+		<<set $args[0].birthName to $africanAmericanSlaveNames.random()>>
+	<<elseif $args[0].race is "latina">>
+		<<set $args[0].birthName to $latinaSlaveNames.random()>>
+	<<elseif $args[0].race is "asian">>
+		<<set $args[0].birthName to $asianAmericanSlaveNames.random()>>
+	<<elseif $args[0].race is "middle eastern">>
+		<<set $args[0].birthName to $egyptianSlaveNames.random()>>
+	<<else>>
+		<<set $args[0].birthName to $whiteAmericanSlaveNames.random()>>
+	<</if>>
+<<case "Canadian">>
+	<<set $args[0].birthName to $canadianSlaveNames.random()>>
+<<case "Mexican">>
+	<<set $args[0].birthName to $mexicanSlaveNames.random()>>
+<<case "Dominican">>
+	<<set $args[0].birthName to $dominicanSlaveNames.random()>>
+<<case "Puerto Rican">>
+	<<set $args[0].birthName to $puertoRicanSlaveNames.random()>>
+<<case "Haitian">>
+	<<set $args[0].birthName to $haitianSlaveNames.random()>>
+<<case "Jamaican">>
+	<<set $args[0].birthName to $jamaicanSlaveNames.random()>>
+<<case "Cuban">>
+	<<set $args[0].birthName to $cubanSlaveNames.random()>>
+<<case "Guatemalan">>
+	<<set $args[0].birthName to $guatemalanSlaveNames.random()>>
+<<case "Chilean">>
+	<<set $args[0].birthName to $chileanSlaveNames.random()>>
+<<case "Peruvian">>
+	<<set $args[0].birthName to $peruvianSlaveNames.random()>>
+<<case "Bolivian">>
+	<<set $args[0].birthName to $bolivianSlaveNames.random()>>
+<<case "Venezuelan">>
+	<<set $args[0].birthName to $venezuelanSlaveNames.random()>>
+<<case "Belarusian">>
+	<<set $args[0].birthName to $belarusianSlaveNames.random()>>
+<<case "Russian">>
+	<<set $args[0].birthName to $russianSlaveNames.random()>>
+<<case "Ukrainian">>
+	<<set $args[0].birthName to $ukrainianSlaveNames.random()>>
+<<case "Italian">>
+	<<set $args[0].birthName to $italianSlaveNames.random()>>
+<<case "Spanish">>
+	<<set $args[0].birthName to $spanishSlaveNames.random()>>
+<<case "British">>
+	<<set $args[0].birthName to $britishSlaveNames.random()>>
+<<case "Scottish">>
+	<<set $args[0].birthName to $scottishSlaveNames.random()>>
+<<case "French">>
+	<<set $args[0].birthName to $frenchSlaveNames.random()>>
+<<case "German">>
+	<<set $args[0].birthName to $germanSlaveNames.random()>>
+<<case "Lithuanian">>
+	<<set $args[0].birthName to $lithuanianSlaveNames.random()>>
+<<case "Norwegian">>
+	<<set $args[0].birthName to $norwegianSlaveNames.random()>>
+<<case "Slovak">>
+	<<set $args[0].birthName to $slovakSlaveNames.random()>>
+<<case "Danish">>
+	<<set $args[0].birthName to $danishSlaveNames.random()>>
+<<case "Dutch">>
+	<<set $args[0].birthName to $dutchSlaveNames.random()>>
+<<case "Austrian">>
+	<<set $args[0].birthName to $austrianSlaveNames.random()>>
+<<case "Swiss">>
+	<<set $args[0].birthName to $swissSlaveNames.random()>>
+<<case "Serbian">>
+	<<set $args[0].birthName to $serbianSlaveNames.random()>>
+<<case "Belgian">>
+	<<set $args[0].birthName to $belgianSlaveNames.random()>>
+<<case "Czech">>
+	<<set $args[0].birthName to $czechSlaveNames.random()>>
+<<case "Portuguese">>
+	<<set $args[0].birthName to $portugueseSlaveNames.random()>>
+<<case "Swedish">>
+	<<set $args[0].birthName to $swedishSlaveNames.random()>>
+<<case "Romanian">>
+	<<set $args[0].birthName to $romanianSlaveNames.random()>>
+<<case "Hungarian">>
+	<<set $args[0].birthName to $hungarianSlaveNames.random()>>
+<<case "Estonian">>
+	<<set $args[0].birthName to $estonianSlaveNames.random()>>
+<<case "Irish">>
+	<<set $args[0].birthName to $irishSlaveNames.random()>>
+<<case "Icelandic">>
+	<<set $args[0].birthName to $icelandicSlaveNames.random()>>
+<<case "Finnish">>
+	<<set $args[0].birthName to $finnishSlaveNames.random()>>
+<<case "Greek">>
+	<<set $args[0].birthName to $greekSlaveNames.random()>>
+<<case "Polish">>
+	<<set $args[0].birthName to $polishSlaveNames.random()>>
+<<case "Brazilian">>
+	<<set $args[0].birthName to $brazilianSlaveNames.random()>>
+<<case "Egyptian">>
+	<<set $args[0].birthName to $egyptianSlaveNames.random()>>
+<<case "Colombian">>
+	<<set $args[0].birthName to $colombianSlaveNames.random()>>
+<<case "Argentinian">>
+	<<set $args[0].birthName to $argentinianSlaveNames.random()>>
+<<case "Turkish">>
+	<<set $args[0].birthName to $turkishSlaveNames.random()>>
+<<case "Iranian">>
+	<<set $args[0].birthName to $iranianSlaveNames.random()>>
+<<case "Armenian">>
+	<<set $args[0].birthName to $armenianSlaveNames.random()>>
+<<case "Israeli">>
+	<<set $args[0].birthName to $israeliSlaveNames.random()>>
+<<case "Saudi">>
+	<<set $args[0].birthName to $saudiSlaveNames.random()>>
+<<case "South African">>
+	<<if $args[0].race is "black">>
+		<<set $args[0].birthName to $blackSouthAfricanSlaveNames.random()>>
+	<<else>>
+		<<set $args[0].birthName to $whiteSouthAfricanSlaveNames.random()>>
+	<</if>>
+<<case "Nigerian">>
+	<<set $args[0].birthName to $nigerianSlaveNames.random()>>
+<<case "Congolese">>
+	<<set $args[0].birthName to $congoleseSlaveNames.random()>>
+<<case "Kenyan">>
+	<<set $args[0].birthName to $kenyanSlaveNames.random()>>
+<<case "Tanzanian">>
+	<<set $args[0].birthName to $tanzanianSlaveNames.random()>>
+<<case "Zimbabwean">>
+	<<if $args[0].race == "white">>
+		<<set $args[0].birthName to $britishSlaveNames.random()>>
+	<<else>>
+		<<set $args[0].birthName to $zimbabweanSlaveNames.random()>>
+	<</if>>
+<<case "Ghanan">>
+	<<set $args[0].birthName to $ghananSlaveNames.random()>>
+<<case "Ugandan">>
+	<<set $args[0].birthName to $ugandanSlaveNames.random()>>
+<<case "Ethiopian">>
+	<<set $args[0].birthName to $ethiopianSlaveNames.random()>>
+<<case "Moroccan">>
+	<<set $args[0].birthName to $moroccanSlaveNames.random()>>
+<<case "Chinese">>
+	<<set $args[0].birthName to $chineseSlaveNames.random()>>
+<<case "Korean">>
+	<<set $args[0].birthName to $koreanSlaveNames.random()>>
+<<case "Thai">>
+	<<set $args[0].birthName to $thaiSlaveNames.random()>>
+<<case "Vietnamese">>
+	<<set $args[0].birthName to $vietnameseSlaveNames.random()>>
+<<case "Japanese">>
+	<<set $args[0].birthName to $japaneseSlaveNames.random()>>
+<<case "Indonesian">>
+	<<set $args[0].birthName to $indonesianSlaveNames.random()>>
+<<case "Filipina">>
+	<<set $args[0].birthName to $filipinaSlaveNames.random()>>
+<<case "Bangladeshi">>
+	<<set $args[0].birthName to $bangladeshiSlaveNames.random()>>
+<<case "Malaysian">>
+	<<set $args[0].birthName to $malaysianSlaveNames.random()>>
+<<case "Uzbek">>
+	<<set $args[0].birthName to $uzbekSlaveNames.random()>>
+<<case "Afghan">>
+	<<set $args[0].birthName to $afghanSlaveNames.random()>>
+<<case "Nepalese">>
+	<<set $args[0].birthName to $nepaleseSlaveNames.random()>>
+<<case "Burmese">>
+	<<set $args[0].birthName to $burmeseSlaveNames.random()>>
+<<case "Iraqi">>
+	<<set $args[0].birthName to $iraqiSlaveNames.random()>>
+<<case "Yemeni">>
+	<<set $args[0].birthName to $yemeniSlaveNames.random()>>
+<<case "Sudanese">>
+	<<set $args[0].birthName to $sudaneseSlaveNames.random()>>
+<<case "Algerian">>
+	<<set $args[0].birthName to $algerianSlaveNames.random()>>
+<<case "Tunisian">>
+	<<set $args[0].birthName to $tunisianSlaveNames.random()>>
+<<case "Libyan">>
+	<<set $args[0].birthName to $libyanSlaveNames.random()>>
+<<case "Omani">>
+	<<set $args[0].birthName to $omaniSlaveNames.random()>>
+<<case "Malian">>
+	<<set $args[0].birthName to $malianSlaveNames.random()>>
+<<case "Jordanian">>
+	<<set $args[0].birthName to $jordanianSlaveNames.random()>>
+<<case "Lebanese">>
+	<<set $args[0].birthName to $lebaneseSlaveNames.random()>>
+<<case "Emirati">>
+	<<set $args[0].birthName to $emiratiSlaveNames.random()>>
+<<case "Kazakh">>
+	<<set $args[0].birthName to $kazakhSlaveNames.random()>>
+<<case "Pakistani">>
+	<<set $args[0].birthName to $pakistaniSlaveNames.random()>>
+<<case "Indian">>
+	<<set $args[0].birthName to $indianSlaveNames.random()>>
+<<case "Australian">>
+	<<set $args[0].birthName to $australianSlaveNames.random()>>
+<<case "a New Zealander">>
+	<<set $args[0].birthName to $newZealanderSlaveNames.random()>>
+<<default>>
+	<<set $args[0].birthName to $whiteAmericanSlaveNames.random()>>
+<</switch>>
+
+<<set $args[0].slaveName to $args[0].birthName>>
+<<if $useFSNames == 1>>
+<<if $arcologies[0].FSChattelReligionist > 20>>
+	<<set $args[0].slaveName to $chattelReligionistSlaveNames.random()>>
+<<elseif $arcologies[0].FSRomanRevivalist > 20>>
+	<<set $args[0].slaveName to $romanSlaveNames.random()>>
+<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
+	<<set $args[0].slaveName to $ancientEgyptianSlaveNames.random()>>
+<<elseif $arcologies[0].FSEdoRevivalist > 20>>
+	<<set $args[0].slaveName to $edoSlaveNames.random()>>
+<<elseif $arcologies[0].FSDegradationist != "unset">>
+	<<display "Degrading Name">>
+<</if>>
+<</if>>
+
+<</widget>>
+
+<<widget "NationalityToAccent">>
+
+<<set $seed to either(0,1,1,2,2,2,3,3,3,3)>>
+
+<<switch $args[0].nationality>>
+<<case "American">>
+	<<if $args[0].race is "black">>
+	<<if $language is "English">>
+		<<set $args[0].accent to 0>>
+	<<else>>
+		<<set $args[0].accent to either(0,1,1,2,2,2,3,3,3,3)>>
+	<</if>>
+	<<elseif $args[0].race is "latina">>
+	<<if $language is "English">>
+		<<set $args[0].accent to 0>>
+	<<elseif $language is "Spanish">>
+		<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $args[0].accent to $seed>>
+	<</if>>
+	<<elseif $args[0].race is "asian">>
+	<<if $language is "English">>
+		<<set $args[0].accent to 0>>
+	<<elseif $language is "Chinese">>
+		<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $args[0].accent to $seed>>
+	<</if>>
+	<<elseif $args[0].race is "middle eastern">>
+	<<if $language is "English">>
+		<<set $args[0].accent to 0>>
+	<<elseif $language is "Arabic">>
+		<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+		<<set $args[0].accent to $seed>>
+	<</if>>
+	<<else>>
+	<<if $language is "English">>
+		<<set $args[0].accent to 0>>
+	<<else>>
+		<<set $args[0].accent to $seed>>
+	<</if>>
+	<</if>>
+<<case "Canadian">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Mexican">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Dominican">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Puerto Rican">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Haitian">>
+	<<set $args[0].accent to $seed>>
+<<case "Jamaican">>
+	<<set $args[0].accent to $seed>>
+<<case "Cuban">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Guatemalan">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Chilean">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Peruvian">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Bolivian">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Venezuelan">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Russian">>
+	<<set $args[0].accent to $seed>>
+<<case "Ukrainian">>
+	<<set $args[0].accent to $seed>>
+<<case "Italian">>
+	<<set $args[0].accent to $seed>>
+<<case "Spanish">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "British">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Scottish">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 2>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "French">>
+	<<set $args[0].accent to $seed>>
+<<case "German">>
+	<<set $args[0].accent to $seed>>
+<<case "Lithuanian">>
+	<<set $args[0].accent to $seed>>
+<<case "Belarusian">>
+	<<set $args[0].accent to $seed>>
+<<case "Norwegian">>
+	<<set $args[0].accent to $seed>>
+<<case "Slovak">>
+	<<set $args[0].accent to $seed>>
+<<case "Danish">>
+	<<set $args[0].accent to $seed>>
+<<case "Dutch">>
+	<<set $args[0].accent to $seed>>
+<<case "Austrian">>
+	<<set $args[0].accent to $seed>>
+<<case "Swiss">>
+	<<set $args[0].accent to $seed>>
+<<case "Serbian">>
+	<<set $args[0].accent to $seed>>
+<<case "Belgian">>
+	<<set $args[0].accent to $seed>>
+<<case "Czech">>
+	<<set $args[0].accent to $seed>>
+<<case "Portuguese">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Swedish">>
+	<<set $args[0].accent to $seed>>
+<<case "Romanian">>
+	<<set $args[0].accent to $seed>>
+<<case "Hungarian">>
+	<<set $args[0].accent to $seed>>
+<<case "Estonian">>
+	<<set $args[0].accent to $seed>>
+<<case "Irish">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Icelandic">>
+	<<set $args[0].accent to $seed>>
+<<case "Finnish">>
+	<<set $args[0].accent to $seed>>
+<<case "Greek">>
+	<<set $args[0].accent to $seed>>
+<<case "Polish">>
+	<<set $args[0].accent to $seed>>
+<<case "Brazilian">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Egyptian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Colombian">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Argentinian">>
+	<<if $language is "Spanish">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Turkish">>
+	<<set $args[0].accent to $seed>>
+<<case "Iranian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Armenian">>
+	<<set $args[0].accent to $seed>>
+<<case "Israeli">>
+	<<set $args[0].accent to $seed>>
+<<case "Saudi">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "South African">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Nigerian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Congolese">>
+	<<set $args[0].accent to $seed>>
+<<case "Kenyan">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Tanzanian">>
+	<<set $args[0].accent to $seed>>
+<<case "Zimbabwean">>
+	<<if $language is "English" && $args[0].race == "white">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Ghanan">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Ugandan">>
+	<<set $args[0].accent to $seed>>
+<<case "Ethiopian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Moroccan">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Chinese">>
+	<<if $language is "Chinese">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Korean">>
+	<<if $language is "Chinese">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Thai">>
+	<<if $language is "Chinese">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Vietnamese">>
+	<<if $language is "Chinese">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Japanese">>
+	<<set $args[0].accent to $seed>>
+<<case "Indonesian">>
+	<<set $args[0].accent to $seed>>
+<<case "Filipina">>
+	<<set $args[0].accent to $seed>>
+<<case "Bangladeshi">>
+	<<if $language is "Indian">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Malaysian">>
+	<<set $args[0].accent to $seed>>
+<<case "Uzbek">>
+	<<set $args[0].accent to $seed>>
+<<case "Afghan">>
+	<<set $args[0].accent to $seed>>
+<<case "Nepalese">>
+	<<set $args[0].accent to $seed>>
+<<case "Burmese">>
+	<<set $args[0].accent to $seed>>
+<<case "Iraqi">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Yemeni">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Sudanese">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Algerian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Tunisian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Libyan">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Omani">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Malian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Jordanian">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Lebanese">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Emirati">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Kazakh">>
+	<<set $args[0].accent to $seed>>
+<<case "Pakistani">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to either(0,1,2,3)>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Indian">>
+	<<if $language is "Indian">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Australian">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "a New Zealander">>
+	<<if $language is "English">>
+	<<set $args[0].accent to 1>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Roman Revivalist">>
+	<<if $language is "Latin">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Ancient Egyptian Revivalist">>
+	<<if $language is "Ancient Egyptian">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Edo Revivalist">>
+	<<if $language is "Japanese">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Arabian Revivalist">>
+	<<if $language is "Arabic">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<case "Ancient Chinese Revivalist">>
+	<<if $language is "Chinese">>
+	<<set $args[0].accent to 0>>
+	<<else>>
+	<<set $args[0].accent to $seed>>
+	<</if>>
+<<default>>
+	<<set $args[0].accent to $seed>>
+<</switch>>
+
+<<if $args[0].nationality is $language>>
+	<<set $args[0].accent to 0>>
+<</if>>
+
+<</widget>>
\ No newline at end of file
diff --git a/src/uncategorized/slaveInteract.tw b/src/uncategorized/slaveInteract.tw
index 448b0cf9821448165a07c79ff240d633e47ba3e1..3db9124777490b9b7fe27e8c6960c3c4e3fb3717 100644
--- a/src/uncategorized/slaveInteract.tw
+++ b/src/uncategorized/slaveInteract.tw
@@ -280,7 +280,7 @@
 	<</if>>
 	<</if>>
 	<<if ($activeSlave.fetish != "mindbroken")>>
-	<<if ($activeSlave.amp != 1) || ($activeSlave.voice != 0)>>
+	<<if (($activeSlave.amp != 1) || ($activeSlave.voice != 0)) && $activeSlave.accent != 4>>
 	| <<click "Ask her about her feelings">><<replace "#miniscene">><<display "FFeelings">><br>&nbsp;&nbsp;&nbsp;&nbsp;<</replace>><</click>>
 	<</if>>
 	<</if>>
@@ -762,9 +762,9 @@ __Diet Base__: <strong><span id="dietBase"><<if $activeSlave.dietCum == 2>>Cum B
 	<<if $activeSlave.voice != 0>>
 	__Speech Rules__: ''<span id="speechRules">$activeSlave.speechRules</span>.''
 	<<if $activeSlave.speechRules is "restrictive">>
-		<<click "Permissive">><<set $activeSlave.speechRules to "permissive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>><<if $activeSlave.accent > 0>> | <<click "Accent elimination">><<set $activeSlave.speechRules to "accent elimination">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>><</if>>
+		<<click "Permissive">><<set $activeSlave.speechRules to "permissive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>><<if $activeSlave.accent > 0 && $activeSlave.accent < 4>> | <<click "Accent elimination">><<set $activeSlave.speechRules to "accent elimination">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>><</if>><<if $activeSlave.accent > 3>> | <<click "Language lessons">><<set $activeSlave.speechRules to "language lessons">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>><</if>>
 	<<elseif $activeSlave.speechRules is "permissive">>
-		<<if $activeSlave.accent > 0>><<click "Accent elimination">><<set $activeSlave.speechRules to "accent elimination">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>> | <</if>><<click "Restrictive">><<set $activeSlave.speechRules to "restrictive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>>
+		<<if $activeSlave.accent > 0 && $activeSlave.accent < 4>><<click "Accent elimination">><<set $activeSlave.speechRules to "accent elimination">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>> | <</if>><<if $activeSlave.accent > 3>><<click "Language lessons">><<set $activeSlave.speechRules to "language lessons">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>> | <</if>><<click "Restrictive">><<set $activeSlave.speechRules to "restrictive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>>
 	<<else>>
 		<<click "Permissive">><<set $activeSlave.speechRules to "permissive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>> | <<click "Restrictive">><<set $activeSlave.speechRules to "restrictive">><<replace "#speechRules">><<print $activeSlave.speechRules>><</replace>><</click>>
 	<</if>>
@@ -1013,16 +1013,27 @@ __Buttplug__: ''<span id="buttplug">$activeSlave.buttplug</span>.''
 <<if $activeSlave.vagina >= 2>>| <<click "Huge and long dildo">><<set $activeSlave.vaginalAccessory to "long, huge dildo">><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><</click>><</if>>
 <</if>>
 <</if>>
-| <<click "Chastity belt">><<set $activeSlave.vaginalAccessory to "chastity belt">><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
-| <<click "Anal chastity belt">><<set $activeSlave.vaginalAccessory to "anal chastity">><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
-| <<click "Combined chastity belt">><<set $activeSlave.vaginalAccessory to "combined chastity">><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>>g<</click>>
+| <<click "Chastity belt">><<set $activeSlave.vaginalAccessory to "chastity belt",$activeSlave.choosesOwnChastity to 0>><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
+| <<click "Anal chastity belt">><<set $activeSlave.vaginalAccessory to "anal chastity",$activeSlave.choosesOwnChastity to 0>><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
+| <<click "Combined chastity belt">><<set $activeSlave.vaginalAccessory to "combined chastity",$activeSlave.choosesOwnChastity to 0>><<replace "#vaginalAccessory">><<print $activeSlave.vaginalAccessory>><</replace>><<SlaveInteractImpreg>><<SlaveInteractFertility>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>>g<</click>>
 <</if>>
 <<if $activeSlave.dick > 0>>
 &nbsp;&nbsp;&nbsp;&nbsp;<<if $activeSlave.vagina is -1>>__Accessory__<<else>>__Dick accessory__<</if>>: ''<span id="dickAccessory">$activeSlave.dickAccessory</span>.''
 <<click "None">><<set $activeSlave.dickAccessory to "none">><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><</replace>><</click>>
-| <<click "Chastity cage">><<set $activeSlave.dickAccessory to "chastity">><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
-| <<click "Anal chastity belt">><<set $activeSlave.dickAccessory to "anal chastity">><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</replace>><</click>>
-| <<click "Combined chastity belt">><<set $activeSlave.dickAccessory to "combined chastity">><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
+| <<click "Chastity cage">><<set $activeSlave.dickAccessory to "chastity",$activeSlave.choosesOwnChastity to 0>><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
+| <<click "Anal chastity belt">><<set $activeSlave.dickAccessory to "anal chastity",$activeSlave.choosesOwnChastity to 0>><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</replace>><</click>>
+| <<click "Combined chastity belt">><<set $activeSlave.dickAccessory to "combined chastity",$activeSlave.choosesOwnChastity to 0>><<replace "#dickAccessory">><<print $activeSlave.dickAccessory>><</replace>><<SlaveInteractSexOption>><<SlaveInteractAnalSexOption>><<SlaveInteractGropeOption>><<SlaveInteractDickGropeOption>><<SlaveInteractAnalGropeOption>><</click>>
+<</if>>
+
+<<if $arcologies[0].FSRestart != "unset" && $activeSlave.devotion > 20 && $activeSlave.trust > 0 && $activeSlave.choosesOwnClothes == 1>>
+<br>
+	<<if $activeSlave.choosesOwnChastity == 1>>
+		She is allowed the privelage of choosing to wear chastity devices.
+		[[Forbidden|Slave Interact][$activeSlave.choosesOwnChastity = 0]]
+	<<else>>
+		You choose if she may avoid wearing chastity devices.
+		[[Permitted|Slave Interact][$activeSlave.choosesOwnChastity = 1]]
+	<</if>>
 <</if>>
 
 <</if>> /* CLOSES FUCKDOLL CHECK */
@@ -1061,6 +1072,8 @@ __Buttplug__: ''<span id="buttplug">$activeSlave.buttplug</span>.''
 <<if ($slaves.length > 1)>>
 	<<if $activeSlave.origin == "You bought her from a body dump, completely broken." && ($week-$activeSlave.weekAcquired <= 8)>>
 	//A discarded slave must be kept for at least two months to unsure health before being sold.//
+	<<elseif $activeSlave.accent > 3>>
+	//Her lack of language and basic life skills is a red sign to most slave appraisers. She must not act like a child to be sold without raising suspicion.//
 	<<else>>
 	[[Sell her|Sell Slave][$cash -= 500]] //Listing her for sale will cost ¤500// |
 	<<if ($seeAge != 0)>>
diff --git a/src/uncategorized/slaveMarkets.tw b/src/uncategorized/slaveMarkets.tw
index 9735255a55cd3c826b35152a5ac429c399a69d4b..d813a4a2e108ed756b7f7289b4a78a2dbcf44527 100644
--- a/src/uncategorized/slaveMarkets.tw
+++ b/src/uncategorized/slaveMarkets.tw
@@ -73,7 +73,7 @@ You're in the area of the slave market owned by your corporation. The corporatio
 	/*<<set $activeSlave.actualAge = ramdom(18,19)>>*/
 <<elseif $captureUpgradeAge == "old">>
 	Newly enslaved MILFs are strongly favored for training.
-	*/<<set $activeSlave.actualAge = ramdom(36,$retirementAge)>>*/
+	/*<<set $activeSlave.actualAge = ramdom(36,$retirementAge)>>*/
 <<else>>
 	Promising slaves are trained without special sorting based on age.
 <</if>>
@@ -706,7 +706,7 @@ You're in the area of the slave market that specializes in slaves from within th
 
 <<if $arcologies[$i].FSSubjugationist > 20>>
 	They're universally $arcologies[$i].FSSubjugationistRace.
-	<<set $fixedRace = $arcologies[$i].FSSubjugationistRace>><<NationalityToRace>><<NationalityToName>><<NationalityToAccent>><<set $fixedRace = 0>>
+	<<set $fixedRace = $arcologies[$i].FSSubjugationistRace>><<NationalityToRace $activeSlave>><<NationalityToName $activeSlave>><<NationalityToAccent $activeSlave>><<set $fixedRace = 0>>
 <</if>>
 <<if $arcologies[$i].FSGenderRadicalist > 50>>
 	They all show signs of intensive hormone therapy.
diff --git a/src/uncategorized/slaveSold.tw b/src/uncategorized/slaveSold.tw
index 34d5c2a5ab86bbe719648cd95d0a1be7c9bf3e05..25057f5e35068a579cfc5c2d3bb83448a96d4653 100644
--- a/src/uncategorized/slaveSold.tw
+++ b/src/uncategorized/slaveSold.tw
@@ -836,6 +836,20 @@
 	<<set $slaves[$j].trust -= 2>>
 	<</for>>
 	
+<<case "tentacle bred">>
+	Sometime later, a snuff film starring $activeSlave.slaveName as a heroine captured, raped, and fatally bred by tentacles is released. It recieves rave reviews for the scene involving $activeSlave.slaveName, depicting her aphrodisiac filled body being penetrated in all her holes by tentacles. Their thrusting into her increases until large bulges of cum pass through the ones filling her stretched cunt, visably bloating her belly. She then collapses to the ground, her swollen belly rapidly growing with the tentacle spawn gestating within her. As they bulge against the straining walls of her implant-filled middle; she lets out a final moan as her belly ruptures, releasing her "spawn" to hunt down the other heroines.
+	<<for $j to 0; $j < $slaves.length; $j++>>
+	<<if canSee($slaves[$j])>>
+	<<if $slaves[$j].intelligence < 0>>
+		<<set $slaves[$j].devotion -= 4>>
+		<<set $seed to 1>>
+	<</if>>
+	<</if>>
+	<</for>>
+	<<if $seed == 1>>
+		Your less than intelligent slaves are @@color:mediumorchid;deeply envious@@ of $activeSlave.slaveName, completely failing to comprehend what they saw were not special effects.
+	<</if>>
+	
 <<default>>
 	The buyer forwards payment and sends a purchasing agent to collect her. There is nothing more to be done.
 
diff --git a/src/uncategorized/slaveSummary.tw b/src/uncategorized/slaveSummary.tw
index 2deac1f21e0a4e896c5870badd940c777e374ffc..c7c632d4fe93bbb39b2ae57f88b47aa1df050a64 100644
--- a/src/uncategorized/slaveSummary.tw
+++ b/src/uncategorized/slaveSummary.tw
@@ -575,7 +575,7 @@ will
 <</if>>
 
 <<if $displayAssignments == 1>>
-<<if passage() is "Main">>
+<<if _Pass is "Main">>
 <<if (_Slave.ID != $HeadGirl.ID) && (_Slave.ID != $Recruiter.ID) && (_Slave.ID != $Bodyguard.ID)>>
 <<if _Slave.assignment != "rest">>
 	<<print "[[Rest|Rest Workaround][$activeSlave to $slaves[" + _i + "]]]">> |
@@ -694,6 +694,8 @@ will
 	''SpR:P''
 <<case "accent elimination">>
 	''SpR:NoAcc''
+<<case "language lessons">>
+	''SpR:LL''
 <<default>>
 	''SpR:R''
 <</switch>>
@@ -1267,16 +1269,12 @@ Release rules: _Slave.releaseRules.
 <<elseif $abbreviateNationality is 2>>
 ''@@color:tan;
 <<switch _Slave.nationality>>
-<<case "American" "Canadian" "Puerto Rican" "Cuban" "Haitian" "Jamaican" "Mexican" "Dominican", "Peruvian" "Venezuelan" "Bolivian" "Guatemalan" "Brazilian" "Argentinian" "Chilean" "Colombian" "Egyptian" "Turkish" "Iranian" "Armenian" "Israeli" "Saudi" "Moroccan" "Nigerian" "Kenyan" "Ugandan" "Tanzanian" "Ghanan" "Congolese" "Ethiopian" "South African" "Chinese" "Korean" "Japanese" "Thai" "Vietnamese" "Indonesian" "Filipina" "Burmese" "Nepalese" "Uzbek" "Afghan" "Algerian" "Libyan" "Tunisian" "Lebanese" "Jordanian" "Emirati" "Omani" "Malian" "Sudanese" "Yemeni" "Iraqi" "Indian" "Malaysian" "Kazakh" "Pakistani" "Bangladeshi" "Belarusian" "Russian" "Ukrainian" "Irish" "Icelandic" "Finnish" "Swiss" "Danish" "Norwegian" "Austrian" "Slovak" "Dutch" "Belgian" "Czech" "Serbian" "Portuguese" "Hungarian" "Estonian" "Polish" "Lithuanian" "Romanian"  "German" "Swedish" "French" "Scottish" "Italian"  "Greek" "Spanish" "British" "Australian" "a New Zealander">>
-	_Slave.nationality.
 <<case "Zimbabwean">>
 	<<if _Slave.race == "white">>
 		Rhodesian.
 	<<else>>
 		_Slave.nationality.
 	<</if>>
-<<case "Ancient Egyptian Revivalist" "Ancient Chinese Revivalist" "Edo Revivalist" "Roman Revivalist" "Arabian Revivalist">>
-	_Slave.nationality.
 <<case "slave" "none" "" "Stateless">>
 	Stateless.
 <<default>>
@@ -1594,6 +1592,8 @@ Release rules: _Slave.releaseRules.
 		@@color:red;Acc--@@
 	<<elseif _Slave.accent is 2>>
 		Acc-
+	<<elseif _Slave.accent is 4>>
+		Acc--
 	<<elseif _Slave.accent == 1>>
 		@@color:pink;Acc@@
 	<</if>>
@@ -1811,6 +1811,8 @@ _Slave.faceShape face.
 <<else>>
 <<if _Slave.accent is 3>>
 	@@color:red;Bad accent.@@
+<<elseif _Slave.accent is 4>>
+	@@color:red;No language skills.@@
 <<elseif _Slave.accent is 2>>
 	Accent.
 <<elseif _Slave.accent == 1>>
@@ -3416,5 +3418,5 @@ _Slave.faceShape face.
 	<<print "[[Match them|Matchmaking][$subSlave to $slaves[" + _i + "]]]">>
 <</switch>>
 <</for>>
-<<set $activeSlave to {}>>
-<<set _Slave to {}>>
+<<set $activeSlave to 0>>
+<<set _Slave to 0>>
diff --git a/src/uncategorized/spaReport.tw b/src/uncategorized/spaReport.tw
index d68721cf2166e955d6a81112444161d89b726cb8..8b847b5dc5ab721e6b9f8d0519510ce1392036b9 100644
--- a/src/uncategorized/spaReport.tw
+++ b/src/uncategorized/spaReport.tw
@@ -13,22 +13,6 @@
 <<if ($slaves[$i].assignment is "rest in the spa")>>
 	<<if $seeImages == 1>><<SlaveArt $slaves[$i] 0 0>><</if>>
 	<<set $spaSlaves += 1>>
-	<<silently>>
-	<<display [[SA rest]]>>
-	<<if $slaves[$i].choosesOwnClothes == 1>>
-	<<display "SA chooses own clothes">>
-	<<if ($slaves[$i].devotion <= 20)>>
-		<<set $slaves[$i].devotion -= 5>>
-	<<else>>
-		<<set $slaves[$i].devotion += 1>>
-	<</if>>
-	<</if>>
-	<<display "SA diet">>
-	<<display "SA long term effects">>
-	<<display "SA drugs">>
-	<<display "SA relationships">>
-	<<display "SA rivalries">>
-	<</silently>>
 	<<if ($slaves[$i].devotion <= 60) && ($slaves[$i].trust < 60)>>
 	<<set $slaves[$i].devotion += 1>>
 	<<set $slaves[$i].trust += 1>>
@@ -143,21 +127,6 @@
 	<</if>>
 
 <<elseif ($Attendant != 0) && ($slaves[$i].ID is $Attendant.ID)>>
-	<<silently>>
-	<<if $slaves[$i].choosesOwnClothes == 1>>
-	<<display "SA chooses own clothes">>
-	<<if ($slaves[$i].devotion <= 20)>>
-		<<set $slaves[$i].devotion -= 5>>
-	<<else>>
-		<<set $slaves[$i].devotion += 1>>
-	<</if>>
-	<</if>>
-	<<display "SA diet">>
-	<<display "SA long term effects">>
-	<<display "SA drugs">>
-	<<display "SA relationships">>
-	<<display "SA rivalries">>
-	<</silently>>
 	<<if ($slaves[$i].health < 100)>>
 	<<set $slaves[$i].health += 20>>
 	<</if>>
@@ -349,8 +318,8 @@
 		<</if>>
 	<</if>>
 	<</for>>
-	<<if ($spaSlaves < 5)>>
-		<<set $seed to random(1,10)+((5-$spaSlaves)*(random(150,170)+($idleBonus*10)))>>
+	<<if ($spaSlaves < $spa)>>
+		<<set $seed to random(1,10)+(($spa-$spaSlaves)*(random(150,170)+($idleBonus*10)))>>
 		<<set $cash += $seed>>
 		Since she doesn't have enough girls to occupy all her time, the spa takes in citizens' slaves on a contract basis and she helps them too, earning @@color:yellowgreen;¤$seed.@@
 	<</if>>
@@ -377,10 +346,31 @@
 	<br><br>
 	<<if $showEWD == 0>>
 		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Attendant in the spa.<br>
+		<<silently>>
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<<display "SA devotion">>
+		<</silently>>
 	<<else>>
 		''__@@color:pink;$slaves[$i].slaveName@@__'' is serving as the Attendant in the spa.
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
@@ -395,12 +385,34 @@
 	<br>
 	<<if $showEWD == 0>>
 		''__@@color:pink;$slaves[$i].slaveName@@__'' is resting in the spa.
+		<<silently>>
+		<<display [[SA rest]]>>
+		<<if $slaves[$i].choosesOwnClothes == 1>>
+		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
+		<</if>>
+		<<display "SA diet">>
+		<<display "SA long term effects">>
+		<<display "SA drugs">>
+		<<display "SA relationships">>
+		<<display "SA rivalries">>
+		<<display "SA devotion">>
+		<</silently>>
 	<<else>>
 		''__@@color:pink;$slaves[$i].slaveName@@__''
 		<<display [[SA rest]]>>
 		<br>&nbsp;&nbsp;&nbsp;&nbsp;
 		<<if $slaves[$i].choosesOwnClothes == 1>>
 		<<display "SA chooses own clothes">>
+		<<if ($slaves[$i].devotion <= 20)>>
+			<<set $slaves[$i].devotion -= 5>>
+		<<else>>
+			<<set $slaves[$i].devotion += 1>>
+		<</if>>
 		<</if>>
 		<<display "SA diet">>
 		<<display "SA long term effects">>
diff --git a/src/uncategorized/tfsFarmUpgrade.tw b/src/uncategorized/tfsFarmUpgrade.tw
index 027ea4dbc1604cd4765334712288981692067aa1..676a50ab52fdf195374db13052f2e6bb8d8d847c 100644
--- a/src/uncategorized/tfsFarmUpgrade.tw
+++ b/src/uncategorized/tfsFarmUpgrade.tw
@@ -44,6 +44,7 @@ whether we will use contraception after we are transformed." She shudders sudden
 <br><<click "Decline">>
 	<<replace "#result">>
 		You decline. The Sister accepts your decision politely, but cannot hide her deep disappointment.
+		<<set $TFS.farmUpgrade = -1>>
 	<</replace>>
 <</click>>
 </span>
diff --git a/src/uncategorized/theFutanariSisters.tw b/src/uncategorized/theFutanariSisters.tw
index 9472fc2ed5557bdba968c555ce666217f3ad5122..2777d96b12e053faf04fc60aedb21ed93684678a 100644
--- a/src/uncategorized/theFutanariSisters.tw
+++ b/src/uncategorized/theFutanariSisters.tw
@@ -24,7 +24,7 @@ This is a large, circular room with a shallow depression in the floor, filled wi
 <br><br>
 Visitors are not common: in fact, visitors are only as frequent as you feel like visiting. It takes a while before they notice you. When a dreamy-eyed young futa finally does, she reaches a lazy hand over to alert the eldest one present by tugging on one of her nipples and pointing in your direction. The elder looks over at you and gives you a friendly wave followed by a wait-one-moment gesture. She's curled up on her back with her cockhead in her own mouth, using both hands to give her own shaft a boob job while a younger futa is eats her ass and fingers her pussy. The futa matron orgasms promptly, sucking down her own cum. She gets up languidly, her plush body, softening forearm-sized dick, and enormous natural boobs making it a wonderful sight.
 <br><br>
-<<if $PC.title == 1>>"Protector,<<else>>"Protectrix,<</if>> thank you so much for coming to see us. Our own Selection of a Sister to serve in slavery is not to take place for some time, but our communications interface in that side room," she points, "will permit you to access a regional listing of Selected Sisters<<if $TFS.farmUpgrade!= 0>>, all of which are fully fertile and produce their own natural female hormones, thanks to you<</if>>." She looks uncharacteristically uncertain. "Will you permit me to <<if $PC.dick == 1>><<if $PC.vagina == 1>>worship your perfect genitalia<<else>>serve your cock<</if>><<else>>adore your pussy<</if>> while you use it? I think my Sisters will forgive me the infidelity." <<if ($PC.dick == 1) && ($PC.vagina == 1) && ($PC.boobs == 1)>>She looks at you speculatively. "Or you could join us for a while."<</if>>
+<<if $PC.title == 1>>"Protector,<<else>>"Protectrix,<</if>> thank you so much for coming to see us. Our own Selection of a Sister to serve in slavery is not to take place for some time, but our communications interface in that side room," she points, "will permit you to access a regional listing of Selected Sisters<<if $TFS.farmUpgrade > 0>>, all of which are fully fertile and produce their own natural female hormones, thanks to you<</if>>." She looks uncharacteristically uncertain. "Will you permit me to <<if $PC.dick == 1>><<if $PC.vagina == 1>>worship your perfect genitalia<<else>>serve your cock<</if>><<else>>adore your pussy<</if>> while you use it? I think my Sisters will forgive me the infidelity." <<if ($PC.dick == 1) && ($PC.vagina == 1) && ($PC.boobs == 1)>>She looks at you speculatively. "Or you could join us for a while."<</if>>
 <br><br>
 <span id="result">
 <<click "Let her give you oral while you browse">>
@@ -196,7 +196,7 @@ The Sisters offer a member selected for sale into slavery for inspection via vid
 	<<set $activeSlave.anus to 3>>
 	<<set $activeSlave.fetish to "dom">>
 <</if>>
-<<if $TFS.farmUpgrade != 0>>
+<<if $TFS.farmUpgrade > 0>>
 	<<set $activeSlave.ovaries to 1>>
 	<<set $activeSlave.preg to -1>>
 	<<if $TFS.farmUpgrade == 2>>
diff --git a/src/uncategorized/twinsWorkaround.tw b/src/uncategorized/twinsWorkaround.tw
index 620640049ef4b154c4fa018c484346dae85908e6..3682cc35cef5dfb6a59e5493272bdc644e0b6c1b 100644
--- a/src/uncategorized/twinsWorkaround.tw
+++ b/src/uncategorized/twinsWorkaround.tw
@@ -4,27 +4,11 @@ Your new pair of slaves look frightened and uncertain, but seem encouraged by ea
 
 <<AddSlave $activeSlave>>
 
-<<NationalityToName>>
-<<NationalityToAccent>>
-<<set _secondSlave to $activeSlave>>
+<<set _secondSlave to clone($activeSlave)>>
+<<unset $activeSlave>>
+<<NationalityToName _secondSlave>>
+<<NationalityToAccent _secondSlave>>
 
-<<if $useFSNames == 0>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<<elseif $arcologies[0].FSChattelReligionist > 20>>
-	<<set _secondSlave.slaveName to $chattelReligionistSlaveNames.random()>>
-<<elseif $arcologies[0].FSRomanRevivalist > 20>>
-	<<set _secondSlave.slaveName to $romanSlaveNames.random()>>
-<<elseif $arcologies[0].FSEgyptianRevivalist > 20>>
-	<<set _secondSlave.slaveName to $ancientEgyptianSlaveNames.random()>>
-<<elseif $arcologies[0].FSEdoRevivalist > 20>>
-	<<set _secondSlave.slaveName to $edoSlaveNames.random()>>
-<<elseif $arcologies[0].FSDegradationist != "unset">>
-	<<display "Degrading Name">>
-<<else>>
-	<<set _secondSlave.slaveName to _secondSlave.birthName>>
-<</if>>
-
-<<set _secondSlave.slaveName to _secondSlave.birthName>>
 <<set _secondSlave.ID to _secondSlave.ID + 1000>>
 <<if $familyTesting == 0>>
 <<set _secondSlave.relation to "twin">>
diff --git a/src/utility/assayWidgets.tw b/src/utility/assayWidgets.tw
index 64835101cb6e96fce480cb90450af90210e3a571..4d49cfa76b6bdc0aef84c56f15da6960f25e9aff 100644
--- a/src/utility/assayWidgets.tw
+++ b/src/utility/assayWidgets.tw
@@ -627,7 +627,7 @@
 <<if canTalk($args[0]) == false>>
 	<<set $beauty -= 2>>
 <<else>>
-	<<if ($args[0].accent is 3)>>
+	<<if ($args[0].accent >= 3)>>
 	<<set $beauty -= 1>>
 	<<elseif ($args[0].accent == 1)>>
 	<<set $beauty += 1>>
@@ -959,6 +959,12 @@
 	<<set $deadliness += 2>>
 <<elseif ($args[0].muscles > 95)>>
 	<<set $deadliness -= 1>>
+<<elseif ($args[0].muscles < -95)>>
+	<<set $deadliness -= 20>>
+<<elseif ($args[0].muscles < -30)>>
+	<<set $deadliness -= 7>>
+<<elseif ($args[0].muscles < -5)>>
+	<<set $deadliness -= 3>>
 <</if>>
 
 <<if $args[0].height >= 170>>
diff --git a/src/utility/birthWidgets.tw b/src/utility/birthWidgets.tw
index afc60636992de24722abfcffcf3d56e5e4ea3cdf..7169941a93091a7000e9b1d472cef5547dc20644 100644
--- a/src/utility/birthWidgets.tw
+++ b/src/utility/birthWidgets.tw
@@ -2,24 +2,23 @@
 
 <<widget "Birth">>
 <br>
-
 <<if $birthDamage > 5 or $universalRulesCSec == 1>>
-<<if $universalRulesCSec == 1>>
-<<set $csec to 1>>
-<<set $slaves[$i].cSec to 1>>
-<<if $clinic != 0>>
-She is taken to $clinicName, since she is scheduled for a cesarean section. She is helped from her clothes and into a comfortable hospital bed to relax until the surgery suite is prepped. After several minutes, she is transferred to the surgery wing. Following her c-section, she is returned to the recovery wing to rest. Her child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> promptly taken and she is left under observation to make sure she recovers.
-<<else>>
-She is taken to the auto-surgeon, since she is scheduled for a cesarean section. She is stripped from her clothes and set up on the operating table. She is quickly sedated, and subjected to a c-section in order to avoid potential problems and preserve her vagina. The surgery is quick, and she is moved to a bed to recover. When she awakes, her child<<if $slaves[$i].pregType > 1>>ren have<<else>> has<</if>> already been taken away.
-<</if>>
-<<else>>
-<<if $clinic != 0>>
-She is lead to $clinicName, since she is likely to face complications with childbirth. She is helped from her clothes and into a comfortable hospital bed to relax until she is ready. She makes herself comfortable and begins working on birthing her bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>>, fully aware of her watching helpers. <<if $birthDamage > 10>><<set $csec to 1>><<set $slaves[$i].cSec to 1>>After several hours of intense labor, she is transferred to the surgery wing. Following an emergency c-section, she is returned to the recovery wing to rest.<<else>>After several hours, and a touch of morphine, she has successfully given birth<</if>>. Her child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> promptly taken and she is left under observation to make sure she recovers.
-<<else>>
-<<set $csec to 1>><<set $slaves[$i].cSec to 1>>
-She is lead to the auto-surgeon, since she is likely to face complications with childbirth. She is stripped from her clothes and set up on the operating table. She is quickly sedated, and subjected to a c-section in order to avoid potential problems.  The surgery is quick, and she is moved to a bed to recover. When she awakes, her child<<if $slaves[$i].pregType > 1>>ren have<<else>> has<</if>> already been taken away.
-<</if>>
-<</if>>
+	<<if $universalRulesCSec == 1>>
+		<<set $csec to 1>>
+		<<set $slaves[$i].cSec to 1>>
+		<<if $clinic != 0>>
+			$slaves[$i].slaveName is taken to $clinicName, since she is scheduled for a cesarean section. She is helped from her clothes and into a comfortable hospital bed to relax until the surgery suite is prepped. After several minutes, she is transferred to the surgery wing. Following her c-section, she is returned to the recovery wing to rest. Her child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> promptly taken and she is left under observation to make sure she recovers.
+		<<else>>
+			$slaves[$i].slaveName is taken to the auto-surgeon, since she is scheduled for a cesarean section. She is stripped from her clothes and set up on the operating table. She is quickly sedated, and subjected to a c-section in order to avoid potential problems and preserve her vagina. The surgery is quick, and she is moved to a bed to recover. When she awakes, her child<<if $slaves[$i].pregType > 1>>ren have<<else>> has<</if>> already been taken away.
+		<</if>>
+	<<else>>
+		<<if $clinic != 0>>
+			She is lead to $clinicName, since she is likely to face complications with childbirth. She is helped from her clothes and into a comfortable hospital bed to relax until she is ready. She makes herself comfortable and begins working on birthing her bab<<if $slaves[$i].pregType > 1>>ies<<else>>y<</if>>, fully aware of her watching helpers. <<if $birthDamage > 10>><<set $csec to 1>><<set $slaves[$i].cSec to 1>>After several hours of intense labor, she is transferred to the surgery wing. Following an emergency c-section, she is returned to the recovery wing to rest.<<else>>After several hours, and a touch of morphine, she has successfully given birth<</if>>. Her child<<if $slaves[$i].pregType > 1>>ren are<<else>> is<</if>> promptly taken and she is left under observation to make sure she recovers.
+		<<else>>
+			<<set $csec to 1>><<set $slaves[$i].cSec to 1>>
+			She is lead to the auto-surgeon, since she is likely to face complications with childbirth. She is stripped from her clothes and set up on the operating table. She is quickly sedated, and subjected to a c-section in order to avoid potential problems.  The surgery is quick, and she is moved to a bed to recover. When she awakes, her child<<if $slaves[$i].pregType > 1>>ren have<<else>> has<</if>> already been taken away.
+		<</if>>
+	<</if>>
 
 <<else>>
 
diff --git a/src/utility/descriptionWidgets.tw b/src/utility/descriptionWidgets.tw
index 77acc8fa2d6ac23cf7b4cb6cbcd0ab9d3b49cfd0..7455eca818d0427aef496fd11581800fc8a9e61b 100644
--- a/src/utility/descriptionWidgets.tw
+++ b/src/utility/descriptionWidgets.tw
@@ -794,7 +794,7 @@ $possessiveCap
 	<<else>>
 		Together they are nearly the same size as $possessive torso, making $object about half boob.
 	<</if>>
-	<<if ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
+	<<if $activeSlave.boobs > 7500 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
 		<<if $boobAccessibility == 1>>
 		Fortunately for $object, the penthouse is adapted for daily life with a bosom
 		<<else>>
@@ -825,7 +825,7 @@ $possessiveCap
 	<<else>>
 		Together they are nearly the same size as her torso, making her about half boob.
 	<</if>>
-	<<if  $activeSlave.boobs > 10000 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
+	<<if $activeSlave.boobs > 7500 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
 		<<if $boobAccessibility == 1>>
 		Fortunately for $object, the penthouse is adapted for daily life with a bosom
 		<<else>>
@@ -856,7 +856,7 @@ $possessiveCap
 	<<else>>
 		Together they are nearly the same size as her torso, making her about half boob.
 	<</if>>
-	<<if  $activeSlave.boobs > 10000 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
+	<<if  $activeSlave.boobs > 7500 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
 		<<if $boobAccessibility == 1>>
 		Fortunately for $object, the penthouse is adapted for daily life with a bosom
 		<<else>>
@@ -887,7 +887,7 @@ $possessiveCap
 	<<else>>
 		Together they are nearly the same size as her torso, making her about half boob.
 	<</if>>
-	<<if  $activeSlave.boobs > 10000 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
+	<<if  $activeSlave.boobs > 7500 && ($activeSlave.assignment != "work in the dairy") || ($dairyRestraintsSetting < 2)>>
 		<<if $boobAccessibility == 1>>
 		Fortunately for $object, the penthouse is adapted for daily life with a bosom
 		<<else>>
@@ -1779,6 +1779,14 @@ $pronounCap's got a
 	<<else>>
 		Together it is nearly the same size as $possessive torso, making $object about half butt.
 	<</if>>
+	<<if $activeSlave.butt > 15>>
+		<<if $buttAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a rear
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with buttcheeks
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge <= 12>>
@@ -1800,6 +1808,14 @@ $pronounCap's got a
 	<<else>>
 		Together it is nearly the same size as $possessive torso, making $object about half butt.
 	<</if>>
+	<<if $activeSlave.butt > 15>>
+		<<if $buttAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a rear
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with buttcheeks
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge > 12>>
@@ -1821,6 +1837,14 @@ $pronounCap's got a
 	<<else>>
 		Together it is nearly the same size as $possessive torso, making $object about half butt.
 	<</if>>
+	<<if $activeSlave.butt > 15>>
+		<<if $buttAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a rear
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with buttcheeks
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <</if>>
@@ -3053,6 +3077,14 @@ $pronounCap's got a
 	<<else>>
 		It is nearly the same size as $possessive torso, making $object about half cock.
 	<</if>>
+	<<if $activeSlave.dick > 45>>
+		<<if $dickAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a cock
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with dicks
+		<</if>>
+		bigger than they are.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge <= 12>>
@@ -3074,6 +3106,14 @@ $pronounCap's got a
 	<<else>>
 		It is nearly the same size as $possessive torso, making $object about half cock.
 	<</if>>
+	<<if $activeSlave.dick > 45>>
+		<<if $dickAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a cock
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with dicks
+		<</if>>
+		bigger than they are.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge > 12>>
@@ -3095,6 +3135,14 @@ $pronounCap's got a
 	<<else>>
 		It is nearly the same size as $possessive torso, making $object about half cock.
 	<</if>>
+	<<if $activeSlave.dick > 45>>
+		<<if $dickAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with a cock
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with dicks
+		<</if>>
+		bigger than they are.
+	<</if>>
 <</if>>
 <</if>>
 <</if>>
@@ -3118,6 +3166,14 @@ $pronounCap's got a
 	<<else>>
 		Together they are nearly the same size as $possessive torso, making $object about half testicle.
 	<</if>>
+	<<if $activeSlave.balls > 90>>
+		<<if $ballsAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with balls
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with testicles
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge <= 12>>
@@ -3139,6 +3195,14 @@ $pronounCap's got a
 	<<else>>
 		Together they are nearly the same size as $possessive torso, making $object about half testicle.
 	<</if>>
+	<<if $activeSlave.balls > 90>>
+		<<if $ballsAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with balls
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with testicles
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <<elseif $activeSlave.physicalAge > 12>>
@@ -3160,6 +3224,14 @@ $pronounCap's got a
 	<<else>>
 		Together they are nearly the same size as $possessive torso, making $object about half testicle.
 	<</if>>
+	<<if $activeSlave.balls > 90>>
+		<<if $ballsAccessibility == 1>>
+		Fortunately for $object, the penthouse is adapted for daily life with balls
+		<<else>>
+		$pronounCap has trouble living in your penthouse, which is not designed for girls with testicles
+		<</if>>
+		wider than a standard doorway.
+	<</if>>
 <</if>>
 <</if>>
 <</if>>
@@ -5257,9 +5329,9 @@ $possessiveCap
 		<<case "a slutty maid outfit" "a nice maid outfit">>
 			is decorated with a little black bow in back.
 		<<case "conservative clothing" "nice business attire">>
-			is kept out of $possessive face by simple barette.
+			is kept out of $possessive face by simple barrette.
 		<<case "slutty business attire">>
-			is kept out of $possessive face by a gaudy golden barette.
+			is kept out of $possessive face by a gaudy golden barrette.
 		<<case "battledress" "a military uniform">>
 			is kept out of $possessive face by a sturdy hairpin.
 		<<case "a schoolgirl outfit">>
@@ -6419,9 +6491,9 @@ $possessiveCap
 		<<case "a slutty maid outfit" "a nice maid outfit">>
 			is in luxuriously styled short locks decorated with a little black bow in back.
 		<<case "conservative clothing" "nice business attire">>
-			is in luxuriously styled short locks kept out of $possessive face by simple barette.
+			is in luxuriously styled short locks kept out of $possessive face by simple barrette.
 		<<case "slutty business attire">>
-			is in luxuriously styled short locks kept out of $possessive face by a gaudy golden barette.
+			is in luxuriously styled short locks kept out of $possessive face by a gaudy golden barrette.
 		<<case "battledress" "a military uniform">>
 			is in luxuriously styled short locks kept out of $possessive face by a sturdy hairpin.
 		<<case "a schoolgirl outfit">>
@@ -8309,7 +8381,7 @@ $pronounCap has
 <<else>>
   It is easily as large as $possessive torso, making $possessive at least half belly.
 <</if>>
-<<if ($activeSlave.assignment != "labor in the production line")>>
+<<if ($activeSlave.assignment != "labor in the production line") && ($activeSlave.preg > 20 and $activeSlave.pregType >= 10)>>
   <<if $pregAccessibility == 1>>
 	Fortunately for $possessive, the penthouse is adapted for daily life with a pregnant belly
   <<else>>
@@ -8334,7 +8406,7 @@ $pronounCap has
 <<else>>
   It is easily as large as $possessive torso, making $possessive at least half belly.
 <</if>>
-<<if ($activeSlave.assignment != "labor in the production line")>>
+<<if ($activeSlave.assignment != "labor in the production line") && ($activeSlave.preg > 20 and $activeSlave.pregType >= 10)>>
   <<if $pregAccessibility == 1>>
 	Fortunately for $possessive, the penthouse is adapted for daily life with a pregnant belly
   <<else>>
diff --git a/src/utility/miscWidgets.tw b/src/utility/miscWidgets.tw
index c2add92725e23b7bf80435257601cdce459775e0..6cc6b3aaad52de25f6596f34f54d10520cfc7172 100644
--- a/src/utility/miscWidgets.tw
+++ b/src/utility/miscWidgets.tw
@@ -26,7 +26,7 @@
 <<widget "AnalVCheck">>
 <<if canDoAnal($activeSlave) && ($activeSlave.anus eq 0)>>
 	@@color:lime;This breaks in $activeSlave.slaveName's virgin ass.@@
-	<<if ($activeSlave.devotion > 50)>>
+	<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 		Since it's her first time, you gently ease yourself into her butthole and gradually increase the intensity of your thrusts. Before long she's moaning loudly as you continue working away at her butthole. She thinks of losing her anal virginity to you as a @@color:hotpink;connection@@ with her beloved master. She looks forward to having her asshole fucked by you again.
 		<<set $activeSlave.devotion += 4>>
 	<<elseif ($activeSlave.devotion > 20)>>
@@ -60,7 +60,7 @@
 <<if canDoVaginal($activeSlave)>>
 	<<if ($activeSlave.vagina eq 0)>>
 		@@color:lime;This breaks in $activeSlave.slaveName's virgin pussy.@@
-		<<if ($activeSlave.devotion > 20)>>
+		<<if ($activeSlave.devotion > 20) || $activeSlave.career == "a slave since birth">>
 			You ease yourself into her pussy, since it's her first time, then gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. @@color:hotpink;She enjoys losing her cherry to you.@@ She looks forward to having her pussy fucked by you again.
 			<<set $activeSlave.devotion += 4>>
 		<<elseif ($activeSlave.devotion < -20)>>
@@ -94,7 +94,7 @@
 	<<if ($activeSlave.vagina eq 0)>>
 		<<if canDoAnal($activeSlave) && ($activeSlave.anus eq 0)>>
 			@@color:lime;This breaks in $activeSlave.slaveName's virgin holes.@@
-			<<if ($activeSlave.devotion > 50)>>
+			<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 				As it's her first time, you ease yourself into her pussy before gradually working your way into her ass and alternate between the two holes while she moans. @@color:hotpink;She's so devoted she enjoys being fucked in both holes for the first time.@@ She looks forward to having her holes fucked by you again.
 				<<set $activeSlave.devotion += 4>>
 			<<elseif ($activeSlave.devotion <= 20)>>
@@ -107,7 +107,7 @@
 		<<elseif canDoAnal($activeSlave)>>
 			@@color:lime;This breaks in $activeSlave.slaveName's virgin pussy.@@
 			<<set $activeSlave.vagina++>>
-			<<if ($activeSlave.devotion > 20)>>
+			<<if ($activeSlave.devotion > 20) || $activeSlave.career == "a slave since birth">>
 				As it's her first time, you ease yourself into her pussy and gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. @@color:hotpink;She enjoys losing her cherry to you.@@ She looks forward to having her pussy fucked by you again.
 				<<set $activeSlave.devotion += 4>>
 			<<elseif ($activeSlave.devotion < -20)>>
@@ -120,7 +120,7 @@
 		<<set $activeSlave.vagina to 1>>
 	<<elseif ($activeSlave.anus eq 0)>>
 		@@color:lime;This breaks in $activeSlave.slaveName's virgin ass.@@
-		<<if ($activeSlave.devotion > 50)>>
+		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her butthole and gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. She thinks of losing her anal virginity to you as a @@color:hotpink;connection@@ with her beloved master. She looks forward to having her asshole fucked by you again.
 			<<set $activeSlave.devotion += 4>>
 		<<elseif ($activeSlave.devotion > 20)>>
@@ -144,7 +144,7 @@
 <<elseif canDoAnal($activeSlave)>>
 	<<if ($activeSlave.anus eq 0)>>
 		@@color:lime;This breaks in $activeSlave.slaveName's virgin ass.@@
-		<<if ($activeSlave.devotion > 50)>>
+		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her butthole and gradually speed up your thrusts while she slowly learns to move her hips along with you. She moans loudly. She thinks of losing her anal virginity to you as a @@color:hotpink;connection@@ with her beloved master. She looks forward to having her asshole fucked by you again.
 			<<set $activeSlave.devotion += 4>>
 		<<elseif ($activeSlave.devotion > 20)>>
@@ -177,7 +177,7 @@
 <<if canDoVaginal($activeSlave)>>
 	<<if ($activeSlave.vagina eq 0)>>
 		@@color:lime;This breaks in $activeSlave.slaveName's virgin pussy.@@
-		<<if ($activeSlave.devotion > 20)>>
+		<<if ($activeSlave.devotion > 20) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you ease yourself into her pussy and gradually speed up your thrusts while she slowly learns to move her hips along with you. Her moans become louder and louder. @@color:hotpink;She enjoys losing her cherry to you.@@ She looks forward to having her pussy fucked by you again.
 			<<set $activeSlave.devotion += 4>>
 		<<elseif ($activeSlave.devotion < -20)>>
@@ -198,7 +198,7 @@
 <<elseif canDoAnal($activeSlave)>>
 	<<if ($activeSlave.anus eq 0)>>
 		@@color:lime;This breaks in $activeSlave.slaveName's virgin ass.@@
-		<<if ($activeSlave.devotion > 50)>>
+		<<if ($activeSlave.devotion > 50) || $activeSlave.career == "a slave since birth">>
 			As it's her first time, you gently ease yourself into her butthole and gradually increase the intensity of your thrusts. Before long she's moaning loudly as you continue working away at her butthole. She thinks of losing her anal virginity to you as a @@color:hotpink;connection@@ with her beloved master. She looks forward to having her asshole fucked by you again.
 			<<set $activeSlave.devotion += 4>>
 		<<elseif ($activeSlave.devotion > 20)>>
@@ -1183,7 +1183,6 @@
 	<</if>>
 	<</if>>
 <</if>>
-
 <<if $args[0].actualAge > 35>>
 	<<if $args[0].face < 2>>
 	<<if $args[0].analSkill <= 30>>
@@ -1191,21 +1190,17 @@
 	<</if>>
 	<</if>>
 <</if>>
-
 <<if $args[0].attrXY <= 60>>
 	<<if $args[0].attrXX > 60>>
 		<<set $REOrientationCheckinIDs.push($args[0].ID)>>
 	<</if>>
 <</if>>
-
 <<if $args[0].face < 0>>
 	<<set $REUglyCheckinIDs.push($args[0].ID)>>
 <</if>>
-
 <<if $args[0].anus < 2>>
 	<<set $REButtholeCheckinIDs.push($args[0].ID)>>
 <</if>>
-
 <<if $args[0].boobs < 800>>
 	<<set $REReductionCheckinIDs.push($args[0].ID)>>
 <</if>>
@@ -1214,8 +1209,10 @@
 <<if $universalRulesNewSlavesRA == 1>>
 <<if $autoRulesAssistant != 0>>
 	<<silently>>
+	<<set $activeSlave = $args[0]>>
 	<<display "Check Auto Rules Activate">>
 	<<display "Default Rules">>
+	<<set $args[0] = $activeSlave>>
 	<</silently>>
 <</if>>
 <</if>>
diff --git a/src/utility/slaveCreationWidgets.tw b/src/utility/slaveCreationWidgets.tw
index 7e6a6ec3c707b2275a778609253200be71782b96..de9e9e307b0829d7c1df5341402f63e5fd77cfaa 100644
--- a/src/utility/slaveCreationWidgets.tw
+++ b/src/utility/slaveCreationWidgets.tw
@@ -648,15 +648,17 @@
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 		//This will apply your @@color:springgreen;career bonus@@ to her:
 		<<if $PC.career is "capitalist">>
 			one free level of @@color:cyan;prostitution skill.@@
 		<<elseif $PC.career is "mercenary">>
-			@@color:mediumaquamarine;+2 trust.@@
+			@@color:mediumaquamarine;+10 trust.@@
 		<<elseif $PC.career is "slaver">>
-			@@color:hotpink;+2 devotion.@@
+			@@color:hotpink;+10 devotion.@@
 		<<elseif $PC.career is "medicine">>
 			free @@color:lime;basic implants.@@
 		<<elseif $PC.career is "celebrity">>
@@ -666,7 +668,7 @@
 		<<elseif $PC.career is "escort">>
 			two free levels of @@color:cyan;sex skills@@, one free level of @@color:cyan;prostitution skill@@, and one free level of @@color:cyan;entertainment skill.@@
 		<<elseif $PC.career is "servant">>
-			@@color:mediumaquamarine;+1 trust@@ and @@color:hotpink;+1 devotion.@@
+			@@color:mediumaquamarine;+5 trust@@ and @@color:hotpink;+5 devotion.@@
 		<<elseif $PC.career is "wealth">>
 			two free levels of @@color:cyan;sex skills.@@
 		<<else>>
@@ -686,6 +688,8 @@
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 	<<else>>
@@ -703,14 +707,17 @@
 			<<set $activeSlave.boobs = Number($activeSlave.boobs)>>
 			<<set $activeSlave.boobs = Math.trunc($activeSlave.boobs/50)*50>>
 			<<set $slaveWithoutBonuses = $activeSlave>>
+			<<slaveCost $activeSlave>>
+			<<set $cash -= $slaveCost>>
 			<<goto "RG AS Dump">>
 		<</click>>
 		<br>
 	<</if>>
 <<else>>
-	//You lack the necessary funds to add this slave.//
+	<br>//You lack the necessary funds to add this slave.//
 <</if>>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Discard this slave and continue|Acquisition]]
+<br>&nbsp;&nbsp;&nbsp;&nbsp;
+[[Discard this slave and continue|Acquisition]]
 <</replace>>
 <</widget>>