diff --git a/devNotes/twine JS.txt b/devNotes/twine JS.txt
index 237d665aea9a7f71e3a9ed7a1fe21efd45bde640..b7164111ab3511e506716e844937d2499240332b 100644
--- a/devNotes/twine JS.txt	
+++ b/devNotes/twine JS.txt	
@@ -2025,7 +2025,7 @@ window.getCost = function(array) {
 	}
 
 	//general arcology costs
-	costs += (State.variables.girls * (250 + (economy * 500)));
+	costs += (State.variables.girls * (250 + (50000 / economy)));
 
 	if(State.variables.arcologies[0].FSRepopulationFocusLaw === 1 && State.variables.PC.pregKnown == 1) {
 		costs -= 500;
@@ -32983,8 +32983,8 @@ window.Count = function() {
 		T.NY = S.AircraftCarrier + S.Sub + S.HAT, T.Base += T.NY;
 		T.NYU = T.ACU + T.SubU + T.HATU, T.max += T.NYU;}
 	V.SF.Units = T.Base, V.SF.Units = C(V.SF.Units, 0, T.max);
-	if (E < 1) {T.Env = 4;}
-	else if (E < 1.5) {T.Env = 3;}
+	if (E > 100) {T.Env = 4;}
+	else if (E > 67) {T.Env = 3;}
 	else {T.Env = 2;}
 };
 
diff --git a/slave variables documentation - Pregmod.txt b/slave variables documentation - Pregmod.txt
index 75e2d3dd0ea2e6aac12fe7808e6285f0db4c6bf8..f52f00e8a5404146ec10e06944210d0d2c4d5615 100644
--- a/slave variables documentation - Pregmod.txt	
+++ b/slave variables documentation - Pregmod.txt	
@@ -736,7 +736,7 @@ slave's health
 -20 -  20  - Healthy
 21  -  50  - Very healthy
 50  -  90  - Extremely healthy
-60         - Unnaturally healthy
+90         - Unnaturally healthy
 
 minorInjury:
 
@@ -1432,8 +1432,6 @@ slave areolae
 1 - large
 2 - unusually wide
 3 - huge
-4 - heart shaped
-5 - star shaped
 
 areolaeShape:
 
@@ -1599,7 +1597,7 @@ lip size (0-100)
 71 - 95 - huge (lisps)
 96 - 100- facepussy (mute)
 
-lipsImplants:
+lipsImplant:
 
 how large her lip implants are
 See .lips
diff --git a/src/SpecialForce/JS.js b/src/SpecialForce/JS.js
index 9f7dbe701d42d922dc5470fc3f5ceb50217604b9..5df0347d5e9b1e8d2db86f20fd056d85f23d8e7d 100644
--- a/src/SpecialForce/JS.js
+++ b/src/SpecialForce/JS.js
@@ -73,8 +73,8 @@ window.Count = function() {
 		T.NY = S.AircraftCarrier + S.Sub + S.HAT, T.Base += T.NY;
 		T.NYU = T.ACU + T.SubU + T.HATU, T.max += T.NYU;}
 	V.SF.Units = T.Base, V.SF.Units = C(V.SF.Units, 0, T.max);
-	if (E < 1) {T.Env = 4;}
-	else if (E < 1.5) {T.Env = 3;}
+	if (E > 100) {T.Env = 4;}
+	else if (E > 67) {T.Env = 3;}
 	else {T.Env = 2;}
 };
 
diff --git a/src/SpecialForce/Report.tw b/src/SpecialForce/Report.tw
index 70f367db8e96c999dfc6ea057e56d0d0acf032e1..55c7d5d7b3baefb10b813ff7c9528de474d60c64 100644
--- a/src/SpecialForce/Report.tw
+++ b/src/SpecialForce/Report.tw
@@ -116,7 +116,7 @@
 
 <<set _SFIncome = Math.ceil(_SFIncome*_troopMultiplier*_unitMultiplier*_actionMultiplier*_depravityMultiplier-_SFupkeep),$SFUnit.Troops += Math.round(_FNGs/2)>>
 /*Remove below line if hard mode ever gets fixed*/
-<<if $economy > 1>><<set _SFIncome = Math.ceil(_SFIncome*(1+($week/10)))>><</if>>
+<<if $economy < 100>><<set _SFIncome = Math.ceil(_SFIncome*(1+($week/10)))>><</if>>
 <<if $SFUnit.Troops > 2000>> <<set $SFUnit.Troops = random(1955,1999)>> <</if>>
 <<if $rep > 20000>> <<set $rep = 20000>> <</if>>
 <<if $arcologies[0].prosperity > $AProsperityCap>>
diff --git a/src/cheats/mod_EditSlaveCheatDatatypeCleanupNew.tw b/src/cheats/mod_EditSlaveCheatDatatypeCleanupNew.tw
index 1d77409357d8a3ab0d09af4e91bda209bde12b57..a82bd2cb0105d7be022943e5036c97f53b325bf6 100644
--- a/src/cheats/mod_EditSlaveCheatDatatypeCleanupNew.tw
+++ b/src/cheats/mod_EditSlaveCheatDatatypeCleanupNew.tw
@@ -35,7 +35,7 @@
 <<set $tempSlave.relationshipTarget = Number($tempSlave.relationshipTarget) || 0>>
 <<set $tempSlave.rivalry = Number($tempSlave.rivalry) || 0>>
 <<set $tempSlave.rivalryTarget = Number($tempSlave.rivalryTarget) || 0>>
-<<set $tempSlave.actualAge = Number($tempSlave.actualAge)>>
+<<set $tempSlave.actualAge = Number($tempSlave.actualAge) || 18>>
 <<set $tempSlave.visualAge = Number($tempSlave.visualAge) || 18>>
 <<set $tempSlave.physicalAge = Number($tempSlave.physicalAge) || 18>>
 <<set $tempSlave.ovaryAge = Number($tempSlave.ovaryAge) || 18>>
@@ -64,7 +64,7 @@
 <<set $tempSlave.waist = Number($tempSlave.waist) || 0>>
 <<set $tempSlave.height = Number($tempSlave.height) || 0>>
 <<set $tempSlave.heightImplant = Number($tempSlave.heightImplant) || 0>>
-<<set $tempSlave.bellyImplant = Number($tempSlave.bellyImplant)>>
+<<set $tempSlave.bellyImplant = Number($tempSlave.bellyImplant) || -1>>
 <<set $tempSlave.bellySag = Number($tempSlave.bellySag) || 0>>
 <<set $tempSlave.boobs = Number($tempSlave.boobs) || 200>>
 <<set $tempSlave.boobsImplant = Number($tempSlave.boobsImplant) || 0>>
@@ -289,6 +289,7 @@
 	<<set $tempSlave.heightImplant = -1>>
 <<elseif $tempSlave.heightImplant > 1>>
 	<<print "heightImplant Value too high, reset to 1 (Artificially Lengthened)">><br>
+	<<set $tempSlave.heightImplant = 1>>
 <</if>>
 <<if $tempSlave.bellyImplant < -1>>
 	<<print "Belly Implant Value too low, reset -1 (no Implant)">><br>
diff --git a/src/events/intro/economyIntro.tw b/src/events/intro/economyIntro.tw
index 66fdff345549e25dfd35d1e11c26177471c03458..b4e6663569cd0dc144da484851210cb8646b2ea2 100644
--- a/src/events/intro/economyIntro.tw
+++ b/src/events/intro/economyIntro.tw
@@ -5,9 +5,52 @@
 <<else>>
 	It is the year 2037, and the past 21 years have not been kind. The world is starting to fall apart. The climate is deteriorating, resources are being exhausted, and there are more people to feed every year. Technology is advancing, but not fast enough to save everyone. @@.orange;Exactly how bad is the situation?@@
 	<br>
-	<br>[[Very serious.|Trade Intro][$economy = 1]] //Default difficulty.//
-	<br>[[Not truly dire. Not yet.|Trade Intro][$economy = 0.5]] //Easy economics.//
-	<br>[[This is the last dance.|Trade Intro][$economy = 1.5]] //Crushing challenge.//
+	<<if $economy > 125>>
+		<br>''Not truly dire. Not yet.'' //Very Easy//
+		<br>[[Harder|Economy Intro][$economy = 125]]
+	<<elseif $economy > 100>>
+		<br>''Getting a touch dire.'' //Easy//
+		<br>[[Harder|Economy Intro][$economy = 100]] | [[Easier|Economy Intro][$economy = 200]]
+	<<elseif $economy > 80>>
+		<br>''Very serious.'' //Default Difficulty//
+		<br>[[Harder|Economy Intro][$economy = 80]] | [[Easier|Economy Intro][$economy = 125]]
+	<<elseif $economy > 67>>
+		<br>''It won't be pretty.'' //Hard//
+		<br>[[Harder|Economy Intro][$economy = 67]] | [[Easier|Economy Intro][$economy = 100]]
+	<<else>>
+		<br>''This is the last dance.'' //Very Hard//
+		<br>[[Easier|Economy Intro][$economy = 80]]
+	<</if>>
+	<<if $difficultySwitch == 0>>
+		<br>
+		<br>[[Activate worsening economy|Economy Intro][$difficultySwitch = 1]]
+	<<else>>
+		/*Economy settings*/
+		<br> The economy is
+		<<if $econRate == 1>>
+	   		''slowly declining''. //Easy//
+	   		<br>[[Harder|Economy Intro][$econRate = 2]]
+		<<elseif $econRate == 2>>
+			''visibly deteriorating'' around you. //Default Difficulty//
+			<br>[[Easier|Economy Intro][$econRate = 1]] | [[Harder|Economy Intro][$econRate = 4]]
+		<<else>>
+			''going to hell in a handbasket''. //Hard//
+			<br>[[Easier|Economy Intro][$econRate = 2]]
+		<</if>>
+		/* Not functional yet, place $incomeRate = 1 in storyInit when ready for use
+		<br> All the things you need to run your arcology are getting more expensive
+		<<if $incomeMod == 0>>
+			while all forms of income ''remain static''. [[Easier|Economy Intro][$incomeRate = 1]]
+		<<elseif $incomeMod == 1>>
+			while all forms of income ''rise but can not keep pace''. [[Easier|Economy Intro][$incomeRate = 2]] | [[Harder|Economy Intro][$incomeRate = 0]]
+		<<else>>
+			but luckily all forms of income ''rise in lockstep''. [[Harder|Economy Intro][$incomeRate = 1]]
+		<</if>> */
+			<br>	
+			<br>[[Play with static economy|Economy Intro][$difficultySwitch = 0]]
+	<</if>>
+	<br>
+	<br>[[Next|Trade Intro]]
 	<br>
 	<br>[[Skip Intro|Intro Summary]] //This will preclude you from taking over an established arcology.//
 <</if>>
diff --git a/src/events/intro/introSummary.tw b/src/events/intro/introSummary.tw
index b44d2b779ab18b30becd36069345493e089dadb8..51f648fe39c287fd525190ed698d7d0e563f1124 100644
--- a/src/events/intro/introSummary.tw
+++ b/src/events/intro/introSummary.tw
@@ -26,24 +26,63 @@ You may review your settings before clicking "Continue" to begin.
 <</if>>
 
 __''World Settings''__
-<br>
-<<if $economy == 1>>
-	The world economy is in ''doubtful'' shape.
-	[[Easier|Intro Summary][$economy = 0.5]] | [[Harder|Intro Summary][$economy = 1.5]]
-<<elseif $economy < 1>>
-	The world economy is still in ''good'' shape.
-	[[Harder|Intro Summary][$economy = 1]]
+<br>Economic climate: 
+<<if $economy > 125>>
+	''not truly dire. Not yet.'' //Very Easy//
+	<br>[[Harder|Intro Summary][$economy = 125]]
+<<elseif $economy > 100>>
+	''getting a touch dire.'' //Easy//
+	<br>[[Harder|Intro Summary][$economy = 100]] | [[Easier|Intro Summary][$economy = 200]]
+<<elseif $economy > 80>>
+	''serious risks.'' //Default Difficulty//
+	<br>[[Harder|Intro Summary][$economy = 80]] | [[Easier|Intro Summary][$economy = 125]]
+<<elseif $economy > 67>>
+	''ugly.'' //Hard//
+	<br>[[Harder|Intro Summary][$economy = 67]] | [[Easier|Intro Summary][$economy = 100]]
 <<else>>
-	The world economy is in ''terrible'' shape.
-	[[Easier|Intro Summary][$economy = 1]]
+	''this is the last dance.'' //Very Hard//
+	<br>[[Easier|Intro Summary][$economy = 80]]
 <</if>>
+<<if $difficultySwitch == 0>>
+	<br>[[Activate worsening economy|Intro Summary][$difficultySwitch = 1]]
+<<else>>
 
-<<set $drugsCost = Math.trunc(100*$economy)>>
-<<set $rulesCost = Math.trunc(100*$economy)>>
-<<set $modCost = Math.trunc(50*$economy)>>
-<<set $surgeryCost = Math.trunc(300*$economy)>>
+	<<set $econAdvantage = -2>>
+	<<set $localEcon = $economy>>
 
-<br>
+	<br>Economic forecast: 
+	<<if $econRate == 1>>
+	    ''slow decline''. //Easy//
+	    <br>[[Harder|Intro Summary][$econRate = 2]]
+	<<elseif $econRate == 2>>
+		''noticable deterioration'' //Default Difficulty//
+		<br>[[Harder|Intro Summary][$econRate = 4]] | [[Easier|Intro Summary][$econRate = 1]]
+	<<else>>
+		''going to hell in a handbasket''. //Hard//
+		<br>[[Easier|Intro Summary][$econRate = 2]]
+	<</if>>
+	/* Not functional yet
+	<br> All the things you need to run your arcology are getting more expensive
+	<<if $incomeMod == 0>>
+		while all forms of income ''remain static''.
+		[[Easier|Intro Summary][$incomeMod = 1]]
+	<<elseif $incomeMod == 1>>
+		while all forms of income ''rise but can not keep pace''.
+		[[Harder|Intro Summary][$incomeMod = 0]] | [[Easier|Intro Summary][$incomeMod = 2]]
+	<<else>>
+		but luckily all forms of income ''rise in lockstep''.
+		[[Harder|Intro Summary][$incomeMod = 1]]
+	<</if>> */
+	<br>[[Play with static economy|Intro Summary][$difficultySwitch = 0]]
+<</if>>
+
+<<set $foodCost = Math.trunc(2500/$economy)>>
+<<set $drugsCost = Math.trunc(10000/$economy)>>
+<<set $rulesCost = Math.trunc(10000/$economy)>>
+<<set $modCost = Math.trunc(5000/$economy)>>
+<<set $surgeryCost = Math.trunc(30000/$economy)>>
+
+<br><br>
 
 <<if ndef $customVariety>>
 You are using standardized slave trading channels. [[Customize the slave trade|Customize Slave Trade][$customVariety = 1, $customWA = 0]]
@@ -1095,8 +1134,8 @@ __''Mods''__
 	<<goto "init Nationalities">>
 <</link>>
 
-<<if ($economy != 1) || ($seeDicks != 50) || ($continent != "North America") || ($internationalTrade != 1) || ($internationalVariety != 1) || ($seeRace != 1) || ($seeNationality != 1) || ($seeExtreme != 0) || ($seeCircumcision != 1) || ($seeAge != 1) || ($plot != 1)>>
-	| [[restore defaults|Intro Summary][$seeDicks = 50,$economy = 1,$continent = "North America",$internationalTrade = 1,$internationalVariety = 1,$seeRace = 1,$seeNationality = 1,$seeExtreme = 0,$seeCircumcision = 1,$seeAge = 1,$plot = 1]]
+<<if ($economy != 100) || ($seeDicks != 50) || ($continent != "North America") || ($internationalTrade != 1) || ($internationalVariety != 1) || ($seeRace != 1) || ($seeNationality != 1) || ($seeExtreme != 0) || ($seeCircumcision != 1) || ($seeAge != 1) || ($plot != 1)>>
+	| [[restore defaults|Intro Summary][$seeDicks = 50,$economy = 100,$continent = "North America",$internationalTrade = 1,$internationalVariety = 1,$seeRace = 1,$seeNationality = 1,$seeExtreme = 0,$seeCircumcision = 1,$seeAge = 1,$plot = 1]]
 <</if>>
 
 <br><br>
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 195035a50ee04476b4b517ff674b0505b0c2432b..94bc6a6f5b1e4195c52086b7898fefba96bc2a00 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -385,7 +385,9 @@ You should have received a copy of the GNU General Public License along with thi
 	<<set $showEconomicDetails = 0>>
 
 	/* Pregmod specific */
-	<<set $economy = 1>>
+	<<set $economy = 100>>
+	<<set $econRate = 2>>
+	<<set $difficultySwitch = 0>>
 	<<set $neighboringArcologies = 3>>
 	<<set $newDescriptions = 0>>
 	<<set $familyTesting = 0>>
diff --git a/src/js/economyJS.tw b/src/js/economyJS.tw
index c5db2859d0fc329d71af654efefe2cc3caf0ac6e..c32a09b91daee55f6581fec7e4539c2ec32e43f9 100644
--- a/src/js/economyJS.tw
+++ b/src/js/economyJS.tw
@@ -124,7 +124,7 @@ window.getCost = function(array) {
 	}
 
 	//general arcology costs
-	costs += (State.variables.girls * (250 + (economy * 500)));
+	costs += (State.variables.girls * (250 + (50000 / economy)));
 
 	if(State.variables.arcologies[0].FSRepopulationFocusLaw === 1 && State.variables.PC.pregKnown == 1) {
 		costs -= 500;
diff --git a/src/societies/aztec/slaveSacrifice.tw b/src/societies/aztec/slaveSacrifice.tw
index 0a13ff2863334736b04bd5ef3e46f3a8fb21bb10..53ed77111004149b7303070112f27f815089e27b 100644
--- a/src/societies/aztec/slaveSacrifice.tw
+++ b/src/societies/aztec/slaveSacrifice.tw
@@ -244,7 +244,7 @@
 
 	Once the time for penance is over, $he is carried out of the cage, as $he is too weak to support $his own weight. After a short ceremony, $he is taken back to the penthouse to rest.
 	<<if $activeSlave.geneMods.NCS != 1>>
-		<<elseif $activeSlave.lactation > 1>>
+		<<if $activeSlave.lactation > 1>>
 			$His breasts are grotesquely bloated, super sensitive and leaking milk from a week of neglected hyper-lactation.
 			<<set $activeSlave.boobs += 500>>
 		<<elseif $activeSlave.lactation > 0>>
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index 8405aca2183ef2fb2bb4d7a57e102956a837159b..d9efaf60db2745932a378767daf946635e32da46 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -3740,4 +3740,17 @@ Done!
 
 <<if $releaseID < 1031>>
 	<<set $releaseID = 1031>>
-<</if>>
\ No newline at end of file
+<</if>>
+
+<<if $economy == 0.5>>
+	<<set $economy = 200>>
+<</if>>
+<<if $economy == 1>>
+	<<set $economy = 100>>
+<</if>>
+<<if $economy = 1.5>>
+	<<set $economy = 67>>
+<</if>>
+<<if ndef $difficultySwitch>>
+	<<set $difficultySwitch = 0>>
+<</if>>
diff --git a/src/uncategorized/arcmgmt.tw b/src/uncategorized/arcmgmt.tw
index a1fa76c5cf607891fa8ccc3e8cdec9901926c69a..b3df7f157ccf0e3a1f0c653742ebf2e955c4a88e 100644
--- a/src/uncategorized/arcmgmt.tw
+++ b/src/uncategorized/arcmgmt.tw
@@ -303,14 +303,15 @@ This week, rents from $arcologies[0].name came to
 <<else>>
 	@@.red;<<print cashFormat(_rents)>>.@@
 <</if>>
-
-<<if $economy > 1>>
-	<<set _bribes = ($week*100)+random(-100,100)>>
-	<<if $cash > 1000>>
+<<if $difficultySwitch == 0>>
+	<<if $economy < 100>>
+		<<set _bribes = ($week*100)+random(-100,100)>>
+		<<if $cash > 1000>>
 			<<set _bribes += Math.trunc($cash*0.02)>>
+		<</if>>
+		The @@.red;degenerating world economy@@ makes supplying and maintaining $arcologies[0].name extremely difficult. This week, bribes and other costs to keep it running came to @@.yellowgreen;<<print cashFormat(_bribes)>>.@@
+		<<set $cash -= _bribes>>
 	<</if>>
-	The @@.red;degenerating world economy@@ makes supplying and maintaining $arcologies[0].name extremely difficult. This week, bribes and other costs to keep it running came to @@.yellowgreen;<<print cashFormat(_bribes)>>.@@
-	<<set $cash -= _bribes>>
 <</if>>
 
 <<if $helots+$menialBioreactors+$fuckdolls > 0>>
diff --git a/src/uncategorized/costsReport.tw b/src/uncategorized/costsReport.tw
index c3ace6928c139430e16d09524bcac14ad2f1c767..bcdd4acb3beac28ca235f03ceb1686e311b72c81 100644
--- a/src/uncategorized/costsReport.tw
+++ b/src/uncategorized/costsReport.tw
@@ -13,7 +13,7 @@ Since you are
 <<else>>
 	used to a fairly normal life,
 <</if>>
-your __personal living expenses__ are <<print cashFormat(($girls*(250+($economy*500))))>>.
+your __personal living expenses__ are <<print cashFormat(Math.trunc($girls*(250+(50000/$economy))))>>.
 
 <<if $arcologies[0].FSRepopulationFocusLaw == 1 && $PC.pregKnown == 1>>
 	<br>Rent promotion for being a pregnant citizen under ''Universal Pregnancy Subsidy:'' <<print cashFormat(500)>>
diff --git a/src/uncategorized/manageEconomy.tw b/src/uncategorized/manageEconomy.tw
new file mode 100644
index 0000000000000000000000000000000000000000..6538032e5544cb849f576b55b5615274c9c0cb96
--- /dev/null
+++ b/src/uncategorized/manageEconomy.tw
@@ -0,0 +1,46 @@
+:: Manage Economy [nobr]
+
+<span id="economy">
+	@@.yellowgreen;Global Economy@@
+| <<print $economy>>
+</span>
+<<if ($cheatMode) && ($cheatModeM)>>
+	<<set _Teconomy = $economy>>
+	<<textbox "$economy" $economy>>
+	<<link "Apply">>
+	<<set $economy = Math.trunc(Number($economy)) || _Teconomy, $cheater = 1>>
+	<<replace "#economy">>
+	@@.yellowgreen;Global Economy@@
+	| <<print $economy>>
+	<</replace>>
+	<</link>>
+<</if>>
+<br>
+
+<span id="localEcon">
+	@@.yellowgreen;Local Economy@@
+| <<print $localEcon>>
+</span>
+<<if ($cheatMode) && ($cheatModeM)>>
+	<<set _TlocalEcon = $localEcon>>
+	<<textbox "$localEcon" $localEcon>>
+	<<link "Apply">>
+	<<set $localEcon = Math.trunc(Number($localEcon)) || _TlocalEcon, $cheater = 1>>
+	<<replace "#localEcon">>
+	@@.yellowgreen;Local Economy@@
+	| <<print $localEcon>>
+	<</replace>>
+	<</link>>
+<</if>>
+
+<br><br> //The Local Economy score effects some prices in your ecology. The lower the score, the higher the prices. The base score is ''100''.//
+<br> The current score is 
+<<if $localEcon > 100>>
+	<<set _econPercent = Math.trunc(1000-100000/$localEcon)/10>>
+	reducing prices by ''<<print _econPercent>> %.''
+<<elseif $localEcon == 100>>
+	equal to the base score. There are no price modifications.
+<<else>>
+	<<set _econPercent = Math.trunc(100000/$localEcon-1000)/10>>
+	increasing prices by ''<<print _econPercent>> %.''
+<</if>>
diff --git a/src/uncategorized/nextWeek.tw b/src/uncategorized/nextWeek.tw
index 76a96b94b5478aee473719395969893eaedaf567..e9a301d8ad15dac163324c951e40d22c967db59e 100644
--- a/src/uncategorized/nextWeek.tw
+++ b/src/uncategorized/nextWeek.tw
@@ -21,6 +21,62 @@
 	<</if>>
 <</if>>
 
+/*Adding random changes to the economy*/
+<<if $difficultySwitch == 1>>
+	<<set _globalEconSeed = random(1,100)>>
+	<<if _globalEconSeed > 98>>
+		<<set $economy += 2>>
+	<<elseif _globalEconSeed > 85>>
+		<<set $economy += 1>>
+	<<elseif _globalEconSeed <= 2>>
+		<<set $economy -= 2>>
+	<<elseif _globalEconSeed <= 25 + $econRate * 10>>
+		<<set $economy -= 1>>
+	<</if>>
+	<<if $economy < 20>>
+		<<set $economy = 20>>
+	<</if>>
+	<<set _localEconSeed = random(1,100)>>
+	<<if $localEcon <= ($globalEcon + $econAdvantage)>>
+		<<if _localEconSeed > 95>>
+			<<set $localEcon += 2>>
+		<<elseif _localEconSeed > 50>>
+			<<set $localEcon += 1>>
+		<<elseif _localEconSeed <= 1>>
+			<<set $localEcon -= 2>>
+		<<elseif _localEconSeed <= 10>>
+			<<set $localEcon -= 1>>
+		<</if>>
+	<<elseif $localEcon <= ($globalEcon + $econAdvantage + 5)>>
+		<<if _localEconSeed > 98>>
+			<<set $localEcon += 2>>
+		<<elseif _localEconSeed > 66>>
+			<<set $localEcon += 1>>
+		<<elseif _localEconSeed <= 2>>
+			<<set $localEcon -= 2>>
+		<<elseif _localEconSeed <= 33>>
+			<<set $localEcon -= 1>>
+		<</if>>
+	<<elseif _localEconSeed > 99>>
+		<<set $localEcon += 2>>
+	<<elseif _localEconSeed > 90>>
+		<<set $localEcon += 1>>
+	<<elseif _localEconSeed <= 5>>
+		<<set $localEcon -= 2>>
+	<<elseif _localEconSeed <= 50>>
+		<<set $localEcon -= 1>>
+	<</if>>
+	<<if $localEcon < 20>>
+		<<set $localEcon = 20>>
+	<</if>>
+
+	<<set $foodCost = Math.trunc(2500/$localEcon)>>
+	<<set $drugsCost = Math.trunc(10000/$localEcon)>>
+	<<set $rulesCost = Math.trunc(10000/$localEcon)>>
+	<<set $modCost = Math.trunc(5000/$localEcon)>>
+	<<set $surgeryCost = Math.trunc(30000/$localEcon)>>
+<</if>>
+
 <<set $averageTrust = 0, $averageDevotion = 0, _slavesContributing = 0, _OldHG = -1, _NewHG = -1, _SL = $slaves.length>>
 <<if $studio == 1>>
 	<<set $pornStars = 0, $pornStarFuckdolls = 0, $pornStarRapees = 0, $pornStarPreggos = 0,
diff --git a/src/uncategorized/storyCaption.tw b/src/uncategorized/storyCaption.tw
index e32eaacc8f8dd578a159487eff4c0e19fe4214b4..a172c8b988bbe36c39e5006afdf44bf17ccbfd6a 100644
--- a/src/uncategorized/storyCaption.tw
+++ b/src/uncategorized/storyCaption.tw
@@ -525,6 +525,9 @@
 	<<else>>
 		<br><span id="manageArcology"><<link "Manage Arcology">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Arcology">><</link>></span> @@.cyan;[C]@@
 		<br><span id="managePenthouse"><<link "Manage Penthouse">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Penthouse">><</link>></span> @@.cyan;[P]@@
+		<<if $difficultySwitch ==  1>>
+			<br><span id="manageEconomy"><<link "Manage Economy">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Economy">><</link>></span>
+		<</if>>
 		<br><span id="managePerson"><<link "Manage Personal Affairs">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Personal Affairs">><</link>></span> @@.cyan;[X]@@
 		<<if $secExp == 1>>
 		<<if $propHub == 1>>
@@ -566,6 +569,9 @@
 <<elseif _Pass == "Manage Arcology">>
 	<br>
 	<br><span id="managePenthouse"><<link "Manage Penthouse">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Penthouse">><</link>></span> @@.cyan;[P]@@
+	<<if $difficultySwitch ==  1>>
+		<br><span id="manageEconomy"><<link "Manage Economy">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Economy">><</link>></span>
+	<</if>>
 	<br><span id="managePerson"><<link "Manage Personal Affairs">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Personal Affairs">><</link>></span> @@.cyan;[X]@@
 	<<if $secExp == 1>>
 	<<if $propHub == 1>>
@@ -603,16 +609,60 @@
 <<elseif _Pass == "Manage Penthouse">>
 	<br>
 	<br><span id="manageArcology"><<link [[Manage Arcology|Manage Arcology]]>><</link>></span> @@.cyan;[C]@@
+	<<if $difficultySwitch ==  1>>
+		<br><span id="manageEconomy"><<link "Manage Economy">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Economy">><</link>></span>
+	<</if>>
 	<br><span id="managePerson"><<link [[Manage Personal Affairs|Manage Personal Affairs]]>><</link>></span> @@.cyan;[X]@@
 	<br>
 	<br><<link [[Wardrobe]]>><</link>>
 	<br><<if $dispensary>>[[Pharmaceutical Fabricator|Dispensary]]<</if>>
 	<br><<if $rep >= 10000>>[[Black Market|The Black Market]]<</if>>
 	<br><br><br><br><br>
+<<elseif _Pass == "Manage Economy">>
+	<br>
+	<br><span id="manageArcology"><<link "Manage Arcology">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Arcology">><</link>></span> @@.cyan;[C]@@
+	<br><span id="managePenthouse"><<link "Manage Penthouse">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Penthouse">><</link>></span> @@.cyan;[P]@@
+	<br><span id="managePerson"><<link "Manage Personal Affairs">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Personal Affairs">><</link>></span> @@.cyan;[X]@@
+	<<if $secExp == 1>>
+	<<if $propHub == 1>>
+	<br><span id="propHub"><<link "Manage PR">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "propagandaHub">><</link>></span> @@.cyan;[Shift+H]@@
+	<</if>>
+	<<if $secHQ == 1>>
+	<br><span id="securityHQ"><<link "Manage Security">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "securityHQ">><</link>></span> @@.cyan;[Shift+S]@@
+	<</if>>
+	<<if $secBarracks == 1>>
+	<br><span id="secBarracks"><<link "Manage Military">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "secBarracks">><</link>></span> @@.cyan;[Shift+A]@@
+	<</if>>
+	<<if $riotCenter == 1>>
+	<br><span id="riotCenter"><<link "Manage Rebels">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "riotControlCenter">><</link>></span> @@.cyan;[Shift+R]@@
+	<</if>>
+	<</if>>
+	<<if $cyberMod != 0 && $researchLab.built == "true">>
+	<br>[[Manage Research Lab|Research Lab][$temp = 0]]
+	<</if>>
+	<<if $SF.Toggle && $SF.Active >= 1>>
+	<br><span id="SFMButton"> <<link "$SF.Caps's Firebase""Firebase">><</link>> </span> @@.cyan;[Z]@@
+	<</if>>
+
+	<br>
+	<br><span id="PAOButton"><<link [[Personal Assistant|Personal assistant options]]>><</link>></span> @@.cyan;[T]@@
+	<br><span id="policyButton"><<link [[Policies]]>><</link>></span> @@.cyan;[Y]@@
+	<<if $secExp == 1>>
+	<br><span id="edictButton"><<link [[Edicts|edicts]]>><</link>></span> @@.cyan;[D]@@
+	<</if>>
+	<<if $FSAnnounced>>
+	<br><span id="FSButton"><<link [[Future Societies|Future Society]]>><</link>></span> @@.cyan;[F]@@
+	<</if>>
+	<br><span id="URButton"><<link [[Universal Rules]]>><</link>></span> @@.cyan;[V]@@
+	<br>
+	<br><span id="optionsButton"><<link "Game Options">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Options">><</link>></span> @@.cyan;[O]@@
 <<elseif _Pass == "Manage Personal Affairs">>
 	<br>
 	<br><span id="manageArcology"><<link [[Manage Arcology|Manage Arcology]]>><</link>></span> @@.cyan;[C]@@
 	<br><span id="managePenthouse"><<link [[Manage Penthouse|Manage Penthouse]]>><</link>></span> @@.cyan;[X]@@
+	<<if $difficultySwitch ==  1>>
+		<br><span id="manageEconomy"><<link "Manage Economy">><<set $nextButton = "Back", $nextLink = _Pass>><<goto "Manage Economy">><</link>></span>
+	<</if>>	
 	<br>
 	<br><<link [[Wardrobe]]>><</link>>
 	<br><<if $dispensary>>[[Pharmaceutical Fabricator|Dispensary]]<</if>>