diff --git a/Changelog.txt b/Changelog.txt
index e05f052f6d78d31f49c678848d1a8e876dc34d51..c864fabf5890497caca59103ccdc7299dba09f47 100644
--- a/Changelog.txt
+++ b/Changelog.txt
@@ -4,6 +4,8 @@ Pregmod
 
 	0
 	-scar system added
+	-partial amputation and amp rework underway
+	-four wip FSs now neighbor ready
 	-player slave impregnation bug fixed
 	-fixes and cleaning
 
diff --git a/src/cheats/mod_EditNeighborArcologyCheat.tw b/src/cheats/mod_EditNeighborArcologyCheat.tw
index b9bbeabf9659c7fc0bb7e81adc9b4f4492542ea7..b4903162a27617c78d1962945a63e5439f3ba785 100644
--- a/src/cheats/mod_EditNeighborArcologyCheat.tw
+++ b/src/cheats/mod_EditNeighborArcologyCheat.tw
@@ -17,7 +17,7 @@
 		<<set _seed.delete($arcologies[_eca].direction)>> /* remove directions already in use */
 	<</for>>
 	<<set _govtypes = ["a committee", "a corporation", "an individual", "an oligarchy", "direct democracy", "elected officials"]>>
-	<<set $activeArcology = {name: "Arcology X-", direction: _seed.random(), government: _govtypes.random(), honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor:0, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSRepopulationFocus: "unset", FSHedonisticDecadence: "unset", FSCummunism: "unset", FSIncestFetishist: "unset", FSRestart: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
+	<<set $activeArcology = {name: "Arcology X-", direction: _seed.random(), government: _govtypes.random(), honeymoon: 0, prosperity: 50, ownership: 50, minority: 20, PCminority: 0, demandFactor:0, FSSupremacist: "unset", FSSupremacistRace: 0, FSSubjugationist: "unset", FSSubjugationistRace: 0, FSGenderRadicalist: "unset", FSGenderFundamentalist: "unset", FSPaternalist: "unset", FSDegradationist: "unset", FSIntellectualDependency: "unset", FSSlaveProfessionalism: "unset", FSBodyPurist: "unset", FSTransformationFetishist: "unset", FSYouthPreferentialist: "unset", FSMaturityPreferentialist: "unset", FSStatuesqueGlorification: "unset", FSPetiteAdmiration: "unset", FSSlimnessEnthusiast: "unset", FSAssetExpansionist: "unset", FSPastoralist: "unset", FSPhysicalIdealist: "unset", FSChattelReligionist: "unset", FSRomanRevivalist: "unset", FSAztecRevivalist: "unset", FSEgyptianRevivalist: "unset", FSEdoRevivalist: "unset", FSArabianRevivalist: "unset", FSChineseRevivalist: "unset", FSNull: "unset", FSRepopulationFocus: "unset", FSHedonisticDecadence: "unset", FSCummunism: "unset", FSIncestFetishist: "unset", FSRestart: "unset", embargo: 1, embargoTarget: -1, influenceTarget: -1, influenceBonus: 0, rival: 0}>>
 
 	<<if $arcologies.length < 4>> /* X-4 is reserved for player's arcology, so X-1 is available */
 		<<set $activeArcology.name += ($arcologies.length)>>
diff --git a/src/cheats/mod_EditNeighborArcologyCheatWidget.tw b/src/cheats/mod_EditNeighborArcologyCheatWidget.tw
index 25012d357518216583f7c641e53f914cb706bd0b..49464c9065e4b094cc57fca7ec0a28c27bfbcc00 100644
--- a/src/cheats/mod_EditNeighborArcologyCheatWidget.tw
+++ b/src/cheats/mod_EditNeighborArcologyCheatWidget.tw
@@ -122,6 +122,16 @@ Call as <<EditNeighborCheat>>
 
 	<br>
 
+	'' $arcologies[_i].name Intellectual Dependency (unset or 1-100):'' $arcologies[_i].FSIntellectualDependency
+	<br><<textbox "$arcologies[_i].FSIntellectualDependency" $arcologies[_i].FSIntellectualDependency>>
+
+	<br>
+
+	'' $arcologies[_i].name Slave Professionalism (unset or 1-100):'' $arcologies[_i].FSSlaveProfessionalism
+	<br><<textbox "$arcologies[_i].FSSlaveProfessionalism" $arcologies[_i].FSSlaveProfessionalism>>
+
+	<br>
+
 	'' $arcologies[_i].name Body Purist (unset or 1-100):'' $arcologies[_i].FSBodyPurist
 	<br><<textbox "$arcologies[_i].FSBodyPurist" $arcologies[_i].FSBodyPurist>>
 
@@ -142,6 +152,16 @@ Call as <<EditNeighborCheat>>
 
 	<br>
 
+	'' $arcologies[_i].name Petite Admiration (unset or 1-100):'' $arcologies[_i].FSPetiteAdmiration
+	<br><<textbox "$arcologies[_i].FSPetiteAdmiration" $arcologies[_i].FSPetiteAdmiration>>
+
+	<br>
+
+	'' $arcologies[_i].name Statuesque Glorification (unset or 1-100):'' $arcologies[_i].FSStatuesqueGlorification
+	<br><<textbox "$arcologies[_i].FSStatuesqueGlorification" $arcologies[_i].FSStatuesqueGlorification>>
+
+	<br>
+
 	'' $arcologies[_i].name Slimness Enthusiast (unset or 1-100):'' $arcologies[_i].FSSlimnessEnthusiast
 	<br><<textbox "$arcologies[_i].FSSlimnessEnthusiast" $arcologies[_i].FSSlimnessEnthusiast>>
 
diff --git a/src/js/generateMarketSlave.js b/src/js/generateMarketSlave.js
index fbc3583c05bd3a65bb12eaea9d70b03b69287f5d..c21587c9800a9fdbe96e54593302bb0d64ba448f 100644
--- a/src/js/generateMarketSlave.js
+++ b/src/js/generateMarketSlave.js
@@ -643,6 +643,44 @@ window.generateMarketSlave = function(market = "kidnappers", numArcology = 1) {
 					}
 				}
 			}
+			if (V.arcologies[market].FSIntellectualDependency > 20) {
+				r += `The only thing that rivals their idiocy is their uncontrollable libido. `;
+				V.activeSlave.slaveName = setup.bimboSlaveNames.random();
+				if (V.activeSlave.intelligence > -50) {
+					V.activeSlave.intelligence = Intelligence.random({limitIntelligence: [-100, -50]});
+				}
+				V.intelligenceImplant = 0;
+				if (V.activeSlave.energy < 80) {
+					V.activeSlave.energy = jsRandom(80, 100);
+				}
+			} else if (V.arcologies[market].FSSlaveProfessionalism > 20) {
+				r += `They possess brilliant minds and expert training; a slave that truly knows their role in life. `;
+				if (V.activeSlave.intelligence <= 50) {
+					V.activeSlave.intelligence = Intelligence.random({limitIntelligence: [51, 100]});
+				}
+				V.intelligenceImplant = 30;
+				if (V.activeSlave.energy > 40) {
+					V.activeSlave.energy -= 30;
+				}
+				if (V.activeSlave.vagina > 0) {
+					V.activeSlave.skill.vaginal += Math.clamp(V.arcologies[market].prosperity/2, 20, 100);
+					V.activeSlave.skill.vaginal = Math.clamp(V.activeSlave.skill.vaginal, 50, 100);
+				}
+				if (V.activeSlave.anus > 0) {
+					V.activeSlave.skill.anal += Math.clamp(V.arcologies[market].prosperity/2, 20, 100);
+					V.activeSlave.skill.anal = Math.clamp(V.activeSlave.skill.anal, 50, 100);
+				}
+				V.activeSlave.skill.oral += Math.clamp(V.arcologies[market].prosperity/2, 20, 100);
+				V.activeSlave.skill.oral = Math.clamp(V.activeSlave.skill.oral, 50, 100);
+				V.activeSlave.skill.entertainment += Math.clamp(V.arcologies[market].prosperity/2, 20, 100);
+				V.activeSlave.skill.entertainment = Math.clamp(V.activeSlave.skill.entertainment, 50, 100);
+				V.activeSlave.skill.whoring += Math.clamp(V.arcologies[market].prosperity/2, 20, 100);
+				V.activeSlave.skill.whoring = Math.clamp(V.activeSlave.skill.whoring, 50, 100);
+				V.activeSlave.sexualFlaw = "none";
+				V.activeSlave.behavioralFlaw = "none";
+				V.activeSlave.fetishKnown = 1;
+				V.activeSlave.attrKnown = 1;
+			}
 			if (V.arcologies[market].FSBodyPurist > 80) {
 				r += `They're quite pristine, free of any genomic damage or addictions regardless of any transformations they've had. `;
 				V.activeSlave.chem = 0;
@@ -708,6 +746,31 @@ window.generateMarketSlave = function(market = "kidnappers", numArcology = 1) {
 					}
 				}
 			}
+			if (V.arcologies[market].FSPetiteAdmiration > 20) {
+				r += `They tend to be short, some far more than others. `;
+				if (V.activeSlave.height >= 160) {
+					V.activeSlave.height = Math.trunc(Height.random(V.activeSlave, {limitMult: [-2, 0]}));
+					if (V.activeSlave.height >= 160) {
+						V.activeSlave.height = Math.trunc(Height.random(V.activeSlave, {limitMult: [-3, -1]}));
+						if (V.activeSlave.height >= 160) {
+							V.activeSlave.height = jsRandom(90, 130);
+							V.activeSlave.geneticQuirks.dwarfism = 2;
+						}
+					}
+				}
+			} else if (V.arcologies[market].FSStatuesqueGlorification > 20) {
+				r += `They tend to be tall, if not unbelievably so. `;
+				if (V.activeSlave.height < 170) {
+					V.activeSlave.height = Math.trunc(Height.random(V.activeSlave, {limitMult: [0, 2]}));
+					if (V.activeSlave.height < 170) {
+						V.activeSlave.height = Math.trunc(Height.random(V.activeSlave, {limitMult: [1, 3]}));
+						if (V.activeSlave.height < 170) {
+							V.activeSlave.height = jsRandom(200, 264);
+							V.activeSlave.geneticQuirks.gigantism = 2;
+						}
+					}
+				}
+			}
 			if (V.arcologies[market].FSSlimnessEnthusiast > 20) {
 				r += `They're never overweight, and are often quite lithe. `;
 				if (V.activeSlave.boobs > 400) {
@@ -886,9 +949,11 @@ window.generateMarketSlave = function(market = "kidnappers", numArcology = 1) {
 				}
 			} else if (V.arcologies[market].FSChineseRevivalist > 20) {
 				r += `They've all passed through a thorough and uncompromising educational system for slaves. `;
-				V.activeSlave.intelligenceImplant = 10;
-				if (V.activeSlave.intelligence < 60) {
-					V.activeSlave.intelligence += jsRandom(0, 20);
+				V.activeSlave.intelligenceImplant = 30;
+				if (V.arcologies[market].FSIntellectualDependency === "unset") {
+					if (V.activeSlave.intelligence < 60) {
+						V.activeSlave.intelligence += jsRandom(0, 20);
+					}
 				}
 			}
 			if (V.arcologies[market].FSIncestFetishist > 20) {
diff --git a/src/uncategorized/neighborsFSAdoption.tw b/src/uncategorized/neighborsFSAdoption.tw
index 5e61044ea156e7435a1f08af731dc0d816ae316d..32fa30d14bec940129008ecf8f5d22033b4f4b6a 100644
--- a/src/uncategorized/neighborsFSAdoption.tw
+++ b/src/uncategorized/neighborsFSAdoption.tw
@@ -65,6 +65,14 @@ societal development.
 		<<if $arcologies[$i].FSDegradationist != "unset">><<set $arcologies[$i].FSDegradationist = "unset">><</if>>
 		$desc devoted to their slaves' advancement, leading the arcology to @@.yellow;adopt Paternalism.@@
 		<<set $arcologies[$i].FSPaternalist = 5>><<set _adopted = 1>>
+	<<case "Intellectual Dependency">>
+		<<if $arcologies[$i].FSIntellectualDependency != "unset">><<set $arcologies[$i].FSIntellectualDependency = "unset">><</if>>
+		$desc obsessed with crafting the perfect slave, leading the arcology to @@.yellow;adopt Slave Professionalism.@@
+		<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<set _adopted = 1>>
+	<<case "Slave Professionalism">>
+		<<if $arcologies[$i].FSSlaveProfessionalism != "unset">><<set $arcologies[$i].FSSlaveProfessionalism = "unset">><</if>>
+		$desc worried that they may one day be outsmarted by their chattel, leading the arcology to @@.yellow;adopt Intellectual Dependency.@@
+		<<set $arcologies[$i].FSIntellectualDependency = 5>><<set _adopted = 1>>
 	<<case "Body Purism">>
 		<<if $arcologies[$i].FSBodyPurist != "unset">><<set $arcologies[$i].FSBodyPurist = "unset">><</if>>
 		$desc fascinated with extreme surgery, leading the arcology to @@.yellow;adopt Transformation Fetishism.@@
@@ -81,6 +89,14 @@ societal development.
 		<<if $arcologies[$i].FSMaturityPreferentialist != "unset">><<set $arcologies[$i].FSMaturityPreferentialist = "unset">><</if>>
 		$desc devoted to fucking nubile young slaves, leading the arcology to @@.yellow;adopt Youth Preferentialism.@@
 		<<set $arcologies[$i].FSYouthPreferentialist = 5>><<set _adopted = 1>>
+	<<case "Petite Admiration">>
+		<<if $arcologies[$i].FSPetiteAdmiration != "unset">><<set $arcologies[$i].FSPetiteAdmiration = "unset">><</if>>
+		$desc convinced that tall equals beauty, leading the arcology to @@.yellow;adopt Statuesque Glorification.@@
+		<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<set _adopted = 1>>
+	<<case "Statuesque Glorification">>
+		<<if $arcologies[$i].FSStatuesqueGlorification != "unset">><<set $arcologies[$i].FSStatuesqueGlorification = "unset">><</if>>
+		$desc enamored by those shorter than them, leading the arcology to @@.yellow;adopt Petite Admiration.@@
+		<<set $arcologies[$i].FSPetiteAdmiration = 5>><<set _adopted = 1>>
 	<<case "Slimness Enthusiasm">>
 		<<if $arcologies[$i].FSSlimnessEnthusiast != "unset">><<set $arcologies[$i].FSSlimnessEnthusiast = "unset">><</if>>
 		$desc loves boobs, the bigger, the better, leading the arcology to @@.yellow;adopt Asset Expansionism.@@
@@ -221,6 +237,17 @@ societal development.
 			<<set $arcologies[$i].FSPaternalist = 5>><<set _adopted = 1>>
 		<</if>>
 	<</if>>
+	<<if $arcologies[0].FSIntellectualDependency > random(5,60)>>
+		<<if ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+			$desc obsessed with crafting the perfect slave, leading the arcology to @@.yellow;adopt Slave Professionalism.@@
+			<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<set _adopted = 1>>
+		<</if>>
+	<<elseif $arcologies[0].FSSlaveProfessionalism > random(5,60)>>
+		<<if ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+			$desc worried that they may one day be outsmarted by their chattel, leading the arcology to @@.yellow;adopt Intellectual Dependency.@@
+			<<set $arcologies[$i].FSIntellectualDependency = 5>><<set _adopted = 1>>
+		<</if>>
+	<</if>>
 	<<if $arcologies[0].FSBodyPurist > random(5,60)>>
 		<<if ($arcologies[$i].FSBodyPurist == "unset") && ($arcologies[$i].FSTransformationFetishist == "unset")>>
 			$desc fascinated with extreme surgery, leading the arcology to @@.yellow;adopt Transformation Fetishism.@@
@@ -243,6 +270,17 @@ societal development.
 			<<set $arcologies[$i].FSYouthPreferentialist = 5>><<set _adopted = 1>>
 		<</if>>
 	<</if>>
+	<<if $arcologies[0].FSPetiteAdmiration > random(5,60)>>
+		<<if ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+			$desc convinced that tall equals beauty, leading the arcology to @@.yellow;adopt Statuesque Glorification.@@
+			<<set $arcologies[$i].FSStatuesqueGlorification = 5>><<set _adopted = 1>>
+		<</if>>
+	<<elseif $arcologies[0].FSStatuesqueGlorification > random(5,60)>>
+		<<if ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+			$desc enamored by those shorter than them, leading the arcology to @@.yellow;adopt Petite Admiration.@@
+			<<set $arcologies[$i].FSPetiteAdmiration = 5>><<set _adopted = 1>>
+		<</if>>
+	<</if>>
 	<<if $arcologies[0].FSSlimnessEnthusiast > random(5,60)>>
 		<<if ($arcologies[$i].FSSlimnessEnthusiast == "unset") && ($arcologies[$i].FSAssetExpansionist == "unset")>>
 			$desc loves boobs, the bigger, the better, leading the arcology to @@.yellow;adopt Asset Expansionism.@@
@@ -353,6 +391,21 @@ societal development.
 		<</if>>
 	<</if>>
 <</if>>
+<<if ($arcologies[$i].FSIntellectualDependency == "unset")>>
+	<<if ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+		<<if ($leaders[$j].intelligence+$leaders[$j].intelligenceImplant >= 120) && ($leaders[$j].skill.vagina+$leaders[$j].skill.oral+$leaders[$j].skill.anal+$leaders[$j].skill.whoring+$leaders[$j].skill.entertainment >= 400)>>
+			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Slave Professionalism,@@ since $he wishes to produce slaves you can be proud of.
+			<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<break>>
+		<<elseif ($leaders[$j].intelligence+$leaders[$j].intelligenceImplant >= 120) && ($leaders[$j].behavioralFlaw == "arrogant" || $leaders[$j].behavioralQuirk == "insecure")>>
+			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Intellectual Dependency,@@ <<if $leaders[$j].behavioralQuirk == "insecure">>
+				since, due to $his own insecurities, needs to be frequently reassured that $he is smarter than the masses.
+			<<else>>
+				since $he absolutely needs to feel intellectually superior to $his chattel.
+			<</if>>
+			<<set $arcologies[$i].FSIntellectualDependency = 5>><<break>>
+		<</if>>
+	<</if>>
+<</if>>
 <<if ($arcologies[$i].FSBodyPurist == "unset")>>
 	<<if ($arcologies[$i].FSTransformationFetishist == "unset")>>
 		<<if $leaders[$j].chem > 50>>
@@ -383,6 +436,9 @@ societal development.
 		<<elseif $leaders[$j].fetish == "boobs">>
 			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Asset Expansionism,@@ since $he's a breast expansion fetishist in addition to being a mere breast fetishist.
 			<<set $arcologies[$i].FSAssetExpansionist = 5>><<break>>
+		<<elseif $leaders[$j].sexualQuirk == "size queen" && $leaders[$j].vagina > 3>>
+			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Asset Expansionism,@@ since $he's a stickler for big dicks and seeks to find one large enough to push $him to $his very limit.
+			<<set $arcologies[$i].FSAssetExpansionist = 5>><<break>>
 		<</if>>
 	<</if>>
 <</if>>
@@ -411,6 +467,17 @@ societal development.
 		<</if>>
 	<</if>>
 <</if>>
+<<if ($arcologies[$i].FSPetiteAdmiration == "unset")>>
+	<<if ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+		<<if $leaders[$j].height >= 200>>
+			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Statuesque Glorification,@@ since $he is tired of being one of the tallest in arcology.
+			<<set $arcologies[$i].FSStatuesqueGlorification = 5>><<break>>
+		<<elseif $leaders[$j].height >= 170 && $leaders[$j].fetish == "dom">>
+			Your agent @@.pink;$leaders[$j].slaveName@@ successfully pushes it to @@.yellow;adopt Petite Admiration,@@ since it is far easier to dominate someone much smaller than oneself.
+			<<set $arcologies[$i].FSPetiteAdmiration = 5>><<break>>
+		<</if>>
+	<</if>>
+<</if>>
 <<if ($arcologies[$i].FSIncestFetishist == "unset")>>
 	<<if $familyTesting == 1>>
 		<<set _lover = $slaves.find(function(s) { return s.ID == $leaders[$j].relationshipTarget && areRelated(s, $leaders[$j]) && s.assignment == "live with your agent"; })>>
@@ -547,11 +614,17 @@ societal development.
 	<<elseif ($arcologies[$i].FSGenderFundamentalist == "unset") && ($arcologies[$i].FSGenderRadicalist == "unset")>>
 		The arcology's Repopulationist culture @@.yellow;pushes it towards Gender Fundamentalism,@@ since traditional women make better mothers.
 		<<set $arcologies[$i].FSGenderFundamentalist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+		The arcology's Repopulationist culture @@.yellow;pushes it towards Petite Admiration,@@ since shorter women tend to have an easier time with childbirth.
+		<<set $arcologies[$i].FSPetiteAdmiration = 5>><<break>>
 	<</if>>
 <<elseif $arcologies[$i].FSRestart > random(50,200)>>
 	<<if ($arcologies[$i].FSDegradationist == "unset") && ($arcologies[$i].FSPaternalist == "unset")>>
 		The arcology's elite focused culture @@.yellow;pushes it towards Degradationism,@@ since its lowest class deserves nothing but misery.
 		<<set $arcologies[$i].FSDegradationist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSSlaveProfessionalism == "unset") && ($arcologies[$i].FSIntellectualDependency == "unset")>>
+		The arcology's elite focused culture @@.yellow;pushes it towards Slave Professionalism,@@ since the highest class deserve nothing less than the best slaves.
+		<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<break>>
 	<<elseif ($arcologies[$i].FSHedonisticDecadence == "unset") && ($arcologies[$i].FSPhysicalIdealist == "unset")>>
 		The arcology's wide range of imports @@.yellow;pushes it towards Decadent Hedonism,@@ since it has access to so many undiscovered pleasures.
 		<<set $arcologies[$i].FSHedonisticDecadence = 5>><<break>>
@@ -572,6 +645,9 @@ societal development.
 	<<if ($arcologies[$i].FSPastoralist == "unset") && ($arcologies[$i].FSCummunism == "unset")>>
 		The arcology's Gender Fundamentalist culture @@.yellow;pushes it towards Pastoralism,@@ since its pregnant slaves are already giving milk.
 		<<set $arcologies[$i].FSPastoralist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+		The arcology's Gender Fundamentalist culture @@.yellow;pushes it towards Intellectual Dependency,@@ since women don't need to think to serve men.
+		<<set $arcologies[$i].FSYouthPreferentialist = 5>><<break>>
 	<<elseif ($arcologies[$i].FSYouthPreferentialist == "unset") && ($arcologies[$i].FSMaturityPreferentialist == "unset")>>
 		The arcology's Gender Fundamentalist culture @@.yellow;pushes it towards Youth Preferentialism,@@ since younger slaves are beautiful and fertile.
 		<<set $arcologies[$i].FSYouthPreferentialist = 5>><<break>>
@@ -597,6 +673,32 @@ societal development.
 		<<set $arcologies[$i].FSGenderRadicalist = 5>><<break>>
 	<</if>>
 <</if>>
+<<if $arcologies[$i].FSIntellectualDependency > random(50,200)>>
+	<<if ($arcologies[$i].FSTransformationFetishist == "unset") && ($arcologies[$i].FSBodyPurist == "unset")>>
+		The arcology's Intellectual Dependency culture @@.yellow;pushes it towards Transformation Fetishism,@@ to give its bimbos a body most fitting.
+		<<set $arcologies[$i].FSTransformationFetishist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSYouthPreferentialist == "unset") && ($arcologies[$i].FSMaturityPreferentialist == "unset")>>
+		The arcology's Intellectual Dependency culture @@.yellow;pushes it towards Youth Preferentialism,@@ since the young have more energy to party.
+		<<set $arcologies[$i].FSYouthPreferentialist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSHedonisticDecadence == "unset") && ($arcologies[$i].FSPhysicalIdealist == "unset")>>
+		The arcology's Intellectual Dependency culture @@.yellow;pushes it towards Decadent Hedonism,@@ since base instinct already rules slaves' lives.
+		<<set $arcologies[$i].FSHedonisticDecadence = 5>><<break>>
+	<<elseif ($arcologies[$i].FSRepopulationFocus == "unset") && ($arcologies[$i].FSRestart == "unset")>>
+		The arcology's Intellectual Dependency culture @@.yellow;pushes it towards Repopulationism,@@ since there has been an epidemic of unplanned pregnancies among the slave population.
+		<<set $arcologies[$i].FSRepopulationFocus = 5>><<break>>
+	<</if>>
+<<elseif $arcologies[$i].FSSlaveProfessionalism > random(50,200)>>
+	<<if ($arcologies[$i].FSMaturityPreferentialist == "unset") && ($arcologies[$i].FSYouthPreferentialist == "unset")>>
+		The arcology's Slave Professionalism culture @@.yellow;pushes it towards Maturity Preferentialist,@@ since with age comes experience.
+		<<set $arcologies[$i].FSMaturityPreferentialist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSPaternalist == "unset") && ($arcologies[$i].FSDegradationist == "unset")>>
+		The arcology's Slave Professionalism culture @@.yellow;pushes it towards Paternalism,@@ since happy slaves are much more willing to be molded in to shape.
+		<<set $arcologies[$i].FSPaternalist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSChattelReligionist == "unset")>>
+		The arcology's Slave Professionalism culture @@.yellow;pushes it towards Chattel Religionism,@@ since skilled service is already a part of a slave's daily life.
+		<<set $arcologies[$i].FSChattelReligionist = 5>><<break>>
+	<</if>>
+<</if>>
 <<if $arcologies[$i].FSBodyPurist > random(50,200)>>
 	<<if ($arcologies[$i].FSPhysicalIdealist == "unset") && ($arcologies[$i].FSHedonisticDecadence == "unset")>>
 		The arcology's Body Purist culture @@.yellow;pushes it towards Physical Idealism,@@ since it already takes an intense interest in bodily perfection.
@@ -616,11 +718,11 @@ societal development.
 <</if>>
 <<if $arcologies[$i].FSYouthPreferentialist > random(50,200)>>
 	<<if ($arcologies[$i].FSSlimnessEnthusiast == "unset") && ($arcologies[$i].FSAssetExpansionist == "unset")>>
-	The arcology's Youth Preferentialist culture @@.yellow;pushes it towards Slimness Enthusiasm,@@ since that's the kind of body many of its slaves have.
-	<<set $arcologies[$i].FSSlimnessEnthusiast = 5>><<break>>
+		The arcology's Youth Preferentialist culture @@.yellow;pushes it towards Slimness Enthusiasm,@@ since that's the kind of body many of its slaves have.
+		<<set $arcologies[$i].FSSlimnessEnthusiast = 5>><<break>>
 	<<elseif ($arcologies[$i].FSRepopulationFocus == "unset") && ($arcologies[$i].FSRestart == "unset")>>
-	The arcology's Youth Preferentialist culture @@.yellow;pushes it towards Repopulationism,@@ since many of its slaves are deliciously ripe for breeding.
-	<<set $arcologies[$i].FSRepopulationFocus = 5>><<break>>
+		The arcology's Youth Preferentialist culture @@.yellow;pushes it towards Repopulationism,@@ since many of its slaves are deliciously ripe for breeding.
+		<<set $arcologies[$i].FSRepopulationFocus = 5>><<break>>
 	<</if>>
 <<elseif $arcologies[$i].FSMaturityPreferentialist > random(50,200)>>
 	<<if ($arcologies[$i].FSAssetExpansionist == "unset") && ($arcologies[$i].FSSlimnessEnthusiast == "unset")>>
@@ -631,6 +733,26 @@ societal development.
 		<<set $arcologies[$i].FSPaternalist = 5>><<break>>
 	<</if>>
 <</if>>
+<<if $arcologies[$i].FSPetiteAdmiration > random(50,200)>>
+	<<if ($arcologies[$i].FSAssetExpansionist == "unset") && ($arcologies[$i].FSSlimnessEnthusiast == "unset")>>
+		The arcology's Petite Admiration culture @@.yellow;pushes it towards Asset Expansionist,@@ since a $girl with tits wider than $he is tall attracts quite some attention.
+		<<set $arcologies[$i].FSAssetExpansionist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSPaternalist == "unset") && ($arcologies[$i].FSDegradationist == "unset")>>
+		The arcology's Petite Admiration culture @@.yellow;pushes it towards Paternalism,@@ since such tiny <<= $girl>>s need extra special attention.
+		<<set $arcologies[$i].FSPaternalist = 5>><<break>>
+	<<elseif $arcologies[$i].FSIncestFetishist == "unset" && $seeIncest == 1>>
+		The arcology's Petite Admiration culture @@.yellow;pushes it towards Incest Fetishism,@@ since age play often goes hand-in-hand with size play.
+		<<set $arcologies[$i].FSIncestFetishist = 5>><<break>>
+	<</if>>
+<<elseif $arcologies[$i].FSStatuesqueGlorification > random(50,200)>>
+	<<if ($arcologies[$i].FSPhysicalIdealist == "unset") && ($arcologies[$i].FSHedonisticDecadence == "unset")>>
+		The arcology's Statuesque Glorification culture @@.yellow;pushes it towards Physical Idealism,@@ since being ripped complements being tall.
+		<<set $arcologies[$i].FSPhysicalIdealist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSPaternalist == "unset") && ($arcologies[$i].FSDegradationist == "unset")>>
+		The arcology's Statuesque Glorification culture @@.yellow;pushes it towards Degradationism,@@ since those that don't measure up deserve only suffering.
+		<<set $arcologies[$i].FSDegradationist = 5>><<break>>
+	<</if>>
+<</if>>
 <<if $arcologies[$i].FSSlimnessEnthusiast > random(50,200)>>
 	<<if ($arcologies[$i].FSYouthPreferentialist == "unset") && ($arcologies[$i].FSMaturityPreferentialist == "unset")>>
 		The arcology's Slimness Enthusiast culture @@.yellow;pushes it towards Youth Preferentialism,@@ since younger slaves are often attractively slim.
@@ -646,6 +768,9 @@ societal development.
 	<<elseif ($arcologies[$i].FSBodyPurist == "unset") && ($arcologies[$i].FSTransformationFetishist == "unset")>>
 		The arcology's Asset Expansionist culture @@.yellow;pushes it towards Body Purism,@@ since slaves on curatives are slaves not on growth hormones.
 		<<set $arcologies[$i].FSBodyPurist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+		The arcology's Asset Expansionist culture @@.yellow;pushes it towards Petite Admiration,@@ since the smaller a slave's body is, the bigger their breasts will look.
+		<<set $arcologies[$i].FSPetiteAdmiration = 5>><<break>>
 	<</if>>
 <</if>>
 <<if $arcologies[$i].FSPastoralist > random(50,200)>>
@@ -675,6 +800,9 @@ societal development.
 	<<if ($arcologies[$i].FSPastoralist == "unset") && ($arcologies[$i].FSCummunism == "unset")>>
 		The arcology's Hedonistic culture @@.yellow;pushes it towards Pastoralism,@@ since nothing beats a nice glass of fresh squeezed milk with your cake.
 		<<set $arcologies[$i].FSPastoralist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+		The arcology's Hedonistic culture @@.yellow;pushes it towards Intellectual Dependency,@@ since higher thought is unneeded when you have everything you want.
+		<<set $arcologies[$i].FSIntellectualDependency = 5>><<break>>
 	<<elseif ($arcologies[$i].FSPaternalist == "unset") && ($arcologies[$i].FSDegradationist == "unset")>>
 		The arcology's Hedonistic culture @@.yellow;pushes it towards Paternalism,@@ since happiness is infectious.
 		<<set $arcologies[$i].FSPaternalist = 5>><<break>>
@@ -686,6 +814,9 @@ societal development.
 	<<elseif ($arcologies[$i].FSYouthPreferentialist == "unset") && ($arcologies[$i].FSMaturityPreferentialist == "unset")>>
 		The arcology's Physical Idealist culture @@.yellow;pushes it towards Youth Preferentialism,@@ since beauty and athletic prowess do tend to peak early.
 		<<set $arcologies[$i].FSYouthPreferentialist = 5>><<break>>
+	<<elseif ($arcologies[$i].FSStatuesqueGlorification == "unset") && ($arcologies[$i].FSPetiteAdmiration == "unset")>>
+		The arcology's Physical Idealist culture @@.yellow;pushes it towards Statuesque Glorification,@@ to better emulate the titans of legend.
+		<<set $arcologies[$i].FSStatuesqueGlorification = 5>><<break>>
 	<<elseif ($arcologies[$i].FSCummunism == "unset") && ($arcologies[$i].FSPastoralist == "unset")>>
 		The arcology's Physical Idealist culture @@.yellow;pushes it towards Cummunism,@@ since muscular, testosterone filled slaves make admirable cumshots.
 		<<set $arcologies[$i].FSCummunism = 5>><<break>>
@@ -835,6 +966,18 @@ societal development.
 				<<break>>
 			<</if>>
 		<</if>>
+		<<if ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+			<<if $arcologies[$j].FSIntellectualDependency > random(0,200)+(_adopted*100)-$influenceBonus>>
+				It @@.yellow;adopts Intellectual Dependency@@ due to influence from its trading partner $arcologies[$j].name.
+				<<set $arcologies[$i].FSIntellectualDependency = 5>><<set _adopted = 1>>
+				<<break>>
+			<</if>>
+			<<if $arcologies[$j].FSSlaveProfessionalism > random(0,200)+(_adopted*100)-$influenceBonus>>
+				It @@.yellow;adopts Slave Professionalism@@ due to influence from its trading partner $arcologies[$j].name.
+				<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<set _adopted = 1>>
+				<<break>>
+			<</if>>
+		<</if>>
 		<<if ($arcologies[$i].FSBodyPurist == "unset") && ($arcologies[$i].FSTransformationFetishist == "unset")>>
 			<<if $arcologies[$j].FSBodyPurist > random(0,200)+(_adopted*100)-$influenceBonus>>
 				It @@.yellow;adopts Body Purism@@ due to influence from its trading partner $arcologies[$j].name.
@@ -859,6 +1002,18 @@ societal development.
 				<<break>>
 			<</if>>
 		<</if>>
+		<<if ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+			<<if $arcologies[$j].FSPetiteAdmiration > random(0,200)+(_adopted*100)-$influenceBonus>>
+				It @@.yellow;adopts Petite Admiration@@ due to influence from its trading partner $arcologies[$j].name.
+				<<set $arcologies[$i].FSPetiteAdmiration = 5>><<set _adopted = 1>>
+				<<break>>
+			<</if>>
+			<<if $arcologies[$j].FSStatuesqueGlorification > random(0,200)+(_adopted*100)-$influenceBonus>>
+				It @@.yellow;adopts Statuesque Glorification@@ due to influence from its trading partner $arcologies[$j].name.
+				<<set $arcologies[$i].FSStatuesqueGlorification = 5>><<set _adopted = 1>>
+				<<break>>
+			<</if>>
+		<</if>>
 		<<if ($arcologies[$i].FSSlimnessEnthusiast == "unset") && ($arcologies[$i].FSAssetExpansionist == "unset")>>
 			<<if $arcologies[$j].FSSlimnessEnthusiast > random(0,200)+(_adopted*100)-$influenceBonus>>
 				It @@.yellow;adopts Slimness Enthusiasm@@ due to influence from its trading partner $arcologies[$j].name.
@@ -957,7 +1112,7 @@ societal development.
 <<default>>
 	<<set $desc = "Its citizens are">>
 <</switch>>
-<<switch random(1,26)>>
+<<switch random(1,30)>>
 <<case 1>>
 	<<set _subjugationRace = setup.filterRacesLowercase.random()>>
 	<<if ($arcologies[$i].FSSubjugationist == "unset")>>
@@ -1018,12 +1173,12 @@ societal development.
 	<</if>>
 <<case 11>>
 	<<if ($arcologies[$i].FSSlimnessEnthusiast == "unset") && ($arcologies[$i].FSAssetExpansionist == "unset")>>
-		$desc loves a slim slave with tight holes, leading the arcology to @@.yellow;adopt Slimness Enthusiasm.@@
+		$desc partial to a slim slave with tight holes, leading the arcology to @@.yellow;adopt Slimness Enthusiasm.@@
 		<<set $arcologies[$i].FSSlimnessEnthusiast = 5>><<set _adopted = 1>>
 	<</if>>
 <<case 12>>
 	<<if ($arcologies[$i].FSSlimnessEnthusiast == "unset") && ($arcologies[$i].FSAssetExpansionist == "unset")>>
-		$desc loves boobs, the bigger, the better, leading the arcology to @@.yellow;adopt Asset Expansionism.@@
+		$desc enthusiastic about boobs, the bigger, the better, leading the arcology to @@.yellow;adopt Asset Expansionism.@@
 		<<set $arcologies[$i].FSAssetExpansionist = 5>><<set _adopted = 1>>
 	<</if>>
 <<case 13>>
@@ -1038,7 +1193,7 @@ societal development.
 	<</if>>
 <<case 15>>
 	<<if ($arcologies[$i].FSChattelReligionist == "unset")>>
-		$desc is devoutly religious, and interested in a reformation, leading the arcology to @@.yellow;adopt Chattel Religionism.@@
+		$desc devoutly religious, and interested in a reformation, leading the arcology to @@.yellow;adopt Chattel Religionism.@@
 		<<set $arcologies[$i].FSChattelReligionist = 5>><<set _adopted = 1>>
 	<</if>>
 <<case 16>>
@@ -1096,6 +1251,26 @@ societal development.
 		$desc obsessed with their relatives, leading the arcology to @@.yellow;adopt Incest Fetishism.@@
 		<<set $arcologies[$i].FSIncestFetishist = 5>><<set _adopted = 1>>
 	<</if>>
+<<case 27>>
+	<<if ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+		$desc partial to airheaded horny bimbos, leading the arcology to @@.yellow;adopt Intellectual Dependency.@@
+		<<set $arcologies[$i].FSIntellectualDependency = 5>><<set _adopted = 1>>
+	<</if>>
+<<case 28>>
+	<<if ($arcologies[$i].FSIntellectualDependency == "unset") && ($arcologies[$i].FSSlaveProfessionalism == "unset")>>
+		$desc obsessed with crafting the perfect slave, leading the arcology to @@.yellow;adopt Slave Professionalism.@@
+		<<set $arcologies[$i].FSSlaveProfessionalism = 5>><<set _adopted = 1>>
+	<</if>>
+<<case 29>>
+	<<if ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+		$desc enamored by those shorter than them, leading the arcology to @@.yellow;adopt Petite Admiration.@@
+		<<set $arcologies[$i].FSPetiteAdmiration = 5>><<set _adopted = 1>>
+	<</if>>
+<<case 30>>
+	<<if ($arcologies[$i].FSPetiteAdmiration == "unset") && ($arcologies[$i].FSStatuesqueGlorification == "unset")>>
+		$desc convinced that tall equals beauty, leading the arcology to @@.yellow;adopt Statuesque Glorification.@@
+		<<set $arcologies[$i].FSStatuesqueGlorification = 5>><<set _adopted = 1>>
+	<</if>>
 <</switch>>
 <</if>>
 <</if>>