diff --git a/devNotes/twine JS.txt b/devNotes/twine JS.txt
index c9db61bb60b9bb4613091b08660bf645b2c55c72..b912fd3013c9f187340f2c22e25ce86327016286 100644
--- a/devNotes/twine JS.txt	
+++ b/devNotes/twine JS.txt	
@@ -1000,6 +1000,87 @@ window.genUUID = function() {
 	return uuid;
 };
 
+window.removeFS = function(FS) {
+	const V = State.variables;
+	const arcology = V.arcologies[0];
+	let FSDecoration = FS + "Decoration";
+	let FSSMR = FS + "SMR";
+	let FSLaw = FS + "Law";
+	if (FS === "FSSupremacist" || FS === "FSSubjugationist") {
+		FSLaw += "ME";
+	}
+	switch (FS) {
+		case "FSGenderRadicalist":
+			arcology.FSGenderRadicalistLawBeauty = 0;
+			arcology.FSGenderRadicalistLawFuta = 0;
+			break;
+		case "FSGenderFundamentalist":
+			arcology.FSGenderFundamentalistLawBeauty = 0;
+			arcology.FSGenderFundamentalistLawBimbo = 0;
+			arcology.FSGenderFundamentalistSMR = 0;
+			break;
+		case "FSTransformationFetishist":
+		case "FSAssetExpansionist":
+			arcology[FSSMR] = 0;
+			break;
+		case "FSPhysicalIdealist":
+			arcology.FSPhysicalIdealistLaw = 0;
+			arcology.FSPhysicalIdealistSMR = 0;
+			arcology.FSPhysicalIdealistStrongFat = 0;
+		case "FSHedonisticDecadence":
+			arcology.FSHedonisticDecadenceLaw = 0;
+			arcology.FSHedonisticDecadenceLaw2 = 0;
+			arcology.FSHedonisticDecadenceSMR = 0;
+			arcology.FSHedonisticDecadenceStrongFat = 0;
+			break;
+		case "FSChattelReligionist":
+			arcology.FSChattelReligionistLaw = 0;
+			arcology.FSChattelReligionistSMR = 0;
+			arcology.FSChattelReligionistCreed = 0;
+			break;
+		case "FSNull":
+			break;
+		default: /* all others have one law and one SMR */
+			arcology[FSLaw] = 0;
+			arcology[FSSMR] = 0;
+			break;
+	}
+	if (FS !== "FSNull") {
+		arcology[FSDecoration] = 20;
+		if (FS === "FSRestart") {
+			V.propOutcome = 0;
+			V.failedElite = 0;
+		}
+	}
+	arcology[FS] = "unset";
+	resetFSCredits();
+};
+
+window.resetFSCredits = function() {
+	const V = State.variables;
+	let activeFS = 0;
+	for (let i = 0; i < setup.FutureSocieties.length; i++) {
+		if (V.arcologies[0][setup.FutureSocieties[i]] > 0) {
+			activeFS++;
+		}
+	}
+	console.log(activeFS);
+	if (V.arcologies[0].FSNull > 0) { /* possibly recalculate for multiculturalism */
+		activeFS--;
+		if (V.FSCreditCount === 4) {
+			activeFS += V.arcologies[0].FSNull/25;
+		} else if (V.FSCreditCount === 6) {
+			activeFS += V.arcologies[0].FSNull/17;
+		} else if (V.FSCreditCount === 7) {
+			activeFS += V.arcologies[0].FSNull/15;
+		} else {
+			activeFS += V.arcologies[0].FSNull/20;
+		}
+	}
+	console.log(activeFS);
+	V.FSCredits = Math.max(Math.trunc(V.FSGotRepCredits - activeFS), 0);
+};
+
 /*:: itemAvailability [script]*/
 
 /* intended to condense the clothing/toy/etc availability checks into something less asinine */
diff --git a/src/cheats/mod_EditFSCheat.tw b/src/cheats/mod_EditFSCheat.tw
index d37eb895bf33bf6baab40bf0692e6b4965c39355..05dbbcc75dbead54d6695ab295a71ffaf0cef1c4 100644
--- a/src/cheats/mod_EditFSCheat.tw
+++ b/src/cheats/mod_EditFSCheat.tw
@@ -35,7 +35,7 @@
 	<<radiobutton "$arcologies[0].FSSupremacistRace" "semitic">> Semitic |
 	<<radiobutton "$arcologies[0].FSSupremacistRace" "mixed race">> Mixed Race
 
-	<br>[[Apply and reset Racial Subjugationism|MOD_Edit FS Cheat][$arcologies[0].FSSubjugationist = "unset", $arcologies[0].FSSubjugationistRace = 0, $arcologies[0].FSSubjugationistDecoration = 20, $arcologies[0].FSSubjugationistLawME = 0]]
+	<br>[[Apply and reset Racial Subjugationism|MOD_Edit FS Cheat][removeFS("FSSubjugationist")]]
 
 <br><br>
 
@@ -71,7 +71,7 @@
 	<<radiobutton "$arcologies[0].FSSubjugationistRace" "semitic">> Semitic |
 	<<radiobutton "$arcologies[0].FSSubjugationistRace" "mixed race">> Mixed Race
 
-	<br>[[Apply and reset Racial Supremacy|MOD_Edit FS Cheat][$arcologies[0].FSSupremacist = "unset",$arcologies[0].FSSupremacistRace = 0, $arcologies[0].FSSupremacistDecoration = 20, $arcologies[0].FSSupremacistLawME = 0]]
+	<br>[[Apply and reset Racial Supremacy|MOD_Edit FS Cheat][removeFS("FSSupremacist")]]
 
 <br><br>
 
@@ -101,7 +101,7 @@
 	| <<radiobutton "$arcologies[0].FSGenderRadicalistLawFuta" 3>> 3 (Big butts and skilled buttholes pref.)
 	| <<radiobutton "$arcologies[0].FSGenderRadicalistLawFuta" 4>> 4 (Trap pref.)
 
-	<br>[[Apply and reset Gender Traditionalism|MOD_Edit FS Cheat][$arcologies[0].FSGenderFundamentalist = "unset",$arcologies[0].FSGenderFundamentalistDecoration = 20,$arcologies[0].FSGenderFundamentalistLaw = 0]]
+	<br>[[Apply and reset Gender Traditionalism|MOD_Edit FS Cheat][removeFS("FSGenderFundamentalist")]]
 
 <br><br>
 
@@ -124,7 +124,7 @@
 	<<radiobutton "$arcologies[0].FSGenderFundamentalistSMR" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSGenderFundamentalistSMR" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Gender Radicalism|MOD_Edit FS Cheat][$arcologies[0].FSGenderRadicalist = "unset",$arcologies[0].FSGenderRadicalistDecoration = 20,$arcologies[0].FSGenderRadicalistLawBeauty = 0, $arcologies[0].FSGenderRadicalistLawFuta = 0]]
+	<br>[[Apply and reset Gender Radicalism|MOD_Edit FS Cheat][removeFS("FSGenderRadicalist")]]
 
 <<if $seePreg != 0>>
 <br><br>
@@ -152,7 +152,7 @@
 	<<radiobutton "$arcologies[0].FSRepopulationFocusLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSRepopulationFocusLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Eugenics|MOD_Edit FS Cheat][$arcologies[0].FSRestart = "unset",$arcologies[0].FSRestartDecoration = 20,$arcologies[0].FSRestartLaw = 0, $arcologies[0].FSRestartSMR = 0]]
+	<br>[[Apply and reset Eugenics|MOD_Edit FS Cheat][removeFS("FSRestart")]]
 
 <br><br>
 
@@ -175,7 +175,7 @@
 	<<radiobutton "$arcologies[0].FSRestartSMR" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSRestartSMR" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Repopulation Efforts|MOD_Edit FS Cheat][$arcologies[0].FSRepopulationFocus = "unset",$arcologies[0].FSRepopulationFocusDecoration = 20,$arcologies[0].FSRepopulationFocusLaw = 0, $arcologies[0].FSRepopulationFocusSMR = 0]]
+	<br>[[Apply and reset Repopulation Efforts|MOD_Edit FS Cheat][removeFS("FSRepopulationFocus")]]
 <</if>>
 	
 <br><br>
@@ -199,7 +199,7 @@
 	<<radiobutton "$arcologies[0].FSPaternalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSPaternalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Degradationism|MOD_Edit FS Cheat][$arcologies[0].FSDegradationist = "unset",$arcologies[0].FSDegradationistDecoration = 20,$arcologies[0].FSDegradationistLaw = 0]]
+	<br>[[Apply and reset Degradationism|MOD_Edit FS Cheat][removeFS("FSDegradationist")]]
 
 <br><br>
 
@@ -222,7 +222,7 @@
 	<<radiobutton "$arcologies[0].FSDegradationistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSDegradationistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Paternalism|MOD_Edit FS Cheat][$arcologies[0].FSPaternalist = "unset",$arcologies[0].FSPaternalistDecoration = 20,$arcologies[0].FSPaternalistLaw = 0]]
+	<br>[[Apply and reset Paternalism|MOD_Edit FS Cheat][removeFS("FSPaternalist")]]
 
 <br><br>
 
@@ -245,7 +245,7 @@
 	<<radiobutton "$arcologies[0].FSBodyPuristLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSBodyPuristLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Body Transformationism|MOD_Edit FS Cheat][$arcologies[0].FSTransformationFetishist = "unset",$arcologies[0].FSTransformationFetishistDecoration = 20,$arcologies[0].FSTransformationFetishistLaw = 0]]
+	<br>[[Apply and reset Body Transformationism|MOD_Edit FS Cheat][removeFS("FSTransformationFetishist")]]
 
 <br><br>
 
@@ -268,7 +268,7 @@
 	<<radiobutton "$arcologies[0].FSTransformationFetishistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSTransformationFetishistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Body Purism|MOD_Edit FS Cheat][$arcologies[0].FSBodyPurist = "unset",$arcologies[0].FSBodyPuristDecoration = 20,$arcologies[0].FSBodyPuristLaw = 0]]
+	<br>[[Apply and reset Body Purism|MOD_Edit FS Cheat][removeFS("FSBodyPurist")]]
 
 <br><br>
 
@@ -292,7 +292,7 @@
 	<<radiobutton "$arcologies[0].FSYouthPreferentialistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSYouthPreferentialistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Maturity Preferentialism|MOD_Edit FS Cheat][$arcologies[0].FSMaturityPreferentialist = "unset",$arcologies[0].FSMaturityPreferentialistDecoration = 20,$arcologies[0].FSMaturityPreferentialistLaw = 0]]
+	<br>[[Apply and reset Maturity Preferentialism|MOD_Edit FS Cheat][removeFS("FSMaturityPreferentialist")]]
 
 <br><br>
 
@@ -316,7 +316,7 @@
 	<<radiobutton "$arcologies[0].FSMaturityPreferentialistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSMaturityPreferentialistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Youth Preferentialism|MOD_Edit FS Cheat][$arcologies[0].FSYouthPreferentialist = "unset",$arcologies[0].FSYouthPreferentialistDecoration = 20,$arcologies[0].FSYouthPreferentialistLaw = 0]]
+	<br>[[Apply and reset Youth Preferentialism|MOD_Edit FS Cheat][removeFS("FSYouthPreferentialist")]]
 
 <br><br>
 
@@ -339,7 +339,7 @@
 	<<radiobutton "$arcologies[0].FSSlimnessEnthusiastSMR" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSSlimnessEnthusiastSMR" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Asset Expansionism|MOD_Edit FS Cheat][$arcologies[0].FSAssetExpansionist = "unset",$arcologies[0].FSAssetExpansionistDecoration = 20,$arcologies[0].FSAssetExpansionistLaw = 0]]
+	<br>[[Apply and reset Asset Expansionism|MOD_Edit FS Cheat][removeFS("FSAssetExpansionist")]]
 
 <br><br>
 
@@ -363,7 +363,7 @@
 	<<radiobutton "$arcologies[0].FSAssetExpansionistSMR" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSAssetExpansionistSMR" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Slimness Enthusiasm|MOD_Edit FS Cheat][$arcologies[0].FSSlimnessEnthusiast = "unset",$arcologies[0].FSSlimnessEnthusiastDecoration = 20,$arcologies[0].FSSlimnessEnthusiastLaw = 0]]
+	<br>[[Apply and reset Slimness Enthusiasm|MOD_Edit FS Cheat][removeFS("FSSlimnessEnthusiast")]]
 
 <br><br>
 
@@ -409,7 +409,7 @@
 	<<radiobutton "$arcologies[0].FSPhysicalIdealistSMR" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSPhysicalIdealistSMR" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Hedonistic Decadence|MOD_Edit FS Cheat][$arcologies[0].FSHedonisticDecadence = "unset",$arcologies[0].FSHedonisticDecadenceDecoration = 20,$arcologies[0].FSHedonisticDecadenceLaw = 0,$arcologies[0].FSHedonisticDecadenceLaw2 = 0, $arcologies[0].FSHedonisticDecadenceSMR = 0, $arcologies[0].FSPhysicalIdealistStrongFat = 0]]
+	<br>[[Apply and reset Hedonistic Decadence|MOD_Edit FS Cheat][removeFS("FSHedonisticDecadence")]]
 
 <br><br>
 
@@ -440,7 +440,7 @@
 	<<radiobutton "$arcologies[0].FSHedonisticDecadenceLaw2" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSHedonisticDecadenceLaw2" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset Physical Idealist|MOD_Edit FS Cheat][$arcologies[0].FSPhysicalIdealist = "unset",$arcologies[0].FSPhysicalIdealistDecoration = 20,$arcologies[0].FSPhysicalIdealistLaw = 0, $arcologies[0].FSPhysicalIdealistSMR = 0, $arcologies[0].FSHedonisticDecadenceStrongFat = 0]]
+	<br>[[Apply and reset Physical Idealist|MOD_Edit FS Cheat][removeFS("FSPhysicalIdealist")]]
 
 <br><br>
 
@@ -486,30 +486,30 @@
 	<<radiobutton "$arcologies[0].FSRomanRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSRomanRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalist = "unset",$arcologies[0].FSEgyptianRevivalistDecoration = 20,$arcologies[0].FSEgyptianRevivalistLaw = 0,$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSAztecRevivalist"), removeFS("FSEgyptianRevivalist"), removeFS("FSEdoRevivalist"), removeFS("FSArabianRevivalist"), removeFS("FSChineseRevivalist")]]
 
 <br><br>
 
-		<<if $arcologies[0].FSAztecRevivalist != "unset">>
-			<br>You are ''pursuing'' Aztec Revivalism.
-		<<else>>
-			<br>You are ''not pursuing'' Aztec Revivalism.
-		<</if>>
-	
-		<br>Aztec Revivalism (0-100 or unset): <<textbox "$arcologies[0].FSAztecRevivalist" $arcologies[0].FSAztecRevivalist>>
-		<br>Decoration: $arcologies[0].FSAztecRevivalistDecoration
-	
-		<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 20>> 20 (Minimum)
-		<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 40>> 40 (Media support.)
-		<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 60>> 60 (Decorated public spaces.)
-		<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 80>> 80 (Slaves stationed in public spaces.)
-		<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 100>> 100 (Remodeled exterior; Fully customized.)
+	<<if $arcologies[0].FSAztecRevivalist != "unset">>
+		<br>You are ''pursuing'' Aztec Revivalism.
+	<<else>>
+		<br>You are ''not pursuing'' Aztec Revivalism.
+	<</if>>
+
+	<br>Aztec Revivalism (0-100 or unset): <<textbox "$arcologies[0].FSAztecRevivalist" $arcologies[0].FSAztecRevivalist>>
+	<br>Decoration: $arcologies[0].FSAztecRevivalistDecoration
+
+	<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 20>> 20 (Minimum)
+	<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 40>> 40 (Media support.)
+	<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 60>> 60 (Decorated public spaces.)
+	<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 80>> 80 (Slaves stationed in public spaces.)
+	<br><<radiobutton "$arcologies[0].FSAztecRevivalistDecoration" 100>> 100 (Remodeled exterior; Fully customized.)
 
-		<br>Law: $arcologies[0].FSAztecRevivalistLaw |
-		<<radiobutton "$arcologies[0].FSAztecRevivalistLaw" 0>> 0 (Not passed.)
-		| <<radiobutton "$arcologies[0].FSAztecRevivalistLaw" 1>> 1 (Passed.)
+	<br>Law: $arcologies[0].FSAztecRevivalistLaw |
+	<<radiobutton "$arcologies[0].FSAztecRevivalistLaw" 0>> 0 (Not passed.)
+	| <<radiobutton "$arcologies[0].FSAztecRevivalistLaw" 1>> 1 (Passed.)
 
-		<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalist = "unset",$arcologies[0].FSEgyptianRevivalistDecoration = 20,$arcologies[0].FSEgyptianRevivalistLaw = 0,$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSRomanRevivalist"), removeFS("FSEgyptianRevivalist"), removeFS("FSEdoRevivalist"), removeFS("FSArabianRevivalist"), removeFS("FSChineseRevivalist")]]
 
 <br><br>
 
@@ -532,7 +532,7 @@
 	<<radiobutton "$arcologies[0].FSEgyptianRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSEgyptianRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalistIncestPolicy = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSRomanRevivalist"), removeFS("FSAztecRevivalist"), removeFS("FSEdoRevivalist"), removeFS("FSArabianRevivalist"), removeFS("FSChineseRevivalist")]]
 
 <br><br>
 
@@ -555,7 +555,7 @@
 	<<radiobutton "$arcologies[0].FSEdoRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSEdoRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalistDecoration = 20,$arcologies[0].FSEgyptianRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSRomanRevivalist"), removeFS("FSAztecRevivalist"), removeFS("FSEgyptianRevivalist"), removeFS("FSArabianRevivalist"), removeFS("FSChineseRevivalist")]]
 
 <br><br>
 
@@ -578,7 +578,7 @@
 	<<radiobutton "$arcologies[0].FSArabianRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSArabianRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalistDecoration = 20,$arcologies[0].FSEgyptianRevivalistLaw = 0,$arcologies[0].FSEdoRevivalist = "unset",$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSChineseRevivalist = "unset",$arcologies[0].FSChineseRevivalistDecoration = 20,$arcologies[0].FSChineseRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSRomanRevivalist"), removeFS("FSAztecRevivalist"), removeFS("FSEgyptianRevivalist"), removeFS("FSEdoRevivalist"), removeFS("FSChineseRevivalist")]]
 
 <br><br>
 
@@ -601,4 +601,4 @@
 	<<radiobutton "$arcologies[0].FSChineseRevivalistLaw" 0>> 0 (Not passed.)
 	| <<radiobutton "$arcologies[0].FSChineseRevivalistLaw" 1>> 1 (Passed.)
 
-	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][$arcologies[0].FSRomanRevivalist = "unset",$arcologies[0].FSRomanRevivalistDecoration = 20,$arcologies[0].FSRomanRevivalistLaw = 0,$arcologies[0].FSAztecRevivalist = "unset",$arcologies[0].FSAztecRevivalistDecoration = 20,$arcologies[0].FSAztecRevivalistLaw = 0,$arcologies[0].FSEgyptianRevivalistDecoration = 20,$arcologies[0].FSEgyptianRevivalistLaw = 0,$arcologies[0].FSEdoRevivalist = "unset",$arcologies[0].FSEdoRevivalistDecoration = 20,$arcologies[0].FSEdoRevivalistLaw = 0,$arcologies[0].FSArabianRevivalist = "unset",$arcologies[0].FSArabianRevivalistDecoration = 20,$arcologies[0].FSArabianRevivalistLaw = 0]]
+	<br>[[Apply and reset other Revivalisms|MOD_Edit FS Cheat][removeFS("FSRomanRevivalist"), removeFS("FSAztecRevivalist"), removeFS("FSEgyptianRevivalist"), removeFS("FSEdoRevivalist"), removeFS("FSArabianRevivalist")]]
diff --git a/src/init/setupVars.tw b/src/init/setupVars.tw
index f6d782655869f508e80b4bc84c1e3c417cfcb2c9..265545a6c815d275c7e435fec68b5079af95cf2b 100644
--- a/src/init/setupVars.tw
+++ b/src/init/setupVars.tw
@@ -1948,6 +1948,8 @@ Then pick _namePool.random(), or display those names as possible choices, or do
 	"Uzbek": setup.uzbekMaleSurnames,
 	"Roman Revivalist": setup.romanMaleSurnames
 	}>>
+	
+<<set setup.FutureSocieties = ["FSSupremacist", "FSSubjugationist", "FSRepopulationFocus", "FSRestart", "FSSubjugationist", "FSGenderRadicalist", "FSGenderFundamentalist", "FSPaternalist", "FSDegradationist", "FSBodyPurist", "FSTransformationFetishist", "FSYouthPreferentialist", "FSMaturityPreferentialist", "FSSlimnessEnthusiast", "FSAssetExpansionist", "FSPastoralist", "FSPhysicalIdealist", "FSHedonisticDecadence", "FSChattelReligionist", "FSRomanRevivalist", "FSAztecRevivalist", "FSEgyptianRevivalist", "FSEdoRevivalist", "FSArabianRevivalist", "FSChineseRevivalist", "FSNull"]>>
 
 <<set setup.ArcologyNamesSupremacistAmerindian = ["Akilineq", "Amerindia", "Aquadoctan", "Cahokia", "Caral", "Chicora", "Cusco", "Indigenismo", "Norumbega", "Paititi", "Porcupine", "Red Power", "Saguenay", "The Confederated Tribes"]>>
 <<set setup.ArcologyNamesSupremacistAsian = ["Eastern Sun", "Jade Empire", "Kalapa", "Mahoroba", "Penglai", "Shambhala", "Shangri-La", "Sinosphere", "The Celestial Temple", "Tian", "Zhonghua Minzu"]>>
diff --git a/src/js/storyJS.tw b/src/js/storyJS.tw
index 658d6c155b80dd54ac7f8104f838c22aa3ef875b..3aa697fa4726f496fc3a17797dd4b0a2e591f7c9 100644
--- a/src/js/storyJS.tw
+++ b/src/js/storyJS.tw
@@ -996,3 +996,84 @@ window.genUUID = function() {
     });
     return uuid;
 };
+
+window.removeFS = function(FS) {
+	const V = State.variables;
+	const arcology = V.arcologies[0];
+	let FSDecoration = FS + "Decoration";
+	let FSSMR = FS + "SMR";
+	let FSLaw = FS + "Law";
+	if (FS === "FSSupremacist" || FS === "FSSubjugationist") {
+		FSLaw += "ME";
+	}
+	switch (FS) {
+		case "FSGenderRadicalist":
+			arcology.FSGenderRadicalistLawBeauty = 0;
+			arcology.FSGenderRadicalistLawFuta = 0;
+			break;
+		case "FSGenderFundamentalist":
+			arcology.FSGenderFundamentalistLawBeauty = 0;
+			arcology.FSGenderFundamentalistLawBimbo = 0;
+			arcology.FSGenderFundamentalistSMR = 0;
+			break;
+		case "FSTransformationFetishist":
+		case "FSAssetExpansionist":
+			arcology[FSSMR] = 0;
+			break;
+		case "FSPhysicalIdealist":
+			arcology.FSPhysicalIdealistLaw = 0;
+			arcology.FSPhysicalIdealistSMR = 0;
+			arcology.FSPhysicalIdealistStrongFat = 0;
+		case "FSHedonisticDecadence":
+			arcology.FSHedonisticDecadenceLaw = 0;
+			arcology.FSHedonisticDecadenceLaw2 = 0;
+			arcology.FSHedonisticDecadenceSMR = 0;
+			arcology.FSHedonisticDecadenceStrongFat = 0;
+			break;
+		case "FSChattelReligionist":
+			arcology.FSChattelReligionistLaw = 0;
+			arcology.FSChattelReligionistSMR = 0;
+			arcology.FSChattelReligionistCreed = 0;
+			break;
+		case "FSNull":
+			break;
+		default: /* all others have one law and one SMR */
+			arcology[FSLaw] = 0;
+			arcology[FSSMR] = 0;
+			break;
+	}
+	if (FS !== "FSNull") {
+		arcology[FSDecoration] = 20;
+		if (FS === "FSRestart") {
+			V.propOutcome = 0;
+			V.failedElite = 0;
+		}
+	}
+	arcology[FS] = "unset";
+	resetFSCredits();
+};
+
+window.resetFSCredits = function() {
+	const V = State.variables;
+	let activeFS = 0;
+	for (let i = 0; i < setup.FutureSocieties.length; i++) {
+		if (V.arcologies[0][setup.FutureSocieties[i]] > 0) {
+			activeFS++;
+		}
+	}
+	console.log(activeFS);
+	if (V.arcologies[0].FSNull > 0) { /* possibly recalculate for multiculturalism */
+		activeFS--;
+		if (V.FSCreditCount === 4) {
+			activeFS += V.arcologies[0].FSNull/25;
+		} else if (V.FSCreditCount === 6) {
+			activeFS += V.arcologies[0].FSNull/17;
+		} else if (V.FSCreditCount === 7) {
+			activeFS += V.arcologies[0].FSNull/15;
+		} else {
+			activeFS += V.arcologies[0].FSNull/20;
+		}
+	}
+	console.log(activeFS);
+	V.FSCredits = Math.max(Math.trunc(V.FSGotRepCredits - activeFS), 0);
+};
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index d28f0c5da7653d0baa62b0840e3b817ffd86f715..6033fbac0853bdaedbc312431dee352fc51b1fc6 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -1544,18 +1544,21 @@
 <<elseif ndef $arcologies[0].FSGenderRadicalist>>
 	<<set $arcologies[0].FSGenderRadicalist = "unset">>
 <</if>>
-
 <<if def $FSGenderRadicalistLaw>>
 	<<unset $FSGenderRadicalistLaw>>
 <</if>>
-
 <<if ndef $arcologies[0].FSGenderRadicalistLawBeauty>>
 	<<set $arcologies[0].FSGenderRadicalistLawBeauty = 0>>
 <</if>>
-
 <<if ndef $arcologies[0].FSGenderRadicalistLawFuta>>
 	<<set $arcologies[0].FSGenderRadicalistLawFuta = 0>>
 <</if>>
+<<if def $arcologies[0].FSGenderRadicalistLawDicks>>
+	<<run delete $arcologies[0].FSGenderRadicalistLawDicks>>
+<</if>>
+<<if def $arcologies[0].FSGenderRadicalistSMR>>
+	<<run delete $arcologies[0].FSGenderRadicalistSMR>>
+<</if>>
 
 <<if def $FSBodyPurist && $FSBodyPurist != "unset">>
 	<<set $arcologies[0].FSBodyPurist = $FSBodyPurist>>
@@ -1592,11 +1595,14 @@
 	<<set $arcologies[0].FSTransformationFetishist = "unset">>
 <</if>>
 
-<<if def $FSTransformationFetishistLaw && $FSTransformationFetishistLaw != 0>>
-	<<set $arcologies[0].FSTransformationFetishistLaw = $FSTransformationFetishistLaw>>
-	<<unset $FSTransformationFetishistLaw>>
-<<elseif ndef $arcologies[0].FSTransformationFetishistLaw>>
-	<<set $arcologies[0].FSTransformationFetishistLaw = 0>>
+<<if def $FSTransformationFetishistSMR && $FSTransformationFetishistSMR != 0>>
+	<<set $arcologies[0].FSTransformationFetishistSMR = $FSTransformationFetishistSMR>>
+	<<unset $FSTransformationFetishistSMR>>
+<<elseif ndef $arcologies[0].FSTransformationFetishistSMR>>
+	<<set $arcologies[0].FSTransformationFetishistSMR = 0>>
+<</if>>
+<<if def $arcologies[0].FSTransformationFetishistLaw>>
+	<<run delete $arcologies[0].FSTransformationFetishistLaw>>
 <</if>>
 
 <<if def $FSAssetExpansionist && $FSAssetExpansionist != "unset">>
@@ -1612,6 +1618,9 @@
 <<elseif ndef $arcologies[0].FSAssetExpansionistSMR>>
 	<<set $arcologies[0].FSAssetExpansionistSMR = 0>>
 <</if>>
+<<if def $arcologies[0].FSAssetExpansionistLaw>>
+	<<run delete $arcologies[0].FSAssetExpansionistLaw>>
+<</if>>
 
 <<if def $FSSlimnessEnthusiast && $FSSlimnessEnthusiast != "unset">>
 	<<set $arcologies[0].FSSlimnessEnthusiast = $FSSlimnessEnthusiast>>
@@ -1760,6 +1769,10 @@
 	<<set $arcologies[0].FSChineseRevivalistLaw = 0>>
 <</if>>
 
+<<if def $arcologies[0].FSNullLaw>>
+	<<run delete $arcologies[0].FSNullLaw>>
+<</if>>
+
 <<silently>>
 <<include "MOD_Edit FS Cheat Datatype Cleanup">>
 <<include "MOD_Edit Neighbor Arcology Cheat Datatype Cleanup">>
diff --git a/src/uncategorized/fsDevelopments.tw b/src/uncategorized/fsDevelopments.tw
index ac606ca3955adb754b30f772cd1d7e06f2af8fe1..d3d8a73df118b479b797881a2539ef4f9dacc7ca 100644
--- a/src/uncategorized/fsDevelopments.tw
+++ b/src/uncategorized/fsDevelopments.tw
@@ -685,8 +685,8 @@
 		$arcologies[0].name is unconvinced of $arcologies[0].FSSupremacistRace superiority.
 	<</if>>
 	<<if $arcologies[0].FSSupremacist < 0>>
-		<<set $arcologies[0].FSSupremacist = "unset">><<set $FSCredits += 1>>
-		<<set $arcologies[0].FSSupremacistLawME = 0, $arcologies[0].FSSupremacistSMR = 0>>
+		<<run removeFS("FSSupremacist")>>
+		<<if $assistantFSAppearance == "supremacist">><<set $assistantFSAppearance = "default">><</if>>
 		<<ClearFacilityDecorations>>
 		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
 	<<elseif $arcologies[0].FSSupremacist > $arcologies[0].FSSupremacistDecoration>>
@@ -714,8 +714,8 @@
 		$arcologies[0].name is unconvinced of the inferiority of $arcologies[0].FSSubjugationistRace people.
 	<</if>>
 	<<if $arcologies[0].FSSubjugationist < 0>>
-		<<set $arcologies[0].FSSubjugationist = "unset">><<set $FSCredits += 1>>
-		<<set $arcologies[0].FSSubjugationistLawME = 0, $arcologies[0].FSSubjugationistSMR = 0>>
+		<<run removeFS("FSSubjugationist")>>
+		<<if $assistantFSAppearance == "subjugationist">><<set $assistantFSAppearance = "default">><</if>>
 		<<ClearFacilityDecorations>>
 		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
 	<<elseif $arcologies[0].FSSubjugationist > $arcologies[0].FSSubjugationistDecoration>>
@@ -731,650 +731,631 @@
 <</if>>
 
 <<if $arcologies[0].FSRepopulationFocus != "unset">>
-<<if $arcologies[0].FSRepopulationFocus >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that all women should be pregnant.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly that all women should be pregnant.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea that all women should be pregnant.
-<<else>>
-	$arcologies[0].name is unconvinced that all women should be pregnant.
-<</if>>
-<<if $arcologies[0].FSRepopulationFocus < 0>>
-	<<set $arcologies[0].FSRepopulationFocus = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSRepopulationFocusSMR = 0, $arcologies[0].FSRepopulationFocusLaw = 0>>
-	<<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSRepopulationFocus > $arcologies[0].FSRepopulationFocusDecoration>>
-	<<set $arcologies[0].FSRepopulationFocus = $arcologies[0].FSRepopulationFocusDecoration>>
-<</if>>
-<<if $arcologies[0].FSRepopulationFocusDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSRepopulationFocus == $arcologies[0].FSRepopulationFocusDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSRepopulationFocusSMR == 1>>
-	<<set $arcologies[0].FSRepopulationFocus += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSRepopulationFocus >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that all women should be pregnant.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly that all women should be pregnant.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea that all women should be pregnant.
+	<<else>>
+		$arcologies[0].name is unconvinced that all women should be pregnant.
+	<</if>>
+	<<if $arcologies[0].FSRepopulationFocus < 0>>
+		<<run removeFS("FSRepopulationFocus")>>
+		<<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSRepopulationFocus > $arcologies[0].FSRepopulationFocusDecoration>>
+		<<set $arcologies[0].FSRepopulationFocus = $arcologies[0].FSRepopulationFocusDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSRepopulationFocusDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSRepopulationFocus == $arcologies[0].FSRepopulationFocusDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSRepopulationFocusSMR == 1>>
+			<<set $arcologies[0].FSRepopulationFocus += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSRestart != "unset">>
-<<if $arcologies[0].FSRestart >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that only the elite should reproduce.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly that only the elite should reproduce.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea only the elite should reproduce.
-<<else>>
-	$arcologies[0].name is unconvinced that only the elite should reproduce.
-<</if>>
-<<if $arcologies[0].FSRestart < 0 && $arcologies[0].FSRestartDecoration != 100>>
-	<<set $arcologies[0].FSRestart = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSRestartSMR = 0, $arcologies[0].FSRestartLaw = 0>>
-	<<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSRestart > $arcologies[0].FSRestartDecoration>>
-	<<set $arcologies[0].FSRestart = $arcologies[0].FSRestartDecoration>>
-<</if>>
-<<if $arcologies[0].FSRestartDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSRestart == $arcologies[0].FSRestartDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSRestartSMR == 1>>
-	<<set $arcologies[0].FSRestart += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSRestart >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that only the elite should reproduce.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly that only the elite should reproduce.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea only the elite should reproduce.
+	<<else>>
+		$arcologies[0].name is unconvinced that only the elite should reproduce.
+	<</if>>
+	<<if $arcologies[0].FSRestart < 0 && $arcologies[0].FSRestartDecoration != 100>>
+		<<run removeFS("FSRestart")>>
+		<<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSRestart > $arcologies[0].FSRestartDecoration>>
+		<<set $arcologies[0].FSRestart = $arcologies[0].FSRestartDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSRestartDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSRestart == $arcologies[0].FSRestartDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSRestartSMR == 1>>
+			<<set $arcologies[0].FSRestart += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSGenderRadicalist != "unset">>
-<<if $arcologies[0].FSGenderRadicalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly in the need to redefine gender around power.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the need to redefine gender around power.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the need to redefine gender around power.
-<<else>>
-	$arcologies[0].name is unconvinced of the need to redefine gender around power.
-<</if>>
-<<if $arcologies[0].FSGenderRadicalist < 0>>
-	<<set $arcologies[0].FSGenderRadicalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSGenderRadicalistSMR = 0, $arcologies[0].FSGenderRadicalistLawDicks = 0, $arcologies[0].FSGenderRadicalistLawFuta = 0, $arcologies[0].FSGenderRadicalistLawBeauty = 0>>
-	<<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSGenderRadicalist > $arcologies[0].FSGenderRadicalistDecoration>>
-	<<set $arcologies[0].FSGenderRadicalist = $arcologies[0].FSGenderRadicalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSGenderRadicalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSGenderRadicalist == $arcologies[0].FSGenderRadicalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSGenderRadicalistSMR == 1>>
-	<<set $arcologies[0].FSGenderRadicalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSGenderRadicalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly in the need to redefine gender around power.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the need to redefine gender around power.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the need to redefine gender around power.
+	<<else>>
+		$arcologies[0].name is unconvinced of the need to redefine gender around power.
+	<</if>>
+	<<if $arcologies[0].FSGenderRadicalist < 0>>
+		<<run removeFS("FSGenderRadicalist")>>
+		<<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSGenderRadicalist > $arcologies[0].FSGenderRadicalistDecoration>>
+		<<set $arcologies[0].FSGenderRadicalist = $arcologies[0].FSGenderRadicalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSGenderRadicalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSGenderRadicalist == $arcologies[0].FSGenderRadicalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSGenderRadicalistSMR == 1>>
+			<<set $arcologies[0].FSGenderRadicalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSGenderFundamentalist != "unset">>
-<<if $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly in the need to preserve traditional gender roles.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the need to preserve traditional gender roles.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the need to preserve traditional gender roles.
-<<else>>
-	$arcologies[0].name is unconvinced of the need to preserve traditional gender roles.
-<</if>>
-<<if $arcologies[0].FSGenderFundamentalist < 0>>
-	<<set $arcologies[0].FSGenderFundamentalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSGenderFundamentalistSMR = 0, $arcologies[0].FSGenderFundamentalistLawBimbo = 0>>
-	<<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSGenderFundamentalist > $arcologies[0].FSGenderFundamentalistDecoration>>
-	<<set $arcologies[0].FSGenderFundamentalist = $arcologies[0].FSGenderFundamentalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSGenderFundamentalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSGenderFundamentalist == $arcologies[0].FSGenderFundamentalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSGenderFundamentalistSMR == 1>>
-	<<set $arcologies[0].FSGenderFundamentalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly in the need to preserve traditional gender roles.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the need to preserve traditional gender roles.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the need to preserve traditional gender roles.
+	<<else>>
+		$arcologies[0].name is unconvinced of the need to preserve traditional gender roles.
+	<</if>>
+	<<if $arcologies[0].FSGenderFundamentalist < 0>>
+		<<run removeFS("FSGenderFundamentalist")>>
+		<<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSGenderFundamentalist > $arcologies[0].FSGenderFundamentalistDecoration>>
+		<<set $arcologies[0].FSGenderFundamentalist = $arcologies[0].FSGenderFundamentalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSGenderFundamentalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSGenderFundamentalist == $arcologies[0].FSGenderFundamentalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSGenderFundamentalistSMR == 1>>
+			<<set $arcologies[0].FSGenderFundamentalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSPaternalist != "unset">>
-<<if $arcologies[0].FSPaternalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly in the vision of a well-bred race of slaves.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the vision of a well-bred race of slaves.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the vision of a well-bred race of slaves.
-<<else>>
-	$arcologies[0].name is unconvinced of the vision of a well-bred race of slaves.
-<</if>>
-<<if $arcologies[0].FSPaternalist < 0>>
-	<<set $arcologies[0].FSPaternalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSPaternalistLaw = 0, $arcologies[0].FSPaternalistSMR = 0>>
-	<<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSPaternalist > $arcologies[0].FSPaternalistDecoration>>
-	<<set $arcologies[0].FSPaternalist = $arcologies[0].FSPaternalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSPaternalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSPaternalist == $arcologies[0].FSPaternalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSPaternalistSMR == 1>>
-	<<set $arcologies[0].FSPaternalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSPaternalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly in the vision of a well-bred race of slaves.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the vision of a well-bred race of slaves.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the vision of a well-bred race of slaves.
+	<<else>>
+		$arcologies[0].name is unconvinced of the vision of a well-bred race of slaves.
+	<</if>>
+	<<if $arcologies[0].FSPaternalist < 0>>
+		<<run removeFS("FSPaternalist")>>
+		<<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSPaternalist > $arcologies[0].FSPaternalistDecoration>>
+		<<set $arcologies[0].FSPaternalist = $arcologies[0].FSPaternalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSPaternalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSPaternalist == $arcologies[0].FSPaternalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSPaternalistSMR == 1>>
+			<<set $arcologies[0].FSPaternalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSDegradationist != "unset">>
-<<if $arcologies[0].FSDegradationist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that slaves are not human and should be thoroughly degraded.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSDegradationist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the idea that slaves are not human and should be thoroughly degraded.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSDegradationist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the proposition that slaves are not human and should be thoroughly degraded.
-<<else>>
-	$arcologies[0].name is unconvinced that slaves are not human and should be thoroughly degraded.
-<</if>>
-<<if $arcologies[0].FSDegradationist < 0>>
-	<<set $arcologies[0].FSDegradationist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSDegradationistLaw = 0, $arcologies[0].FSDegradationistSMR = 0>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSDegradationist > $arcologies[0].FSDegradationistDecoration>>
-	<<set $arcologies[0].FSDegradationist = $arcologies[0].FSDegradationistDecoration>>
-<</if>>
-<<if $arcologies[0].FSDegradationistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSDegradationist == $arcologies[0].FSDegradationistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSDegradationistSMR == 1>>
-	<<set $arcologies[0].FSDegradationist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSDegradationist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that slaves are not human and should be thoroughly degraded.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSDegradationist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the idea that slaves are not human and should be thoroughly degraded.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSDegradationist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the proposition that slaves are not human and should be thoroughly degraded.
+	<<else>>
+		$arcologies[0].name is unconvinced that slaves are not human and should be thoroughly degraded.
+	<</if>>
+	<<if $arcologies[0].FSDegradationist < 0>>
+		<<run removeFS("FSDegradationist")>>
+		<<if $assistantFSAppearance == "degradationist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSDegradationist > $arcologies[0].FSDegradationistDecoration>>
+		<<set $arcologies[0].FSDegradationist = $arcologies[0].FSDegradationistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSDegradationistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSDegradationist == $arcologies[0].FSDegradationistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSDegradationistSMR == 1>>
+			<<set $arcologies[0].FSDegradationist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSBodyPurist != "unset">>
-<<if $arcologies[0].FSBodyPurist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly in the unattractive nature of implants.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name strongly believes in the unattractive nature of implants.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is beginning to believe in the unattractive nature of implants.
-<<else>>
-	$arcologies[0].name is unconvinced of the unattractive nature of implants.
-<</if>>
-<<if $arcologies[0].FSBodyPurist < 0>>
-	<<set $arcologies[0].FSBodyPurist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSBodyPuristLaw = 0, $arcologies[0].FSBodyPuristSMR = 0>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSBodyPurist > $arcologies[0].FSBodyPuristDecoration>>
-	<<set $arcologies[0].FSBodyPurist = $arcologies[0].FSBodyPuristDecoration>>
-<</if>>
-<<if $arcologies[0].FSBodyPuristDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSBodyPurist == $arcologies[0].FSBodyPuristDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSBodyPuristSMR == 1>>
-	<<set $arcologies[0].FSBodyPurist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSBodyPurist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly in the unattractive nature of implants.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name strongly believes in the unattractive nature of implants.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is beginning to believe in the unattractive nature of implants.
+	<<else>>
+		$arcologies[0].name is unconvinced of the unattractive nature of implants.
+	<</if>>
+	<<if $arcologies[0].FSBodyPurist < 0>>
+		<<run removeFS("FSBodyPurist")>>
+		<<if $assistantFSAppearance == "body purist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSBodyPurist > $arcologies[0].FSBodyPuristDecoration>>
+		<<set $arcologies[0].FSBodyPurist = $arcologies[0].FSBodyPuristDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSBodyPuristDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSBodyPurist == $arcologies[0].FSBodyPuristDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSBodyPuristSMR == 1>>
+			<<set $arcologies[0].FSBodyPurist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSTransformationFetishist != "unset">>
-<<if $arcologies[0].FSTransformationFetishist >= $FSLockinLevel>>
-	$arcologies[0].name passionately fetishizes implants.
-<<elseif $arcologies[0].FSTransformationFetishist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name strongly fetishizes implants.
-<<elseif $arcologies[0].FSTransformationFetishist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name beginning to fetishize implants.
-<<else>>
-	$arcologies[0].name is unconvinced about the attractiveness of implants.
-<</if>>
-<<if $arcologies[0].FSTransformationFetishist < 0>>
-	<<set $arcologies[0].FSTransformationFetishist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSTransformationFetishistLaw = 0, $arcologies[0].FSTransformationFetishistSMR = 0>>
-	<<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSTransformationFetishist > $arcologies[0].FSTransformationFetishistDecoration>>
-	<<set $arcologies[0].FSTransformationFetishist = $arcologies[0].FSTransformationFetishistDecoration>>
-<</if>>
-<<if $arcologies[0].FSTransformationFetishistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSTransformationFetishist == $arcologies[0].FSTransformationFetishistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSTransformationFetishistSMR == 1>>
-	<<set $arcologies[0].FSTransformationFetishist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSTransformationFetishist >= $FSLockinLevel>>
+		$arcologies[0].name passionately fetishizes implants.
+	<<elseif $arcologies[0].FSTransformationFetishist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name strongly fetishizes implants.
+	<<elseif $arcologies[0].FSTransformationFetishist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name beginning to fetishize implants.
+	<<else>>
+		$arcologies[0].name is unconvinced about the attractiveness of implants.
+	<</if>>
+	<<if $arcologies[0].FSTransformationFetishist < 0>>
+		<<run removeFS("FSTransformationFetishist")>>
+		<<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSTransformationFetishist > $arcologies[0].FSTransformationFetishistDecoration>>
+		<<set $arcologies[0].FSTransformationFetishist = $arcologies[0].FSTransformationFetishistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSTransformationFetishistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSTransformationFetishist == $arcologies[0].FSTransformationFetishistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSTransformationFetishistSMR == 1>>
+			<<set $arcologies[0].FSTransformationFetishist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSMaturityPreferentialist != "unset">>
-<<if $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel>>
-	$arcologies[0].name is passionately enthusiastic about older ladies.
-<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name is enthusiastic about older ladies.
-<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is beginning to be enthusiastic about older ladies.
-<<else>>
-	$arcologies[0].name is unconvinced about your preference for older ladies.
-<</if>>
-<<if $arcologies[0].FSMaturityPreferentialist < 0>>
-	<<set $arcologies[0].FSMaturityPreferentialist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSMaturityPreferentialistLaw = 0, $arcologies[0].FSMaturityPreferentialistSMR = 0>>
-	<<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSMaturityPreferentialist > $arcologies[0].FSMaturityPreferentialistDecoration>>
-	<<set $arcologies[0].FSMaturityPreferentialist = $arcologies[0].FSMaturityPreferentialistDecoration>>
-<</if>>
-<<if $arcologies[0].FSMaturityPreferentialistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSMaturityPreferentialist == $arcologies[0].FSMaturityPreferentialistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSMaturityPreferentialistSMR == 1>>
-	<<set $arcologies[0].FSMaturityPreferentialist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel>>
+		$arcologies[0].name is passionately enthusiastic about older ladies.
+	<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name is enthusiastic about older ladies.
+	<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is beginning to be enthusiastic about older ladies.
+	<<else>>
+		$arcologies[0].name is unconvinced about your preference for older ladies.
+	<</if>>
+	<<if $arcologies[0].FSMaturityPreferentialist < 0>>
+		<<run removeFS("FSMaturityPreferentialist")>>
+		<<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSMaturityPreferentialist > $arcologies[0].FSMaturityPreferentialistDecoration>>
+		<<set $arcologies[0].FSMaturityPreferentialist = $arcologies[0].FSMaturityPreferentialistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSMaturityPreferentialistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSMaturityPreferentialist == $arcologies[0].FSMaturityPreferentialistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSMaturityPreferentialistSMR == 1>>
+			<<set $arcologies[0].FSMaturityPreferentialist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSYouthPreferentialist != "unset">>
-<<if $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel>>
-	$arcologies[0].name is passionately enthusiastic about young women.
-<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name is enthusiastic about young women.
-<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is beginning to be enthusiastic about young women.
-<<else>>
-	$arcologies[0].name is unconvinced about your preference for young women.
-<</if>>
-<<if $arcologies[0].FSYouthPreferentialist < 0>>
-	<<set $arcologies[0].FSYouthPreferentialist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSYouthPreferentialistLaw = 0, $arcologies[0].FSYouthPreferentialistSMR = 0>>
-	<<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSYouthPreferentialist > $arcologies[0].FSYouthPreferentialistDecoration>>
-	<<set $arcologies[0].FSYouthPreferentialist = $arcologies[0].FSYouthPreferentialistDecoration>>
-<</if>>
-<<if $arcologies[0].FSYouthPreferentialistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSYouthPreferentialist == $arcologies[0].FSYouthPreferentialistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSYouthPreferentialistSMR == 1>>
-	<<set $arcologies[0].FSYouthPreferentialist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel>>
+		$arcologies[0].name is passionately enthusiastic about young women.
+	<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name is enthusiastic about young women.
+	<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is beginning to be enthusiastic about young women.
+	<<else>>
+		$arcologies[0].name is unconvinced about your preference for young women.
+	<</if>>
+	<<if $arcologies[0].FSYouthPreferentialist < 0>>
+		<<run removeFS("FSYouthPreferentialist")>>
+		<<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSYouthPreferentialist > $arcologies[0].FSYouthPreferentialistDecoration>>
+		<<set $arcologies[0].FSYouthPreferentialist = $arcologies[0].FSYouthPreferentialistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSYouthPreferentialistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSYouthPreferentialist == $arcologies[0].FSYouthPreferentialistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSYouthPreferentialistSMR == 1>>
+			<<set $arcologies[0].FSYouthPreferentialist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
-<<if $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel>>
-	$arcologies[0].name is passionately enthusiastic about slim slaves with girlish figures.
-<<elseif $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel*0.6>>
-	$arcologies[0].name is very enthusiastic about slim slaves with girlish figures.
-<<elseif $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is enthusiastic about slim slaves with girlish figures.
-<<else>>
-	$arcologies[0].name is unconvinced about your preference for slim slaves with girlish figures.
-<</if>>
-<<if $arcologies[0].FSSlimnessEnthusiast < 0>>
-	<<set $arcologies[0].FSSlimnessEnthusiast = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSSlimnessEnthusiastSMR = 0, $arcologies[0].FSSlimnessEnthusiastLaw = 0>>
-	<<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSSlimnessEnthusiast > $arcologies[0].FSSlimnessEnthusiastDecoration>>
-	<<set $arcologies[0].FSSlimnessEnthusiast = $arcologies[0].FSSlimnessEnthusiastDecoration>>
-<</if>>
-<<if $arcologies[0].FSSlimnessEnthusiastDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSSlimnessEnthusiast == $arcologies[0].FSSlimnessEnthusiastDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSSlimnessEnthusiastSMR == 1>>
-	<<set $arcologies[0].FSSlimnessEnthusiast += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel>>
+		$arcologies[0].name is passionately enthusiastic about slim slaves with girlish figures.
+	<<elseif $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel*0.6>>
+		$arcologies[0].name is very enthusiastic about slim slaves with girlish figures.
+	<<elseif $arcologies[0].FSSlimnessEnthusiast >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is enthusiastic about slim slaves with girlish figures.
+	<<else>>
+		$arcologies[0].name is unconvinced about your preference for slim slaves with girlish figures.
+	<</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiast < 0>>
+		<<run removeFS("FSSlimnessEnthusiast")>>
+		<<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSSlimnessEnthusiast > $arcologies[0].FSSlimnessEnthusiastDecoration>>
+		<<set $arcologies[0].FSSlimnessEnthusiast = $arcologies[0].FSSlimnessEnthusiastDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSSlimnessEnthusiastDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSSlimnessEnthusiast == $arcologies[0].FSSlimnessEnthusiastDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSSlimnessEnthusiastSMR == 1>>
+			<<set $arcologies[0].FSSlimnessEnthusiast += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSAssetExpansionist != "unset">>
-<<if $arcologies[0].FSAssetExpansionist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that all tits and asses should be bigger.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the idea that all tits and asses should be bigger.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea that all tits and asses should be bigger.
-<<else>>
-	$arcologies[0].name is unconvinced that all tits and asses should be bigger.
-<</if>>
-<<if $arcologies[0].FSAssetExpansionist < 0>>
-	<<set $arcologies[0].FSAssetExpansionist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSAssetExpansionistSMR = 0, $arcologies[0].FSAssetExpansionistLaw = 0>>
-	<<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSAssetExpansionist > $arcologies[0].FSAssetExpansionistDecoration>>
-	<<set $arcologies[0].FSAssetExpansionist = $arcologies[0].FSAssetExpansionistDecoration>>
-<</if>>
-<<if $arcologies[0].FSAssetExpansionistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSAssetExpansionist == $arcologies[0].FSAssetExpansionistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSAssetExpansionistSMR == 1>>
-	<<set $arcologies[0].FSAssetExpansionist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSAssetExpansionist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that all tits and asses should be bigger.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the idea that all tits and asses should be bigger.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea that all tits and asses should be bigger.
+	<<else>>
+		$arcologies[0].name is unconvinced that all tits and asses should be bigger.
+	<</if>>
+	<<if $arcologies[0].FSAssetExpansionist < 0>>
+		<<run removeFS("FSAssetExpansionist")>>
+		<<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSAssetExpansionist > $arcologies[0].FSAssetExpansionistDecoration>>
+		<<set $arcologies[0].FSAssetExpansionist = $arcologies[0].FSAssetExpansionistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSAssetExpansionistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSAssetExpansionist == $arcologies[0].FSAssetExpansionistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSAssetExpansionistSMR == 1>>
+			<<set $arcologies[0].FSAssetExpansionist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSPastoralist != "unset">>
-<<if $arcologies[0].FSPastoralist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that slaves should be milked.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the idea that slaves should be milked.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea that slaves should be milked.
-<<else>>
-	$arcologies[0].name is unconvinced that slaves should be milked.
-<</if>>
-<<if $arcologies[0].FSPastoralist < 0>>
-	<<set $arcologies[0].FSPastoralist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSPastoralistLaw = 0, $arcologies[0].FSPastoralistSMR = 0>>
-	<<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSPastoralist > $arcologies[0].FSPastoralistDecoration>>
-	<<set $arcologies[0].FSPastoralist = $arcologies[0].FSPastoralistDecoration>>
-<</if>>
-<<if $arcologies[0].FSPastoralistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSPastoralist == $arcologies[0].FSPastoralistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSPastoralistSMR == 1>>
-	<<set $arcologies[0].FSPastoralist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSPastoralist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that slaves should be milked.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the idea that slaves should be milked.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea that slaves should be milked.
+	<<else>>
+		$arcologies[0].name is unconvinced that slaves should be milked.
+	<</if>>
+	<<if $arcologies[0].FSPastoralist < 0>>
+		<<run removeFS("FSPastoralist")>>
+		<<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSPastoralist > $arcologies[0].FSPastoralistDecoration>>
+		<<set $arcologies[0].FSPastoralist = $arcologies[0].FSPastoralistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSPastoralistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSPastoralist == $arcologies[0].FSPastoralistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSPastoralistSMR == 1>>
+			<<set $arcologies[0].FSPastoralist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSPhysicalIdealist != "unset">>
-<<if $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that all slaves should be tall and strong.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the idea that all slaves should be tall and strong.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea that all slaves should be tall and strong.
-<<else>>
-	$arcologies[0].name is unconvinced that all slaves should be tall and strong.
-<</if>>
-<<if $arcologies[0].FSPhysicalIdealist < 0>>
-	<<set $arcologies[0].FSPhysicalIdealist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSPhysicalIdealistSMR = 0, $arcologies[0].FSPhysicalIdealistLaw = 0, $arcologies[0].FSPhysicalIdealistStrongFat = 0>>
-	<<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSPhysicalIdealist > $arcologies[0].FSPhysicalIdealistDecoration>>
-	<<set $arcologies[0].FSPhysicalIdealist = $arcologies[0].FSPhysicalIdealistDecoration>>
-<</if>>
-<<if $arcologies[0].FSPhysicalIdealistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSPhysicalIdealist == $arcologies[0].FSPhysicalIdealistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSPhysicalIdealistSMR == 1>>
-	<<set $arcologies[0].FSPhysicalIdealist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that all slaves should be tall and strong.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the idea that all slaves should be tall and strong.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea that all slaves should be tall and strong.
+	<<else>>
+		$arcologies[0].name is unconvinced that all slaves should be tall and strong.
+	<</if>>
+	<<if $arcologies[0].FSPhysicalIdealist < 0>>
+		<<run removeFS("FSPhysicalIdealist")>>
+		<<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSPhysicalIdealist > $arcologies[0].FSPhysicalIdealistDecoration>>
+		<<set $arcologies[0].FSPhysicalIdealist = $arcologies[0].FSPhysicalIdealistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSPhysicalIdealistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSPhysicalIdealist == $arcologies[0].FSPhysicalIdealistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSPhysicalIdealistSMR == 1>>
+			<<set $arcologies[0].FSPhysicalIdealist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSHedonisticDecadence != "unset">>
-<<if $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that all slaves should be soft and laid-back.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with the idea that all slaves should be soft and laid-back.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to the idea that all slaves should be soft and laid-back.
-<<else>>
-	$arcologies[0].name is unconvinced that all slaves should be soft and laid-back.
-<</if>>
-<<if $arcologies[0].FSHedonisticDecadence < 0>>
-	<<set $arcologies[0].FSHedonisticDecadence = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSHedonisticDecadenceSMR = 0, $arcologies[0].FSHedonisticDecadenceLaw = 0, $arcologies[0].FSHedonisticDecadenceLaw2 = 0, $arcologies[0].FSHedonisticDecadenceStrongFat = 0>>
-	<<if $assistantFSAppearance == "hedonistic decadence">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSHedonisticDecadence > $arcologies[0].FSHedonisticDecadenceDecoration>>
-	<<set $arcologies[0].FSHedonisticDecadence = $arcologies[0].FSHedonisticDecadenceDecoration>>
-<</if>>
-<<if $arcologies[0].FSHedonisticDecadenceDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSHedonisticDecadence == $arcologies[0].FSHedonisticDecadenceDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSHedonisticDecadenceSMR == 1>>
-	<<set $arcologies[0].FSHedonisticDecadence += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that all slaves should be soft and laid-back.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with the idea that all slaves should be soft and laid-back.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to the idea that all slaves should be soft and laid-back.
+	<<else>>
+		$arcologies[0].name is unconvinced that all slaves should be soft and laid-back.
+	<</if>>
+	<<if $arcologies[0].FSHedonisticDecadence < 0>>
+		<<run removeFS("FSHedonisticDecadence")>>
+		<<if $assistantFSAppearance == "hedonistic decadence">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSHedonisticDecadence > $arcologies[0].FSHedonisticDecadenceDecoration>>
+		<<set $arcologies[0].FSHedonisticDecadence = $arcologies[0].FSHedonisticDecadenceDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSHedonisticDecadenceDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSHedonisticDecadence == $arcologies[0].FSHedonisticDecadenceDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSHedonisticDecadenceSMR == 1>>
+			<<set $arcologies[0].FSHedonisticDecadence += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSChattelReligionist != "unset">>
-<<if $arcologies[0].FSChattelReligionist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly in a version of religion that emphasizes slaveholding traditions.
-	<<set $independenceDay = 1, $nicaeaAnnounceable = 1>>
-<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with a version of religion that emphasizes slaveholding traditions.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to a version of religion that emphasizes slaveholding traditions.
-<<else>>
-	$arcologies[0].name is unconvinced of a version of religion that emphasizes slaveholding traditions.
-<</if>>
-<<if $arcologies[0].FSChattelReligionist < 0>>
-	<<set $arcologies[0].FSChattelReligionist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSChattelReligionistLaw = 0, $arcologies[0].FSChattelReligionistSMR = 0, $arcologies[0].FSChattelReligionistCreed = 0>>
-	<<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSChattelReligionist > $arcologies[0].FSChattelReligionistDecoration>>
-	<<set $arcologies[0].FSChattelReligionist = $arcologies[0].FSChattelReligionistDecoration>>
-<</if>>
-<<if $arcologies[0].FSChattelReligionistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSChattelReligionist == $arcologies[0].FSChattelReligionistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSChattelReligionistSMR == 1>>
-	<<set $arcologies[0].FSChattelReligionist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSChattelReligionist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly in a version of religion that emphasizes slaveholding traditions.
+		<<set $independenceDay = 1, $nicaeaAnnounceable = 1>>
+	<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with a version of religion that emphasizes slaveholding traditions.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to a version of religion that emphasizes slaveholding traditions.
+	<<else>>
+		$arcologies[0].name is unconvinced of a version of religion that emphasizes slaveholding traditions.
+	<</if>>
+	<<if $arcologies[0].FSChattelReligionist < 0>>
+		<<run removeFS("FSChattelReligionist")>>
+		<<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSChattelReligionist > $arcologies[0].FSChattelReligionistDecoration>>
+		<<set $arcologies[0].FSChattelReligionist = $arcologies[0].FSChattelReligionistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSChattelReligionistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSChattelReligionist == $arcologies[0].FSChattelReligionistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSChattelReligionistSMR == 1>>
+			<<set $arcologies[0].FSChattelReligionist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSRomanRevivalist != "unset">>
-<<if $arcologies[0].FSRomanRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that it is the new Rome.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your project to build a new Rome.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your project to build a new Rome.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Rome.
-<</if>>
-<<if $arcologies[0].FSRomanRevivalist < 0>>
-	<<set $arcologies[0].FSRomanRevivalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSRomanRevivalistLaw = 0, $arcologies[0].FSRomanRevivalistSMR = 0>>
-	<<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSRomanRevivalist > $arcologies[0].FSRomanRevivalistDecoration>>
-	<<set $arcologies[0].FSRomanRevivalist = $arcologies[0].FSRomanRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSRomanRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSRomanRevivalist == $arcologies[0].FSRomanRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSRomanRevivalistSMR == 1>>
-	<<set $arcologies[0].FSRomanRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSRomanRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that it is the new Rome.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your project to build a new Rome.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your project to build a new Rome.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your project to build a new Rome.
+	<</if>>
+	<<if $arcologies[0].FSRomanRevivalist < 0>>
+		<<run removeFS("FSRomanRevivalist")>>
+		<<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSRomanRevivalist > $arcologies[0].FSRomanRevivalistDecoration>>
+		<<set $arcologies[0].FSRomanRevivalist = $arcologies[0].FSRomanRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSRomanRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSRomanRevivalist == $arcologies[0].FSRomanRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSRomanRevivalistSMR == 1>>
+			<<set $arcologies[0].FSRomanRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSAztecRevivalist != "unset">>
-<<if $arcologies[0].FSAztecRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that it is the new Aztec Empire.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your project to build a new Aztec Empire.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your project to build a new Aztec Empire.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Aztec Empire.
-<</if>>
-<<if $arcologies[0].FSAztecRevivalist < 0>>
-	<<set $arcologies[0].FSAztecRevivalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSAztecRevivalistSMR = 0, $arcologies[0].FSAztecRevivalistLaw = 0>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSAztecRevivalist > $arcologies[0].FSAztecRevivalistDecoration>>
-	<<set $arcologies[0].FSAztecRevivalist = $arcologies[0].FSAztecRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSAztecRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSAztecRevivalist == $arcologies[0].FSAztecRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSAztecRevivalistSMR == 1>>
-	<<set $arcologies[0].FSAztecRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSAztecRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that it is the new Aztec Empire.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your project to build a new Aztec Empire.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your project to build a new Aztec Empire.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your project to build a new Aztec Empire.
+	<</if>>
+	<<if $arcologies[0].FSAztecRevivalist < 0>>
+		<<run removeFS("FSAztecRevivalist")>>
+		<<if $assistantFSAppearance == "aztec revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSAztecRevivalist > $arcologies[0].FSAztecRevivalistDecoration>>
+		<<set $arcologies[0].FSAztecRevivalist = $arcologies[0].FSAztecRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSAztecRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSAztecRevivalist == $arcologies[0].FSAztecRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSAztecRevivalistSMR == 1>>
+			<<set $arcologies[0].FSAztecRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSEgyptianRevivalist != "unset">>
-<<if $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that it is the land of the Pharaohs, reborn.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your project to build a new land of the Pharaohs.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your project to build a new land of the Pharaohs.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your project to build a new land of the Pharaohs.
-<</if>>
-<<if $arcologies[0].FSEgyptianRevivalist < 0>>
-	<<set $arcologies[0].FSEgyptianRevivalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSEgyptianRevivalistLaw = 0, $arcologies[0].FSEgyptianRevivalistSMR = 0>>
-	<<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSEgyptianRevivalist > $arcologies[0].FSEgyptianRevivalistDecoration>>
-	<<set $arcologies[0].FSEgyptianRevivalist = $arcologies[0].FSEgyptianRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSEgyptianRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSEgyptianRevivalist == $arcologies[0].FSEgyptianRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSEgyptianRevivalistSMR == 1>>
-	<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that it is the land of the Pharaohs, reborn.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your project to build a new land of the Pharaohs.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your project to build a new land of the Pharaohs.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your project to build a new land of the Pharaohs.
+	<</if>>
+	<<if $arcologies[0].FSEgyptianRevivalist < 0>>
+		<<run removeFS("FSEgyptianRevivalist")>>
+		<<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSEgyptianRevivalist > $arcologies[0].FSEgyptianRevivalistDecoration>>
+		<<set $arcologies[0].FSEgyptianRevivalist = $arcologies[0].FSEgyptianRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSEgyptianRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSEgyptianRevivalist == $arcologies[0].FSEgyptianRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSEgyptianRevivalistSMR == 1>>
+			<<set $arcologies[0].FSEgyptianRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSEdoRevivalist != "unset">>
-<<if $arcologies[0].FSEdoRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that it is the land of the Shogun, reborn.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your project to build a new Edo Japan.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your project to build a new Edo Japan.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Edo Japan.
-<</if>>
-<<if $arcologies[0].FSEdoRevivalist < 0>>
-	<<set $arcologies[0].FSEdoRevivalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSEdoRevivalistLaw = 0, $arcologies[0].FSEdoRevivalistSMR = 0>>
-	<<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSEdoRevivalist > $arcologies[0].FSEdoRevivalistDecoration>>
-	<<set $arcologies[0].FSEdoRevivalist = $arcologies[0].FSEdoRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSEdoRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSEdoRevivalist == $arcologies[0].FSEdoRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSEdoRevivalistSMR == 1>>
-	<<set $arcologies[0].FSEdoRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSEdoRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that it is the land of the Shogun, reborn.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your project to build a new Edo Japan.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your project to build a new Edo Japan.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your project to build a new Edo Japan.
+	<</if>>
+	<<if $arcologies[0].FSEdoRevivalist < 0>>
+		<<run removeFS("FSEdoRevivalist")>>
+		<<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSEdoRevivalist > $arcologies[0].FSEdoRevivalistDecoration>>
+		<<set $arcologies[0].FSEdoRevivalist = $arcologies[0].FSEdoRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSEdoRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSEdoRevivalist == $arcologies[0].FSEdoRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSEdoRevivalistSMR == 1>>
+			<<set $arcologies[0].FSEdoRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSArabianRevivalist != "unset">>
-<<if $arcologies[0].FSArabianRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that it is ancient Baghdad reborn.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your project to build a new Sultanate.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your project to build a new Sultanate.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Sultanate.
-<</if>>
-<<if $arcologies[0].FSArabianRevivalist < 0>>
-	<<set $arcologies[0].FSArabianRevivalist = "unset">><<set $FSCredits += 1>>
-	<<set $arcologies[0].FSArabianRevivalistLaw = 0, $arcologies[0].FSArabianRevivalistSMR = 0>>
-	<<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSArabianRevivalist > $arcologies[0].FSArabianRevivalistDecoration>>
-	<<set $arcologies[0].FSArabianRevivalist = $arcologies[0].FSArabianRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSArabianRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSArabianRevivalist == $arcologies[0].FSArabianRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSArabianRevivalistSMR == 1>>
-	<<set $arcologies[0].FSArabianRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSArabianRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that it is ancient Baghdad reborn.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your project to build a new Sultanate.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your project to build a new Sultanate.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your project to build a new Sultanate.
+	<</if>>
+	<<if $arcologies[0].FSArabianRevivalist < 0>>
+		<<run removeFS("FSArabianRevivalist")>>
+		<<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSArabianRevivalist > $arcologies[0].FSArabianRevivalistDecoration>>
+		<<set $arcologies[0].FSArabianRevivalist = $arcologies[0].FSArabianRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSArabianRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSArabianRevivalist == $arcologies[0].FSArabianRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSArabianRevivalistSMR == 1>>
+			<<set $arcologies[0].FSArabianRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
 
 <<if $arcologies[0].FSChineseRevivalist != "unset">>
-<<if $arcologies[0].FSChineseRevivalist >= $FSLockinLevel>>
-	$arcologies[0].name believes implicitly that you possess the Mandate of Heaven.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.6>>
-	$arcologies[0].name agrees strongly with your pursuit of the Mandate of Heaven.
-	<<set $independenceDay = 1>>
-<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.3>>
-	$arcologies[0].name is sympathetic to your pursuit of the Mandate of Heaven.
-<<else>>
-	$arcologies[0].name is unconvinced of the wisdom of your pursuit of the Mandate of Heaven.
-<</if>>
-<<if $arcologies[0].FSChineseRevivalist < 0>>
-	<<set $arcologies[0].FSChineseRevivalist = "unset">><<set $FSCredits += 1>>
-	<<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance = "default">><</if>>
-	<<set $arcologies[0].FSChineseRevivalistLaw = 0, $arcologies[0].FSChineseRevivalistSMR = 0>>
-	<<ClearFacilityDecorations>>
-	@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
-<<elseif $arcologies[0].FSChineseRevivalist > $arcologies[0].FSChineseRevivalistDecoration>>
-	<<set $arcologies[0].FSChineseRevivalist = $arcologies[0].FSChineseRevivalistDecoration>>
-<</if>>
-<<if $arcologies[0].FSChineseRevivalistDecoration < $FSLockinLevel>>
-<<if $arcologies[0].FSChineseRevivalist == $arcologies[0].FSChineseRevivalistDecoration>>
-	@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
-<<elseif $arcologies[0].FSChineseRevivalistSMR == 1>>
-	<<set $arcologies[0].FSChineseRevivalist += 0.1*$FSSingleSlaveRep>>
-<</if>>
-<</if>>
+	<<if $arcologies[0].FSChineseRevivalist >= $FSLockinLevel>>
+		$arcologies[0].name believes implicitly that you possess the Mandate of Heaven.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.6>>
+		$arcologies[0].name agrees strongly with your pursuit of the Mandate of Heaven.
+		<<set $independenceDay = 1>>
+	<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.3>>
+		$arcologies[0].name is sympathetic to your pursuit of the Mandate of Heaven.
+	<<else>>
+		$arcologies[0].name is unconvinced of the wisdom of your pursuit of the Mandate of Heaven.
+	<</if>>
+	<<if $arcologies[0].FSChineseRevivalist < 0>>
+		<<run removeFS("FSChineseRevivalist")>>
+		<<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance = "default">><</if>>
+		<<ClearFacilityDecorations>>
+		@@.red;Your future society project has failed:@@ your citizens were repelled from your idea more than they were attracted to it. @@.yellow;You may select another option, or elect to try again.@@
+	<<elseif $arcologies[0].FSChineseRevivalist > $arcologies[0].FSChineseRevivalistDecoration>>
+		<<set $arcologies[0].FSChineseRevivalist = $arcologies[0].FSChineseRevivalistDecoration>>
+	<</if>>
+	<<if $arcologies[0].FSChineseRevivalistDecoration < $FSLockinLevel>>
+		<<if $arcologies[0].FSChineseRevivalist == $arcologies[0].FSChineseRevivalistDecoration>>
+			@@.yellow;Your societal development in this direction is being limited by $arcologies[0].name's lack of customization to support it.@@
+		<<elseif $arcologies[0].FSChineseRevivalistSMR == 1>>
+			<<set $arcologies[0].FSChineseRevivalist += 0.1*$FSSingleSlaveRep>>
+		<</if>>
+	<</if>>
 <</if>>
diff --git a/src/uncategorized/futureSociety.tw b/src/uncategorized/futureSociety.tw
index 74172aa793265e3bd3e9c1422abc08f444cef2e9..a010bc14021e8a6877989ff943967366b762ef35 100644
--- a/src/uncategorized/futureSociety.tw
+++ b/src/uncategorized/futureSociety.tw
@@ -593,7 +593,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 </span>
 
 <<if $arcologies[0].FSSupremacist != "unset">>
-	<br>''You are pursuing'' $arcologies[0].FSSupremacistRace superiority. //<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSSupremacist = "unset", $arcologies[0].FSSupremacistDecoration = 20, $arcologies[0].FSSupremacistLawME = 0, $arcologies[0].FSSupremacistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "supremacist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' $arcologies[0].FSSupremacistRace superiority. //<<link "Abandon" "Future Society">><<run removeFS("FSSupremacist")>><<if $assistantFSAppearance == "supremacist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSSupremacist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "succubus")>>
@@ -622,7 +622,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <</if>>
 
 <<if $arcologies[0].FSSubjugationist != "unset">>
-	<br>''You are pursuing'' $arcologies[0].FSSubjugationistRace inferiority. //<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSSubjugationist = "unset", $arcologies[0].FSSubjugationistDecoration = 20, $arcologies[0].FSSubjugationistLawME = 0, $arcologies[0].FSSubjugationistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "subjugationist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	<br>''You are pursuing'' $arcologies[0].FSSubjugationistRace inferiority. //<<link "Abandon" "Future Society">><<run removeFS("FSSubjugationist")>><<if $assistantFSAppearance == "subjugationist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSSubjugationist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "amazon") || ($assistantAppearance == "imp")>>
@@ -654,7 +654,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSRestart == "unset">>
 <<if $arcologies[0].FSRepopulationFocus != "unset">>
 	<br>''You are pursuing'' the belief that mass breeding will save humanity.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRepopulationFocus = "unset", $arcologies[0].FSRepopulationFocusDecoration = 20, $arcologies[0].FSRepopulationFocusSMR = 0, $arcologies[0].FSRepopulationFocusLaw = 0, $FSCredits += 1>><<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSRepopulationFocus")>><<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSRepopulationFocus" "clothesBoughtMaternityLingerie" "clothesBoughtMaternityDress" "clothesBoughtBelly">>
   <<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "pregnant fairy") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -674,14 +674,14 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSRestart != "unset">>
 <<if $arcologies[0].FSRestartDecoration != 100>>
 	<br>''You are pursuing'' Eugenics.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRestart = "unset", $arcologies[0].FSRestartDecoration = 20, $arcologies[0].FSRestartSMR = 0, $arcologies[0].FSRestartLaw = 0, $FSCredits += 1>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSRestart")>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSRestart">>
 <<else>>
 	<br>''You have established'' Eugenics.
 	<<if $eugenicsFullControl != 1>>
 		The Societal Elite will not permit you to abandon Eugenics.
 	<<else>>
-		//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRestart = "unset", $arcologies[0].FSRestartDecoration = 2, $arcologies[0].FSRestartSMR = 0, $arcologies[0].FSRestartLaw = 0, $propOutcome = 0, $FSCredits += 1>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//
+		//<<link "Abandon" "Future Society">><<run removeFS("FSRestart")>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//
 	<</if>>
 	<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSRestart">>
@@ -706,7 +706,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSGenderFundamentalist == "unset">>
 <<if $arcologies[0].FSGenderRadicalist != "unset">>
 	<br>''You are pursuing'' a radical redefinition of gender that identifies powerful people as male, and everyone else as female.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSGenderRadicalist = "unset", $arcologies[0].FSGenderRadicalistDecoration = 20, $arcologies[0].FSGenderRadicalistLawDicks = 0, $arcologies[0].FSGenderRadicalistLawFuta = 0, $arcologies[0].FSGenderRadicalistLawBeauty = 0, $arcologies[0].FSGenderRadicalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSGenderRadicalist")>><<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSGenderRadicalist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "shemale") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -726,7 +726,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSGenderRadicalist == "unset">>
 <<if $arcologies[0].FSGenderFundamentalist != "unset">>
 	<br>''You are pursuing'' gender traditionalism, including a societal preference for feminine slaves and support for slave pregnancy.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSGenderFundamentalist = "unset", $arcologies[0].FSGenderFundamentalistDecoration = 20, $arcologies[0].FSGenderFundamentalistSMR = 0, $arcologies[0].FSGenderFundamentalistLawBimbo = 0, $FSCredits += 1>><<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSGenderFundamentalist")>><<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSGenderFundamentalist" "clothesBoughtBunny">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "loli") || ($assistantAppearance == "fairy") || ($assistantAppearance == "pregnant fairy") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -745,7 +745,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSDegradationist == "unset">>
 <<if $arcologies[0].FSPaternalist != "unset">>
 	<br>''You are pursuing'' a vision of slave improvement, including slaves' health, mental well-being, and education.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPaternalist = "unset", $arcologies[0].FSPaternalistDecoration = 20, $arcologies[0].FSPaternalistLaw = 0, $arcologies[0].FSPaternalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSPaternalist")>><<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSPaternalist" "clothesBoughtConservative">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "loli") || ($assistantAppearance == "fairy") || ($assistantAppearance == "pregnant fairy") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub")>>
@@ -764,7 +764,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSPaternalist == "unset">>
 <<if $arcologies[0].FSDegradationist != "unset">>
 	<br>''You are pursuing'' slave degradation, a belief that slaves are not human and should not be treated decently.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSDegradationist = "unset", $arcologies[0].FSDegradationistDecoration = 20, $arcologies[0].FSDegradationistLaw = 0, $arcologies[0].FSDegradationistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "degradationist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSDegradationist")>><<if $assistantFSAppearance == "degradationist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSDegradationist" "clothesBoughtChains">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "monstergirl") || ($assistantAppearance == "businesswoman") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "imp")>>
@@ -783,7 +783,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSTransformationFetishist == "unset">>
 <<if $arcologies[0].FSBodyPurist != "unset">>
 	<br>''You are pursuing'' societal disapproval of implant surgery.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSBodyPurist = "unset", $arcologies[0].FSBodyPuristDecoration = 20, $arcologies[0].FSBodyPuristLaw = 0, $arcologies[0].FSBodyPuristSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "body purist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSBodyPurist")>><<if $assistantFSAppearance == "body purist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSBodyPurist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "goddess") || ($assistantAppearance == "loli") || ($assistantAppearance == "fairy") || ($assistantAppearance == "pregnant fairy") || ($assistantAppearance == "angel") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch")>>
@@ -802,7 +802,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSBodyPurist == "unset">>
 <<if $arcologies[0].FSTransformationFetishist != "unset">>
 	<br>''You are pursuing'' societal fetishization of implant surgery.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSTransformationFetishist = "unset", $arcologies[0].FSTransformationFetishistDecoration = 20, $arcologies[0].FSTransformationFetishistLaw = 0, $arcologies[0].FSTransformationFetishistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSTransformationFetishist")>><<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSTransformationFetishist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "shemale") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT")>>
@@ -821,7 +821,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSMaturityPreferentialist == "unset">>
 <<if $arcologies[0].FSYouthPreferentialist != "unset">>
 	<br>''You are pursuing'' an accentuated societal preference for younger slaves.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSYouthPreferentialist = "unset", $arcologies[0].FSYouthPreferentialistDecoration = 20, $arcologies[0].FSYouthPreferentialistLaw = 0, $arcologies[0].FSYouthPreferentialistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSYouthPreferentialist")>><<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSYouthPreferentialist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "shemale") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "loli") || ($assistantAppearance == "succubus") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp") || ($assistantAppearance == "witch")>>
@@ -840,7 +840,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSYouthPreferentialist == "unset">>
 <<if $arcologies[0].FSMaturityPreferentialist != "unset">>
 	<br>''You are pursuing'' a societal preference for older women.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSMaturityPreferentialist = "unset", $arcologies[0].FSMaturityPreferentialistDecoration = 20, $arcologies[0].FSMaturityPreferentialistLaw = 0, $arcologies[0].FSMaturityPreferentialistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSMaturityPreferentialist")>><<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSMaturityPreferentialist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "goddess") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "angel")>>
@@ -859,7 +859,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSAssetExpansionist == "unset">>
 <<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
 	<br>''You are supporting'' enthusiasm for slaves with girlish figures.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSSlimnessEnthusiast = "unset", $arcologies[0].FSSlimnessEnthusiastDecoration = 20, $arcologies[0].FSSlimnessEnthusiastSMR = 0, $arcologies[0].FSSlimnessEnthusiastLaw = 0, $FSCredits += 1>><<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSSlimnessEnthusiast")>><<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSSlimnessEnthusiast">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "shemale") || ($assistantAppearance == "loli") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -878,7 +878,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSSlimnessEnthusiast == "unset">>
 <<if $arcologies[0].FSAssetExpansionist != "unset">>
 	<br>''You are pursuing'' societal hunger for huge assets.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSAssetExpansionist = "unset", $arcologies[0].FSAssetExpansionistDecoration = 20, $arcologies[0].FSAssetExpansionistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSAssetExpansionist")>><<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSAssetExpansionist">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "shemale") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch")>>
@@ -896,7 +896,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 
 <<if $arcologies[0].FSPastoralist != "unset">>
 	<br>''You are pursuing'' societal normalization of slave milking.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPastoralist = "unset", $arcologies[0].FSPastoralistDecoration = 20, $arcologies[0].FSPastoralistLaw = 0, $arcologies[0].FSPastoralistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSPastoralist")>><<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSPastoralist" "clothesBoughtWestern">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "shemale") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -914,7 +914,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSHedonisticDecadence == "unset">>
 <<if $arcologies[0].FSPhysicalIdealist != "unset">>
 	<br>''You are pursuing'' societal reverence for the idealized human form, including height, health and muscle.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSPhysicalIdealist = "unset", $arcologies[0].FSPhysicalIdealistDecoration = 20, $arcologies[0].FSPhysicalIdealistSMR = 0, $arcologies[0].FSPhysicalIdealistLaw = 0, $FSCredits += 1>><<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSPhysicalIdealist")>><<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSPhysicalIdealist" "clothesBoughtOil">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "shemale") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -933,7 +933,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSPhysicalIdealist == "unset">>
 <<if $arcologies[0].FSHedonisticDecadence != "unset">>
 	<br>''You are pursuing'' societal normalization of overindulgence and immediate gratification. Be it food, drink, sex, drugs or whatever one's desire may be.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSHedonisticDecadence = "unset", $arcologies[0].FSHedonisticDecadenceDecoration = 20, $arcologies[0].FSHedonisticDecadenceLaw = 0, $arcologies[0].FSHedonisticDecadenceLaw2 = 0, $arcologies[0].FSHedonisticDecadenceSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "hedonistic decadence">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSHedonisticDecadence")>><<if $assistantFSAppearance == "hedonistic decadence">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSHedonisticDecadence">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "imp") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
@@ -952,7 +952,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if $arcologies[0].FSNull == "unset">>
 <<if $arcologies[0].FSChattelReligionist != "unset">>
 	<br>''You are pursuing'' a new strain of religion that emphasizes the slaveholding portions of religious history.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSChattelReligionist = "unset", $arcologies[0].FSChattelReligionistDecoration = 20, $arcologies[0].FSChattelReligionistLaw = 0, $arcologies[0].FSChattelReligionistCreed = 0, $arcologies[0].FSChattelReligionistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSChattelReligionist")>><<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSChattelReligionist" "clothesBoughtHabit">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp")>>
@@ -971,7 +971,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")>>
 <<if $arcologies[0].FSRomanRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of a new Rome.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSRomanRevivalist = "unset", $arcologies[0].FSRomanRevivalistDecoration = 20, $arcologies[0].FSRomanRevivalistLaw = 0, $arcologies[0].FSRomanRevivalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSRomanRevivalist")>><<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSRomanRevivalist" "clothesBoughtToga">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "amazon") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -990,7 +990,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")>>
 <<if $arcologies[0].FSAztecRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of a new Aztec Empire.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSAztecRevivalist = "unset", $arcologies[0].FSAztecRevivalistDecoration = 20, $arcologies[0].FSAztecRevivalistSMR = 0, $arcologies[0].FSAztecRevivalistLaw = 0, $FSCredits += 1>><<if $assistantFSAppearance == "aztec revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSAztecRevivalist")>><<if $assistantFSAppearance == "aztec revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSAztecRevivalist" "clothesBoughtHuipil">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "amazon") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -1009,7 +1009,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")>>
 <<if $arcologies[0].FSEgyptianRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of Pharaoh's Egypt.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSEgyptianRevivalist = "unset", $arcologies[0].FSEgyptianRevivalistDecoration = 20, $arcologies[0].FSEgyptianRevivalistLaw = 0, $arcologies[0].FSEgyptianRevivalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSEgyptianRevivalist")>><<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSEgyptianRevivalist" "clothesBoughtEgypt">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -1028,7 +1028,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")>>
 <<if $arcologies[0].FSEdoRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of Edo Japan.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSEdoRevivalist = "unset", $arcologies[0].FSEdoRevivalistDecoration = 20, $arcologies[0].FSEdoRevivalistLaw = 0, $arcologies[0].FSEdoRevivalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSEdoRevivalist")>><<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSEdoRevivalist" "clothesBoughtKimono">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "loli") || ($assistantAppearance == "kitsune") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -1045,7 +1045,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")>>
 <<if $arcologies[0].FSArabianRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of the Sultanate of old.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSArabianRevivalist = "unset", $arcologies[0].FSArabianRevivalistDecoration = 20, $arcologies[0].FSArabianRevivalistLaw = 0, $arcologies[0].FSArabianRevivalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSArabianRevivalist")>><<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSArabianRevivalist" "clothesBoughtHarem">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -1062,7 +1062,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 <<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset")>>
 <<if $arcologies[0].FSChineseRevivalist != "unset">>
 	<br>''You are pursuing'' a vision of ancient China.
-	//<<link [[Abandon|Future Society]]>><<set $arcologies[0].FSChineseRevivalist = "unset", $arcologies[0].FSChineseRevivalistDecoration = 20, $arcologies[0].FSChineseRevivalistLaw = 0, $arcologies[0].FSChineseRevivalistSMR = 0, $FSCredits += 1>><<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
+	//<<link "Abandon" "Future Society">><<run removeFS("FSChineseRevivalist")>><<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance = "default">><</if>><<ClearFacilityDecorations>><</link>>//<br>&nbsp;&nbsp;&nbsp;&nbsp;
 	<<FSChangeDecoration "FSChineseRevivalist" "clothesBoughtQipao">>
 	<<if $PAPublic == 1>>
 	<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
@@ -1081,7 +1081,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 	<<if $arcologies[0].FSNull != "unset">>
 		<br>''You are permitting <<if $arcologies[0].FSNull <= 25>>basic<<elseif $arcologies[0].FSNull <= 50>>considerable<<elseif $arcologies[0].FSNull <= 75>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
 		<<if $arcologies[0].FSNull <= 25>>
-			//[[Abandon|Future Society][$arcologies[0].FSNull = "unset", $arcologies[0].FSNullDecoration = 20, $arcologies[0].FSNullLaw = 0, $assistantFSAppearance = "default", $FSCredits += 1]]//
+			//[[Abandon|Future Society][removeFS("FSNull")]]//
 		<<else>>
 			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 25, $FSCredits += 1]]//
 		<</if>>
@@ -1100,7 +1100,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 	<<if $arcologies[0].FSNull != "unset">>
 		<br>''You are permitting <<if $arcologies[0].FSNull <= 17>>basic<<elseif $arcologies[0].FSNull <= 34>>some<<elseif $arcologies[0].FSNull <= 51>>considerable<<elseif $arcologies[0].FSNull <= 68>>great<<elseif $arcologies[0].FSNull <= 85>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
 		<<if $arcologies[0].FSNull <= 20>>
-			//[[Abandon|Future Society][$arcologies[0].FSNull = "unset", $arcologies[0].FSNullDecoration = 20, $arcologies[0].FSNullLaw = 0, $assistantFSAppearance = "default", $FSCredits += 1]]//
+			//[[Abandon|Future Society][removeFS("FSNull")]]//
 		<<else>>
 			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 17, $FSCredits += 1]]//
 		<</if>>
@@ -1119,7 +1119,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 	<<if $arcologies[0].FSNull != "unset">>
 		<br>''You are permitting <<if $arcologies[0].FSNull <= 15>>basic<<elseif $arcologies[0].FSNull <= 30>>some<<elseif $arcologies[0].FSNull <= 45>>notable<<elseif $arcologies[0].FSNull <= 60>>considerable<<elseif $arcologies[0].FSNull <= 75>>great<<elseif $arcologies[0].FSNull <= 90>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
 		<<if $arcologies[0].FSNull <= 20>>
-			//[[Abandon|Future Society][$arcologies[0].FSNull = "unset", $arcologies[0].FSNullDecoration = 20, $arcologies[0].FSNullLaw = 0, $assistantFSAppearance = "default", $FSCredits += 1]]//
+			//[[Abandon|Future Society][removeFS("FSNull")]]//
 		<<else>>
 			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 15, $FSCredits += 1]]//
 		<</if>>
@@ -1138,7 +1138,7 @@ You are spending <<print cashFormat($FSSpending)>> each week to support your soc
 	<<if $arcologies[0].FSNull != "unset">>
 		<br>''You are permitting <<if $arcologies[0].FSNull <= 20>>basic<<elseif $arcologies[0].FSNull <= 40>>considerable<<elseif $arcologies[0].FSNull <= 60>>great<<elseif $arcologies[0].FSNull <= 80>>advanced<<else>>absolute<</if>>'' cultural freedom in your arcology.
 		<<if $arcologies[0].FSNull <= 20>>
-			//[[Abandon|Future Society][$arcologies[0].FSNull = "unset", $arcologies[0].FSNullDecoration = 20, $arcologies[0].FSNullLaw = 0, $assistantFSAppearance = "default", $FSCredits += 1]]//
+			//[[Abandon|Future Society][removeFS("FSNull")]]//
 		<<else>>
 			//[[Withdraw|Future Society][$arcologies[0].FSNull -= 20, $FSCredits += 1]]//
 		<</if>>
diff --git a/src/uncategorized/reputation.tw b/src/uncategorized/reputation.tw
index 82b0283056a9eeb44e433b91979df17f5f820210..a1e639a1416eecf17204bf9300ccb3bd33588cb6 100644
--- a/src/uncategorized/reputation.tw
+++ b/src/uncategorized/reputation.tw
@@ -765,11 +765,7 @@ On formal occasions, you are announced as $PCTitle.
 <<elseif $arcologies[0].FSRestart != "unset">>
 	<<if $failedElite > 300>>
 		The Societal Elite @@.red;have departed from your arcology in disgust@@.
-		<<set $arcologies[0].FSRestart = "unset">>
-		<<set $arcologies[0].FSRestartDecoration = 20>>
-		<<set $arcologies[0].FSRestartLaw = 0>>
-		<<set $FSCredits += 1>>
-		<<set $failedElite = 0>>
+		<<run removeFS("FSRestart")>>
 		<<set $rep -= 10000>>
 		<<set $ACitizens = Math.max($ACitizens - random(30,100), 0)>>
 		<<if $arcologies[0].prosperity > 50>>