:: Body Modification [nobr]

<<set $nextButton = "Continue", $nextLink = "Slave Interact">>
<<run clearSummaryCache($activeSlave)>>
<<run SlavePronouns($activeSlave)>>
<<run Enunciate($activeSlave)>>

<<set $showEncyclopedia = 1, $encyclopedia = "The Studio">>

<h1>Body Modification Studio</h1>

<<= SlaveFullName($activeSlave)>> is lying strapped down on the table in your body modification studio. $He is entirely at your mercy.

<<if $brandApplied || $degradation>>
	<<if $activeSlave.fuckdoll == 0>>
		<<if canSee($activeSlave)>>There's a mirror on the ceiling, so $he can see<<else>>$He can't see, so you're careful to describe<</if>> $his new appearance.
	<</if>>
	<<if $brandApplied>>
		The smell of burnt flesh hangs in the air. Being branded @@.red;has hurt $his health a little.@@
		<<set $activeSlave.health -= 10>>
		<<unset $brandApplied>>
	<</if>>
	<<if $activeSlave.fetish != "mindbroken" && $activeSlave.fuckdoll == 0>>
	<<if $degradation > 1>>
		<<if $degradation > 5>>
			<<if $activeSlave.devotion <= 50 && $activeSlave.trust < -50>>
				$He is appalled by the whorish spectacle you have made of $him. $He @@.gold;fears@@ you all the more for this but is so terrified of you it does not affect $his submission.
				<<set $activeSlave.trust -= 10>>
			<<elseif $activeSlave.devotion <= 50>>
				$He is appalled by the whorish spectacle you have made of $him. $He @@.mediumorchid;hates@@ and @@.gold;fears@@ you for this.
				<<set $activeSlave.devotion -= 10, $activeSlave.trust -= 10>>
			<<else>>
				$He is shocked by the whorish spectacle you have made of $him. However, $he is so submissive to your will that $he @@.hotpink;accepts@@ that the slave <<if canSee($activeSlave)>>in the mirror<<else>>$he pictures<</if>> is who $he is now.
				<<set $activeSlave.devotion += 4>>
			<</if>>
			<br><br>
		<<else>>
			<<if $activeSlave.devotion < -20 && $activeSlave.trust < 20>>
				$He is @@.gold;afraid@@ that $he has been permanently altered against $his will, but is also scared of your reaction to any objection and suppresses $his disgust.
				<<set $activeSlave.trust -= 5>>
			<<elseif $activeSlave.devotion < -20>>
				$He is @@.mediumorchid;angry@@ and @@.gold;afraid@@ that $he has been permanently altered against $his will.
				<<set $activeSlave.devotion -= 5, $activeSlave.trust -= 5>>
			<<else>>
				$He is saddened to have been altered against $his will. However, $he realizes that $he is a slave, so $he @@.hotpink;accepts@@ your work.
				<<set $activeSlave.devotion += 4>>
			<</if>>
		<</if>>
		<<set $degradation = 0>>
	<</if>>
	<<set _slaveBeforeSession = getSlave($activeSlave.ID)>>
	<<if $activeSlave.tonguePiercing != _slaveBeforeSession.tonguePiercing>>
		<<if $activeSlave.fetishKnown>>
			<<if $activeSlave.fetishStrength > 10>>
			<<if $activeSlave.fetish == "cumslut">>
				Since $he's an oral whore, $he's
				<<if $activeSlave.tonguePiercing > _slaveBeforeSession.tonguePiercing>>
					<<if $activeSlave.tonguePiercing > 1>>@@.hotpink;very happy@@ you took the time to personally pierce $his tongue so heavily<<else>>@@.hotpink;happy@@ to get a tongue piercing from you personally<</if>>. After all, $he's pretty sure it's a sign there will be plenty of <<if $PC.dick>>dick for $him to suck<<else>>pussy for $him to eat<</if>> in the future.
					<<set $activeSlave.devotion += ($activeSlave.tonguePiercing-_slaveBeforeSession.tonguePiercing)*2>>
				<<elseif $activeSlave.devotion <= 95>>
					@@.mediumorchid;saddened@@ you decided to take out $his tongue piercings yourself. $He's afraid this means something about $his future as a suck slut.
					<<set $activeSlave.devotion += ($activeSlave.tonguePiercing-_slaveBeforeSession.tonguePiercing)*2>>
				<</if>>
			<</if>>
			<</if>>
			<<if $activeSlave.sexualFlaw == "hates oral">>
				$He has trouble thinking of $his mouth as a warm, wet, playful hole, so $his new piercings will be therapeutic. Having something to suck on at all times should force $him past $his hangups.
			<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.nipplesPiercing+$activeSlave.areolaePiercing != _slaveBeforeSession.nipplesPiercing+_slaveBeforeSession.areolaePiercing>>
		<<if $activeSlave.fetishKnown>>
		<<if $activeSlave.fetishStrength > 10>>
		<<if $activeSlave.fetish == "boobs">>
			Since $he's fixated on $his boobs, $he's
			<<if $activeSlave.nipplesPiercing+$activeSlave.areolaePiercing > _slaveBeforeSession.nipplesPiercing+_slaveBeforeSession.areolaePiercing>>
				<<if $activeSlave.nipplesPiercing+$activeSlave.areolaePiercing > 2>>@@.hotpink;very happy@@ you took the time to personally pierce them so heavily<<else>>@@.hotpink;happy@@ to get nipple piercings from you personally<</if>>. As far as $he's concerned, more attention on $his tits is always good.
				<<set $activeSlave.devotion += ($activeSlave.nipplesPiercing+$activeSlave.areolaePiercing-_slaveBeforeSession.nipplesPiercing-_slaveBeforeSession.areolaePiercing)*2>>
			<<elseif $activeSlave.devotion <= 95>>
				@@.mediumorchid;saddened@@ you decided to take out $his nipple piercings yourself. $He doesn't like anything that makes $his tits less distinctive.
				<<set $activeSlave.devotion += ($activeSlave.tonguePiercing-_slaveBeforeSession.tonguePiercing)*2>>
			<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.corsetPiercing != _slaveBeforeSession.corsetPiercing>>
		<<if $activeSlave.fetishKnown>>
		<<if $activeSlave.fetishStrength > 10>>
		<<if $activeSlave.fetish == "masochist">>
			Since $he's a pain whore,
			<<if $activeSlave.corsetPiercing > _slaveBeforeSession.corsetPiercing>>
				$he @@.hotpink;got off on@@ you giving $his a corset piercing personally. $He loved the feeling of the metal entering $his flesh.
				<<set $activeSlave.devotion += ($activeSlave.corsetPiercing-_slaveBeforeSession.corsetPiercing)*2>>
			<<elseif $activeSlave.devotion <= 95>>
				 $he's @@.mediumorchid;saddened@@ you decided to take out $his corset piercings yourself. $He'll miss the constant slight discomfort they gave $him.
				<<set $activeSlave.devotion += ($activeSlave.corsetPiercing-_slaveBeforeSession.corsetPiercing)*2>>
			<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.vaginaPiercing != _slaveBeforeSession.vaginaPiercing>>
		<<if $activeSlave.fetishKnown>>
			<<if $activeSlave.fetishStrength > 10>>
			<<if $activeSlave.fetish == "pregnancy">>
				Since $he's a whore for impregnation, $he's
				<<if $activeSlave.vaginaPiercing > _slaveBeforeSession.vaginaPiercing>>
					<<if $activeSlave.vaginaPiercing > 1>>@@.hotpink;very happy@@ you took the time to personally pierce $his pussylips so heavily<<else>>@@.hotpink;happy@@ to get pussy piercings from you personally<</if>>. Like most pregnancy fetishists, $he's a little desperate for dick, and anything that points towards more bareback sex is appealing to $him.
					<<set $activeSlave.devotion += ($activeSlave.vaginaPiercing-_slaveBeforeSession.vaginaPiercing)*2>>
				<<elseif $activeSlave.devotion <= 95>>
					@@.mediumorchid;saddened@@ you decided to take out $his pussy piercings yourself. Like most pregnancy fetishists, $he's a little desperate for dick, and $he's afraid of anything that points towards less attention focused on $his cunt.
					<<set $activeSlave.devotion += ($activeSlave.vaginaPiercing-_slaveBeforeSession.vaginaPiercing)*2>>
				<</if>>
			<</if>>
			<</if>>
			<<if $activeSlave.sexualFlaw == "hates penetration">>
				$He has trouble thinking of her vagina as a fuckhole rather than something special to protect and cherish, so her new piercings will be therapeutic. The constant, inescapable stimulation of her labia should force her past her hangups.
			<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.dickPiercing != _slaveBeforeSession.dickPiercing>>
		<<if $activeSlave.fetishKnown>>
		<<if $activeSlave.fetishStrength > 10>>
		<<if $activeSlave.fetish == "pregnancy">>
			Since $he's fixated on using $his cock to impregnate other slaves, $he's
			<<if $activeSlave.dickPiercing > _slaveBeforeSession.dickPiercing>>
				<<if $activeSlave.dickPiercing > 1>>@@.hotpink;very happy@@ you took the time to personally stick so much metal into $his dick<<if $activeSlave.scrotum>> and ballsack<</if>><<else>>@@.hotpink;happy@@ to get penis piercings from you personally<</if>>. $He's extremely proud of $his newly decorated member.
				<<set $activeSlave.devotion += ($activeSlave.dickPiercing-_slaveBeforeSession.dickPiercing)*2>>
			<<elseif $activeSlave.devotion <= 95>>
				@@.mediumorchid;saddened@@ you decided to take out $his dick<<if $activeSlave.scrotum>> and ballsack<</if>> piercings yourself. $He passionately loves using $his penis, and $he's concerned you're planning to let $him do less of that.
				<<set $activeSlave.devotion += ($activeSlave.dickPiercing-_slaveBeforeSession.dickPiercing)*2>>
			<</if>>
		<</if>>
		<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.anusPiercing != _slaveBeforeSession.anusPiercing>>
		<<if $activeSlave.fetishKnown>>
			<<if $activeSlave.fetishStrength > 10>>
			<<if $activeSlave.fetish == "buttslut">>
				Since $he's an anal slut, $he's
				<<if $activeSlave.anusPiercing > _slaveBeforeSession.anusPiercing>>
					<<if $activeSlave.anusPiercing > 1>>@@.hotpink;very happy@@ you took the time to personally pierce the entire area around $his whorish asspussy<<else>>@@.hotpink;happy@@ to get a piercing next to $his favorite hole from you personally<</if>>. $He can't wait to find out how the metal will feel against $his butthole when $he moves around.
					<<set $activeSlave.devotion += ($activeSlave.anusPiercing-_slaveBeforeSession.anusPiercing)*2>>
				<<elseif $activeSlave.devotion <= 95>>
					@@.mediumorchid;saddened@@ you decided to take out $his backdoor piercings yourself. $He will miss the constant anal titillation, and $he's worried this means you're becoming less interested in $his butthole.
					<<set $activeSlave.devotion += ($activeSlave.anusPiercing-_slaveBeforeSession.anusPiercing)*2>>
				<</if>>
			<</if>>
			<</if>>
			<<if $activeSlave.sexualFlaw == "hates anal">>
				$He has trouble thinking of $his asshole as a sexy, fuckable hole, so $his new piercings will be therapeutic. The constant tickling back there should force $him past $his hangups.
			<</if>>
		<</if>>
	<</if>>
	<<if $activeSlave.genes == "XY">>
	<<if $activeSlave.attrXY <= 35>>
	<<if $activeSlave.earPiercing+$activeSlave.nosePiercing+$activeSlave.eyebrowPiercing+$activeSlave.lipsPiercing+$activeSlave.navelPiercing > _slaveBeforeSession.earPiercing+_slaveBeforeSession.nosePiercing+_slaveBeforeSession.eyebrowPiercing+_slaveBeforeSession.lipsPiercing+_slaveBeforeSession.navelPiercing>>
		$His girly new
		<<if $activeSlave.nosePiercing == 1 && _slaveBeforeSession.nosePiercing == 0>>
			pierced ears should help $him a little with $his issues about $his self-image as a fuckable slave girl.
		<<elseif $activeSlave.nosePiercing == 1 && _slaveBeforeSession.nosePiercing == 0>>
			nose piercing should make $his reflection in the mirror seem just a bit more fuckably feminine to $him.
		<<elseif $activeSlave.eyebrowPiercing == 1 && _slaveBeforeSession.eyebrowPiercing == 0>>
			facial piercing should help destroy $his vestiges of sexual identity outside of $his life as a hole for cocks.
		<<elseif $activeSlave.lipsPiercing == 1 && _slaveBeforeSession.lipsPiercing == 0>>
			facial piercing, just below $his pretty mouth, should help $him get used to the idea of it being a warm, wet hole for cocks.
		<<elseif $activeSlave.navelPiercing == 1 && _slaveBeforeSession.navelPiercing == 0>>
			navel piercing should help $his see $his naked body in a submissively sexual way, especially as $him turns to hide it and present $his asspussy.
		<<else>>
			new set of slutty facial piercings should help $him get used to the idea of being a girly slave meant to please dicks.
		<</if>>
		<<if $activeSlave.devotion < -20>>Unfortunately, that positive effect will have to wait until $he's a little less resistant to the idea of being a sex slave.<</if>>
	<</if>>
	<</if>>
	<</if>>
	<<if $activeSlave.anusTat != _slaveBeforeSession.anusTat>>
	<<if canSee($activeSlave)>>
	<<if canTalk($activeSlave)>>
		<<if $activeSlave.anus > 3>>
			<<set _anus = "anal gape">>
		<<elseif $activeSlave.anus == 3>>
			<<set _anus = "relaxed asspussy">>
		<<elseif $activeSlave.anus == 2>>
			<<set _anus = "soft butthole">>
		<<else>>
			<<set _anus = "tight butthole">>
		<</if>>
		<<if $activeSlave.anusTat == "bleached">>
			$He knew $he was getting $his ass bleached, of course. The stinging sensation was hard to miss. Even so, $he cranes $his neck around as soon as possible to look at $his _anus in the mirror.
		<<else>>
			$He knew $he was getting $his asshole tattooed, of course. $He cranes $his neck around as soon as possible to look at $his _anus in the mirror.
			<<if $activeSlave.butt > 5>>$His huge buttocks are still held apart by the spreaders used to give the tattooing actuators access to $his most intimate area, giving $him a good view.<</if>>
		<</if>>
		<<if $activeSlave.fetishKnown && $activeSlave.fetish == "buttslut">>
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				$He giggles at $his crinkled fuckhole's clean, fuckable appearance, and starts squeezing $his sphincter muscles experimentally. "Thank you, <<Master>>," $he gasps, flushing.
			<<case "flowers" "tribal patterns">>
				$He gasps at the beautiful design and then suddenly bursts into tears. "T-thank you, <<Master>>," $he blubbers. "I'm <<s>>-<<s>>uch an anal whore."
			<<case "advertisements">>
				$He stares, $his mouth working as $he spells out
				<<if ($activeSlave.vagina > -1)>>
					'Second Pussy.' $He smiles naughtily. "<<Master>>, it'<<s>> my //favorite// pu<<ss>>y,"
				<<else>>
					'Spit First.' $He smiles naughtily. "<<Master>>, that work<<s>> for me. Lube'<<s>> good too. Or, um, dry'<<s>> fine too,"
				<</if>>
				$he giggles.
			<<case "rude words">>
				$He stares, $his mouth working as $he spells out
				<<if ($activeSlave.vagina > -1)>>
					'Fucktoy's Favorite Fuckhole.' $He smiles naughtily. "<<Master>>, it sure i<<s>>,"
				<<else>>
					'Sissy Slut's Sodomy Slit.' $He smiles naughtily. "<<Master>>, I love it when you fuck my lewd butt <<s>>lit,"
				<</if>>
				$he giggles.
			<<case "sacrilege">>
				$He stares, $his mouth working as $he reads the ring of Aramaic blasphemy around $his hole. Getting it, $he smiles naughtily. "<<Master>>, I'm a horrible little butthole <<s>>uccubu<<s>>. Plea<<s>>e, <<Master>>, feed me. I need cum in my a<<ss>> to <<s>>urvive."
			<<case "sacrament">>
				$He stares, $his mouth working as $he reads the ring of Aramaic around $his hole. Getting it, $he smiles beatifically. "<<Master>>, I alway<<s>> knew butt<<s>>e<<x>> was a <<s>>acrament."
			<<case "degradation">>
				$He stares, $his mouth working as $he spells out '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Made Me An Anal Slut.' $He smiles naughtily. "Oh <<Master>>, you did," $he <<say>>s gratefully. "And I love you for it."
			<<case "counting">>
				$He stares, realizing that the markings denote how many times $he's been sodomized. "<<Master>>, thank you, and, and, I hope I'll have to come back in here a lot," $he <<say>>s. "Um, becau<<s>>e I have to have that updated. Because I'm being fucked in the butt a lot," $he adds, wanting to be completely clear.
			<<case "bovine patterns">>
				$He stares at $his new cow's anus. Finally, $he focuses on the upsides of being permanently transformed like this. "<<Master>>, I hope thi<<s>> mean<<s>> I'll have to be fed up the butt a lot," $he <<say>>s, referencing the milking systems' anal feeders.
			<<case "possessive">>
				$He stares, realizing that the ring of numbers around $his anus give the date $he was enslaved by you. "Be<<s>t place for that date, <<Master>>," $he <<say>>s. "Being a butt <<s>>lut i<<s>> my life now."
			<<case "paternalist">>
				$He stares, $his mouth working as $he spells out '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Helped Me Love Anal.' "Oh <<Master>>, you did," $he coos. "You did! Thank you <<s>>o much for helping me become the anal <<s>>lut I wa<<s>> alway<<s>> meant to be!"
			<</switch>>
		<<elseif $activeSlave.devotion > 50>>
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				$He gasps at how closely the crinkled skin around $his anal opening matches the rest of $his $activeSlave.skin body. "Oh, it'<<s>> <<s>>o beautiful! Thank you, <<Master>>, thank you," $he exclaims lovingly.
			<<case "flowers" "tribal patterns">>
				$He gasps at the beautiful design. "It'<<s>> <<s>>o pretty, <<Master>>," $he <<say>>s. "Thank you. I love you <<s>>o much!"
			<<case "advertisements" "rude words" "sacrilege" "sacrament" "degradation" "possessive" "paternalist">>
				$He stares, $his mouth working as $he spells out the words tattooed in a ring around $his asshole. "Thank you, <<Master>>," $he <<say>>s devotedly. "I love you and I'll <<s>>erve you with my butthole a<<s>> be<<s>>t I can."
			<<default>>
				$He smiles, pleased at the mark of your attention to $his body. "Thank you, <<Master>>," $he <<say>>s devotedly. "I love you and I'll <<s>>erve you with my butthole a<<s>> be<<s>>t I can."
			<</switch>>
		<<elseif $activeSlave.sexualFlaw == "hates anal">>
			$He stares,
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				horrified, and then shudders convulsively, but can't look away.
			<<case "flowers" "tribal patterns">>
				torn between fascination at the intricate design and horror at having $his anus permanently tattooed.
			<<case "advertisements" "rude words" "sacrilege" "sacrament" "degradation" "possessive" "paternalist">>
				$his mouth working as $he spells out the words tattooed in a ring around $his asshole. $He starts to cry as their meaning sinks in.
			<<default>>
				lower lip quivering.
			<</switch>>
			$He hates being assraped, and knows that this means there's lots of it in store for $him. "<<Master>>, p-plea<<s>>e," $he moans halfheartedly. "I d-don't like being b-butt f-fucked."
		<<elseif $activeSlave.devotion > 20>>
			$He stares,
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				fascinated. $He doesn't seem sure what to make of this.
			<<case "flowers" "tribal patterns">>
				torn between admiration of the pretty design and realization that $his anus has been permanently tattooed.
			<<case "advertisements" "rude words" "sacrilege" "sacrament" "degradation" "possessive" "paternalist">>
				$his mouth working as $he spells out the words tattooed in a ring around $his asshole. $He shudders a little as they sink in and $he internalizes what they say about $him and $his asshole.
			<<default>>
				realizing that $his anus has been permanently tattooed. It's yet another proof that $he's permanently a sex slave, and $his anus is for fucking.
			<</switch>>
			"Thank you, <<Master>>," $he <<say>>s, taking refuge in propriety. "Um, d-doe<<s>> thi<<s>> mean I'm going to be more of a, um, b-butt<<s>>lut?" $he asks hesitantly, not sounding very enthusiastic.
		<<elseif $activeSlave.trust < -20>>
			$He stares,
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				trying to process the appearance of what must seem like an unnaturally clean-looking hole.
			<<case "flowers" "tribal patterns">>
				struggling to process the fact that one of $his most intimate areas has been tattooed. Beautifully tattooed, but still.
			<<case "advertisements" "rude words" "sacrilege" "sacrament" "degradation" "possessive" "paternalist">>
				$his mouth working as $he spells out the words tattooed in a ring around $his asshole. $He shudders as $he does $his best to conceal $his feelings about such a permanent display of $his status as an anal slave.
			<<default>>
				looking sad as the meaning of a permanent display of $his status as an anal slave sinks in.
			<</switch>>
			After a short pause $he remembers $his duties and stammers, "T-thank you, <<Master>>." After a while longer $he turns $his head away, clearly not wanting to dwell on how $his anus is obviously being beautified to attract sexual attention.
		<<else>>
			<<switch $activeSlave.anusTat>>
			<<case "bleached">>
				$His face darkens as $he sees $his crinkled fuckhole's clean, fuckable appearance. "Don't you dare fucking a<<ss>>rape me!" $he bursts out.
			<<case "flowers" "tribal patterns">>
				$He's momentarily surprised by the pretty design, but then $his face darkens. "That'<<s>> permanent!" $he bursts out. "My a<<ss>>hole i<<s>> going to look like that forever!"
			<<case "advertisements">>
				$He stares, $his mouth working as $he spells out
				<<if ($activeSlave.vagina > -1)>>
					'Second Pussy.' $His face darkens. "No it'<<s>> not," $he bursts out. "Anal is dirty."
				<<else>>
					'Spit First.' $His face darkens. "Gro<<ss>>," $he bursts out. "Gro<<ss>> and wrong!"
				<</if>>
			<<case "rude words">>
				$He stares, $his mouth working as $he spells out
				<<if ($activeSlave.vagina > -1)>>
					'Fucktoy's Favorite Fuckhole.' $His face darkens. "No it'<<s>> not," $he bursts out. "It'<<s>> my a<<ss>>!"
				<<else>>
					'Sissy Slut's Sodomy Slit.' $His face darkens. "No it'<<s>> not," $he bursts out. "I'm not a <<s>>i<<ss>>y! Or a <<s>>lut! And it'<<s>> not a slit!" Those are debatable, but they can all change, of course.
				<</if>>
			<<case "sacrilege" "sacrament">>
				$He stares, $his mouth working as $he reads the ring of Aramaic around $his hole. $He doesn't understand it, but $he's not happy about having stuff permanently inscribed around $his ass.
			<<case "degradation">>
				$He stares, $his mouth working as $he spells out '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Made Me An Anal Slut.' $His face darkens. "No I'm not," $he bursts out. That remains to be seen.
			<<case "counting">>
				$He stares, realizing that the markings denote how many times $he's been sodomized. $His face darkens. "I <<s>>ee there'<<s>> room for more," $he bursts out. "Fucking gro<<ss>>."
			<<case "bovine patterns">>
				$He stares at $his new cow's anus. "Fucking gro<<ss>>," $he bursts out. "I'm not an animal." That remains to be seen.
			<<case "possessive">>
				$He stares, realizing that the ring of numbers around $his anus give the date $he was enslaved by you. $His face darkens. "Wor<<s>>t day of my life," $he bursts out.
			<<case "paternalist">>
				$He stares, $his mouth working as $he spells out '<<if $PC.title == 1>>Master<<else>>Mistress<</if>> Helped Me Love Anal.' "I don't," $he bursts out. "It'<<s>> fucking gro<<ss>>."
			<</switch>>
		<</if>>
	<</if>>
	<</if>>
	<</if>>
	<</if>>
<</if>>

/* 000-250-006 */
<<if $seeImages == 1>>
<<if $imageChoice == 1>>
	<div class="imageRef lrgVector"><div class="mask">&nbsp;</div><<SlaveArt $activeSlave 3 0>></div>
<<else>>
	<div class="imageRef lrgRender"><div class="mask">&nbsp;</div><<SlaveArt $activeSlave 3 0>></div>
<</if>>
<</if>>
/* 000-250-006 */

/* PIERCINGS */

<<set _piercingCount =($activeSlave.earPiercing + $activeSlave.nosePiercing + $activeSlave.eyebrowPiercing + $activeSlave.lipsPiercing + $activeSlave.tonguePiercing + $activeSlave.nipplesPiercing + $activeSlave.areolaePiercing + $activeSlave.corsetPiercing + $activeSlave.navelPiercing + $activeSlave.clitPiercing + $activeSlave.vaginaPiercing + $activeSlave.dickPiercing + $activeSlave.anusPiercing)>>

/*DESCRIPTIONS */
<br><br>

Piercings:

<<if _piercingCount == 0>>
	$His smooth $activeSlave.skin skin is completely unpierced.
<</if>>

<<if $activeSlave.earPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<earPiercingDescription>><</if>>
<<if $activeSlave.nosePiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<nosePiercingDescription>><</if>>
<<if $activeSlave.eyebrowPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<eyebrowPiercingDescription>><</if>>
<<if $activeSlave.lipsPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<lipsPiercingDescription>><</if>>
<<if $activeSlave.tonguePiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<tonguePiercingDescription>><</if>>
<<if $activeSlave.nipplesPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<nipplesPiercingDescription>><</if>>
<<if $activeSlave.areolaePiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<areolaePiercingDescription>><</if>>
<<if $activeSlave.navelPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<navelPiercingDescription>><</if>>
<<if $activeSlave.corsetPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<CorsetPiercingDescription>><</if>>
<<if $activeSlave.clitPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<clitPiercingDescription>><</if>>
<<if $activeSlave.vaginaPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<vaginaPiercingDescription>><</if>>
<<if $activeSlave.dickPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<dickPiercingDescription>><</if>>
<<if $activeSlave.anusPiercing > 0 >><br>&nbsp;&nbsp;&nbsp;&nbsp;<<anusPiercingDescription>><</if>>

<br><<chastityPiercingDescription>>

/*<<earPiercingDescription>>
<<nosePiercingDescription>>
<<eyebrowPiercingDescription>>
<<lipsPiercingDescription>>
<<tonguePiercingDescription>>
<<nipplesPiercingDescription>>
<<areolaePiercingDescription>>
<<navelPiercingDescription>>
<<CorsetPiercingDescription>>
<<clitPiercingDescription>>
<<vaginaPiercingDescription>>
<<dickPiercingDescription>>
<<anusPiercingDescription>>
<<chastityPiercingDescription>>*/

/* Apply piercings */

<br>&nbsp;&nbsp;&nbsp;&nbsp;
Choose piercing style:
<<if $piercingLevel != 1>>[[Light|Body Modification][$piercingLevel = 1]]<<else>>Light<</if>>
<<if $piercingLevel != 2>>| [[Heavy|Body Modification][$piercingLevel = 2]]<<else>>| Heavy<</if>>
<<if $piercingLevel != 3>>| [[Smart|Body Modification][$piercingLevel = 3]]<<else>>| Smart<</if>>
<<if $piercingLevel != 0>>| [[Remove|Body Modification][$piercingLevel = 0]]<<else>>| Remove<</if>>


<<if $piercingLevel == 1>>
<br>&nbsp;&nbsp;&nbsp;&nbsp;
//Lightly// pierce $his:

<<link "Entire body">>
	<<if $activeSlave.earPiercing != 1>><<set $activeSlave.earPiercing = 1>>				<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.nosePiercing != 1>><<set $activeSlave.nosePiercing = 1>>				<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.eyebrowPiercing != 1>><<set $activeSlave.eyebrowPiercing = 1>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.lipsPiercing != 1>><<set $activeSlave.lipsPiercing = 1>>				<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.tonguePiercing != 1>><<set $activeSlave.tonguePiercing = 1>>			<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.nipples != "fuckable">>
		<<if $activeSlave.nipplesPiercing != 1 && >><<set $activeSlave.nipplesPiercing = 1>><<set $cash -= $modCost>><</if>>
	<</if>>
	<<if $activeSlave.areolaePiercing != 1>><<set $activeSlave.areolaePiercing = 1>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.corsetPiercing != 1>><<set $activeSlave.corsetPiercing = 1>>			<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.navelPiercing != 1>><<set $activeSlave.navelPiercing = 1>>			<<set $cash -= $modCost>><</if>>
	<<if ($activeSlave.vagina != -1)  || ($activeSlave.dick != 0)>>
		<<if $activeSlave.clitPiercing != 1>><<set $activeSlave.clitPiercing = 1>>			<<set $cash -= $modCost>><</if>>
	<</if>>
	<<if ($activeSlave.vagina != -1)>>
		<<if $activeSlave.vaginaPiercing != 1>><<set $activeSlave.vaginaPiercing = 1>>		<<set $cash -= $modCost>><</if>>
	<</if>>
	<<if ($activeSlave.dick > 0)>>
		<<if $activeSlave.dickPiercing != 1>><<set $activeSlave.dickPiercing = 1>>			<<set $cash -= $modCost>><</if>>
	<</if>>
	<<if $activeSlave.anusPiercing != 1>><<set $activeSlave.anusPiercing = 1>>				<<set $cash -= $modCost>><</if>>
	<<goto "Body Modification">>
<</link>>

<<if $activeSlave.earPiercing != 1>> 		| [[Ear|Body Modification][$activeSlave.earPiercing = 1,			$cash -= $modCost]]<</if>>
<<if $activeSlave.nosePiercing != 1>> 		| [[Nose|Body Modification][$activeSlave.nosePiercing = 1,			$cash -= $modCost]]<</if>>
<<if $activeSlave.eyebrowPiercing != 1>> 	| [[Eyebrow|Body Modification][$activeSlave.eyebrowPiercing = 1,	$cash -= $modCost]]<</if>>
<<if $activeSlave.lipsPiercing != 1>> 		| [[Lips|Body Modification][$activeSlave.lipsPiercing = 1,			$cash -= $modCost]]<</if>>
<<if $activeSlave.tonguePiercing != 1>> 	| [[Tongue|Body Modification][$activeSlave.tonguePiercing = 1,		$cash -= $modCost]]<</if>>
<<if $activeSlave.nipples != "fuckable">>
<<if $activeSlave.nipplesPiercing != 1>> 	| [[Nipples|Body Modification][$activeSlave.nipplesPiercing = 1,	$cash -= $modCost]]<</if>>
<</if>>
<<if $activeSlave.areolaePiercing != 1>> 	| [[Areolae|Body Modification][$activeSlave.areolaePiercing = 1,	$cash -= $modCost]]<</if>>
<<if $activeSlave.corsetPiercing != 1>> 	| [[Corset|Body Modification][$activeSlave.corsetPiercing = 1,		$cash -= $modCost]]<</if>>
<<if $activeSlave.navelPiercing != 1>> 		| [[Navel|Body Modification][$activeSlave.navelPiercing = 1,		$cash -= $modCost]]<</if>>
<<if ($activeSlave.vagina != -1) || ($activeSlave.dick != 0)>>
	<<if $activeSlave.vagina != -1>>
		<<if $activeSlave.clitPiercing != 1>> 	| [[Clit|Body Modification][$activeSlave.clitPiercing = 1,		$cash -= $modCost]]<</if>>
	<<else>>
		<<if $activeSlave.clitPiercing != 1>> 	| [[Dickhead|Body Modification][$activeSlave.clitPiercing = 1,	$cash -= $modCost]]<</if>>
	<</if>>
<</if>>
<<if ($activeSlave.vagina != -1)>>
	<<if $activeSlave.vaginaPiercing != 1>> | [[Vagina|Body Modification][$activeSlave.vaginaPiercing = 1,		$cash -= $modCost]]<</if>>
<</if>>
<<if ($activeSlave.dick > 0)>>
	<<if $activeSlave.dickPiercing != 1>> 	| [[Dick|Body Modification][$activeSlave.dickPiercing = 1,			$cash -= $modCost]]<</if>>
<</if>>
<<if $activeSlave.anusPiercing != 1>> 		| [[Anus|Body Modification][$activeSlave.anusPiercing = 1,			$cash -= $modCost]]<</if>>
<</if>>

<<if $piercingLevel == 2>>
<br>&nbsp;&nbsp;&nbsp;&nbsp;
''Heavily'' pierce $his:

<<link "Entire body">>
	<<if $activeSlave.earPiercing != 2>><<set $activeSlave.earPiercing = 2>>			<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.nosePiercing != 2>><<set $activeSlave.nosePiercing = 2>>			<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.eyebrowPiercing != 2>><<set $activeSlave.eyebrowPiercing = 2>>	<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.lipsPiercing != 2>><<set $activeSlave.lipsPiercing = 2>>			<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.tonguePiercing != 2>><<set $activeSlave.tonguePiercing = 2>>		<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.nipples != "fuckable">>
	<<if $activeSlave.nipplesPiercing != 2>><<set $activeSlave.nipplesPiercing = 2>>	<<set $cash -= $modCost, $degradation += 1>><</if>>
	<</if>>
	<<if $activeSlave.areolaePiercing != 2>><<set $activeSlave.areolaePiercing = 2>>	<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.corsetPiercing != 2>><<set $activeSlave.corsetPiercing = 2>>		<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if $activeSlave.navelPiercing != 2>><<set $activeSlave.navelPiercing = 2>>		<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<if ($activeSlave.vagina != -1) || ($activeSlave.dick != 0)>>
		<<if $activeSlave.clitPiercing != 2>><<set $activeSlave.clitPiercing = 2>>		<<set $cash -= $modCost, $degradation += 1>><</if>>
	<</if>>
	<<if ($activeSlave.vagina != -1)>>
		<<if $activeSlave.vaginaPiercing != 2>><<set $activeSlave.vaginaPiercing = 2>>	<<set $cash -= $modCost, $degradation += 1>><</if>>
	<</if>>
	<<if ($activeSlave.dick > 0)>>
		<<if $activeSlave.dickPiercing != 2>><<set $activeSlave.dickPiercing = 2>>		<<set $cash -= $modCost, $degradation += 1>><</if>>
	<</if>>
	<<if $activeSlave.anusPiercing != 2>><<set $activeSlave.anusPiercing = 2>>			<<set $cash -= $modCost, $degradation += 1>><</if>>
	<<goto "Body Modification">>
<</link>>

<<if $activeSlave.earPiercing != 2>> 		| [[Ear|Body Modification][$activeSlave.earPiercing = 2,			$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.nosePiercing != 2>> 		| [[Nose|Body Modification][$activeSlave.nosePiercing = 2,			$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.eyebrowPiercing != 2>> 	| [[Eyebrow|Body Modification][$activeSlave.eyebrowPiercing = 2,	$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.lipsPiercing != 2>> 		| [[Lips|Body Modification][$activeSlave.lipsPiercing = 2,			$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.tonguePiercing != 2>> 	| [[Tongue|Body Modification][$activeSlave.tonguePiercing = 2,		$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.nipples != "fuckable">>
<<if $activeSlave.nipplesPiercing != 2>> 	| [[Nipples|Body Modification][$activeSlave.nipplesPiercing = 2,	$cash -= $modCost,$degradation += 1]]<</if>>
<</if>>
<<if $activeSlave.areolaePiercing != 2>> 	| [[Areolae|Body Modification][$activeSlave.areolaePiercing = 2,	$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.corsetPiercing != 2>> 	| [[Corset|Body Modification][$activeSlave.corsetPiercing = 2,		$cash -= $modCost,$degradation += 1]]<</if>>
<<if $activeSlave.navelPiercing != 2>> 		| [[Navel|Body Modification][$activeSlave.navelPiercing = 2,		$cash -= $modCost,$degradation += 1]]<</if>>
<<if ($activeSlave.vagina != -1) || ($activeSlave.dick != 0)>>
	<<if $activeSlave.vagina != -1>>
		<<if $activeSlave.clitPiercing != 2>> | [[Clit|Body Modification][$activeSlave.clitPiercing = 2,		$cash -= $modCost,$degradation += 1]]<</if>>
	<<else>>
		<<if $activeSlave.clitPiercing != 2>> | [[Dickhead|Body Modification][$activeSlave.clitPiercing = 2,	$cash -= $modCost,$degradation += 1]]<</if>>
	<</if>>
<</if>>
<<if ($activeSlave.vagina != -1)>>
	<<if $activeSlave.vaginaPiercing != 2>> | [[Vagina|Body Modification][$activeSlave.vaginaPiercing = 2,		$cash -= $modCost,$degradation += 1]]<</if>>
<</if>>
<<if ($activeSlave.dick > 0)>>
	<<if $activeSlave.dickPiercing != 2>> 	| [[Dick|Body Modification][$activeSlave.dickPiercing = 2,			$cash -= $modCost,$degradation += 1]]<</if>>
<</if>>
<<if $activeSlave.anusPiercing != 2>> 		| [[Anus|Body Modification][$activeSlave.anusPiercing = 2,			$cash -= $modCost,$degradation += 1]]<</if>>
<</if>>

<<if $piercingLevel == 3>>
<<if ($activeSlave.vagina != -1) || ($activeSlave.dick != 0)>>
	<<if $activeSlave.clitPiercing != 3>>
		<br>&nbsp;&nbsp;&nbsp;&nbsp;
		Give $him a [[smart piercing?|Body Modification][$activeSlave.clitPiercing = 3,$activeSlave.clitSetting = "all",$cash -=$SPcost,$degradation += 1]] //Costs <<print cashFormat($SPcost)>>, unlocks options to mold sexuality//
	<<else>>
		<br>&nbsp;&nbsp;&nbsp;&nbsp;
		$He already has a smart piercing!
	<</if>>
<</if>>
<</if>>

<<if $piercingLevel == 0>>
<br>&nbsp;&nbsp;&nbsp;&nbsp;
Remove piercings from:

/* no dick/vagina checks in 'remove' so stealth piercings can be cleaned. Check only for piercings.  */
<<link "Everywhere">>
	<<if $activeSlave.earPiercing > 0>><<set $activeSlave.earPiercing = 0>>			<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.nosePiercing > 0>><<set $activeSlave.nosePiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.eyebrowPiercing > 0>><<set $activeSlave.eyebrowPiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.lipsPiercing > 0>><<set $activeSlave.lipsPiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.tonguePiercing > 0>><<set $activeSlave.tonguePiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.nipplesPiercing > 0>><<set $activeSlave.nipplesPiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.areolaePiercing > 0>><<set $activeSlave.areolaePiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.corsetPiercing > 0>><<set $activeSlave.corsetPiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.navelPiercing > 0>><<set $activeSlave.navelPiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.clitPiercing > 0>><<set $activeSlave.clitPiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.vaginaPiercing > 0>><<set $activeSlave.vaginaPiercing = 0>>	<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.dickPiercing > 0>><<set $activeSlave.dickPiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<if $activeSlave.anusPiercing > 0>><<set $activeSlave.anusPiercing = 0>>		<<set $cash -= $modCost>><</if>>
	<<goto "Body Modification">>

<</link>>

<<if $activeSlave.earPiercing > 0>> 		| [[Ear|Body Modification][$activeSlave.earPiercing = 0,			$cash -= $modCost]]<</if>>
<<if $activeSlave.nosePiercing > 0>> 		| [[Nose|Body Modification][$activeSlave.nosePiercing = 0,			$cash -= $modCost]]<</if>>
<<if $activeSlave.eyebrowPiercing > 0>> 	| [[Eyebrow|Body Modification][$activeSlave.eyebrowPiercing = 0,	$cash -= $modCost]]<</if>>
<<if $activeSlave.lipsPiercing > 0>> 		| [[Lips|Body Modification][$activeSlave.lipsPiercing = 0,			$cash -= $modCost]]<</if>>
<<if $activeSlave.tonguePiercing > 0>> 		| [[Tongue|Body Modification][$activeSlave.tonguePiercing = 0,		$cash -= $modCost]]<</if>>
<<if $activeSlave.nipplesPiercing > 0>> 	| [[Nipples|Body Modification][$activeSlave.nipplesPiercing = 0,	$cash -= $modCost]]<</if>>
<<if $activeSlave.areolaePiercing > 0>> 	| [[Areolae|Body Modification][$activeSlave.areolaePiercing = 0,	$cash -= $modCost]]<</if>>
<<if $activeSlave.corsetPiercing > 0>> 		| [[Corset|Body Modification][$activeSlave.corsetPiercing = 0,		$cash -= $modCost]]<</if>>
<<if $activeSlave.navelPiercing > 0>> 		| [[Navel|Body Modification][$activeSlave.navelPiercing = 0,		$cash -= $modCost]]<</if>>
<<if $activeSlave.vagina != -1>>
	<<if $activeSlave.clitPiercing > 0>> 	| [[Clit|Body Modification][$activeSlave.clitPiercing = 0,			$cash -= $modCost]]<</if>>
<<else>>
	<<if $activeSlave.clitPiercing > 0>> 	| [[Dickhead|Body Modification][$activeSlave.clitPiercing = 0,		$cash -= $modCost]]<</if>>
<</if>>
<<if $activeSlave.vaginaPiercing > 0>> 		| [[Vagina|Body Modification][$activeSlave.vaginaPiercing = 0,		$cash -= $modCost]]<</if>>
<<if $activeSlave.dickPiercing > 0>> 		| [[Dick|Body Modification][$activeSlave.dickPiercing = 0,			$cash -= $modCost]]<</if>>
<<if $activeSlave.anusPiercing > 0>> 		| [[Anus|Body Modification][$activeSlave.anusPiercing = 0,			$cash -= $modCost]]<</if>>
<</if>>

<br><br>

/* TATTOOS */

Tattoos:
<<if $activeSlave.shouldersTat	!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<shouldersTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.lipsTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<lipsTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.boobsTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<boobsTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.armsTat		!= 0 && $activeSlave.amp != 1>>	<br>&nbsp;&nbsp;&nbsp;&nbsp;<<armsTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.backTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<backTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.stampTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<stampTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.buttTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<buttTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.vaginaTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<vaginaTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.dickTat		!= 0 && $activeSlave.dick > 0>>	<br>&nbsp;&nbsp;&nbsp;&nbsp;<<dickTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.anusTat		!= 0>>							<br>&nbsp;&nbsp;&nbsp;&nbsp;<<anusTatDescription>><<set _hasTat = 1>><</if>>
<<if $activeSlave.legsTat		!= 0 && $activeSlave.amp != 1>>	<br>&nbsp;&nbsp;&nbsp;&nbsp;<<legsTatDescription>><<set _hasTat = 1>><</if>>

<br>&nbsp;&nbsp;&nbsp;&nbsp;
Choose a tattoo style:
/* If/else is here so a "highlighted" option is never a link. */
<<if $tattooChoice != "tribal patterns">>[[Tribal patterns|Body Modification][$tattooChoice = "tribal patterns"]]<<else>>Tribal patterns<</if>>
<<if $tattooChoice != "flowers">> | [[Flowers|Body Modification][$tattooChoice = "flowers"]]<<else>>| Flowers<</if>>
<<if $tattooChoice != "counting">> | [[Counting|Body Modification][$tattooChoice = "counting"]]<<else>>| Counting<</if>>
<<if $tattooChoice != "advertisements">> | [[Advertisements|Body Modification][$tattooChoice = "advertisements"]]<<else>>| Advertisements<</if>>
<<if $tattooChoice != "rude words">> | [[Rude words|Body Modification][$tattooChoice = "rude words"]]<<else>>| Rude words<</if>>
<<if $tattooChoice != "degradation">> | [[Degradation|Body Modification][$tattooChoice = "degradation"]]<<else>>| Degradation<</if>>
<<if $tattooChoice != "Asian art">> | [[Asian art|Body Modification][$tattooChoice = "Asian art"]] <<else>>| Asian art<</if>>
<<if $tattooChoice != "scenes">> | [[Scenes|Body Modification][$tattooChoice = "scenes"]]<<else>>| Scenes<</if>>
<<if $tattooChoice != "bovine patterns">> | [[Bovine|Body Modification][$tattooChoice = "bovine patterns"]]<<else>>| Bovine<</if>>
<<if $tattooChoice != "permanent makeup">> | [[Permanent makeup|Body Modification][$tattooChoice = "permanent makeup"]]<<else>>| Permanent makeup<</if>>
<<if $tattooChoice != "sacrilege">> | [[Sacrilege|Body Modification][$tattooChoice = "sacrilege"]]<<else>>| Sacrilege<</if>>
<<if $tattooChoice != "sacrament">> | [[Sacrament|Body Modification][$tattooChoice = "sacrament"]]<<else>>| Sacrament<</if>>
<<if $tattooChoice != "possessive">> | [[Possessive|Body Modification][$tattooChoice = "possessive"]]<<else>>| Possessive<</if>>
<<if $tattooChoice != "paternalist">> | [[Paternalist|Body Modification][$tattooChoice = "paternalist"]]<<else>>| Paternalist<</if>>

<<if $activeSlave.anusTat == 0>>
	<<if $tattooChoice != "bleached">>| [[Bleach|Body Modification][$tattooChoice = "bleached",$cash -= $modCost]]<<else>>| Bleach<</if>>
<</if>>

<<if _hasTat == 1>>
	<<if $tattooChoice !== 0>> | //[[Remove a tattoo|Body Modification][$tattooChoice = 0]]//<<else>>| Remove a tattoo<</if>>
<</if>>

<<if def $tattooChoice>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	<<if $tattooChoice == 0>>
		Clean the ink off of $him:
	<<elseif $tattooChoice == "counting">>
		Add tallies of $his sexual exploits to $him:
	<<elseif $tattooChoice == "bleached">>
		Bleach $his:
	<<else>>
		Add $tattooChoice to $his:
	<</if>>

	<<if ($tattooChoice != "bleached") && ($tattooChoice != "permanent makeup")>>
	<<link "Entire body">>
		<<set _degradationTemp = 0>>
		<<if $activeSlave.boobsTat != $tattooChoice>>
			<<set $activeSlave.boobsTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.buttTat != $tattooChoice>>
			<<set $activeSlave.buttTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.vaginaTat != $tattooChoice>>
			<<set $activeSlave.vaginaTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.dick > 0>>
		<<if $activeSlave.dickTat != $tattooChoice && $tattooChoice != "scenes">>
			<<set $activeSlave.dickTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>
		<</if>>

		<<if $activeSlave.lipsTat != $tattooChoice>>
			<<if $tattooChoice == "scenes">>
				<<set $activeSlave.lipsTat = "permanent makeup">>
			<<else>>
				<<set $activeSlave.lipsTat = $tattooChoice>>
			<</if>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if ($tattooChoice == "Asian art" || $tattooChoice == "scenes") && $activeSlave.anusTat == "bleached">>
			<<set $activeSlave.anusTat = "bleached">>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<<elseif $activeSlave.anusTat != $tattooChoice>>
			<<set $activeSlave.anusTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.shouldersTat != $tattooChoice>>
			<<set $activeSlave.shouldersTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.backTat != $tattooChoice>>
			<<set $activeSlave.backTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if $activeSlave.amp != 1>>
		<<if $activeSlave.armsTat != $tattooChoice>>
			<<set $activeSlave.armsTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>
		<<if $activeSlave.legsTat != $tattooChoice>>
			<<set $activeSlave.legsTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>
		<</if>>

		<<if $activeSlave.stampTat != $tattooChoice>>
			<<set $activeSlave.stampTat = $tattooChoice>>
			<<set $cash -= $modCost>>
			<<set _degradationTemp += 1>>
		<</if>>

		<<if !["tribal patterns", "flowers", "paternalist", 0].includes($tattooChoice)>>
			<<set $degradation += _degradationTemp>>
		<</if>>

		<<goto "Body Modification">>
	<</link>>
	<</if>>

	<<if $tattooChoice == 0>>
		<<if $activeSlave.shouldersTat != $tattooChoice>> | [[Shoulders|Body Modification][$activeSlave.shouldersTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.lipsTat != $tattooChoice>> | [[Face|Body Modification][$activeSlave.lipsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.boobsTat != $tattooChoice>> | [[Boobs|Body Modification][$activeSlave.boobsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.amp != 1>>
			<<if $activeSlave.armsTat != $tattooChoice>> | [[Arms|Body Modification][$activeSlave.armsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if $activeSlave.backTat != $tattooChoice>> | [[Upper back|Body Modification][$activeSlave.backTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.stampTat != $tattooChoice>> | [[Lower back|Body Modification][$activeSlave.stampTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.buttTat != $tattooChoice>> | [[Buttock|Body Modification][$activeSlave.buttTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.vaginaTat != $tattooChoice>> | [[Vagina|Body Modification][$activeSlave.vaginaTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if ($activeSlave.dick > 0)>>
			<<if $activeSlave.dickTat != $tattooChoice>> | [[Dick|Body Modification][$activeSlave.dickTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if $activeSlave.anusTat != $tattooChoice>> | [[Anus|Body Modification][$activeSlave.anusTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.amp != 1>>
			<<if $activeSlave.legsTat != $tattooChoice>> | [[Legs|Body Modification][$activeSlave.legsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
	<<elseif $tattooChoice == "permanent makeup">>
		[[Face|Body Modification][$activeSlave.lipsTat = $tattooChoice,$cash -= $modCost]]
	<<elseif $tattooChoice == "bleached">>
		[[Asshole|Body Modification][$activeSlave.anusTat = $tattooChoice,$cash -= $modCost]]
	<<else>>
		<<if $activeSlave.shouldersTat != $tattooChoice>> | [[Shoulders|Body Modification][$activeSlave.shouldersTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $tattooChoice != "scenes">>
			<<if $activeSlave.lipsTat != $tattooChoice>> | [[Face|Body Modification][$activeSlave.lipsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if $activeSlave.boobsTat != $tattooChoice>> | [[Boobs|Body Modification][$activeSlave.boobsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.amp != 1>>
			<<if $activeSlave.armsTat != $tattooChoice>> | [[Arms|Body Modification][$activeSlave.armsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if $activeSlave.backTat != $tattooChoice>> | [[Upper back|Body Modification][$activeSlave.backTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.stampTat != $tattooChoice>> | [[Lower back|Body Modification][$activeSlave.stampTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.buttTat != $tattooChoice>> | [[Buttock|Body Modification][$activeSlave.buttTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.vaginaTat != $tattooChoice>> | [[Vagina|Body Modification][$activeSlave.vaginaTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<<if $activeSlave.dick > 0 && $tattooChoice != "scenes">>
			<<if $activeSlave.dickTat != $tattooChoice>> | [[Dick|Body Modification][$activeSlave.dickTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if ($tattooChoice != "Asian art") && ($tattooChoice != "scenes")>>
			<<if $activeSlave.anusTat != $tattooChoice>> | [[Anus|Body Modification][$activeSlave.anusTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
		<<if $activeSlave.amp != 1>>
			<<if $activeSlave.legsTat != $tattooChoice>> | [[Legs|Body Modification][$activeSlave.legsTat = $tattooChoice,$cash -= $modCost]]<</if>>
		<</if>>
	<</if>>
<</if>>
<br>&nbsp;&nbsp;&nbsp;&nbsp;

<<if $activeSlave.belly >= 10000 && $activeSlave.bellyPreg < 450000 && $activeSlave.bellyFluid < 5000>>
	<<if $activeSlave.bellyTat == 0>>
		$He has no navel tattoos.
	<<else>>
		$His navel is tattooed with $activeSlave.bellyTat.
	<</if>>
	<<if $activeSlave.bellyTat == 0>>
		<br>&nbsp;&nbsp;&nbsp;&nbsp;
		[[Heart|Body Modification][$activeSlave.bellyTat = "a heart",$cash -= $modCost]]
		 | [[Star|Body Modification][$activeSlave.bellyTat = "a star",$cash -= $modCost]]
		 | [[Butterfly|Body Modification][$activeSlave.bellyTat = "a butterfly",$cash -= $modCost,$degradation += 1]]
	<</if>>
	<<if $activeSlave.bellyTat != 0>>
		//[[Remove tattoos|Body Modification][$activeSlave.bellyTat = 0,$cash -= $modCost]]//
	<</if>>
<<elseif $activeSlave.bellyPreg >= 450000>>
	$His middle is large and taut enough to be a suitable canvas for a navel focused tattoo, but $his brood is too active to permit the needle to do its work.
<<elseif $activeSlave.bellyFluid >= 10000>>
	$His middle is large and taut enough to be a suitable canvas for a navel focused tattoo, but the pressure applied to $his stomach will likely force $him to release its contents.
<<else>>
	$His middle isn't large enough to be a suitable canvas for a navel focused tattoo.
<</if>>

<br>
<br>&nbsp;&nbsp;&nbsp;&nbsp;

Custom Tats:
<br>&nbsp;&nbsp;&nbsp;&nbsp;//Use complete sentences, make a description of it//

<<if $activeSlave.lipsTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom face tattoo: <<textbox "$activeSlave.lipsTat" $activeSlave.lipsTat "Slave Interact">>
<</if>>

<<if $activeSlave.shouldersTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom shoulder tattoo: <<textbox "$activeSlave.shouldersTat" $activeSlave.shouldersTat "Slave Interact">>
<</if>>

<<if $activeSlave.armsTat == 0 && $activeSlave.amp != 1>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom arm tattoo: <<textbox "$activeSlave.armsTat" $activeSlave.armsTat "Slave Interact">>
<</if>>

<<if $activeSlave.boobsTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom tit tattoo: <<textbox "$activeSlave.boobsTat" $activeSlave.boobsTat "Slave Interact">>
<</if>>

<<if $activeSlave.backTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom back tattoo: <<textbox "$activeSlave.backTat" $activeSlave.backTat "Slave Interact">>
<</if>>

<<if $activeSlave.stampTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom tramp stamp (lower back tattoo): <<textbox "$activeSlave.stampTat" $activeSlave.stampTat "Slave Interact">>
<</if>>

<<if $activeSlave.buttTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom butt tattoo (lower back tattoo): <<textbox "$activeSlave.buttTat" $activeSlave.buttTat "Slave Interact">>
<</if>>

<<if $activeSlave.dickTat == 0 && $activeSlave.dick != 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom dick tattoo: <<textbox "$activeSlave.dickTat" $activeSlave.dickTat "Slave Interact">>
<</if>>

<<if $activeSlave.vaginaTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom pubic tattoo: <<textbox "$activeSlave.vaginaTat" $activeSlave.vaginaTat "Slave Interact">>
<</if>>

<<if $activeSlave.anusTat == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom anus tattoo (lower back tattoo): <<textbox "$activeSlave.anusTat" $activeSlave.anusTat "Slave Interact">>
<</if>>

<<if $activeSlave.legsTat == 0 && $activeSlave.amp != 1>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	Give $him a custom leg tattoo: <<textbox "$activeSlave.legsTat" $activeSlave.legsTat "Slave Interact">>
<</if>>

<br>&nbsp;&nbsp;&nbsp;&nbsp;

<<if ($activeSlave.customTat == "")>>
	Give $him a custom tattoo: <<textbox "$activeSlave.customTat" $activeSlave.customTat "Slave Interact">>
<<else>>
	$He <<if _hasTat == 1>>also<</if>> has a custom tattoo: $activeSlave.customTat
	Change it here: <<textbox "$activeSlave.customTat" $activeSlave.customTat "Slave Interact">>
<</if>>
<<if $activeSlave.customTat != "">>
	//[[Remove custom tattoo|Body Modification][$activeSlave.customTat = "",$cash -= $modCost]]//
<</if>>


<br><br>

/* Branding */


Branding:
<<if $activeSlave.brand != 0>>
	<<brandDescription>>
	[[Remove Brand|Body Modification][$brandApplied = 0, $activeSlave.brand = 0,$cash -= $modCost,$degradation -= 10]]
<<else>>
	$His skin is unmarked.
<</if>>

<br>&nbsp;&nbsp;&nbsp;&nbsp;
Use ''$brandDesign'' or choose another brand:
[[Your slaving emblem|Body Modification][$brandDesign = "your personal symbol"]]
| [[Your initials|Body Modification][$brandDesign = "your initials"]]
<br>&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
[[SLUT|Body Modification][$brandDesign = "SLUT"]]
| [[WHORE|Body Modification][$brandDesign = "WHORE"]]
| [[SLAVE|Body Modification][$brandDesign = "SLAVE"]]
| [[COW|Body Modification][$brandDesign = "COW"]]
| [[MEAT|Body Modification][$brandDesign = "MEAT"]]
| [[CUMDUMP|Body Modification][$brandDesign = "CUMDUMP"]]
| [[LOVER|Body Modification][$brandDesign = "LOVER"]]
<br>&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
[[Pussy symbol|Body Modification][$brandDesign = "a pussy symbol"]]
| [[Anus symbol|Body Modification][$brandDesign = "an anus symbol"]]
| [[Penis symbol|Body Modification][$brandDesign = "a penis symbol"]]
<br>&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;
[[Lady|Body Modification][$brandDesign = "a lady silhouette"]]
| [[Princess|Body Modification][$brandDesign = "a princess silhouette"]]
| [[Queen|Body Modification][$brandDesign = "a queen silhouette"]]
| [[Angel|Body Modification][$brandDesign = "an angel silhouette"]]
| [[Devil|Body Modification][$brandDesign = "a devil silhouette"]]
<<if ($arcologies[0].FSSupremacist != "unset") && ($activeSlave.race != $arcologies[0].FSSupremacistRace)>>
| //FS// [[Racial Slur|Body Modification][$brandDesign = "a racial slur"]] <</if>>
<<if ($arcologies[0].FSSubjugationist != "unset") && ($activeSlave.race == $arcologies[0].FSSubjugationistRace)>>
| //FS// [[Racial Slur|Body Modification][$brandDesign = "a racial slur"]] <</if>>
<<if ($arcologies[0].FSRepopulationFocus != "unset")>>
| //FS// [[Birth Count|Body Modification][$brandDesign = "the number of children "+$he+" has birthed"]] <</if>>
<<if ($arcologies[0].FSGenderRadicalist != "unset") || ($arcologies[0].FSGenderFundamentalist != "unset")>>
| //FS// [[Gender Symbol|Body Modification][$brandDesign = "a gender symbol"]] <</if>>
<<if ($arcologies[0].FSPaternalist != "unset")>>
| //FS// [[Personal Symbol|Body Modification][$brandDesign = $his+" own personal symbol"]] <</if>>
<<if ($arcologies[0].FSDegradationist != "unset")>>
| //FS// [[Chain Symbol|Body Modification][$brandDesign = "a chain symbol"]] <</if>>
<<if ($arcologies[0].FSBodyPurist != "unset")>>
| //FS// [[Vitruvian Man|Body Modification][$brandDesign = "a Vitruvian man"]] <</if>>
<<if ($arcologies[0].FSTransformationFetishist != "unset")>>
| //FS// [[Scalpel|Body Modification][$brandDesign = "a scalpel"]] <</if>>
<<if ($arcologies[0].FSYouthPreferentialist != "unset")>>
| //FS// [[Virginity Status|Body Modification][$brandDesign = $his+" virginity status"]] <</if>>
<<if ($arcologies[0].FSMaturityPreferentialist != "unset")>>
| //FS// [[Sexual Skill Info|Body Modification][$brandDesign = $his+" sexual skills"]] <</if>>
<<if ($arcologies[0].FSSlimnessEnthusiast != "unset")>>
| //FS// [[Breast Floor|Body Modification][$brandDesign = $his+" absolute minimum breast size"]] <</if>>
<<if ($arcologies[0].FSAssetExpansionist != "unset")>>
| //FS// [[Breast Ceiling|Body Modification][$brandDesign = $his+" absolute maximum breast size"]] <</if>>
<<if ($arcologies[0].FSHedonisticDecadence != "unset")>>
| //FS// [[Weight Record|Body Modification][$brandDesign = $his+" highest weigh-in"]] <</if>>
<<if ($arcologies[0].FSHedonisticDecadence != "unset") && $PC.refreshmentType == 2>>
| //FS// [[Favorite Food|Body Modification][$brandDesign = "a big helping of "+$PC.refreshment]] <</if>>
<<if ($arcologies[0].FSPastoralist != "unset")>>
| //FS// [[Product Quality|Body Modification][$brandDesign = $his+" body product quality"]] <</if>>
<<if ($arcologies[0].FSPhysicalIdealist != "unset")>>
| //FS// [[Deadlift Info|Body Modification][$brandDesign = $his+" deadlift record"]] <</if>>
<<if ($arcologies[0].FSChattelReligionist != "unset")>>
| //FS// [[Religious Symbol|Body Modification][$brandDesign = "a religious symbol"]] <</if>>
<<if ($arcologies[0].FSRomanRevivalist != "unset")>>
| //FS// [[Republican Crest|Body Modification][$brandDesign = "the crest of your Republic"]] <</if>>
<<if ($arcologies[0].FSAztecRevivalist != "unset")>>
| //FS// [[Seven Serpents|Body Modification][$brandDesign = "the symbol of the Aztec gods"]] <</if>>
<<if ($arcologies[0].FSEgyptianRevivalist != "unset")>>
| //FS// [[Dynastic Sigil|Body Modification][$brandDesign = "the sigil of your Dynasty"]] <</if>>
<<if ($arcologies[0].FSEdoRevivalist != "unset")>>
| //FS// [[Mon|Body Modification][$brandDesign = "the Shogunate's mon"]] <</if>>
<<if ($arcologies[0].FSArabianRevivalist != "unset")>>
| //FS// [[Caliphate Symbol|Body Modification][$brandDesign = "a symbol of the Caliphate"]] <</if>>
<<if ($arcologies[0].FSChineseRevivalist != "unset")>>
| //FS// [[Imperial Seal|Body Modification][$brandDesign = "your Imperial Seal"]] <</if>>

<br>&nbsp;&nbsp;&nbsp;&nbsp;
Or design your own: <<textbox "$brandDesign" $brandDesign "Body Modification">> //For best results, use a single word//


<br>&nbsp;&nbsp;&nbsp;&nbsp;
Choose a site for branding:
[[Ears|Body Modification][$brandTarget = "ear"]]
| [[Cheeks|Body Modification][$brandTarget = "cheek"]]
| [[Shoulders|Body Modification][$brandTarget = "shoulder"]]
| [[Breasts|Body Modification][$brandTarget = "breast"]]
<<if $activeSlave.amp == 0>>
	| [[Arm, upper|Body Modification][$brandTarget = "upper arm"]]
	| [[Arm, lower|Body Modification][$brandTarget = "lower arm"]]
	| [[Wrist|Body Modification][$brandTarget = "wrist"]]
	| [[Hand|Body Modification][$brandTarget = "hand"]]
<</if>>
| [[Buttocks|Body Modification][$brandTarget = "buttock"]]
<<if $activeSlave.amp == 0>>
	| [[Thigh|Body Modification][$brandTarget = "thigh"]]
	| [[Calf|Body Modification][$brandTarget = "calve"]]
	| [[Ankle|Body Modification][$brandTarget = "ankle"]]
	| [[Feet|Body Modification][$brandTarget = "foot"]]
<</if>>
| [[Neck|Body Modification][$brandTarget = "neck"]]
| [[Chest|Body Modification][$brandTarget = "chest"]]
| [[Belly|Body Modification][$brandTarget = "belly"]]
| [[Pubic Mound|Body Modification][$brandTarget = "pubic mound"]]
| [[Back|Body Modification][$brandTarget = "back"]]
| [[Lower Back|Body Modification][$brandTarget = "lower back"]]

/* Branding expansion contributed by Anon1888 */


<br>&nbsp;&nbsp;&nbsp;&nbsp;
<<if ($brandTarget == "neck" || $brandTarget == "chest" || $brandTarget == "belly" || $brandTarget == "pubic mound" || $brandTarget == "back" || $brandTarget == "lower back")>>
	[[Brand|Body Modification][$brandApplied = 1,$activeSlave.brand = $brandDesign,$activeSlave.brandLocation = $brandTarget,$cash -= $modCost,$degradation += 10]]  with $brandDesign on the $brandTarget.
<<else>>
	Brand $him now with ''$brandDesign'' on the
	<<link "left">>
		<<set $brandApplied = 1>>
		<<set $activeSlave.brand = $brandDesign>>
		<<set $activeSlave.brandLocation = ("left " + $brandTarget)>>
		<<set $cash -= $modCost>>
		<<set $degradation += 10>>
		<<goto "Body Modification">>
	<</link>>
	 $brandTarget, the
	<<link "right">>
		<<set $brandApplied = 1>>
		<<set $activeSlave.brand = $brandDesign>>
		<<set $activeSlave.brandLocation = ("right " +  $brandTarget)>>
		<<set $cash -= $modCost>>
		<<set $degradation += 10>>
		<<goto "Body Modification">>
	<</link>>  $brandTarget, or
	<<link "both">>
		<<set $brandApplied = 1>>
		<<set $activeSlave.brand = $brandDesign>>
		<<if $brandTarget == "ear">>
			<<set $activeSlave.brandLocation = "ears">>
		<<elseif $brandTarget == "cheek">>
			<<set $activeSlave.brandLocation = "cheeks">>
		<<elseif $brandTarget == "shoulder">>
			<<set $activeSlave.brandLocation = "shoulders">>
		<<elseif $brandTarget == "breast">>
			<<set $activeSlave.brandLocation = "breasts">>
		<<elseif $brandTarget == "upper arm">>
			<<set $activeSlave.brandLocation = "upper arms">>
		<<elseif $brandTarget == "lower arm">>
			<<set $activeSlave.brandLocation = "lower arms">>
		<<elseif $brandTarget == "wrist">>
			<<set $activeSlave.brandLocation = "wrists">>
		<<elseif $brandTarget == "hand">>
			<<set $activeSlave.brandLocation = "hands">>
		<<elseif $brandTarget == "buttock">>
			<<set $activeSlave.brandLocation = "buttocks">>
		<<elseif $brandTarget == "thigh">>
			<<set $activeSlave.brandLocation = "thighs">>
		<<elseif $brandTarget == "calve">>
			<<set $activeSlave.brandLocation = "calves">>
		<<elseif $brandTarget == "ankle">>
			<<set $activeSlave.brandLocation = "ankles">>
		<<elseif $brandTarget == "foot">>
			<<set $activeSlave.brandLocation = "feet">>
		<</if>>
		<<set $cash -= $modCost>>
		<<set $degradation += 10>>
		<<goto "Body Modification">>
	<</link>>?
<</if>>
//Branding will slightly reduce $his beauty but may slowly increase your reputation.//

<<if $activeSlave.breedingMark == 1 && $propOutcome == 0>>
	<br>&nbsp;&nbsp;&nbsp;&nbsp;
	$He has an intricate tattoo on $his lower belly that suggests $he was made to be bred. [[Remove it|Body Modification][$activeSlave.breedingMark = 0]]
<</if>>
