diff --git a/src/uncategorized/fsDevelopments.tw b/src/uncategorized/fsDevelopments.tw
index 1bb592667f629150ef321d742f3d69e5b52dfb0a..3ace98541071ccdb8d95a98b8537f7193462d2b2 100644
--- a/src/uncategorized/fsDevelopments.tw
+++ b/src/uncategorized/fsDevelopments.tw
@@ -3,139 +3,30 @@
 <<if $useTabs == 0>>__Society__<</if>>
 <br>
 
+<<set _FSRepCreditsRep = [[7000,11000,15000],
+                   [6000,9000,12000,15000],
+				   [6000,9000,12000,15000,18000],
+				   [6000,9000,12000,15000,17000,19000]]>>
+<<set _FSRepDescriptors = ["solid","high","remarkable","great","excellent","unparalleled"]>>
+<<set _ordinalNames = ["second","third","fourth","fifth","sixth","seventh"]>>				   
 <<if $FSCredits > 0>>
 	@@.yellow;$arcologies[0].name's society is ready to begin accepting a new societal direction.@@
 <</if>>
-<<if $FSCreditCount == 4>>
-	<<if ($FSGotRepCredits == 1)>>
-	<<if ($rep > 7000)>>
-		@@.yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 2)>>
-	<<if ($rep > 11000)>>
-		@@.yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 3)>>
-	<<if ($rep > 15000)>>
-		@@.yellow;Your reputation is so unparalleled that $arcologies[0].name's society is ready to begin accepting a fourth and final societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-<<elseif $FSCreditCount == 5>>
-	<<if ($FSGotRepCredits == 1)>>
-	<<if ($rep > 6000)>>
-		@@.yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 2)>>
-	<<if ($rep > 9000)>>
-		@@.yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 3)>>
-	<<if ($rep > 12000)>>
-		@@.yellow;Your reputation is so great that $arcologies[0].name's society is ready to begin accepting a fourth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 4)>>
-	<<if ($rep > 15000)>>
-		@@.yellow;Your reputation is so unparalleled that $arcologies[0].name's society is ready to begin accepting a fifth and final societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-<<elseif $FSCreditCount == 6>>
-	<<if ($FSGotRepCredits == 1)>>
-	<<if ($rep > 6000)>>
-		@@.yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 2)>>
-	<<if ($rep > 9000)>>
-		@@.yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 3)>>
-	<<if ($rep > 12000)>>
-		@@.yellow;Your reputation is so great that $arcologies[0].name's society is ready to begin accepting a fourth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 4)>>
-	<<if ($rep > 15000)>>
-		@@.yellow;Your reputation is so excellent that $arcologies[0].name's society is ready to begin accepting a fifth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 5)>>
-	<<if ($rep > 18000)>>
-		@@.yellow;Your reputation is so unparalleled that $arcologies[0].name's society is ready to begin accepting a sixth and final societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-<<elseif $FSCreditCount == 7>>
-	<<if ($FSGotRepCredits == 1)>>
-	<<if ($rep > 6000)>>
-		@@.yellow;Your reputation is so solid that $arcologies[0].name's society is ready to begin accepting a second societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 2)>>
-	<<if ($rep > 9000)>>
-		@@.yellow;Your reputation is so high that $arcologies[0].name's society is ready to begin accepting a third societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 3)>>
-	<<if ($rep > 12000)>>
-		@@.yellow;Your reputation is so remarkable that $arcologies[0].name's society is ready to begin accepting a fourth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 4)>>
-	<<if ($rep > 15000)>>
-		@@.yellow;Your reputation is so great that $arcologies[0].name's society is ready to begin accepting a fifth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 5)>>
-	<<if ($rep > 17000)>>
-		@@.yellow;Your reputation is so excellent that $arcologies[0].name's society is ready to begin accepting a sixth societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
-	<<if ($FSGotRepCredits == 6)>>
-	<<if ($rep > 19000)>>
-		@@.yellow;Your reputation is so unparalleled that $arcologies[0].name's society is ready to begin accepting a seventh and final societal direction.@@
-		<<set $FSGotRepCredits += 1>>
-		<<set $FSCredits += 1>>
-	<</if>>
-	<</if>>
+
+<<if $FSAnnounced == 1 && $FSGotRepCredits < $FSCreditCount && $rep >= _FSRepCreditsRep[$FSCreditCount-4][$FSGotRepCredits-1]>>
+	<<set _descriptor = "">>
+	<<if $FSGotRepCredits == 1>>
+		<<set _descriptor = _FSRepDescriptors[0]>>
+	<<else>>
+		<<set _descriptor = _FSRepDescriptors[Math.trunc($FSGotRepCredits/($FSCreditCount-1)*_FSRepDescriptors.length-1)]>>
+	<<endif>>
+	<<set _ordinalName = _ordinalNames[$FSGotRepCredits-1]>>
+	<<if $FSGotRepCredits == $FSCreditCount-1>>
+	    <<set _ordinalName += " and final">>
+	<</if>>	    		
+	@@.yellow;Your reputation is so _descriptor that $arcologies[0].name's society is ready to begin accepting a _ordinalName societal direction.@@
+	<<set $FSGotRepCredits += 1>>
+	<<set $FSCredits += 1>>
 <</if>>
 
 /* Count adopted FS */