:: Neighbors FS Adoption [nobr]
 
$arcologies[$i].name is prosperous enough that 
<<switch $arcologies[$i].government>>
<<case "elected officials">>
	its elected officials consider
<<case "a committee">>
	the committee that controls it considers
<<case "an oligarchy" "your trustees">>
	its leading citizens consider
<<case "an individual">>
	its owner and its citizens consider
<<case "your agent">>
	your agent and its citizens consider
<<case "a corporation">>
	its board of directors considers
<<default>>
	its citizens consider
<</switch>>
societal development.
<<set $adopted to 0>>

/* PRIME RIVALRY FS ADOPTION */

<<if $arcologies[$i].rival == 1>>
<<if $arcologies[$i].government == "an individual">>
<<if $rivalryFSAdopted == 0>>

  <<set $rivalryFSAdopted to 1>>
  <<set $desc to "Its owner is">>
  <<switch $rivalryFS>>
  <<case "Racial Subjugationism">>
	<<if $arcologies[$i].FSSubjugationist != "unset">><<set $arcologies[$i].FSSubjugationist to "unset">><</if>>
	$desc preoccupied by belief in the superiority of the $arcologies[0].FSSubjugationistRace race, leading the arcology to @@color:yellow;adopt $arcologies[0].FSSubjugationistRace Supremacy.@@
	<<set $arcologies[$i].FSSupremacist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSupremacistRace to $arcologies[0].FSSubjugationistRace>>
  <<case "Racial Supremacism">>
	<<if $arcologies[$i].FSSupremacist != "unset">><<set $arcologies[$i].FSSupremacist to "unset">><</if>>
	$desc preoccupied by a racial animus towards $arcologies[0].FSSupremacistRace people, leading the arcology to @@color:yellow;adopt $arcologies[0].FSSupremacistRace Subjugation.@@
	<<set $arcologies[$i].FSSubjugationist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSubjugationistRace to $arcologies[0].FSSupremacistRace>>
  <<case "Repopulation Focus">>
	<<if $arcologies[$i].FSRepopulationFocus != "unset">><<set $arcologies[$i].FSRepopulationFocus to "unset">><</if>>
	$desc obsessed with breeding a new society, leading the arcology to @@color:yellow;adopt Repopulationism.@@
	<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
  <<case "Eugenics">>
	<<if $arcologies[$i].FSRestart != "unset">><<set $arcologies[$i].FSRestart to "unset">><</if>>
	$desc obsessed with building a new society based on its societal elite, leading the arcology to @@color:yellow;adopt Eugenics.@@
	<<set $arcologies[$i].FSRestart to 5>><<set $adopted to 1>>
  <<case "Gender Fundamentalism">>
	<<if $arcologies[$i].FSGenderFundamentalist != "unset">><<set $arcologies[$i].FSGenderFundamentalist to "unset">><</if>>
	$desc enthusiastic about knocking slaves up, leading the arcology to @@color:yellow;adopt Gender Fundamentalism.@@
	<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
  <<case "Gender Radicalism">>
	<<if $arcologies[$i].FSGenderRadicalist != "unset">><<set $arcologies[$i].FSGenderRadicalist to "unset">><</if>>
	$desc enthusiastic about fucking slaves in the butt, leading the arcology to @@color:yellow;adopt Gender Radicalism.@@
	<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
  <<case "Paternalism">>
	<<if $arcologies[$i].FSPaternalist != "unset">><<set $arcologies[$i].FSPaternalist to "unset">><</if>>
	$desc partial to screaming and struggling, leading the arcology to @@color:yellow;adopt Degradationism.@@
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
  <<case "Degradationism">>
	<<if $arcologies[$i].FSDegradationist != "unset">><<set $arcologies[$i].FSDegradationist to "unset">><</if>>
	$desc devoted to their slaves' advancement, leading the arcology to @@color:yellow;adopt Paternalism.@@
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
  <<case "Body Purism">>
	<<if $arcologies[$i].FSBodyPurist != "unset">><<set $arcologies[$i].FSBodyPurist to "unset">><</if>>
	$desc fascinated with extreme surgery, leading the arcology to @@color:yellow;adopt Transformation Fetishism.@@
	<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
  <<case "Transformation Fetishism">>
	<<if $arcologies[$i].FSTransformationFetishist != "unset">><<set $arcologies[$i].FSTransformationFetishist to "unset">><</if>>
	$desc concerned by trends in their slaves' health, leading the arcology to @@color:yellow;adopt Body Purism.@@
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
  <<case "Youth Preferentialism">>
	<<if $arcologies[$i].FSYouthPreferentialist != "unset">><<set $arcologies[$i].FSYouthPreferentialist to "unset">><</if>>
	$desc devoted to time in bed with their MILF slaves, leading the arcology to @@color:yellow;adopt Maturity Preferentialism.@@
	<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
  <<case "Maturity Preferentialism">>
	<<if $arcologies[$i].FSMaturityPreferentialist != "unset">><<set $arcologies[$i].FSMaturityPreferentialist to "unset">><</if>>
	$desc devoted to fucking nubile young slaves, leading the arcology to @@color:yellow;adopt Youth Preferentialism.@@
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
  <<case "Slimness Enthusiasm">>
	<<if $arcologies[$i].FSSlimnessEnthusiast != "unset">><<set $arcologies[$i].FSSlimnessEnthusiast to "unset">><</if>>
	$desc loves boobs, the bigger, the better, leading the arcology to @@color:yellow;adopt Asset Expansionism.@@
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
  <<case "Asset Expansionism">>
	<<if $arcologies[$i].FSAssetExpansionist != "unset">><<set $arcologies[$i].FSAssetExpansionist to "unset">><</if>>
	$desc loves a slim slave with tight holes, leading the arcology to @@color:yellow;adopt Slimness Enthusiasm.@@
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
  <<case "Chattel Religionism">>
	<<if $arcologies[$i].FSNull != "unset">><<set $arcologies[$i].FSNull to "unset">><</if>>
	$desc open minded, leading the arcology to @@color:yellow;permit cultural freedom.@@
	<<set $arcologies[$i].FSNull to 5>><<set $adopted to 1>>
  <<case "Multiculturalism">>
	<<if $arcologies[$i].FSChattelReligionist != "unset">><<set $arcologies[$i].FSChattelReligionist to "unset">><</if>>
	$desc devoutly religious, and interested in a reformation, leading the arcology to @@color:yellow;adopt Chattel Religionism.@@
	<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
  <<case "Roman Revivalism">>
	<<if $arcologies[$i].FSRomanRevivalist != "unset">><<set $arcologies[$i].FSRomanRevivalist to "unset">><</if>>
	$desc fascinated by ancient Egyptian history, leading the arcology to @@color:yellow;adopt Egyptian Revivalism.@@
	<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
  <<case "Egyptian Revivalism">>
	<<if $arcologies[$i].FSEgyptianRevivalist != "unset">><<set $arcologies[$i].FSEgyptianRevivalist to "unset">><</if>>
	$desc fascinated by Arabian romanticism, leading the arcology to @@color:yellow;adopt Arabian Revivalism.@@
	<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
  <<case "Edo Revivalism">>
	<<if $arcologies[$i].FSEdoRevivalist != "unset">><<set $arcologies[$i].FSEdoRevivalist to "unset">><</if>>
	$desc fascinated by the long tale of Chinese history, leading the arcology to @@color:yellow;adopt Chinese Revivalism.@@
	<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
  <<case "Arabian Revivalism">>
	<<if $arcologies[$i].FSArabianRevivalist != "unset">><<set $arcologies[$i].FSArabianRevivalist to "unset">><</if>>
	$desc fascinated by classical Roman history, leading the arcology to @@color:yellow;adopt Roman Revivalism.@@
	<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
  <<case "Chinese Revivalism">>
	<<if $arcologies[$i].FSChineseRevivalist != "unset">><<set $arcologies[$i].FSChineseRevivalist to "unset">><</if>>
	$desc fascinated by Japanese history, leading the arcology to @@color:yellow;adopt Edo Revivalism.@@
	<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
  <</switch>>

<<else>>

/* RIVAL ADOPTION */

  <<set $desc to "Its owner is">>
  <<if $arcologies[0].FSSubjugationist > random(5,60)>>
	<<if ($arcologies[$i].FSSupremacist is "unset")>>
	<<if ($arcologies[$i].FSSubjugationist is "unset")>>
	$desc preoccupied by belief in the superiority of the $arcologies[0].FSSubjugationistRace race, leading the arcology to @@color:yellow;adopt $arcologies[0].FSSubjugationistRace Supremacy.@@
	<<set $arcologies[$i].FSSupremacist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSupremacistRace to $arcologies[0].FSSubjugationistRace>>
	<</if>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSSupremacist > random(5,60)>>
	<<if ($arcologies[$i].FSSubjugationist is "unset")>>
	<<if ($arcologies[$i].FSSupremacist is "unset")>>
	$desc preoccupied by a racial animus towards $arcologies[0].FSSupremacistRace people, leading the arcology to @@color:yellow;adopt $arcologies[0].FSSupremacistRace Subjugation.@@
	<<set $arcologies[$i].FSSubjugationist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSubjugationistRace to $arcologies[0].FSSupremacistRace>>
	<</if>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSRestart > random(5,60)>>
	<<if ($arcologies[$i].FSRestart is "unset") and ($arcologies[$i].FSRepopulationFocus is "unset")>>
	$desc obsessed with breeding a new society, leading the arcology to @@color:yellow;adopt Repopulationism.@@
	<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSRepopulationFocus > random(5,60)>>
	<<if ($arcologies[$i].FSRestart is "unset") and ($arcologies[$i].FSRepopulationFocus is "unset")>>
	$desc obsessed with creating a new, better society, leading the arcology to @@color:yellow;adopt Eugenics.@@
	<<set $arcologies[$i].FSRestart to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSGenderRadicalist > random(5,60)>>
	<<if ($arcologies[$i].FSGenderRadicalist is "unset") && ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	$desc enthusiastic about knocking slaves up, leading the arcology to @@color:yellow;adopt Gender Fundamentalism.@@
	<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSGenderFundamentalist > random(5,60)>>
	<<if ($arcologies[$i].FSGenderRadicalist is "unset") && ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	$desc enthusiastic about fucking slaves in the butt, leading the arcology to @@color:yellow;adopt Gender Radicalism.@@
	<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSPaternalist > random(5,60)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	$desc partial to screaming and struggling, leading the arcology to @@color:yellow;adopt Degradationism.@@
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSDegradationist > random(5,60)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	$desc devoted to their slaves' advancement, leading the arcology to @@color:yellow;adopt Paternalism.@@
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSBodyPurist > random(5,60)>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	$desc fascinated with extreme surgery, leading the arcology to @@color:yellow;adopt Transformation Fetishism.@@
	<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSTransformationFetishist > random(5,60)>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	$desc concerned by trends in their slaves' health, leading the arcology to @@color:yellow;adopt Body Purism.@@
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSYouthPreferentialist > random(5,60)>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	$desc devoted to time in bed with their MILF slaves, leading the arcology to @@color:yellow;adopt Maturity Preferentialism.@@
	<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
  <<elseif $arcologies[0].FSMaturityPreferentialist > random(5,60)>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	$desc devoted to fucking nubile young slaves, leading the arcology to @@color:yellow;adopt Youth Preferentialism.@@
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
	<</if>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSSlimnessEnthusiast > random(5,60)>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	$desc loves boobs, the bigger, the better, leading the arcology to @@color:yellow;adopt Asset Expansionism.@@
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSAssetExpansionist > random(5,60)>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	$desc loves a slim slave with tight holes, leading the arcology to @@color:yellow;adopt Slimness Enthusiasm.@@
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSPastoralist > random(5,60)>>
	<<if ($arcologies[$i].FSPastoralist is "unset") && ($arcologies[$i].FSPhysicalIdealist is "unset")>>
	$desc addicted to breast milk straight from the nipple, leading the arcology to @@color:yellow;adopt Pastoralism.@@
	<<set $arcologies[$i].FSPastoralist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSPhysicalIdealist > random(5,60)>>
	<<if ($arcologies[$i].FSPhysicalIdealist is "unset") && ($arcologies[$i].FSPastoralist is "unset")>>
	$desc pretty devoted to spending time in the gym, leading the arcology to @@color:yellow;adopt Physical Idealism.@@
	<<set $arcologies[$i].FSPhysicalIdealist to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  <<if $arcologies[0].FSRomanRevivalist > random(5,60)>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by Arabian romanticism, leading the arcology to @@color:yellow;adopt Arabian Revivalism.@@
	<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
	<<break>>
	<</if>>
  <<elseif $arcologies[0].FSEgyptianRevivalist > random(5,60)>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by classical Roman history, leading the arcology to @@color:yellow;adopt Roman Revivalism.@@
	<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSEdoRevivalist > random(5,60)>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by the long tale of Chinese history, leading the arcology to @@color:yellow;adopt Chinese Revivalism.@@
	<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSArabianRevivalist > random(5,60)>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by ancient Egyptian history, leading the arcology to @@color:yellow;adopt Egyptian Revivalism.@@
	<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
	<</if>>
  <<elseif $arcologies[0].FSChineseRevivalist > random(5,60)>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by Japanese history, leading the arcology to @@color:yellow;adopt Edo Revivalism.@@
	<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
	<</if>>
  <</if>>
  
<</if>>
<</if>>
<</if>>

/* AGENT ADOPTION*/

<<if ($arcologies[$i].government is "your agent")>>
<<for $j to 0; $j < $leaders.length; $j++>>
<<if $arcologies[$i].leadershipID == $leaders[$j].ID>>

<<if $adopted == 0>>
<<if ($arcologies[$i].FSGenderRadicalist is "unset")>>
<<if ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	<<if $leaders[$j].fetish == "pregnancy">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Repopulationism@@, since as a pregnancy fetishist, she can't wait to see the female population's bellies swell with life.
		<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].preg < -1 || ($leaders[$j].ovaries == 0 && $leaders[$j].mpreg != 1)>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Eugenics@@, since if no-one can get pregnant, she won't be alone.
		<<set $arcologies[$i].FSRestart to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSGenderRadicalist is "unset")>>
<<if ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	<<if $leaders[$j].dick > 0>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Gender Radicalism@@, since she's a walking, swinging argument for dickgirls.
		<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].preg > 0>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Gender Fundamentalism@@, since its citizens find leadership by a pregnant woman fascinating.
		<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSPaternalist is "unset")>>
<<if ($arcologies[$i].FSDegradationist is "unset")>>
	<<if $leaders[$j].behavioralQuirk == "advocate">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Paternalism@@, since as an advocate for slavery, she believes in its benefits.
		<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].fetish == "sadist">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Degradationism@@, since as a sexual sadist, she's excited by the idea of leading a society that applauds her cruelest impulses.
		<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSBodyPurist is "unset")>>
<<if ($arcologies[$i].FSTransformationFetishist is "unset")>>
	<<if $leaders[$j].chem > 50>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Body Purism@@, since she knows what long term drug damage feels like, and doesn't want any slave to ever experience it again.
		<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].boobsImplant > 1000>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Transformation Fetishism@@, out of a perverse desire to subject all slaves to massive implants like hers.
		<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSYouthPreferentialist is "unset")>>
<<if ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	<<if $leaders[$j].actualAge <= 25>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Youth Preferentialism@@, to buttress acceptance of her own young age.
		<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].actualAge > 35>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Maturity Preferentialism@@, since she has a certain personal interest in promoting the idea that MILFs are sexy.
		<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset")>>
<<if ($arcologies[$i].FSAssetExpansionist is "unset")>>
	<<if $leaders[$j].behavioralQuirk == "insecure">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Slimness Enthusiasm@@, since her history of anorexia has deeply impacted her idea of beauty.
		<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].fetish == "boobs">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Asset Expansionism@@, since she's a breast expansion fetishist in addition to being a mere breast fetishist.
		<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSPastoralist is "unset")>>
<<if ($arcologies[$i].FSPhysicalIdealist is "unset")>>
	<<if $leaders[$j].fetish == "cumslut">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Pastoralism@@, since she already loves sucking down slaves' precious fluids.
		<<set $arcologies[$i].FSPastoralist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].behavioralQuirk == "fitness">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Physical Idealism@@, since she's a fitness fanatic herself.
		<<set $arcologies[$i].FSPhysicalIdealist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSChattelReligionist is "unset")>>
<<if ($arcologies[$i].FSNull is "unset")>>
	<<if $leaders[$j].behavioralQuirk == "devout">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Chattel Religionism@@, to share and spread her deeply held beliefs about the holiness of sexual service.
		<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].behavioralQuirk == "sinful">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Chattel Religionism@@, since she's excited by the prospect of getting away with horrible sins against old religions in public.
		<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<<if $familyTesting == 1>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSRomanRevivalist is "unset")>>
<<if ($arcologies[$i].FSEgyptianRevivalist is "unset")>>
<<if ($arcologies[$i].FSEdoRevivalist is "unset")>>
<<if ($arcologies[$i].FSArabianRevivalist is "unset")>>
<<if ($arcologies[$i].FSChineseRevivalist is "unset")>>
	<<if ($leaders[$j].relationshipTarget != 0)>>
		<<for $k to 0; $k < $slaves.length; $k++>>
			<<if $leaders[$j].mother == $slaves[$k].ID>>
				<<if $leaders[$j].relationshipTarget == $slaves[$k].ID>>
					Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
					<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
				<</if>>
				<<break>>
			<<elseif $leaders[$j].father == $slaves[$k].ID>>
				<<if $leaders[$j].relationshipTarget == $slaves[$k].ID>>
					Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
					<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
				<</if>>
				<<break>>
			<<elseif $leaders[$j].ID == $slaves[$k].father>>
				<<if $leaders[$j].relationshipTarget == $slaves[$k].ID>>
					Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
					<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
				<</if>>
				<<break>>
			<<elseif $leaders[$j].ID == $slaves[$k].mother>>
				<<if $leaders[$j].relationshipTarget == $slaves[$k].ID>>
					Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
					<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
				<</if>>
				<<break>>
			<<elseif areSisters($leaders[$j], $slaves[$k]) > 0>>
				<<if $leaders[$j].relationshipTarget == $slaves[$k].ID>>
					Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
					<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
				<</if>>
				<<break>>
			<</if>>
		<</for>>
	<<elseif $leaders[$j].nationality == "Chinese">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Chinese Revivalism@@, since she's Chinese herself and can claim high honor in such a society.
		<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].nationality == "Japanese">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Edo Revivalism@@, since she's Japanese herself and can claim high honor in such a society.
		<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].behavioralQuirk == "confident">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Roman Revivalism@@, since it appeals to her confident, patrician nature.
		<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].fetish == "dom">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Arabian Revivalism@@, since she's sexually dominant and quite likes the idea of overseeing slave bazaars.
		<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<<else>>
<<if $adopted == 0>>
<<if ($arcologies[$i].FSRomanRevivalist is "unset")>>
<<if ($arcologies[$i].FSEgyptianRevivalist is "unset")>>
<<if ($arcologies[$i].FSEdoRevivalist is "unset")>>
<<if ($arcologies[$i].FSArabianRevivalist is "unset")>>
<<if ($arcologies[$i].FSChineseRevivalist is "unset")>>
	<<if ($leaders[$j].relationshipTarget != 0) && ($leaders[$j].relationshipTarget == $leaders[$j].relationTarget)>>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Egyptian Revivalism@@, since she's already part of a gloriously incestuous relationship.
		<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].nationality == "Chinese">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Chinese Revivalism@@, since she's Chinese herself and can claim high honor in such a society.
		<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].nationality == "Japanese">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Edo Revivalism@@, since she's Japanese herself and can claim high honor in such a society.
		<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].behavioralQuirk == "confident">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Roman Revivalism@@, since it appeals to her confident, patrician nature.
		<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<<elseif $leaders[$j].fetish == "dom">>
		Your agent @@color:pink;$leaders[$j].slaveName@@ successfully pushes it to @@color:yellow;adopt Arabian Revivalism@@, since she's sexually dominant and quite likes the idea of overseeing slave bazaars.
		<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>
<</if>>

<<break>>
<</if>>
<</for>>
<</if>>

/* CROSS-FS ADOPTION*/

<<if $adopted == 0>>
<<if $arcologies[$i].FSSubjugationist > random(50,200)>>
	<<if ($arcologies[$i].FSDegradationist is "unset") && ($arcologies[$i].FSPaternalist is "unset")>>
	The arcology's racial Subjugationist culture @@color:yellow;pushes it towards Degradationism.@@
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<<break>>
	<<elseif ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	The arcology's racial Subjugationist culture @@color:yellow;pushes it towards Egyptian Revivalism,@@ since the Ancient Egyptians are famous for keeping a race of slaves.
	<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<<break>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSSupremacist > random(50,200)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's racial Supremacist culture @@color:yellow;pushes it towards Paternalism.@@
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset") && ($arcologies[$i].FSSupremacistRace is "asian")>>
	<<if random(0,1) == 0>>
		The arcology's racial Supremacist culture @@color:yellow;pushes it towards Edo Revivalism,@@ since the beauty and grace of the Japanese people are watchwords there.
		<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
	<<else>>
		The arcology's racial Supremacist culture @@color:yellow;pushes it towards Chinese Revivalism,@@ since the wisdom of the Middle Kingdom is admired there.
		<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
	<</if>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSRepopulationFocus > random(50,200)>>
  <<if ($arcologies[$i].FSAssetExpationist is "unset") and ($arcologies[$i].FSSlimnessEnthusiast is "unset")>>
    The arcology's Repopulationist culture @@color:yellow;pushes it towards Asset Expansionism,@@ since big pregnant bellies go great with huge tits and asses.
	<<set $arcologies[$i].FSAssetExpationist to 5>><<set $adopted to 1>>
  <<elseif ($arcologies[$i].FSGenderFundamentalist is "unset") and ($arcologies[$i].FSGenderRadicalist is "unset")>>
    The arcology's Repopulationist culture @@color:yellow;pushes it towards Gender Fundamentalism,@@ since traditional women make better mothers.
	<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
  <</if>>
<<elseif $arcologies[$i].Restart > random(50,200)>>
	<<if ($arcologies[$i].FSDegradationist is "unset") and ($arcologies[$i].FSPaternalist is "unset")>>
	The arcology's elite focused culture @@color:yellow;pushes it towards Degradationism,@@ since its lowest class deserves nothing but misery.
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSGenderRadicalist > random(50,200)>>
	<<if ($arcologies[$i].FSTransformationFetishist is "unset") && ($arcologies[$i].FSBodyPurist is "unset")>>
	The arcology's Gender Radicalist culture @@color:yellow;pushes it towards Transformation Fetishism,@@ since surgery can turn a slave into anything.
	<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	The arcology's Gender Radicalist culture @@color:yellow;pushes it towards Slimness Enthusiasm,@@ since that's the kind of body many of its slaves have.
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
	<</if>>
<<elseif $arcologies[$i].FSGenderFundamentalist > random(50,200)>>
	<<if ($arcologies[$i].FSPastoralist is "unset")>>
	The arcology's Gender Fundamentalist culture @@color:yellow;pushes it towards Pastoralism,@@ since its pregnant slaves are already giving milk.
	<<set $arcologies[$i].FSPastoralist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	The arcology's Gender Fundamentalist culture @@color:yellow;pushes it towards Youth Preferentialism,@@ since younger slaves are beautiful and fertile.
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSPaternalist > random(50,200)>>
	<<if ($arcologies[$i].FSChattelReligionist is "unset")>>
	The arcology's Paternalist culture @@color:yellow;pushes it towards Chattel Religionism,@@ since many of its slaves are already worshipful.
	<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Paternalist culture @@color:yellow;pushes it towards Body Purism,@@ since giving slaves dangerous drugs is hardly good for them.
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	The arcology's Paternalist culture @@color:yellow;pushes it towards Roman Revivalism,@@ since loyal service to the res publica bears similarity to their existing mores.
	<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<<elseif $arcologies[$i].FSDegradationist > random(50,200)>>
	<<if ($arcologies[$i].FSTransformationFetishist is "unset") && ($arcologies[$i].FSBodyPurist is "unset")>>
	The arcology's Degradationist culture @@color:yellow;pushes it towards Transformation Fetishism,@@ the ultimate expression of power over slave bodies.
	<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSGenderRadicalist is "unset") && ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	The arcology's Degradationist culture @@color:yellow;pushes it towards Gender Radicalism,@@ since the joy of forcing a gender role on a slave is already popular.
	<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSBodyPurist > random(50,200)>>
	<<if ($arcologies[$i].FSPhysicalIdealist is "unset")>>
	The arcology's Body Purist culture @@color:yellow;pushes it towards Physical Idealism,@@ since it already takes an intense interest in bodily perfection.
	<<set $arcologies[$i].FSPhysicalIdealist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's Body Purist culture @@color:yellow;pushes it towards Paternalism,@@ since it's become obvious that happiness is a necessary part of wellness.
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
<<elseif $arcologies[$i].FSTransformationFetishist > random(50,200)>>
	<<if ($arcologies[$i].FSAssetExpansionist is "unset") && ($arcologies[$i].FSSlimnessEnthusiast is "unset")>>
	The arcology's Transformation Fetishist culture @@color:yellow;pushes it towards Asset Expansionism,@@ since it's already overrun with massive tits and asses.
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSDegradationist is "unset") && ($arcologies[$i].FSPaternalist is "unset")>>
	The arcology's Transformation Fetishist culture @@color:yellow;pushes it towards Degradationism,@@ since it's already used to slaves whining about their latest surgeries.
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSYouthPreferentialist > random(50,200)>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	The arcology's Youth Preferentialist culture @@color:yellow;pushes it towards Slimness Enthusiasm,@@ since that's the kind of body many of its slaves have.
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
  <<elseif ($arcologies[$i].FSRepopulationFocus is "unset")>>
    The arcology's Youth Preferentialist culture @@color:yellow;pushes it towards Repopulation,@@ since many of its slaves are deliciously ripe for breeding.
	<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
  <</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSMaturityPreferentialist > random(50,200)>>
	<<if ($arcologies[$i].FSAssetExpansionist is "unset") and ($arcologies[$i].FSSlimnessEnthusiast is "unset")>>
	The arcology's Maturity Preferentialist culture @@color:yellow;pushes it towards Asset Expansionism,@@ since that's the kind of body many of its slaves have.
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's Maturity Preferentialist culture @@color:yellow;pushes it towards Paternalism,@@ since its many older slaves have skills best applied by a happy woman.
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSSlimnessEnthusiast > random(50,200)>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	The arcology's Slimness Enthusiast culture @@color:yellow;pushes it towards Youth Preferentialism,@@ since younger slaves are often attractively slim.
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Slimness Enthusiast culture @@color:yellow;pushes it towards Body Purism,@@ since the last thing they want is prettily slender girls with health trouble.
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<</if>>
<<elseif $arcologies[$i].FSAssetExpansionist > random(50,200)>>
	<<if ($arcologies[$i].FSMaturityPreferentialist is "unset") && ($arcologies[$i].FSYouthPreferentialist is "unset")>>
	The arcology's Asset Expansionist culture @@color:yellow;pushes it towards Maturity Preferentialism,@@ since MILF slaves tend to come with nice big tits.
	<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Asset Expansionist culture @@color:yellow;pushes it towards Body Purism,@@ since slaves on curatives are slaves not on growth hormones.
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSPastoralist > random(50,200)>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Pastoralist culture @@color:yellow;pushes it towards Body Purism,@@ since there have been concerns about milk purity.
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSAssetExpansionist is "unset") && ($arcologies[$i].FSSlimnessEnthusiast is "unset")>>
	The arcology's Pastoralist culture @@color:yellow;pushes it towards Asset Expansionism,@@ since they're convinced that there's no such thing as udders that are too big.
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<</if>>
<<elseif $arcologies[$i].FSPhysicalIdealist > random(50,200)>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Physical Idealist culture @@color:yellow;pushes it towards Body Purism,@@ since it's already used to treating slaves' bodies as temples.
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	The arcology's Physical Idealist culture @@color:yellow;pushes it towards Youth Preferentialism,@@ since beauty and athletic prowess do tend to peak early.
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $seed to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSChattelReligionist > random(50,200)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's Chattel Religionist culture @@color:yellow;pushes it towards Paternalism,@@ since charitable care for slaves' welfare has become widespread.
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<<elseif ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	The arcology's Chattel Religionist culture @@color:yellow;pushes it towards Arabian Revivalism,@@ since such an intermingling of slavery and faith fascinates them.
	<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSRomanRevivalist > random(50,200)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's Roman Revivalist culture @@color:yellow;pushes it towards Paternalism,@@ since some Roman slaves were traditionally permitted limited rights.
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSEgyptianRevivalist > random(50,200)>>
	<<if ($arcologies[$i].FSChattelReligionist is "unset")>>
	The arcology's Egyptian Revivalist culture @@color:yellow;pushes it towards Chattel Religionism,@@ since worship is already becoming an established part of its life.
	<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSEdoRevivalist > random(50,200)>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	The arcology's Edo Revivalist culture @@color:yellow;pushes it towards Slimness Enthusiasm,@@ since slim and elegant slaves are already fashionable there.
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSArabianRevivalist > random(50,200)>>
	<<if ($arcologies[$i].FSChattelReligionist is "unset")>>
	The arcology's Arabian Revivalist culture @@color:yellow;pushes it towards Chattel Religionism,@@ since the word of God is already a matter of daily significance there.
	<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>
<<if $adopted == 0>>
<<if $arcologies[$i].FSChineseRevivalist > random(50,200)>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	The arcology's Chinese Revivalist culture @@color:yellow;pushes it towards Paternalism,@@ since traditional beliefs about duty and order have become accepted.
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
<</if>>
<</if>>

/* NEIGHBOR ADOPTION*/

<<for $j to 0; $j < $arcologies.length; $j++>>
	<<if $arcologies[$i].direction != $arcologies[$j].direction>>

	<<set $influenceBonus to 0>>
	<<if $arcologies[$i].direction is $arcologies[$j].influenceTarget>>
		$arcologies[$j].name's directed cultural influence gives it some input $arcologies[$i].name's choice of direction.
		<<set $influenceBonus to 20>>
	<</if>>
	
	<<set $activeArcology to $arcologies[$i]>>
	<<set $targetArcology to $arcologies[$j]>>
	
	<<include "Arcology Opinion">>
	<<if $opinion >= 50>>
		$arcologies[$i].name is already aligned with $arcologies[$j].name socially, encouraging it to consider adopting all its cultural values.
		<<set $influenceBonus += $opinion-50>>
	<<elseif $opinion <= -50>>
		$arcologies[$i].name is culturally opposed to $arcologies[$j].name, encouraging it to resist adopting its cultural values.
		<<set $influenceBonus += $opinion+50>>
	<</if>>

	<<if ($arcologies[$i].FSSubjugationist is "unset")>>
	<<if ($arcologies[$i].FSSupremacist is "unset") || ($arcologies[$i].FSSupremacistRace != $arcologies[$j].FSSubjugationistRace)>>
		<<if $arcologies[$j].FSSubjugationist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts $arcologies[$j].FSSubjugationistRace Subjugation@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSSubjugationist to 5>><<set $adopted to 1>>
		<<set $arcologies[$i].FSSubjugationistRace to $arcologies[$j].FSSubjugationistRace>>
		<<break>>
		<</if>>
	<</if>>
	<</if>>
	<<if ($arcologies[$i].FSSupremacist is "unset")>>
	<<if ($arcologies[$i].FSSubjugationist is "unset") || ($arcologies[$i].FSSubjugationistRace != $arcologies[$j].FSSupremacistRace)>>
		<<if $arcologies[$j].FSSupremacist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts $arcologies[$j].FSSupremacistRace Subjugation@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSSupremacist to 5>><<set $adopted to 1>>
		<<set $arcologies[$i].FSSupremacistRace to $arcologies[$j].FSSupremacistRace>>
		<<break>>
		<</if>>
	<</if>>
	<</if>>
	<<if ($arcologies[$i].FSRepopulationFocus is "unset") and ($arcologies[$i].FSRestart is "unset")>>
	  <<if $arcologies[$j].FSRepopulationFocus > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Repopulation@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
		<<break>>
	  <</if>>
	  <<if $arcologies[$j].FSRestart > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Eugenics@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSRestart to 5>><<set $adopted to 1>>
		<<break>>
	  <</if>>
	<</if>>
	<<if ($arcologies[$i].FSGenderRadicalist is "unset") and ($arcologies[$i].FSGenderFundamentalist is "unset")>>
		<<if $arcologies[$j].FSGenderRadicalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Gender Radicalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSGenderFundamentalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Gender Fundamentalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
		<<if $arcologies[$j].FSPaternalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Paternalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSDegradationist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Degradationism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
		<<if $arcologies[$j].FSBodyPurist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Body Purism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSTransformationFetishist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Transformation Fetishism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
		<<if $arcologies[$j].FSYouthPreferentialist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Youth Preferentialism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSMaturityPreferentialist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Maturity Preferentialism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
		<<if $arcologies[$j].FSSlimnessEnthusiast > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Slimness Enthusiasm@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSAssetExpansionist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Asset Expansionism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSPastoralist is "unset") && ($arcologies[$i].FSPhysicalIdealist is "unset")>>
		<<if $arcologies[$j].FSPastoralist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Pastoralism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSPastoralist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSPhysicalIdealist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Physical Idealism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSPhysicalIdealist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSChattelReligionist is "unset") && ($arcologies[$i].FSNull is "unset")>>
		<<if $arcologies[$j].FSChattelReligionist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Chattel Religionism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
		<<if $arcologies[$j].FSRomanRevivalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Roman Revivalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSEgyptianRevivalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Egyptian Revivalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSEdoRevivalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Edo Revivalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSArabianRevivalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Arabian Revivalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
		<<if $arcologies[$j].FSChineseRevivalist > random(0,200)+($adopted*100)-$influenceBonus>>
		It @@color:yellow;adopts Chinese Revivalism@@ due to influence from its trading partner $arcologies[$j].name.
		<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
		<<break>>
		<</if>>
	<</if>>
	<</if>>
<</for>>

/* RANDOM ADOPTION*/

<<if $adopted == 0>>
<<if random(0,4) == 1>>
<<switch $arcologies[$i].government>>
<<case "elected officials">>
	<<set $desc to "Its elected leaders are">>
<<case "a committee">>
	<<set $desc to "A majority of its ruling committee is">>
<<case "an oligarchy" "your trustees">>
	<<set $desc to "Its leading citizens are">>
<<case "an individual">>
	<<set $desc to "Its owner is">>
<<case "your agent">>
	<<set $desc to "Your agent and its citizens are">>
<<case "a corporation">>
	<<set $desc to "Most of its board of directors are">>
<<default>>
	<<set $desc to "Its citizens are">>
<</switch>>
<<switch random(1,22)>>
<<case 1>>
	<<set $seed to either("white", "asian", "latina", "middle eastern", "black", "indo-aryan", "pacific islander", "amerindian", "southern european", "semitic")>>
	<<if ($arcologies[$i].FSSubjugationist is "unset")>>
	<<if ($arcologies[$i].FSSupremacist is "unset") || ($seed != $arcologies[$i].FSSupremacistRace)>>
	$desc preoccupied by a racial animus towards $seed people, leading the arcology to @@color:yellow;adopt $seed Subjugation.@@
	<<set $arcologies[$i].FSSubjugationist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSubjugationistRace to $seed>>
	<</if>>
	<</if>>
<<case 2>>
	<<set $seed to either("white", "asian", "latina", "middle eastern", "black", "indo-aryan", "pacific islander", "amerindian", "southern european", "semitic")>>
	<<if ($arcologies[$i].FSSupremacist is "unset")>>
	<<if ($arcologies[$i].FSSubjugationist is "unset") || ($seed != $arcologies[$i].FSSubjugationistRace)>>
	$desc preoccupied by belief in the superiority of the $seed race, leading the arcology to @@color:yellow;adopt $seed Supremacy.@@
	<<set $arcologies[$i].FSSupremacist to 5>><<set $adopted to 1>>
	<<set $arcologies[$i].FSSupremacistRace to $seed>>
	<</if>>
	<</if>>
<<case 3>>
	<<if ($arcologies[$i].FSGenderRadicalist is "unset") && ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	$desc enthusiastic about fucking slaves in the butt, leading the arcology to @@color:yellow;adopt Gender Radicalism.@@
	<<set $arcologies[$i].FSGenderRadicalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 4>>
	<<if ($arcologies[$i].FSGenderRadicalist is "unset") && ($arcologies[$i].FSGenderFundamentalist is "unset")>>
	$desc enthusiastic about knocking slaves up, leading the arcology to @@color:yellow;adopt Gender Fundamentalism.@@
	<<set $arcologies[$i].FSGenderFundamentalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 5>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	$desc devoted to their slaves' advancement, leading the arcology to @@color:yellow;adopt Paternalism.@@
	<<set $arcologies[$i].FSPaternalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 6>>
	<<if ($arcologies[$i].FSPaternalist is "unset") && ($arcologies[$i].FSDegradationist is "unset")>>
	$desc partial to screaming and struggling, leading the arcology to @@color:yellow;adopt Degradationism.@@
	<<set $arcologies[$i].FSDegradationist to 5>><<set $adopted to 1>>
	<</if>>
<<case 7>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	$desc concerned by trends in their slaves' health, leading the arcology to @@color:yellow;adopt Body Purism.@@
	<<set $arcologies[$i].FSBodyPurist to 5>><<set $adopted to 1>>
	<</if>>
<<case 8>>
	<<if ($arcologies[$i].FSBodyPurist is "unset") && ($arcologies[$i].FSTransformationFetishist is "unset")>>
	$desc fascinated with extreme surgery, leading the arcology to @@color:yellow;adopt Transformation Fetishism.@@
	<<set $arcologies[$i].FSTransformationFetishist to 5>><<set $adopted to 1>>
	<</if>>
<<case 9>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	$desc devoted to fucking nubile young slaves, leading the arcology to @@color:yellow;adopt Youth Preferentialism.@@
	<<set $arcologies[$i].FSYouthPreferentialist to 5>><<set $adopted to 1>>
	<</if>>
<<case 10>>
	<<if ($arcologies[$i].FSYouthPreferentialist is "unset") && ($arcologies[$i].FSMaturityPreferentialist is "unset")>>
	$desc devoted to time in bed with their MILF slaves, leading the arcology to @@color:yellow;adopt Maturity Preferentialism.@@
	<<set $arcologies[$i].FSMaturityPreferentialist to 5>><<set $adopted to 1>>
	<</if>>
<<case 11>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	$desc loves a slim slave with tight holes, leading the arcology to @@color:yellow;adopt Slimness Enthusiasm.@@
	<<set $arcologies[$i].FSSlimnessEnthusiast to 5>><<set $adopted to 1>>
	<</if>>
<<case 12>>
	<<if ($arcologies[$i].FSSlimnessEnthusiast is "unset") && ($arcologies[$i].FSAssetExpansionist is "unset")>>
	$desc loves boobs, the bigger, the better, leading the arcology to @@color:yellow;adopt Asset Expansionism.@@
	<<set $arcologies[$i].FSAssetExpansionist to 5>><<set $adopted to 1>>
	<</if>>
<<case 13>>
	<<if ($arcologies[$i].FSPastoralist is "unset")>>
	$desc addicted to breast milk straight from the nipple, leading the arcology to @@color:yellow;adopt Pastoralism.@@
	<<set $arcologies[$i].FSPastoralist to 5>><<set $adopted to 1>>
	<</if>>
<<case 14>>
	<<if ($arcologies[$i].FSPhysicalIdealist is "unset")>>
	$desc pretty devoted to spending time in the gym, leading the arcology to @@color:yellow;adopt Physical Idealism.@@
	<<set $arcologies[$i].FSPhysicalIdealist to 5>><<set $adopted to 1>>
	<</if>>
<<case 15>>
	<<if ($arcologies[$i].FSChattelReligionist is "unset")>>
	$desc is devoutly religious, and interested in a reformation, leading the arcology to @@color:yellow;adopt Chattel Religionism.@@
	<<set $arcologies[$i].FSChattelReligionist to 5>><<set $adopted to 1>>
	<</if>>
<<case 16>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by classical Roman history, leading the arcology to @@color:yellow;adopt Roman Revivalism.@@
	<<set $arcologies[$i].FSRomanRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 17>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by ancient Egyptian history, leading the arcology to @@color:yellow;adopt Egyptian Revivalism.@@
	<<set $arcologies[$i].FSEgyptianRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 18>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by Japanese history, leading the arcology to @@color:yellow;adopt Edo Revivalism.@@
	<<set $arcologies[$i].FSEdoRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 19>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by Arabian romanticism, leading the arcology to @@color:yellow;adopt Arabian Revivalism.@@
	<<set $arcologies[$i].FSArabianRevivalist to 5>><<set $adopted to 1>>
	<<break>>
	<</if>>
<<case 20>>
	<<if ($arcologies[$i].FSRomanRevivalist is "unset") && ($arcologies[$i].FSEgyptianRevivalist is "unset") && ($arcologies[$i].FSEdoRevivalist is "unset") && ($arcologies[$i].FSArabianRevivalist is "unset") && ($arcologies[$i].FSChineseRevivalist is "unset")>>
	$desc fascinated by the long tale of Chinese history, leading the arcology to @@color:yellow;adopt Chinese Revivalism.@@
	<<set $arcologies[$i].FSChineseRevivalist to 5>><<set $adopted to 1>>
	<</if>>
<<case 21>>
  <<if ($arcologies[$i].FSRepopulationFocus is "unset") && ($arcologies[$i].FSRestart is "unset")>>
	$desc concerned for the future, and partial to watching bellies swell, leading the arcology to @@color:yellow;adopt Repopulation Efforts.@@
	<<set $arcologies[$i].FSRepopulationFocus to 5>><<set $adopted to 1>>
  <</if>>
<<case 22>>
  <<if ($arcologies[$i].FSRepopulationFocus is "unset") && ($arcologies[$i].FSRestart is "unset")>>
	$desc concerned for the future, and believing their elite could do a better job, leading the arcology to @@color:yellow;adopt Eugenics.@@
	<<set $arcologies[$i].FSRestart to 5>><<set $adopted to 1>>
  <</if>> 
<</switch>>
<</if>>
<</if>>

<<if $adopted == 0>>
	Its future is bitterly controversial, and no side is predominant this week. The dissention reduces the arcology's prosperity.
	<<set $arcologies[$i].prosperity -= 1>>
<</if>>
