code:
:: Widgets Dance Effects [widget]

<<widget "danceeffects">><<nobr>>

<<set $danceevent to 0>>
<<set $audiencemod -= 1>><<set $audiencemod to Math.clamp($audiencemod, 1, 10)>>

<<if $danceaction is "vippush">>
	<<set $danceaction to 0>><<set $audienceexcitement -= 5>>
	You push and twist away from the <<personstop>> "I'm not refused often," <<he>> warns.<<person1>>
<</if>>

<<if $danceaction is "vipallow">>
	<<set $danceaction to 0>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>>
	The <<person>> pulls you to a sitting position and wraps an arm around your waist.
	<<if $worn.under_lower.type.includes("naked") and $worn.lower.skirt is 1>>
		<<His>> hand crawls beneath your skirt, where it finds your exposed <<genitalsstop>> <<He>> brushes <<his>> fingers against it, and the light touch is enough to make you squirm. "Sensitive, aren't you?" <<he>> teases. <<He>> steps aside to give the rest of the audience a better look, but doesn't stop fondling you. <<He>> leans close and whispers. "Maybe I should lift this cute skirt of yours. Then everyone will see."
		<<ggarousal>><<arousal 12>>

	<<elseif $worn.under_lower.type.includes("naked") and $worn.lower.type.includes("naked")>>
		<<His>> hand crawls over your exposed <<genitalsstop>> <<He>> brushes <<his>> fingers against it, and the light touch is enough to make you squirm. "Sensitive, aren't you?" <<he>> teases. <<He>> steps aside to give the rest of the audience a better look, but doesn't stop fondling you.
		<<ggarousal>><<arousal 12>>

	<<elseif !$worn.upper.type.includes("naked")>>
		<<His>> hand crawls over your chest, and <<if $breastsize gte 2>>cups your <<breastsstop>><<else>>rests above your <<breastsstop>><</if>> <<He>> brushes <<his>> fingers against your buds, enough to make your squirm even through your $worn.upper.name. <<He>> steps aside to give the rest of the audience a better look, but doesn't stop fondling you. "Maybe I should <<pullup>> this top of yours." <<He>> whispers. "Let everyone see."
		<<garousal>><<arousal 6>>

	<<else>>
		<<His>> hand crawls over your bare chest, and <<if $breastsize gte 2>>cups your <<breastsstop>><<else>>rests above your <<breastsstop>><</if>> <<He>> brushes <<his>> fingers against your buds, enough to make your squirm. <<He>> steps aside to give the rest of the audience a better look, but doesn't stop fondling you.
		<<garousal>><<arousal 6>>

	<</if>>
	<<if $arousal gte 10000>>
		<<if $worn.under_lower.type.includes("naked") and $worn.lower.skirt is 1 and $penisexist is 1 or $worn.under_lower.type.includes("naked") and $worn.lower.type.includes("naked") and $penisexist is 1>>
			<<orgasmpassage>>
			Your cum arcs towards the audience. A <<person1>><<person>> drops to <<his>> knees and tries to catch it with <<his>> mouth. <<person2>>The <<person>> laughs as <<he>> releases you. <<tearful>> you clamber to your feet.
			<<set $audiencearousal += 15>><<set $audienceexcitement += 15>><<set $audiencemod += 4>><<set $dancespeech to "cum">>
		<<else>>
			<<orgasmpassage>>
			The audience cheers. "Cumming in front of all these people," the <<person>> tuts as <<he>> releases you. <<tearful>> you clamber to your feet.
			<<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $audiencemod += 2>><<set $dancespeech to "cum">>
		<</if>>
	<<else>>
		The audience grow more excited. They suggest the <<person>> perform all sorts of lewd acts, but <<he>> releases you after a few moments. <<tearful>> you clamber to your feet.
		<<set $audiencemod += 1>>
	<</if>>
	<<person1>>
<</if>>

<<if $danceaction is "stripperhelp">>
	<<set $danceaction to 0>><<set $audiencearousal -= 10>><<set $audienceexcitement -= 1>>
	You stop your dance, fold your arms and stare at the <<personstop>> It disrupts the flow of your performance, but <<he>> gets the hint and stops bothering the other dancer. The dancer gives you a grateful smile.
	<<trauma -6>><<ltrauma>><<famegood 1>>
<</if>>

<<if $danceaction is "stripperignore">>
	<<set $danceaction to 0>>
	You turn away from the other dancer.
<</if>>

<<if $danceaction is "noteapproach">>
	<<set $danceaction to 0>>
	<<set $tipmod to 0.6>><<tipset>>
	The <<person>> makes a twirling motion with <<his>> finger. You turn around.
	<<if $rng gte 91>>
		<<if $audience gte 6>>
			Cheered on by the crowd, <<he>>
		<<else>>
			<<He>>
		<</if>>
		reaches up and seizes you by the thighs. <<He>> leans in and kisses your <<bottom>> as
		<<if !$worn.lower.type.includes("naked")>>
			<<if $worn.lower.skirt is 1>>
				<<if $worn.under_lower.type.includes("naked")>>
					<<he>> reaches beneath your skirt and pushes the note between your bare cheeks.
				<<elseif $worn.under_lower.type.includes("chastity")>>
					<<he>> reaches beneath your skirt and pushes the note beneath your chastity belt.
				<<else>>
					<<he>> reaches beneath your skirt and pushes the note into your $worn.under_lower.name.
				<</if>>
			<<else>>
				<<he>> pushes the note into your $worn.lower.name.
			<</if>>
		<<else>>
			<<if $worn.under_lower.type.includes("naked")>>
				<<he>> pushes the note between your bare cheeks.
			<<elseif $worn.under_lower.type.includes("chastity")>>
				<<he>> pushes the note beneath your chastity belt.
			<<else>>
				<<he>> pushes the note into your $worn.under_lower.name.
			<</if>>
		<</if>>
	<<else>>
		<<if !$worn.lower.type.includes("naked")>>
			<<if $worn.lower.skirt is 1>>
				<<if $worn.under_lower.type.includes("naked")>>
					<<He>> reaches beneath your skirt and pushes the note between your bare cheeks.
				<<elseif $worn.under_lower.type.includes("chastity")>>
					<<He>> reaches beneath your skirt and pushes the note beneath your chastity belt.
				<<else>>
					<<He>> reaches beneath your skirt and pushes the note into your $worn.under_lower.name.
				<</if>>
			<<else>>
				<<He>> pushes the note into your $worn.lower.name.
			<</if>>
		<<else>>
			<<if $worn.under_lower.type.includes("naked")>>
				<<He>> pushes the note between your bare cheeks.
			<<elseif $worn.under_lower.type.includes("chastity")>>
				<<He>> pushes the note beneath your chastity belt.
			<<else>>
				<<He>> pushes the note into your $worn.under_lower.name.
			<</if>>
		<</if>>
	<</if>>
	It attracts attention, and others throw money onto the stage.
	<<tipreceive>><<garousal>><<arousal 6>>
<</if>>

<<if $danceaction is "noteignore">>
	<<set $danceaction to 0>>
	You ignore the <<person>> and <<his>> banknote.
<</if>>

<<if $danceaction is "cop">>
	<<set $danceaction to 0>>
	<<arousal 3>><<set $dancespeech to "cop">>
	You let the <<person1>><<person>> feel you up.
	<<if $audience gte 6>>
		Cheered on by the crowd, <<he>>
	<<else>>
		<<He>>
	<</if>>
	reaches round and grips both your nipples between thumb and forefinger while massaging your <<breasts>> with <<his>> remaining digits. They pinch and fondle for a few moments, before running their fingers down your tummy. You tense in anticipation as their hands draw closer to your <<genitalsstop>> However, they release you before things become too lewd, giving your <<bottom>> a swift spank as they do.
<</if>>

<<if $danceaction is "rape">>
	<<set $danceaction to 0>>
	<<arousal 3>><<set $danceevent to "rape">>
	You let the <<person1>><<person>> feel you up.
	<<if $audience gte 6>>
		Cheered on by the crowd, <<he>>
	<<else>>
		<<He>>
	<</if>>
	reaches round and grips both your nipples between thumb and forefinger while massaging your <<breasts>> with <<his>> remaining digits. They pinch and fondle for a few moments, before running their fingers down your tummy. Suddenly, they snatch you from the stage!
<</if>>

<<if $danceaction is "finish">>
	<<set $danceevent to "finish">>
	<<set $danceaction to 0>>
	You decide it's best to quit before the audience becomes too brave. They're disappointed, but they let you pass unmolested.

	<<clotheson>>
<</if>>

<<if $danceaction is "skirtstruggle">>
	<<set $danceaction to 0>>
	You try to hold up your $worn.under_lower.name with one hand while holding down the hem of your skirt with the other. After a brief struggle, you manage to regain control of your clothes, dignity mostly intact.
	<<arousal 1>><<set $worn.under_lower.integrity -= 10>><<set $dancespeech to "struggle">>
	<<if $worn.under_lower.integrity lte 0>>
		Your $worn.under_lower.name are damaged by the struggle however. The ruined fabric soon gives way and the tatters fall to the ground between your legs. A breeze caresses your <<genitalscomma>> covered now only by your $worn.lower.name.
		<<set $audiencemod += 2>><<arousal 1>><<underruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
		<<if $audience gte 3>>
			The audience cheer as they realise your predicament.
		<</if>>
	<</if>>
<</if>>

<<if $danceaction is "skirtsurrender">>
	<<set $danceaction to 0>>
	You hold down the hem of your skirt to give yourself some protection as your $worn.under_lower.name are torn from your thighs. Now bare beneath your $worn.lower.name you move away from further prying, conscious of the fact that your <<genitals>> is dangerously close to being displayed for all to see.
	<<set $audiencemod += 2>><<arousal 2>><<underlowerruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
<</if>>

<<if $danceaction is "upperstruggle">>
	<<set $danceaction to 0>>
	You struggle to prevent your $worn.upper.name being ripped clean from your body. After a brief tussle, you manage to regain control of your clothes, dignity mostly intact.
	<<arousal 1>><<set $worn.upper.integrity -= 10>><<set $dancespeech to "struggle">>
	<<if $worn.upper.integrity lte 0>>
		Your $worn.upper.name was damaged by the struggle however. The ruined fabric soon falls apart, leaving your <<breasts>> exposed for the world to leer at.
		<<arousal 1>><<set $audiencemod += 2>><<set $leftactiondefault to "uppercover">><<upperruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
	<</if>>
<</if>>

<<if $danceaction is "uppersurrender">>
	<<set $danceaction to 0>>
	Your $worn.upper.name is torn from your body, leaving your <<breasts>> exposed for the world to see.
	<<set $audiencemod += 2>><<set $leftactiondefault to "uppercover">><<arousal 2>><<upperruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
<</if>>

<<if $danceaction is "lowerstruggle">>
	<<set $danceaction to 0>>
	You struggle to keep hold of your $worn.lower.name and manage to prevent it from being ripped from your body.
	<<arousal 1>><<set $worn.lower.integrity -= 10>><<set $dancespeech to "struggle">>
	<<if $worn.lower.integrity lte 0>>
		However, the struggle was fierce and you soon find your $worn.lower.name falling from your body in tatters.
		<<arousal 1>><<set $audiencemod += 2>><<set $rightactiondefault to "lowercover">><<lowerruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
		<<if $worn.under_lower.name is "naked">>
			Your breath catches in your throat as your <<genitals>> is revealed for all to see.
			<<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $audiencemod += 2>><<arousal 1>>
			<<if $audience gte 3>>
				Your audience jeers and taunts, pleased at seeing you in such a vulnerable state.
			<</if>>
		<<else>>
			Your $worn.under_lower.name are now exposed, becoming the only thing protecting your <<genitalsstop>>
		<</if>>
	<</if>>
<</if>>

<<if $danceaction is "lowersurrender">>
	<<set $danceaction to 0>>
	Your $worn.lower.name <<lowerplural>> ripped from your body.
	<<arousal 1>><<set $audiencemod += 2>><<set $rightactiondefault to "lowercover">><<lowerruined>><<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $dancespeech to "strip">>
	<<if $worn.under_lower.name is "naked">>
		Your breath catches in your throat as your <<genitals>> is revealed for all to see.
		<<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $audiencemod += 2>><<arousal 1>>
		<<if $audience gte 3>>
			Your audience jeers and taunts, pleased at seeing you in such a vulnerable state.
		<</if>>
	<<else>>
		Your $worn.under_lower.name <<underlowerplural>> now exposed, becoming the only thing protecting your <<genitalsstop>>
	<</if>>
<</if>>

<<if $danceaction is "understruggle">>
	<<set $danceaction to 0>>
	You fight desperately to keep your $worn.under_lower.name held up.
	<<arousal 1>><<set $worn.under_lower.integrity -= 10>><<set $dancespeech to "struggle">>
	<<if $worn.under_lower.integrity lte 0>>
		You are starting to win the tug of war when the fabric tears, throwing you onto the ground minus your underwear. Your breath catches in your throat as your <<genitals>> is revealed for all to see.
		<<set $audiencearousal += 5>><<set $audienceexcitement += 5>><<set $audiencemod += 4>><<arousal 1>><<underlowerruined>><<set $rightactiondefault to "undercover">><<set $dancespeech to "strip">>
		<<if $audience gte 3>>
			Your audience jeers and taunts, pleased at seeing you in such a vulnerable state.
		<</if>>
	<</if>>
<</if>>

<<if $danceaction is "undersurrender">>
	<<set $danceaction to 0>>
	Your $worn.under_lower.name <<underlowerplural>> from you, freeing your <<genitalsstop>>for the world to see. Your heart pounds at the humiliation.
	<<set $audiencearousal += 10>><<set $audienceexcitement += 10>><<set $audiencemod += 4>><<arousal 3>><<underlowerruined>><<set $rightactiondefault to "undercover">><<set $dancespeech to "strip">>
	<<if $audience gte 3>>
		Your audience jeers and taunts, pleased at seeing you in such a vulnerable state.
	<</if>>
<</if>>

<<if $danceaction is "cool">>
	<<set $danceaction to 0>><<set $danceactiondefault to "cool">>
	<<stress -2>><<tiredness 1>><<dancestat>><<set $dancespeech to "dance">>
	<<if $audience gte 1>>
		<<set $audiencearousal += $allure / 2000 + $danceskill / 100>>
		<<set $audienceexcitement += $danceskill / 100>>
	<</if>>
	<<if $danceskill lte 200>>
		Not knowing what else to do, you just bob along rhythmically.
	<<elseif $danceskill lte 400>>
		You try to mimic a fashionable dance you've seen on the internet. You end up feeling and looking a little silly.
	<<elseif $danceskill lte 600>>
		You decide to keep things simple, and focus on making sure you dance with competence.
	<<elseif $danceskill lte 800>>
		You try to mimic a fashionable dance you've seen, and pull it off.
	<<elseif $danceskill lte 999>>
		You dance energetically yet smoothly, each move flowing naturally into the next.
	<<else>>
		You dominate the area with your moves.
	<</if>>

	<<danceskilluse>><<pass 1>>
	<<set $dancephysique += 1>>
	<<if $dancephysique gte 10>>
		<<set $dancephysique -= 10>>
		<<physique>>
	<</if>>
<<elseif $danceaction is "sophisticated">>
	<<set $danceaction to 0>><<set $danceactiondefault to "sophisticated">>
	<<stress -2>><<tiredness 1>><<dancestat>><<set $dancespeech to "dance">>
	<<if $audience gte 1>>
		<<set $audiencearousal += $allure / 3000 + $danceskill / 100>>
		<<set $audienceexcitement += $danceskill / 100>>
	<</if>>
	<<if $danceskill lte 200>>
		You sway around in what you hope is a refined manner.
	<<elseif $danceskill lte 400>>
		You assume a refined posture, then sway around in what you hope is a refined manner.
	<<elseif $danceskill lte 600>>
		You focus on maintaining balance as you twirl and glide.
	<<elseif $danceskill lte 800>>
		Without sacrificing poise, you move with speed and confidence.
	<<elseif $danceskill lte 999>>
		The serenity with which you move conceals the confidence and focus of your mind.
	<<else>>
		You are the very model of dignity as you pirouette.
	<</if>>

	<<danceskilluse>><<pass 1>>
	<<set $dancephysique += 1>>
	<<if $dancephysique gte 10>>
		<<set $dancephysique -= 10>>
		<<physique>>
	<</if>>
<<elseif $danceaction is "seductive">>
	<<set $danceaction to 0>><<set $danceactiondefault to "seductive">>
	<<stress -2>><<tiredness 1>><<exhibitionism1>><<dancestat>><<set $dancespeech to "dance">>
	<<if $audience gte 1>>
		<<set $audiencearousal += $allure / 1000 + $danceskill / 100>>
		<<set $audienceexcitement += $danceskill / 100>>
	<</if>>
	<<if $danceskill lte 200>>
		You try to dance seductively, but look more silly than sexy.
	<<elseif $danceskill lte 400>>
		You dance slowly and daintily, trying to emphasise your beauty.
	<<elseif $danceskill lte 600>>
		Your dance moves emphasise the beauty of your body.
	<<elseif $danceskill lte 800>>
		You dance smoothly yet suggestively.
	<<elseif $danceskill lte 999>>
		You dance with grace and eroticism, showcasing your body.
	<<else>>
		Your beguiling movements give little away yet promise the world.
	<</if>>

	<<danceskilluse>><<pass 1>>
	<<set $dancephysique += 1>>
	<<if $dancephysique gte 10>>
		<<set $dancephysique -= 10>>
		<<physique>>
	<</if>>
<<elseif $danceaction is "sexual">>
	<<set $danceaction to 0>><<set $danceactiondefault to "sexual">>
	<<stress -2>><<tiredness 1>><<exhibitionism2>><<dancestat>><<set $dancespeech to "dance">>
	<<if $audience gte 1>>
		<<set $audiencearousal += $allure / 500 + $danceskill / 100>>
		<<set $audienceexcitement += $danceskill / 100>>
	<</if>>
	<<if $danceskill lte 200>>
		You try to dance provocatively. Due to your lack of skill, this amounts to little more than waving your buttocks around.
	<<elseif $danceskill lte 400>>
		You shake your assets, giving a show to anyone who looks.
	<<elseif $danceskill lte 600>>
		You dance flirtatiously, your movements emphasising your lewder parts.
	<<elseif $danceskill lte 800>>
		You dance skilfully and provocatively, your movements emphasising your lewder parts.
	<<elseif $danceskill lte 999>>
		You dance skilfully and provocatively, your entire body advertising a raw sexual energy.
	<<else>>
		Your moves radiate a primal and intoxicating sexuality.
	<</if>>

	<<danceskilluse>>
	<<pass 1>>
	<<set $dancephysique += 1>>
	<<if $dancephysique gte 10>>
		<<set $dancephysique -= 10>>
		<<physique>>
	<</if>>
<<elseif $danceaction is "groom">>
	<<set $audiencearousal += 4>><<set $audienceexcitement += 4>><<set $audiencemod += 1>><<set $danceactiondefault to "groom">>
	<<if $neckgoo gte 1>>
		<<set $neckgoo -= 1>>
		You groom yourself, scooping up the slime on your neck and lapping it off your hands.
	<<elseif $rightarmgoo gte 1>>
		<<set $rightarmgoo -= 1>>
		You groom yourself, lapping slime off your right arm.
	<<elseif $leftarmgoo gte 1>>
		<<set $leftarmgoo -= 1>>
		You groom yourself, lapping slime off your left arm.
	<<elseif $thighgoo gte 1>>
		<<set $thighgoo -= 1>>
		You groom yourself, scooping up the slime on your thighs and lapping it off your hands.
	<<elseif $bottomgoo gte 1>>
		<<set $bottomgoo -= 1>>
		You groom yourself, scooping up the slime on your <<bottom>> and lapping it off your hands.
	<<elseif $tummygoo gte 1>>
		<<set $tummygoo -= 1>>
		You groom yourself, scooping up the slime on your tummy and lapping it off your hands.
	<<elseif $chestgoo gte 1>>
		<<set $chestgoo -= 1>>
		You groom yourself, scooping up the slime on your chest and lapping it off your hands.
	<<elseif $facegoo gte 1>>
		<<set $facegoo -= 1>>
		You groom yourself, scooping up the slime on your face and lapping it off your hands.
	<<elseif $hairgoo gte 1>>
		<<set $hairgoo -= 1>>
		You groom yourself, scooping up the slime on your hair and lapping it off your hands.
	<<elseif $feetgoo gte 1>>
		<<set $feetgoo -= 1>>
		You groom yourself, scooping up the slime on your feet and lapping it off your hands.
	<<elseif $vaginaoutsidegoo gte 1>>
		<<set $vaginaoutsidegoo -= 1>>
		You groom yourself, scooping up the slime on your <<pussy>> and lapping it off your hands.
	<<elseif $penisgoo gte 1>>
		<<set $penisgoo -= 1>>
		You groom yourself, scooping up the slime on your <<penis>> and lapping it off your hands.
	<<elseif $necksemen gte 1>>
		<<set $necksemen -= 1>>
		You groom yourself, scooping up the semen on your neck and lapping it off your hands.
	<<elseif $rightarmsemen gte 1>>
		<<set $rightarmsemen -= 1>>
		You groom yourself, lapping semen off your right arm.
	<<elseif $leftarmsemen gte 1>>
		<<set $leftarmsemen -= 1>>
		You groom yourself, lapping semen off your left arm.
	<<elseif $thighsemen gte 1>>
		<<set $thighsemen -= 1>>
		You groom yourself, scooping up the semen on your thighs and lapping it off your hands.
	<<elseif $bottomsemen gte 1>>
		<<set $bottomsemen -= 1>>
		You groom yourself, scooping up the semen on your <<bottom>> and lapping it off your hands.
	<<elseif $tummysemen gte 1>>
		<<set $tummysemen -= 1>>
		You groom yourself, scooping up the semen on your tummy and lapping it off your hands.
	<<elseif $chestsemen gte 1>>
		<<set $chestsemen -= 1>>
		You groom yourself, scooping up the semen on your chest and lapping it off your hands.
	<<elseif $facesemen gte 1>>
		<<set $facesemen -= 1>>
		You groom yourself, scooping up the semen on your face and lapping it off your hands.
	<<elseif $hairsemen gte 1>>
		<<set $hairsemen -= 1>>
		You groom yourself, scooping up the semen on your hair and lapping it off your hands.
	<<elseif $feetsemen gte 1>>
		<<set $feetsemen -= 1>>
		You groom yourself, scooping up the semen on your feet and lapping it off your hands.
	<<elseif $vaginaoutsidesemen gte 1>>
		<<set $vaginaoutsidesemen -= 1>>
		You groom yourself, scooping up the semen on your <<pussy>> and lapping it off your hands.
	<<elseif $penissemen gte 1>>
		<<set $penissemen -= 1>>
		You groom yourself, scooping up the semen on your <<penis>> and lapping it off your hands.
	<</if>>
	<<pass 1>>
<<elseif $danceaction is "privaterefuse">>
	You ignore the potential client.
<</if>>
<<dancestripeffects>>

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

:: Widgets Dance Speech [widget]
<<widget "dancespeech">><<nobr>>
<<set $rng to random(1, 100)>>
<<if $audience is 1>>
	<<person1>><<He>> shouts.
<<elseif $audience is 2>>
	<<if $rng gte 51>>
	The <<person1>><<person>> shouts.
	<<else>>
	The <<person2>><<person>> shouts.
	<</if>>
<<elseif $audience is 3>>
	<<if $rng gte 71>>
		The <<person1>><<person>> shouts.
	<<elseif $rng gte 41>>
		The <<person2>><<person>> shouts.
	<<else>>
		The <<person3>><<person>> shouts.
	<</if>>
<<elseif $audience gte 4>>
	<<if $rng gte 71>>
		A <<person1>><<person>> shouts.
	<<elseif $rng gte 36>>
		A <<person2>><<person>> shouts.
	<<else>>
		A <<person3>><<person>> shouts.
	<</if>>
<</if>>

<<if $dancespeechselector is 1>>
	<<set $dancespeechselector to 2>>
<<elseif $dancespeechselector is 2>>
	<<set $dancespeechselector to 3>>
<<else>>
	<<set $dancespeechselector to 1>>
<</if>>

<<if $audience isnot 0>>
	<<if $dancespeechselector is 1>>
		<<set $rng to random(1, 100)>>
		<<if $dancespeech is "cop">>
			<<if $rng gte 76>>
				"I bet you love being groped."
			<<elseif $rng gte 51>>
				"Aww, I think <<pshes>> shy."
			<<elseif $rng gte 26>>
				"You can't display yourself like this without people wanting a taste."
			<<else>>
				"You like being fondled, don't you."
			<</if>>
		<<elseif $dancespeech is "cum">>
			<<if $rng gte 76>>
				"<<pShe>> must be a right slut to cum on stage like that."
			<<elseif $rng gte 51>>
				"Did <<pshe>> really just cum?"
			<<elseif $rng gte 26>>
				"Seeing lewd <<girls>> orgasm is so much better in person."
			<<else>>
				"I bet you got another orgasm in you."
			<</if>>
		<<elseif $dancespeech is "struggle">>
			<<if $rng gte 76>>
				"I love it when they struggle."
			<<elseif $rng gte 51>>
				"Come on! Take it off!"
			<<elseif $rng gte 26>>
				"Hurry up and strip, I don't have all day."
			<<else>>
				"Don't be a tease, let's see some skin."
			<</if>>
		<<elseif $dancespeech is "strip">>
			<<if $rng gte 76>>
				"I bet you wish you had something to cover up with."
			<<elseif $rng gte 51>>
				"<<pShe>> looks better with less clothes."
			<<elseif $rng gte 26>>
				"You must be a massive perv to strip in front of strangers."
			<<else>>
				"Getting stripped on stage, you have no dignity."
			<</if>>
		<<elseif $dancespeech is "dance">>
			<<if $danceskill gte 800>>
				<<if $rng gte 76>>
					"This <<girl>> can really move."
				<<elseif $rng gte 51>>
					"<<pShe>> really knows how to show it all off."
				<<elseif $rng gte 26>>
					"You're a fantastic dancer."
				<<else>>
					"Think <<pshe>> fucks as well as <<pshe>> dances?"
				<</if>>
			<<elseif $danceskill gte 400>>
				<<if $rng gte 76>>
					"You'd almost be worth watching even if you weren't hot."
				<<elseif $rng gte 51>>
					"This <<girl>> ain't a bad dancer."
				<<elseif $rng gte 26>>
					"Love watching these sluts shake their assets around."
				<<else>>
					"I bet <<pshes>> loving the attention."
				<</if>>
			<<elseif $danceskill gte 200>>
				<<if $rng gte 76>>
					"You can keep to a rhythm, at least."
				<<elseif $rng gte 51>>
					"<<pHer>> dancing is so boring."
				<<elseif $rng gte 26>>
					"Stop dancing and do something lewd."
				<<else>>
					"You can't really dance <<bitchstop>> You might be an acceptable fucktoy."
				<</if>>
			<<else>>
				<<if $rng gte 76>>
					"I could do a better job than this <<bitchstop>> I have some dignity though."
				<<elseif $rng gte 51>>
					"Where'd this slut learn to dance? The zoo?"
				<<elseif $rng gte 26>>
					"They must let anyone up there."
				<<else>>
					"You'd be pretty hot if it weren't for the awful dancing."
				<</if>>
			<</if>>
		<<else>>
			<<if $rng gte 76>>
				"You must be a right slut to get up on stage like that."
			<<elseif $rng gte 51>>
				"You're pretty hot <<girlcomma>> but I bet you know that."
			<<elseif $rng gte 26>>
				"I think this <<bitch>> is in need of a good seeing to."
			<<else>>
				"Do something naughty."
			<</if>>
		<</if>>
	<<elseif $dancespeechselector is 2>>
		<<set $rng to random(1, 100)>>
		<<if $rng gte 51>>
			<<if $worn.upper.type.includes("naked")>>
				<<if $breastsize lte 0>>
					<<if $player.appearance is "m">>
						<<set $rng to random(1, 100)>>
						<<if $rng gte 76>>
							"Imagine that sleek chest being fondled from all angles."
						<<elseif $rng gte 51>>
							"I wanna lick the sweat off his chest."
						<<elseif $rng gte 26>>
							"He must like being exposed in front of a crowd."
						<<else>>
							"I bet you love having your nipples toyed with."
						<</if>>
					<<else>>
						<<set $rng to random(1, 100)>>
						<<if $rng gte 76>>
							"Your chest is so sleek, I'd think you a boy if I didn't know better."
							<<insecurity "breasts_tiny" 1>><<ginsecurity "breasts_tiny">>
						<<elseif $rng gte 51>>
							"Small tits are delicious."
							<<insecurity "breasts_tiny" 1>><<ginsecurity "breasts_tiny">>
						<<elseif $rng gte 26>>
							"Such small boobs must make dancing easier."
							<<insecurity "breasts_tiny" 1>><<ginsecurity "breasts_tiny">>
						<<else>>
							"I bet you love having your nipples toyed with."
						<</if>>
					<</if>>
				<<elseif $breastsize lte 5>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"Nice tits."
					<<elseif $rng gte 51>>
						"Those are some nicely shaped breasts. A bit small though."
						<<insecurity "breasts_small" 1>><<ginsecurity "breasts_small">>
					<<elseif $rng gte 26>>
						"<<pHer>> small tits really add to the dance."
						<<insecurity "breasts_small" 1>><<ginsecurity "breasts_small">>
					<<else>>
						"<<pShes>> so confident, exposing <<pher>> small breasts like that."
						<<insecurity "breasts_small" 1>><<ginsecurity "breasts_small">>
					<</if>>
				<<elseif $breastsize lte 7>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"I wonder what those breasts feel like."
						<<if $player.gender is "m">><<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">><</if>>
					<<elseif $rng gte 51>>
						"I bet your tits make great pillows."
						<<if $player.gender is "m">><<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">><</if>>
					<<elseif $rng gte 26>>
						"You're such a slut, shaking your tits around like this."
						<<if $player.gender is "m">><<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">><</if>>
					<<else>>
						"I bet your tits taste wonderful."
						<<if $player.gender is "m">><<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">><</if>>
					<</if>>
				<<else>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"Shake those udders!"
						<<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">>
					<<elseif $rng gte 51>>
						"Dancing with tits that big must be difficult."
						<<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">>
					<<elseif $rng gte 26>>
						"Those huge tits are mesmerising."
						<<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">>
					<<else>>
						"Those breasts were made to be shown off."
						<<insecurity "breasts_big" 1>><<ginsecurity "breasts_big">>
					<</if>>
				<</if>>
			<<else>>
				<<set $rng to random(1, 100)>>
				<<if $rng gte 76>>
					"Take your $worn.upper.name off, <<girls>> like you don't need clothes anyway."
				<<elseif $rng gte 51>>
					"Let's see some more skin."
				<<elseif $rng gte 26>>
					"Are you some sort of prude? Take your $worn.upper.name off."
				<<else>>
					"Strip your $worn.upper.name, I wanna see your chest."
				<</if>>
			<</if>>
		<<elseif $rng gte 1>>
			<<if $worn.lower.type.includes("naked")>>
				<<if $worn.under_lower.type.includes("naked")>>
					<<if $penisexist is 1>>
						<<set $rng to random(1, 100)>>
						<<if $penissize gte 4>>
							<<if $rng gte 76>>
								"Look at <<pher>> gigantic penis flop around!"
								<<insecurity "penis_big" 1>><<ginsecurity "penis_big">>
							<<elseif $rng gte 51>>
								"<<pHer>> penis is so big. I can't look away."
								<<insecurity "penis_big" 1>><<ginsecurity "penis_big">>
							<<elseif $rng gte 26>>
								"I want to suck that <<peniscomma>> but I don't think it would fit."
								<<insecurity "penis_big" 1>><<ginsecurity "penis_big">>
							<<else>>
								"I bet you love showing off your <<penisstop>>"
								<<insecurity "penis_big" 1>><<ginsecurity "penis_big">>
							<</if>>
						<<elseif $penissize is 3>>
							<<if $rng gte 76>>
								"Look at <<pher>> <<penis>> flop around!"
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<elseif $rng gte 51>>
								"What's it like having your <<penis>> out in front of all these strangers?"
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<elseif $rng gte 26>>
								"Your <<penis>> is so cute. I want to taste it."
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<else>>
								"I bet you love having your <<penis>> ogled."
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<</if>>
						<<elseif $penissize is 2>>
							<<if $rng gte 76>>
								"Look at <<pher>> <<penis>> flop around!"
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<elseif $rng gte 51>>
								"What's it like having your <<penis>> out in front of all these strangers?"
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<elseif $rng gte 26>>
								"You've such a cute <<peniscomma>> I want to taste it."
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<<else>>
								"I bet you love having your <<penis>> ogled."
								<<if $player.gender is "f">><<insecurity "penis_big" 1>><<ginsecurity "penis_big">><</if>>
							<</if>>
						<<elseif $penissize is 1>>
							<<if $rng gte 76>>
								"<<pHer>> penis is so small!"
								<<insecurity "penis_small" 1>><<ginsecurity "penis_small">>
							<<elseif $rng gte 51>>
								"What's it like having your <<penis>> out in front of all these strangers?"
								<<insecurity "penis_small" 1>><<ginsecurity "penis_small">>
							<<elseif $rng gte 26>>
								"You've such a cute <<peniscomma>> I want to taste it."
								<<insecurity "penis_small" 1>><<ginsecurity "penis_small">>
							<<else>>
								"I bet you love having your <<penis>> ogled."
								<<insecurity "penis_small" 1>><<ginsecurity "penis_small">>
							<</if>>
						<<else>>
							<<if $rng gte 76>>
								"<<pHer>> penis is so tiny!"
								<<insecurity "penis_tiny" 1>><<ginsecurity "penis_tiny">>
							<<elseif $rng gte 51>>
								"What's it like having your <<penis>> out in front of all these strangers?"
								<<insecurity "penis_tiny" 1>><<ginsecurity "penis_tiny">>
							<<elseif $rng gte 26>>
								"I've never seen such a tiny cock."
								<<insecurity "penis_tiny" 1>><<ginsecurity "penis_tiny">>
							<<else>>
								"I bet you love having your <<penis>> ogled."
								<<insecurity "penis_tiny" 1>><<ginsecurity "penis_tiny">>
							<</if>>
						<</if>>
					<<else>>
						<<set $rng to random(1, 100)>>
						<<if $rng gte 76>>
							"You love showing off your <<pussycomma>> don't you."
						<<elseif $rng gte 51>>
							"What's it like having your <<pussy>> out in front of all these strangers?"
						<<elseif $rng gte 26>>
							"You've such a cute <<pussycomma>> I want to taste it."
						<<else>>
							"I bet you love having your <<pussy>> ogled."
						<</if>>
					<</if>>
				<<elseif $worn.under_lower.type.includes("chastity")>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"Where's your master keep the key?"
					<<elseif $rng gte 51>>
						"Nice belt. Are you being punished for being a slut?"
					<<elseif $rng gte 26>>
						"<<pShes>> locked up tight."
					<<else>>
						"I bet you're aching for someone to rip that belt off and fuck you senseless."
					<</if>>
				<<else>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"I wonder what <<pher>> $worn.under_lower.name smell like."
					<<elseif $rng gte 51>>
						"Hey <<bitchcomma>> chuck us your $worn.under_lower.name."
					<<elseif $rng gte 26>>
						"Those $worn.under_lower.name don't conceal much."
					<<else>>
						"<<pShes>> so exposed, I love it."
					<</if>>
				<</if>>
			<<else>>
				<<if $worn.lower.skirt is 1>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"Give us a peak beneath your skirt."
					<<elseif $rng gte 51>>
						"Twirl faster <<girlcomma>> lets see that skirt flare."
					<<elseif $rng gte 26>>
						"I love it when they dance in skirts."
					<<else>>
						"Let me get closer, I want to look up <<pher>> skirt."
					<</if>>
				<<else>>
					<<set $rng to random(1, 100)>>
					<<if $rng gte 76>>
						"Take those $worn.lower.name off <<girlstop>>"
					<<elseif $rng gte 51>>
						"I bet you aren't wearing underwear. Prove me wrong."
					<<elseif $rng gte 26>>
						"You must be getting warm with all that movement, why not take off your $worn.lower.name?"
					<<else>>
						"Those $worn.lower.name are cute, but you'd be cuter without them."
					<</if>>
				<</if>>
			<</if>>
		<</if>>
	<<else>>
		<<set $rng to random(1, 100)>>
		<<if $audienceexcitement gte 100>>
			<<if $audiencearousal gte 100>>
				"You're an angel <<girlstop>> Have you come down for a rough fucking?"
			<<elseif $audiencearousal gte 80>>
				"I want to fuck <<phim>> but don't want to interrupt <<pher>> dance."
			<<elseif $audiencearousal gte 60>>
				"<<pShes>> the perfect <<girlstop>>"
			<<elseif $audiencearousal gte 40>>
				"<<pShes>> so beautiful."
			<<elseif $audiencearousal gte 20>>
				"I wonder if <<pshes>> for sale."
			<<else>>
				"<<pShes>> so graceful, I'm entranced."
			<</if>>
		<<elseif $audienceexcitement gte 81>>
			<<if $audiencearousal gte 100>>
				"<<pShes>> so lovely, I don't think I can hold back."
			<<elseif $audiencearousal gte 80>>
				"I want <<phim>> all to myself."
			<<elseif $audiencearousal gte 60>>
				"More! Show us more!"
			<<elseif $audiencearousal gte 40>>
				"I bet you know lewder moves than this."
			<<elseif $audiencearousal gte 20>>
				"I don't think you're as innocent as you look."
			<<else>>
				"<<pShes>> a lot better than the usual sluts we get here."
			<</if>>
		<<elseif $audienceexcitement gte 61>>
			<<if $audiencearousal gte 100>>
				"This <<girl>> needs a good fuck."
			<<elseif $audiencearousal gte 80>>
				"I wonder how much <<pshe>> is."
			<<elseif $audiencearousal gte 60>>
				"You're pretty hot, <<girlstop>>"
			<<elseif $audiencearousal gte 40>>
				"Damn, I need to get me a <<girl>> like this."
			<<elseif $audiencearousal gte 20>>
				"Shake that <<bottom>> for me!"
			<<else>>
				"This <<girl>> is pretty good."
			<</if>>
		<<elseif $audienceexcitement gte 41>>
			<<if $audiencearousal gte 100>>
				"Anyone else feel like dragging <<phim>> off the stage and giving <<phim>> a good fucking?"
			<<elseif $audiencearousal gte 80>>
				"Really wish I could afford this slut."
			<<elseif $audiencearousal gte 60>>
				"I bet <<pshes>> an easy fuck."
			<<elseif $audiencearousal gte 40>>
				"<<pShes>> pretty cool, I guess."
			<<elseif $audiencearousal gte 20>>
				"Where can I get me a <<bitch>> like this?"
			<<else>>
				"You can dance, but how about you show us a bit more?"
			<</if>>
		<<elseif $audienceexcitement gte 21>>
			<<if $audiencearousal gte 100>>
				"I got something for you, <<bitchstop>>" <<He>> gestures at <<his>> crotch.
			<<elseif $audiencearousal gte 80>>
				"I really want to see <<phim>> get ravaged."
			<<elseif $audiencearousal gte 60>>
				"Do you think <<pshe>> would be cheap to fuck?"
			<<elseif $audiencearousal gte 40>>
				"Dance harder, let's see some sweat."
			<<elseif $audiencearousal gte 20>>
				"Do something lewder."
			<<else>>
				"That other <<girl>> was better."
			<</if>>
		<<else>>
			<<if $audiencearousal gte 100>>
				"<<pShe>> can't dance for shit, but I'd fuck <<pher>> brains out anyway."
			<<elseif $audiencearousal gte 80>>
				"It's always funny when these pretty <<girls>> think they can dance."
			<<elseif $audiencearousal gte 60>>
				"<<pShe>> can't dance, but at least <<pshes>> hot."
			<<elseif $audiencearousal gte 40>>
				"<<pShes>> boring, but at least <<pshes>> cute."
			<<elseif $audiencearousal gte 20>>
				"Where'd that cute <<girl>> go? Put <<phim>> back on."
			<<else>>
				<<if $rng gte 76>>
					"Where'd they find these useless sluts anyway?"
				<<elseif $rng gte 51>>
					"Just fuck off and let someone better on."
				<<elseif $rng gte 26>>
					"Who let this idiot up there?"
				<<else>>
					"Get off the stage, <<bitchstop>>"
				<</if>>
			<</if>>
		<</if>>
	<</if>>
<</if>>
<<set $dancespeech to 0>>

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


code:
:: Stalls Ex [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "connudatus">>
You drop to your hands and knees and sneak up to the end of the alleyway. There's a stall carrying fruit very close by, sneaking under it shouldn't be a problem. There's no way to see how easy it will be from that point on though.

You dart beneath the sheet covering the stall. There's another stall adjacent to this one, so you sneak under that one next, leaving the dubious safety of the alley further behind. The market is closely packed so you are able to move quite far, but eventually you come to a gap in the middle of the road. Surrounded by voices, you feel very conscious of your <<nuditystop>>

You peek up and down the road, and see a car parked between the rows of stalls. The owner is busy loading it with boxes. The vehicle barely fits, so should be able to cross by sneaking beneath it, if you're quick. You hasten toward it.

<<set $danger to random(1, 10000)>><<set $dangerevent to 0>>
<<if $danger gte (9900 - $allure)>>
	<<set $rng to random(1, 100)>>
	<<if $rng gte 51>>
<<generate1>><<person1>>You don't get far. A <<person>> picks this moment to look beneath their stall, and immediately spots you. Their initial look of bewilderment quickly turns mischievous. "I didn't know I had any of you in stock. Here's what's going to happen. You're going to <<if $NPCList[0].penis isnot "none">>suck my dick<<else>>lick my pussy<</if>>, and whatever else I feel like, or everyone here will find out what a little harlot you are."

<<link [[Nod|Stalls Ex Molestation]]>><<set $molestationstart to 1>><</link>>

<<link [[Refuse|Stalls Ex Caught]]>><<set $phase to 1>><</link>><<garousal>><<gstress>><<gtrauma>>

	<<else>>
		You arrive at the stall beside the car, but find it gone. You didn't hear it move above the clamour of the market. What you do hear, however, is the stall behind you being moved. You lean over a storm drain and peek beneath the sheet, and see it being carried away by a group of people. You look around for another way out, but this stall now stands alone; you're trapped. The group soon return and surround the stall. You hear one of them speak. "On the count of three..." They're going to move this one too!

		Your only options are to grab hold of the underside of the stall and be carried with it, or take your chances in the storm drain.

		<<commercialdrainquick>>

		<<if $rng gte 26>>
			<<link [[Grab hold of the stall|Stalls Ex Caught]]>><</link>>
		<<else>>
			<<link [[Grab hold of the stall|Stalls Ex Safe]]>><</link>>
		<</if>>
	<</if>>
<<else>>
	You manage to get there in time and, lying prone, shuffle beneath it. You continue to the other side and slink beneath another stall. From there, it's easy to remain concealed as you make your way across the street. Placing your head against the ground, you flick up the cover of the final stall to make sure the way forward is safe. Heart thumping in your chest, you dart into the alleyway, leaving the bustle behind you.

	<<residentialquick>>
<</if>>

:: Stalls Ex Molestation [nobr]

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

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
		<<link [[Next->Stalls Ex Caught]]>><<set $phase to 1>><</link>><<nexttext>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>Intoxicated as you are, you couldn't cry very convincingly.<</if>>

		<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Stalls Ex Molestation Ejaculation]]>><</link>><<nexttext>>
		<<elseif $enemyhealth lte 0>>
			<<link [[Next->Stalls Ex Molestation Escape]]>><</link>><<nexttext>>
		<<else>>
			<<link [[Next->Stalls Ex Molestation]]>><</link>><<nexttext>>
		<</if>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Stalls Ex Molestation Ejaculation]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next->Stalls Ex Molestation Escape]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next->Stalls Ex Molestation]]>><</link>><<nexttext>>
<</if>>

:: Stalls Ex Caught [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "connudatus">>
<<fameexhibitionism 10>><<arousal 6>><<stress 6>><<trauma 6>>
<<if $phase is 1>>
	"Fine," the <<person>> grabs you by the neck and drags you into the daylight. "Look everyone." <<He>> shouts. "Look what I found!" Both hawkers and customers turn to investigate, and see you struggling to stand up, exposed and vulnerable. With nowhere to hide, there's not much you can do but flee.

<<else>>
	You grab the underside of the stall and are hoisted into the air with it. The ride is too bumpy and your grip slips, causing you to drop painfully to the ground. The stall moves on without you, leaving you uncovered in the middle of the crowded street. With nowhere to hide, there's not much you can do but flee.
	<<fameexhibitionism 50>><<set $pain += 10>><<garousal>><<gstress>><<gtrauma>>

<</if>>

You move as quickly as your legs will carry you, trying to escape the laughter, whistling and jeers. You run into an alleyway and round a corner, out of sight of the road, before feeling safe enough to process what just happened. So many people saw you. Your feelings of disgrace are made all the worse by the fluid you feel leaking from your <<genitalsstop>>

<<endevent>>
<<residentialquick>>

:: Stalls Ex Molestation Ejaculation [nobr]

<<ejaculation>>
"You're a fun toy. Okay, you can go." <<He>> leaves you lying beneath the stall. You look around, and see the car still there.

<<clotheson>>
<<endcombat>>
You manage to get there in time and, lying prone, shuffle beneath it. You continue to the other side and slink beneath another stall. From there, it's easy to remain concealed as you make your way across the street. Placing your head against the ground, you flick up the cover of the final stall to make sure the way forward is safe. Heart thumping in your chest, you dart into the alleyway, leaving the bustle behind you.

<<residentialquick>>

:: Stalls Ex Molestation Escape [nobr]

<<effects>>
<<He>> recoils in pain, falling backwards out from beneath the stall. By the time <<He>> recovers, you've managed to put some distance between you.

<<clotheson>>
<<endcombat>>
You manage to get there in time and, lying prone, shuffle beneath it. You continue to the other side and slink beneath another stall. From there, it's easy to remain concealed as you make your way across the street. Placing your head against the ground, you flick up the cover of the final stall to make sure the way forward is safe. Heart thumping in your chest, you dart into the alleyway, leaving the bustle behind you.

<<residentialquick>>

:: Stalls Ex Safe [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "connudatus">>
You grip the underside of the stall as it is hoisted into the air. The journey is smooth, and you are soon placed back onto the ground. Placing your head against the ground, you flick up the cover to see where you were taken. Fortunately, you've been carried the rest of the way across the street. Heart thumping in your chest, you dart into the alleyway, leaving the bustle behind you.

<<residentialquick>>

:: Crate Ex [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "park">>

When no one is looking, you sneak up to the fence between the park and depot. You squeeze through the bars and peer into the nearest open crate. There are several ceramic containers. It'll be tight, but there should be room for you to hide.

You climb into the crate and pull the lid on after you. It's a snug fit, but that might make the journey easier. You wait.

Without warning, the crate lurches into movement.
<<set $danger to random(1, 10000)>><<set $dangerevent to 0>>
<<if $danger gte (9900 - $allure)>>
	The movements jerk you around for a short while before coming to a stop. That wasn't long enough for you to have crossed the road, surely. A heavy thud above you signals that this may have been a mistake. You push against the lid, and find it completely immovable. You hear an engine rev and you lurch into movement once more.

	<<if $rng gte 81>>
		You try to keep calm, surely you won't be moved far. You aren't wrong. The vehicle comes to a stop and you hear the object above you lifted off. You dare a peek, and see your house! The coast looks clear, so you gingerly lift the lid and climb free.

		<<domusquick>>

	<<elseif $rng gte 61>>
		You try to keep calm, surely you won't be moved far. You aren't wrong. The vehicle comes to a stop and you hear the object above you lifted off. You dare a peek, and see the forest. The coast looks clear, so you gingerly lift the lid and climb free.

		<<wolfquick>>

	<<elseif $rng gte 41>>
		You try to keep calm, surely you won't be moved far. You aren't wrong. The vehicle comes to a stop and you hear the object above you lifted off. You dare a peek, and see the ocean. The coast looks clear, so you gingerly lift the lid and climb free.

		<<starfishquick>>

	<<elseif $rng gte 21>>
		You try to keep calm, surely you won't be moved far. Those crates had arrived from outside town after all. You aren't wrong. The vehicle comes to a stop and you hear the object above you lifted off. You dare a peek, and see the road out of town. You've moved in the opposite of your intended direction, but you count yourself lucky considering the circumstances. The coast looks clear, so you gingerly lift the lid and climb free.

		<<harvestquick>>

	<<else>>
		<<if $swarmdisable is "t">>
			You try to keep calm, surely you won't be moved far. Your thoughts are cut short by a bump in the road; your head bashes against the side of the crate, knocking you out.

			<<link [[Next|Danube Meal]]>><<pass 1 hour>><</link>>

		<<else>>
			You try to keep calm, surely you won't be moved far. Your thoughts are cut short by a bump in the road, one of the ceramic containers bashes against the side of the crate, shattering it into pieces and disgorging its contents all over you. In the tumult, you don't realise what the contents are until you feel them wriggling; it was full of thick, long worms! What's more, the remaining containers sway menacingly now that extra space has been cleared. If they too contain worms, you need to act or you'll soon be swimming in them.

			The worms aren't just wriggling on top of you, they press against you as if trying to find a way inside. The movement is making your body respond in a way you don't want to admit, you start to heat up.

			<<link [[Next|Crate Worms]]>><<set $molestationstart to 1>><</link>>
		<</if>>
	<</if>>
<<else>>
	You hear the traffic growing louder, a sign you are moving in the right direction. The crate soon comes to a stop. You gingerly lift the lid and peek out. You are at the mouth of an alleyway on the other side of the street, perfect! You wait until you're sure the coast is clear before slinking out and heading deeper into the alley.

	<<commercialquick>>
<</if>>

:: Crate Worms [nobr]

<<set $outside to 1>><<set $location to "town">><<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 10>>
	<<set $swarm1 to "active">>
	<<set $swarm2 to "contained">>
	<<set $swarm3 to "contained">>
	<<set $swarm4 to "contained">>
	<<set $swarm5 to "contained">>
	<<set $swarm6 to "contained">>
	<<set $swarm7 to "contained">>
	<<set $swarm8 to "contained">>
	<<set $swarm9 to "contained">>
	<<set $swarm10 to "contained">>
	<<set $swarmactive to 1>>
	<<set $timer to 30>>
<</if>>
<<if $timer gte 25>>
	The entire crate shakes from the movement of the vehicle.
<<elseif $timer gte 20>>
	You've stopped, but the engine is still running.
<<elseif $timer gte 10>>
	The entire crate shakes from the movement of the vehicle. How long will this go on for?
<<elseif $timer gte 1>>
	The vehicle has stopped and the engine switched off! The weight above still keeps the crate locked down however. They'll move it soon, right?
<<else>>
	You hear someone move the weight off the top of the crate!
<</if>>

<<swarmeffects>>
<<swarm>>
<<swarmactions>>
<<if $stress gte 10000>>
	<<link [[Next|Crate Worms Passout]]>><</link>><<nexttext>>
<<elseif $timer lte 0>>
	<<link [[Next|Crate Worms Escape]]>><</link>><<nexttext>>
<<else>>
	<<link "Next">><><</link>><<nexttext>>
<</if>>

:: Crate Worms Passout [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "danube">>
It's all just too much for you. You pass out.

<<endcombat>>
<<link [[Next|Danube Meal]]>><<pass 1 hour>><</link>>

:: Crate Worms Escape [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>><<set $bus to "danube">>
<<tearful>> you grasp the top of the crate and haul yourself up, pushing the lid off as you do. Worms cascade from you as you struggle out of your writhing cell, but many remain on you. Fortunately whoever freed you didn't stick around to see you in this state; you're alone. You glance around at your surroundings as you brush off the remaining worms. You appear to be on Danube Street, at the delivery entrance of a stately manor. You hear voices in front of the truck that delivered you, and realise you should leave. You suspect worms will be turning up in strange places for a while.

<<endcombat>>
<<danubequick>>

:: Park Ex Run [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
<<if $daystate is "night">>
	You flee through the darkness, the dog close on your heels. Its barking slowly fades in intensity as you outpace it, until you can hear it no more. You don't think you were seen.
<<else>>
	You flee through the park, the dog close on your heels. The noise attracts attention, and soon all eyes in the vicinity are on you. <<if $leftarm is "bound" and $rightarm is "bound">>With your arms bound, there's nothing you can do to keep your <<lewdness>> covered.<<else>>You do your best to cover your <<lewdness>> with your hands.<</if>> The beast's barking fades in intensity as you outpace it, until you can hear it no more. You dive behind a hedge as someone whistles at you, and crawl away to safety.
	<<fameexhibitionism 50>>
<</if>>
<<physique>>

<<endevent>>
<<parkeventend>>

:: Park Ex Dog Molestation [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "dogpack">>
	<<if $daystate isnot "night">>
		<<set $rescue to 1>>
	<</if>>
	<<beast1init>><<beasttype dog>>
	The growl came from a stray dog. Seeing you stay still, it advances on you.

<</if>>
<<effects>>
<<effectsman>>

<<beast>>

<<stateman>>

<<actionsman>>
<<if $alarm is 1 and $rescue is 1>>
	<<link [[Next|Park Ex Dog Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Park Ex Dog Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next|Park Ex Dog Molestation Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Park Ex Dog Molestation]]>><</link>><<nexttext>>
<</if>>

:: Park Ex Dog Molestation Finish [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
<<if $rescue is 1 and $alarm is 1>>
	<<if $beaststance is "top">>

	<<generate1>><<generate2>><<generate3>><<generate4>><<person1>>"It came from over there." You hear a <<if $pronoun is "m">>male<<else>>female<</if>> voice say. A <<person>> and three others appear from behind the bush. They stare at the dog humping you briefly, not sure what to do. The <<person>> is the first to speak. "Sorry to bother you. We thought we heard a scream. But it looks like you're just having some fun." <<He>> smirks.

	<<if $submissive lte 850>>
	You glare at the <<personstop>> "Shut up, and get this thing off me!" The <<person>> looks dumbfounded at your response, but a <<person2>><<person>> laughs and pushes the dog off of you.
	<<else>>
	You stare at the ground as you speak. "Please help me." A <<person2>><<person>> steps forward and pushes the dog off of you.
	<</if>>

	"Where are you clothes?" <<He>> says. "I have some towels you can have, but you shouldn't be walking around like that in the first place. Someone will hurt you." <<tearful>> you cover up and thank the <<personcomma>> before walking away. You hear them talking about you before you leave earshot.<<famebestiality 50>>

	<<set $rescued += 1>>
	<<clothesontowel>>
	<<endcombat>>

	<<parkeventend>>
	<<else>>

	<<generate1>><<generate2>><<generate3>><<generate4>><<person1>>"It came from over there." You hear a <<if $pronoun is "m">>male<<else>>female<</if>> voice say. A <<person>> and three others appear from behind the bush. They pause briefly when they see you, before the <<person>> shouts at the dog, who whimpers and bounds away. <<fameexhibitionism 10>>

	A <<person2>><<person>> steps forward. "Where are you clothes?" <<He>> says. "I have some towels you can have, but you shouldn't be walking around like that in the first place. Someone will hurt you." <<tearful>> you cover up and thank the <<personcomma>> before walking away. You hear them talking about you before you leave earshot.

	<<set $rescued += 1>>
	<<clothesontowel>>
	<<endcombat>>

	<<parkeventend>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>

<<beastejaculation>>

The beast grunts in satisfaction, and leaves you lying on the grass. <<tearful>> you look around to see if anyone saw you. You don't think they did.

<<clotheson>>
<<endcombat>>

<<parkeventend>>
<<else>>

The beast yelps and flees, its tail between its legs. <<tearful>> you look around to see if anyone saw you. You don't think they did.

<<clotheson>>
<<endcombat>>

<<parkeventend>>
<</if>>
<<set $eventskip to 1>>

:: Commercial Ex Mannequin [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
You <<nervously>> line up beside the mannequins. Hoping to blend in. <<generate1>><<generate2>>A <<person1>><<person>> and <<person2>><<person>> round the corner. The <<person1>><<person>> stares at your <<lewdness>> as <<he>> walks by. "That one looks a little... accurate." You feel self-conscious, but dare not move an inch.

<<endevent>>
<<generate1>><<generate2>>Before the first pair leave view, a <<person1>><<person>> and <<person2>><<person>> pass them by, heading your way. The <<person1>><<person>> stops in front of you. "Look at this one. It's so lifelike. Do you think anyone would notice if we took it?"

<<if $rng gte 81>>
	The <<person2>><<person>> looks up and down the alley. "Alright. But we need to be quick." <<He>> grabs you by the ankles and tries to lift you. "Why is it so heavy? Give us a hand here," the <<person1>><<person>> moves in to help. This isn't what you planned, but you don't know how they'll react if they find out the truth.

	<<link [[Struggle|Commercial Ex Mannequin Molestation]]>><<set $molestationstart to 1>><</link>>

	<<link [[Keep playing the part|Commercial Ex Mannequin 2]]>><</link>>

<<else>>
	"Don't be stupid," the <<person2>><<person>> responds without stopping. The <<person1>><<person>> gives you a longing look, then follows.

	Once they're out of sight, you're free to continue.
	<<gstress>><<garousal>><<stress 2>><<arousal 2>>

	<<endevent>>
	<<commercialeventend>>
<</if>>

:: Commercial Ex Molestation [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<if $leftarm is "bound" and $rightarm is "bound">>
		You crouch to keep your body somewhat concealed as you <<nervously>> continue.
	<<else>>
		You cover your body with your hands as you <<nervously>> continue.
	<</if>>
<<generate1>><<generate2>>A <<person1>><<person>> and <<person2>><<person>> walk round the corner and smile as they behold you in your undressed state. As they pass you, the <<person1>><<person>> grabs you by the mouth and shoves you against a wall.

<<man1init>><<set $mouthuse to "lefthand">><<set $NPCList[0].lefthand to "mouth">>
<<set $rescue to 1>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $enemyhealth lte 0>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<elseif $alarm is 1 and $rescue is 1>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Commercial Ex Molestation]]>><</link>><<nexttext>>
<</if>>

:: Commercial Ex Exhibition [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
<<if $leftarm is "bound" and $rightarm is "bound">>
	You crouch to keep your body somewhat concealed as you <<nervously>> continue.
<<else>>
	You cover your body with your hands as you <<nervously>> continue.
<</if>>
<<generate1>><<generate2>>A <<person1>><<person>> and <<person2>><<person>> walk round the corner and smile as they behold you in your undressed state. They don't say anything, but you can feel their eyes on your body as you round the corner out of view.
<<gtrauma>><<gstress>><<trauma 2>><<stress 2>><<fameexhibitionism 2>>

<<endevent>>
<<commercialeventend>>

:: Commercial Ex Molestation Finish [nobr]

<<effects>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>>
	Satisfied, the <<person1>><<person>> shoves you to the ground. "Serves you right." <<He>> spits. "Walk around like a fucktoy, don't cry when you're treated like one." <<tearful>> you rise to your feet as the pair leave.

	<<clotheson>>
	<<endcombat>>
	<<commercialeventend>>
<<elseif $enemyhealth lte 0>>
	The pair recoil in pain. <<tearful>> you take the chance to run, escaping down the alley.

	<<clotheson>>
	<<endcombat>>
	<<commercialeventend>>
<<elseif $alarm is 1 and $rescue is 1>>
	<<set $rescued += 1>>
	You hear a voice call out. "Is someone in trouble over there?" The pair glance at each other, then drop you to the ground. <<tearful>> you rise to your feet as the pair leave.

	<<clotheson>>
	<<endcombat>>
	<<commercialeventend>>
<</if>>

:: Commercial Ex Mannequin Molestation [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<man1init>>
	You squirm free from their grip. Startled, they shove you against the wall and back off for a moment. The <<person1>><<person>> recovers first. "You think that's funny? I know just the thing to do with a <<bitch>> like you."

	<<set $enemyanger += 80>>
<</if>>
<<set $rescue to 1>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $enemyhealth lte 0>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<elseif $alarm is 1 and $rescue is 1>>
	<<link [[Next|Commercial Ex Molestation Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Commercial Ex Mannequin Molestation]]>><</link>><<nexttext>>
<</if>>

:: Commercial Ex Mannequin 2 [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
The pair grip you by your arms and legs, and start carrying you. <<generate3>><<person3>>They don't get far before a <<person>> arrives at the end of the alley. <<He>> doesn't look amused. "What are you doing with that? It doesn't belong to you." You slump to the ground as the startled pair release you and run away. The <<person>> walks up and kneels beside you. "Oh, this is peculiar," <<he>> says. <<He>> leans forward, until <<his>> breath tickles your face. "You're a pretty little thing. I think I have a place for you." <<He>> presses something soft against your mouth, and you lose consciousness.

<<link [[Next|Abduction Shop]]>><<endevent>><</link>>

:: Industrial Ex Hole [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
<<if $rng gte 81>>
	You drop to your knees and look through the hole. You see another alley, similar to this one, on the other side. Hearing the voices grow louder, you start crawling through the hole.
	<<set $stripintegrity to 10>><<set $stripobject to "broken brick">><<stripobject>>

	It goes well at first. You get your top half through, but your hips are a little too wide. No matter how hard you push, you cannot do it. You try to wiggle backwards, but find you can't move in either direction. You're stuck!

	<<generate1>><<generate2>>You realise the voices have stopped just before something pinches your butt.

	<<link [[Next|Industrial Ex Hole Rape]]>><<set $molestationstart to 1>><</link>>
<<else>>
	You drop to your knees and look through the hole. You see another alley, similar to this one, on the other side. Hearing the voices grow louder, you start crawling through the hole.
	<<set $stripintegrity to 10>><<set $stripobject to "broken brick">><<stripobject>>
	A few moments later and you're free on the other side.

	<<endevent>>
	<<industrialeventend>>
<</if>>

:: Industrial Ex Hide [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>

You crouch behind a dumpster and wait for the voices to pass. Unfortunately, they decide to stop right in front of your hiding place. You peek out and see a <<generate1>><<generate2>><<person1>><<person>> and <<person2>><<personstop>> You stay as still as possible, not wanting to be caught in such a state. They eventually move on, allowing you to continue.

<<endevent>>
<<industrialeventend>>

:: Industrial Ex Hole Rape [nobr]

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<set $event to "molestationhome">>
	<<man1init>><<set $position to "wall">><<set $leftarm to "bound">><<set $rightarm to "bound">><<set $head to "bound">>
	<<set $timer to 16>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $enemyhealth lte 0>>
	<<link [[Next|Industrial Ex Hole Rape Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Industrial Ex Hole Rape Finish]]>><</link>><<nexttext>>
<<elseif $timer lte 1>>
	<<link [[Next|Industrial Ex Hole Rape Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Industrial Ex Hole Rape]]>><</link>><<nexttext>>
<</if>>

:: Industrial Ex Hole Rape Finish [nobr]

<<effects>>
<<if $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>>
	You hear fading laughter behind you, then silence. <<tearful>> you continue to struggle. You feel the wall give way slightly, and you manage to scramble through to the other side.

	<<clotheson>>
	<<endcombat>>
	<<commercialeventend>>
<<elseif $enemyhealth lte 0>>
Fed up with your attitude, one of your attackers kicks your <<bottomcomma>> forcing you through the hole to the other side. <<tearful>> you scramble to your feet.

<<clotheson>>
<<endcombat>>

<<commercialeventend>>

<<else>>

You feel the wall give way slightly. <<tearful>> you manage to struggle through to the other side. "Come back here <<bitchcomma>>" says the <<person1>><<personstop>> "We're not done yet." A hand chases you through, but you manage to avoid it.

<<clotheson>>
<<endcombat>>

<<commercialeventend>>

<</if>>

:: Street Ex Day1 Car [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
You drop to the ground and shuffle beneath a parked car. The vehicle is soon surrounded by people, their feet stepping just inches from you.

<<if $rng gte 81>>
	A few minutes have passed when the engine rumbles into life above you, and the car beings to move. Afraid of being caught surrounded in public with your <<lewdness>> on display, you cling to the underside, allowing it to carry you along. The journey is over soon, and once the driver has vacated you shuffle out into the daylight. You're in the clear for now.

	<<set $rng to random(1, 13)>>
	<<switch $rng>>
	<<case 1>>
		<<set $bus to "nightingale">>
	<<case 2>>
		<<set $bus to "domus">>
	<<case 3>>
		<<set $bus to "elk">>
	<<case 4>>
		<<set $bus to "high">>
	<<case 5>>
		<<set $bus to "starfish">>
	<<case 6>>
		<<set $bus to "barb">>
	<<case 7>>
		<<set $bus to "connudatus">>
	<<case 8>>
		<<set $bus to "wolf">>
	<<case 9>>
		<<set $bus to "harvest">>
	<<case 10>>
		<<set $bus to "oxford">>
	<<case 11>>
		<<set $bus to "danube">>
	<<case 12>>
		<<set $bus to "mer">>
	<<case 13>>
		<<set $bus to "cliff">>
	<</switch>>
<<else>>
	The crowd disperses after a short time. You shuffle back out from beneath the car. You're in the clear for now.

<</if>>
<<endevent>>
<<destinationeventend>>

:: Street Ex Day1 Sprint [nobr]

<<set $outside to 1>><<set $location to "town">><<effects>>
<<if $leftarm is "bound" and $rightarm is "bound">>
	Your arms bound, you can do nothing to cover your <<lewdness>> as you dash for cover. A few heads turn your way, and you hear gasps and laughter as you round a corner to relative safety.
<<else>>
	You cover your <<lewdness>> with your hands and dash for cover. A few heads turn your way, and you hear gasps and laughter as you round a corner to relative safety.
<</if>>

<<endevent>>
<<destinationeventend>>

repo_name: GayKitten/degrees

license: mit


code:
:: Widgets Masturbation Actions [widget]

<<widget "masturbationactions">><<nobr>>

<<if $leftarm is 0>>
Your left hand is free.

	<<if $penisexist gte 1>>
		<<if !$worn.under_lower.type.includes("chastity")>>
			<<if $leftactiondefault is "mpenisentrance">>
		| Fondle your penis <<radiobutton "$leftaction" "mpenisentrance" checked>>
			<<else>>
		| Fondle your penis <<radiobutton "$leftaction" "mpenisentrance">>
			<</if>>
		<<else>>
			<<if $leftactiondefault is "mchastity">>
		| Try to fondle your penis <<radiobutton "$leftaction" "mchastity" checked>>
			<<else>>
		| Try to fondle your penis <<radiobutton "$leftaction" "mchastity">>
			<</if>>
		<</if>>
	<</if>>

	<<if $vaginaexist gte 1>>
		<<if !$worn.under_lower.type.includes("chastity")>>
			<<if $leftactiondefault is "mvaginaentrance">>
		| Fondle your pussy <<radiobutton "$leftaction" "mvaginaentrance" checked>>
			<<else>>
		| Fondle your pussy <<radiobutton "$leftaction" "mvaginaentrance">>
			<</if>>
		<<else>>
			<<if $leftactiondefault is "mchastity">>
		| Try to fondle your pussy <<radiobutton "$leftaction" "mchastity" checked>>
			<<else>>
		| Try to Fondle your pussy <<radiobutton "$leftaction" "mchastity">>
			<</if>>
		<</if>>
	<</if>>

	<<if $awareness gte 100>>
		<<if $leftactiondefault is "mchest">>
	| Fondle your chest <<radiobutton "$leftaction" "mchest" checked>>
		<<else>>
	| Fondle your chest <<radiobutton "$leftaction" "mchest">>
		<</if>>
	<</if>>

	<<if $dev is 1>>
	<<if $awareness gte 100 and $masochism gte 100>>
		<<if $leftactiondefault is "mpinch">>
	| Pinch your nipple <<radiobutton "$leftaction" "mpinch" checked>>
		<<else>>
	| Pinch your nipple <<radiobutton "$leftaction" "mpinch">>
		<</if>>
	<</if>>
	<</if>>

	<<if $awareness gte 200 and $worn.under_lower.anal_shield isnot 1>>
		<<if $leftactiondefault is "manusentrance">>
	| Stroke your anus <<radiobutton "$leftaction" "manusentrance" checked>>
		<<else>>
	| Stroke your anus <<radiobutton "$leftaction" "manusentrance">>
		<</if>>
	<</if>>

<</if>>

<<if $leftarm is "mpenisentrance">>
You hold your <<penis>> in your left hand.

	<<if $leftactiondefault is "mpenisglans">>
| Fondle the glans <<radiobutton "$leftaction" "mpenisglans" checked>>
	<<else>>
| Fondle the glans <<radiobutton "$leftaction" "mpenisglans">>
	<</if>>

	<<if $leftactiondefault is "mpenisshaft">>
| Rub the shaft <<radiobutton "$leftaction" "mpenisshaft" checked>>
	<<else>>
| Rub the shaft <<radiobutton "$leftaction" "mpenisshaft">>
	<</if>>

	<<if $leftactiondefault is "mpenisstop">>
| Move your hand away <<radiobutton "$leftaction" "mpenisstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$leftaction" "mpenisstop">>
	<</if>>

<</if>>

<<if $leftarm is "mvaginaentrance">>
You rub your <<pussy>> with your left hand.

	<<if $worn.lower.vagina_exposed gte 1 and $worn.under_lower.vagina_exposed gte 1>>
		<<if $leftactiondefault is "mvagina">>
	| Push a finger in <<radiobutton "$leftaction" "mvagina" checked>>
		<<else>>
	| Push a finger in <<radiobutton "$leftaction" "mvagina">>
		<</if>>
	<</if>>

	<<if $leftactiondefault is "mvaginaclit">>
| Play with your clit <<radiobutton "$leftaction" "mvaginaclit" checked>>
	<<else>>
| Play with your clit <<radiobutton "$leftaction" "mvaginaclit">>
	<</if>>

	<<if $leftactiondefault is "mvaginastop">>
| Move your hand away <<radiobutton "$leftaction" "mvaginastop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$leftaction" "mvaginastop">>
	<</if>>

<</if>>

<<if $leftarm is "mvagina">>
You tease your <<pussy>> with your left hand.

	<<if $leftactiondefault is "mvaginatease">>
| Tease <<radiobutton "$leftaction" "mvaginatease" checked>>
	<<else>>
| Tease <<radiobutton "$leftaction" "mvaginatease">>
	<</if>>

	<<if $leftactiondefault is "mvaginastop">>
| Move your hand away <<radiobutton "$leftaction" "mvaginastop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$leftaction" "mvaginastop">>
	<</if>>

<</if>>

<<if $leftarm is "manusentrance">>
You tease your anus with your left hand.

	<<if $worn.lower.anus_exposed gte 1 and $worn.under_lower.anus_exposed gte 1>>
		<<if $leftactiondefault is "manus">>
	| Push a finger in <<radiobutton "$leftaction" "manus" checked>>
		<<else>>
	| Push a finger in <<radiobutton "$leftaction" "manus">>
		<</if>>
	<</if>>

	<<if $leftactiondefault is "manusrub">>
| Tease your anus <<radiobutton "$leftaction" "manusrub" checked>>
	<<else>>
| Tease your anus <<radiobutton "$leftaction" "manusrub">>
	<</if>>

	<<if $leftactiondefault is "manusstop">>
| Move your hand away <<radiobutton "$leftaction" "manusstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$leftaction" "manusstop">>
	<</if>>

<</if>>

<<if $leftarm is "manus">>
You tease your anus with your left hand.

	<<if $leftactiondefault is "manustease">>
| Tease <<radiobutton "$leftaction" "manustease" checked>>
	<<else>>
| Tease <<radiobutton "$leftaction" "manustease">>
	<</if>>

	<<if $penisexist is 1>>
		<<if $leftactiondefault is "manusprostate">>
	| Tease your prostate <<radiobutton "$leftaction" "manusprostate" checked>>
		<<else>>
	| Tease your prostate <<radiobutton "$leftaction" "manusprostate">>
		<</if>>
	<</if>>

	<<if $leftactiondefault is "manusstop">>
| Move your hand away <<radiobutton "$leftaction" "manusstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$leftaction" "manusstop">>
	<</if>>

<</if>>

<<if $worn.upper.exposed lte 1>>
	<<if $leftactiondefault is "mupper">>
	| Displace your $worn.upper.name <<radiobutton "$leftaction" "mupper" checked>>
	<<else>>
	| Displace your $worn.upper.name <<radiobutton "$leftaction" "mupper">>
	<</if>>
<</if>>

<<if $worn.lower.exposed lte 1>>
	<<if $leftactiondefault is "mlower">>
	| Displace your $worn.lower.name <<radiobutton "$leftaction" "mlower" checked>>
	<<else>>
	| Displace your $worn.lower.name <<radiobutton "$leftaction" "mlower">>
	<</if>>
<</if>>

<<if $worn.under_lower.exposed lte 0 and !$worn.under_lower.type.includes("chastity")>>
	<<if $worn.lower.state isnot $worn.lower.state_base or $worn.lower.skirt is 1 or $worn.lower.type.includes("naked")>>
		<<if $leftactiondefault is "munder">>
		| Pull down your $worn.under_lower.name <<radiobutton "$leftaction" "munder" checked>>
		<<else>>
		| Pull down your $worn.under_lower.name <<radiobutton "$leftaction" "munder">>
		<</if>>
	<</if>>
<</if>>

<<if $leftactiondefault is "mrest">>
| Rest <<radiobutton "$leftaction" "mrest" checked>>
<<else>>
| Rest <<radiobutton "$leftaction" "mrest">>
<</if>>

<<if $rightarm is 0>>
Your right hand is free.

	<<if $penisexist gte 1>>
		<<if !$worn.under_lower.type.includes("chastity")>>
			<<if $rightactiondefault is "mpenisentrance">>
		| Fondle your penis <<radiobutton "$rightaction" "mpenisentrance" checked>>
			<<else>>
		| Fondle your penis <<radiobutton "$rightaction" "mpenisentrance">>
			<</if>>
		<<else>>
			<<if $rightactiondefault is "mchastity">>
		| Try to fondle your penis <<radiobutton "$rightaction" "mchastity" checked>>
			<<else>>
		| Try to fondle your penis <<radiobutton "$rightaction" "mchastity">>
			<</if>>
		<</if>>
	<</if>>

	<<if $vaginaexist gte 1>>
		<<if !$worn.under_lower.type.includes("chastity")>>
			<<if $rightactiondefault is "mvaginaentrance">>
		| Fondle your pussy <<radiobutton "$rightaction" "mvaginaentrance" checked>>
			<<else>>
		| Fondle your pussy <<radiobutton "$rightaction" "mvaginaentrance">>
			<</if>>
		<<else>>
			<<if $rightactiondefault is "mchastity">>
		| Try to fondle your pussy <<radiobutton "$rightaction" "mchastity" checked>>
			<<else>>
		| Try to fondle your pussy <<radiobutton "$rightaction" "mchastity">>
			<</if>>
		<</if>>
	<</if>>

	<<if $awareness gte 100>>
		<<if $rightactiondefault is "mchest">>
	| Fondle your chest <<radiobutton "$rightaction" "mchest" checked>>
		<<else>>
	| Fondle your chest <<radiobutton "$rightaction" "mchest">>
		<</if>>
	<</if>>

	<<if $awareness gte 200 and $worn.under_lower.anal_shield isnot 1>>
		<<if $rightactiondefault is "manusentrance">>
	| Stroke your anus <<radiobutton "$rightaction" "manusentrance" checked>>
		<<else>>
	| Stroke your anus <<radiobutton "$rightaction" "manusentrance">>
		<</if>>
	<</if>>

<</if>>

<<if $rightarm is "mpenisentrance">>
You hold your <<penis>> in your right hand.

	<<if $rightactiondefault is "mpenisglans">>
| Fondle the glans <<radiobutton "$rightaction" "mpenisglans" checked>>
	<<else>>
| Fondle the glans <<radiobutton "$rightaction" "mpenisglans">>
	<</if>>

	<<if $rightactiondefault is "mpenisshaft">>
| Rub the shaft <<radiobutton "$rightaction" "mpenisshaft" checked>>
	<<else>>
| Rub the shaft <<radiobutton "$rightaction" "mpenisshaft">>
	<</if>>

	<<if $rightactiondefault is "mpenisstop">>
| Move your hand away <<radiobutton "$rightaction" "mpenisstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$rightaction" "mpenisstop">>
	<</if>>

<</if>>

<<if $rightarm is "mvaginaentrance">>
You rub your <<pussy>> with your right hand.

	<<if $worn.lower.vagina_exposed gte 1 and $worn.under_lower.vagina_exposed gte 1>>
		<<if $rightactiondefault is "mvagina">>
	| Push a finger in <<radiobutton "$rightaction" "mvagina" checked>>
		<<else>>
	| Push a finger in <<radiobutton "$rightaction" "mvagina">>
		<</if>>
	<</if>>

	<<if $rightactiondefault is "mvaginaclit">>
| Play with your clit <<radiobutton "$rightaction" "mvaginaclit" checked>>
	<<else>>
| Play with your clit <<radiobutton "$rightaction" "mvaginaclit">>
	<</if>>

	<<if $rightactiondefault is "mvaginastop">>
| Move your hand away <<radiobutton "$rightaction" "mvaginastop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$rightaction" "mvaginastop">>
	<</if>>

<</if>>

<<if $rightarm is "mvagina">>
You tease your <<pussy>> with your right hand.

	<<if $rightactiondefault is "mvaginatease">>
| Tease <<radiobutton "$rightaction" "mvaginatease" checked>>
	<<else>>
| Tease <<radiobutton "$rightaction" "mvaginatease">>
	<</if>>

	<<if $rightactiondefault is "mvaginastop">>
| Move your hand away <<radiobutton "$rightaction" "mvaginastop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$rightaction" "mvaginastop">>
	<</if>>

<</if>>

<<if $rightarm is "manusentrance">>
You tease your anus with your right hand.

	<<if $worn.lower.anus_exposed gte 1 and $worn.under_lower.anus_exposed gte 1>>
		<<if $leftactiondefault is "manus">>
	| Push a finger in <<radiobutton "$rightaction" "manus" checked>>
		<<else>>
	| Push a finger in <<radiobutton "$rightaction" "manus">>
		<</if>>
	<</if>>

	<<if $rightactiondefault is "manusrub">>
| Tease your anus <<radiobutton "$rightaction" "manusrub" checked>>
	<<else>>
| Tease your anus <<radiobutton "$rightaction" "manusrub">>
	<</if>>

	<<if $rightactiondefault is "manusstop">>
| Move your hand away <<radiobutton "$rightaction" "manusstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$rightaction" "manusstop">>
	<</if>>

<</if>>

<<if $rightarm is "manus">>
You tease your anus with your right hand.

	<<if $rightactiondefault is "manustease">>
| Tease <<radiobutton "$rightaction" "manustease" checked>>
	<<else>>
| Tease <<radiobutton "$rightaction" "manustease">>
	<</if>>

	<<if $penisexist is 1>>
		<<if $rightactiondefault is "manusprostate">>
	| Tease your prostate <<radiobutton "$rightaction" "manusprostate" checked>>
		<<else>>
	| Tease your prostate <<radiobutton "$rightaction" "manusprostate">>
		<</if>>
	<</if>>

	<<if $rightactiondefault is "manusstop">>
| Move your hand away <<radiobutton "$rightaction" "manusstop" checked>>
	<<else>>
| Move your hand away <<radiobutton "$rightaction" "manusstop">>
	<</if>>

<</if>>

<<if $worn.upper.exposed lte 1>>
	<<if $rightactiondefault is "mupper">>
	| Displace your $worn.upper.name <<radiobutton "$rightaction" "mupper" checked>>
	<<else>>
	| Displace your $worn.upper.name <<radiobutton "$rightaction" "mupper">>
	<</if>>
<</if>>

<<if $worn.lower.exposed lte 1>>
	<<if $rightactiondefault is "mlower">>
	| Displace your $worn.lower.name <<radiobutton "$rightaction" "mlower" checked>>
	<<else>>
	| Displace your $worn.lower.name <<radiobutton "$rightaction" "mlower">>
	<</if>>
<</if>>

<<if $worn.under_lower.exposed lte 0 and !$worn.under_lower.type.includes("chastity")>>
	<<if $worn.lower.state isnot $worn.lower.state_base or $worn.lower.skirt is 1 or $worn.lower.type.includes("naked")>>
		<<if $rightactiondefault is "munder">>
		| Pull down your $worn.under_lower.name <<radiobutton "$rightaction" "munder" checked>>
		<<else>>
		| Pull down your $worn.under_lower.name <<radiobutton "$rightaction" "munder">>
		<</if>>
	<</if>>
<</if>>

<<if $rightactiondefault is "mrest">>
| Rest <<radiobutton "$rightaction" "mrest" checked>>
<<else>>
| Rest <<radiobutton "$rightaction" "mrest">>
<</if>>

<<if $arousal gte 10000>>
<<orgasmpassage>>
<<promiscuity1>>
<<set $masturbationorgasmstat += 1>>
<<set $masturbationorgasm += 1>>
<<set $purity -= 1>>
<</if>>

<<set $seconds += 10>>
<<if $seconds gte 60>>
<<set $seconds to 0>>
<<pass 1>>
<<set $masturbationtimestat += 1>>
<</if>>

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