From d2d9ec4ca0a94a3adc2b50493668c6727cf643eb Mon Sep 17 00:00:00 2001
From: lowercase-donkey <lowercasedonkey@gmail.com>
Date: Sat, 23 Mar 2019 22:24:15 -0400
Subject: [PATCH] Degredationist pass

---
 src/uncategorized/hgApplication.tw | 42 +++++++++++++++++++++++++-----
 1 file changed, 35 insertions(+), 7 deletions(-)

diff --git a/src/uncategorized/hgApplication.tw b/src/uncategorized/hgApplication.tw
index e5889c60777..81d40cc031e 100644
--- a/src/uncategorized/hgApplication.tw
+++ b/src/uncategorized/hgApplication.tw
@@ -328,12 +328,20 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 	<<set _piercingForbidden = 0>>
 	<<for _i = 0; _i < 1; _i++>>
 		<<if $activeSlave.earPiercing == 0>>
-			<<set $activeSlave.earPiercing = 1>>
+			<<if $arcologies[0].FSDegradationist != "unset">>
+				<<set $activeSlave.earPiercing = 2>>
+			<<else>>
+				<<set $activeSlave.earPiercing = 1>>
+			<</if>>
 			<<run RulesDeconfliction($activeSlave)>>
 			<<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.<<if $arcologies[0].FSDegradationist == "unset">> A little feminine touch can make a big difference.<</if>>
+				<<if $arcologies[0].FSDegradationist != "unset">>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs to adjust to life as a slave _girl2, so $he has the slave's ears pierced. This will be a constant reminder that _he2 is simply a sexual object here.
+				<<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.
+				<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
@@ -348,7 +356,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<<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 <<if $arcologies[0].FSDegradationist == "unset">>cute little <</if>>nose piercing. It should help $activeSlave.slaveName see _himself2 as a bit more feminine.
+				<<if $arcologies[0].FSDegradationist != "unset">>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs to adjust to life as a slave _girl2, so $he gives the slave nasal studs and a large septum ring. It should push $activeSlave.slaveName to see _himself2 as a sexual object for others to use.
+				<<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.
+				<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
@@ -363,7 +375,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<<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 <<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.
+				<<if $arcologies[0].FSDegradationist != "unset">>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs to adjust to life as a slave _girl2, so $he gives the slave multiple eyebrow piercings. A slutty touch for a slave _girl2 should help _him2 feel a little hungrier for cock.
+				<<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 slave _girl2 should help _him2 feel a little hungrier for cock.
+				<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
@@ -378,7 +394,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<<if $activeSlave.lipsPiercing != $slaveAfterRA.lipsPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.lipsPiercing = 0>>
 			<<else>>
-				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's lower lip pierced. _His2 mouth is for pleasing penises now, so it'll help _him2 if it looks like it.
+				<<if $arcologies[0].FSDegradationist != "unset">>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs to adjust to life as a slave _girl2, so $he has the slave's lower lip pierced. _His2 mouth is for pleasing penises now, so it'll help _him2 if it looks like it.
+				<<else>>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's lower lip pierced. _His2 mouth is for pleasing penises now, so it'll help _him2 if it looks like it.
+				<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
@@ -393,7 +413,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 			<<if $activeSlave.navelPiercing != $slaveAfterRA.navelPiercing>>
 				<<set _piercingForbidden = 1, $activeSlave.navelPiercing = 0>>
 			<<else>>
-				$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's navel pierced. The prettier _his2 lower half looks, the less reluctant _he2 should feel to take it up the butt.
+				<<if $arcologies[0].FSDegradationist != "unset">>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's navel pierced with a big ring. Whatever he thinks in _his2 mind, $HeadGirl.slaveName makes clear to _him that _his2 body belongs to you.
+				<<else>>
+					$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave _girl2, so $he has the slave's navel pierced. The prettier _his2 lower half looks, the less reluctant _he2 should feel to take it up the butt.
+				<</if>>
 				<<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>>
 				<<break>>
 			<</if>>
@@ -401,7 +425,11 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2.
 		<<break>>
 	<</for>>
 	<<if _piercingForbidden>>
-		$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 $arcologies[0].FSDegradationist != "unset">>
+			$HeadGirl.slaveName thinks some piercings might push $activeSlave.slaveName to adjust to life as a slave _girl2, but $he also knows you have rules applied to this slave that forbid it.
+		<<else>>
+			$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.
+		<</if>>
 	<</if>>
 <</if>>
 
-- 
GitLab