From 0db8e2117f31024bc394cf4e5afc6c34f4e36b15 Mon Sep 17 00:00:00 2001
From: lowercase-donkey <lowercasedonkey@gmail.com>
Date: Sat, 23 Mar 2019 18:07:59 -0400
Subject: [PATCH] FS degradationist makes existing more extreme

---
 src/uncategorized/hgApplication.tw | 32 ++++++++++++++++++++++--------
 1 file changed, 24 insertions(+), 8 deletions(-)

diff --git a/src/uncategorized/hgApplication.tw b/src/uncategorized/hgApplication.tw
index 8ff0e150f74..e5889c60777 100644
--- a/src/uncategorized/hgApplication.tw
+++ b/src/uncategorized/hgApplication.tw
@@ -333,35 +333,47 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<<if $activeSlave.earPiercing != $slaveAfterRA.earPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.earPiercing = 0>>
 			<<else>>
-				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's ears pierced. A little feminine touch can make a big difference.
+				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's ears pierced.<<if $arcologies[0].FSDegradationist == "unset">> A little feminine touch can make a big difference.<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
 		<</if>>
 		<<if $activeSlave.nosePiercing == 0>>
-			<<set $activeSlave.nosePiercing = 1>>
+			<<if $arcologies[0].FSDegradationist != "unset">>
+				<<set $activeSlave.nosePiercing = 2>>
+			<<else>>
+				<<set $activeSlave.nosePiercing = 1>>
+			<</if>>
 			<<run RulesDeconfliction($activeSlave)>>
 			<<if $activeSlave.nosePiercing != $slaveAfterRA.nosePiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.nosePiercing = 0>>
 			<<else>>
-				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he gives the slave a cute little nose piercing. It should help $activeSlave.slaveName see _himself2 as a bit more feminine.
+				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he gives the slave a <<if $arcologies[0].FSDegradationist == "unset">>cute little <</if>>nose piercing. It should help $activeSlave.slaveName see _himself2 as a bit more feminine.
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
 		<</if>>
 		<<if $activeSlave.eyebrowPiercing == 0>>
-			<<set $activeSlave.eyebrowPiercing = 1>>
+			<<if $arcologies[0].FSDegradationist != "unset">>
+				<<set $activeSlave.eyebrowPiercing = 2>>
+			<<else>>
+				<<set $activeSlave.eyebrowPiercing = 1>>
+			<</if>>
 			<<run RulesDeconfliction($activeSlave)>>
 			<<if $activeSlave.eyebrowPiercing != $slaveAfterRA.eyebrowPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.eyebrowPiercing = 0>>
 			<<else>>
-				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he gives the slave a cute little eyebrow piercing. A slutty touch for a teenage _girl2 should help _him2 feel a little hungrier for cock.
+				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he gives the slave <<if $arcologies[0].FSDegradationist == "unset">>a cute little eyebrow piercing<<else>>multiple eyebrow piercings<</if>>. A slutty touch for a slave _girl2 should help _him2 feel a little hungrier for cock.
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
 		<</if>>
 		<<if $activeSlave.lipsPiercing == 0>>
-			<<set $activeSlave.lipsPiercing = 1>>
+			<<if $arcologies[0].FSDegradationist != "unset">>
+				<<set $activeSlave.lipsPiercing = 2>>
+			<<else>>
+				<<set $activeSlave.lipsPiercing = 1>>
+			<</if>>
 			<<run RulesDeconfliction($activeSlave)>>
 			<<if $activeSlave.lipsPiercing != $slaveAfterRA.lipsPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.lipsPiercing = 0>>
@@ -372,7 +384,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<</if>>
 		<</if>>
 		<<if $activeSlave.navelPiercing == 0>>
-			<<set $activeSlave.navelPiercing = 1>>
+			<<if $arcologies[0].FSDegradationist != "unset">>
+				<<set $activeSlave.navelPiercing = 2>>
+			<<else>>
+				<<set $activeSlave.navelPiercing = 1>>
+			<</if>>
 			<<run RulesDeconfliction($activeSlave)>>
 			<<if $activeSlave.navelPiercing != $slaveAfterRA.navelPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.navelPiercing = 0>>
@@ -385,7 +401,7 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 		<<break>>
 	<</for>>
 	<<if _piercingForbidden>>
-		$HeadGirl.slaveName thinks some cute piercings might help $activeSlave.slaveName adjust to life as a slave _girl2, but $he also knows you have rules applied to this slave that forbid it.
+		$HeadGirl.slaveName thinks some<<if $arcologies[0].FSDegradationist == "unset">> cute<</if>> piercings might help $activeSlave.slaveName adjust to life as a slave _girl2, but $he also knows you have rules applied to this slave that forbid it.
 	<</if>>
 <</if>>
 
-- 
GitLab