code:
:: Attendant Select [nobr]

<<set $nextButton = "Back", $nextLink = "Spa", $showEncyclopedia = 1, $encyclopedia = "Attendant">>
<<showallAssignmentFilter>>
<<if ($Attendant != 0)>>
	<<setLocalPronouns $Attendant>>
	''__@@.pink;<<= SlaveFullName($Attendant)>>@@__'' is serving as your Attendant.

$He will help pamper and counsel your slaves.
<<else>>
	You have not selected an Attendant.
<</if>>

''Appoint an Attendant from your devoted slaves:''

[[None|Attendant Workaround][$i = -1]]

<<assignmentFilter>>

	<<showallAssignmentFilter>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>

repo_name: nook/fc


code:
:: Attendant Workaround [silently]

<<if $Attendant != 0>>
	<<= removeJob($Attendant, "be the Attendant")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "be the Attendant")>>
	<<set $slaves[$i].livingRules = "luxurious">>
	<<set $Attendant = $slaves[$i]>>
<</if>>

<<goto "Spa">>


code:
:: Barracks [nobr]

<<set $nextButton = "Back", $nextLink = "Main">>

The mercenaries you retain to protect $arcologies[0].name are housed in this sector of the arcology, which is fitted out as a modern military facility. It's much less expensive to house them here than to let them live at free quarters in the living areas of the arcology. They live somewhat apart from the society they protect, down here, but
<<if $personalArms > 0 && $invasionVictory > 0>>
	you're always welcome here. You're their employer, but what's more important to them is that you also fought alongside them in victorious battle.
<<else>>
	they don't resent an unannounced visit from their employer.
<</if>>
As you enter the main bay of the armory, lined with modern arms and armor and a few muscular, scarred men and women looking after their gear or suiting up to stand post, you're greeted respectfully, with<<if $personalArms > 0 && $invasionVictory > 0>> jaunty salutes and<</if>> formal <<if $PC.title == 1>>"Sir"s<<else>>"Ma'am"s<</if>><<if $personalArms > 0 && $invasionVictory > 0>>, but also with smiles and nods<</if>>.
<<if $mercenaries >= 3>>
	Though few of the mercenaries are visible,
	<<if $mercenaries >= 5>>
		the bay is huge. There's enough equipment for a full company here.
	<<else>>
		there's enough equipment for a full platoon here.
	<</if>>
<</if>>

<<if $mercenariesTitle != "mercenaries">>
	They've taken to their role as $mercenariesTitle.
	<<switch $mercenariesTitle>>
	<<case "Knights">>
		Every set of gear has some kind of chivalric device on it, and the heavier sets of powered armor are accented with a lot of burnished steel.
	<<case "Evocati">>
		The heavier sets of powered armor have Roman standards mounted on their backs, and officers' helmets are distinguished by horsehair crests.
	<<case "Shorn Ones">>
		The bigger sets of power armor are adorned with multiple ornaments and painted with symbols of the gods and victory.
	<<case "Imperial Guards">>
		Their prototype armor is equipped with the latest weapons and their Imperial Chinese war banner strikes fear into the foes.
	<<case "Medjay">>
		The gear is accented with bronze and animal skins. Some of the heavier armored helmets even have faceplates styled after Pharaonic death masks.
	<<case "Samurai">>
		The gear is functional, but it has a distinctive Sengoku style to it. A ceramic wakizashi is an almost universal tertiary weapon.
	<<case "Janissaries">>
		They consider themselves a caste apart, and keep to themselves, priding themselves on relentless training and perpetual readiness.
	<<case "Knights Templar">>
		All the armor includes a modernized version of a white surcoat emblazoned with the symbol of the new faith.
	<<case "Immortals">>
		The lighting in the bay has been lowered, and the gear is styled to be menacing. There's a sense of leashed danger here.
	<<case "Vast Legions">>
		Their bulky, heavily armored prototype armor strikes terror into foes and causes the earth to shake when they walk.
	<<case "Surgical Corps">>
		Their prototype armor is equipped with the latest medical equipment.
	<<case "Inglorious Bitches">>
		Their garish neon pink prototype armor shines brightly.
	<<case "Thousand Sons">>
		Their prototype armor is designed to preserve a sample of the wearer's genetic material in the event of death.
	<<case "Guardians of the Unborn">>
		Their gear is designed to be accommodating to pregnant women and even includes a special kit in case a baby needs delivering and they're the only ones around.
	<<case "Shadowed Hand">>
		Their armor prominently displays the symbol of the Societal Elite and is designed to make it perfectly clear that they mean business.
	<<case "Asgardians">>
		Their armor has been modified to allow the wearers' muscular arms to remain visible, and the heavier armor seems to be equipped with capes.
	<<case "Tasters">>
		Their armor has been modified to handle all sorts of waistlines. They contain numerous pockets and containers; it's not unusual to see a merc offering someone a needed pickmeup.
	<<case "Knights of the Blood">>
		Their gear is adorned with the badges and ensigns of racialist societies, and posters from the same sources are visible on the walls.
	<<case "Knights of the Purge">>
		Their prototype armor is equipped with the latest weapons.
	<<case "Wardens">>
		Their gear is designed to take their foes alive and relatively unharmed, though lethal force can be applied if need be.
	<<case "Purifiers">>
		Their prototype armor is equipped with a cleansing flamethrower. In addition to striking fear into their foes it also cooks a mean stake.
	<<case "Abstemious">>
		Their sleek prototype armor is equipped with advanced restraining weapons.
	<<case "Rangers">>
		Their gear has a heavy Western influence; everyone carries heavy revolvers everywhere, and the armor sports rope lariats for lassoing 'cattle.'
	<</switch>>
<</if>>
There are doors to magazines, armories, and training areas to all sides, and muffled gunfire can be heard from the latter.

You head up a deck, to the staff area, and up one more, to look into the living area. It's comfortable and very well-kept, since they have a large number of slaves here to look after them. Relaxing mercenaries are scattered around the common areas, and most are enjoying a slave or two.
<<if $FSAnnounced>>
	They're obviously adopting the customs of $arcologies[0].name.
	<<set _vignette = 0>>
	<<if $arcologies[0].FSSubjugationist != "unset">>
		A mercenary is fingering a $arcologies[0].FSSubjugationistRace girl's <<if $seeDicks != 100>>pussy<<else>>anus<</if>>. She's wincing a little; she must be new here.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSSupremacist != "unset">>
		<<if _vignette>>Another<<else>>A<</if>> mercenary, a woman, is being seen to by a multicultural bunch of subhumans of different races. She has one eating her out while two more are rubbing her feet.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSGenderRadicalist != "unset">>
		<<if _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary, who's rather obviously earned enough money to pay for the surgeries and drugs to turn herself into an imposing futanari, is pounding a dickgirl slave.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSGenderFundamentalist != "unset">>
		<<if _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is fucking a slave
			<<if $arcologies[0].FSRestart != "unset">>
				lotus style. His hands are greedily following her womanly curves as they bang.
			<<else>>
				doggy style. He's massaging her rounded belly as she enjoys her first foray into motherhood.
			<</if>>
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSPaternalist != "unset">>
		<<if _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is making out with a pretty slave. An old romantic movie is playing on a wallscreen in front of them, forgotten.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSDegradationist != "unset">>
		<<if _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is using a slave as a footrest as he relaxes. She has a huge dildo up her ass, and whenever she moves, he uses a foot to shove it farther inside her.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSBodyPurist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is idly playing with a slave's natural breasts as he watches a wallscreen. He's being gentle and she doesn't seem to mind.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSTransformationFetishist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is fucking a bimbo slave doggy style. Her fake tits are so huge that the motion is making them slap together under her.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSYouthPreferentialist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is getting a blowjob from a young slave. He's playing with her <<if $seeDicks != 100>>fresh pussy<<else>>tight little anus<</if>> as she sucks his dick.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSMaturityPreferentialist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is getting a massage from a mature slave. She's wearing a towel, but he sneaks a hand back and steals it, freeing her heavy breasts.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSSlimnessEnthusiast != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is getting a lap dance from a lithe slave. She's moving her cute butt lower and lower, getting ready to impale herself on his raging erection.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSAssetExpansionist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is almost hidden by a slave he's got in his lap. He has his head buried between her monstrous breasts, and it's not clear how he's breathing.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSPastoralist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is drinking a slave's milk, straight from the nipple, while idly massaging her other breast, bringing out a thin stream of milk.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSPhysicalIdealist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is doing pushups with a well-endowed slave sitting on his back to add weight. She's counting his reps for him.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSHedonisticDecadence != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is doing squats with a rather portly slave sitting on his shoulders to add weight. She pops a cookie into his mouth with each completed set.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSChattelReligionist != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is mounting a praying slave from behind. It doesn't distract her; her quiet devotions become more fervent as he fucks her.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSRepopulationFocus != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is being ridden by an enormously pregnant slave. He's massaging her taut belly as she uses her hands to support her sore boobs.
		<<set _vignette++>>
	<<elseif $arcologies[0].FSRestart != "unset">>
		<<if _vignette >= $FSCreditCount>>Finally, a<<elseif _vignette >= 3>>Yet another<<elseif _vignette >= 2>>A third<<elseif _vignette>>Another<<else>>A<</if>> mercenary is being serviced by a slave with a visibly smooth crotch. He has a dildo rammed in her ass and moves it along with her sucking.
		<<set _vignette++>>
	<</if>>
	<<if $arcologies[0].FSRomanRevivalist != "unset">>
	<<elseif $arcologies[0].FSAztecRevivalist != "unset">>
	<<elseif $arcologies[0].FSEgyptianRevivalist != "unset">>
	<<elseif $arcologies[0].FSEdoRevivalist != "unset">>
	<<elseif $arcologies[0].FSArabianRevivalist != "unset">>
	<<elseif $arcologies[0].FSChineseRevivalist != "unset">>
	<</if>>
<</if>>

<<if $mercenariesHelpCorp > 0>>

	As you leave, a squad moves thunderously into the bay, fresh from a slave raid on behalf of your corporation. Most of their captures have been dropped off with the corporate receivers, but they've been given a pretty girl who isn't a good training prospect for the corporate brand, a common reward. The squad looks after their weapons and armor first, an inviolable rule, and as they do, they leave their naked slave standing in the middle of the bay, ignored. She isn't even bound, but she's standing nude and alone amongst modern mercenaries, so she knows that resistance is futile. So she does the only thing left available to her, try to cover herself with her hands and cry.
<</if>>

<<link "Decommission the armory and return this sector to manufacturing">>
	<<set $barracks = 0>>
	<<for _i = 0; _i < $sectors.length; _i++>>
		<<if $sectors[_i].type == "Barracks">><<set $sectors[_i].type = "Manufacturing">><<break>><</if>>
	<</for>>
	<<goto "Main">>
<</link>>


code:
:: BG Select [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $showEncyclopedia = 1, $encyclopedia = "Bodyguard">>
<<showallAssignmentFilter>>
<<if ($Bodyguard != 0)>>
	<<setLocalPronouns $Bodyguard>>
	''__@@.pink;<<= SlaveFullName($Bodyguard)>>@@__'' is serving as your bodyguard.

$He will remain close to you at all times and guard your person.
<<else>>
	You have not selected a bodyguard.
<</if>>

''Appoint a bodyguard from your devoted slaves:''

[[None|Bodyguard Workaround][$i = -1]]

<<assignmentFilter>>

	<<showallAssignmentFilter>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>


code:
:: Body Modification [nobr]

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

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

Body Modification Studio

<<= 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>>

		<<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>>

<<SlaveArt $activeSlave 3 0>>

<<else>>

<<SlaveArt $activeSlave 3 0>>

<</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 */

Piercings:

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

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

<<chastityPiercingDescription>>

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

/* Apply piercings */

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>>

//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>>

''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>>

		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>>

		$He already has a smart piercing!
	<</if>>
<</if>>
<</if>>

<<if $piercingLevel == 0>>

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>>

/* TATTOOS */

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

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>>

	<<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>>

<<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>>

		[[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>>

Custom Tats:

    //Use complete sentences, make a description of it//

<<if $activeSlave.lipsTat == 0>>

	Give $him a custom face tattoo: <<textbox "$activeSlave.lipsTat" $activeSlave.lipsTat "Slave Interact">>
<</if>>

<<if $activeSlave.shouldersTat == 0>>

	Give $him a custom shoulder tattoo: <<textbox "$activeSlave.shouldersTat" $activeSlave.shouldersTat "Slave Interact">>
<</if>>

<<if $activeSlave.armsTat == 0 && $activeSlave.amp != 1>>

	Give $him a custom arm tattoo: <<textbox "$activeSlave.armsTat" $activeSlave.armsTat "Slave Interact">>
<</if>>

<<if $activeSlave.boobsTat == 0>>

	Give $him a custom tit tattoo: <<textbox "$activeSlave.boobsTat" $activeSlave.boobsTat "Slave Interact">>
<</if>>

<<if $activeSlave.backTat == 0>>

	Give $him a custom back tattoo: <<textbox "$activeSlave.backTat" $activeSlave.backTat "Slave Interact">>
<</if>>

<<if $activeSlave.stampTat == 0>>

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

<<if $activeSlave.buttTat == 0>>

	Give $him a custom butt tattoo (lower back tattoo): <<textbox "$activeSlave.buttTat" $activeSlave.buttTat "Slave Interact">>
<</if>>

<<if $activeSlave.dickTat == 0 && $activeSlave.dick != 0>>

	Give $him a custom dick tattoo: <<textbox "$activeSlave.dickTat" $activeSlave.dickTat "Slave Interact">>
<</if>>

<<if $activeSlave.vaginaTat == 0>>

	Give $him a custom pubic tattoo: <<textbox "$activeSlave.vaginaTat" $activeSlave.vaginaTat "Slave Interact">>
<</if>>

<<if $activeSlave.anusTat == 0>>

	Give $him a custom anus tattoo (lower back tattoo): <<textbox "$activeSlave.anusTat" $activeSlave.anusTat "Slave Interact">>
<</if>>

<<if $activeSlave.legsTat == 0 && $activeSlave.amp != 1>>

	Give $him a custom leg tattoo: <<textbox "$activeSlave.legsTat" $activeSlave.legsTat "Slave Interact">>
<</if>>

<<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>>

/* 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>>

Use ''$brandDesign'' or choose another brand:
[[Your slaving emblem|Body Modification][$brandDesign = "your personal symbol"]]
| [[Your initials|Body Modification][$brandDesign = "your initials"]]

[[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"]]

[[Pussy symbol|Body Modification][$brandDesign = "a pussy symbol"]]
| [[Anus symbol|Body Modification][$brandDesign = "an anus symbol"]]
| [[Penis symbol|Body Modification][$brandDesign = "a penis symbol"]]

[[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>>

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

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 */

<<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>>

	$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>>


code:
:: Body Modification Degradation

<<if ($degradation == 0)>>
	<<goto "Slave Interact">>
<<elseif $degradation > 0 && $activeSlave.fetish != "mindbroken" && $activeSlave.fuckdoll == 0>>
	<<goto "Body Modification Reaction">>
<</if>>


code:
:: Body Modification Reaction [nobr]

<<set $nextButton = "Continue", $nextLink = "Slave Interact">>

As you cast off $his bindings<<if canSee($activeSlave)>> and <<if ($activeSlave.amp != 1)>>let $him stand<<else>>prop $him up<</if>>, $he catches sight of $himself in the floor length mirror at the foot of the body modification table<<else>>, and <<if ($activeSlave.amp != 1)>>let $him stand<<else>>prop $him up<</if>>, you vividly describe $his new appearance. $His mind hangs on every word that leaves your mouth<</if>>.

<<if ($brandApplied == 1)>>
	The smell of burnt flesh hangs in the air. Being branded @@.red;has hurt $his health a little.@@
	<<set $brandApplied = 0>>
	<<set $activeSlave.health -= 10>>
<</if>>
<<if $activeSlave.fetish != "mindbroken" && $activeSlave.fuckdoll == 0>>
<<if ($degradation > 10) && ($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 ($degradation > 10) && ($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>>
	<<set $activeSlave.trust -= 10>>
<<elseif ($degradation > 10)>>
	$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>>
<<elseif ($degradation > 4) && ($activeSlave.devotion <= 20) && ($activeSlave.trust < -20)>>
	$He is so afraid of you that $he suppresses any reaction to the slutty modifications you have made to $his body and @@.gold;fears@@ your power to do whatever you like to $him.
	<<set $activeSlave.trust -= 5>>
<<elseif ($degradation > 4)>>
	$He is surprised with the slutty modifications you have made to $his body. However, $he is so obedient that $he @@.hotpink;accepts@@ your changes.
	<<set $activeSlave.devotion += 4>>
<<elseif ($degradation > 1) && ($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 ($degradation > 1) && ($activeSlave.devotion < -20)>>
	$He is @@.mediumorchid;angry@@ and @@.gold;afraid@@ that $he has been permanently altered against $his will.
	<<set $activeSlave.devotion -= 5>>
	<<set $activeSlave.trust -= 5>>
<<elseif ($degradation > 1)>>
	$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>>
<<else>>
	$He shows no real reaction to your modifications.
<</if>>
<</if>>
<<set $degradation = 0>>


code:
:: Bodyguard Workaround [silently]

<<if $Bodyguard != 0>>
	<<= removeJob($Bodyguard, "guard you")>>
<</if>>
<<if $i > -1>>
	<<= assignJob($slaves[$i], "guard you")>>
	<<set $Bodyguard = $slaves[$i]>>
<</if>>

<<goto "Main">>


code:
:: Brothel [nobr]

<<set $nextButton = "Back to Main", $nextLink = "Main", $returnTo = "Brothel", $showEncyclopedia = 1, $encyclopedia = "Brothel", $brothelSlaves = $BrothiIDs.length, $Flag = 0>>

<<if $brothelName != "the Brothel">>
	<<set $brothelNameCaps = $brothelName.replace("the ", "The ")>>
<</if>>
<<brothelAssignmentFilter>>
$brothelNameCaps
<<switch $brothelDecoration>>
<<case "Roman Revivalist">>
	is decorated as a Roman whorehouse. Refreshments are served at a bar, and someone is playing pipes in the back.
<<case "Aztec Revivalist">>
	is decorated as an Aztec ode to fertility and nature. Clients may sacrifice a bit of blood to honor the goddess of Filth or to partake in a fertility ritual before joining the girl of their choosing.
<<case "Egyptian Revivalist">>
	is decorated as an ancient Egyptian fertility temple. Customers are bade relax on couches next to running water so that slaves may dance to entice them.
<<case "Edo Revivalist">>
	is furnished as an Edo period pleasure house, seedy by the standards of the time. Still, girls usually keep their clothes on until they lead patrons back behind the sliding paper screens, though this does not stop silhouettes of the activities within from being visible on them.
<<case "Arabian Revivalist">>
	is furnished as an Arabian fleshmarket, with the merchandise standing on little platforms, prices visible. Customers are permitted to fondle before making a decision and dragging a girl back behind a curtain.
<<case "Chinese Revivalist">>
	is furnished as an old Chinese pleasure house, with each girl set up in her own low room. They stand outside the doors, luring customers back one by one.
<<case "Chattel Religionist">>
	is decorated as a place of carnal worship. The air is scented by censers, and the slaves here maintain an air of holiness even when being sodomized in public.
<<case "Degradationist">>
	is decorated to look like a dungeon. The decor involves a lot of black leather and burnished steel, and the slaves on offer are mostly chained to beds and walls.
<<case "Repopulation Focus">>
	is clean and full of soft couches and chairs for its' pregnant whores to lounge upon while showing off their assets. Several of the rooms are prepped to allow a whore to give birth in front of an audience. A supply of freshly squeezed breast milk is available on tap.
<<case "Eugenics">>
	is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping and poledancing on a stage. Safe sex is greatly encouraged. The real action happens in several reserved rooms dedicated to society's best, since the loud music drowns out private conversations.
<<case "Asset Expansionist">>
	is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping and poledancing on a stage.
<<case "Transformation Fetishist">>
	is sterile and clean. Interactive screens on the walls list the whores and their modifications in clinical detail.
<<case "Gender Radicalist">>
	is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting every possible combination of human sexual congress.
<<case "Gender Fundamentalist">>
	is decorated to look like an old world whorehouse. Screens on the walls are showing pornography starring the whores, with prices flashing after each sex act.
<<case "Physical Idealist">>
	is decorated to look like a club. Loud music is playing, and the whores that aren't with customers are stripping on a stage. There is a distinct smell of sweat, and there is as much emphasis on the strippers' muscles as their breasts.
<<case "Supremacist">>
	is decorated like an old world gentleman's club. The pictures on the wall depict degradation of every race on earth, except $arcologies[0].FSSupremacistRace people.
<<case "Subjugationist">>
	is decorated to celebrate the degradation of $arcologies[0].FSSubjugationistRace whores. The whores greet customers in stereotypical $arcologies[0].FSSubjugationistRace accents.
<<case "Paternalist">>
	is decorated to look like a trendy bar. Whores are encouraged to meet customers for a drink and get to know them a little before heading back into a private room.
<<case "Pastoralist">>
	is decorated to look like a dairy. Though it isn't one, there is an intense sexual focus on boobs and lactation, and all the whores have their sizes and productivity proudly posted.
<<case "Maturity Preferentialist">>
	is decorated to look like a refined bar. It has a row of sturdy backless barstools, perfect for a delectable selection of succulent MILFs to perch on.
<<case "Youth Preferentialist">>
	is decorated to look like the sort of bar old world students visit on spring break. Vapid music is playing, and when whores aren't with customers, they dance and make out with each other to attract some.
<<case "Body Purist">>
	is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting idealized human forms in the act of love.
<<case "Slimness Enthusiast">>
	is decorated to look like an old world bordello. The rich decor includes erotic photography and pornographic statuary, depicting slim, girlish figures playing, dancing, and loving.
<<case "Hedonistic">>
	is comfortable and full of soft couches and chairs for its' overweight whores to lounge upon between clients <<if $arcologies[0].FSHedonisticDecadenceResearch == 1>>and enjoy a plate of snacks<<else>>and enjoy a big cup of slave food<</if>>. The smells of fresh baked goods are pumped into the facility to mask the smell of sweat. It's not unusual for a client to fuck a whore right on her chosen couch, since the effort of moving is often too much.
<<default>>
	is utilitarian. There's a businesslike foyer with an area for the merchandise to stand. Customers make their selection (or selections) and then lead the whores back into little rooms.
<</switch>>

<<if $brothelAdsSpending > 0>>
	Screens outside the entrance are showing porn to advertise $brothelNameCaps.
	<<if $brothelAdsOld == 1>>
		The featured slave actresses are all MILFs.
	<<elseif $brothelAdsOld == -1>>
		The featured slave actresses are all nice and young.
	<<elseif $brothelAdsOld == -2>>
		The featured slave actresses are all teenagers.
	<<elseif $brothelAdsOld == -3>>
		The featured slave actresses are all lolis.
	<<else>>
		The featured slave actresses vary in age.
	<</if>>
	<<if $brothelAdsStacked == 1>>
		Lots of bouncing breasts and butts
	<<elseif $brothelAdsStacked == -1>>
		Lots of trim breasts and shapely butts
	<<else>>
		A variety of breast and butt sizes and shapes
	<</if>>
	are on display, and
	<<if $brothelAdsImplanted == 1>>
		most of these are augmented by implants.
	<<elseif $brothelAdsImplanted == -1>>
		they're all natural.
	<<else>>
		some are augmented by implants.
	<</if>>
	<<if $brothelAdsPreg == 1>>
		Most of slaves have firm, rounded bellies.
	<<elseif $brothelAdsPreg == -1>>
		Most of the slaves have firm, flat bellies.
	<<else>>
		Some of the slaves are pregnant.
	<</if>>
	<<if $brothelAdsModded == 1>>
		Everything is heavily pierced and tattooed.
	<<elseif $brothelAdsModded == -1>>
		Everything is free of tattoos and piercings.
	<<else>>
		Some of these assets are tattooed and pierced, and some aren't.
	<</if>>
	The slaves in the ads are
	<<if $brothelAdsXX == 1>>
		sucking dick and taking cock in their pussies and asses.
	<<elseif $brothelAdsXX == -1>>
		sucking cock and being assfucked while their dicks flop around.
	<<else>>
		sucking dick and taking anal, and the ones that have pussies are being fucked there, too.
	<</if>>
	The ads are shown on media across $arcologies[0].name.
	<<if ($brothelAdsXX == 1) && ($brothelAdsImplanted == 1) && ($brothelAdsStacked == 1)>>
		As a result, $brothelName is known as the place to go if you want to rent a<<if ($brothelAdsPreg == 1)>>pregnant<</if>> bimbo's pussy.
	<<elseif ($brothelAdsXX == 1) && ($brothelAdsOld == 1)>>
		As a result, $brothelName is known as the place to go if you want to rent a<<if ($brothelAdsPreg == 1)>>pregnant<</if>> MILF's tits.
	<<elseif ($brothelAdsXX == 1) && ($brothelAdsOld == -3)>>
		As a result, $brothelName is known as the place to go if you want to rent<<if $brothelAdsPreg == 1>> a pregnant<</if>><<if $brothelAdsStacked == 1>><<if $brothelAdsPreg != 1>> an<</if>> oppai<</if>> loli.
	<<elseif ($brothelAdsXX == 1) && ($brothelAdsPreg == 1)>>
		As a result, $brothelName is known as the place to go if you want to pound some pregnant pussy.
	<<elseif ($brothelAdsXX == -1) && ($brothelAdsStacked == 1)>>
		As a result, $brothelName is known as the place to go if you want to rent a shemale's asspussy.
	<<elseif ($brothelAdsXX == -1) && ($brothelAdsStacked == -1)>>
		As a result, $brothelName is known as the place to go if you want to rent a trap's tight ass.
	<</if>>
<</if>>

<<if $brothelSlaves > 2>>
	$brothelNameCaps is bustling with activity. Customers are coming and going and slave girls are displaying themselves. When a slave catches a customer's eye, he leads her back into a little cubicle.
<<elseif $brothelSlaves > 0>>
	$brothelNameCaps is working steadily. Customers are present and slave girls are on offer. When a slave catches a customer's eye, he leads her back into a little cubicle.
<<elseif $Madam != 0>>
	$Madam.slaveName is alone in $brothelName, and has nothing to do but keep the place clean and plan future sales efforts.
<<else>>
	$brothelNameCaps is empty and desolate.
	<<link "Decommission the brothel" "Main">>
		<<set $brothel = 0, $brothelUpgradeDrugs = 0, $brothelDecoration = "standard", $brothelAdsSpending = 0>>
		<<set _broth = $sectors.findIndex(function(s) { return s.type == "Brothel"; })>>
		<<if _broth != -1>>
			<<set $sectors[_broth].type = "Shops">>
		<</if>>
	<</link>>
<</if>>

<<if $brothelSlaves > 0>>
	<<if $Madam != 0>><<set _X = 1>><<else>><<set _X = 0>><</if>>
	<<set _NewPop = $brothelSlaves+$dormitoryPopulation+_X>>
	<<link "Remove all slaves" "Brothel">>
		<<if $Madam != 0>>
			<<= assignJob($Madam, "rest")>>
		<</if>>
		<<for $brothelSlaves > 0>>
			<<= assignJob($slaves[$slaveIndices[$BrothiIDs[0]]], "whore")>>
		<</for>>
	<</link>>
	<<if _NewPop > $dormitory>>
		@@.red;Dormitory capacity will be exceeded.@@
	<</if>>
<</if>>

<<set _Tmult0 = Math.trunc($brothel*1000*$upgradeMultiplierArcology)>>

It can support $brothel whores. Currently there <<if $brothelSlaves == 1>>is<<else>>are<</if>> $brothelSlaves whore<<if $brothelSlaves != 1>>s<</if>> at $brothelNameCaps.
[[Expand the brothel|Brothel][$cash -= _Tmult0, $brothel += 5, $PC.engineering += .1]] //Costs <<print cashFormat(_Tmult0)>> and will increase upkeep costs//

<<if $Madam != 0>>

	<<if $MadamIgnoresFlaws != 1>>
		$Madam.slaveName will attempt to fix flaws in whores serving under her. [[Ignore flaws|Brothel][$MadamIgnoresFlaws = 1]]
	<<else>>
		$Madam.slaveName has been instructed to ignore flaws in the whores serving under her. [[Fix flaws|Brothel][$MadamIgnoresFlaws = 0]]
	<</if>>
<</if>>

<<if $brothelUpgradeDrugs == 1>>
	It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently applying a moderate dosage of aphrodisiac. [[Increase the aphrodisiac dosage|Brothel][$brothelUpgradeDrugs = 2]] | [[Disable the aphrodisiac injection systems|Brothel][$brothelUpgradeDrugs = 0.1]] //Will reduce upkeep costs if disabled, and raise them if increased//
<<elseif $brothelUpgradeDrugs == 2>>
	It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently applying an extreme dosage of aphrodisiac. [[Decrease the aphrodisiac dosage|Brothel][$brothelUpgradeDrugs = 1]] | [[Disable the aphrodisiac injection systems|Brothel][$brothelUpgradeDrugs = 0.1]] //Will reduce upkeep costs//
<<elseif $brothelUpgradeDrugs == 0.1>>
	It has been upgraded with aphrodisiac injection systems that monitor the whores and adjust dosage to keep them healthy but desperately horny and hopelessly addicted. The systems are currently disabled. [[Enable them|Brothel][$brothelUpgradeDrugs = 1]] //Will increase upkeep costs//
<<else>>
	<<set _Tmult1 = Math.trunc(10000*$upgradeMultiplierArcology)>>
	It is a standard brothel. [[Upgrade the brothel with aphrodisiac injection systems|Brothel][$cash -= _Tmult1, $brothelUpgradeDrugs = 0.1]] //Costs <<print cashFormat(_Tmult1)>> and will increase upkeep costs//
<</if>>

$brothelNameCaps is
<<if $brothelAdsSpending > 0>>
	the subject of an active ad campaign.
<<else>>
	not being advertised.
<</if>>
<<link "Manage brothel advertisements" "Brothel Advertisement">><<set $nextLink = passage(), $nextButton = "Back">><</link>>

<<BrothelStatistics 1>>

<<if $Madam != 0>>
	<<set $Flag = 2>>
	<<include "Slave Summary">>
<<else>>
	You do not have a slave serving as a Madam. [[Appoint one|Madam Select]]
<</if>>

<<if ($brothel <= $brothelSlaves)>>
	''$brothelNameCaps is full and cannot hold any more slaves''
<<elseif ($slaves.length > $brothelSlaves)>>
	<<link "''Send a slave to $brothelName''">>
		<<replace #ComingGoing>>
			<<resetAssignmentFilter>>
			<<set $Flag = 0>>
			<<include "Slave Summary">>
		<</replace>>
	<</link>>
<</if>>

<<if $brothelSlaves > 0>>
	| <<link "''Bring a slave out of $brothelName''">>
		<<replace #ComingGoing>>
			<<brothelAssignmentFilter>>
			<<set $Flag = 1>>
			<<include "Slave Summary">>
			<<resetAssignmentFilter>>
		<</replace>>
	<</link>>
<<else>>

//$brothelNameCaps is empty for the moment.
//
<</if>>

<<assignmentFilter >>

	<<brothelAssignmentFilter>>
	<<set $Flag = 1>>
	<<include "Slave Summary">>
	<<resetAssignmentFilter>>

Rename $brothelName: <<textbox "$brothelName" $brothelName "Brothel">> //Use a noun or similar short phrase//