Skip to content
Snippets Groups Projects
Commit fc215c57 authored by Pregmodder's avatar Pregmodder
Browse files

Merge branch 'pregmod-master' into 'pregmod-master' 

Pregmod v1019-107

See merge request !772
parents 97c74c20 1aa704a3
No related branches found
No related tags found
2 merge requests!843Delete Please.,!772Pregmod v1019-107
Hide whitespace changes
Inline Side-by-side
src/uncategorized/hgApplication.tw
+ 11
− 19
View file @ fc215c57
...@@ -313,65 +313,57 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $ ...@@ -313,65 +313,57 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $
<<if $activeSlave.devotion >= -20>> <<if $activeSlave.devotion >= -20>>
<<if $activeSlave.genes == "XY">> <<if $activeSlave.genes == "XY">>
<<if $activeSlave.attrXY <= 35>> <<if $activeSlave.attrXY <= 35>>
<<set _piercingForbidden = 0>> <<set _piercingForbidden = 0, _pierceAttempt = 0>>
<<for _hga = 0>> <<if $activeSlave.earPiercing == 0 && _pierceAttempt == 0>>
<<if $activeSlave.earPiercing == 0>> <<set $activeSlave.earPiercing = 1, _pierceAttempt = 1>>
<<set $activeSlave.earPiercing = 1>>
<<RulesDeconfliction $activeSlave>> <<RulesDeconfliction $activeSlave>>
<<if $activeSlave.earPiercing != $slaveAfterRA.earPiercing>> <<if $activeSlave.earPiercing != $slaveAfterRA.earPiercing>>
<<set _piercingForbidden = 1, $activeSlave.earPiercing = 0>> <<set _piercingForbidden = 1, $activeSlave.earPiercing = 0>>
<<else>> <<else>>
$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she 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 girl, so she has the slave's ears pierced. A little feminine touch can make a big difference.
<<set $cash -= $modCost>> <<set $cash -= $modCost>>
<<break>>
<</if>> <</if>>
<</if>> <</if>>
<<if $activeSlave.nosePiercing == 0>> <<if $activeSlave.nosePiercing == 0 && _pierceAttempt == 0>>
<<set $activeSlave.nosePiercing = 1>> <<set $activeSlave.nosePiercing = 1, _pierceAttempt = 1>>
<<RulesDeconfliction $activeSlave>> <<RulesDeconfliction $activeSlave>>
<<if $activeSlave.nosePiercing != $slaveAfterRA.nosePiercing>> <<if $activeSlave.nosePiercing != $slaveAfterRA.nosePiercing>>
<<set _piercingForbidden = 1, $activeSlave.nosePiercing = 0>> <<set _piercingForbidden = 1, $activeSlave.nosePiercing = 0>>
<<else>> <<else>>
$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she gives the slave a cute little nose piercing. It should help $activeSlave.slaveName see herself as a bit more feminine. $HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she gives the slave a cute little nose piercing. It should help $activeSlave.slaveName see herself as a bit more feminine.
<<set $cash -= $modCost>> <<set $cash -= $modCost>>
<<break>>
<</if>> <</if>>
<</if>> <</if>>
<<if $activeSlave.eyebrowPiercing == 0>> <<if $activeSlave.eyebrowPiercing == 0 && _pierceAttempt == 0>>
<<set $activeSlave.eyebrowPiercing = 1>> <<set $activeSlave.eyebrowPiercing = 1, _pierceAttempt = 1>>
<<RulesDeconfliction $activeSlave>> <<RulesDeconfliction $activeSlave>>
<<if $activeSlave.eyebrowPiercing != $slaveAfterRA.eyebrowPiercing>> <<if $activeSlave.eyebrowPiercing != $slaveAfterRA.eyebrowPiercing>>
<<set _piercingForbidden = 1, $activeSlave.eyebrowPiercing = 0>> <<set _piercingForbidden = 1, $activeSlave.eyebrowPiercing = 0>>
<<else>> <<else>>
$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she gives the slave a cute little eyebrow piercing. A slutty touch for a teenage girl should help her feel a little hungrier for cock. $HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she gives the slave a cute little eyebrow piercing. A slutty touch for a teenage girl should help her feel a little hungrier for cock.
<<set $cash -= $modCost>> <<set $cash -= $modCost>>
<<break>>
<</if>> <</if>>
<</if>> <</if>>
<<if $activeSlave.lipsPiercing == 0>> <<if $activeSlave.lipsPiercing == 0 && _pierceAttempt == 0>>
<<set $activeSlave.lipsPiercing = 1>> <<set $activeSlave.lipsPiercing = 1, _pierceAttempt = 1>>
<<RulesDeconfliction $activeSlave>> <<RulesDeconfliction $activeSlave>>
<<if $activeSlave.lipsPiercing != $slaveAfterRA.lipsPiercing>> <<if $activeSlave.lipsPiercing != $slaveAfterRA.lipsPiercing>>
<<set _piercingForbidden = 1, $activeSlave.lipsPiercing = 0>> <<set _piercingForbidden = 1, $activeSlave.lipsPiercing = 0>>
<<else>> <<else>>
$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she has the slave's lower lip pierced. Her mouth is for pleasing penises now, so it'll help her if it looks like it. $HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she has the slave's lower lip pierced. Her mouth is for pleasing penises now, so it'll help her if it looks like it.
<<set $cash -= $modCost>> <<set $cash -= $modCost>>
<<break>>
<</if>> <</if>>
<</if>> <</if>>
<<if $activeSlave.navelPiercing == 0>> <<if $activeSlave.navelPiercing == 0 && _pierceAttempt == 0>>
<<set $activeSlave.navelPiercing = 1>> <<set $activeSlave.navelPiercing = 1, _pierceAttempt = 1>>
<<RulesDeconfliction $activeSlave>> <<RulesDeconfliction $activeSlave>>
<<if $activeSlave.navelPiercing != $slaveAfterRA.navelPiercing>> <<if $activeSlave.navelPiercing != $slaveAfterRA.navelPiercing>>
<<set _piercingForbidden = 1, $activeSlave.navelPiercing = 0>> <<set _piercingForbidden = 1, $activeSlave.navelPiercing = 0>>
<<else>> <<else>>
$HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she has the slave's navel pierced. The prettier her lower half looks, the less reluctant she should feel to take it up the butt. $HeadGirl.slaveName knows that $activeSlave.slaveName needs help adjusting to life as a slave girl, so she has the slave's navel pierced. The prettier her lower half looks, the less reluctant she should feel to take it up the butt.
<<set $cash -= $modCost>> <<set $cash -= $modCost>>
<<break>>
<</if>> <</if>>
<</if>> <</if>>
<<break>>
<</for>>
<<if _piercingForbidden>> <<if _piercingForbidden>>
$HeadGirl.slaveName thinks some cute piercings might help $activeSlave.slaveName adjust to life as a slave girl, but she also knows you have rules applied to this slave that forbid it. $HeadGirl.slaveName thinks some cute piercings might help $activeSlave.slaveName adjust to life as a slave girl, but she also knows you have rules applied to this slave that forbid it.
<</if>> <</if>>
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment