code:
:: Widgets Industrial Drain [widget]

<<widget "industrialdrain">><<nobr>>
	<<link [[Industrial Drain System (0:05)|Industrial Drain]]>><<pass 5>><</link>>
<</nobr>><</widget>>

<<widget "industrialdrainquick">><<nobr>>
	<<link [[Industrial Drain System|Industrial Drain]]>><</link>>
<</nobr>><</widget>>

<<widget "industrialdraineventend">><<nobr>>
	<<link [[Next|Industrial Drain]]>><<set $eventskip to 1>><</link>>
<</nobr>><</widget>>

:: Widgets Commercial Drain [widget]

<<widget "commercialdrain">><<nobr>>
	<<link [[Commercial Drain System (0:05)|Commercial Drain]]>><<pass 5>><</link>>
<</nobr>><</widget>>

<<widget "commercialdrainquick">><<nobr>>
	<<link [[Commercial Drain System|Commercial Drain]]>><</link>>
<</nobr>><</widget>>

<<widget "commercialdraineventend">><<nobr>>
	<<link [[Next|Commercial Drain]]>><<set $eventskip to 1>><</link>>
<</nobr>><</widget>>

:: Widgets Residential Drain [widget]

<<widget "residentialdrain">><<nobr>>
	<<link [[Residential Drain System (0:05)|Residential Drain]]>><<pass 5>><</link>>
<</nobr>><</widget>>

<<widget "residentialdrainquick">><<nobr>>
	<<link [[Residential Drain System|Residential Drain]]>><</link>>
<</nobr>><</widget>>

<<widget "residentialdraineventend">><<nobr>>
	<<link [[Next|Residential Drain]]>><<set $eventskip to 1>><</link>>
<</nobr>><</widget>>

:: Widgets Passout Drain [widget]

<<widget "passoutdrain">>
	[[Everything fades to black...->Passout Drain]]
<</widget>>

:: Widgets Storm Drain Entrance [widget]

<<widget "stormdrain">><<nobr>>
	<<add_link "<<sewericon>><<link [[Manhole (0:05)|Storm Drain Entrance]]>><<pass 5>><</link>>
">><<hideDisplay>>
<</nobr>><</widget>>

:: Widgets Drain Exit [widget]

<<widget "drainexit">><<nobr>>
	<<link [[Drain ocean exit (0:05)|Drain Exit]]>><<pass 5>><</link>>
<</nobr>><</widget>>

<<widget "drainexitquick">><<nobr>>
	<<link [[Drain ocean exit|Drain Exit]]>><</link>>
<</nobr>><</widget>>

<<widget "drainexiteventend">><<nobr>>
	<<link [[Next|Drain Exit]]>><<set $eventskip to 1>><</link>>
<</nobr>><</widget>>

:: Widgets Events Drain [widget]

<<widget "eventsdrain">><<nobr>>
	<<set $rng to random(1, 100)>>
	<<if $rng gte 80 and $hallucinations gte 2 and $tentacledisable is "f">>
		Several tentacles rise from the water, blocking your path and trapping you on the walkway.

		<<link [[Next|Drain Tentacles]]>><<set $molestationstart to 1>><</link>>

	<<elseif $rng gte 30>>
		A torrent of water rushes through a pipe to your right, colliding with you and knocking you into the canal!

		<<set $worn.upper.integrity -= 10>><<set $worn.lower.integrity -= 10>><<set $worn.under_lower.integrity -= 10>><<set $pain += 5>>
		<<link [[Next|Drain Water]]>><</link>>
	<<else>>
		A torrent of water rushes through a pipe to your right, colliding with you and knocking you into the canal!

		<<set $worn.upper.integrity -= 10>><<set $worn.lower.integrity -= 10>><<set $worn.under_lower.integrity -= 10>><<set $pain += 5>>
		You are sucked to the drain floor, and through a gap in the concrete. You are pulled deeper through the dark until you emerge in a dim light. The water leaves you sprawled on the stone floor.

		<<sewersstart>>
		<<if $sewersintro is 1>>
			<<if $bus is "residentialdrain">>
				<<link [[Climb down|Sewers Residential]]>><</link>>

			<<elseif $bus is "commercialdrain">>
				<<link [[Climb down|Sewers Commercial]]>><</link>>

			<<else>>
				<<link [[Climb down|Sewers Industrial]]>><</link>>

			<</if>>
		<<else>>
			<<link [[Next|Sewers Intro]]>><</link>>

		<</if>>
	<</if>>
<</nobr>><</widget>>

:: Widgets Sewers [widget]

<<widget "sewerssleep">><<nobr>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
	<<sewerssleephour>>
<</nobr>><</widget>>

<<widget "sewerssleephour">><<nobr>>
	<<if $hour lte 7>>
		<<pass 60>><<tiredness -12>><<effectstime>>
	<</if>>
<</nobr>><</widget>>

<<widget "sewerscountdown">><<nobr>>
	<<link [[Press 1|Sewers Ticking Number]]>><<set $sewerswatchattempt to 1>><</link>>

	<<link [[Press 2|Sewers Ticking Number]]>><<set $sewerswatchattempt to 2>><</link>>

	<<link [[Press 3|Sewers Ticking Number]]>><<set $sewerswatchattempt to 3>><</link>>

	<<link [[Press 4|Sewers Ticking Number]]>><<set $sewerswatchattempt to 4>><</link>>

	<<link [[Press 5|Sewers Ticking Number]]>><<set $sewerswatchattempt to 5>><</link>>

	<<link [[Press 6|Sewers Ticking Number]]>><<set $sewerswatchattempt to 6>><</link>>

	<<link [[Press 7|Sewers Ticking Number]]>><<set $sewerswatchattempt to 7>><</link>>

	<<link [[Press 8|Sewers Ticking Number]]>><<set $sewerswatchattempt to 8>><</link>>

	<<link [[Press 9|Sewers Ticking Number]]>><<set $sewerswatchattempt to 9>><</link>>

	<<link [[Press 0|Sewers Ticking Number]]>><<set $sewerswatchattempt to 0>><</link>>

	<<link [[Run (0:01)|Sewers Ticking Run]]>><<pass 1>><</link>>

<</nobr>><</widget>>

<<widget "sewerspassout">><<nobr>>
	<<sewersend>>
	<<link [[Next|Drain Water Passout]]>><</link>>

<</nobr>><</widget>>

<<widget "morgancaught">><<nobr>>
	<<set $sewerschased to 0>>
	<<npc Morgan>><<person1>>Morgan lurches from the darkness, smiling in anger. "<<charles>> my sweet," <<he>> says. "Come home with <<if $pronoun is "m">>daddy<<else>>mummy<</if>>."
	<<morganoptions>>
<</nobr>><</widget>>

<<widget "morganoptions">><<nobr>>
	<<if !$worn.lower.type.includes("naked")>>
		<<He>> grasps your $worn.lower.name.
	<<elseif !$worn.upper.type.includes("naked")>>
		<<He>> grasps your $worn.upper.name.
	<<elseif !$worn.under_lower.type.includes("naked")>>
		<<He>> grasps your $worn.under_lower.name.
	<<else>>
		<<He>> grasps your arm.
	<</if>>

	<<link [[Go quietly|Sewers Return]]>><</link>>

	<<if !$worn.lower.type.includes("naked")>>
		<<link [[Struggle free|Sewers Lower Struggle]]>><</link>>

	<<elseif !$worn.upper.type.includes("naked")>>
		<<link [[Struggle free|Sewers Upper Struggle]]>><</link>>

	<<elseif !$worn.under_lower.type.includes("naked") and !$worn.under_lower.type.includes("chastity")>>
		<<link [[Struggle free|Sewers Under Struggle]]>><</link>>

	<</if>>
	<<link [[Fight|Sewers Fight]]>><<set $fightstart to 1>><</link>>

<</nobr>><</widget>>

<<widget "morgantext">><<nobr>>
	<<if $morgantext is 0>>
		<<set $morgantext += 1>>
		"I'm sorry for hurting you, beloved."
	<<elseif $morgantext is 1>>
		<<set $morgantext += 1>>
		"I promise I'll be gentle this time."
	<<elseif $morgantext is 2>>
		<<set $morgantext += 1>>
		"I have a present for you."
	<<elseif $morgantext is 3>>
		<<set $morgantext += 1>>
		"Where are you? I can smell you."
	<<elseif $morgantext is 4>>
		<<set $morgantext += 1>>
		"Don't hide from me."
	<<elseif $morgantext is 5>>
		<<set $morgantext += 1>>
		"I know you can hear me <<charlesstop>> Come here."
	<<elseif $morgantext is 6>>
		<<set $morgantext += 1>>
		"I have sweets for you."
	<<else>>
		<<set $morgantext to 0>>
		"Darling, please come home."
	<</if>>
<</nobr>><</widget>>

<<widget "morganhunt">><<nobr>>
	<<if $sewerschasedstep is 3>>
		Morgan is getting closer.<<morgantext>>
	<<elseif $sewerschasedstep is 2>>
		Morgan is getting closer.<<morgantext>>
	<<elseif $sewerschasedstep is 1>>
		Morgan is close.<<morgantext>>
	<<else>>
	<</if>>
	<<set $sewerschasedstep -= 1>>
<</nobr>><</widget>>

<<widget "sewersend">><<nobr>>
	<<set $sewerschasedstep to 0>>
	<<set $sewerschased to 0>>
	<<endevent>>
<</nobr>><</widget>>

<<widget "sewersstart">><<nobr>>
	<<set $sewersevent to random(2, 5)>>
<</nobr>><</widget>>

<<widget "destinationsewers">><<nobr>>
	<<switch $bus>>
	<<case "sewersresidential">>
		<<link [[Next|Sewers Residential]]>><</link>>
	<<case "sewerscommercial">>
		<<link [[Next|Sewers Commercial]]>><</link>>
	<<case "sewersindustrial">>
		<<link [[Next|Sewers Industrial]]>><</link>>
	<<case "sewersalgae">>
		<<link [[Next|Sewers Algae]]>><</link>>
	<<case "sewersworkshop">>
		<<link [[Next|Sewers Workshop]]>><</link>>
	<<case "sewerswood">>
		<<link [[Next|Sewers Wood]]>><</link>>
	<<case "sewerswebs">>
		<<link [[Next|Sewers Webs]]>><</link>>
	<<case "sewersruins">>
		<<link [[Next|Sewers Ruins]]>><</link>>
	<<case "sewersshrooms">>
		<<link [[Next|Sewers Shrooms]]>><</link>>
	<<case "sewersrubble">>
		<<link [[Next|Sewers Rubble]]>><</link>>
	<<case "sewershole">>
		<<link [[Next|Sewers Hole]]>><</link>>
	<<case "sewersscrap">>
		<<link [[Next|Sewers Scrap]]>><</link>>
	<<case "sewersmud">>
		<<link [[Next|Sewers Mud]]>><</link>>
	<<case "sewerswaterfall">>
		<<link [[Next|Sewers Waterfall]]>><</link>>
	<<case "sewerslake">>
		<<link [[Next|Sewers Lake]]>><</link>>
	<</switch>>

<</nobr>><</widget>>

<<widget "destinationsewersrandom">><<nobr>>
	<<set $rng to random(1, 100)>>
	<<if $rng gte 90>>
		<<link [[Next|Sewers Wood]]>><</link>>

	<<elseif $rng gte 80>>
		<<link [[Next|Sewers Webs]]>><</link>>

	<<elseif $rng gte 70>>
		<<link [[Next|Sewers Algae]]>><</link>>

	<<elseif $rng gte 60>>
		<<link [[Next|Sewers Rubble]]>><</link>>

	<<elseif $rng gte 50>>
		<<link [[Next|Sewers Waterfall]]>><</link>>

	<<elseif $rng gte 40>>
		<<link [[Next|Sewers Hole]]>><</link>>

	<<elseif $rng gte 30>>
		<<link [[Next|Sewers Lake]]>><</link>>

	<<elseif $rng gte 20>>
		<<link [[Next|Sewers Ruins]]>><</link>>

	<<elseif $rng gte 10>>
		<<link [[Next|Sewers Shrooms]]>><</link>>

	<<else>>
		<<link [[Next|Sewers Mud]]>><</link>>

	<</if>>
<</nobr>><</widget>>

<<widget "eventssewers">><<nobr>>
	<<set $sewersevent to random(5, 12)>>
	<<set $rng to random(1, 100)>>
	<<if $bestialitydisable is "f" and $rng gte 81>>
		An enormous lizard stalks out of the darkness in front of you, its mouth wide open.

		<<if $deviancy gte 35 and $voredisable is "f">>
			<<link [[Give it a taste|Sewers Lizard Vore]]>><</link>><<deviant3>>

		<</if>>
		<<link [[Fight|Sewers Lizard Rape]]>><<set $molestationstart to 1>><</link>>

	<<elseif $rng gte 71>>
		You hear a click as your feet sink into the ground. A metal shackle clamps round your ankle. The sound echoes down the tunnel. A chain ties it to the ground.
		<<gstress>><<stress 6>>

		<<set $sewerschased to 1>>
		<<set $sewerschasedstep to 3>>
		Morgan's voice echoes in response. "I'm coming <<charlescomma>>" followed by a clatter as the ladders leading up to the drains retract. You are being hunted.

		<<set $phase to 0>>
		<<link [[Struggle|Sewers Shackle Struggle]]>><</link>>

		<<set $skulduggerydifficulty to 600>>
		<<link [[Pick the lock|Sewers Shackle Pick]]>><</link>><<skulduggerydifficulty>>

	<<elseif $rng gte 61>>
		<<set $sewerschasedstep to 3>>
		<<set $sewerschased to 1>>
		You walk through a rope suspended a foot off the ground. A log hurtles out of the dark and collides with you, knocking you to the ground and leaving you winded.
		<<gtrauma>><<gstress>><<gpain>><<trauma 6>><<stress 6>><<pain 6>>

		"<<charlesstop>>" Morgan's voice rings out. "Are you hurt? Stay where you are." You are being hunted

		<<destinationsewers>>
	<<elseif $rng gte 56 and $slimedisable is "f">>
		<<if !$worn.lower.type.includes("naked")>>
			A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over your $worn.lower.name.
			<<set $worn.lower.integrity -= 20>>
			<<if $worn.lower.integrity lte 0>>
				You try to wipe it off, but your fingers get stuck. You keep tugging, until your $worn.lower.name rips from your body with a tear.
				<<integritycheck>>

				<<destinationsewers>>
			<<else>>
				You try to wipe it off, but your fingers get stuck. You keep tugging, until you free yourself with a tear.

				<<destinationsewers>>
			<</if>>
		<<elseif !$worn.under_lower.type.includes("naked")>>
			A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over your $worn.under_lower.name.
			<<set $worn.under_lower.integrity -= 20>>
			<<if $worn.under_lower.integrity lte 0>>
				You try to wipe it off, but your fingers get stuck. You keep tugging, until your $worn.under_lower.name rips from your body with a tear.
				<<integritycheck>>

				<<destinationsewers>>
			<<else>>
				You try to wipe it off, but your fingers get stuck. You keep tugging, until you free yourself with a tear.

				<<destinationsewers>>
			<</if>>
		<<else>>
			<<if $penisexist is 1>>
				<<if !$parasite.penis.name>>
					A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over your <<penisstop>>
					<<if $parasitedisable is "f">>
						You try to wipe it off, but it's stuck. You'll need help to remove it.
						<<parasite penis slime>>

						You take another step, and the the fluid on your penis squirms. It starts to suck and tease your length.
					<</if>>

					<<destinationsewers>>
				<<else>>
					A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over the $parasite.penis.name on your <<peniscomma>> which shakes it off.

					<<destinationsewers>>
				<</if>>
			<<else>>
				<<if !$parasite.clit.name>>
					A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over your <<pussystop>> You try to wipe it off, but it sticks firm to your clitoris. You'll need help to remove it.
					<<parasite clit slime>>

					You take another step, and the the fluid on your clit squirms. It starts to suck and tease you.

					<<destinationsewers>>
				<<else>>
					A warm, slimy and sticky liquid sprays you from a nearby pipe. It gets all over the $parasite.clit.name on your <<pussycomma>> which shakes it off.

					<<destinationsewers>>
				<</if>>
			<</if>>
		<</if>>
	<<elseif $rng gte 51 and $slimedisable is "f">>
		You notice the ceiling glisten.
		<<if !$worn.upper.type.includes("naked")>>
			It drips on your $worn.upper.name. It's thick, slimy and sticky. You try to pull it off, but it's stuck. So are you fingers.
			<<set $worn.upper.integrity -= 20>>
			<<if $worn.upper.integrity lte 0>>
				You keep tugging, until your whole top comes off with a tear.

				<<integritycheck>>
				<<destinationsewers>>
			<<else>>
				You keep tugging, until it comes away with a tear.

				<<destinationsewers>>
			<</if>>
		<<elseif !$worn.under_upper.type.includes("naked")>>
			It drips on your $worn.under_upper.name. It's thick, slimy and sticky. You try to pull it off, but it's stuck. So are you fingers.
			<<set $worn.under_upper.integrity -= 20>>
			<<if $worn.under_upper.integrity lte 0>>
				You keep tugging, until your whole top comes off with a tear.

				<<integritycheck>>
				<<destinationsewers>>
			<<else>>
				You keep tugging, until it comes away with a tear.

				<<destinationsewers>>
			<</if>>
		<<else>>
			<<if $parasite.nipples.name>>
				It drips on the $parasite.nipples.name attached to your <<breastscomma>> which shakes the moisture off.

				<<destinationsewers>>
			<<else>>
				It drips on your bare <<breastscomma>> right on your nipples. It's thick, slimy and sticky.
				<<if $parasitedisable is "f">>
					You try to pull it off, but it's stuck firm. You'll need help to remove it.
					<<parasite nipples slime>>

					You take another step, and the slime moves against your skin, sucking and teasing.
					<<garousal>><<arousal 6>>
				<</if>>

				<<destinationsewers>>
			<</if>>
		<</if>>
	<<elseif $rng gte 46 and $slimedisable is "f">>
		You slip on something slimy, and land on your <<bottomstop>>

		<<if !$worn.lower.type.includes("naked")>>
			<<if $worn.lower.skirt is 1>>
				<<if !$parasite.bottom.name>>
					You try to stand up, but your butt is stuck firm. Your $worn.lower.name flared as you fell, leaving your bare skin exposed to the sticky substance. You keep tugging, until you manage to pull yourself to your feet.

					<<if $parasitedisable is "f">>
						Something Squirms against your bottom. Some of the sticky substance remains on your skin. You'll need help to remove it.
						<<parasite bottom slime>>

						It squirms with more fervour. You feel warm.
						<<garousal>><<arousal 6>>

					<</if>>
					<<destinationsewers>>
				<<else>>
					Your $worn.lower.name flared as you fell, leaving your bare skin exposed to the sticky substance. Fortunately, the $parasite.bottom.name stuck to your butt broke your fall.

					<<destinationsewers>>
				<</if>>
			<<else>>
				You try to stand up, but your $worn.lower.name is stuck. You tug at it, but it won't budge.

				<<link [[Leave your clothes behind|Sewers Slime Lower Lost]]>><</link>>

				<<link [[Keep trying (0:30)|Sewers Slime Lower Try]]>><<pass 30>><</link>>

			<</if>>
		<<else>>
			You try to stand up, but your butt is stuck firm. You keep tugging, until you manage to pull yourself to your feet.

			<<if $parasitedisable is "f">>
				Something squirms against your bottom. You feel behind you, and find that some of the sticky substance remains on your skin. You'll need help to remove it.
				<<garousal>><<arousal 6>><<parasite bottom slime>>

			<</if>>
			<<destinationsewers>>
		<</if>>
	<<else>>
		<<set $sewerschasedstep to 3>>
		<<set $sewerschased to 1>>
		A scream echoes through the tunnels. You are being hunted
		<<gstress>><<stress 6>>

		<<destinationsewers>>
	<</if>>
<</nobr>><</widget>>

:: Widgets Destination Drain [widget]

<<widget "destinationdrain">><<nobr>>
	<<switch $bus>>
	<<case "nightingale">>
		<<commercialdrainquick>>
	<<case "domus">>
		<<residentialdrainquick>>
	<<case "elk">>
		<<industrialdrainquick>>
	<<case "high">>
		<<commercialdrainquick>>
	<<case "starfish">>
		<<commercialdrainquick>>
	<<case "barb">>
		<<residentialdrainquick>>
	<<case "connudatus">>
		<<commercialdrainquick>>
	<<case "wolf">>
		<<residentialdrainquick>>
	<<case "harvest">>
		<<industrialdrainquick>>
	<<case "oxford">>
		<<commercialdrainquick>>
	<<case "danube">>
		<<residentialdrainquick>>
	<<case "mer">>
		<<industrialdrainquick>>
	<<case "cliff">>
		<<commercialdrainquick>>
	<<case "industrial">>
		<<industrialdrainquick>>
	<<case "residential">>
		<<residentialdrainquick>>
	<<case "commercial">>
		<<commercialdrainquick>>
	<<case "park">>
		<<commercialdrainquick>>
	<</switch>>

<</nobr>><</widget>>


code:
:: Underground Cell Molestation [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<man1init>>
	<<if $phase is 1>>
		<<set $enemytrust -= 80>>
		<<set $enemyanger += 120>>
	<<else>>
		<<set $enemytrust -= 40>>
	<</if>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Underground Cell Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next|Underground Cell Molestation Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Underground Cell Molestation]]>><</link>><<nexttext>>
<</if>>

:: Underground Cell Molestation Finish [nobr]

<<if $enemyhealth lte 0>>
	The <<person>> recoils from you in pain and hobbles over to where <<he>> entered. <<He>> slams <<his>> fist into the door. "Let me out," <<he>> shouts. "You locked me in with a psycho." The door opens and <<he>> leaves.

	<<clotheson>>
	<<endcombat>>
	<<if $undergroundwater gte 1>>
		The door opens again, and a <<generate1>><<person1>><<person>> stands in the doorway. "You'll give in." <<he>> says. "And if you don't, you'll become too weak to fight back. Why make it harder on yourself?" <<He>> slams the door shut.
	<<else>>
		The door opens again, and a <<generate1>><<person1>><<person>> stands in the doorway. "So that's how it's gonna be?" <<he>> says, looking disappointed. "Fine. We'll see how stubborn you are without water." <<He>> slams the door shut.
		<<set $undergroundwater to 1>>
	<</if>>
	<<tearful>> you sit on the mattress.

	<<endevent>>
	<<link [[Next|Underground Cell]]>><</link>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>><<set $forcedprostitutionstat += 1>><<fameprostitution 1>>
	Satisfied, <<he>> leaves you on the mattress and exits the way <<he>> came in.
	<<tearful>> you sit on the mattress.

	<<clotheson>>
	<<endcombat>>
	<<if $undergroundwater gte 22>>
		The door opens again, and a <<generate1>><<person1>><<person>> stands in the doorway. "Good <<girlcomma>>" <<he>> says, smiling.
		<<if $undergroundwater gte 6>>
			<<if $NPCList[0].penis isnot "none">>
				<<He>> enters the room, closing the door behind <<himstop>> "We'll turn your tap back on. But first a treat. You get to drink straight from my cock."

				<<link [[Next|Underground Cell Oral]]>><<set $molestationstart to 1>><</link>>

			<<else>>
				"We'll turn your tap back on. You're gonna make us lots of money." <<He>> shuts the door, once more plunging you into darkness.
				<<set $undergroundwater to 0>>

				<<link [[Next|Underground Cell]]>><</link>>
			<</if>>
		<<else>>
			"We're not gonna give you back your water just yet, you haven't suffered enough for your disobedience. Keep up the good work though." <<He>> slams the door shut.

			<<link [[Next|Underground Cell]]>><</link>>
		<</if>>
	<<else>>
		<<link [[Next|Underground Cell]]>><</link>>
	<</if>>
<</if>>

:: Underground Cell Oral [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<man1init>>
	<<npcoral>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Underground Cell Oral Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next|Underground Cell Oral Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Underground Cell Oral]]>><</link>><<nexttext>>
<</if>>

:: Underground Cell Oral Finish [nobr]

<<if $enemyhealth lte 0>>

You shove the <<person1>><<person>> away from you. "You still haven't learned your place," <<he>> says, nursing a bruise. "We'll see how long you can keep it up." The door slams shut behind <<himcomma>> plunging you into darkness. <<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

"Good <<girlcomma>>" <<he>> says. "I'll switch your water back on. Hopefully you've learned your lesson." The door slams shut behind <<himcomma>> plunging you into darkness. <<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<set $undergroundwater to 0>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Dance Intro [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

You are led from your cell into a corridor outside. It looks medieval like your cell but with modern furnishings. You round a corner and see a large group of <<people>> surrounding a stage. You see a staircase on the opposite side of the room, which might be the way out. <<covered>> All eyes are on you as you are led up to the central platform. There's music playing.

<<generate1>><<generate2>><<generate3>><<generate4>><<generate5>><<generate6>>
"Go on," A <<person1>><<person>> says. "Do something."

<<set $audiencearousal to 51>>

<<link [[Dance for them|Underground Dance]]>><<set $dancing to 1>><<set $audience to 50>><<set $venuemod to 0>><<set $dancelocation to "underground">><<set $forceddance to 1>><</link>><<gstress>><<gtiredness>>

<<link [[Refuse|Underground Stage Refuse]]>><<endevent>><</link>>

:: Underground Cell Resist [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>>

<<set $enemytrust -= 120>>
<<set $enemyanger += 120>>

<</if>>

<<effects>>
<<effectsman>><<man>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Cell Resist Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Cell Resist Finish]]>><</link>><<nexttext>>
<<elseif $pain gte 100 and $willpowerpain is 0>>
<<link [[Next|Underground Cell Resist Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Cell Resist]]>><</link>><<nexttext>>
<</if>>

:: Underground Cell Resist Finish [nobr]
<<if $enemyhealth lte 0>>

The <<person>> staggers away from you.

	<<if $undergroundwater gte 1>>
	"You'll give in." <<he>> says. "And if you don't, you'll become too weak to fight back. Why make it harder on yourself?" <<He>> slams the door shut.
	<<else>>
	"So that's how it's gonna be?" <<he>> says, looking disappointed. "Fine. We'll see how stubborn you are without water." <<He>> slams the door shut.
	<<set $undergroundwater to 1>>
	<</if>>

<<clotheson>>
<<endcombat>>

<<tearful>> you sit on the mattress.

<<endevent>>

<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

<<He>> pants. "Maybe... maybe another time. I need a lie down." The door slams shut behind <<himcomma>> plunging you into darkness.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<<elseif $pain gte 1>>

You're too badly beaten to put up a fight. The <<person>> drags your helpless body from the cell.

<<if $phase is 1>>
<<link [[Next|Underground Dance Intro]]>><</link>>

<<elseif $phase is 2>>
<<link [[Next|Underground Presentation]]>><</link>>

<<elseif $phase is 3>>
<<link [[Next|Underground Stage Intro]]>><</link>>

<<elseif $phase is 4>>
<<link [[Next|Underground Film Intro]]>><</link>>

<<elseif $phase is 5>>
<<link [[Next|Underground Hunt Intro]]>><</link>>

<</if>>

<<endcombat>>

<</if>>

:: Underground Dance [nobr]
<<set $outside to 0>><<set $location to "Underground">><<effects>>

<<danceeffects>>
<<danceaudience>>

<<if $danceevent is 0 and $exhibitionism lte 74 and $exposed gte 2>>
Being so exposed is humiliating, but there's nothing you can do.

<<elseif $danceevent is 0 and $exhibitionism lte 34 and $exposed gte 1>>
Being so exposed is humiliating, but there's nothing you can do.

<</if>>

<<danceactions>>

<<if $danceevent is "finish">>
<<elseif $danceevent is "private">>
<<link [[Next|Underground Dance Oral]]>><<set $enemyno to 1>><<set $molestationstart to 1>><</link>>

<<elseif $danceevent is "rape">>
<<link [[Next|Underground Dance Rape]]>><<set $molestationstart to 1>><</link>>
<</if>>

:: Underground Stage Refuse [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

<<if $submissive gte 1150>>
You stare meekly at your feet, but refuse their demand.
<<elseif $submissive lte 850>>
You stare out at the crowd in defiance, and refuse their demand.
<<else>>
Though afraid, you refuse their demand.
<</if>>

The crowd starts booing. A <<generate1>><<person1>><<person>> runs on stage. "Please accept our apologies," <<he>> says, picking up your leash.

<<if $rng gte 51 and $bestialitydisable is "f">>

"Instead of our scheduled show, we have a special treat for you." A metal shutter opens behind you, revealing a gigantic pig.

<<endevent>>
<<link [[Next|Underground Stage Pig]]>><<set $molestationstart to 1>><</link>>

<<else>>

"Instead of our scheduled show, we invite you to watch our punishment of this insolent <<bitchstop>>"

<<link [[Next|Underground Stage Molestation]]>><<set $molestationstart to 1>><<set $phase to 1>><</link>>

<</if>>

:: Underground Stage Pig [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "dogpack">>
<<beast1init>><<beasttype pig>>

<</if>>

<<effects>>
<<effectsman>>

<<beast>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Stage Pig Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Stage Pig Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Stage Pig]]>><</link>><<nexttext>>
<</if>>

:: Underground Stage Molestation [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>>
<<if $phase is 1>>
<<set $enemytrust -= 200>>
<<set $enemyanger += 200>>
<<else>>
<<set $enemytrust -= 120>>
<</if>>

<</if>>

<<effects>>
<<effectsman>><<man>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Stage Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Stage Molestation Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Stage Molestation]]>><</link>><<nexttext>>
<</if>>

:: Underground Stage Molestation Finish [nobr]
<<if $enemyhealth lte 0>>

The <<person1>><<person>> recoils and pain and tumbles from the stage. <<tearful>> you jump over <<him>> and run for the stairs. The audience are so bemused they make no move to stop you. You climb the stairs as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

<<clotheson>>
<<endcombat>>

A chill runs up your spine, a warning from some primal instinct. Something is hunting you.<<set $foresthunt to 1>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

The crowd applauds as you are led off the stage and back to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Stage Pig Finish [nobr]
<<if $enemyhealth lte 0>>

The $beasttype flees in pain and fear, running amok among the audience in an attempt to find an exit. <<tearful>> you leap from the stage and run for the stairs. The audience are so distracted they make no move to stop you. You climb the stairs as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

<<clotheson>>
<<endcombat>>

A chill runs up your spine, a warning from some primal instinct. Something is hunting you.
<<set $foresthunt to 1>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<beastejaculation>><<famebestiality 50>>

The crowd applauds as you are led off the stage and back to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Dance Oral [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>>The <<person>> climbs on stage.<<npcoral>>

<</if>>

<<effects>>
<<effectsman>><<man>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Dance Oral Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Dance Oral Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Dance Oral]]>><</link>><<nexttext>>
<</if>>

:: Underground Dance Rape [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>>

<</if>>

<<effects>>
<<effectsman>><<man>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Dance Rape Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Dance Rape Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Dance Rape]]>><</link>><<nexttext>>
<</if>>

:: Underground Dance Oral Finish [nobr]
<<if $enemyhealth lte 0>>

The <<person1>><<person>> recoils and pain and tumbles from the stage. <<tearful>> you jump over <<him>> and run for the stairs. The audience are so bemused they make no move to stop you. You climb the stairs as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

<<clotheson>>
<<endcombat>>

A chill runs up your spine, a warning from some primal instinct. Something is hunting you.
<<set $foresthunt to 1>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

The crowd applauds and the <<person>> holds <<his>> arms in the air, as if abusing you were some sort of triumph. You are led off the stage and back to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Dance Rape Finish [nobr]
<<if $enemyhealth lte 0>>

The <<person1>><<person>> recoils and pain and tumbles from the stage, and the others back off in instinctive fear. <<tearful>> you jump over <<him>> and run for the stairs. The audience are so bemused they make no move to stop you. You climb the stairs as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

<<clotheson>>
<<endcombat>>

A chill runs up your spine, a warning from some primal instinct. Something is hunting you.<<set $foresthunt to 1>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>

<<elseif $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

A voice rings out. "We hope you enjoyed our product, but we need to ask you to vacate the stage." The crowd does as instructed.

You are led off the stage and back to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Stage Intro [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

<<if $rng gte 51 and $bestialitydisable is "f">>

You are led once more to the stage, where the crowd awaits. <<covered>> Once there, a metal shutter rattles open behind you, and a gigantic pig steps out. The audience cheers it on.

<<link [[Next|Underground Stage Pig]]>><<set $molestationstart to 1>><</link>>

<<else>>

You are led once more to the stage, where the crowd awaits. <<covered>> There's a <<generate1>><<person1>><<person>> already waiting for you. <<He>> takes hold of you leash and pulls you closer while looking at the audience. "What shall I do with <<phim>> my friends?"

<<link [[Next|Underground Stage Molestation]]>><<set $molestationstart to 1>><</link>>

<</if>>

:: Underground Presentation [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

You are led to the stage where four other <<girls>> stand in a line, eyes downcast. Each wears a collar similar to your own. As soon as you take your place among them, a pair of large wooden doors opens and a <<generate1>><<person1>><<person>> strides into the room. <<He>> is flanked by a <<generate2>><<person2>><<person>> who struggles to keep up. "We have a nice selection for you today <<person1>><<sirstop>> Just the sort of thing you like." Says the <<person2>><<personstop>>

"I'll see for myself," the <<person1>><<person>> responds. <<He>> stops in front of the stage and eyes the <<girls>> up, including you. <<covered>> "This one's all skin and bone," <<he>> says, pointing at the <<girl>> on the far side from you. "<<pShe>> looks likely to faint at any moment."

"Our <<girls>> are all fed a-"

<<if $attractiveness gte 3000>>

"Spare me," <<he>> turns to you and smiles. "This one will do nicely. Bring <<phim>> in."

<<link [[Next|Underground Presentation2]]>><</link>>

<<else>>

"Spare me," <<he>> turns to you, but looks away dismissively. "I've made my choice." <<He>> lunges for the <<person2>><<person>> and drags <<him>> to the ground.

"I-I'm not... Stop!"

The protestations are no use. You hear a loud smack and the <<person>> yelp in pain as you are led back to your cell.

<<endevent>>
<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Presentation2 [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

The <<person1>><<person>> leaves the way they came as the <<person2>><<person>> climbs the stage and picks up your leash. <<He>> pulls you after the <<person1>><<personcomma>> through the same wooden doors. The room beyond is spacious and decorated like the abode of a monarch. A four-poster bed sits opposite you, on which the <<person1>><<person>> lounges.

The <<person2>><<person>> moves to leave but is interrupted. "Did I say you could leave? You're gonna help me discipline this little thing, or I'll punish you next. Both of you come here."

<<person1>>
As you walk close to <<himcomma>> <<he>> grabs you and bends you over <<his>> thighs.

<<link [[Next|Underground Presentation Molestation]]>><<set $molestationstart to 1>><</link>>

:: Underground Presentation Molestation [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>><<npcspank>>
<<set $enemytrust -= 120>>
<<set $timer to 30>>
<</if>>

<<effects>>

<<effectsman>><<man>>

<<stateman>>

<<actionsman>>

<<if $enemyhealth lte 0>>
<<link [[Next|Underground Presentation Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Presentation Molestation Finish]]>><</link>><<nexttext>>
<<elseif $timer lte 0>>
<<link [[Next|Underground Presentation Molestation Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Presentation Molestation]]>><</link>><<nexttext>>
<</if>>

:: Underground Presentation Molestation Finish [nobr]
<<set $outside to 0>><<set $location to "underground">><<effects>>

<<if $enemyarousal gte $enemyarousalmax>>

<<ejaculation>>
The <<person1>><<person>> falls backward on the bed and lies still, apparently asleep. The <<person2>><<person>> picks up your leash and leads you back to your cell. <<He>> avoids looking at you the whole time.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyhealth lte 0>>

The <<person1>><<person>> falls against one of the bed posts, breaking it. <<tearful>> you jump over <<him>> and run out the room, towards the stairs. You climb as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

<<clotheson>>
<<endcombat>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>
<<elseif $timer lte 0>>
The <<person1>><<person2>> reclines on the bed. "It's been a long day," <<he>> says as <<he>> waves both of you from the room. The <<person2>><<person>> picks up your leash and leads you back to your cell. <<He>> avoids looking at you the whole time.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<</if>>

:: Underground Hunt Intro [nobr]
<<set $outside to 1>><<set $location to "forest">><<effects>>

You are led past the empty stage and up the flight of stairs. The air becomes cooler and fresher as you ascend, and you soon emerge outside.

<<if $daystate is "dawn">>
The sun is hidden behind trees, but you think it's dawn.
<<elseif $daystate is "dusk">>
The sun is hidden behind trees, but you think it's dusk.
<<elseif $daystate is "day">>
You have to shield your eyes from the sunlight, and you realise just how dim those lights were.
<<elseif $daystate is "night">>
The cool night air blows against your skin.
<</if>>

It looks like you're in a forest clearing.

Several naked <<girls>> are lined up, with a rope suspended in front of them. There's a large crowd stood around them, leering. The <<girls>> stare at their feet. <<covered>> You're dragged to the end of the line.

<<generate1>><<person1>> A <<person>> in a waistcoat enters the clearing, holding three dogs on leashes. They strain against <<himcomma>> practically pulling <<him>> along. "We're ready," <<he>> says, brandishing a pistol. "First shot, the prey run. Second shot, we hunt!" The crowd cheers. You hear one of the <<girls>> sob.

<<link [[Next|Underground Hunt]]>><</link>>

:: Underground Hunt [nobr]
<<set $outside to 1>><<set $location to "forest">><<effects>>

The pistol sounds off, and you run.

You've barely reached the trees when the second shot rings out.

<<if $physique gte $rng * 100 + 6000>>
<<set $rng to random(1, 100)>>

You run as fast you can. You hear the other <<girls>> scream as they are caught, one by one. Eventually your legs give out and you collapse against a tree. You hear nothing but your beating heart and the wind rustling through leaves. You got away.<<pass 5>>

<<endevent>>

<<link [[Next|Forest]]>><<set $forest to 1>><</link>>

<<else>>

	<<if $rng gte 51 and $bestialitydisable is "f">>
	You run as fast you can. You hear the other <<girls>> scream as they are caught, one by one. You hear something running through the grass behind you, and feel paws on your back as you are forced to your knees. The dog starts humping, you feel its penis prodding your <<bottomstop>>

	"Looks like he likes you," you hear the <<person>> say as <<he>> catches up. <<He>> is not alone, much of the crowd follows behind <<himstop>> "And it's only fair he gets to do as he likes with his quarry." The crowd forms a circle around you.

	<<link [[Next|Underground Hunt Dog]]>><<set $molestationstart to 1>><</link>>

	<<else>>

	You run as fast you can. You hear the other <<girls>> scream as they are caught, one by one. You hear something running through the grass behind you right before you are tackled to the ground.

	"Got you," the <<person>> says. A number of others from the crowd arrive, panting. "Now the hunter devours <<his>> prey."

	<<link [[Next|Underground Hunt Molestation]]>><<set $molestationstart to 1>><</link>>

	<</if>>
<</if>>

:: Underground Hunt Dog [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "dogpack">>
<<beast1init>><<beasttype dog>><<set $enemytrust -= 80>>
<</if>>

<<effects>>

<<effectsman>>

<<beast>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Hunt Dog Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Hunt Dog Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Hunt Dog]]>><</link>><<nexttext>>
<</if>>

:: Underground Hunt Dog Finish [nobr]
<<set $outside to 1>><<set $location to "forest">><<effects>>

<<if $enemyarousal gte $enemyarousalmax>>

<<beastejaculation>>

The beast barks happily. "Good boy," says the <<person1>><<personstop>> The crowd whisper among themselves as <<he>> grabs your leash and pulls you to your feet. "I hope the other groups had as much fun with their prey as we did."

A scream erupts nearby, and the crowd rushes away to investigate, leaving the <<person>> to drag you back into the dungeon and down to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>

<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyhealth lte 0>>

The $beasttype whimpers and flees. <<tearful>> you jump to your feet and run for it. The <<person1>><<person>> tries to stop you, but you dodge <<him>> and escape into the forest.

<<clotheson>>
<<endcombat>>

A chill runs up your spine, a warning from some primal instinct. Something is hunting you.
<<set $foresthunt to 1>>

<<link [[Next|Forest]]>><<set $forest to 40>><</link>>

<</if>>

:: Underground Hunt Molestation [nobr]
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
<<set $event to "molestationhome">>
<<man1init>>

<</if>>

<<effects>>
<<effectsman>><<man>>

<<audience>>

<<stateman>>

<<actionsman>>

<<if $enemyarousal gte $enemyarousalmax>>
<<link [[Next|Underground Hunt Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
<<link [[Next|Underground Hunt Molestation Finish]]>><</link>><<nexttext>>
<<else>>
<<link [[Next|Underground Hunt Molestation]]>><</link>><<nexttext>>
<</if>>

:: Underground Hunt Molestation Finish [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>>
	You hear the crowd whisper among themselves as the <<person>> grabs your leash and pulls you to your feet. "I hope the other groups had as much fun with their prey as we did."

	A scream erupts nearby, and the crowd rushes away to investigate, leaving the <<person>> to drag you back into the dungeon and down to your cell.
	<<tearful>> you sit on the mattress.

	<<clotheson>>
	<<endcombat>>
	<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyhealth lte 0>>
	The <<person>> falls against a tree. <<tearful>> you jump to your feet and run for it. <<He>> tries to stop you, but you dodge <<him>> and escape into the forest.

	<<clotheson>>
	<<endcombat>>
	A chill runs up your spine, a warning from some primal instinct. Something is hunting you.
	<<set $foresthunt to 1>>

	<<link [[Next|Forest]]>><<set $forest to 40>><</link>>
<</if>>

:: Underground Film Intro [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
<<generate1>><<generate2>>
You are led to another part of the dungeon, and into a well-lit room. A <<person2>><<person>> is already here, holding a camera. Stood beside <<him>> is a <<person1>><<personstop>>
<<if $rng gte 51 and $swarmdisable is "f">>
	There's a bath sitting in the middle of the room. The <<person1>><<person>> pulls you over to it and pushes you inside. Before you get your bearings, <<he>> attaches a clip on the bottom of the bath to your collar, locking you in place. You look up at the <<personcomma>> now holding a bucket, and <<person2>><<person>> and wonder what they intend.

	The <<person1>><<person>> tips the bucket over you, covering you in thick, long worms. They wriggle all over you, inciting shameful feelings.

	<<link [[Next|Underground Film Worms]]>><<set $molestationstart to 1>><</link>>

<<else>>
	The <<person>> walks right up behind you, uncomfortably close. The <<person2>><<person>> nods, and the <<person1>><<person>> starts to grope you.

	<<link [[Next|Underground Film Molestation]]>><<set $molestationstart to 1>><</link>>

<</if>>

:: Underground Film Worms [nobr]

<<set $outside to 1>><<set $location to "underground">><<effects>><<set $bus to "danube">>
<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<molested>>
	<<controlloss>>
	<<set $combat to 1>>
	<<set $swarmname to "containers">>
	<<set $swarmmove to "shaking">>
	<<set $swarmcreature to "worms">>
	<<set $swarmspill to "shatter">>
	<<set $swarmsteady to "steady">>
	<<set $swarmSteady to "Steady">>
	<<set $swarmcount to 2>>
	<<set $swarm1 to "active">>
	<<set $swarm2 to "active">>
	<<set $swarmactive to 2>>
	<<set $timer to 24>>
<</if>>
<<if $timer is 21>>
	The <<person2>><<person>> moves to get a better shot of your face. You feel more self-conscious about your reactions, but there's little you can do to control them.
	<<elseif $timer is 18>>
	The <<person1>><<person>> tips another bucket of worms into the bath.
	<<set $swarmcount += 2>>
	<<set $swarm3 to "active">>
	<<set $swarm4 to "active">>
	<<set $swarmactive += 2>>
<<elseif $timer is 15>>
	The <<person2>><<person>> moves to get a better shot of your <<breastsstop>>
<<elseif $timer is 12>>
	The <<person1>><<person>> tips another bucket of worms into the bath.
	<<set $swarmcount += 2>>
	<<set $swarm5 to "active">>
	<<set $swarm6 to "active">>
	<<set $swarmactive += 2>>
<<elseif $timer is 9>>
	The <<person2>><<person>> moves to get a better shot of your <<genitalsstop>>
<<elseif $timer is 6>>
	The <<person1>><<person>> tips another bucket of worms into the bath.
	<<set $swarmcount += 2>>
	<<set $swarm7 to "active">>
	<<set $swarm8 to "active">>
	<<set $swarmactive += 2>>
<<elseif $timer is 3>>
	The <<person2>><<person>> moves to get a better shot of your face.
<<else>>
	The <<person2>><<person>> continues to film your ordeal.
<</if>>

<<if $face isnot "covered">>
	<<fameexhibitionism 1>>
<</if>>
<<swarmeffects>>
<<swarm>>
<<swarmactions>>
<<if $timer lte 0>>
	<<link [[Next|Underground Film Worms Finish]]>><</link>><<nexttext>>
<<else>>
	<<link "Next">><><</link>><<nexttext>>
<</if>>

:: Underground Film Worms Finish [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
"That should do it," says the <<person2>><<person>> as <<he>> stops filming. The <<person1>><<person>> unplugs your collar from the bath and you scramble to you feet. The worms tumble off you, but you still shiver in horror and disgust.

The <<person>> tugs on your leash, and you almost trip as you leave the bath. You're horrified at the thought of more people seeing what just happened to you, but there's nothing you can do as the <<person1>><<person>> takes you back to your cell.

<<tearful>> you sit on the mattress.

<<clotheson>>
<<endcombat>>
<<link [[Next|Underground Cell]]>><</link>>

:: Underground Film Molestation [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<set $enemyno to 1>><<man1init>>
	<<set $timer to 24>>
	<<set $NPCList[1].penis to "none">>
	<<set $NPCList[1].lefthand to "none">>
	<<set $NPCList[1].righthand to "none">>
	<<set $NPCList[1].mouth to "none">>
	<<set $NPCList[1].vagina to "none">>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<if $timer is 21>>
	The <<person2>><<person>> moves to get a close shot of your face.
<<elseif $timer is 18>>
	The <<person2>><<person>> moves to get a close shot of your <<bottomstop>>
<<elseif $timer is 15>>
	The <<person2>><<person>> moves to get a close shot of your <<breastsstop>>
<<elseif $timer is 12>>
	The <<person2>><<person>> moves to get a close shot of your <<genitals>>
<<elseif $timer is 9>>
	The <<person2>><<person>> moves to get a close shot of your face.
<<elseif $timer is 6>>
	The <<person2>><<person>> steps back to get a shot of your whole body.
<<elseif $timer is 3>>
	The <<person2>><<person>> continues to film.
<<else>>
	The <<person2>><<person>> continues to film.
<</if>>

<<if $face isnot "covered">>
	<<fameexhibitionism 1>><<famerape 1>>
<</if>>
<<person1>>
<<stateman>>

<<actionsman>>
<<if $timer lte 0>>
	<<link [[Next|Underground Film Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Underground Film Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next|Underground Film Molestation Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Underground Film Molestation]]>><</link>><<nexttext>>
<</if>>

:: Underground Film Molestation Finish [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>>
	"That'll do," says the <<person2>><<person>> as <<he>> stops filming. You're horrified at the thought of other people seeing what happened to you, but there's nothing you can do as the <<person1>><<person>> leads you back to your cell.

	<<tearful>> you sit on the mattress.

	<<clotheson>>
	<<endcombat>>
	<<link [[Next|Underground Cell]]>><</link>>

<<elseif $enemyhealth lte 0>>
	The <<person1>><<person>> trips and falls against the <<person2>><<personstop>> The camera drops to the ground and shatters. "You idiot," says the <<person2>><<personstop>>

	The <<person1>><<person>> struggles to <<his>> feet. "Shut up," <<he>> says. "Before <<pshe>> gets away." But you're already well ahead of them. You run down the corridor, past your cell, then into the empty theatre. You run towards the stairs on the far side, and climb as fast as you can, footsteps thundering beneath you. You emerge in the forest and run in a random direction, aware you are still being pursued.

	<<clotheson>>
	<<endcombat>>
	A chill runs up your spine, a warning from some primal instinct. Something is hunting you.
	<<set $foresthunt to 1>>

	<<link [[Next|Forest]]>><<set $forest to 40>><</link>>
<<elseif $timer lte 0>>
	"That'll do," says the <<person2>><<person>> as <<he>> stops filming. You're horrified at the thought of other people seeing what happened to you, but there's nothing you can do as the <<person1>><<person>> leads you back to your cell.

	<<tearful>> you sit on the mattress.

	<<clotheson>>
	<<endcombat>>
	<<link [[Next|Underground Cell]]>><</link>>

<</if>>

repo_name: fizzyboi/degrees

license: mit


code:
:: Underground Intro [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You are dragged through a door and down a flight of steps. You hear the sound of rushing water. At the bottom the <<person>> turns on a torch, revealing an old stone corridor leading away into darkness.<<pass 15>>

After walking awhile you come to a metal door. The <<person2>><<person>> knocks, and is answered by a thin opening sliding apart near the top. It closes promptly, and the door opens.

<<endcombat>>
You are forced through the door and to your knees before a <<generate1>><<person1>><<personcomma>> who crouches and grabs your neck. <<He>> turns your head to examine one side of your face, then the other, then forces your mouth open and looks inside. "<<pShe>> will do," <<he>> says, standing up.

<<endevent>>
<<if $worn.neck.collared isnot 1>>
	<<neckwear 1>>
	Your neck is freed only briefly. Someone closes something hard and cold around it before you are yanked to your feet and pulled away.
<<else>>
	Someone else yanks you to your feet and pulls you away.
<</if>>
<<generate1>>A <<person1>><<person>> holds the other end of the leash attached to your collar, and leads you towards a door at the far end of the room.

<<stealclothes>>
<<link [[Next|Underground Intro2]]>><</link>>

:: Underground Intro2 [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You enter another corridor, lined on one side with metal floor hatches. <<He>> opens one of them, and shoves you inside. You land on something soft at least. "Your role here is simple. Do as you're told. You don't want to know what happened to the last <<girl>> who made a fuss." <<He>> slams the hatch shut, plunging you into complete darkness.

You fumble around in the dark, and find you fell on what feels like a mattress. There's also a locked metal door and a tap in the corner, but the room is otherwise bare.

<<endevent>>
<<set $undergroundtime to 0>>
<<set $undergroundwater to 0>>
<<set $undergroundescape to 0>>
<<link [[Next|Underground Cell]]>><</link>>

:: Underground Cell [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You are in an underground cell. You can't see a thing but can tell that the walls and floor are made of cold stone.
<<if $undergroundwater is 0>>
	There's a tap in the corner which barely dribbles water.
<<else>>
	<<set $undergroundwater += 1>>
	There's a tap in the corner, which they turned off to punish your disobedience.
	<<if $undergroundwater gte 25>>
		You're dying of thirst!
		<<set $pain += 60>><<stress 6>><<trauma 6>><<gtrauma>><<gstress>>
	<<elseif $undergroundwater gte 20>>
		You really need water.
		<<set $pain += 30>>
	<<elseif $undergroundwater gte 15>>
		You're very thirsty.
		<<set $pain += 20>>
	<<elseif $undergroundwater gte 10>>
		You're thirsty.
		<<set $pain += 10>>
	<<elseif $undergroundwater gte 5>>
		You feel a bit thirsty.
	<</if>>

<</if>>

<<set $undergroundtime += 1>>
<<if $undergroundtime is 4>>
	The lights turn on once more, and a <<generate1>><<person1>><<person>> enters. "Time for your performance," <<he>> says, yanking your leash. "Make sure you dance sexy. If you don't attract a customer we'll just let the whole audience have a piece." <<He>> tries to pull you from the room.

	<<link [[Go quietly|Underground Dance Intro]]>><<endevent>><</link>>

	<<link [[Resist|Underground Cell Resist]]>><<set $molestationstart to 1>><<set $phase to 1>><</link>>

<<elseif $undergroundtime is 8>>
	The lights turn on once more, and a <<generate1>><<person1>><<person>> enters. "You're needed," <<he>> says, yanking your leash.

	<<link [[Go quietly|Underground Presentation]]>><<endevent>><</link>>

	<<link [[Resist|Underground Cell Resist]]>><<set $molestationstart to 1>><<set $phase to 2>><</link>>

<<elseif $undergroundtime is 12>>
	The lights turn on once more, and a <<generate1>><<person1>><<person>> enters. "Time for another performance," <<he>> says, yanking your leash.

	<<link [[Go quietly|Underground Stage Intro]]>><<endevent>><</link>>

	<<link [[Resist|Underground Cell Resist]]>><<set $molestationstart to 1>><<set $phase to 3>><</link>>

<<elseif $undergroundtime is 16>>
	The lights turn on once more, and a <<generate1>><<person1>><<person>> enters. "Time for another performance," <<he>> says, yanking your leash.

	<<link [[Go quietly|Underground Film Intro]]>><<endevent>><</link>>

	<<link [[Resist|Underground Cell Resist]]>><<set $molestationstart to 1>><<set $phase to 4>><</link>>

<<elseif $undergroundtime is 20>>
	The lights turn on once more, and a <<generate1>><<person1>><<person>> enters. "Time for some fresh air," <<he>> says, yanking your leash.

	<<link [[Go quietly|Underground Hunt Intro]]>><<endevent>><</link>>

	<<link [[Resist|Underground Cell Resist]]>><<set $molestationstart to 1>><<set $phase to 5>><</link>>

<<elseif $undergroundtime is 24>><<set $undergroundtime to 0>>
	<<if $trauma gte $traumamax>>
		The lights turn on once more, and a <<generate1>><<generate2>><<person1>><<person>> and <<person2>><<person>> enter. The <<person1>><<person>> crouches beside you, grabs your neck and turns you to face <<himstop>> "Yep," <<he>> says. "<<pHer>> lights are out. Shame, <<pshes>> a pretty little thing."

		Together they lift you by the shoulders and carry you from the room. They take you down a flight of steps to a large hole in the ground. They dump you in.

		You fall through darkness for several seconds before splashing into cold water.<<water>>

		<<endevent>>
		<<link [[Next|Underground Lake]]>><</link>>
	<<else>>
		The lights turn on once more, and a <<generate1>><<person1>><<person>> enters, holding a hose. Water shoots from the tip, knocking you prone and drenching you. <<He>> walks closer and continues spraying you from multiple angles, before finally turning it off. "There we go," <<he>> says. "Nice and clean." The door slams shut behind <<himcomma>> plunging you into darkness.

		<<wash>><<water>>
		<<endevent>>
		<<link [[Next|Underground Cell]]>><</link>>

	<</if>>
<<else>>
	<<set $danger to random(1, 10000)>><<set $dangerevent to 0>><<set $allure /= 2>>
	<<if $danger gte (9900 - $allure) and $eventskip is 0>>
		Dim pink-hued lights turn on, bathing the room in light. One of the doors opens and a <<generate1>><<person1>><<person>> walks in, closing the door behind <<himstop>> <<covered>> <<He>> sizes you up as <<he>> approaches.
		<<set $rng to random(1, 100)>>
		<<if $rng gte 81>>
			"I paid good money for you. You better be worth it."
			<<set $phase to 1>>
		<<elseif $rng gte 61>>
			"You're adorable. Don't worry, I'll be gentle."
		<<elseif $rng gte 41>>
			"Good enough. Hold Still."
		<<elseif $rng gte 21>>
			"You better be worth it <<bitchstop>>"
			<<set $phase to 1>>
		<<else>>
			"Yes, nice and young."
		<</if>>

		<<link [[Next|Underground Cell Molestation]]>><<set $molestationstart to 1>><</link>>

	<<else>>
		<<link [[Rest (1:00)|Underground Cell Rest]]>><<pass 1 hour>><<set $tiredness -= 1000>><</link>><<ltiredness>>

		<<if $undergroundescape is 0>>
			<<link [[Look for a way out|Underground Cell Look]]>><</link>>

		<<elseif $undergroundescape gte 18>>
			<<link [[Escape|Underground Escape]]>><</link>>

		<<else>>
			<<link [[Dig (1:00)|Underground Cell Dig]]>><<pass 1 hour>><</link>>

		<</if>>
		<<link [[Examine the door|Underground Cell Lock]]>><</link>>

	<</if>>
<</if>>

:: Underground Cell Rest [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You lie on the uncomfortable mattress and close your eyes. You're not sure how long you were lying there, but you feel refreshed.

<<link [[Next|Underground Cell]]>><</link>>

:: Underground Cell Look [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You carefully feel around the edge of the room, looking for anything that might help you get out. You don't find anything. Feeling helpless, you sit back down on the mattress, and feel a cool breeze caress your leg. You put your hands against the floor and feel it again, coming from beneath the mattress.

You shunt it aside and the breeze becomes unmistakable. You can feel small cracks in the ground. It might be your imagination, but you think you can see a tiny amount of light through them too.

<<set $undergroundescape to 1>>
<<link [[Next|Underground Cell]]>><</link>>

:: Underground Cell Dig [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>

You pick at the loose stone beneath the mattress.
<<set $undergroundescape += 1>>
<<if $undergroundescape gte 18>>
	It'll be a squeeze, but you think you can fit.

	<<link [[Escape|Underground Escape]]>><</link>>

<<elseif $undergroundescape gte 16>>
	The hole needs to be just a bit bigger and you'll be able to fit through.

<<elseif $undergroundescape gte 12>>
	There's definitely a way out here, it just needs to be bigger.

<<elseif $undergroundescape gte 8>>
	The hole grows wider.

<<elseif $undergroundescape gte 4>>
	Some of the cracks grow into a small hole.

<<else>>
	You make the cracks a bit bigger.

<</if>>

<<link [[Stop|Underground Cell]]>><</link>>

:: Underground Cell Lock [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>><<set $lock to 1000>>
The metal door is locked tight. It uses an advanced electronic lock.

<<if $skulduggery gte $lock>>
	You think you could manipulate it.

	<<link [[Open it (0:05)|Underground Cell Sneak]]>><<pass 5>><</link>>

<<else>>
	The lock looks beyond your ability to pick.<<skulduggeryrequired>>

<</if>>
<<link [[Stop|Underground Cell]]>><</link>>

:: Underground Cell Sneak [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
<<if $NPCName[$NPCNameList.indexOf("Whitney")].state is "dungeon">>
	No lock is going to stop you. You open the door and sneak out, tiptoeing across the plush carpet. You hear laughter and music up ahead. You peek round the corner and see Whitney getting brutally fucked on stage as a crowd of <<people>> watch. With the exception of the stage, the lights have been switched off, leaving the edge of the room in darkness.

	You slink into the room and round the side. No one notices you. You make it to the other side and up the stairs, emerging in the forest.

<<else>>
	No lock is going to stop you. You open the door and sneak out, tiptoeing across the plush carpet. You hear laughter and music up ahead. You peek round the corner and see a <<girl>> getting brutally fucked on stage as a crowd of <<people>> watch. With the exception of the stage, the lights have been switched off, leaving the edge of the room in darkness.

	You slink into the room and round the side. No one notices you. You make it to the other side and up the stairs, emerging in the forest.

<</if>>
<<link [[Next|Forest]]>><<set $forest to 40>><<set $stress -= 1000>><</link>>

:: Underground Escape [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>>
You sit on the edge with your legs hanging over the hole. You feel a slope. You carefully lower yourself down, pulling the mattress over as you do. Relying on your hands at least as much as your feet, you scramble downwards.

The stone gives way and you fall several feet into cold water.

<<link [[Next|Underground Lake]]>><<set $stress -= 1000>><</link>>

:: Underground Lake [nobr]

<<set $outside to 0>><<set $location to "underground">><<effects>><<water>>
<<set $stress -= 1000>>
<<if $historytrait gte 4>>
	You are pulled through the dark by a current. You've read about these tunnels, and should be able to influence where you end up.

	<<link [[Near the shore|Underground Lake2]]>><<set $sea to 10>><</link>>

	<<link [[Further out at sea|Underground Lake2]]>><<set $sea to 50>><</link>>

<<else>>
	You are pulled through the dark by a current. Without warning, you are sucked underwater. You try to fight it, but the force is too strong. After a few moments, the darkness gives way to light, and you are pushed upwards. You struggle further up, and emerge into the $daystate.

	<<link [[Next|Sea]]>><<set $sea to 50>><</link>>

<</if>>


code:
:: Widgets Dance Actions [widget]

<<widget "danceactions">><<nobr>>
	<<exposure>>
	<<if $danceevent is 0>>
		<<if $exposed gte 2 and $exhibitionism lte 74 and $forceddance isnot 1>>
		<<elseif $exposed gte 1 and $exhibitionism lte 34 and $forceddance isnot 1>>
		<<else>>
			<<if $danceactiondefault is "cool">>
				Cool Dance (0:01) <<radiobutton "$danceaction" "cool" checked>> |
			<<elseif $danceactiondefault is 0>>
				Cool Dance (0:01) <<radiobutton "$danceaction" "cool" checked>> |
			<<else>>
				Cool Dance (0:01) <<radiobutton "$danceaction" "cool">> |
			<</if>>

			<<if $danceactiondefault is "sophisticated">>
				Sophisticated Dance (0:01) <<radiobutton "$danceaction" "sophisticated" checked>> |
			<<else>>
				Sophisticated Dance (0:01) <<radiobutton "$danceaction" "sophisticated">> |
			<</if>>

			<<if $danceactiondefault is "seductive">>
				Seductive Dance (0:01) <<combatexhibitionist1>> <<radiobutton "$danceaction" "seductive" checked>> |
			<<else>>
				Seductive Dance (0:01) <<combatexhibitionist1>> <<radiobutton "$danceaction" "seductive">> |
			<</if>>

			<<if $exhibitionism gte 15>>
				<<if $danceactiondefault is "sexual">>
					Sexual Dance (0:01) <<combatexhibitionist2>> <<radiobutton "$danceaction" "sexual" checked>> |
				<<else>>
					Sexual Dance (0:01) <<combatexhibitionist2>> <<radiobutton "$danceaction" "sexual">> |
				<</if>>

			<</if>>
			<<goooutsidecount>>
			<<if $cat gte 6 and ($goooutsidecount + $semenoutsidecount) gte 1 and $leftarm isnot "bound" and $rightarm isnot "bound">>
				<<if $danceactiondefault is "groom">>
					Groom (0:01) Cat <<radiobutton "$danceaction" "groom" checked>> |
				<<else>>
					Groom (0:01) Cat <<radiobutton "$danceaction" "groom">> |
				<</if>>
			<</if>>
			<<dancestripactions>>

			<<link "Continue">><><</link>>

		<</if>>
	<<elseif $danceevent is "vip">>
		<<link "Allow">><<set $danceaction to "vipallow">><><</link>>

		<<link "Push away">><<set $danceaction to "vippush">><><</link>>

	<<elseif $danceevent is "strippertrouble">>
		<<link "Help them">><<set $danceaction to "stripperhelp">><><</link>>

		<<link "Ignore">><<set $danceaction to "stripperignore">><><</link>>

	<<elseif $danceevent is "note">>
		<<link "Approach">><<set $danceaction to "noteapproach">><><</link>>

		<<link "Ignore">><<set $danceaction to "noteignore">><><</link>>

	<<elseif $danceevent is "rape">>
	<<elseif $danceevent is "molest">>
		<<link "Let them cop a feel">><><</link>><<set $danceaction to "cop">>

		<<if $dancelocation isnot "underground">>
			<<link "It's too dangerous, time to end the show">><<set $danceaction to "finish">><><</link>>

		<</if>>
	<<elseif $danceevent is "skirtstrip">>
		<<link "Struggle for your clothes">><<set $danceaction to "skirtstruggle">><><</link>>

		<<link "Surrender your clothes">><<set $danceaction to "skirtsurrender">><><</link>>

	<<elseif $danceevent is "lowerstrip">>
		<<link "Struggle for your clothes">><<set $danceaction to "lowerstruggle">><><</link>>

		<<link "Surrender your clothes">><<set $danceaction to "lowersurrender">><><</link>>

	<<elseif $danceevent is "upperstrip">>
		<<link "Struggle for your clothes">><<set $danceaction to "upperstruggle">><><</link>>

		<<link "Surrender your clothes">><<set $danceaction to "uppersurrender">><><</link>>

	<<elseif $danceevent is "understrip">>
		<<link "Struggle for your clothes">><<set $danceaction to "understruggle">><><</link>>

		<<link "Surrender your clothes">><<set $danceaction to "undersurrender">><><</link>>

	<<elseif $danceevent is "private" and $dancelocation isnot "underground">>
		<<link "Ignore">><<set $danceaction to "privaterefuse">><><</link>>

	<<elseif $danceevent is "leighton">>
		<<link "Ignore">><<set $leightondancerefused to 1>><><</link>>

	<</if>>
<</nobr>><</widget>>

:: Widgets Dance Audience [widget]

<<widget "danceaudience">><<nobr>>

<<if $danceevent is 0>>

<<if $allure / 100 + $danceskill / 20 + $audienceexcitement / 5 + $audiencearousal / 5 gte $rng>>
<<set $audience += 1>>
	<<if $audience is 1>>
	<<generatel>> A <<person1>><<person>> starts watching you./*Not to be confused with generate1*/
	<<elseif $audience is 2>>
	<<generatel>> A <<person2>><<person>> starts watching you.
	<<elseif $audience is 3>>
	<<generatel>> A <<person3>><<person>> starts watching you.
	<<elseif $audience is 4>>
	<<generatel>> A <<person4>><<person>> starts watching you.
	<<elseif $audience is 5>>
	<<generatel>> A <<person5>><<person>> starts watching you.
	<<elseif $audience is 6>>
	<<generatel>> A <<person6>><<person>> starts watching you.
	<<else>>
	Someone else joins the audience.
	<</if>>
<</if>>

<<if $audience is 0>>
Nobody is paying attention to you.
<<elseif $audience is 1>>
The <<person>> is watching you intently.
<<elseif $audience is 2>>
A couple of people are watching you.
<<elseif $audience is 3>>
A few people are watching you.
<<elseif $audience is 4>>
Four people are watching you.
<<elseif $audience is 5>>
Five people are watching you.
<<elseif $audience is 6>>
Six people are watching you.
<<elseif $audience is 7>>
Seven people are watching you.
<<elseif $audience is 8>>
Eight people are watching you.
<<elseif $audience is 9>>
Nine people are watching you.
<<elseif $audience is 10>>
Ten people are watching you.
<<elseif $audience is 11>>
Eleven people are watching you.
<<elseif $audience is 12>>
A dozen people are watching you.
<<elseif $audience lte 24>>
There's a small crowd watching you.
<<elseif $audience lte 36>>
You've attracted quite a crowd.
<<else>>
There's a large crowd of people watching you. Those at the back struggle to get a good view.
<</if>>

<<dancespeech>>

<<if $audience gte 1>>
Your audience looks
	<<if $audienceexcitement is 0>>
	distracted
	<<elseif $audienceexcitement lte 20>>
	indifferent
	<<elseif $audienceexcitement lte 40>>
	attentive
	<<elseif $audienceexcitement lte 60>>
	interested
	<<elseif $audienceexcitement lte 80>>
	impressed
	<<elseif $audienceexcitement lte 99>>
	engrossed
	<<else>>
	obsessed
	<</if>>
 and
	<<if $audiencearousal is 0>>
	chaste.
	<<elseif $audiencearousal lte 20>>
	reserved.
	<<elseif $audiencearousal lte 40>>
	temperate.
	<<elseif $audiencearousal lte 60>>
	excited.
	<<elseif $audiencearousal lte 80>>
	lustful.
	<<elseif $audiencearousal lte 99>>
	lecherous.
	<<else>>
	filled with carnal desire.
	<</if>>

<<set $audiencemod to Math.clamp($audiencemod, 1, 10)>>

Awe: <<statbarinverted $audiencemod 10>>

<<set $rng to random(1, 100)>>

	<<if ($allure / 100 + $danceskill / 20 + $audienceexcitement / 5 + $audiencearousal / 5) gte $rng + 50>>
		<<set $rng to random(1, 10)>>
		<<set $dancetip to ($rng * $audience * $venuemod * $audiencemod)>>
		<<set $dancetip *= 1 + ($mathstrait / 4)>>
		<<if $dancetip gte 5000>>
		Thrilled with the display, your audience showers you with cash.
		<<elseif $dancetip gte 500>>
		Someone throws a decent tip at you.
		<<else>>
		Someone throws a modest tip at you.
		<</if>>
		<<set $dancetip = Math.trunc($dancetip)>>
		You've gained £<<print Math.trunc($dancetip / 100)>>.<<if $dancetip % 100 lte 9>>0<</if>><<print $dancetip % 100>>.
		<<set $money += $dancetip>>
	<</if>>

<<set $rng to random(1, 100)>>

<<if $dancelocation is 0>>
	<<if $audiencearousal gte 100>>
		<<if $rng gte 91>>
		<<dancerape>>
		<<elseif $rng gte 71>>
		<<dancemolest>>
		<<elseif $rng gte 51>>
		<<dancestrip>>
		<</if>>

	<<elseif $audiencearousal gte 81>>
		<<if $rng gte 91>>
		<<dancemolest>>
		<<elseif $rng gte 71>>
		<<dancestrip>>
		<</if>>

	<<elseif $audiencearousal gte 41>>
		<<if $rng gte 91>>
		<<dancestrip>>
		<</if>>

	<</if>>

<<elseif $dancelocation is "club">>
	<<if $audiencearousal gte 100>>
	<<dancefinish>>
	<<elseif $audiencearousal gte 60>>
		<<if $rng gte 81 and $privatedanceoffered isnot 1>>
			<<danceprivate>>
		<<elseif $rng gte 91>>
			<<dancelonging>>
		<<elseif $rng gte 76>>
			<<dancenote>>

		<<elseif $rng gte 71 and $enemyno gte 2>>
			<<dancevip>>

		<<elseif $rng gte 61>>
			<<dancestrippertrouble>>

		<<elseif $rng gte 51>>
			<<dancesalivate>>
		<</if>>
	<</if>>

<<elseif $dancelocation is "cafe">>

	<<if $timer lte 0>>
		<<dancesamfinish>>
	<<else>>
		<<if $audiencearousal gte 81>>
			<<if $rng gte 71>>
				<<dancestrip>>
			<</if>>

		<<elseif $audiencearousal gte 41>>
			<<if $rng gte 91>>
				<<dancestrip>>
			<</if>>
		<</if>>
	<</if>>

<<elseif $dancelocation is "brothel">>

	<<if $audiencearousal gte 100>>
		<<if $rng gte 91>>
		<<dancerape>>
		<<elseif $rng gte 71>>
		<<dancemolest>>

		<<elseif $rng gte 66 and $enemyno gte 2>>
		<<dancevip>>

		<<elseif $rng gte 51>>
		<<dancestrip>>
		<<elseif $rng gte 31 and $privatedanceoffered isnot 1>>
		<<danceprivate>>
		<<elseif $rng gte 21 and $leightondanceoffered isnot 1 and $weekday gte 6 and $leightonbrothel is 1>>
		<<danceleighton>>
		<</if>>

	<<elseif $audiencearousal gte 81>>
		<<if $rng gte 91>>
		<<dancemolest>>
		<<elseif $rng gte 86 and $enemyno gte 2>>
		<<dancevip>>

		<<elseif $rng gte 71>>
		<<dancestrip>>
		<<elseif $rng gte 51 and $privatedanceoffered isnot 1>>
		<<danceprivate>>
		<<elseif $rng gte 41 and $leightondanceoffered isnot 1 and $weekday gte 6 and $leightonbrothel is 1>>
		<<danceleighton>>
		<</if>>

	<<elseif $audiencearousal gte 41>>
		<<if $rng gte 91>>
		<<dancestrip>>
		<<elseif $rng gte 86 and $enemyno gte 2>>
		<<dancevip>>

		<<elseif $rng gte 71 and $privatedanceoffered isnot 1>>
		<<danceprivate>>
		<<elseif $rng gte 61 and $leightondanceoffered isnot 1 and $weekday gte 6 and $leightonbrothel is 1>>
		<<danceleighton>>
		<</if>>
	<</if>>

<<elseif $dancelocation is "underground">>

	<<if $audiencearousal gte 100>>
		<<if $rng gte 91>>
			<<dancerape>>
		<<elseif $rng gte 71>>
			<<dancemolest>>
		<<elseif $rng gte 51>>
			<<dancestrip>>
		<<elseif $rng gte 31 and $privatedanceoffered isnot 1>>
			<<danceprivate>>

		<</if>>

	<<elseif $audiencearousal gte 81>>
		<<if $rng gte 91>>
			<<dancemolest>>
		<<elseif $rng gte 71>>
			<<dancestrip>>
		<<elseif $rng gte 51 and $privatedanceoffered isnot 1>>
			<<danceprivate>>

		<</if>>

	<<elseif $audiencearousal gte 41>>
		<<if $rng gte 91>>
			<<dancestrip>>
		<<elseif $rng gte 71 and $privatedanceoffered isnot 1>>
			<<danceprivate>>

		<</if>>
	<</if>>

<</if>>

<</if>>

<</if>>

<</nobr>><</widget>>

<<widget "dancerape">><<nobr>>
	<<set $danceevent to "rape">>
	Driven wild by their lust, your audience surges toward you, their eyes filled with a primal hunger.
<</nobr>><</widget>>

<<widget "dancemolest">><<nobr>>
	<<set $danceevent to "molest">><<molested>><<controlloss>>
	<<person1>> The <<person>> reaches out and grasps your waist!
<</nobr>><</widget>>

<<widget "dancestrip">><<nobr>>
	<<if $worn.under_lower.name isnot "naked" and !$worn.under_lower.type.includes("chastity")>>
		<<if $worn.lower.skirt is 1>>
			You spin, your skirt flaring up. Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.under_lower.name.
			<<set $danceevent to "skirtstrip">><<molested>><<controlloss>>
		<<elseif $worn.lower.name isnot "naked">>
			Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.lower.name.
			<<set $danceevent to "lowerstrip">><<molested>><<controlloss>>
		<<elseif $worn.upper.name isnot "naked">>
			Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.upper.name.
			<<set $danceevent to "upperstrip">><<molested>><<controlloss>>
		<<else>>
			Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.under_lower.name.
			<<set $danceevent to "understrip">><<molested>><<controlloss>>
		<</if>>
	<<else>>
		<<if $worn.upper.name isnot "naked">>
			Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.upper.name.
			<<set $danceevent to "upperstrip">><<molested>><<controlloss>>
		<<elseif $worn.lower.name isnot "naked">>
			Lacking in decency, a member of your audience seizes the opportunity and lunges for your $worn.lower.name.
			<<set $danceevent to "lowerstrip">><<molested>><<controlloss>>
		<</if>>
	<</if>>
<</nobr>><</widget>>

<<widget "dancefinish">><<nobr>>
<<if $security_aware>>
	A member of security motions for you to step off the stage. You need only glance at the rowdy and aroused audience to know why.
<<else>><<set $security_aware to 1>>
	A member of security motions for you to step off the stage. You open your mouth to ask why, but you are interrupted, "The crowd is getting a bit rowdy. We need to let them cool off, or we won't be able to protect you." Looking at your audience, you can't help but agree.
<</if>>
	<<set $danceevent to "finish">>

<</nobr>><</widget>>

<<widget "danceprivate">><<nobr>>
	<<person1>>The <<person>> raises <<his>> <<if $pronoun is "m">>wallet,<<else>>purse,<</if>> indicating <<he>> wants to hire your services.
	<<set $danceevent to "private">>
	<<if $promiscuity gte 35>>
	<<else>>
		However, you are not promiscuous enough to take up <<his>> offer.
		<<set $privatedanceoffered to 1>>
	<</if>>
<</nobr>><</widget>>

<<widget "dancelonging">><<nobr>>
	The <<person1>><<person>> gazes at you with longing.
<</nobr>><</widget>>

<<widget "dancenote">><<nobr>>
	<<set $danceevent to "note">>
	<<person1>>The <<person>> holds up a banknote.
<</nobr>><</widget>>

<<widget "dancevip">><<nobr>>
	<<set $danceevent to "vip">>
	<<person2>>A <<person>> wearing an expensive <<if $pronoun is "f">>gown<<else>>suit<</if>> grasps your arm and tugs you closer. Security look away. "They won't bother us," <<he>> says. "They know who I am."
<</nobr>><</widget>>

<<widget "dancestrippertrouble">><<nobr>>
	<<set $danceevent to "strippertrouble">>
	<<person1>>The <<person>> tries to drag another employee off their stage.
<</nobr>><</widget>>

<<widget "dancesalivate">><<nobr>>
	Some of the audience salivate watching you, but a glance at security quells any violent ambitions.
<</nobr>><</widget>>

<<widget "dancesamfinish">><<nobr>>
	<<endevent>><<npc Sam>><<person1>>Sam appears beside your table-stage. "That's enough everyone, this <<girl>> has had enough." <<He>> takes you by the arm and leads you into a back room. "Good job today. Here's a little something extra." You earn £10.
	<<npcincr Sam love 1>><<set $money += 1000>><<set $danceevent to "finish">>
<</nobr>><</widget>>

<<widget "danceleighton">><<nobr>>
	<<set $leightondanceoffered to 1>><<set $danceevent to "leighton">>
	<<if $headblackmailed is 1>>
		"I knew I'd find you here,"
	<<elseif $delinquency gte 400>>
		"So this is why you're missing classes,"
	<<elseif $exposed gte 2 and $exhibitionism gte 75>>
		"I knew you were a slut,"
	<<else>>
		"You look cute up there,"
	<</if>>
	says a familiar voice. It's Leighton, raising a stack of bills.

<</nobr>><</widget>>