From 2303e3cb75c581479d6441650f27d1bf982f21d8 Mon Sep 17 00:00:00 2001
From: Blank <blank@national.shitposting.agency>
Date: Tue, 28 May 2019 07:02:21 -0700
Subject: [PATCH] DiplomacySideBar - 0

---
 src/uncategorized/BackwardsCompatibility.tw |   10 +
 src/uncategorized/arcologyDescription.tw    |    5 +-
 src/uncategorized/neighborInteract.tw       | 1051 ++++++++++---------
 src/uncategorized/storyCaption.tw           |    8 +-
 4 files changed, 550 insertions(+), 524 deletions(-)

diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index dcd201d406a..7f720e0d7e3 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -3842,6 +3842,16 @@ Done<br>
 <</if>>
 /* unify cybermod & vanilla finished*/
 
+<<if def $buyArcologyDirection>>
+	<<run delete $buyArcologyDirection>>
+<</if>>
+<<if def $sellArcologyDirection>>
+	<<run delete $sellArcologyDirection>>
+<</if>>
+<<if def $transaction>>
+	<<run delete $transaction>>
+<</if>>
+
 <<unset $SlaveSummaryFiler>>
 <</if>> /* release 1044 */
 
diff --git a/src/uncategorized/arcologyDescription.tw b/src/uncategorized/arcologyDescription.tw
index 7f661244bb7..cda1e254b90 100644
--- a/src/uncategorized/arcologyDescription.tw
+++ b/src/uncategorized/arcologyDescription.tw
@@ -657,11 +657,8 @@ Its lingua franca is $language.
 	<</for>>
 	<<set $averageProsperity = $averageProsperity/_neighboringArcologyCount>>
 
-	<<for $i = 0; $i < $arcologies.length; $i++>>
-		<<if $arcologies[$i].direction != 0>>
+	<<for $i = 1; $i < $arcologies.length; $i++>>
 			<<include "Neighbor Description">>
-			<<print "[[Diplomacy|Neighbor Interact][$activeArcology = $arcologies[" + $i + "]]]">>
-		<</if>>
 	<</for>>
 
 	<<if $cheatMode == 1>>
diff --git a/src/uncategorized/neighborInteract.tw b/src/uncategorized/neighborInteract.tw
index b4d2799c29f..fde9c6363dd 100644
--- a/src/uncategorized/neighborInteract.tw
+++ b/src/uncategorized/neighborInteract.tw
@@ -1,37 +1,17 @@
 :: Neighbor Interact [nobr]
 
-<<set $nextLink = "Manage Arcology", $nextButton = "Back">>
-
-<<set _nei = $arcologies.findIndex(function(s) { return s.direction == $activeArcology.direction; })>>
-<<if _nei != -1>>
-	<<set $arcologies[_nei] = $activeArcology>>
-<<else>>
-	//Neighbor not found, something has gone wrong!//
+<<if def $buyArcologyDirection>>
+	<<run delete $buyArcologyDirection>>
 <</if>>
-
-<<set $arcologies[_nei].prosperity = Math.clamp($arcologies[_nei].prosperity, 1, 300)>>
-
-<<if $buyArcologyDirection != 0 && def $buyArcologyDirection>>
-	<<set _nei = $arcologies.findIndex(function(s) { return s.direction == $buyArcologyDirection; })>>
-	<<run cashX(forceNeg($transaction*(500*Math.trunc($arcologies[_nei].prosperity*(1+($arcologies[_nei].demandFactor/100))))), "war")>>
-	<<run cashX(-10000, "war")>>
-	<<set $arcologies[_nei].PCminority += $transaction>>
-	<<set $arcologies[_nei].demandFactor += $transaction*5>>
-<</if>>
-<<set $buyArcologyDirection = 0>>
-<<if $sellArcologyDirection != 0 && def $sellArcologyDirection>>
-	<<set _nei = $arcologies.findIndex(function(s) { return s.direction == $sellArcologyDirection; })>>
-	<<run cashX(($transaction*(500*Math.trunc($arcologies[_nei].prosperity*(1+($arcologies[_nei].demandFactor/100))))), "war")>>
-	<<set $arcologies[_nei].PCminority -= $transaction>>
-	<<set $arcologies[_nei].demandFactor -= $transaction*2>>
-	<<if $arcologies[_nei].government != "your agent" && $arcologies[_nei].government != "your trustees" && $arcologies[_nei].rival != 1>>
-		<<if $arcologies[_nei].ownership + $arcologies[_nei].PCminority + $arcologies[_nei].minority < 10>>
-			<<set $arcologies[_nei].ownership += 10>>
-		<</if>>
-	<</if>>
+<<if def $sellArcologyDirection>>
+	<<run delete $sellArcologyDirection>>
 <</if>>
-<<set $sellArcologyDirection = 0>>
-<<set $transaction = 0>>
+<<if def $transaction>>
+	<<run delete $transaction>>
+<</if>>
+
+<<set $nextLink = "Manage Arcology", $nextButton = "Back">>
+You have <<print $arcologies.length-1>> neighbors. <br><br>
 
 <<if $arcologies[0].embargoTarget == -1>>
 	You are not engaged in economic warfare against a neighboring arcology.
@@ -46,15 +26,16 @@
 	<<else>>
 		''nominal.'' [[Intensify|Neighbor Interact][$arcologies[0].embargo += 1]]
 	<</if>>
+	| [[Cancel|Neighbor Interact][$arcologies[0].embargoTarget = -1]]
 <</if>>
 
 <br>
-
-<<if $arcologies[0].influenceTarget == -1>>
+<<if $arcologies[0].influenceTarget == -1>> 
 	You are not using your arcology's culture to attempt to influence neighboring arcologies' development.
 <<else>>
 	<<set _nei = $arcologies.findIndex(function(s) { return s.direction == $arcologies[0].influenceTarget; })>>
 	You have targeted '' $arcologies[_nei].name'' for cultural influence.
+	[[Stop|Neighbor Interact][$arcologies[0].influenceTarget = -1]]
 <</if>>
 
 <<if $PC.hacking > 0>>
@@ -72,6 +53,7 @@
 		<<else>>
 			''nominal.'' [[Intensify|Neighbor Interact][$arcologies[0].CyberEconomic += 1]]
 		<</if>>
+		| [[Revert|Neighbor Interact][$arcologies[0].CyberEconomicTarget = -1]]
 	<</if>>
 
 	<br>
@@ -88,11 +70,10 @@
 		<<else>>
 			''nominal.'' [[Intensify|Neighbor Interact][$arcologies[0].CyberReputation += 1]]
 		<</if>>
+		| [[Abort|Neighbor Interact][$arcologies[0].CyberReputationTarget = -1]]
 	<</if>>
 <</if>>
 
-<br>
-
 <<set $desc = []>>
 <<if $arcologies[0].FSSubjugationist > 60>>
 	<<set $desc.push("Racial Subjugation")>>
@@ -173,6 +154,7 @@
 	<<set $desc.push("Chinese Revivalism")>>
 <</if>>
 
+<br><br>
 <<if $desc.length == 0>>
 	Your arcology's culture has not developed to the point where it can meaningfully influence other arcologies.
 <<elseif $desc.length > 2>>
@@ -189,513 +171,546 @@
 <<else>>
 	Your arcology's culture is capable of starting to exert cultural sway over other arcologies. It can project $desc[0].
 <</if>>
+<br>
 
-<<for $i = 0; $i < $arcologies.length; $i++>>
-	<<if $arcologies[$i].direction == $activeArcology.direction>>
-		<<include "Neighbor Description">>
-	<</if>>
-<</for>>
+<span id="Security">
+<<for _currentNeighbor = 1; _currentNeighbor < $arcologies.length; _currentNeighbor++>>
+<<capture _currentNeighbor>>
+	<<set $arcologies[_currentNeighbor].prosperity = Math.clamp($arcologies[_currentNeighbor].prosperity, 1, 300)>>
+	<br>You own $arcologies[_currentNeighbor].PCminority% of 
+	<<link "$arcologies[_currentNeighbor].name">>
+	<<replace "#Security">>
+	<br>[[Back to the main diplomacy page|Neighbor Interact]]
 
-<br>&nbsp;&nbsp;&nbsp;&nbsp;[[Target for economic warfare|Neighbor Interact][$arcologies[0].embargoTarget = $activeArcology.direction]]
-<<if $PC.hacking > 0>>
-	| [[Target for cyber economic warfare|Neighbor Interact][$arcologies[0].CyberEconomicTarget = $activeArcology.direction]]
-	| [[Target their leadership for character assassination|Neighbor Interact][$arcologies[0].CyberReputationTarget = $activeArcology.direction]]
-<</if>>
-<<if $desc.length > 0>>
-	| [[Set as influence target|Neighbor Interact][$arcologies[0].influenceTarget = $activeArcology.direction]]
-<</if>>
-<br>&nbsp;&nbsp;&nbsp;&nbsp;You own ''$activeArcology.PCminority%'' of $activeArcology.name.
-<<set _ownershipCost = 500*Math.trunc($activeArcology.prosperity*(1+($activeArcology.demandFactor/100)))>>
-A 1% interest in $activeArcology.name is worth <<print cashFormat(_ownershipCost)>> and will require a transaction cost of <<print cashFormat(10000)>> to acquire.
-<<if ($activeArcology.ownership + $activeArcology.PCminority + $activeArcology.minority < 100)>>
-	[[Buy|Neighbor Interact][$buyArcologyDirection = $activeArcology.direction, $transaction = 1]]
-	<<if ($activeArcology.ownership + $activeArcology.PCminority + $activeArcology.minority <= 90)>>
-		<<if $cash > 10*(_ownershipCost)>>
-			| [[10%|Neighbor Interact][$buyArcologyDirection = $activeArcology.direction, $transaction = 10]]
-			//Transaction costs will only be paid once//
-		<</if>>
-	<</if>>
-<</if>>
-<<if ($activeArcology.ownership + $activeArcology.PCminority + $activeArcology.minority < 100) && ($activeArcology.PCminority > 0)>>|<</if>>
-<<if $activeArcology.PCminority > 0>>
-	[[Sell|Neighbor Interact][$sellArcologyDirection = $activeArcology.direction, $transaction = 1]]
-	<<if $activeArcology.PCminority >= 10>>
-		| [[10%|Neighbor Interact][$sellArcologyDirection = $activeArcology.direction, $transaction = 10]]
-	<</if>>
-<</if>>
-<br>
-<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-	<<if $activeArcology.government == "your trustees">>
-		<br>
-		[[Appoint an agent|Agent Select]]
-		<span id="rename"> | <<link "Instruct them to rename the arcology">><<replace #rename>> | <<textbox "$activeArcology.name" $activeArcology.name>> [[Confirm name|Neighbor Interact]]<</replace>><</link>></span>
-	<<else>>
-		<br>
-		<<for $j = 0; $j < $leaders.length; $j++>>
-			<<if $activeArcology.leaderID == $leaders[$j].ID>>
-				<<setLocalPronouns $leaders[$j]>>
-				Your agent @@.deeppink;<<= SlaveFullName($leaders[$j])>>@@ is running this arcology. [["Recall and reenslave " + $him|Agent Retrieve]]
-				<span id="rename"> | <<link "Instruct $him to rename the arcology">><<replace #rename>> | <<textbox "$activeArcology.name" $activeArcology.name>> [[Confirm name|Neighbor Interact]]<</replace>><</link>></span>
-				<br>$His <<if $leaders[$j].intelligence > 95>>brilliance<<else>>intelligence<</if>> and education are the most important qualities for $him.
-				<<if $leaders[$j].actualAge > 35>>
-					As with the Head Girl position, $his age and experience lend $him leadership weight.
+		<br>You own ''$arcologies[_currentNeighbor].PCminority%'' of $arcologies[_currentNeighbor].name.
+		<<set _ownershipCost = 500*Math.trunc($arcologies[_currentNeighbor].prosperity*(1+($arcologies[_currentNeighbor].demandFactor/100)))>>
+		A 1% interest in $arcologies[_currentNeighbor].name is worth <<print cashFormat(_ownershipCost)>> and will require a transaction cost of <<print cashFormat(10000)>> to acquire.
+		<<if ($arcologies[_currentNeighbor].ownership + $arcologies[_currentNeighbor].PCminority + $arcologies[_currentNeighbor].minority < 100)>>
+			<br>&nbsp;
+			<<link "Buy" "Neighbor Interact">>
+				<<run cashX(forceNeg(1*(500*Math.trunc($arcologies[_currentNeighbor].prosperity*(1+($arcologies[_currentNeighbor].demandFactor/100))))), "war")>>
+				<<run cashX(-10000, "war")>>
+				<<set $arcologies[_currentNeighbor].PCminority += 1>>
+				<<set $arcologies[_currentNeighbor].demandFactor += 1*5>>
+		<</link>>
+			<<if ($arcologies[_currentNeighbor].ownership + $arcologies[_currentNeighbor].PCminority + $arcologies[_currentNeighbor].minority <= 90)>>
+				<<if $cash > 10*(_ownershipCost)>>
+					| <<link "10%" "Neighbor Interact">>
+						<<run cashX(forceNeg(1*(500*Math.trunc($arcologies[_currentNeighbor].prosperity*(1+($arcologies[_currentNeighbor].demandFactor/100))))), "war")>>
+						<<run cashX(-10000, "war")>>
+						<<set $arcologies[_currentNeighbor].PCminority += 10>>
+						<<set $arcologies[_currentNeighbor].demandFactor += 10*5>>
+					<</link>>
+					//Transaction costs will only be paid once.//
 				<</if>>
-				<<if $leaders[$j].career == "an arcology owner">>
-					$His career as an arcology owner $himself is, obviously, useful to $him.
-				<<elseif setup.HGCareers.includes($leaders[$j].career)>>
-					$His career in leadership helps $him.
-				<</if>>
-				<<if $leaders[$j].fetishStrength > 95>>
-					<<if ($leaders[$j].fetish == "dom") || ($leaders[$j].fetish == "sadist")>>
-						$His sexually dominant fetish helps $him fill a leadership role.
-					<<elseif ($leaders[$j].fetish == "submissive") || ($leaders[$j].fetish == "masochist")>>
-						Unfortunately, $he has an inappropriate fetish for a leader.
-					<<else>>
-						$His sexual fetishes will influence how $he leads the arcology.
+			<</if>>
+		<</if>>
+		
+		<<if $arcologies[_currentNeighbor].PCminority > 0>>
+			<br>&nbsp;
+			<<link "Sell" "Neighbor Interact">>
+				<<run cashX((1*(500*Math.trunc($arcologies[_currentNeighbor].prosperity*(1+($arcologies[_currentNeighbor].demandFactor/100))))), "war")>>
+				<<set $arcologies[_currentNeighbor].PCminority -= 1>>
+				<<set $arcologies[_currentNeighbor].demandFactor -= 1*2>>
+				<<if $arcologies[_currentNeighbor].government != "your agent" && $arcologies[_currentNeighbor].government != "your trustees" && $arcologies[_currentNeighbor].rival != 1>>
+					<<if $arcologies[_currentNeighbor].ownership + $arcologies[_currentNeighbor].PCminority + $arcologies[_currentNeighbor].minority < 10>>
+						<<set $arcologies[_currentNeighbor].ownership += 10>>
 					<</if>>
 				<</if>>
-				<<if $leaders[$j].energy > 95>>
-					Finally, $his sexual depravity lets $him fit into arcology society naturally.
-				<</if>>
-			<</if>>
-		<</for>>
-	<</if>>
-	<<if $activeArcology.FSSubjugationist != "unset">>
-		<br><<link "Force Abandonment of Racial Subjugation">><<set $activeArcology.FSSubjugationist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSSupremacist != "unset">>
-		<br><<link "Force Abandonment of Racial Supremacy">><<set $activeArcology.FSSupremacist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSRepopulationFocus != "unset">>
-		<br><<link "Force Abandonment of Repopulationism">><<set $activeArcology.FSRepopulationFocus = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSRestart != "unset">>
-		<br><<link "Force Abandonment of Eugenics">><<set $activeArcology.FSRestart = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSGenderRadicalist != "unset">>
-		<br><<link "Force Abandonment of Gender Radicalism">><<set $activeArcology.FSGenderRadicalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSGenderFundamentalist != "unset">>
-		<br><<link "Force Abandonment of Gender Fundamentalism">><<set $activeArcology.FSGenderFundamentalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSPaternalist != "unset">>
-		<br><<link "Force Abandonment of Paternalism">><<set $activeArcology.FSPaternalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSDegradationist != "unset">>
-		<br><<link "Force Abandonment of Degradationism">><<set $activeArcology.FSDegradationist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSBodyPurist != "unset">>
-		<br><<link "Force Abandonment of Body Purism">><<set $activeArcology.FSBodyPurist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSTransformationFetishist != "unset">>
-		<br><<link "Force Abandonment of Transformation Fetishism">><<set $activeArcology.FSTransformationFetishist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSYouthPreferentialist != "unset">>
-		<br><<link "Force Abandonment of Youth Preferentialism">><<set $activeArcology.FSYouthPreferentialist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSMaturityPreferentialist != "unset">>
-		<br><<link "Force Abandonment of Maturity Preferentialism">><<set $activeArcology.FSMaturityPreferentialist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSSlimnessEnthusiast != "unset">>
-		<br><<link "Force Abandonment of Slimness Enthusiasm">><<set $activeArcology.FSSlimnessEnthusiast = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSAssetExpansionist != "unset">>
-		<br><<link "Force Abandonment of Asset Expansionism">><<set $activeArcology.FSAssetExpansionist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSPastoralist != "unset">>
-		<br><<link "Force Abandonment of Pastoralism">><<set $activeArcology.FSPastoralist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSCummunism != "unset">>
-		<br><<link "Force Abandonment of Cummunism">><<set $activeArcology.FSCummunism = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSPhysicalIdealist != "unset">>
-		<br><<link "Force Abandonment of Physical Idealism">><<set $activeArcology.FSPhysicalIdealist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSHedonisticDecadence != "unset">>
-		<br><<link "Force Abandonment of Hedonistic Decadence">><<set $activeArcology.FSHedonisticDecadence = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSIncestFetishist != "unset">>
-		<br><<link "Force Abandonment of Incest Fetishism">><<set $activeArcology.FSIncestFetishist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSChattelReligionist != "unset">>
-		<br><<link "Force Abandonment of Chattel Religionism">><<set $activeArcology.FSChattelReligionist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSRomanRevivalist != "unset">>
-		<br><<link "Force Abandonment of Roman Revivalism">><<set $activeArcology.FSRomanRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSAztecRevivalist !== "unset">>
-		<br><<link "Force Abandonment of Aztec Revivalism">><<set $activeArcology.FSAztecRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSEgyptianRevivalist != "unset">>
-		<br><<link "Force Abandonment of Egyptian Revivalism">><<set $activeArcology.FSEgyptianRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSEdoRevivalist != "unset">>
-		<br><<link "Force Abandonment of Edo Revivalism">><<set $activeArcology.FSEdoRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSArabianRevivalist != "unset">>
-		<br><<link "Force Abandonment of Arabian Revivalism">><<set $activeArcology.FSArabianRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-	<<if $activeArcology.FSChineseRevivalist != "unset">>
-		<br><<link "Force Abandonment of Chinese Revivalism">><<set $activeArcology.FSChineseRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
-	<</if>>
-<</if>>
-
-<br><br>
-If $activeArcology.name has developed enough to begin exporting worthwhile goods, it may be of interest to acquire some.
-<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-	Since it is under your control, it is no problem at all to request the transfer of goods to $arcologies[0].name.
-<<elseif $PC.hacking >= 50>>
-	It is within your skills to redirect an outgoing shipment to $arcologies[0].name for your retrieval.
-<<elseif $activeArcology.direction == $arcologies[0].embargoTarget>>
-	Due to your active embargo, trade with $activeArcology.name is not possible.
-<<else>>
-	<<set $targetArcology = $arcologies[0], _tempArc = $activeArcology>><<= arcologyOpinion()>><<set _prices = $opinion*10, $activeArcology = _tempArc>>
-<</if>>
-<<if $activeArcology.FSRomanRevivalist > 95>>
-	<<if !isItemAccessible("a toga")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of togas" "Neighbor Interact">>
-				<<set $clothesBoughtToga = 1>>
 			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of togas" "Neighbor Interact">>
-				<<set $clothesBoughtToga = 1>>
+			<<if $arcologies[_currentNeighbor].PCminority >= 10>>
+				| <<link "10%" "Neighbor Interact">>
+					<<run cashX((1*(500*Math.trunc($arcologies[_currentNeighbor].prosperity*(1+($arcologies[_currentNeighbor].demandFactor/100))))), "war")>>
+					<<set $arcologies[_currentNeighbor].PCminority -= 10>>
+					<<set $arcologies[_currentNeighbor].demandFactor -= 10*2>>
+					<<if $arcologies[_currentNeighbor].government != "your agent" && $arcologies[_currentNeighbor].government != "your trustees" && $arcologies[_currentNeighbor].rival != 1>>
+						<<if $arcologies[_currentNeighbor].ownership + $arcologies[_currentNeighbor].PCminority + $arcologies[_currentNeighbor].minority < 10>>
+							<<set $arcologies[_currentNeighbor].ownership += 10>>
+						<</if>>
+					<</if>>
 			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of togas" "Neighbor Interact">>
-				<<set $clothesBoughtToga = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
 		<</if>>
-	<<else>>
-		<br>You already have enough togas.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSEdoRevivalist > 95>>
-	<<if !isItemAccessible("a kimono")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of kimonos" "Neighbor Interact">>
-				<<set $clothesBoughtKimono = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of kimonos" "Neighbor Interact">>
-				<<set $clothesBoughtKimono = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of kimonos" "Neighbor Interact">>
-				<<set $clothesBoughtKimono = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+
+		<<if $arcologies[_currentNeighbor].direction !== $arcologies[0].embargoTarget>>
+			<br>[[Target them for economic warfare|Neighbor Interact][$arcologies[0].embargoTarget = $arcologies[_currentNeighbor].direction]]
 		<</if>>
-	<<else>>
-		<br>You already have enough kimonos.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSArabianRevivalist > 95>>
-	<<if !isItemAccessible("harem gauze")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of silken harem garb" "Neighbor Interact">>
-				<<set $clothesBoughtHarem = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of silken harem garb" "Neighbor Interact">>
-				<<set $clothesBoughtHarem = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of silken harem garb" "Neighbor Interact">>
-				<<set $clothesBoughtHarem = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		
+		<<if $PC.hacking > 0>>
+			<<if $arcologies[_currentNeighbor].direction !== $arcologies[0].CyberEconomicTarget>>
+				<br>[[Target them for cyber economic warfare|Neighbor Interact][$arcologies[0].CyberEconomicTarget = $arcologies[_currentNeighbor].direction]]
+			<</if>>
+			<<if $arcologies[_currentNeighbor].direction !== $arcologies[0].CyberReputationTarget>>
+				<br>[[Target their leadership for character assassination|Neighbor Interact][$arcologies[0].CyberReputationTarget = $arcologies[_currentNeighbor].direction]]
+			<</if>>
 		<</if>>
-	<<else>>
-		<br>You already have enough silk.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSAztecRevivalist > 95>>
-	<<if !isItemAccessible("a huipil")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of huipils" "Neighbor Interact">>
-				<<set $clothesBoughtHuipil = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of huipils" "Neighbor Interact">>
-				<<set $clothesBoughtHuipil = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of huipils" "Neighbor Interact">>
-				<<set $clothesBoughtHuipil = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $desc.length > 0>>
+			<<if $arcologies[_currentNeighbor].direction !== $arcologies[0].influenceTarget>>
+				<br>[[Set as influence target|Neighbor Interact][$arcologies[0].influenceTarget = $arcologies[_currentNeighbor].direction]]
+			<</if>>
 		<</if>>
-	<<else>>
-		<br>You already have enough huipils.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSChineseRevivalist > 95>>
-	<<if !isItemAccessible("a slutty qipao")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of qipaos" "Neighbor Interact">>
-				<<set $clothesBoughtQipao = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of qipaos" "Neighbor Interact">>
-				<<set $clothesBoughtQipao = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of qipaos" "Neighbor Interact">>
-				<<set $clothesBoughtQipao = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+
+	<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>> <br>
+		<<if $arcologies[_currentNeighbor].government == "your trustees">>
+			<br>
+			[[Appoint an agent|Agent Select]]
+			<span id="rename"> | <<link "Instruct them to rename the arcology">><<replace #rename>> | <<textbox "$arcologies[_currentNeighbor].name" $arcologies[_currentNeighbor].name>> [[Confirm name|Neighbor Interact]]<</replace>><</link>></span>
+		<<else>>
+			<br>
+			<<for _j = 0; _j < $leaders.length; _j++>>
+				<<if $arcologies[_currentNeighbor].leaderID == $leaders[_j].ID>>
+					<<setLocalPronouns $leaders[_j]>>
+					Your agent @@.deeppink;<<= SlaveFullName($leaders[_j])>>@@ is running this arcology. [["Recall and reenslave " + $him|Agent Retrieve]]
+					<span id="rename"> | <<link "Instruct $him to rename the arcology">><<replace #rename>> | <<textbox "$arcologies[_currentNeighbor].name" $arcologies[_currentNeighbor].name>> [[Confirm name|Neighbor Interact]]<</replace>><</link>></span>
+					<br>$His <<if $leaders[_j].intelligence > 95>>brilliance<<else>>intelligence<</if>> and education are the most important qualities for $him.
+					<<if $leaders[_j].actualAge > 35>>
+						As with the Head Girl position, $his age and experience lend $him leadership weight.
+					<</if>>
+					<<if $leaders[_j].career == "an arcology owner">>
+						$His career as an arcology owner $himself is, obviously, useful to $him.
+					<<elseif setup.HGCareers.includes($leaders[_j].career)>>
+						$His career in leadership helps $him.
+					<</if>>
+					<<if $leaders[_j].fetishStrength > 95>>
+						<<if ($leaders[_j].fetish == "dom") || ($leaders[_j].fetish == "sadist")>>
+							$His sexually dominant fetish helps $him fill a leadership role.
+						<<elseif ($leaders[_j].fetish == "submissive") || ($leaders[_j].fetish == "masochist")>>
+							Unfortunately, $he has an inappropriate fetish for a leader.
+						<<else>>
+							$His sexual fetishes will influence how $he leads the arcology.
+						<</if>>
+					<</if>>
+					<<if $leaders[_j].energy > 95>>
+						Finally, $his sexual depravity lets $him fit into arcology society naturally.
+					<</if>>
+				<</if>>
+			<</for>>
 		<</if>>
-	<<else>>
-		<br>You already have enough skimpy qipaos.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSEgyptianRevivalist > 95>>
-	<<if !isItemAccessible("ancient Egyptian")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of Egyptian necklace replicas" "Neighbor Interact">>
-				<<set $clothesBoughtEgypt = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of Egyptian necklace replicas" "Neighbor Interact">>
-				<<set $clothesBoughtEgypt = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of Egyptian necklace replicas" "Neighbor Interact">>
-				<<set $clothesBoughtEgypt = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSSubjugationist != "unset">>
+			<br><<link "Force Abandonment of Racial Subjugation">><<set $arcologies[_currentNeighbor].FSSubjugationist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough replicas of Egyptian necklaces.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSPaternalist > 95>>
-	<<if !isItemAccessible("conservative clothing")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of conservative clothing" "Neighbor Interact">>
-				<<set $clothesBoughtConservative = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of conservative clothing" "Neighbor Interact">>
-				<<set $clothesBoughtConservative = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of conservative clothing" "Neighbor Interact">>
-				<<set $clothesBoughtConservative = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSSupremacist != "unset">>
+			<br><<link "Force Abandonment of Racial Supremacy">><<set $arcologies[_currentNeighbor].FSSupremacist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough modest clothing.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSDegradationist > 95>>
-	<<if !isItemAccessible("chains")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of binding chains" "Neighbor Interact">>
-				<<set $clothesBoughtChains = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of binding chains" "Neighbor Interact">>
-				<<set $clothesBoughtChains = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of binding chains" "Neighbor Interact">>
-				<<set $clothesBoughtChains = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSRepopulationFocus != "unset">>
+			<br><<link "Force Abandonment of Repopulationism">><<set $arcologies[_currentNeighbor].FSRepopulationFocus = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough chains.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSGenderFundamentalist > 95>>
-	<<if !isItemAccessible("a bunny outfit")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of bunny suits" "Neighbor Interact">>
-				<<set $clothesBoughtBunny = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of bunny suits" "Neighbor Interact">>
-				<<set $clothesBoughtBunny = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of bunny suits" "Neighbor Interact">>
-				<<set $clothesBoughtBunny = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSRestart != "unset">>
+			<br><<link "Force Abandonment of Eugenics">><<set $arcologies[_currentNeighbor].FSRestart = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough bunny suits and bowties.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSPhysicalIdealist > 95>>
-	<<if !isItemAccessible("body oil")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of body oil" "Neighbor Interact">>
-				<<set $clothesBoughtOil = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of body oil" "Neighbor Interact">>
-				<<set $clothesBoughtOil = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of body oil" "Neighbor Interact">>
-				<<set $clothesBoughtOil = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSGenderRadicalist != "unset">>
+			<br><<link "Force Abandonment of Gender Radicalism">><<set $arcologies[_currentNeighbor].FSGenderRadicalist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough body oil.
-	<</if>>
-	<<set _exports = 1>>
-<<elseif $activeArcology.FSHedonisticDecadence > 95>>
-	<<if !isItemAccessible("stretch pants and a crop-top")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of stretch pants and crop-tops" "Neighbor Interact">>
-				<<set $clothesBoughtLazyClothes = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of stretch pants and crop-tops" "Neighbor Interact">>
-				<<set $clothesBoughtLazyClothes = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of stretch pants and crop-tops" "Neighbor Interact">>
-				<<set $clothesBoughtLazyClothes = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSGenderFundamentalist != "unset">>
+			<br><<link "Force Abandonment of Gender Fundamentalism">><<set $arcologies[_currentNeighbor].FSGenderFundamentalist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough elastic waistbands and tight tops.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSChattelReligionist > 95>>
-	<<if !isItemAccessible("a chattel habit")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of chattel religionist habits" "Neighbor Interact">>
-				<<set $clothesBoughtHabit = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of chattel religionist habits" "Neighbor Interact">>
-				<<set $clothesBoughtHabit = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of chattel religionist habits" "Neighbor Interact">>
-				<<set $clothesBoughtHabit = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSPaternalist != "unset">>
+			<br><<link "Force Abandonment of Paternalism">><<set $arcologies[_currentNeighbor].FSPaternalist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough chattel religionist habits.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSPastoralist > 95>>
-	<<if !isItemAccessible("Western clothing")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of Western clothing" "Neighbor Interact">>
-				<<set $clothesBoughtWestern = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of Western clothing" "Neighbor Interact">>
-				<<set $clothesBoughtWestern = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of Western clothing" "Neighbor Interact">>
-				<<set $clothesBoughtWestern = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSDegradationist != "unset">>
+			<br><<link "Force Abandonment of Degradationism">><<set $arcologies[_currentNeighbor].FSDegradationist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough rancher outfits.
-	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if $activeArcology.FSRepopulationFocus > 95>>
-	<<if !isItemAccessible("a maternity dress")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of maternity clothing" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityDress = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of maternity clothing" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityDress = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of maternity clothing" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityDress = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSBodyPurist != "unset">>
+			<br><<link "Force Abandonment of Body Purism">><<set $arcologies[_currentNeighbor].FSBodyPurist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough maternity dresses.
-	<</if>>
-	<<if !isItemAccessible("attractive lingerie for a pregnant woman")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of maternity lingerie" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityLingerie = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of maternity lingerie" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityLingerie = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of maternity lingerie" "Neighbor Interact">>
-				<<set $clothesBoughtMaternityLingerie = 1>>
-				<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+		<<if $arcologies[_currentNeighbor].FSTransformationFetishist != "unset">>
+			<br><<link "Force Abandonment of Transformation Fetishism">><<set $arcologies[_currentNeighbor].FSTransformationFetishist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough lingerie suited for pregnant women.
-	<</if>>
-	<<if !isItemAccessible("a small empathy belly")>>
-		<<if ($activeArcology.government == "your trustees") || ($activeArcology.government == "your agent")>>
-			<br><<link "Request a shipment of empathy bellies" "Neighbor Interact">>
-				<<set $clothesBoughtBelly = 1>>
-			<</link>>
-		<<elseif $PC.hacking >= 50>>
-			<br><<link "Divert an outgoing shipment of empathy bellies" "Neighbor Interact">>
-				<<set $clothesBoughtBelly = 1>>
-			<</link>>
-		<<elseif $activeArcology.direction != $arcologies[0].embargoTarget>>
-			<br><<link "Purchase a shipment of empathy bellies" "Neighbor Interact">>
-				<<set $clothesBoughtBelly = 1>>
-				<<run cashX(forceNeg(Math.trunc((15000-(_prices*2))*$upgradeMultiplierTrade)), "capEx")>>
-			<</link>> //Will cost <<print cashFormat(Math.trunc(15000-(_prices*2)))>>//
+		<<if $arcologies[_currentNeighbor].FSYouthPreferentialist != "unset">>
+			<br><<link "Force Abandonment of Youth Preferentialism">><<set $arcologies[_currentNeighbor].FSYouthPreferentialist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSMaturityPreferentialist != "unset">>
+			<br><<link "Force Abandonment of Maturity Preferentialism">><<set $arcologies[_currentNeighbor].FSMaturityPreferentialist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSSlimnessEnthusiast != "unset">>
+			<br><<link "Force Abandonment of Slimness Enthusiasm">><<set $arcologies[_currentNeighbor].FSSlimnessEnthusiast = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSAssetExpansionist != "unset">>
+			<br><<link "Force Abandonment of Asset Expansionism">><<set $arcologies[_currentNeighbor].FSAssetExpansionist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSPastoralist != "unset">>
+			<br><<link "Force Abandonment of Pastoralism">><<set $arcologies[_currentNeighbor].FSPastoralist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSCummunism != "unset">>
+			<br><<link "Force Abandonment of Cummunism">><<set $arcologies[_currentNeighbor].FSCummunism = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSPhysicalIdealist != "unset">>
+			<br><<link "Force Abandonment of Physical Idealism">><<set $arcologies[_currentNeighbor].FSPhysicalIdealist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSHedonisticDecadence != "unset">>
+			<br><<link "Force Abandonment of Hedonistic Decadence">><<set $arcologies[_currentNeighbor].FSHedonisticDecadence = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSIncestFetishist != "unset">>
+			<br><<link "Force Abandonment of Incest Fetishism">><<set $arcologies[_currentNeighbor].FSIncestFetishist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSChattelReligionist != "unset">>
+			<br><<link "Force Abandonment of Chattel Religionism">><<set $arcologies[_currentNeighbor].FSChattelReligionist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSRomanRevivalist != "unset">>
+			<br><<link "Force Abandonment of Roman Revivalism">><<set $arcologies[_currentNeighbor].FSRomanRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSAztecRevivalist !== "unset">>
+			<br><<link "Force Abandonment of Aztec Revivalism">><<set $arcologies[_currentNeighbor].FSAztecRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSEgyptianRevivalist != "unset">>
+			<br><<link "Force Abandonment of Egyptian Revivalism">><<set $arcologies[_currentNeighbor].FSEgyptianRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSEdoRevivalist != "unset">>
+			<br><<link "Force Abandonment of Edo Revivalism">><<set $arcologies[_currentNeighbor].FSEdoRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSArabianRevivalist != "unset">>
+			<br><<link "Force Abandonment of Arabian Revivalism">><<set $arcologies[_currentNeighbor].FSArabianRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
+		<</if>>
+		<<if $arcologies[_currentNeighbor].FSChineseRevivalist != "unset">>
+			<br><<link "Force Abandonment of Chinese Revivalism">><<set $arcologies[_currentNeighbor].FSChineseRevivalist = "unset">><<goto "Neighbor Interact">><</link>>
 		<</if>>
-	<<else>>
-		<br>You already have enough fake baby bumps.
 	<</if>>
-	<<set _exports = 1>>
-<</if>>
-<<if _exports != 1>>
-	<<if $activeArcology.direction == $arcologies[0].embargoTarget>>
-		Fortunately,
+
+	<br><br>
+	If $arcologies[_currentNeighbor].name has developed enough to begin exporting worthwhile goods, it may be of interest to acquire some.
+	<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+		Since it is under your control, it is no problem at all to request the transfer of goods to $arcologies[0].name.
+	<<elseif $PC.hacking >= 50>>
+		It is within your skills to redirect an outgoing shipment to $arcologies[0].name for your retrieval.
+	<<elseif $arcologies[_currentNeighbor].direction === $arcologies[0].embargoTarget>>
+		Due to your active embargo, trade with $arcologies[_currentNeighbor].name is not possible.
 	<<else>>
-		Unfortunately,
+		<<set $targetArcology = $arcologies[0], _tempArc = $arcologies[_currentNeighbor]>><<= arcologyOpinion()>><<set _prices = $opinion*10, $arcologies[_currentNeighbor] = _tempArc>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSRomanRevivalist > 95>>
+		<<if !isItemAccessible("a toga")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of togas" "Neighbor Interact">>
+					<<set $clothesBoughtToga = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of togas" "Neighbor Interact">>
+					<<set $clothesBoughtToga = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of togas" "Neighbor Interact">>
+					<<set $clothesBoughtToga = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough togas.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSEdoRevivalist > 95>>
+		<<if !isItemAccessible("a kimono")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of kimonos" "Neighbor Interact">>
+					<<set $clothesBoughtKimono = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of kimonos" "Neighbor Interact">>
+					<<set $clothesBoughtKimono = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of kimonos" "Neighbor Interact">>
+					<<set $clothesBoughtKimono = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough kimonos.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSArabianRevivalist > 95>>
+		<<if !isItemAccessible("harem gauze")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of silken harem garb" "Neighbor Interact">>
+					<<set $clothesBoughtHarem = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of silken harem garb" "Neighbor Interact">>
+					<<set $clothesBoughtHarem = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of silken harem garb" "Neighbor Interact">>
+					<<set $clothesBoughtHarem = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough silk.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSAztecRevivalist > 95>>
+		<<if !isItemAccessible("a huipil")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of huipils" "Neighbor Interact">>
+					<<set $clothesBoughtHuipil = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of huipils" "Neighbor Interact">>
+					<<set $clothesBoughtHuipil = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of huipils" "Neighbor Interact">>
+					<<set $clothesBoughtHuipil = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough huipils.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSChineseRevivalist > 95>>
+		<<if !isItemAccessible("a slutty qipao")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of qipaos" "Neighbor Interact">>
+					<<set $clothesBoughtQipao = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of qipaos" "Neighbor Interact">>
+					<<set $clothesBoughtQipao = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of qipaos" "Neighbor Interact">>
+					<<set $clothesBoughtQipao = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough skimpy qipaos.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSEgyptianRevivalist > 95>>
+		<<if !isItemAccessible("ancient Egyptian")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of Egyptian necklace replicas" "Neighbor Interact">>
+					<<set $clothesBoughtEgypt = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of Egyptian necklace replicas" "Neighbor Interact">>
+					<<set $clothesBoughtEgypt = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of Egyptian necklace replicas" "Neighbor Interact">>
+					<<set $clothesBoughtEgypt = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough replicas of Egyptian necklaces.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSPaternalist > 95>>
+		<<if !isItemAccessible("conservative clothing")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of conservative clothing" "Neighbor Interact">>
+					<<set $clothesBoughtConservative = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of conservative clothing" "Neighbor Interact">>
+					<<set $clothesBoughtConservative = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of conservative clothing" "Neighbor Interact">>
+					<<set $clothesBoughtConservative = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough modest clothing.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSDegradationist > 95>>
+		<<if !isItemAccessible("chains")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of binding chains" "Neighbor Interact">>
+					<<set $clothesBoughtChains = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of binding chains" "Neighbor Interact">>
+					<<set $clothesBoughtChains = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of binding chains" "Neighbor Interact">>
+					<<set $clothesBoughtChains = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough chains.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSGenderFundamentalist > 95>>
+		<<if !isItemAccessible("a bunny outfit")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of bunny suits" "Neighbor Interact">>
+					<<set $clothesBoughtBunny = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of bunny suits" "Neighbor Interact">>
+					<<set $clothesBoughtBunny = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of bunny suits" "Neighbor Interact">>
+					<<set $clothesBoughtBunny = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough bunny suits and bowties.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSPhysicalIdealist > 95>>
+		<<if !isItemAccessible("body oil")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of body oil" "Neighbor Interact">>
+					<<set $clothesBoughtOil = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of body oil" "Neighbor Interact">>
+					<<set $clothesBoughtOil = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of body oil" "Neighbor Interact">>
+					<<set $clothesBoughtOil = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough body oil.
+		<</if>>
+		<<set _exports = 1>>
+	<<elseif $arcologies[_currentNeighbor].FSHedonisticDecadence > 95>>
+		<<if !isItemAccessible("stretch pants and a crop-top")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of stretch pants and crop-tops" "Neighbor Interact">>
+					<<set $clothesBoughtLazyClothes = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of stretch pants and crop-tops" "Neighbor Interact">>
+					<<set $clothesBoughtLazyClothes = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of stretch pants and crop-tops" "Neighbor Interact">>
+					<<set $clothesBoughtLazyClothes = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough elastic waistbands and tight tops.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSChattelReligionist > 95>>
+		<<if !isItemAccessible("a chattel habit")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of chattel religionist habits" "Neighbor Interact">>
+					<<set $clothesBoughtHabit = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of chattel religionist habits" "Neighbor Interact">>
+					<<set $clothesBoughtHabit = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of chattel religionist habits" "Neighbor Interact">>
+					<<set $clothesBoughtHabit = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough chattel religionist habits.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSPastoralist > 95>>
+		<<if !isItemAccessible("Western clothing")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of Western clothing" "Neighbor Interact">>
+					<<set $clothesBoughtWestern = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of Western clothing" "Neighbor Interact">>
+					<<set $clothesBoughtWestern = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of Western clothing" "Neighbor Interact">>
+					<<set $clothesBoughtWestern = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough rancher outfits.
+		<</if>>
+		<<set _exports = 1>>
+	<</if>>
+	<<if $arcologies[_currentNeighbor].FSRepopulationFocus > 95>>
+		<<if !isItemAccessible("a maternity dress")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of maternity clothing" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityDress = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of maternity clothing" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityDress = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of maternity clothing" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityDress = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough maternity dresses.
+		<</if>>
+		<<if !isItemAccessible("attractive lingerie for a pregnant woman")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of maternity lingerie" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityLingerie = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of maternity lingerie" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityLingerie = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of maternity lingerie" "Neighbor Interact">>
+					<<set $clothesBoughtMaternityLingerie = 1>>
+					<<run cashX(forceNeg(Math.trunc((7500-_prices)*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc((7500-_prices)*$upgradeMultiplierTrade))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough lingerie suited for pregnant women.
+		<</if>>
+		<<if !isItemAccessible("a small empathy belly")>>
+			<<if ($arcologies[_currentNeighbor].government == "your trustees") || ($arcologies[_currentNeighbor].government == "your agent")>>
+				<br><<link "Request a shipment of empathy bellies" "Neighbor Interact">>
+					<<set $clothesBoughtBelly = 1>>
+				<</link>>
+			<<elseif $PC.hacking >= 50>>
+				<br><<link "Divert an outgoing shipment of empathy bellies" "Neighbor Interact">>
+					<<set $clothesBoughtBelly = 1>>
+				<</link>>
+			<<elseif $arcologies[_currentNeighbor].direction != $arcologies[0].embargoTarget>>
+				<br><<link "Purchase a shipment of empathy bellies" "Neighbor Interact">>
+					<<set $clothesBoughtBelly = 1>>
+					<<run cashX(forceNeg(Math.trunc((15000-(_prices*2))*$upgradeMultiplierTrade)), "capEx")>>
+				<</link>> //Will cost <<print cashFormat(Math.trunc(15000-(_prices*2)))>>//
+			<</if>>
+		<<else>>
+			<br>You already have enough fake baby bumps.
+		<</if>>
+		<<set _exports = 1>>
 	<</if>>
-	they have nothing of value.
-<</if>>
-<br>
-<<if $arcologies[0].embargoTarget != -1>>
-	<br>
-	[[Cancel economic warfare|Neighbor Interact][$arcologies[0].embargoTarget = -1]]
-<</if>>
-<<if $arcologies[0].influenceTarget != -1>>
-	<br>
-	[[Stop trying to influence neighboring arcologies|Neighbor Interact][$arcologies[0].influenceTarget = -1]]
-<</if>>
-<<if $arcologies[0].CyberEconomicTarget != -1>>
-	<br>
-	[[Cancel cyber economic warfare|Neighbor Interact][$arcologies[0].CyberEconomicTarget = -1]]
-<</if>>
-<<if $arcologies[0].CyberReputationTarget != -1>>
-	<br>
-	[[Cancel character assassination|Neighbor Interact][$arcologies[0].CyberReputationTarget = -1]]
-<</if>>
+	<<if _exports != 1>>
+		<<if $arcologies[_currentNeighbor].direction == $arcologies[0].embargoTarget>>
+			Fortunately,
+		<<else>>
+			Unfortunately,
+		<</if>>
+		they have nothing of value.
+	<</if>>
+
+	<</replace>>
+	<</link>> with an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcologies[_currentNeighbor].prosperity*random(100-$economicUncertainty,100+$economicUncertainty))/100))>>m@@ and is ran by $arcologies[_currentNeighbor].government who own $arcologies[_currentNeighbor].ownership%.
+<</capture>>
+<</for>>
+</span>
\ No newline at end of file
diff --git a/src/uncategorized/storyCaption.tw b/src/uncategorized/storyCaption.tw
index 4f58630600c..4cb7632c40d 100644
--- a/src/uncategorized/storyCaption.tw
+++ b/src/uncategorized/storyCaption.tw
@@ -170,6 +170,7 @@
 				since last week)
 				<</link>>
 			<</if>>
+			<br>
 		<</if>>
 		[[Upkeep|Costs Budget]] |
 	<<else>>
@@ -620,8 +621,11 @@
 	<<elseif _Pass == "Options">>
 		<br><br> [[Summary Options]]
 		<br> [[Description Options]]
-	<<elseif _Pass == "Manage Arcology">>
-		<span id="Security"> <br>
+	<<elseif _Pass == "Manage Arcology">> <br>
+		<span id="Security">
+		<<if $arcologies.length > 1>>
+			<br>[[Diplomacy|Neighbor Interact]]
+		<</if>>
 		<<if $secExp == 1>>
 			<br><span id="edictButton"><<link [[Edicts|edicts]]>><<set $nextButton = "Back", $nextLink = "Main">><</link>></span> @@.cyan;[D]@@
 		<</if>>
-- 
GitLab