diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 21cade0fb2bb196ff3f057271bae74e6516a3aed..dc9bd11053ae17b6dec7ec5055140c7f4d4cd610 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -780,6 +780,7 @@ DairyRestraintsSetting($dairyRestraintsSetting)
 <<set $newCorp = 1>>
 <<set $corpEasy = 0>>
 <<set $vanillaShareSplit = 1>>
+<<set $corpEcon = 0>>
 <<set $corpCashDividend = 0>>
 <<set $corpDiv = 0>>
 <<set $corpExpand = 0>>
diff --git a/src/pregmod/manageCorporation.tw b/src/pregmod/manageCorporation.tw
index 6e7ccd8e56ec8b8031abc1e0e17986acbd4a577a..d26daf1d5fe3cf8f1b6c429bde94a3619a3cbfd1 100644
--- a/src/pregmod/manageCorporation.tw
+++ b/src/pregmod/manageCorporation.tw
@@ -104,10 +104,20 @@ _corpDivWhoreSlavesRoom = corpDivWhoreSlavesRoom()>>
 
 __Corporation Overview__
 <br>Last Week's Revenue: @@.yellowgreen;<<print cashFormat($corpRevOld)>>@@ /*Returns last week's revenue, gets calculated in corporationDevelopments, but slaves sold here also added to it for next week*/
+<<if ($cheatMode) && ($cheatModeM) && $corpNeighborBonus > 0>>
+	<br>Including Last Week's Neighbor Bonus: @@.yellowgreen;<<print cashFormat($corpNeighborBonus)>>@@
+<</if>>
 <br>Last Week's Operating Expenses: @@.red;<<print cashFormat($corpOpCostOld)>>@@ /*Just like revenue, except for operating expenses (all calculated in corporationDevelopments)*/
 <br>Last Week's Slave Expenses: <<if $corpAssetsSlaveOld > 0>>@@.red;<<print cashFormat($corpAssetsSlaveOld)>>@@<<else>>@@.yellowgreen;<<print cashFormat($corpAssetsSlaveOld)>>@@<</if>> /*buying slaves to work on adds to this expense, works just like revenue*/
 <br>Last Week's Asset Expenses: <<if $corpAssetsDevOld > 0>>@@.red;<<print cashFormat($corpAssetsDevOld)>>@@<<else>>@@.yellowgreen;<<print cashFormat($corpAssetsDevOld)>>@@<</if>> /*costs associated with expanding divisions end up here, reports costs from last week, not current*/
 <<if $corpOverheadOld > 0>><br>Last Week's Overhead: @@.red;<<print cashFormat($corpOverheadOld)>>@@<</if>>
+<<if ($cheatMode) && ($cheatModeM)>>
+	<<if $corpEcon < 0>>
+		<br>Last Week's Economic Expenses: @@.red;<<print cashFormat(-$corpEcon)>>@@
+	<<else>>
+		<br>Last Week's Economic Windfall: @@.yellowgreen;<<print cashFormat($corpEcon)>>@@
+	<</if>>
+<</if>>
 <br>Last Week's Profit: <<if $corpProfitOld > 0>>@@.yellowgreen;<<print cashFormat($corpProfitOld)>>@@<<else>>@@.red;<<print cashFormat($corpProfitOld)>>@@<</if>>
 <br>
 <br>Available Liquidity:
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index f2f935af3f7ae704238ad35e8949aa2525d846cc..1a18a66e3099050b73f863c5cf2a1554ed68aae0 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -2627,6 +2627,9 @@ Setting missing global variables:
 	<</if>>
 <</if>>
 <<set $dividendTimer = $dividendTimer || 13>>
+<<if ndef $corpEcon>>
+	<<set $corpEcon = 0>>
+<</if>>
 
 /*Removing the old Corp from save*/
 <<if ndef $newCorp>>
diff --git a/src/uncategorized/corporationDevelopments.tw b/src/uncategorized/corporationDevelopments.tw
index fdfae5df18f35d635564ce19623ba65910254825..a4f4543ad53c67c6ca8c1da9b2b1cdb2c3c418f5 100644
--- a/src/uncategorized/corporationDevelopments.tw
+++ b/src/uncategorized/corporationDevelopments.tw
@@ -510,23 +510,33 @@ _corpDivWhoreSlavesRoom = corpDivWhoreSlavesRoom()>>
 <<set $corpCash -= _corpOverhead,
 _corpProfitProvisional = $corpRev - $corpAssetsDev - $corpAssetsSlave - _corpOpCost>>
 <<if _corpProfitProvisional > 0>>
-	<<set _corpEcon = Math.trunc(_corpProfitProvisional / (100 / $localEcon) - _corpProfitProvisional),
-	$corpCash += _corpEcon,
-	$corpProfitOld = _corpProfitProvisional + _corpEcon>> /*this is probably the best place for the economy to show itself, the rest is finnicky enough as is*/
+	<<set $corpEcon = Math.trunc(_corpProfitProvisional / (100 / $localEcon) - _corpProfitProvisional),
+	$corpCash += $corpEcon,
+	$corpProfitOld = _corpProfitProvisional + $corpEcon>> /*this is probably the best place for the economy to show itself, the rest is finnicky enough as is*/
 <<else>>
 	<<set $corpProfitOld = _corpProfitProvisional>>
 <</if>>
 <br>Revenue: @@.yellowgreen;<<print cashFormat($corpRev)>>@@
+<<if ($cheatMode) && ($cheatModeM) && $corpNeighborBonus > 0>>
+	<br>Including Neighbor Bonus: @@.yellowgreen;<<print cashFormat($corpNeighborBonus)>>@@
+<</if>>
 <br>Operating Expenses: @@.red;<<print cashFormat(_corpOpCost)>>@@
 <<if $corpAssetsSlave > 0>>
-	<br>Slave Expenses: @@.red;<<print $corpAssetsSlave>>@@
+	<br>Slave Expenses: @@.red;<<print cashFormat($corpAssetsSlave)>>@@
 <<else>>
-	<br>Slave Expenses: @@.yellowgreen;<<print $corpAssetsSlave>>@@
+	<br>Slave Expenses: @@.yellowgreen;<<print cashFormat($corpAssetsSlave)>>@@
 <</if>>
 <<if $corpAssetsDev > 0>>
-	<br>Asset Expenses: @@.red;<<print $corpAssetsDev>>@@
+	<br>Asset Expenses: @@.red;<<print cashFormat($corpAssetsDev)>>@@
 <<else>>
-	<br>Asset Expenses: @@.yellowgreen;<<print $corpAssetsDev>>@@
+	<br>Asset Expenses: @@.yellowgreen;<<print cashFormat($corpAssetsDev)>>@@
+<</if>>
+<<if ($cheatMode) && ($cheatModeM)>>
+	<<if $corpEcon < 0>>
+		<br>Economic Expenses: @@.red;<<print cashFormat(-$corpEcon)>>@@
+	<<else>>
+		<br>Economic Windfall: @@.yellowgreen;<<print cashFormat($corpEcon)>>@@
+	<</if>>
 <</if>>
 <<if _corpOverhead != 0>><br>Overhead: @@.red;<<print cashFormat(_corpOverhead)>>@@<</if>>
 <br>Profit: <<if $corpProfitOld > 0>>@@.yellowgreen;<<print cashFormat($corpProfitOld)>>@@<<else>>@@.red;<<print cashFormat($corpProfitOld)>>@@<</if>>
diff --git a/src/uncategorized/neighborsDevelopment.tw b/src/uncategorized/neighborsDevelopment.tw
index 1ca6964a9ef8f5b02954aa531a0e5e475aab4dd4..e87743ebd51d7beb3ff14e809411db7c7124f4cd 100644
--- a/src/uncategorized/neighborsDevelopment.tw
+++ b/src/uncategorized/neighborsDevelopment.tw
@@ -9,7 +9,8 @@
 <</for>>
 <<set $averageProsperity = $averageProsperity/$arcologies.length>>
 
-<<set _corpBonus = Math.trunc(1000 * Math.pow(corpValue(), 0.2))>>
+<<set _corpBonus = Math.trunc(1000 * Math.pow(corpValue(), 0.1)),
+$corpNeighborBonus = 0>>
 
 <<if $useTabs == 0>>__Arcologies in the Free City__<</if>>
 
@@ -686,8 +687,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if !$corpSpecRaces.includes($arcologies[$i].FSSupremacistRace)>>
 		It's a @@.lightgreen;good market@@ for your corporation's racially inferior slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSSupremacist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -754,8 +754,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecRaces.includes($arcologies[$i].FSSubjugationistRace)>>
 		It's a @@.lightgreen;good market@@ for your corporation's $arcologies[$i].FSSubjugationistRace slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSSubjugationist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -797,18 +796,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecMilk > 0>>
 		It's a @@.lightgreen;good market@@ for your corporation's milky cows, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRepopulationFocus += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecAge == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's youthful captures, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRepopulationFocus += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecInjection == 5>>
 		It's a @@.lightgreen;good market@@ for your corporation's milky cows, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRepopulationFocus += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -849,18 +845,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecBalls == -1>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's neutered slavegirls, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRestart += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecSexEd == 2>>
 		It's a @@.lightgreen;good market@@ for your corporation's well trained toys, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRestart += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecIntelligence == 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's smarter captures, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRestart += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -903,26 +896,22 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecHormones > 0>>
 		It's a @@.lightgreen;good market@@ for your corporation's hormonally treated slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSGenderRadicalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<<if $corpSpecPussy == 1 && $corpSpecDick == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's beautiful futanari, improving sales and helping social progress.
 		<<set $arcologies[$i].FSGenderRadicalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecBalls == -1>>
 		It's a @@.lightgreen;good market@@ for your corporation's clipped buttsluts, improving sales and helping social progress.
 		<<set $arcologies[$i].FSGenderRadicalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<<if ($corpSpecGender == 2) || ($seeDicks == 100)>>
 		It's a @@.lightgreen;good market@@ for your corporation's feminized slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSGenderRadicalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 <<elseif $arcologies[$i].FSGenderFundamentalist != "unset">>
@@ -961,8 +950,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if ($corpSpecGender == 1) || ($seeDicks == 0)>>
 		It's a @@.lightgreen;good market@@ for your corporation's enslaved females, improving sales and helping social progress.
 		<<set $arcologies[$i].FSGenderFundamentalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1004,19 +992,16 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecTrust > 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's well-treated companions, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPaternalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<<if $corpSpecCosmetics == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's meticulously beautified ladies, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPaternalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecEducation > 0>>
 		It's a @@.lightgreen;good market@@ for your corporation's educated ladies, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPaternalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1056,19 +1041,16 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecTrust < 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's thoroughly terrified slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSDegradationist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<<if $corpSpecIntelligence == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's idiotic sluts, improving sales and helping social progress.
 		<<set $arcologies[$i].FSDegradationist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecAmputee == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's human sex toys, improving sales and helping social progress.
 		<<set $arcologies[$i].FSDegradationist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1111,8 +1093,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAmputee != 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's implant-free slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSBodyPurist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1154,13 +1135,11 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecImplants == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's implanted slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSTransformationFetishist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecImplants == 2>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's absurdly implanted slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSTransformationFetishist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1203,8 +1182,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAge == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's young slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSYouthPreferentialist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1244,8 +1222,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAge == 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's enslaved MILFs, improving sales and helping social progress.
 		<<set $arcologies[$i].FSMaturityPreferentialist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1289,8 +1266,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecWeight < 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's trim slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSSlimnessEnthusiast += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1332,18 +1308,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSPecInjection == 4>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's world-class tits and ass, improving sales and helping social progress.
 		<<set $arcologies[$i].FSAssetExpansionist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecInjection == 5>>
 		It's a @@.lightgreen;good market@@ for your corporation's hugely endowed cows, improving sales and helping social progress.
 		<<set $arcologies[$i].FSAssetExpansionist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSPecInjection == 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's stacked slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSAssetExpansionist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1382,13 +1355,11 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecInjection == 5>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's world-class milk producers, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPastoralist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecMilk > 0>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's world-class milk producers, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPastoralist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1428,18 +1399,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecInjection == 5>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's world-class cum producers, improving sales and helping social progress.
 		<<set $arcologies[$i].FSCummunism += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecHormones == 2>>
 		It's a @@.lightgreen;good market@@ for your corporation's masculinized slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSCummunism += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecDick == 1 && $corpSpecBalls == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's slaves standard dicks and balls, improving sales and helping social progress.
 		<<set $arcologies[$i].FSCummunism += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1481,18 +1449,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecMuscle == 5 >>
 		It's an @@.lightgreen;excellent market@@ for your corporation's ripped chicks, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPhysicalIdealist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecMuscle == 4>>
 		It's a @@.lightgreen;good market@@ for your corporation's toned ladies, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPhysicalIdealist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<<elseif $corpSpecHeight > 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's tall ladies, improving sales and helping social progress.
 		<<set $arcologies[$i].FSPhysicalIdealist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1533,13 +1498,11 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecTrust > 3>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's well kept, happy slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSHedonisticDecadence += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecSexEd == 2>>
 		It's a @@.lightgreen;good market@@ for your corporation's skilled slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSHedonisticDecadence += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1578,8 +1541,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAge == 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's motherly slaves, especially those that look like peoples mothers, improving sales and helping social progress.
 		<<set $arcologies[$i].FSIncestFetishist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1618,13 +1580,11 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecSexEd == 2>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's holy sex slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSChattelReligionist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecSexEd == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's aspiring sexual acolytes, improving sales and helping social progress.
 		<<set $arcologies[$i].FSChattelReligionist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1678,8 +1638,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecEducation > 0>>
 		It's a @@.lightgreen;good market@@ for your corporation's properly educated slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSRomanRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1731,8 +1690,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAccent == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's lovely mix of slave accents, improving sales and helping social progress.
 		<<set $arcologies[$i].FSAztecRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1784,8 +1742,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAccent == 1>>
 		It's a @@.lightgreen;good market@@ for your corporation's lovely mix of slave accents, improving sales and helping social progress.
 		<<set $arcologies[$i].FSEgyptianRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1837,8 +1794,7 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecAccent == 2>>
 		It's a @@.lightgreen;good market@@ for your corporation's linguistically perfect slaves, improving sales and helping social progress.
 		<<set $arcologies[$i].FSEdoRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1890,13 +1846,11 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecDevotion == 5>>
 		It's an @@.lightgreen;excellent market@@ for your corporation's harem-ready devotees, improving sales and helping social progress.
 		<<set $arcologies[$i].FSArabianRevivalist += 2>>
-		<<set $corpCash += _corpBonus*2,
-		$corpRev += _corpBonus*2>>
+		<<set $corpNeighborBonus += _corpBonus*2>>
 	<<elseif $corpSpecDevotion == 4>>
 		It's a @@.lightgreen;good market@@ for your corporation's properly broken girls, improving sales and helping social progress.
 		<<set $arcologies[$i].FSArabianRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
@@ -1948,13 +1902,15 @@ has an estimated GSP of @@.yellowgreen;<<print cashFormat(Math.trunc((0.1*$arcol
 	<<if $corpSpecIntelligence == 3>>
 		It's a @@.lightgreen;good market@@ for your corporation's intelligent Head Girl prospects, improving sales and helping social progress.
 		<<set $arcologies[$i].FSChineseRevivalist += 1>>
-		<<set $corpCash += _corpBonus,
-		$corpRev += _corpBonus>>
+		<<set $corpNeighborBonus += _corpBonus>>
 	<</if>>
 	<</if>>
 	<</if>>
 <</if>>
 
+<<set $corpCash += $corpNeighborBonus,
+$corpRev += $corpNeighborBonus>>
+
 /* FUTURE SOCIETY ADOPTION */
 
 <<if $arcologies[$i].direction != 0>>