$activeArcology removal work

src/npc/agent/agentCompany.tw

@@ -17,15 +17,11 @@
 	<<set $activeSlave.rivalry = 0, $activeSlave.rivalryTarget = 0>>
 <</if>>
 
-<<for _i = 0; _i < $arcologies.length; _i++>>
-	<<if $subSlave.ID == $arcologies[_i].leaderID>>
-		<<set $activeArcology = $arcologies[_i]>>
-	<</if>>
-<</for>>
+<<set _neighborArcology = $arcologies.find(function(s) { return $subSlave.ID == s.leaderID; })>>
 
 <<setLocalPronouns $subSlave 2>>
 
-Working in $activeArcology.name's penthouse office, $subSlave.slaveName gets a video call from you. Naturally, _his2 personal assistant program has been instructed to give these the highest priority, and your face appears in front of _him2 immediately. _He2 greets you properly, and asks you what _he2 can do to serve you. You tell _him2 you're planning to send one of your slaves over to _his2 arcology to assist _him2. Exchanges of this kind are neither unusual nor particularly interesting, so a slight look of perplexity clouds $subSlave.slaveName's face as _he2 wonders why this merits a personal call. Normally, <<if $HeadGirl != 0>>$HeadGirl.slaveName<<else>>$assistantName<</if>> would handle it with _him2 directly.
+Working in _neighborArcology.name's penthouse office, $subSlave.slaveName gets a video call from you. Naturally, _his2 personal assistant program has been instructed to give these the highest priority, and your face appears in front of _him2 immediately. _He2 greets you properly, and asks you what _he2 can do to serve you. You tell _him2 you're planning to send one of your slaves over to _his2 arcology to assist _him2. Exchanges of this kind are neither unusual nor particularly interesting, so a slight look of perplexity clouds $subSlave.slaveName's face as _he2 wonders why this merits a personal call. Normally, <<if $HeadGirl != 0>>$HeadGirl.slaveName<<else>>$assistantName<</if>> would handle it with _him2 directly.
 
 <br><br>
 
@@ -63,6 +59,6 @@ $subSlave.slaveName smiles back at $him, glowing with pleasure, and responds wit
 <<case "masochist">>
 	"Can't wait to feel you hurt me again, babe," the masochistic
 <<default>>
-	"Babe, I can't wait to give you a hug and tell you about $activeArcology.name," the loving
+	"Babe, I can't wait to give you a hug and tell you about _neighborArcology.name," the loving
 <</switch>>
 leader of an entire arcology <<say>>s.
\ No newline at end of file

src/uncategorized/buySlaves.tw

@@ -5,8 +5,6 @@
 <<set _minimumFive = $minimumSlaveCost * 5>>
 <<set _minimumTen = $minimumSlaveCost * 10>>
 
-<<set $activeArcology = 0>>
-
 __Sex Slave Purchase Options__
 <br>
 //There are many different organizations to purchase slaves from, but many of them are selective about their customers and will only sell to you if you are reputable.//