code:
:: Arcology Opinion [nobr]

<<if ndef $activeArcology.FSNull>><<set $activeArcology.FSNull = "unset">><</if>>
<<if ndef $targetArcology.FSNull>><<set $targetArcology.FSNull = "unset">><</if>>

<<set $opinion = 0>>

<<if $activeArcology.FSSubjugationist != "unset">>
	<<if $targetArcology.FSSubjugationist != "unset">>
	<<if $targetArcology.FSSubjugationistRace == $activeArcology.FSSubjugationistRace>>
		<<set $opinion += $activeArcology.FSSubjugationist>>
		<<set $opinion += $targetArcology.FSSubjugationist>>
	<<else>>
		<<set $opinion -= $activeArcology.FSSubjugationist>>
		<<set $opinion -= $targetArcology.FSSubjugationist>>
	<</if>>
	<<elseif $targetArcology.FSSupremacist != "unset">>
	<<if $targetArcology.FSSupremacistRace == $activeArcology.FSSubjugationistRace>>
		<<set $opinion -= $activeArcology.FSSubjugationist>>
		<<set $opinion -= $targetArcology.FSSupremacist>>
	<</if>>
	<</if>>
<</if>>
<<if $activeArcology.FSSupremacist != "unset">>
	<<if $targetArcology.FSSupremacist != "unset">>
	<<if $targetArcology.FSSupremacistRace == $activeArcology.FSSupremacistRace>>
		<<set $opinion += $activeArcology.FSSupremacist>>
		<<set $opinion += $targetArcology.FSSupremacist>>
	<<else>>
		<<set $opinion -= $activeArcology.FSSupremacist>>
		<<set $opinion -= $targetArcology.FSSupremacist>>
	<</if>>
	<<elseif $targetArcology.FSSubjugationist != "unset">>
	<<if $targetArcology.FSSubjugationistRace == $activeArcology.FSSupremacistRace>>
		<<set $opinion -= $activeArcology.FSSupremacist>>
		<<set $opinion -= $targetArcology.FSSubjugationist>>
	<</if>>
	<</if>>
<</if>>
<<if $activeArcology.FSRepopulationFocus != "unset">>
	<<if $targetArcology.FSRepopulationFocus != "unset">>
	<<set $opinion += $activeArcology.FSRepopulationFocus>>
	<<set $opinion += $targetArcology.FSRepopulationFocus>>
	<<elseif $targetArcology.FSRestart != "unset">>
	<<set $opinion -= $activeArcology.FSRepopulationFocus>>
	<<set $opinion -= $targetArcology.FSRestart>>
	<</if>>
<<elseif $activeArcology.FSRestart != "unset">>
	<<if $targetArcology.FSRestart != "unset">>
	<<set $opinion += $activeArcology.FSRestart>>
	<<set $opinion += $targetArcology.FSRestart>>
	<<elseif $targetArcology.FSRepopulationFocus != "unset">>
	<<set $opinion -= $activeArcology.FSRestart>>
	<<set $opinion -= $targetArcology.FSRepopulationFocus>>
	<</if>>
<</if>>
<<if $activeArcology.FSGenderRadicalist != "unset">>
	<<if $targetArcology.FSGenderRadicalist != "unset">>
	<<set $opinion += $activeArcology.FSGenderRadicalist>>
	<<set $opinion += $targetArcology.FSGenderRadicalist>>
	<<elseif $targetArcology.FSGenderFundamentalist != "unset">>
	<<set $opinion -= $activeArcology.FSGenderRadicalist>>
	<<set $opinion -= $targetArcology.FSGenderFundamentalist>>
	<</if>>
<<elseif $activeArcology.FSGenderFundamentalist != "unset">>
	<<if $targetArcology.FSGenderFundamentalist != "unset">>
	<<set $opinion += $activeArcology.FSGenderFundamentalist>>
	<<set $opinion += $targetArcology.FSGenderFundamentalist>>
	<<elseif $targetArcology.FSGenderRadicalist != "unset">>
	<<set $opinion -= $activeArcology.FSGenderFundamentalist>>
	<<set $opinion -= $targetArcology.FSGenderRadicalist>>
	<</if>>
<</if>>
<<if $activeArcology.FSPaternalist != "unset">>
	<<if $targetArcology.FSPaternalist != "unset">>
	<<set $opinion += $activeArcology.FSPaternalist>>
	<<set $opinion += $targetArcology.FSPaternalist>>
	<<elseif $targetArcology.FSDegradationist != "unset">>
	<<set $opinion -= $activeArcology.FSPaternalist>>
	<<set $opinion -= $targetArcology.FSDegradationist>>
	<</if>>
<<elseif $activeArcology.FSDegradationist != "unset">>
	<<if $targetArcology.FSDegradationist != "unset">>
	<<set $opinion += $activeArcology.FSDegradationist>>
	<<set $opinion += $targetArcology.FSDegradationist>>
	<<elseif $targetArcology.FSPaternalist != "unset">>
	<<set $opinion -= $activeArcology.FSDegradationist>>
	<<set $opinion -= $targetArcology.FSPaternalist>>
	<</if>>
<</if>>
<<if $activeArcology.FSBodyPurist != "unset">>
	<<if $targetArcology.FSBodyPurist != "unset">>
	<<set $opinion += $activeArcology.FSBodyPurist>>
	<<set $opinion += $targetArcology.FSBodyPurist>>
	<<elseif $targetArcology.FSTransformationFetishist != "unset">>
	<<set $opinion -= $activeArcology.FSBodyPurist>>
	<<set $opinion -= $targetArcology.FSTransformationFetishist>>
	<</if>>
<<elseif $activeArcology.FSTransformationFetishist != "unset">>
	<<if $targetArcology.FSTransformationFetishist != "unset">>
	<<set $opinion += $activeArcology.FSTransformationFetishist>>
	<<set $opinion += $targetArcology.FSTransformationFetishist>>
	<<elseif $targetArcology.FSBodyPurist != "unset">>
	<<set $opinion -= $activeArcology.FSTransformationFetishist>>
	<<set $opinion -= $targetArcology.FSBodyPurist>>
	<</if>>
<</if>>
<<if $activeArcology.FSYouthPreferentialist != "unset">>
	<<if $targetArcology.FSYouthPreferentialist != "unset">>
	<<set $opinion += $activeArcology.FSYouthPreferentialist>>
	<<set $opinion += $targetArcology.FSYouthPreferentialist>>
	<<elseif $targetArcology.FSMaturityPreferentialist != "unset">>
	<<set $opinion -= $activeArcology.FSYouthPreferentialist>>
	<<set $opinion -= $targetArcology.FSMaturityPreferentialist>>
	<</if>>
<<elseif $activeArcology.FSMaturityPreferentialist != "unset">>
	<<if $targetArcology.FSMaturityPreferentialist != "unset">>
	<<set $opinion += $activeArcology.FSMaturityPreferentialist>>
	<<set $opinion += $targetArcology.FSMaturityPreferentialist>>
	<<elseif $targetArcology.FSYouthPreferentialist != "unset">>
	<<set $opinion -= $activeArcology.FSMaturityPreferentialist>>
	<<set $opinion -= $targetArcology.FSYouthPreferentialist>>
	<</if>>
<</if>>
<<if $activeArcology.FSSlimnessEnthusiast != "unset">>
	<<if $targetArcology.FSSlimnessEnthusiast != "unset">>
	<<set $opinion += $activeArcology.FSSlimnessEnthusiast>>
	<<set $opinion += $targetArcology.FSSlimnessEnthusiast>>
	<<elseif $targetArcology.FSAssetExpansionist != "unset">>
	<<set $opinion -= $activeArcology.FSSlimnessEnthusiast>>
	<<set $opinion -= $targetArcology.FSAssetExpansionist>>
	<</if>>
<<elseif $activeArcology.FSAssetExpansionist != "unset">>
	<<if $targetArcology.FSAssetExpansionist != "unset">>
	<<set $opinion += $activeArcology.FSAssetExpansionist>>
	<<set $opinion += $targetArcology.FSAssetExpansionist>>
	<<elseif $targetArcology.FSSlimnessEnthusiast != "unset">>
	<<set $opinion -= $activeArcology.FSAssetExpansionist>>
	<<set $opinion -= $targetArcology.FSSlimnessEnthusiast>>
	<</if>>
<</if>>
<<if $activeArcology.FSPastoralist != "unset">>
	<<if $targetArcology.FSPastoralist != "unset">>
	<<set $opinion += $activeArcology.FSPastoralist>>
	<<set $opinion += $targetArcology.FSPastoralist>>
	<<elseif $targetArcology.FSCummunism != "unset">>
	<<set $opinion -= $activeArcology.FSPastoralist>>
	<<set $opinion -= $targetArcology.FSCummunism>>
	<</if>>
<<elseif $activeArcology.FSCummunism != "unset">>
	<<if $targetArcology.FSCummunism != "unset">>
	<<set $opinion += $activeArcology.FSCummunism>>
	<<set $opinion += $targetArcology.FSCummunism>>
	<<elseif $targetArcology.FSPastoralist != "unset">>
	<<set $opinion -= $activeArcology.FSCummunism>>
	<<set $opinion -= $targetArcology.FSPastoralist>>
	<</if>>
<</if>>
<<if $activeArcology.FSPhysicalIdealist != "unset">>
	<<if $targetArcology.FSPhysicalIdealist != "unset">>
	<<set $opinion += $activeArcology.FSPhysicalIdealist>>
	<<set $opinion += $targetArcology.FSPhysicalIdealist>>
	<<elseif $targetArcology.FSHedonisticDecadence != "unset">>
	<<set $opinion -= $activeArcology.FSPhysicalIdealist>>
	<<set $opinion -= $targetArcology.FSHedonisticDecadence>>
	<</if>>
<<elseif $activeArcology.FSHedonisticDecadence != "unset">>
	<<if $targetArcology.FSHedonisticDecadence != "unset">>
	<<set $opinion += $activeArcology.FSHedonisticDecadence>>
	<<set $opinion += $targetArcology.FSHedonisticDecadence>>
	<<elseif $targetArcology.FSPhysicalIdealist != "unset">>
	<<set $opinion -= $activeArcology.FSHedonisticDecadence>>
	<<set $opinion -= $targetArcology.FSPhysicalIdealist>>
	<</if>>
<</if>>
<<if $activeArcology.FSChattelReligionist != "unset">>
	<<if $targetArcology.FSChattelReligionist != "unset">>
	<<set $opinion += $activeArcology.FSChattelReligionist>>
	<<set $opinion += $targetArcology.FSChattelReligionist>>
	<<elseif $targetArcology.FSNull != "unset">>
	<<set $opinion -= $activeArcology.FSChattelReligionist>>
	<<set $opinion -= $targetArcology.FSNull>>
	<</if>>
<<elseif $activeArcology.FSNull != "unset">>
	<<if $targetArcology.FSNull != "unset">>
		<<set $opinion += $activeArcology.FSNull>>
		<<set $opinion += $targetArcology.FSNull>>
	<<elseif $targetArcology.FSChattelReligionist != "unset">>
		<<set $opinion -= $activeArcology.FSNull>>
		<<set $opinion -= $targetArcology.FSChattelReligionist>>
	<<else>>
		<<set $opinion += $activeArcology.FSNull>>
	<</if>>
<<elseif $targetArcology.FSNull != "unset">>
	<<set $opinion += $targetArcology.FSNull>>
<</if>>
<<if $activeArcology.FSRomanRevivalist != "unset">>
	<<if $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSRomanRevivalist>>
		<<set $opinion += $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSRomanRevivalist>>
		<<set $opinion -= $targetArcology.FSAztecRevivalist>>
	<<elseif $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSRomanRevivalist>>
		<<set $opinion -= $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSRomanRevivalist>>
		<<set $opinion -= $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSRomanRevivalist>>
		<<set $opinion -= $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSRomanRevivalist>>
		<<set $opinion -= $targetArcology.FSChineseRevivalist>>
	<</if>>
<<elseif $activeArcology.FSAztecRevivalist != "unset">>
	<<if $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSAztecRevivalist>>
		<<set $opinion += $targetArcology.FSAztecRevivalist>>
	<<elseif $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSAztecRevivalist>>
		<<set $opinion -= $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSAztecRevivalist>>
		<<set $opinion -= $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSAztecRevivalist>>
		<<set $opinion -= $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSAztecRevivalist>>
		<<set $opinion -= $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSAztecRevivalist>>
		<<set $opinion -= $targetArcology.FSChineseRevivalist>>
	<</if>>
<<elseif $activeArcology.FSEgyptianRevivalist != "unset">>
	<<if $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion += $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion -= $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion -= $targetArcology.FSAztecRevivalist>>
	<<elseif $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion -= $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion -= $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion -= $targetArcology.FSChineseRevivalist>>
	<</if>>
	<<if $targetArcology.FSIncestFetishist != "unset">>
		<<set $opinion += $activeArcology.FSEgyptianRevivalist>>
		<<set $opinion += $targetArcology.FSIncestFetishist>>
	<</if>>
<<elseif $activeArcology.FSEdoRevivalist != "unset">>
	<<if $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSEdoRevivalist>>
		<<set $opinion += $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEdoRevivalist>>
		<<set $opinion -= $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEdoRevivalist>>
		<<set $opinion -= $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEdoRevivalist>>
		<<set $opinion -= $targetArcology.FSAztecRevivalist>>
	<<elseif $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEdoRevivalist>>
		<<set $opinion -= $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSEdoRevivalist>>
		<<set $opinion -= $targetArcology.FSChineseRevivalist>>
	<</if>>
<<elseif $activeArcology.FSArabianRevivalist != "unset">>
	<<if $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSArabianRevivalist>>
		<<set $opinion += $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSArabianRevivalist>>
		<<set $opinion -= $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSArabianRevivalist>>
		<<set $opinion -= $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSArabianRevivalist>>
		<<set $opinion -= $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSArabianRevivalist>>
		<<set $opinion -= $targetArcology.FSAztecRevivalist>>
	<<elseif $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSArabianRevivalist>>
		<<set $opinion -= $targetArcology.FSChineseRevivalist>>
	<</if>>
<<elseif $activeArcology.FSChineseRevivalist != "unset">>
	<<if $targetArcology.FSChineseRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSChineseRevivalist>>
		<<set $opinion += $targetArcology.FSChineseRevivalist>>
	<<elseif $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSChineseRevivalist>>
		<<set $opinion -= $targetArcology.FSEgyptianRevivalist>>
	<<elseif $targetArcology.FSEdoRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSChineseRevivalist>>
		<<set $opinion -= $targetArcology.FSEdoRevivalist>>
	<<elseif $targetArcology.FSArabianRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSChineseRevivalist>>
		<<set $opinion -= $targetArcology.FSArabianRevivalist>>
	<<elseif $targetArcology.FSRomanRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSChineseRevivalist>>
		<<set $opinion -= $targetArcology.FSRomanRevivalist>>
	<<elseif $targetArcology.FSAztecRevivalist != "unset">>
		<<set $opinion -= $activeArcology.FSChineseRevivalist>>
		<<set $opinion -= $targetArcology.FSAztecRevivalist>>
	<</if>>
<</if>>
<<if $activeArcology.FSIncestFetishist != "unset">>
	<<if $targetArcology.FSIncestFetishist != "unset">>
		<<set $opinion += $activeArcology.FSIncestFetishist>>
		<<set $opinion += $targetArcology.FSIncestFetishist>>
	<</if>>
	<<if $targetArcology.FSEgyptianRevivalist != "unset">>
		<<set $opinion += $activeArcology.FSIncestFetishist>>
		<<set $opinion += $targetArcology.FSEgyptianRevivalist>>
	<</if>>
<</if>>

<<set $opinion = Number($opinion) || 0>>

<<set $activeArcology = 0>>
<<set $targetArcology = 0>>


code:
:: Assign [nobr]

<<if $i >= 0 && $i < $slaves.length && ((ndef $activeSlave) || $activeSlave.ID != $slaves[$i].ID)>> /* don't overwrite activeSlave unnecessarily */
	<<set $activeSlave = $slaves[$i]>>
<</if>>

<<if (ndef $activeSlave)>>
	@@.red;ERROR: $activeSlave undefined in Assign.tw, $$i = $i, previous passage was '<<print previous()>>'@@ <<link "Continue">><<goto $returnTo>><</link>>
<<else>>

	<<switch $assignTo>>
	<<case "Pit">>
		<<set $fighterIDs.push($activeSlave.ID)>>
		<<goto $returnTo>>

	<<case "Coursing Association">>
		<<set $Lurcher = $activeSlave>>
		<<goto $returnTo>>

	<<default>>
		<<= assignJob($activeSlave, $assignTo)>>

		<<if ($showAssignToScenes == 1) && ($activeSlave.fetish != "mindbroken")>>
			<<if ($assignTo == "Dairy") && (($dairyStimulatorsSetting >= 2) || ($dairyFeedersSetting >= 2) || ($dairyPregSetting >= 2))>>
				<<goto "Industrial Dairy Assignment Scene">>
			<<elseif ($assignTo == "Dairy") && ($dairyRestraintsSetting == 0 && $activeSlave.devotion > 0)>>
				<<goto "Free Range Dairy Assignment Scene">>
			<<elseif ($assignTo == "Brothel")>>
				<<goto "Brothel Assignment Scene">>
			<<else>>
				<<goto $returnTo>>
			<</if>>
		<<else>>
			<<goto $returnTo>>
		<</if>>
	<</switch>>

<</if>>