diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw index c6a9260b94d294c1f0e7c49a1aad361ca56f7fec..dc9bd11053ae17b6dec7ec5055140c7f4d4cd610 100644 --- a/src/init/storyInit.tw +++ b/src/init/storyInit.tw @@ -432,7 +432,7 @@ You should have received a copy of the GNU General Public License along with thi <</if>> /*Undefining corporation variables*/ - <<unset $corpCash,$personalShares,$publicShares,$corpDividend,$dividendTimer,$corpDiv,$corpRev,$corpDivExtraSlaves,$corpDivLegalSlaves,$corpDivBreakSlaves,$corpDivBreakSlaves2,$corpDivSurgerySlaves,$corpDivSurgerySlaves2,$corpDivTrainSlaves,$corpDivTrainSlaves2,$corpDivArcadeSlaves,$corpDivMenialSlaves,$corpDivDairySlaves,$corpDivWhoreSlaves,$corpRevOld,$corpAssetsSlaveOld,$corpAssetsSlave,$corpAssetsDevOld,$corpAssetsDev,$corpOverheadOld,$corpOpCostOld,$corpProfitOld,$corpSpecAccent,$corpSpecAge,$corpSpecAmputee,$corpSpecBalls,$corpSpecDevotion,$corpSpecDick,$corpSpecEducation,$corpSpecGender,$corpSpecGenitalia,$corpSpecWeight,$corpSpecHeight,$corpSpecHormones,$corpSpecImplants,$corpSpecInjection,$corpSpecIntelligence,$corpSpecMilk,$corpSpecMuscle,$corpSpecPussy,$corpSpecSexEd,$corpSpecTrust,$corpSpecVirgin>> + <<unset $corpCash,$personalShares,$publicShares,$corpDividend,$dividendTimer,$corpDiv,$corpRev,$corpDivExtraSlaves,$corpDivLegalSlaves,$corpDivBreakSlaves,$corpDivBreakSlaves2,$corpDivSurgerySlaves,$corpDivSurgerySlaves2,$corpDivTrainSlaves,$corpDivTrainSlaves2,$corpDivArcadeSlaves,$corpDivMenialSlaves,$corpDivDairySlaves,$corpDivWhoreSlaves,$corpRevOld,$corpAssetsSlaveOld,$corpAssetsSlave,$corpAssetsDevOld,$corpAssetsDev,$corpOverheadOld,$corpOpCostOld,$corpProfitOld,$corpSpecAccent,$corpSpecAge,$corpSpecAmputee,$corpSpecBalls,$corpSpecDevotion,$corpSpecDick,$corpSpecEducation,$corpSpecGender,$corpSpecGenitalia,$corpSpecWeight,$corpSpecHeight,$corpSpecHormones,$corpSpecImplants,$corpSpecInjection,$corpSpecIntelligence,$corpSpecMilk,$corpSpecMuscle,$corpSpecPussy,$corpSpecSexEd,$corpSpecTrust,$corpSpecVirgin,$corpDivExtraToArcade,$corpDivExtraToBreak,$corpDivExtraToMarket,$corpDivLegalToMenial,$corpDivLegalToSurgery,$corpDivLegalToTrain,$corpDivLegalToMarket,$corpDivBreakToMenial,$corpDivBreakToSurgery,$corpDivBreakToTrain,$corpDivBreakToMarket,$corpDivBreakFromMarket,$corpDivSurgeryToDairy,$corpDivSurgeryToTrain,$corpDivSurgeryToMarket,$corpDivSurgeryFromMarket,$corpDivTrainToWhore,$corpDivTrainToMarket,$corpDivTrainFromMarket,$corpDivArcadeFromMarket,$corpDivMenialFromMarket,$corpDivDairyFromMarket,$corpDivWhoreFromMarket>> <</if>> @@ -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 2dd6af0ed5f6fc359ad1a6d1c0d74931fdc131e0..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: @@ -517,7 +527,8 @@ __Division Management__ $menialDemandFactor -= $corpDivBreakSlaves + $corpDivBreakSlaves2, $corpExpandToken += 1>> <<unset $corpDivBreakSlaves, - $corpDivBreakSlaves2>> + $corpDivBreakSlaves2, + $corpDivExtraToBreak>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -666,7 +677,9 @@ __Division Management__ $menialDemandFactor -= $corpDivSurgerySlaves + $corpDivSurgerySlaves2, $corpExpandToken += 1>> <<unset $corpDivSurgerySlaves, - $corpDivSurgerySlaves2>> + $corpDivSurgerySlaves2, + $corpDivLegalToSurgery, + $corpDivBreakToSurgery>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -902,7 +915,10 @@ __Division Management__ $menialDemandFactor -= $corpDivTrainSlaves + $corpDivTrainSlaves2, $corpExpandToken += 1>> <<unset $corpDivTrainSlaves, - $corpDivTrainSlaves2>> + $corpDivTrainSlaves2, + $corpDivSurgeryToTrain, + $corpDivBreakToTrain, + $corpDivLegalToTrain>> <<goto "Manage Corporation">> <</link>> <<else>> @@ -916,7 +932,10 @@ __Division Management__ $menialDemandFactor -= $corpDivTrainSlaves + $corpDivTrainSlaves2, $corpExpandToken += 1>> <<unset $corpDivTrainSlaves, - $corpDivTrainSlaves2>> + $corpDivTrainSlaves2, + $corpDivSurgeryToTrain, + $corpDivBreakToTrain, + $corpDivLegalToTrain>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -1010,7 +1029,8 @@ __Division Management__ $corpDivArcadeDev = 0, $menialDemandFactor -= $corpDivArcadeSlaves, $corpExpandToken += 1>> - <<unset $corpDivArcadeSlaves>> + <<unset $corpDivArcadeSlaves, + $corpDivExtraToArcade>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -1092,7 +1112,9 @@ __Division Management__ $corpDivMenialDev = 0, $menialDemandFactor -= $corpDivMenialSlaves, $corpExpandToken += 1>> - <<unset $corpDivMenialSlaves>> + <<unset $corpDivMenialSlaves, + $corpDivBreakToMenial, + $corpDivLegalToMenial>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -1174,7 +1196,8 @@ __Division Management__ $corpDivDairyDev = 0, $menialDemandFactor -= $corpDivDairySlaves, $corpExpandToken += 1>> - <<unset $corpDivDairySlaves>> + <<unset $corpDivDairySlaves, + $corpDivSurgeryToDairy>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -1305,7 +1328,8 @@ __Division Management__ $corpDivWhoreDev = 0, $menialDemandFactor -= $corpDivWhoreSlaves, $corpExpandToken += 1>> - <<unset $corpDivWhoreSlaves>> + <<unset $corpDivWhoreSlaves, + $corpDivTrainToWhore>> <<goto "Manage Corporation">> <</link>> <<else>> @@ -1318,7 +1342,8 @@ __Division Management__ $corpDivWhoreDev = 0, $menialDemandFactor -= $corpDivWhoreSlaves, $corpExpandToken += 1>> - <<unset $corpDivWhoreSlaves>> + <<unset $corpDivWhoreSlaves, + $corpDivTrainToWhore>> <<goto "Manage Corporation">> <</link>> <</if>> @@ -2181,7 +2206,30 @@ __Slave specialization__ $corpSpecPussy, $corpSpecSexEd, $corpSpecTrust, - $corpSpecVirgin>> + $corpSpecVirgin, + $corpDivExtraToArcade, + $corpDivExtraToBreak, + $corpDivExtraToMarket, + $corpDivLegalToMenial, + $corpDivLegalToSurgery, + $corpDivLegalToTrain, + $corpDivLegalToMarket, + $corpDivBreakToMenial, + $corpDivBreakToSurgery, + $corpDivBreakToTrain, + $corpDivBreakToMarket, + $corpDivBreakFromMarket, + $corpDivSurgeryToDairy, + $corpDivSurgeryToTrain, + $corpDivSurgeryToMarket, + $corpDivSurgeryFromMarket, + $corpDivTrainToWhore, + $corpDivTrainToMarket, + $corpDivTrainFromMarket, + $corpDivArcadeFromMarket, + $corpDivMenialFromMarket, + $corpDivDairyFromMarket, + $corpDivWhoreFromMarket>> <<if $corpMarket == 1>> <<for _i = 0; _i < $sectors.length; _i++>> <<if $sectors[_i].type == "CorporateMarket">><<set $sectors[_i].type = "Markets">><<break>><</if>> 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 efa17afa0ff958f816bac757681fe317bac9a651..a4f4543ad53c67c6ca8c1da9b2b1cdb2c3c418f5 100644 --- a/src/uncategorized/corporationDevelopments.tw +++ b/src/uncategorized/corporationDevelopments.tw @@ -1,6 +1,6 @@ :: Corporation Developments [nobr] -/*Main Corporation Loop*/ +/*Main Corporation Pass*/ <<if $corpCash < 0>> <<set $corpCash = Math.trunc($corpCash * 1.02)>> /*2% weekly interest rate on negative cash*/ @@ -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>>