code:
:: Future Society [nobr]

<<setAssistantPronouns>>
<<set $nextButton = "Back", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "Future Societies", $FSReminder = "">>

<<if ndef $arcologies[0].FSSubjugationist>>
	<<set $arcologies[0].FSSubjugationist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSSupremacist>>
	<<set $arcologies[0].FSSupremacist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSRepopulationFocus>>
	<<set $arcologies[0].FSRepopulationFocus = "unset">>
<</if>>
<<if ndef $arcologies[0].FSRestart>>
	<<set $arcologies[0].FSRestart = "unset">>
<</if>>
<<if ndef $arcologies[0].FSGenderRadicalist>>
	<<set $arcologies[0].FSGenderRadicalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSGenderFundamentalist>>
	<<set $arcologies[0].FSGenderFundamentalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSPaternalist>>
	<<set $arcologies[0].FSPaternalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSDegradationist>>
	<<set $arcologies[0].FSDegradationist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSBodyPurist>>
	<<set $arcologies[0].FSBodyPurist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSTransformationFetishist>>
	<<set $arcologies[0].FSTransformationFetishist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSYouthPreferentialist>>
	<<set $arcologies[0].FSYouthPreferentialist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSMaturityPreferentialist>>
	<<set $arcologies[0].FSMaturityPreferentialist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSSlimnessEnthusiast>>
	<<set $arcologies[0].FSSlimnessEnthusiast = "unset">>
<</if>>
<<if ndef $arcologies[0].FSAssetExpansionist>>
	<<set $arcologies[0].FSAssetExpansionist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSPastoralist>>
	<<set $arcologies[0].FSPastoralist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSCummunism>>
	<<set $arcologies[0].FSCummunism = "unset">>
<</if>>
<<if ndef $arcologies[0].FSIncestFetishist>>
	<<set $arcologies[0].FSIncestFetishist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSPhysicalIdealist>>
	<<set $arcologies[0].FSPhysicalIdealist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSHedonisticDecadence>>
	<<set $arcologies[0].FSHedonisticDecadence = "unset">>
<</if>>
<<if ndef $arcologies[0].FSIntellectualDependency>>
	<<set $arcologies[0].FSIntellectualDependency = "unset">>
<</if>>
<<if ndef $arcologies[0].FSSlaveProfessionalism>>
	<<set $arcologies[0].FSSlaveProfessionalism = "unset">>
<</if>>
<<if ndef $arcologies[0].FSPetiteAdmiration>>
	<<set $arcologies[0].FSPetiteAdmiration = "unset">>
<</if>>
<<if ndef $arcologies[0].FSStatuesqueGlorification>>
	<<set $arcologies[0].FSStatuesqueGlorification = "unset">>
<</if>>
<<if ndef $arcologies[0].FSChattelReligionist>>
	<<set $arcologies[0].FSChattelReligionist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSNull>>
	<<set $arcologies[0].FSNull = "unset">>
<</if>>
<<if ndef $arcologies[0].FSRomanRevivalist>>
	<<set $arcologies[0].FSRomanRevivalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSAztecRevivalist>>
	<<set $arcologies[0].FSAztecRevivalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSEgyptianRevivalist>>
	<<set $arcologies[0].FSEgyptianRevivalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSEdoRevivalist>>
	<<set $arcologies[0].FSEdoRevivalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSArabianRevivalist>>
	<<set $arcologies[0].FSArabianRevivalist = "unset">>
<</if>>
<<if ndef $arcologies[0].FSChineseRevivalist>>
	<<set $arcologies[0].FSChineseRevivalist = "unset">>
<</if>>
<<if ndef $FSCreditCountString>>
	<<if $FSCreditCount == 7>>
		<<set $FSCreditCountString = "seven">>
	<<elseif $FSCreditCount == 6>>
		<<set $FSCreditCountString = "six">>
	<<elseif $FSCreditCount == 5>>
		<<set $FSCreditCountString = "five">>
	<<else>>
		<<set $FSCreditCountString = "four">>
	<</if>>
<</if>>

/* FIRST FS STORING FOR RIVALRY */

<<if $rivalryFS == 0>>
	<<if $arcologies[0].FSSubjugationist != "unset">>
		<<set $rivalryFS = "Racial Subjugationism">>
		<<set $rivalryFSRace = $arcologies[0].FSSubjugationistRace>>
	<</if>>
	<<if $arcologies[0].FSSupremacist != "unset">>
		<<set $rivalryFS = "Racial Supremacism">>
		<<set $rivalryFSRace = $arcologies[0].FSSupremacistRace>>
	<</if>>
	<<if $arcologies[0].FSGenderRadicalist != "unset">>
		<<set $rivalryFS = "Gender Radicalism">>
	<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
		<<set $rivalryFS = "Gender Fundamentalism">>
	<</if>>
	<<if $arcologies[0].FSRepopulationFocus != "unset">>
		<<set $rivalryFS = "Repopulation Focus">>
	<<elseif $arcologies[0].FSRestart != "unset">>
		<<set $rivalryFS = "Eugenics">>
	<</if>>
	<<if $arcologies[0].FSPaternalist != "unset">>
		<<set $rivalryFS = "Paternalism">>
	<<elseif $arcologies[0].FSDegradationist != "unset">>
		<<set $rivalryFS = "Degradationism">>
	<</if>>
	<<if $arcologies[0].FSBodyPurist != "unset">>
		<<set $rivalryFS = "Body Purism">>
	<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
		<<set $rivalryFS = "Transformation Fetishism">>
	<</if>>
	<<if $arcologies[0].FSYouthPreferentialist != "unset">>
		<<set $rivalryFS = "Youth Preferentialism">>
	<<elseif $arcologies[0].FSMaturityPreferentialist != "unset">>
		<<set $rivalryFS = "Maturity Preferentialism">>
	<</if>>
	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
		<<set $rivalryFS = "Slimness Enthusiasm">>
	<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
		<<set $rivalryFS = "Asset Expansionism">>
	<</if>>
	<<if $arcologies[0].FSPastoralist != "unset">>
		<<set $rivalryFS = "Pastoralism">>
	<<elseif $arcologies[0].FSCummunism != "unset">>
		<<set $rivalryFS = "Cummunism">>
	<</if>>
	<<if $arcologies[0].FSHedonisticDecadence != "unset">>
		<<set $rivalryFS = "Hedonistic Decadence">>
	<<elseif $arcologies[0].FSPhysicalIdealist != "unset">>
		<<set $rivalryFS = "Physical Idealism">>
	<</if>>
	<<if $arcologies[0].FSIntellectualDependency != "unset">>
		<<set $rivalryFS = "Intellectual Dependency">>
	<<elseif $arcologies[0].FSSlaveProfessionalism != "unset">>
		<<set $rivalryFS = "Slave Professionalism">>
	<</if>>
	<<if $arcologies[0].FSPetiteAdmiration != "unset">>
		<<set $rivalryFS = "Petite Admiration">>
	<<elseif $arcologies[0].FSStatuesqueGlorification != "unset">>
		<<set $rivalryFS = "Statuesque Glorification">>
	<</if>>
	<<if $arcologies[0].FSChattelReligionist != "unset">>
		<<set $rivalryFS = "Chattel Religionism">>
	<<elseif $arcologies[0].FSNull != "unset">>
		<<set $rivalryFS = "Multiculturalism">>
	<</if>>
	<<if $arcologies[0].FSRomanRevivalist != "unset">>
		<<set $rivalryFS = "Roman Revivalism">>
	<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
		<<set $rivalryFS = "Aztec Revivalism">>
	<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
		<<set $rivalryFS = "Egyptian Revivalism">>
	<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
		<<set $rivalryFS = "Edo Revivalism">>
	<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
		<<set $rivalryFS = "Arabian Revivalism">>
	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
		<<set $rivalryFS = "Chinese Revivalism">>
	<</if>>
<</if>>

<<if $cheatMode == 1>>

	//[[Cheat Edit Future Society|MOD_Edit FS Cheat][$cheater = 1]]//

<</if>>

<<if $FSCredits > 0>>
	@@.yellow;$arcologies[0].name's society is ready to begin accepting a new societal direction.@@
<<elseif $FSGotRepCredits >= 3>>
	Your society is so radically changed that it is starting to take on a life of its own. The major decisions about its direction have been made.
<<else>>
	You must develop your reputation further for $arcologies[0].name's society to be ready for a new societal direction.
<</if>>

<<if $arcologies[0].FSSupremacist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in $arcologies[0].FSSupremacistRace superiority.
<<elseif $arcologies[0].FSSupremacist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with $arcologies[0].FSSupremacistRace superiority.
<<elseif $arcologies[0].FSSupremacist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to $arcologies[0].FSSupremacistRace superiority.
<<elseif $arcologies[0].FSSupremacist != "unset">>
	$arcologies[0].name is unconvinced of $arcologies[0].FSSupremacistRace superiority.
<</if>>

<<if $arcologies[0].FSSubjugationist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in the inferiority of $arcologies[0].FSSubjugationistRace people.
<<elseif $arcologies[0].FSSubjugationist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the inferiority of $arcologies[0].FSSubjugationistRace people.
<<elseif $arcologies[0].FSSubjugationist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the inferiority of $arcologies[0].FSSubjugationistRace people.
<<elseif $arcologies[0].FSSubjugationist != "unset">>
	$arcologies[0].name is unconvinced of the inferiority of $arcologies[0].FSSubjugationistRace people.
<</if>>

<<if $arcologies[0].FSRepopulationFocus >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that all women should be pregnant.
<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly that all women should be pregnant.
<<elseif $arcologies[0].FSRepopulationFocus >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that all women should be pregnant.
<<elseif $arcologies[0].FSRepopulationFocus != "unset">>
	$arcologies[0].name is unconvinced that all women should be pregnant.
<</if>>

<<if $arcologies[0].FSRestart >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that only the elite should reproduce.
<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly that only the elite should reproduce.
<<elseif $arcologies[0].FSRestart >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea only the elite should reproduce.
<<elseif $arcologies[0].FSRestart != "unset">>
	$arcologies[0].name is unconvinced that only the elite should reproduce.
<</if>>

<<if $arcologies[0].FSIntellectualDependency >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that all slaves should be mentally dependant on their owner.
<<elseif $arcologies[0].FSIntellectualDependency >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly that all slaves should be bimbos.
<<elseif $arcologies[0].FSIntellectualDependency >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that slaves shold be dumb and horny.
<<elseif $arcologies[0].FSIntellectualDependency != "unset">>
	$arcologies[0].name is unconvinced that all slaves should be morons.
<</if>>

<<if $arcologies[0].FSSlaveProfessionalism >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that slaves should be masters of the sexual arts.
<<elseif $arcologies[0].FSSlaveProfessionalism >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with slavery as a profession.
<<elseif $arcologies[0].FSSlaveProfessionalism >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the notion of slavery as a profession.
<<elseif $arcologies[0].FSSlaveProfessionalism != "unset">>
	$arcologies[0].name is unconvinced that slaves should be highly intelligent.
<</if>>

<<if $arcologies[0].FSGenderRadicalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in the need to redefine gender around power.
<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the need to redefine gender around power.
<<elseif $arcologies[0].FSGenderRadicalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the need to redefine gender around power.
<<elseif $arcologies[0].FSGenderRadicalist != "unset">>
	$arcologies[0].name is unconvinced of the need to redefine gender around power.
<</if>>

<<if $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in the need to preserve traditional gender roles.
<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the need to preserve traditional gender roles.
<<elseif $arcologies[0].FSGenderFundamentalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the need to preserve traditional gender roles.
<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
	$arcologies[0].name is unconvinced of the need to preserve traditional gender roles.
<</if>>

<<if $arcologies[0].FSPaternalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in the vision of a well-bred race of slaves.
<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the vision of a well-bred race of slaves.
<<elseif $arcologies[0].FSPaternalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the vision of a well-bred race of slaves.
<<elseif $arcologies[0].FSPaternalist != "unset">>
	$arcologies[0].name is unconvinced of the vision of a well-bred race of slaves.
<</if>>

<<if $arcologies[0].FSDegradationist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that slaves are not human and should be thoroughly degraded.
<<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.
<<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.
<<elseif $arcologies[0].FSDegradationist != "unset">>
	$arcologies[0].name is unconvinced that slaves are not human and should be thoroughly degraded.
<</if>>

<<if $arcologies[0].FSBodyPurist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in the unattractive nature of implants.
<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the unattractive nature of implants.
<<elseif $arcologies[0].FSBodyPurist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the unattractive nature of implants.
<<elseif $arcologies[0].FSBodyPurist != "unset">>
	$arcologies[0].name is unconvinced of the unattractive nature of implants.
<</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 fetishizes implants.
<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
	$arcologies[0].name is beginning to fetishize implants.
<</if>>

<<if $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel>>
	$arcologies[0].name is passionately enthusiastic for older ladies.
<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.6>>
	$arcologies[0].name is very enthusiastic for older ladies.
<<elseif $arcologies[0].FSMaturityPreferentialist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is enthusiastic for older ladies.
<<elseif $arcologies[0].FSMaturityPreferentialist != "unset">>
	$arcologies[0].name is beginning to be enthusiastic for older ladies.
<</if>>

<<if $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel>>
	$arcologies[0].name is passionately enthusiastic for young women.
<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.6>>
	$arcologies[0].name is very enthusiastic for young women.
<<elseif $arcologies[0].FSYouthPreferentialist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is enthusiastic for young women.
<<elseif $arcologies[0].FSYouthPreferentialist != "unset">>
	$arcologies[0].name is beginning to be enthusiastic for young women.
<</if>>

<<if $arcologies[0].FSPetiteAdmiration >= $FSLockinLevel>>
	$arcologies[0].name is passionately enthusiastic for short slaves.
<<elseif $arcologies[0].FSPetiteAdmiration >= $FSLockinLevel*0.6>>
	$arcologies[0].name is very enthusiastic for short slaves.
<<elseif $arcologies[0].FSPetiteAdmiration >= $FSLockinLevel*0.3>>
	$arcologies[0].name is enthusiastic for short slaves.
<<elseif $arcologies[0].FSPetiteAdmiration != "unset">>
	$arcologies[0].name is beginning to be enthusiastic for short slaves.
<</if>>

<<if $arcologies[0].FSStatuesqueGlorification >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that the tall are superior.
<<elseif $arcologies[0].FSStatuesqueGlorification >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the idea that the tall are superior.
<<elseif $arcologies[0].FSStatuesqueGlorification >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that the tall are superior.
<<elseif $arcologies[0].FSStatuesqueGlorification != "unset">>
	$arcologies[0].name is unconvinced that the tall are superior.
<</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.
<<elseif $arcologies[0].FSSlimnessEnthusiast != "unset">>
	$arcologies[0].name is beginning to be enthusiastic about slim slaves with girlish figures.
<</if>>

<<if $arcologies[0].FSAssetExpansionist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that all tits and asses should be bigger.
<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the idea that all tits and asses should be bigger.
<<elseif $arcologies[0].FSAssetExpansionist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that all tits and asses should be bigger.
<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
	$arcologies[0].name is unconvinced that all tits and asses should be bigger.
<</if>>

<<if $arcologies[0].FSPastoralist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that slaves should be milked.
<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the idea that slaves should be milked.
<<elseif $arcologies[0].FSPastoralist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that slaves should be milked.
<<elseif $arcologies[0].FSPastoralist != "unset">>
	$arcologies[0].name is unconvinced that slaves should be milked.
<</if>>

<<if $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that all slaves should be tall and strong.
<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the idea that all slaves should be tall and strong.
<<elseif $arcologies[0].FSPhysicalIdealist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that all slaves should be tall and strong.
<<elseif $arcologies[0].FSPhysicalIdealist != "unset">>
	$arcologies[0].name is unconvinced that all slaves should be tall and strong.
<</if>>

<<if $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that all slaves should be soft and laid-back.
<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with the idea that all slaves should be soft and laid-back.
<<elseif $arcologies[0].FSHedonisticDecadence >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to the idea that all slaves should be soft and laid-back.
<<elseif $arcologies[0].FSHedonisticDecadence != "unset">>
	$arcologies[0].name is unconvinced that all slaves should be soft and laid-back.
<</if>>

<<if $arcologies[0].FSChattelReligionist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly in a version of religion that emphasizes slaveholding traditions.
<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with a version of religion that emphasizes slaveholding traditions.
<<elseif $arcologies[0].FSChattelReligionist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to a version of religion that emphasizes slaveholding traditions.
<<elseif $arcologies[0].FSChattelReligionist != "unset">>
	$arcologies[0].name is unconvinced of a version of religion that emphasizes slaveholding traditions.
<</if>>

<<if $arcologies[0].FSNull >= $FSLockinLevel>>
	$arcologies[0].name is committed to affording its citizens absolute cultural freedom.
<<elseif $arcologies[0].FSNull >= $FSLockinLevel*0.75>>
	$arcologies[0].name is committed to affording its citizens great cultural freedom.
<<elseif $arcologies[0].FSNull >= $FSLockinLevel*0.5>>
	$arcologies[0].name is committed to affording its citizens considerable cultural freedom.
<<elseif $arcologies[0].FSNull != "unset">>
	$arcologies[0].name is committed to affording its citizens basic cultural freedom.
<</if>>

<<if $arcologies[0].FSRomanRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that it is the new Rome.
<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build the new Rome.
<<elseif $arcologies[0].FSRomanRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build the new Rome.
<<elseif $arcologies[0].FSRomanRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build the new Rome.
<</if>>

<<if $arcologies[0].FSAztecRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that it is the new Aztec Empire.
<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build the new Aztec Empire.
<<elseif $arcologies[0].FSAztecRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build the new Aztec Empire.
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build the new Aztec Empire.
<</if>>

<<if $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that it is the land of the Pharaohs, reborn.
<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build a new land of the Pharaohs.
<<elseif $arcologies[0].FSEgyptianRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build a new land of the Pharaohs.
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build a new land of the Pharaohs.
<</if>>

<<if $arcologies[0].FSEdoRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that it is the land of the Shogun, reborn.
<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build a new Edo Japan.
<<elseif $arcologies[0].FSEdoRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build a new Edo Japan.
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Edo Japan.
<</if>>

<<if $arcologies[0].FSArabianRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that it is ancient Baghdad reborn.
<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build a new Sultanate.
<<elseif $arcologies[0].FSArabianRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build a new Sultanate.
<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Sultanate.
<</if>>

<<if $arcologies[0].FSChineseRevivalist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that possesses the Mandate of Heaven.
<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your pursuit of the Mandate of Heaven.
<<elseif $arcologies[0].FSChineseRevivalist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your pursuit of the Mandate of Heaven.
<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your pursuit of the Mandate of Heaven.
<</if>>

You have unlocked
<<if ($FSGotRepCredits == 7)>>
	__seven of <<print $FSCreditCountString>>__
<<elseif ($FSGotRepCredits == 6)>>
	__six of <<print $FSCreditCountString>>__
<<elseif ($FSGotRepCredits == 5)>>
	__five of <<print $FSCreditCountString>>__
<<elseif ($FSGotRepCredits == 4)>>
	__four of <<print $FSCreditCountString>>__
<<elseif ($FSGotRepCredits == 3)>>
	__three of <<print $FSCreditCountString>>__
<<elseif ($FSGotRepCredits == 2)>>
	__two of <<print $FSCreditCountString>>__
<<else>>
	__one of <<print $FSCreditCountString>>__
<</if>>
possible societal customizations.

/*
You are spending <<print cashFormat($FSSpending)>> each week to support your societal goals.
<<if $FSSpending > 900>>
	[[Decrease|Future Society][$FSSpending -= 1000]] |
<<else>>
	Decrease |
<</if>>
<<if $FSSpending < 10000>>
	<<link "Increase">><<set $FSSpending += 1000>><<goto "Future Society">><</link>>
<<else>>
	Increase
<</if>>
*/
<<if $FSSpending > 10000>><<set _warn = 1>><</if>>
<<set $FSSpending = Number($FSSpending) || 0>>
<<set $FSSpending = Math.clamp(Math.ceil($FSSpending/1000)*1000, 0, 10000)>>

You are spending ¤<<textbox "_newFSSpending" $FSSpending>> each week to support your societal goals. [[Save changes|Future Society][$FSSpending = Number(_newFSSpending) || 0]]
<<if _warn>>
//Spending more than <<print cashFormat(10000)>> weekly would be counterproductive//<</if>>

<<if $arcologies[0].FSChattelReligionist != "unset"
	|| $arcologies[0].FSPastoralist != "unset"
	|| $arcologies[0].FSRomanRevivalist != "unset"
	|| $arcologies[0].FSAztecRevivalist != "unset"
	|| $arcologies[0].FSEgyptianRevivalist != "unset"
	|| $arcologies[0].FSEdoRevivalist != "unset"
	|| $arcologies[0].FSDegradationist != "unset"
	|| $arcologies[0].FSPaternalist != "unset"
	|| $arcologies[0].FSIntellectualDependency != "unset">>

__Names__
<</if>>

<<if $arcologies[0].FSChattelReligionist != "unset">>

	<<link "Give all your slaves devotional names">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.chattelReligionistSlaveNames.random()>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSPastoralist != "unset">>

	<<link "Give all your lactating slaves cow names">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<if $slaves[_i].lactation > 0>>
			<<set $slaves[_i].slaveName = setup.cowSlaveNames.random()>>
		<</if>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSIntellectualDependency != "unset">>

	<<link "Give all your idiotic slaves stripper names">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<if $slaves[_i].intelligence+$slaves[_i].intelligenceImplant < -10>>
			<<set $slaves[_i].slaveName = setup.bimboSlaveNames.random()>>
		<</if>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSRomanRevivalist != "unset">>

	<<link "Rename all your slaves according to Roman custom">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.romanSlaveNames.random(), $slaves[_i].slaveSurname = setup.romanSlaveSurnames.random()>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<<elseif $arcologies[0].FSAztecRevivalist != "unset">>

	<<link "Rename all your slaves according to ancient Aztec custom">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.aztecSlaveNames.random(), $slaves[_i].slaveSurname = 0>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>

	<<link "Rename all your slaves according to ancient Egyptian custom">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.ancientEgyptianSlaveNames.random(), $slaves[_i].slaveSurname = 0>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<<elseif $arcologies[0].FSEdoRevivalist != "unset">>

	<<link "Rename all your slaves according to feudal Japanese custom">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.edoSlaveNames.random(), $slaves[_i].slaveSurname = setup.edoSlaveSurnames.random()>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSDegradationist != "unset">>

	<<link "Rename all your slaves according to Degradationist custom">>
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<run DegradingName($slaves[$i])>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSPaternalist != "unset">>

	<<link "Rename your obedient slaves according to Paternalist custom">>
	<<for $i = 0; $i < $slaves.length; $i++>>
		<<if ($slaves[$i].devotion > 20) || (($slaves[$i].devotion >= -20) && ($slaves[$i].trust < -20))>>
			<<set $toSearch = $slaves[$i].slaveName>>
			<<if ($toSearch.indexOf("Miss") == -1)>>
				<<if ($toSearch.indexOf("Ms.") == -1)>>
					<<if ($toSearch.indexOf("Mrs.") == -1)>>
						<<if ($slaves[$i].relationship > 4)>>
							/*
							<<for $j = 0; $j < $slaves.length; $j++>>
								<<if ($slaves[$i].relationshipTarget == $slaves[$j].ID)>>
									<<set $slaves[$i].slaveName = ("Mrs. " + $slaves[$i].slaveName + " " + $slaves[$j].slaveName)>>
								<</if>>
							<</for>>
							*/
							<<set $slaves[$i].slaveName = ("Mrs. " + $slaves[$i].slaveName)>>
						<<elseif ($slaves[$i].actualAge > 24)>>
							<<set $slaves[$i].slaveName = ("Ms. " + $slaves[$i].slaveName)>>
						<<else>>
							<<set $slaves[$i].slaveName = ("Miss " + $slaves[$i].slaveName)>>
						<</if>>
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<</for>>
	<<replace "#mass">>

Obedient slaves renamed.

	<</replace>>
	<</link>>
<</if>>
<<if $arcologies[0].FSIntellectualDependency != "unset">>

	<<link "Give all your slaves simple bimbo names">>
	<<for _i = 0; _i < $slaves.length; _i++>>
		<<set $slaves[_i].slaveName = setup.bimboSlaveNames.random(), $slaves[_i].slaveSurname = 0>>
	<</for>>
	<<replace "#mass">>

Slaves renamed.

	<</replace>>
	<</link>>
<</if>>

__Future Societies__

<<if $arcologies[0].FSSupremacist != "unset">>

''You are pursuing'' $arcologies[0].FSSupremacistRace superiority. //<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSSupremacist")>><<if $assistantFSAppearance == "supremacist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

	<<FSChangeDecoration "FSSupremacist">>
	<<if $PAPublic == 1>>
		<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "succubus")>>
			//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
		<</if>>
	<</if>>

<<else>>
	<<if $FSCredits > 0>>

[[Racial Supremacism|Future Society][$arcologies[0].FSSupremacist = 4, $FSCredits -= 1]]: a belief in <<if $arcologies[0].FSSupremacistRace == 0>>the superiority of a chosen race<<else>>$arcologies[0].FSSupremacistRace superiority<</if>>.

    Select race:
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "white">>//It is established that whites are inferior//<<elseif $arcologies[0].FSSupremacistRace != "white">>[[White|Future Society][$arcologies[0].FSSupremacistRace = "white"]]<<else>>White<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "asian">>//It is established that asians are inferior//<<elseif $arcologies[0].FSSupremacistRace != "asian">>[[Asian|Future Society][$arcologies[0].FSSupremacistRace = "asian"]]<<else>>Asian<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "latina">>//It is established that latinas are inferior//<<elseif $arcologies[0].FSSupremacistRace != "latina">>[[Latino|Future Society][$arcologies[0].FSSupremacistRace = "latina"]]<<else>>Latino<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "middle eastern">>//It is established that middle easterners are inferior//<<elseif $arcologies[0].FSSupremacistRace != "middle eastern">>[[Middle Eastern|Future Society][$arcologies[0].FSSupremacistRace = "middle eastern"]]<<else>>Middle Eastern<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "black">>//It is established that blacks are inferior//<<elseif $arcologies[0].FSSupremacistRace != "black">>[[Black|Future Society][$arcologies[0].FSSupremacistRace = "black"]]<<else>>Black<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "indo-aryan">>//It is established that indo-aryans are inferior//<<elseif $arcologies[0].FSSupremacistRace != "indo-aryan">>[[Indo-Aryan|Future Society][$arcologies[0].FSSupremacistRace = "indo-aryan"]]<<else>>Indo-Aryan<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "amerindian">>//It is established that amerindians are inferior//<<elseif $arcologies[0].FSSupremacistRace != "amerindian">>[[Amerindian|Future Society][$arcologies[0].FSSupremacistRace = "amerindian"]]<<else>>Amerindian<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "pacific islander">>//It is established that pacific islanders are inferior//<<elseif $arcologies[0].FSSupremacistRace != "pacific islander">>[[Pacific Islander|Future Society][$arcologies[0].FSSupremacistRace = "pacific islander"]]<<else>>Pacific Islander<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "malay">>//It is established that malay are inferior//<<elseif $arcologies[0].FSSupremacistRace != "malay">>[[Malay|Future Society][$arcologies[0].FSSupremacistRace = "malay"]]<<else>>Malay<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "southern european">>//It is established that southern europeans are inferior//<<elseif $arcologies[0].FSSupremacistRace != "southern european">>[[Southern European|Future Society][$arcologies[0].FSSupremacistRace = "southern european"]]<<else>>Southern European<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "semitic">>//It is established that semites are inferior//<<elseif $arcologies[0].FSSupremacistRace != "semitic">>[[Semitic|Future Society][$arcologies[0].FSSupremacistRace = "semitic"]]<<else>>Semitic<</if>> |
		<<if $arcologies[0].FSSubjugationist != "unset" && $arcologies[0].FSSubjugationistRace == "mixed race">>//It is established that those with mixed blood are inferior//<<elseif $arcologies[0].FSSupremacistRace != "mixed race">>[[Mixed Race|Future Society][$arcologies[0].FSSupremacistRace = "mixed race"]]<<else>>Mixed Race<</if>>
	<<else>>
		/*//''Racial Supremacism'': a belief in the superiority of a chosen race.//*/
	<</if>>
<</if>>

<<if $arcologies[0].FSSubjugationist != "unset">>

''You are pursuing'' $arcologies[0].FSSubjugationistRace inferiority. //<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSSubjugationist")>><<if $assistantFSAppearance == "subjugationist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

	<<FSChangeDecoration "FSSubjugationist">>
	<<if $PAPublic == 1>>
		<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "amazon") || ($assistantAppearance == "imp")>>
			//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
		<</if>>
	<</if>>

<<else>>
	<<if $FSCredits > 0>>

''''[[Racial Subjugationism|Future Society][$arcologies[0].FSSubjugationist = 4, $FSCredits -= 1]]: a belief in <<if $arcologies[0].FSSubjugationistRace == 0>>the inferiority of a chosen race<<else>>$arcologies[0].FSSubjugationistRace inferiority<</if>>.

    Select race:
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "white">>//It is established that whites are superior//<<elseif $arcologies[0].FSSubjugationistRace != "white">>[[White|Future Society][$arcologies[0].FSSubjugationistRace = "white"]]<<else>>White<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "asian">>//It is established that asians are superior//<<elseif $arcologies[0].FSSubjugationistRace != "asian">>[[Asian|Future Society][$arcologies[0].FSSubjugationistRace = "asian"]]<<else>>Asian<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "latina">>//It is established that latinas are superior//<<elseif $arcologies[0].FSSubjugationistRace != "latina">>[[Latino|Future Society][$arcologies[0].FSSubjugationistRace = "latina"]]<<else>>Latino<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "middle eastern">>//It is established that middle easterners are superior//<<elseif $arcologies[0].FSSubjugationistRace != "middle eastern">>[[Middle Eastern|Future Society][$arcologies[0].FSSubjugationistRace = "middle eastern"]]<<else>>Middle Eastern<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "black">>//It is established that blacks are superior//<<elseif $arcologies[0].FSSubjugationistRace != "black">>[[Black|Future Society][$arcologies[0].FSSubjugationistRace = "black"]]<<else>>Black<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "indo-aryan">>//It is established that indo-aryans are superior//<<elseif $arcologies[0].FSSubjugationistRace != "indo-aryan">>[[Indo-Aryan|Future Society][$arcologies[0].FSSubjugationistRace = "indo-aryan"]]<<else>>Indo-Aryan<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "amerindian">>//It is established that amerindians are superior//<<elseif $arcologies[0].FSSubjugationistRace != "amerindian">>[[Amerindian|Future Society][$arcologies[0].FSSubjugationistRace = "amerindian"]]<<else>>Amerindian<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "pacific islander">>//It is established that pacific islanders are superior//<<elseif $arcologies[0].FSSubjugationistRace != "pacific islander">>[[Pacific Islander|Future Society][$arcologies[0].FSSubjugationistRace = "pacific islander"]]<<else>>Pacific Islander<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "malay">>//It is established that malay are superior//<<elseif $arcologies[0].FSSubjugationistRace != "malay">>[[Malay|Future Society][$arcologies[0].FSSubjugationistRace = "malay"]]<<else>>Malay<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "southern european">>//It is established that southern europeans are superior//<<elseif $arcologies[0].FSSubjugationistRace != "southern european">>[[Southern European|Future Society][$arcologies[0].FSSubjugationistRace = "southern european"]]<<else>>Southern European<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "semitic">>//It is established that semites are superior//<<elseif $arcologies[0].FSSubjugationistRace != "semitic">>[[Semitic|Future Society][$arcologies[0].FSSubjugationistRace = "semitic"]]<<else>>Semitic<</if>> |
		<<if $arcologies[0].FSSupremacist != "unset" && $arcologies[0].FSSupremacistRace == "mixed race">>//It is established that those with mixed blood are superior//<<elseif $arcologies[0].FSSubjugationistRace != "mixed race">>[[Mixed Race|Future Society][$arcologies[0].FSSubjugationistRace = "mixed race"]]<<else>>Mixed Race<</if>>

	<<else>>
		/*//''Racial Subjugationism'': a belief in the inferiority of a subject race.//*/
	<</if>>
<</if>>

<<if $seePreg != 0>>
	<<if $arcologies[0].FSRestart == "unset">>
		<<if $arcologies[0].FSRepopulationFocus != "unset">>

''You are pursuing'' the belief that mass breeding will save humanity.
			//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSRepopulationFocus")>><<if $assistantFSAppearance == "repopulation focus">><<set $assistantFSAppearance = "default">><</if>><</link>>//

			<<FSChangeDecoration "FSRepopulationFocus" "clothesBoughtMaternityLingerie" "clothesBoughtMaternityDress" "clothesBoughtBelly">>
			<<if $PAPublic == 1>>
				<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "pregnant fairy") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
					//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
				<</if>>
			<</if>>

		<<else>>
			<<if ($FSCredits > 0)>>

''''[[Repopulation Efforts|Future Society][$arcologies[0].FSRepopulationFocus = 4+$arcologies[0].FSRepopulationFocusInterest-$arcologies[0].FSEugenicsInterest, $FSCredits -= 1, $arcologies[0].FSRepopulationFocusPregPolicy = 0, $arcologies[0].FSRepopulationFocusMilfPolicy = 0]]: focus on mass breeding in order to repopulate the future world.
			<<else>>
				/*//''Repopulation Efforts'': societal fetishization of pregnancy.//*/
			<</if>>
		<</if>>
	<</if>>

	<<if $arcologies[0].FSRepopulationFocus == "unset">>
		<<if $arcologies[0].FSRestart != "unset">>
			<<if $arcologies[0].FSRestartDecoration != 100>>

''You are pursuing'' Eugenics.
				//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSRestart")>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><</link>>//

				<<FSChangeDecoration "FSRestart">>
				<<if $PAPublic == 1>>
					<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "goddess") || ($assistantAppearance == "loli") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "incubus") || ($assistantAppearance == "angel")>>
						//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
					<</if>>
				<</if>>
			<<else>>

''You have established'' Eugenics.
				<<if $eugenicsFullControl != 1>>
					The Societal Elite will not permit you to abandon Eugenics.
				<<else>>
					//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSRestart")>><<if $assistantFSAppearance == "eugenics">><<set $assistantFSAppearance = "default">><</if>><</link>>//
				<</if>>

				<<FSChangeDecoration "FSRestart">>
				The Societal Elite exist as the highest class, allowing you access to all manner of benefits
				<<if $PAPublic == 1>>
					<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "goddess") || ($assistantAppearance == "loli") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "incubus") || ($assistantAppearance == "angel")>>
						//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
					<</if>>
				<</if>>
			<</if>>

		<<else>>
			<<if ($FSCredits > 0)>>

''''[[Eugenics|Future Society][$arcologies[0].FSRestart = 4+$arcologies[0].FSEugenicsInterest-$arcologies[0].FSRepopulationFocusInterest, $FSCredits -= 1, $arcologies[0].FSRepopulationFocusPregPolicy = 0, $arcologies[0].FSRepopulationFocusMilfPolicy = 0]]: rebuilding society using restrictive breeding programs reserved solely for society's finest.

			<<else>>
				/*//''Complete Societal Reconstruction'': rebuilding society based off the elite.//*/
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSSlaveProfessionalism == "unset">>
	<<if $arcologies[0].FSIntellectualDependency != "unset">>

''You are pursuing'' intellectual dependency, a belief that slaves should be airheaded, horny and fully dependent on their owners.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSIntellectualDependency")>><<if $assistantFSAppearance == "intellectual dependency">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSIntellectualDependency" "clothesBoughtBimbo">>
		<<if $PAPublic == 1>>
			<<if ["shemale", "succubus", "witch"].includes($assistantAppearance)>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Intellectual Dependency|Future Society][$arcologies[0].FSIntellectualDependency = 4, $FSCredits -= 1]]: a belief that slaves should be airheaded, horny and fully dependent on their owners.
		<<else>>
			/*//''Intellectual Dependency'': a belief that slaves should be airheaded, horny and fully dependent on their owners.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSIntellectualDependency == "unset">>
	<<if $arcologies[0].FSSlaveProfessionalism != "unset">>

''You are pursuing'' slave professionalism, a focus on smart, refined, altogether perfect slaves.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSSlaveProfessionalism")>><<if $assistantFSAppearance == "slave professionalism">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSSlaveProfessionalism" "clothesBoughtCourtesan">>
		<<if $PAPublic == 1>>
			<<if ["angel", "businesswoman", "incubus", "goddess", "schoolgirl", "succubus"].includes($assistantAppearance)>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Slave Professionalism|Future Society][$arcologies[0].FSSlaveProfessionalism = 4, $FSCredits -= 1]]: increased interest in smart, refined, altogether perfect slaves.
		<<else>>
			/*//''Slave Professionalism'': increased interest in smart, refined, altogether perfect slaves.//*/
		<</if>>
	<</if>>
<</if>>

<<if $seeDicks != 0 || $makeDicks == 1>>
	<<if $arcologies[0].FSGenderFundamentalist == "unset">>
		<<if $arcologies[0].FSGenderRadicalist != "unset">>

''You are pursuing'' a radical redefinition of gender that identifies powerful people as male, and everyone else as female.
			//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSGenderRadicalist")>><<if $assistantFSAppearance == "gender radicalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

			<<FSChangeDecoration "FSGenderRadicalist">>
			<<if $PAPublic == 1>>
				<<if ($assistantAppearance == "shemale") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
					//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
				<</if>>
			<</if>>

		<<else>>
			<<if $FSCredits > 0>>

''''[[Gender radicalism|Future Society][$arcologies[0].FSGenderRadicalist = 4, $FSCredits -= 1]]: a radical redefinition of gender that identifies powerful people as male, and everyone else as female.
			<<else>>
				/*//''Gender radicalism'': a radical redefinition of gender that identifies powerful people as male, and everyone else as female.//*/
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSGenderRadicalist == "unset">>
	<<if $arcologies[0].FSGenderFundamentalist != "unset">>

''You are pursuing'' gender traditionalism, including a societal preference for feminine slaves<<if $seePreg != 0>> and support for slave pregnancy<</if>>.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSGenderFundamentalist")>><<if $assistantFSAppearance == "gender fundamentalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<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")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Gender traditionalism|Future Society][$arcologies[0].FSGenderFundamentalist = 4, $FSCredits -= 1]]: a societal preference for feminine slaves<<if $seePreg != 0>> and support for slave pregnancy<</if>>.

		<<else>>
			/*//''Gender traditionalism'': a societal preference for feminine slaves<<if $seePreg != 0>> and support for slave pregnancy<</if>>.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSDegradationist == "unset">>
	<<if $arcologies[0].FSPaternalist != "unset">>

''You are pursuing'' a vision of slave improvement, including slaves' health, mental well-being, and education.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSPaternalist")>><<if $assistantFSAppearance == "paternalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<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")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Paternalism|Future Society][$arcologies[0].FSPaternalist = 4, $FSCredits -= 1]]: a vision of slave improvement, including slaves' health, mental well-being, and education.
		<<else>>
			/*//''Paternalism'': a vision of slave improvement, including slaves' health, mental well-being, and education.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSPaternalist == "unset">>
	<<if $arcologies[0].FSDegradationist != "unset">>

''You are pursuing'' slave degradation, a belief that slaves are not human and should not be treated decently.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSDegradationist")>><<if $assistantFSAppearance == "degradationist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSDegradationist" "clothesBoughtChains">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "monstergirl") || ($assistantAppearance == "businesswoman") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "imp")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Degradationism|Future Society][$arcologies[0].FSDegradationist = 4, $FSCredits -= 1]]: a belief that slaves are not human and should not be treated decently.

		<<else>>
			/*//''Degradation'': a belief that slaves are not human and should not be treated decently.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSTransformationFetishist == "unset">>
	<<if $arcologies[0].FSBodyPurist != "unset">>

''You are pursuing'' societal disapproval of implant surgery.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSBodyPurist")>><<if $assistantFSAppearance == "body purist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<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")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Body Purism|Future Society][$arcologies[0].FSBodyPurist = 4, $FSCredits -= 1]]: societal disapproval of implant surgery.
		<<else>>
			/*//''Body Purism'': societal disapproval of implant surgery.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSBodyPurist == "unset">>
	<<if $arcologies[0].FSTransformationFetishist != "unset">>

''You are pursuing'' societal fetishization of implant surgery.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSTransformationFetishist")>><<if $assistantFSAppearance == "transformation fetishist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSTransformationFetishist">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "shemale") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if ($FSCredits > 0)>>

''''[[Transformation Fetishism|Future Society][$arcologies[0].FSTransformationFetishist = 4, $FSCredits -= 1]]: societal fetishization of implant surgery.

		<<else>>
			/*//''Transformation Fetishism'': societal fetishization of implant surgery.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSMaturityPreferentialist == "unset">>
	<<if $arcologies[0].FSYouthPreferentialist != "unset">>

''You are pursuing'' an accentuated societal preference for younger slaves.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSYouthPreferentialist")>><<if $assistantFSAppearance == "youth preferentialist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSYouthPreferentialist">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "shemale") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "loli") || ($assistantAppearance == "succubus") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp") || ($assistantAppearance == "witch")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Youth Preferentialism|Future Society][$arcologies[0].FSYouthPreferentialist = 4, $FSCredits -= 1]]: increased interest in girls just past their majority.
		<<else>>
			/*//''Youth Preferentialism'': increased interest in girls just past their majority.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSYouthPreferentialist == "unset">>
	<<if $arcologies[0].FSMaturityPreferentialist != "unset">>

''You are pursuing'' a societal preference for older women.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSMaturityPreferentialist")>><<if $assistantFSAppearance == "maturity preferentialist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSMaturityPreferentialist">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "goddess") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "angel")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Maturity Preferentialism|Future Society][$arcologies[0].FSMaturityPreferentialist = 4, $FSCredits -= 1]]: increased interest in mature slaves.

		<<else>>
			/*//''Maturity Preferentialism'': increased interest in mature slaves.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSStatuesqueGlorification == "unset">>
	<<if $arcologies[0].FSPetiteAdmiration != "unset">>

''You are pursuing'' an accentuated societal preference for short slaves.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSPetiteAdmiration")>><<if $assistantFSAppearance == "petite admiration">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSPetiteAdmiration">>
		<<if $PAPublic == 1>>
			<<if ["cherub", "fairy", "imp", "incubus", "loli", "preggololi", "pregnant fairy", "schoolgirl", "succubus"].includes($assistantAppearance)>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Petite Admiration|Future Society][$arcologies[0].FSPetiteAdmiration = 4, $FSCredits -= 1]]: increased interest in short slaves.
		<<else>>
			/*//''Petite Admiration'': increased interest in short slaves.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSPetiteAdmiration == "unset">>
	<<if $arcologies[0].FSStatuesqueGlorification != "unset">>

''You are pursuing'' a societal fixation on tallness.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSStatuesqueGlorification")>><<if $assistantFSAppearance == "statuesque glorification">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSStatuesqueGlorification">>
		<<if $PAPublic == 1>>
			<<if ["amazon", "goddess", "incubus", "succubus", "witch"].includes($assistantAppearance)>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Statuesque Glorification|Future Society][$arcologies[0].FSStatuesqueGlorification = 4, $FSCredits -= 1]]: societal fixation on tallness.

		<<else>>
			/*//''Statuesque Glorification'': societal fixation on tallness.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSAssetExpansionist == "unset">>
	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>

''You are supporting'' enthusiasm for slaves with girlish figures.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSSlimnessEnthusiast")>><<if $assistantFSAppearance == "slimness enthusiast">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSSlimnessEnthusiast">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "shemale") || ($assistantAppearance == "loli") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Slimness Enthusiasm|Future Society][$arcologies[0].FSSlimnessEnthusiast = 4, $FSCredits -= 1]]: a fashion for slaves with girlish figures.
		<<else>>
			/*//''Slimness Enthusiasm'': a fashion for slaves with girlish figures.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSSlimnessEnthusiast == "unset">>
	<<if $arcologies[0].FSAssetExpansionist != "unset">>

''You are pursuing'' societal hunger for huge assets.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSAssetExpansionist")>><<if $assistantFSAppearance == "asset expansionist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSAssetExpansionist">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "shemale") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "succubus") || ($assistantAppearance == "incubus") || ($assistantAppearance == "witch")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Asset Expansionism|Future Society][$arcologies[0].FSAssetExpansionist = 4, $FSCredits -= 1]]: societal hunger for huge assets of whatever origin.

		<<else>>
			/*//''Asset Expansionism'': societal hunger for huge assets of whatever origin.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSPastoralist != "unset">>

''You are pursuing'' societal normalization of slave milking.
	//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSPastoralist")>><<if $assistantFSAppearance == "pastoralist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

	<<FSChangeDecoration "FSPastoralist" "clothesBoughtWestern">>
	<<if $PAPublic == 1>>
		<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "shemale") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
			//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
		<</if>>
	<</if>>

<<else>>
	<<if $FSCredits > 0>>

''''[[Slave Pastoralism|Future Society][$arcologies[0].FSPastoralist = 4, $FSCredits -= 1]]: societal acceptance of slave products like milk.

	<<else>>
		/*//''Slave Pastoralism'': societal acceptance of slave products like milk.//*/
	<</if>>
<</if>>

<<if $arcologies[0].FSHedonisticDecadence == "unset">>
	<<if $arcologies[0].FSPhysicalIdealist != "unset">>

''You are pursuing'' societal reverence for the idealized human form, including height, health and muscle.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSPhysicalIdealist")>><<if $assistantFSAppearance == "physical idealist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSPhysicalIdealist" "clothesBoughtOil">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "shemale") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Physical Idealism|Future Society][$arcologies[0].FSPhysicalIdealist = 4, $FSCredits -= 1]]: societal reverence for the idealized human form, including height, health and muscle.
		<<else>>
			/*//''Physical Idealism'': societal reverence for the idealized human form, including height, health and muscle.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSPhysicalIdealist == "unset">>
	<<if $arcologies[0].FSHedonisticDecadence != "unset">>

''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">><<run FutureSocieties.remove("FSHedonisticDecadence")>><<if $assistantFSAppearance == "hedonistic decadence">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSHedonisticDecadence">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "hypergoddess") || ($assistantAppearance == "preggololi") || ($assistantAppearance == "imp") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Hedonistic Decadence|Future Society][$arcologies[0].FSHedonisticDecadence = 4, $FSCredits -= 1]]: societal acceptance of overindulgence and immediate gratification. Be it food, drink, sex, drugs or whatever one's desire may be.

		<<else>>
			/*//''HedonisticDecadence'': societal acceptance of over indulgence, particularly of food, drink, sex and drugs.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSNull == "unset">>
	<<if $arcologies[0].FSChattelReligionist != "unset">>

''You are pursuing'' a new strain of religion that emphasizes the slaveholding portions of religious history.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSChattelReligionist")>><<if $assistantFSAppearance == "chattel religionist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSChattelReligionist" "clothesBoughtHabit">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus") || ($assistantAppearance == "witch") || ($assistantAppearance == "angel") || ($assistantAppearance == "cherub") || ($assistantAppearance == "imp")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>

	<<else>>
		<<if $FSCredits > 0>>

''''[[Chattel Religionism|Future Society][$arcologies[0].FSChattelReligionist = 4, $FSCredits -= 1]]: a new strain of religion that emphasizes the slaveholding portions of religious history.
		<<else>>
			/*//''Chattel Religionism'': a new strain of religion that emphasizes the slaveholding portions of religious history.//*/
		<</if>>
	<</if>>
<</if>>

<<if $arcologies[0].FSChattelReligionist == "unset">>
	<<if $FSCreditCount == 4>>
		<<if $arcologies[0].FSNull != "unset">>

''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][FutureSocieties.remove("FSNull")]]//
			<<else>>
				//[[Withdraw|Future Society][$arcologies[0].FSNull -= 25, $FSCredits += 1]]//
			<</if>>
			<<if $FSCredits > 0>>
				<<if $arcologies[0].FSNull < $FSLockinLevel>>

    [[Advance|Future Society][$arcologies[0].FSNull += 25, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
				<</if>>
			<</if>>

		<<else>>
			<<if $FSCredits > 0>>

[[Multiculturalism|Future Society][$arcologies[0].FSNull = 25, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.

    //This option is an alternative to societal advancement, and will not advance naturally.//

			<</if>>
		<</if>>
	<<elseif $FSCreditCount == 6>>
		<<if $arcologies[0].FSNull != "unset">>

''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][FutureSocieties.remove("FSNull")]]//
			<<else>>
				//[[Withdraw|Future Society][$arcologies[0].FSNull -= 17, $FSCredits += 1]]//
			<</if>>
			<<if $FSCredits > 0>>
				<<if $arcologies[0].FSNull < $FSLockinLevel>>

    [[Advance|Future Society][$arcologies[0].FSNull += 17, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
				<</if>>
			<</if>>

		<<else>>
			<<if $FSCredits > 0>>

[[Multiculturalism|Future Society][$arcologies[0].FSNull = 17, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.

    //This option is an alternative to societal advancement, and will not advance naturally.//

			<</if>>
		<</if>>
	<<elseif $FSCreditCount == 7>>
		<<if $arcologies[0].FSNull != "unset">>

''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][FutureSocieties.remove("FSNull")]]//
			<<else>>
				//[[Withdraw|Future Society][$arcologies[0].FSNull -= 15, $FSCredits += 1]]//
			<</if>>
			<<if $FSCredits > 0>>
				<<if $arcologies[0].FSNull < $FSLockinLevel>>

    [[Advance|Future Society][$arcologies[0].FSNull += 15, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
				<</if>>
			<</if>>

		<<else>>
			<<if $FSCredits > 0>>

[[Multiculturalism|Future Society][$arcologies[0].FSNull = 15, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.

    //This option is an alternative to societal advancement, and will not advance naturally.//

			<</if>>
		<</if>>
	<<else>>
		<<if $arcologies[0].FSNull != "unset">>

''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][FutureSocieties.remove("FSNull")]]//
			<<else>>
				//[[Withdraw|Future Society][$arcologies[0].FSNull -= 20, $FSCredits += 1]]//
			<</if>>
			<<if $FSCredits > 0>>
				<<if $arcologies[0].FSNull < $FSLockinLevel>>

    [[Advance|Future Society][$arcologies[0].FSNull += 20, $FSCredits -= 1]]: further commitment to allow your arcology's citizens cultural freedom.
				<</if>>
			<</if>>

		<<else>>
			<<if $FSCredits > 0>>

[[Multiculturalism|Future Society][$arcologies[0].FSNull = 20, $FSCredits -= 1]]: a commitment to allow your arcology's citizens cultural freedom.

    //This option is an alternative to societal advancement, and will not advance naturally.//

			<</if>>
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of a new Rome.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSRomanRevivalist")>><<if $assistantFSAppearance == "roman revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSRomanRevivalist" "clothesBoughtToga">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "amazon") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Roman Revivalism|Future Society][$arcologies[0].FSRomanRevivalist = 4, $FSCredits -= 1]]: a vision of a new Rome.
		<<else>>
			/*//''Roman Revivalism'': a vision of a new Rome.//*/
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of a new Aztec Empire.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSAztecRevivalist")>><<if $assistantFSAppearance == "aztec revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSAztecRevivalist" "clothesBoughtHuipil">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "amazon") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Aztec Revivalism|Future Society][$arcologies[0].FSAztecRevivalist = 4, $FSCredits -= 1]]: a vision of a new Aztec Empire.
		<<else>>
			/*//''Aztec Revivalism'': a vision of a new Aztec Empire.//*/
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of Pharaoh's Egypt.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSEgyptianRevivalist")>><<if $assistantFSAppearance == "egyptian revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSEgyptianRevivalist" "clothesBoughtEgypt">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "goddess") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Egyptian Revivalism|Future Society][$arcologies[0].FSEgyptianRevivalist = (4+$arcologies[0].FSEgyptianRevivalistInterest), $FSCredits -= 1, $arcologies[0].FSEgyptianRevivalistIncestPolicy = 0]]: a vision of a Pharaoh's Egypt.
		<<else>>
			/*//''Egyptian Revivalism'': a vision of Pharaoh's Egypt.//*/
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of Edo Japan.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSEdoRevivalist")>><<if $assistantFSAppearance == "edo revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSEdoRevivalist" "clothesBoughtKimono">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "amazon") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "loli") || ($assistantAppearance == "kitsune") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Edo Revivalism|Future Society][$arcologies[0].FSEdoRevivalist = 4, $FSCredits -= 1]]: a vision of Edo Japan.
		<<else>>
			/*//''Edo Revivalism'': a vision of Edo Japan.//*/
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of the Sultanate of old.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSArabianRevivalist")>><<if $assistantFSAppearance == "arabian revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSArabianRevivalist" "clothesBoughtHarem">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "businesswoman") || ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Arabian Revivalism|Future Society][$arcologies[0].FSArabianRevivalist = 4, $FSCredits -= 1]]: a vision of the Sultanate of old.
		<<else>>
			/*//''Arabian Revivalism'': a vision of the Sultanate of old.//*/
		<</if>>
	<</if>>
<</if>>

<<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">>

''You are pursuing'' a vision of ancient China.
		//<<link "Abandon" "Future Society">><<run FutureSocieties.remove("FSChineseRevivalist")>><<if $assistantFSAppearance == "chinese revivalist">><<set $assistantFSAppearance = "default">><</if>><</link>>//

		<<FSChangeDecoration "FSChineseRevivalist" "clothesBoughtQipao">>
		<<if $PAPublic == 1>>
			<<if ($assistantAppearance == "schoolgirl") || ($assistantAppearance == "monstergirl") || ($assistantAppearance == "incubus") || ($assistantAppearance == "succubus")>>
				//With _hisA $assistantAppearance appearance, $assistantName is a good public mascot for this goal.//
			<</if>>
		<</if>>
	<<else>>
		<<if $FSCredits > 0>>

''''[[Chinese Revivalism|Future Society][$arcologies[0].FSChineseRevivalist = 4, $FSCredits -= 1]]: a vision of ancient China.
		<<else>>
			/*//''Chinese Revivalism'': a vision of ancient China.//*/
		<</if>>
	<</if>>
<</if>>

__Facility Redecoration__

<<run FutureSocieties.DecorationCleanup()>>

<<if $brothel > 0>>

$brothelNameCaps is decorated in $brothelDecoration style.
	<<SetFacilityDecoration "brothelDecoration">>
<</if>>

<<if $club > 0>>

$clubNameCaps is decorated in $clubDecoration style.
	<<SetFacilityDecoration "clubDecoration">>
<</if>>

<<if $dairy > 0>>

$dairyNameCaps is decorated in $dairyDecoration style.
	<<SetFacilityDecoration "dairyDecoration">>
<</if>>

<<if $farmyard > 0>>

$farmyardNameCaps is decorated in $farmyardDecoration style.
	<<SetFacilityDecoration "farmyardDecoration">>
<</if>>

<<if $spa > 0>>

$spaNameCaps is decorated in $spaDecoration style.
	<<SetFacilityDecoration "spaDecoration">>
<</if>>

<<if $nursery > 0>>

$nurseryNameCaps is decorated in $nurseryDecoration style.
	<<SetFacilityDecoration "nurseryDecoration">>
<</if>>

<<if $clinic > 0>>

$clinicNameCaps is decorated in $clinicDecoration style.
	<<SetFacilityDecoration "clinicDecoration">>
<</if>>

<<if $schoolroom > 0>>

$schoolroomNameCaps is decorated in $schoolroomDecoration style.
	<<SetFacilityDecoration "schoolroomDecoration">>
<</if>>

<<if $cellblock > 0>>

$cellblockNameCaps is decorated in $cellblockDecoration style.
	<<SetFacilityDecoration "cellblockDecoration">>
<</if>>

<<if $servantsQuarters > 0>>

$servantsQuartersNameCaps is decorated in $servantsQuartersDecoration style.
	<<SetFacilityDecoration "servantsQuartersDecoration">>
<</if>>

<<if $arcade > 0>>

$arcadeNameCaps is decorated in $arcadeDecoration style.
	<<SetFacilityDecoration "arcadeDecoration">>
<</if>>

<<if $masterSuite > 0>>

$masterSuiteNameCaps is decorated in $masterSuiteDecoration style.
	<<SetFacilityDecoration "masterSuiteDecoration">>
<</if>>


code:
:: Growth Research Institute [nobr]

<<set $nextButton = "Back", $nextLink = "Buy Slaves", $returnTo = "Buy Slaves", $showEncyclopedia = 1, $encyclopedia = "Slave Schools">>
/* Multi-Purchase Support */
<<if ndef $newSlaves>><<set $newSlaves = []>><</if>>
<<if $newSlaves.length > 0>>
	<<set $nextButton = "Continue", $nextLink = "Bulk Slave Intro", $slaveMarket = "GRI", $returnTo = "Main", $newSlaveIndex = 0>>
<</if>>

//The Growth Research Institute (GRI) is not primarily a slave school at all, but rather the world leader in female growth hormone development. It operates research centers in the Free Cities to avoid traditional medical research laws. GRI runs several slave schools to raise healthy, unmodified subjects for use in trials. After a year of experimental hormone treatment they are sold. <<if $GRI.schoolUpgrade != 0>>

You have endowed <<if $GRI.schoolUpgrade == 1>>a research focus on advanced curatives; most subjects now leave the GRI at unnatural levels of vitality.<<else>>a research focus on milk production; subjects' breasts are bigger and milkier than ever.<</if>> As a major benefact<<if $PC.title == 0>>rix<<else>>or<</if>> of the institution, you also receive a discount on them.<</if>>//

GRI offers a fresh graduate for inspection via video call. The interview takes place in the graduate's bare-metal holding cell. Disturbingly, it is strongly reminiscent of an enclosure for a lab animal, only scaled up to contain a lab animal of human dimensions.

<<= generateMarketSlave("GRI")>>
<<set $slaveCost = slaveCost($activeSlave)>>
<<setLocalPronouns $activeSlave>>
<<if $GRI.schoolSale != 0>>
	<<set $slaveCost = Math.trunc($slaveCost*0.5)>>
<<elseif $GRI.schoolUpgrade != 0>>
	<<set $slaveCost = Math.trunc($slaveCost*0.8)>>
<</if>>
<<if $slavesSeen > $slaveMarketLimit>><<set $slaveCost += Math.trunc($slaveCost*(($slavesSeen-$slaveMarketLimit)*0.1))>><</if>>

The price is <<print cashFormat($slaveCost)>>.<<if $slavesSeen > $slaveMarketLimit>> You have cast such a wide net for slaves this week that it is becoming more expensive to find more for sale. Your reputation helps determine your reach within the slave market.<</if>>

<<setLocalPronouns $activeSlave>>
<<buyingFromSchoolControls $GRI "slave" "slaves">>

repo_name: IchthysdeKilt/fc

license: mit


code:
:: Head Girl Suite [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Head Girl Suite", $showEncyclopedia = 1, $encyclopedia = "Head Girl Suite", _SL = $slaves.length>>

<<if $HGSuiteName != "the Head Girl Suite">>
	<<set $HGSuiteNameCaps = $HGSuiteName.replace("the ", "The ")>>
<</if>>
<<set _i = $slaves.findIndex(function(s) { return s.assignment == "live with your Head Girl"; })>>

<<if $HeadGirl == 0>>
	You have no Head Girl appointed to live in $HGSuiteName.
	<<link "Select Head Girl">><<goto "HG Select">><</link>>
<<elseif $HGSuiteiIDs.length > 0>>
	<<setLocalPronouns $HeadGirl>>
	Your Head Girl $HeadGirl.slaveName has $slaves[_i].slaveName living in $HGSuiteName with $him, as $his servant, assistant, and sexual appliance.
	<<link "Manage Head Girl">><<goto "HG Select">><</link>>
<<else>>
	<<setLocalPronouns $HeadGirl>>
	Your Head Girl $HeadGirl.slaveName lives alone in $his handsome suite.
	<<link "Manage Head Girl">><<goto "HG Select">><</link>>
<</if>>

<<if $HeadGirl != 0>>

//Any slave assigned to live with your Head Girl will become, for most practical purposes, $his slave.//

<<if $HGSuiteEquality == 1>>
	The two slaves living in $HGSuiteName are ''equals,'' and will alternate weeks as Head Girl and Head Girl's bitch. [[Stop|Head Girl Suite][$HGSuiteEquality = 0]]
<<else>>
	The current Head Girl will ''remain Head Girl.'' [[Have them alternate|Head Girl Suite][$HGSuiteEquality = 1,$HGSuiteSurgery = 0,$HGSuiteDrugs = 0,$HGSuiteHormones = 0]] //This will only take effect if the other slave is an appropriate candidate//

	<<if $HGSuiteSurgery == 1>>
		$He is ''allowed'' to use surgical modification on $his slave. [[Disallow|Head Girl Suite][$HGSuiteSurgery = 0]]
	<<else>>
		$He is ''not allowed'' to use surgical modification on $his slave. [[Allow|Head Girl Suite][$HGSuiteSurgery = 1]]
	<</if>>

	<<if $HGSuiteDrugs == 1>>
		$He is ''allowed'' to use growth hormones on $his slave. [[Disallow|Head Girl Suite][$HGSuiteDrugs = 0]]
	<<else>>
		$He is ''not allowed'' to use growth hormones on $his slave. [[Allow|Head Girl Suite][$HGSuiteDrugs = 1]]
	<</if>>

	<<if $HGSuiteHormones == 1>>
		$He is ''allowed'' to customize $his slave with hormone treatments. [[Disallow|Head Girl Suite][$HGSuiteHormones = 0]]
	<<else>>
		$He is ''not allowed'' to customize $his slave with hormone treatments. [[Allow|Head Girl Suite][$HGSuiteHormones = 1]]
	<</if>>
<</if>>

<<print App.UI.SlaveList.listSJFacilitySlaves(App.Entity.facilities.headGirlSuite)>>
<</if>>

Rename $HGSuiteName: <<textbox "$HGSuiteName" $HGSuiteName "Head Girl Suite">> //Use a noun or similar short phrase//