diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index da28372d9c27e460cf5d6331a0511b140c18b8d9..1b89293c4caad8a0a632c618cb052d18b08f24e8 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -1586,14 +1586,14 @@
 <</if>>
 
 /* SMART PIERCING EFFECTS */
-/* TODO: update this for the advanced piercing */
 
 <<if ($slaves[$i].clitPiercing >= 3)>>
+	<<set _cPiercing = $slaves[$i].clitPiercing>>
 	<<if $slaves[$i].fuckdoll > 0>>
-		$His smart <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing is slaved to $his stimulation systems.
+		$His <<if _cPiercing == 4>>advanced<<else>>smart<</if>> <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing is slaved to $his stimulation systems.
 	<<elseif $slaves[$i].fetish == "mindbroken">>
-		The effects of $his smart <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing cannot reach $his shattered mind.
-	<<else>>
+		The effects of $his <<if _cPiercing == 4>>advanced<<else>>smart<</if>> <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing cannot reach $his shattered mind.
+	<<elseif (_cPiercing == 3)>>
 		<<switch $slaves[$i].clitSetting>>
 		<<case "none">>
 			$His smart <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing disrupts arousal, @@.red;reducing $his sex drive@@ and @@.mediumorchid;infuriating $him.@@
@@ -1767,6 +1767,180 @@
 				<<set $slaves[$i].fetishStrength += 4>>
 			<</if>>
 		<</switch>>
+	<<elseif _cPiercing == 4>>
+		<<switch $slaves[$i].clitSetting>>
+		<<case "none">>
+			$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing disrupts arousal, @@.red;greatly reducing $his sex drive@@ and @@.mediumorchid;infuriating $him.@@
+			<<set $slaves[$i].devotion -= 3>>
+			<<if $slaves[$i].energy > 5>>
+				<<set $slaves[$i].energy -= 25>>
+			<<elseif $slaves[$i].energy > 0>>
+				<<set $slaves[$i].energy = 0>>
+			<</if>>
+		<<case "all">>
+			<<if $slaves[$i].energy <= 95>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages sex of all kinds, @@.green;greatly increasing $his sex drive.@@
+				<<set $slaves[$i].energy += 10>>
+			<</if>>
+		<<case "women">>
+			<<if $slaves[$i].attrXX < 95>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.green;greatly increases $his attraction to girls@@ by pleasuring $him when $he's around them.
+				<<set $slaves[$i].attrXX += 10+$assistant+$assistant>>
+				<<if $slaves[$i].energy < 80>>
+					This has the secondary effect of @@.green;greatly enhancing $his libido.@@
+					<<set $slaves[$i].energy++>>
+				<</if>>
+			<</if>>
+		<<case "anti-women">>
+			<<if $slaves[$i].attrXX > 0>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.green;greatly suppresses $his attraction to girls@@ by making $his private parts extremely uncomfortable when $he's around them.
+				<<set $slaves[$i].attrXX -= Math.clamp($slaves[$i].attrXX-(10+$assistant+$assistant),0,100)>>
+				<<if $slaves[$i].energy > 0>>
+					This has the secondary effect of slightly @@.red;greatly reducing $his libido.@@
+					<<set $slaves[$i].energy-->>
+				<</if>>
+			<</if>>
+		<<case "men">>
+			<<if $slaves[$i].attrXY < 95>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.green;greatly increases $his attraction to guys@@ by pleasuring $him when $he's around cocks.
+				<<set $slaves[$i].attrXY += 10+$assistant+$assistant>>
+				<<if $slaves[$i].energy < 80>>
+					This has the secondary effect of @@.green;greatly enhancing $his libido.@@
+					<<set $slaves[$i].energy++>>
+				<</if>>
+			<</if>>
+		<<case "anti-men">>
+			<<if $slaves[$i].attrXY > 0>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing successfully @@.green;greatly suppresses $his attraction to guys@@ by making $his private parts extremely uncomfortable when $he's around them.
+				<<set $slaves[$i].attrXY -= Math.clamp($slaves[$i].attrXY-(10+$assistant+$assistant),0,100)>>
+				<<if $slaves[$i].energy > 0>>
+					This has the secondary effect of @@.red;greatly reducing $his libido.@@
+					<<set $slaves[$i].energy-->>
+				<</if>>
+			<</if>>
+		<<case "vanilla">>
+			<<if ($slaves[$i].fetish != "none") && (_fetishChangeChance > random(0,100)-20*$assistant)>>
+				After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms during straightforward sex, @@.coral;$his sexuality returns to normal.@@
+				<<set $slaves[$i].fetish = "none", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+			<</if>>
+		<<case "oral">>
+			<<if ($slaves[$i].fetish != "cumslut")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he's using $his mouth.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms as $he performs oral sex, @@.lightcoral;$he develops a major fetish for cum.@@
+					<<set $slaves[$i].fetish = "cumslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his oral fetish.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "anal">>
+			<<if ($slaves[$i].fetish != "buttslut")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $his rear hole is being fucked.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms when $his ass is being stimulated, @@.lightcoral;$he develops a major fetish for being an anal bottom.@@
+					<<set $slaves[$i].fetish = "buttslut", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his anal fetish.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "boobs">>
+			<<if ($slaves[$i].fetish != "boobs")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $his tits are being touched.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms when $his nipples are being stimulated, @@.lightcoral;$he develops a major fetish for $his tits.@@
+					<<set $slaves[$i].fetish = "boobs", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his boob fetish.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "submissive">>
+			<<if ($slaves[$i].fetish != "submissive")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he's being held down and used.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms when $he is restrained, @@.lightcoral;$he develops a major fetish for submission.@@
+					<<set $slaves[$i].fetish = "submissive", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his submission.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "humiliation">>
+			<<if ($slaves[$i].fetish != "humiliation")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he's got an audience.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms when $he is being humiliated, @@.lightcoral;$he develops a major fetish for humiliation.@@
+					<<set $slaves[$i].fetish = "humiliation", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his humiliation fetish.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "pregnancy">>
+			<<if ($slaves[$i].fetish != "pregnancy")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he feels like $he's being bred.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms during <<if $PC.dick == 1>>unprotected sex<<if $PC.vagina == 1>> and <</if>><</if>><<if $PC.vagina == 1>>loving contact with the female anatomy<</if>>, @@.lightcoral;$he begins to really fantasize about pregnancy.@@
+					<<set $slaves[$i].fetish = "pregnancy", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his pregnancy fetish.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "dom">>
+			<<if ($slaves[$i].fetish != "dom")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when another slave is servicing $him.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms while $he's taking an active, dominant sexual role, @@.lightcoral;$he begins to really enjoy dominance.@@
+					<<set $slaves[$i].fetish = "dom", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his dominance.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "masochist">>
+			<<if ($slaves[$i].fetish != "masochist")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he's being hurt.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms while $he's being beaten, @@.lightcoral;$he begins to really enjoy pain.@@
+					<<set $slaves[$i].fetish = "masochist", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his masochism.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<<case "sadist">>
+			<<if ($slaves[$i].fetish != "sadist")>>
+				<<if $slaves[$i].fetishStrength >= 10>>
+					$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> acts to @@.coral;greatly suppress $his current fetish,@@ encouraging $him to orgasm when $he witnesses or even takes part in another slave's pain.
+					<<set $slaves[$i].fetishStrength -= 35>>
+				<<elseif (_fetishChangeChance > random(0,100)-20*$assistant)>>
+					After $his advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing encourages many orgasms while $he's involved in the abuse of other slaves, @@.lightcoral;$he begins to develop a major sadistic streak.@@
+					<<set $slaves[$i].fetish = "sadist", $slaves[$i].fetishKnown = 1, $slaves[$i].fetishStrength = 25>>
+				<</if>>
+			<<elseif ($slaves[$i].fetishStrength <= 95)>>
+				$His advanced <<if $slaves[$i].vagina > -1>>clit<<else>>frenulum<</if>> piercing @@.lightcoral;greatly advances $his sadism.@@
+				<<set $slaves[$i].fetishStrength += 15>>
+			<</if>>
+		<</switch>>
 	<</if>>
 <</if>>