From f53acf5dd551749e80307c4d38ee17596e3868b3 Mon Sep 17 00:00:00 2001 From: Pregmodder <pregmodder@gmail.com> Date: Sun, 19 Jan 2020 22:12:43 -0500 Subject: [PATCH] HG piercing setting now works --- src/uncategorized/hgApplication.tw | 172 +++++++++++++++-------------- 1 file changed, 87 insertions(+), 85 deletions(-) diff --git a/src/uncategorized/hgApplication.tw b/src/uncategorized/hgApplication.tw index 7895c10c15e..322c07c6d8b 100644 --- a/src/uncategorized/hgApplication.tw +++ b/src/uncategorized/hgApplication.tw @@ -327,111 +327,113 @@ In spare moments $he teaches $activeSlave.slaveName how to prostitute _himself2. <</if>> <</if>> -<<if $activeSlave.devotion >= -20 && $activeSlave.genes == "XY" && $activeSlave.attrXY <= 35 && $arcologies[0].FSBodyPurist == "unset" && ($arcologies[0].FSPaternalist == "unset" || ($arcologies[0].FSPaternalist != "unset" && $modScore < 13))>> - <<set _piercingForbidden = 0>> - <<for _i = 0; _i < 1; _i++>> - <<if $activeSlave.earPiercing == 0 && $activeSlave.earShape !== "none">> - <<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>> +<<if $HGPiercings>> + <<if $activeSlave.devotion >= -20 && $activeSlave.genes == "XY" && $activeSlave.attrXY <= 35 && $arcologies[0].FSBodyPurist == "unset" && ($arcologies[0].FSPaternalist == "unset" || ($arcologies[0].FSPaternalist != "unset" && $modScore < 13))>> + <<set _piercingForbidden = 0>> + <<for _i = 0; _i < 1; _i++>> + <<if $activeSlave.earPiercing == 0 && $activeSlave.earShape !== "none">> <<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. + <<set $activeSlave.earPiercing = 2>> <<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. + <<set $activeSlave.earPiercing = 1>> + <</if>> + <<run RulesDeconfliction($activeSlave)>> + <<if $activeSlave.earPiercing != $slaveAfterRA.earPiercing>> + <<set _piercingForbidden = 1, $activeSlave.earPiercing = 0>> + <<else>> + <<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>> - <<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>> - <<break>> - <</if>> - <</if>> - <<if $activeSlave.nosePiercing == 0>> - <<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>> + <<if $activeSlave.nosePiercing == 0>> <<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. + <<set $activeSlave.nosePiercing = 2>> <<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. + <<set $activeSlave.nosePiercing = 1>> + <</if>> + <<run RulesDeconfliction($activeSlave)>> + <<if $activeSlave.nosePiercing != $slaveAfterRA.nosePiercing>> + <<set _piercingForbidden = 1, $activeSlave.nosePiercing = 0>> + <<else>> + <<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>> - <<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>> - <<break>> - <</if>> - <</if>> - <<if $activeSlave.eyebrowPiercing == 0>> - <<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>> + <<if $activeSlave.eyebrowPiercing == 0>> <<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. + <<set $activeSlave.eyebrowPiercing = 2>> <<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. + <<set $activeSlave.eyebrowPiercing = 1>> + <</if>> + <<run RulesDeconfliction($activeSlave)>> + <<if $activeSlave.eyebrowPiercing != $slaveAfterRA.eyebrowPiercing>> + <<set _piercingForbidden = 1, $activeSlave.eyebrowPiercing = 0>> + <<else>> + <<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>> - <<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>> - <<break>> - <</if>> - <</if>> - <<if $activeSlave.lipsPiercing == 0>> - <<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>> - <<else>> + <<if $activeSlave.lipsPiercing == 0>> <<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. + <<set $activeSlave.lipsPiercing = 2>> <<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. + <<set $activeSlave.lipsPiercing = 1>> + <</if>> + <<run RulesDeconfliction($activeSlave)>> + <<if $activeSlave.lipsPiercing != $slaveAfterRA.lipsPiercing>> + <<set _piercingForbidden = 1, $activeSlave.lipsPiercing = 0>> + <<else>> + <<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>> - <<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>> - <<break>> - <</if>> - <</if>> - <<if $activeSlave.navelPiercing == 0>> - <<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>> - <<else>> + <<if $activeSlave.navelPiercing == 0>> <<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 _he2 thinks in _his2 mind, $HeadGirl.slaveName makes clear to _him2 that _his2 body belongs to you. + <<set $activeSlave.navelPiercing = 2>> <<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. + <<set $activeSlave.navelPiercing = 1>> + <</if>> + <<run RulesDeconfliction($activeSlave)>> + <<if $activeSlave.navelPiercing != $slaveAfterRA.navelPiercing>> + <<set _piercingForbidden = 1, $activeSlave.navelPiercing = 0>> + <<else>> + <<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 _he2 thinks in _his2 mind, $HeadGirl.slaveName makes clear to _him2 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>> - <<run cashX(forceNeg($modCost), "slaveMod", $activeSlave)>> - <<break>> <</if>> - <</if>> - <<break>> - <</for>> - <<if _piercingForbidden>> - <<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. + <<break>> + <</for>> + <<if _piercingForbidden>> + <<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>> <</if>> -- GitLab