fix?

src/uncategorized/hgApplication.tw

@@ -313,65 +313,57 @@ In spare moments she teaches $activeSlave.slaveName how to prostitute herself. $
 <<if $activeSlave.devotion >= -20>>
 <<if $activeSlave.genes == "XY">>
 <<if $activeSlave.attrXY <= 35>>
-	<<set _piercingForbidden = 0>>
-	<<for _hga = 0>>
-		<<if $activeSlave.earPiercing == 0>>
-			<<set $activeSlave.earPiercing = 1>>
+	<<set _piercingForbidden = 0, _pierceAttempt = 0>>
+		<<if $activeSlave.earPiercing == 0 && _pierceAttempt == 0>>
+			<<set $activeSlave.earPiercing = 1, _pierceAttempt = 1>>
 			<<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 girl, so she has the slave's ears pierced. A little feminine touch can make a big difference.
 				<<set $cash -= $modCost>>
-				<<break>>
 			<</if>>
 		<</if>>
-		<<if $activeSlave.nosePiercing == 0>>
-			<<set $activeSlave.nosePiercing = 1>>
+		<<if $activeSlave.nosePiercing == 0 && _pierceAttempt == 0>>
+			<<set $activeSlave.nosePiercing = 1, _pierceAttempt = 1>>
 			<<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 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>>
-				<<break>>
 			<</if>>
 		<</if>>
-		<<if $activeSlave.eyebrowPiercing == 0>>
-			<<set $activeSlave.eyebrowPiercing = 1>>
+		<<if $activeSlave.eyebrowPiercing == 0 && _pierceAttempt == 0>>
+			<<set $activeSlave.eyebrowPiercing = 1, _pierceAttempt = 1>>
 			<<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 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>>
-				<<break>>
 			<</if>>
 		<</if>>
-		<<if $activeSlave.lipsPiercing == 0>>
-			<<set $activeSlave.lipsPiercing = 1>>
+		<<if $activeSlave.lipsPiercing == 0 && _pierceAttempt == 0>>
+			<<set $activeSlave.lipsPiercing = 1, _pierceAttempt = 1>>
 			<<RulesDeconfliction $activeSlave>>
 			<<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 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>>
-				<<break>>
 			<</if>>
 		<</if>>
-		<<if $activeSlave.navelPiercing == 0>>
-			<<set $activeSlave.navelPiercing = 1>>
+		<<if $activeSlave.navelPiercing == 0 && _pierceAttempt == 0>>
+			<<set $activeSlave.navelPiercing = 1, _pierceAttempt = 1>>
 			<<RulesDeconfliction $activeSlave>>
 			<<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 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>>
-				<<break>>
 			<</if>>
 		<</if>>
-		<<break>>
-	<</for>>
 	<<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.
 	<</if>>