code:
:: Full Report [nobr]

/* 000-250-006 */
<<if $seeImages && $seeReportImages>>

		<<= SlaveArt($slaves[$i], 2, 0)>>

<</if>>
/* 000-250-006 */

<<setLocalPronouns $slaves[$i]>>

<<switch $slaves[$i].assignment>>
<<case "rest">>
	<<= App.SlaveAssignment.rest($slaves[$i])>>
<<case "whore">>
	<<= App.SlaveAssignment.whore($slaves[$i])>>
<<case "serve the public">>
	<<= App.SlaveAssignment.serveThePublic($slaves[$i])>>
<<case "work a glory hole">>
	<<= App.SlaveAssignment.workAGloryHole($slaves[$i])>>
<<case "get milked">>
	<<set _milkResults = App.SlaveAssignment.getMilked($slaves[$i])>>
	<<= _milkResults.text>>
<<case "take classes">>
	<<= App.SlaveAssignment.takeClasses($slaves[$i])>>
<<case "please you">>
	<<= App.SlaveAssignment.pleaseYou($slaves[$i])>>
<<case "be a subordinate slave">>
	<<= App.SlaveAssignment.serveYourOtherSlaves($slaves[$i])>>
<<case "be a servant">>
	<<= App.SlaveAssignment.servant($slaves[$i])>>
<<case "stay confined">>
	<<= App.SlaveAssignment.stayConfined($slaves[$i])>>
<<case "guard you">>
	<<= App.SlaveAssignment.guardYou($slaves[$i])>>
<<case "be your Head Girl">>
	<<= App.SlaveAssignment.beYourHeadGirl($slaves[$i])>>
<<case "recruit girls">>
	<<= App.SlaveAssignment.recruitGirls($slaves[$i])>>
<<default>>
	<<= removeJob($slaves[$i], $slaves[$i].assignment)>>
	<<= App.SlaveAssignment.rest($slaves[$i])>>
<</switch>>

<<if $servantMilkers == 1 && $slaves[$i].lactation > 0 && $slaves[$i].assignment != "get milked">>
	$His assignment
	<<if setup.servantMilkersJobs.includes($slaves[$i].assignment)>>
		is not strenuous, so $he <<if $slaves[$i].devotion > 20>><<if $slaves[$i].fetish == "boobs">>eagerly <</if>>uses<<elseif $slaves[$i].devotion >= -20>>is required to use<<else>>is forced to use<</if>> the penthouse milkers frequently,
		<<set _milkResult = App.SlaveAssignment.getMilked($slaves[$i], 0.5)>>
	<<else>>
		keeps $him busy, but $he <<if $slaves[$i].devotion > 20>><<if $slaves[$i].fetish == "boobs">>eagerly <</if>>uses<<elseif $slaves[$i].devotion >= -20>>is required to use<<else>>is forced to use<</if>> the penthouse milkers whenever $he can,
		<<set _milkResult = App.SlaveAssignment.getMilked($slaves[$i], 0.25)>>
	<</if>>
	and $he gives <<= _milkResult.milk>> liters of milk over the week, which is sold for @@.yellowgreen;<<print cashFormat(_milkResult.milkSale)>>.@@
<</if>>

<<if $slaves[$i].minorInjury != 0>>
	$His $slaves[$i].minorInjury will heal by the end of the week.
<</if>>

<<if $showEWD == 0>>
	<<silently>>
	<<include "SA rules">>
	<<run App.SlaveAssignment.choosesOwnClothes($slaves[$i])>>
	<<run App.SlaveAssignment.diet($slaves[$i])>>
	<<run App.SlaveAssignment.longTermEffects($slaves[$i])>>
	<<run App.SlaveAssignment.drugs($slaves[$i])>>
	<<run App.SlaveAssignment.relationships($slaves[$i])>>
	<<run App.SlaveAssignment.rivalries($slaves[$i])>>
	<</silently>>
<<else>>
	<<include "SA rules">>
	<<= App.SlaveAssignment.choosesOwnClothes($slaves[$i])>>
	<<= App.SlaveAssignment.diet($slaves[$i])>>
	<<includeDOM App.SlaveAssignment.longTermEffects($slaves[$i])>>
	<<= App.SlaveAssignment.drugs($slaves[$i])>>
	<<= App.SlaveAssignment.relationships($slaves[$i])>>
	<<= App.SlaveAssignment.rivalries($slaves[$i])>>

<</if>>

<<if $PC.health.shortDamage < 30 && Array.isArray($personalAttention) && $personalAttention.findIndex(function(s) { return s.ID == $slaves[$i].ID; }) != -1>>
	<<includeDOM personalAttention($slaves[$i])>>
<</if>>

<<for _hgtsidx = 0; _hgtsidx < $HGTrainSlavesIDs.length; _hgtsidx++>>
	<<if $slaves[$i].ID == $HGTrainSlavesIDs[_hgtsidx].ID>>
		<<set $activeSlave = $slaves[$i], $HGtraining = $HGTrainSlavesIDs[_hgtsidx].training>>
		<<include "HG Application">>

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

    <<= App.SlaveAssignment.devotion($slaves[$i])>>


code:
:: Future Society [nobr jump-to-safe jump-from-safe]

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

/* 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].FSNeoImperialist != "unset">>
		<<set $rivalryFS = "Neo-Imperialism">>
	<<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>>

<<set _FSCredits = FutureSocieties.availCredits()>>
<<if _FSCredits > 0>>
	$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 should 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].FSNeoImperialist >= $FSLockinLevel>>
	$arcologies[0].name believes implicitly that your arcology is truly a new Imperial Society.
<<elseif $arcologies[0].FSNeoImperialist >= $FSLockinLevel*0.6>>
	$arcologies[0].name agrees strongly with your project to build a new Imperial Society.
<<elseif $arcologies[0].FSNeoImperialist >= $FSLockinLevel*0.3>>
	$arcologies[0].name is sympathetic to your project to build a new Imperial Society.
<<elseif $arcologies[0].FSNeoImperialist != "unset">>
	$arcologies[0].name is unconvinced of the wisdom of your project to build a new Imperial Society.
<</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

 <<= num($FSGotRepCredits, true)>>
 of <<= num($FSCreditCount, true)>>

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].FSNeoImperialist != "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

/* Race */

	<<if $arcologies[0].FSSupremacist != "unset">>
		You are pursuing $arcologies[0].FSSupremacistRace superiority.

			<<link "Abandon" "Future Society">>
				<<run FutureSocieties.remove("FSSupremacist")>>
				<<if $assistant.fsAppearance == "supremacist">>
					<<set $assistant.fsAppearance = "default">>
				<</if>>
			<</link>>

			<<FSChangeDecoration "FSSupremacist">>

		<<if $policies.publicPA == 1>>
			<<if ($assistant.appearance == "amazon") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "succubus")>>

					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.

			<</if>>
		<</if>>
	<<else>>
		<<if _FSCredits > 0>>
			[[Racial Supremacism|Future Society][$arcologies[0].FSSupremacist = 4]]: 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 $assistant.fsAppearance == "subjugationist">>
				<<set $assistant.fsAppearance = "default">>
			<</if>>
			<</link>>

			<<FSChangeDecoration "FSSubjugationist">>

		<<if $policies.publicPA == 1>>
			<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "amazon") || ($assistant.appearance == "imp")>>
				With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
			<</if>>
		<</if>>
	<<else>>
		<<if _FSCredits > 0>>
			[[Racial Subjugationism|Future Society][$arcologies[0].FSSubjugationist = 4]]: 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>>

/* Preg vs Eugenics */

<<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 $assistant.fsAppearance == "repopulation focus">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSRepopulationFocus" "boughtItem.clothing.maternityLingerie" "boughtItem.clothing.maternityDress" "boughtItem.clothing.belly">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "pregnant fairy") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name 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, $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 $assistant.fsAppearance == "eugenics">>
							<<set $assistant.fsAppearance = "default">>
						<</if>>
					<</link>>

					<<FSChangeDecoration "FSRestart">>

				<<if $policies.publicPA == 1>>
					<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "goddess") || ($assistant.appearance == "loli") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch") || ($assistant.appearance == "incubus") || ($assistant.appearance == "angel")>>
						With _hisA $assistant.appearance appearance, $assistant.name 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 $assistant.fsAppearance == "eugenics">><<set $assistant.fsAppearance = "default">><</if>><</link>>
				<</if>>

					<<FSChangeDecoration "FSRestart">>

				The Societal Elite exist as the highest class, allowing you access to all manner of benefits
				<<if $policies.publicPA == 1>>
					<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "goddess") || ($assistant.appearance == "loli") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch") || ($assistant.appearance == "incubus") || ($assistant.appearance == "angel")>>
						With _hisA $assistant.appearance appearance, $assistant.name 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, $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>>

/* Pro vs Dependant */

	<<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 $assistant.fsAppearance == "intellectual dependency">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSIntellectualDependency" "boughtItem.clothing.bimbo">>

			<<if $policies.publicPA == 1>>
				<<if ["shemale", "succubus", "witch"].includes($assistant.appearance)>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Intellectual Dependency|Future Society][$arcologies[0].FSIntellectualDependency = 4]]: 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 $assistant.fsAppearance == "slave professionalism">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSSlaveProfessionalism" "boughtItem.clothing.courtesan">>

			<<if $policies.publicPA == 1>>
				<<if ["angel", "businesswoman", "incubus", "goddess", "schoolgirl", "succubus"].includes($assistant.appearance)>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Slave Professionalism|Future Society][$arcologies[0].FSSlaveProfessionalism = 4]]: increased interest in smart, refined, altogether perfect slaves.

			<<else>>
				/*Slave Professionalism: increased interest in smart, refined, altogether perfect slaves.*/
			<</if>>
		<</if>>
	<</if>>

/* Gender */

	<<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 $assistant.fsAppearance == "gender radicalist">>
							<<set $assistant.fsAppearance = "default">>
						<</if>>
					<</link>>

					<<FSChangeDecoration "FSGenderRadicalist">>

				<<if $policies.publicPA == 1>>
					<<if ($assistant.appearance == "shemale") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
						With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
					<</if>>
				<</if>>
			<<else>>
				<<if _FSCredits > 0>>

						[[Gender radicalism|Future Society][$arcologies[0].FSGenderRadicalist = 4]]: 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 $assistant.fsAppearance == "gender fundamentalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSGenderFundamentalist" "boughtItem.clothing.bunny">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "goddess") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "loli") || ($assistant.appearance == "fairy") || ($assistant.appearance == "pregnant fairy") || ($assistant.appearance == "angel") || ($assistant.appearance == "cherub") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Gender traditionalism|Future Society][$arcologies[0].FSGenderFundamentalist = 4]]: 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>>

/* Deg vs Paternalist */

	<<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 $assistant.fsAppearance == "paternalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSPaternalist" "boughtItem.clothing.conservative">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "goddess") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "loli") || ($assistant.appearance == "fairy") || ($assistant.appearance == "pregnant fairy") || ($assistant.appearance == "angel") || ($assistant.appearance == "cherub")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Paternalism|Future Society][$arcologies[0].FSPaternalist = 4]]: 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 $assistant.fsAppearance == "degradationist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSDegradationist" "boughtItem.clothing.chains">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "monstergirl") || ($assistant.appearance == "businesswoman") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "succubus") || ($assistant.appearance == "incubus") || ($assistant.appearance == "imp")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Degradationism|Future Society][$arcologies[0].FSDegradationist = 4]]: 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>>

/* TF vs Purist */

	<<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 $assistant.fsAppearance == "body purist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSBodyPurist">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "amazon") || ($assistant.appearance == "goddess") || ($assistant.appearance == "loli") || ($assistant.appearance == "fairy") || ($assistant.appearance == "pregnant fairy") || ($assistant.appearance == "angel") || ($assistant.appearance == "succubus") || ($assistant.appearance == "incubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Body Purism|Future Society][$arcologies[0].FSBodyPurist = 4]]: 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 $assistant.fsAppearance == "transformation fetishist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSTransformationFetishist">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "shemale") || ($assistant.appearance == "succubus") || ($assistant.appearance == "incubus") || ($assistant.appearance == "witch") || ($assistant.appearance == "ERROR_1606_APPEARANCE_FILE_CORRUPT")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

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

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

/* Maturity vs Youth */

	<<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 $assistant.fsAppearance == "youth preferentialist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSYouthPreferentialist">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "shemale") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "loli") || ($assistant.appearance == "succubus") || ($assistant.appearance == "angel") || ($assistant.appearance == "cherub") || ($assistant.appearance == "imp") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Youth Preferentialism|Future Society][$arcologies[0].FSYouthPreferentialist = 4]]: 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 $assistant.fsAppearance == "maturity preferentialist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSMaturityPreferentialist">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "goddess") || ($assistant.appearance == "succubus") || ($assistant.appearance == "incubus") || ($assistant.appearance == "witch") || ($assistant.appearance == "angel")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

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

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

/* Statuesque vs Petite */

	<<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 $assistant.fsAppearance == "petite admiration">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSPetiteAdmiration">>

			<<if $policies.publicPA == 1>>
				<<if ["cherub", "fairy", "imp", "incubus", "loli", "preggololi", "pregnant fairy", "schoolgirl", "succubus"].includes($assistant.appearance)>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Petite Admiration|Future Society][$arcologies[0].FSPetiteAdmiration = 4]]: 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 $assistant.fsAppearance == "statuesque glorification">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSStatuesqueGlorification">>

			<<if $policies.publicPA == 1>>
				<<if ["amazon", "goddess", "incubus", "succubus", "witch"].includes($assistant.appearance)>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Statuesque Glorification|Future Society][$arcologies[0].FSStatuesqueGlorification = 4]]: societal fixation on tallness.

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

/* Expand vs Slim */

	<<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 $assistant.fsAppearance == "slimness enthusiast">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSSlimnessEnthusiast">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "shemale") || ($assistant.appearance == "loli") || ($assistant.appearance == "cherub") || ($assistant.appearance == "imp") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Slimness Enthusiasm|Future Society][$arcologies[0].FSSlimnessEnthusiast = 4]]: 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 $assistant.fsAppearance == "asset expansionist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSAssetExpansionist">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "shemale") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "succubus") || ($assistant.appearance == "incubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

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

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

/* Milking stands alone */

	<<if $arcologies[0].FSPastoralist != "unset">>
		You are pursuing societal normalization of slave milking.

			<<link "Abandon" "Future Society">>
				<<run FutureSocieties.remove("FSPastoralist")>>
				<<if $assistant.fsAppearance == "pastoralist">>
					<<set $assistant.fsAppearance = "default">>
				<</if>>
			<</link>>

			<<FSChangeDecoration "FSPastoralist" "boughtItem.clothing.western">>

		<<if $policies.publicPA == 1>>
			<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "shemale") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
				With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
			<</if>>
		<</if>>
	<<else>>
		<<if _FSCredits > 0>>

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

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

/* Pastoralist vs Hedonist */

	<<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 $assistant.fsAppearance == "physical idealist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSPhysicalIdealist" "boughtItem.clothing.oil">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "amazon") || ($assistant.appearance == "shemale") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Physical Idealism|Future Society][$arcologies[0].FSPhysicalIdealist = 4]]: 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 $assistant.fsAppearance == "hedonistic decadence">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSHedonisticDecadence">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "hypergoddess") || ($assistant.appearance == "preggololi") || ($assistant.appearance == "imp") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Hedonistic Decadence|Future Society][$arcologies[0].FSHedonisticDecadence = 4]]: 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>>

/* Chattel religionist vs Multicultural */

	<<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 $assistant.fsAppearance == "chattel religionist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSChattelReligionist" "boughtItem.clothing.habit">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus") || ($assistant.appearance == "witch") || ($assistant.appearance == "angel") || ($assistant.appearance == "cherub") || ($assistant.appearance == "imp")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Chattel Religionism|Future Society][$arcologies[0].FSChattelReligionist = 4]]: 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]]

				<</if>>
				<<if _FSCredits > 0>>
					<<if $arcologies[0].FSNull < $FSLockinLevel>>

							[[Advance|Future Society][$arcologies[0].FSNull += 25]]: further commitment to allow your arcology's citizens cultural freedom.

					<</if>>
				<</if>>
			<<else>>
				<<if _FSCredits > 0>>

						[[Multiculturalism|Future Society][$arcologies[0].FSNull = 25]]: 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]]
				<</if>>
				<<if _FSCredits > 0>>
					<<if $arcologies[0].FSNull < $FSLockinLevel>>

							[[Advance|Future Society][$arcologies[0].FSNull += 17]]: further commitment to allow your arcology's citizens cultural freedom.

					<</if>>
				<</if>>
			<<else>>
				<<if _FSCredits > 0>>

						[[Multiculturalism|Future Society][$arcologies[0].FSNull = 17]]: 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]]

				<</if>>
				<<if _FSCredits > 0>>
					<<if $arcologies[0].FSNull < $FSLockinLevel>>

							[[Advance|Future Society][$arcologies[0].FSNull += 15]]: further commitment to allow your arcology's citizens cultural freedom.

					<</if>>
				<</if>>
			<<else>>
				<<if _FSCredits > 0>>

						[[Multiculturalism|Future Society][$arcologies[0].FSNull = 15]]: 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]]

				<</if>>
				<<if _FSCredits > 0>>
					<<if $arcologies[0].FSNull < $FSLockinLevel>>

							[[Advance|Future Society][$arcologies[0].FSNull += 20]]: further commitment to allow your arcology's citizens cultural freedom.

					<</if>>
				<</if>>
			<<else>>
				<<if _FSCredits > 0>>

						[[Multiculturalism|Future Society][$arcologies[0].FSNull = 20]]: 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>>

/* Revival section */

	<<if ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset") && ($arcologies[0].FSNeoImperialist == "unset")>>
		<<if $arcologies[0].FSRomanRevivalist != "unset">>
			You are pursuing a vision of a new Rome.

				<<link "Abandon" "Future Society">>
					<<run FutureSocieties.remove("FSRomanRevivalist")>>
					<<if $assistant.fsAppearance == "roman revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSRomanRevivalist" "boughtItem.clothing.toga">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "amazon") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Roman Revivalism|Future Society][$arcologies[0].FSRomanRevivalist = 4]]: a vision of a new Rome.

			<<else>>
				/*Roman Revivalism: a vision of a new Rome.*/
			<</if>>
		<</if>>
	<</if>>

	<<if ($arcologies[0].FSAztecRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset")&& ($arcologies[0].FSRomanRevivalist == "unset")>>
		<<if $arcologies[0].FSNeoImperialist != "unset">>
			You are pursuing a vision of a new Imperial Society.

				<<link "Abandon" "Future Society">>
					<<run FutureSocieties.remove("FSNeoImperialist")>>
					<<if $assistant.fsAppearance == "neo-imperialist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSNeoImperialist" "boughtItem.clothing.imperialarmor" "boughtItem.clothing.imperialsuit">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "amazon") || ($assistant.appearance == "incubus") || ($assistant.appearance == "shemale") || ($assistant.appearance == "angel")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Neo-Imperialism|Future Society][$arcologies[0].FSNeoImperialist = 4]]: a vision of a new Imperial society, integrating high technology and old-world culture under the iron fist of your absolute rule.

			<<else>>
				/*Neo-Imperialism: a vision of a new Imperial Society, integrating high technology and old-world culture under the iron fist of your absolute rule.*/
			<</if>>
		<</if>>
	<</if>>

	<<if ($arcologies[0].FSRomanRevivalist == "unset") && ($arcologies[0].FSEgyptianRevivalist == "unset") && ($arcologies[0].FSEdoRevivalist == "unset") && ($arcologies[0].FSArabianRevivalist == "unset") && ($arcologies[0].FSChineseRevivalist == "unset") && ($arcologies[0].FSNeoImperialist == "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 $assistant.fsAppearance == "aztec revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSAztecRevivalist" "boughtItem.clothing.huipil">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "amazon") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Aztec Revivalism|Future Society][$arcologies[0].FSAztecRevivalist = 4]]: 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") && ($arcologies[0].FSNeoImperialist == "unset")>>
		<<if $arcologies[0].FSEgyptianRevivalist != "unset">>
			You are pursuing a vision of Pharaoh's Egypt.

				<<link "Abandon" "Future Society">>
					<<run FutureSocieties.remove("FSEgyptianRevivalist")>>
					<<if $assistant.fsAppearance == "egyptian revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSEgyptianRevivalist" "boughtItem.clothing.egypt">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "goddess") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name 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), $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") && ($arcologies[0].FSNeoImperialist == "unset")>>
		<<if $arcologies[0].FSEdoRevivalist != "unset">>
			You are pursuing a vision of Edo Japan.

				<<link "Abandon" "Future Society">>
					<<run FutureSocieties.remove("FSEdoRevivalist")>>
					<<if $assistant.fsAppearance == "edo revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSEdoRevivalist" "boughtItem.clothing.kimono">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "amazon") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "loli") || ($assistant.appearance == "kitsune") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Edo Revivalism|Future Society][$arcologies[0].FSEdoRevivalist = 4]]: 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") && ($arcologies[0].FSNeoImperialist == "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 $assistant.fsAppearance == "arabian revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSArabianRevivalist" "boughtItem.clothing.harem">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "businesswoman") || ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Arabian Revivalism|Future Society][$arcologies[0].FSArabianRevivalist = 4]]: 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") && ($arcologies[0].FSNeoImperialist == "unset")>>
		<<if $arcologies[0].FSChineseRevivalist != "unset">>
			You are pursuing a vision of ancient China.

				<<link "Abandon" "Future Society">>
					<<run FutureSocieties.remove("FSChineseRevivalist")>>
					<<if $assistant.fsAppearance == "chinese revivalist">>
						<<set $assistant.fsAppearance = "default">>
					<</if>>
				<</link>>

				<<FSChangeDecoration "FSChineseRevivalist" "boughtItem.clothing.qipao">>

			<<if $policies.publicPA == 1>>
				<<if ($assistant.appearance == "schoolgirl") || ($assistant.appearance == "monstergirl") || ($assistant.appearance == "incubus") || ($assistant.appearance == "succubus")>>
					With _hisA $assistant.appearance appearance, $assistant.name is a good public mascot for this goal.
				<</if>>
			<</if>>
		<<else>>
			<<if _FSCredits > 0>>

					[[Chinese Revivalism|Future Society][$arcologies[0].FSChineseRevivalist = 4]]: a vision of ancient China.

			<<else>>
				/*Chinese Revivalism: a vision of ancient China.*/
			<</if>>
		<</if>>
	<</if>>

Facility Redecoration

<<run FutureSocieties.DecorationCleanup()>>

<<if $brothel > 0>>

<<= capFirstChar($brothelName)>> is decorated in $brothelDecoration style.

	<<SetFacilityDecoration "brothelDecoration">>
<</if>>

<<if $club > 0>>

<<= capFirstChar($clubName)>> is decorated in $clubDecoration style.

	<<SetFacilityDecoration "clubDecoration">>
<</if>>

<<if $dairy > 0>>

<<= capFirstChar($dairyName)>> is decorated in $dairyDecoration style.

	<<SetFacilityDecoration "dairyDecoration">>
<</if>>

<<if $farmyard > 0>>

<<= capFirstChar($farmyardName)>> is decorated in $farmyardDecoration style.

	<<SetFacilityDecoration "farmyardDecoration">>
<</if>>

<<if $spa > 0>>

<<= capFirstChar($spaName)>> is decorated in $spaDecoration style.

	<<SetFacilityDecoration "spaDecoration">>
<</if>>

<<if $nursery > 0>>

<<= capFirstChar($nurseryName)>> is decorated in $nurseryDecoration style.

	<<SetFacilityDecoration "nurseryDecoration">>
<</if>>

<<if $clinic > 0>>

<<= capFirstChar($clinicName)>> is decorated in $clinicDecoration style.

	<<SetFacilityDecoration "clinicDecoration">>
<</if>>

<<if $schoolroom > 0>>

<<= capFirstChar($schoolroomName)>> is decorated in $schoolroomDecoration style.

	<<SetFacilityDecoration "schoolroomDecoration">>
<</if>>

<<if $cellblock > 0>>

<<= capFirstChar($cellblockName)>> is decorated in $cellblockDecoration style.

	<<SetFacilityDecoration "cellblockDecoration">>
<</if>>

<<if $servantsQuarters > 0>>

<<= capFirstChar($servantsQuartersName)>> is decorated in $servantsQuartersDecoration style.

	<<SetFacilityDecoration "servantsQuartersDecoration">>
<</if>>

<<if $arcade > 0>>

<<= capFirstChar($arcadeName)>> is decorated in $arcadeDecoration style.

	<<SetFacilityDecoration "arcadeDecoration">>
<</if>>

<<if $masterSuite > 0>>

<<= capFirstChar($masterSuiteName)>> is decorated in $masterSuiteDecoration style.

	<<SetFacilityDecoration "masterSuiteDecoration">>
<</if>>

repo_name: Welptard/fc

license: mit


code:
:: Head Girl Suite [nobr jump-to-safe jump-from-safe]

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

<<set _i = $slaves.findIndex(function(s) { return s.assignment == "live with your Head Girl"; })>>

<<if $HeadGirlID == 0>>
	You have no Head Girl appointed to live in $HGSuiteName.
	<<link "Select Head Girl">><<goto "HG Select">><</link>>
<<elseif App.Entity.facilities.headGirlSuite.hasEmployees>>
	<<setLocalPronouns _S.HeadGirl>>
	Your Head Girl _S.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 _S.HeadGirl>>
	Your Head Girl _S.HeadGirl.slaveName lives alone in $his handsome suite.
	<<link "Manage Head Girl">><<goto "HG Select">><</link>>
<</if>>

<<if $HeadGirlID != 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>>

		<<includeDOM App.UI.SlaveList.listSJFacilitySlaves(App.Entity.facilities.headGirlSuite)>>

<</if>>

	Rename $HGSuiteName: <<textbox "$HGSuiteName" $HGSuiteName "Head Girl Suite">>

		Use a noun or similar short phrase