code:
:: Service Naked

<<set $outside to 0>><<effects>>
<<generate1>><<person1>>
<<flaunting>> you approach the service station. You take a deep breath, and step through the automatic doors.
<<exhibitionism5>>
<<if $rng gte 51>>
	<<generate2>>
	A <<person>> reads a magazine at the counter. <<He>> doesn't look up as you enter.

	You explore the aisles, looking for the sweets. You hear the doors open again as you find them. Someone else is in the shop.
	<<garousal>><<arousal 600>>

	You walk to the end of the aisle, and peek around the corner, unsure if you'll find the newcomer. You hear a thud behind you. A <<person2>><<person>> stands there, <<his>> shopping basket on the floor beside <<him>> and <<his>> mouth agape. <<covered>>

	<<He>> glances in the direction of the counter, then smiles and walks towards you. "A naked <<girl>> in a shop," <<he>> says. "In the middle of the night to boot. I'd best satisfy you before you get yourself hurt."

	<<fameexhibitionism 1>>
	<<link [[Allow it|Service Allow]]>><<arousal 5000>><</link>><<gggarousal>>

	<<link [[Refuse|Service Refuse]]>><</link>>

<<else>>
	A <<person>> reads a magazine at the counter. <<He>> glances up as you enter, then looks again, a shocked expression on <<his>> face.
	<<covered>>
	<<fameexhibitionism 1>>
	<<if $submissive gte 1150>>
		"Sorry to bother you," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "Do you sell sweets?"
	<<elseif $submissive lte 850>>
		"Yo," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "You sell sweets?"
	<<else>>
		"Excuse me," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "Do you sell sweets?"
	<</if>>

	"I-I-", the <<person>> stutters, trying to remain focused on your face. "S-sure. I mean, y-yes. Just there." <<He>> points at one of the aisles.

	You find a selection of penny sweets. You bend over to examine the labels, sticking your <<bottom>> in the <<persons>> direction. You return to the <<person>> once your bag is filled. <<He>> wipes <<his>> brow.

	"W-would you like some money?" <<he>> asks. <<He>> fumbles in the register, and puts £100 in front of you. "I'll give you some if you pose for me. On the counter."

	<<link [[Accept|Service Pose]]>><</link>><<exhibitionist5>>

	<<link [[Refuse|Service Pose Refuse]]>><</link>>

<</if>>

:: Service Undies

<<set $outside to 1>><<effects>>
<<generate1>><<person1>>
<<flaunting>> you approach the service station. You take a deep breath, and step through the automatic doors.
<<exhibitionism3>>

<<if $rng gte 51>>
	<<generate2>>
	A <<person>> reads a magazine at the counter. <<He>> doesn't look up as you enter.

	You explore the aisles, looking for the sweets. You hear the doors open again as you find them. Someone else is in the shop.
	<<garousal>><<arousal 600>>

	You walk to the end of the aisle, and peek around the corner, unsure if you'll find the newcomer. You hear a thud behind you. A <<person2>><<person>> stands there, <<his>> shopping basket on the floor beside <<him>> and <<his>> mouth agape. <<covered>>

	A minute later you're back outside, a lollipop in your mouth, paid for by the <<person>>.
	<<lstress>><<stress -6>>

	<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>

<<else>>
	<<fameexhibitionism 1>>
	A <<person>> reads a magazine at the counter. <<He>> glances up as you enter, then looks again, a shocked expression on <<his>> face. <<covered>>

	<<if $submissive gte 1150>>
		"Sorry to bother you," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "Do you sell sweets?"
	<<elseif $submissive lte 850>>
		"Yo," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "You sell sweets?"
	<<else>>
		"Excuse me," you say, approaching the <<person>>. You try to remain nonchalant, but you feel your knees shake. "Do you sell sweets?"
	<</if>>

	"I-I-", the <<person>> stutters, trying to remain focused on your face. "S-sure. I mean, y-yes. Just there." <<He>> points at one of the aisles.

	You find a selection of penny sweets. You bend over to examine the labels, sticking your <<bottom>> in the <<persons>> direction. You return to the <<person>> once your bag is filled. Sweat rolls down the side of <<his>> face.

	<<He>> lets you have the sweets without charge. You thank <<him>> before leaving the service station, a boiled sweet in your mouth.
	<<lstress>><<stress 6>>

	<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>

<</if>>

:: Service Allow
<<effects>>

You remain where you're stood, and don't protest as the <<person2>><<person>> reaches for your <<breasts>>.

<<if $breastsize gte 6>>
	"These are a nice size," <<he>> whispers as <<he>> cups and fondles them.
<<elseif $breastsize gte 3>>
	"These are so cute," <<he>> whispers as <<he>> fondles and teases.
<<else>>
	"I bet these are sensitive, aren't they?" <<he>> whispers as <<he>> teases and pinches.
<</if>>
"Walking around exposed like this. It's foolish, but I'm not gonna complain." <<His>> fingers wander down your abdomen, until they brush your <<genitals>>.

<<if $worn.genitals.type.includes("chastity")>>
	"I guess you're a bit safer with this thing on," <<he>> says, holding the rim and tugging it up, against your <<genitals 1>>.
<<elseif $player.penisExist and $player.vaginaExist>>
	"You're not worried to be enticing people? With a cock and pussy, both unprotected?" <<he>> whispers, running <<his>> fingers over the length of your <<penis>>.
<<elseif $player.penisExist>>
	"You're not worried to be enticing people? With your cock so unprotected?" <<he>> whispers, running <<his>> fingers over the length of your <<penis>>.
<<else>>
	"You're not worried to be enticing people? With your pussy so unprotected?" <<he>> whispers, running <<his>> fingers over your <<pussy>>.
<</if>>

<<if $arousal gte $arousalmax>>
	<<orgasm>> "Such a lewd <<girl>>. Cumming in the middle of a shop."

	<<fameexhibitionism 1>>
	"Is everything okay over there?" says a voice from the front of the service station, likely the <<person1>><<person>>. You hear <<him>> walk around the counter.

	You're still shuddering when <<he>> arrives at the end of the aisle. "Out!" <<he>> shouts. "No perverts allowed on the premises. Get going before I call the police."

	You and the <<person2>><<person>> leave the shop. <<He>> winks as the cool night air greets you. "See you around, lewd <<girl>>."

<<else>>
	"Is everything okay over there?" says a voice from the front of the service station, likely the <<person1>><<person>>. You hear <<him>> walk around the counter.

	The <<person2>><<person>> grabs your arm and pulls you from the shop. "Don't want to get caught," <<he>> says as the cool night air greets you. "I have a reputation to uphold. See you around, lewd <<girl>>."

<</if>>

<<endevent>>
<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>

:: Service Refuse
<<effects>>

You turn and run from the shop, heart thumping in your chest. You run into an alley and peek around the corner. You weren't followed.

<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>

:: Service Pose
<<effects>>

You push your <<bottom>> onto the counter, and swing your legs round to face the <<person>>. "Like this?" you ask, opening your legs.
<<exhibitionism5>>

"Y-Yes," the <<person>> says, eyes fixed on your <<genitals>>.

<<if $worn.genitals.type.includes("chastity")>>
	"Is that to stop people taking advantage of you?" <<he>> says.

<<elseif $player.penisExist and $player.vaginaExist>>
	"You have both," <<he>> gasps.
	<<if $fameexhibitionism gte 1000>>
		"You're the exhibitionist I keep hearing about."
	<<elseif $fameexhibitionism gte 400>>
		"I thought it was a myth."
	<<else>>
		"I didn't know such a thing was possible."
	<</if>>
<<elseif $player.penisExist>>
	<<if $penissize gte 3>>
		"It's so big," <<he>> says.
	<<elseif $penissize lte 2>>
		"It's so cute," <<he>> says
	<<else>>
		"It's so cute," <<he>> says.
	<</if>>
<<else>>
	"It's so cute." <<he>> says.
<</if>>

You take the cash <<he>> left on the counter, and close your legs. "Thanks for the money," you say, wheeling your <<bottom>> around and dropping to the floor. You feel <<his>> eyes on you as you leave the shop.
<<set $money += 10000>>

<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>

:: Service Pose Refuse
<<effects>>

You refuse the <<persons>> offer, but <<he>> doesn't charge you for the sweets regardless. You're sucking a boiled sweet as the cool night air greets you.
<<lstress>><<stress 6>>

<<link [[Next|High Street]]>><<endevent>><<set $eventskip to 1>><</link>>


code:
:: Widgets Masturbation Actions [widget]

<<widget "masturbationactions">>

<<set $_genitals_exposed to $worn.over_lower.vagina_exposed gte 1 and $worn.lower.vagina_exposed gte 1 and $worn.under_lower.vagina_exposed gte 1>>
<<set $_balls_exposed to $_genitals_exposed and !($worn.genitals.type.includes("chastity") and $worn.genitals.type.includes("belt"))>>

/* Left Arm Actions */
<<set $leftaction to $leftactiondefault>>
<<if $leftarm is 0>>
	Your left hand is free.

	<<if $player.penisExist>>
		<<if $awareness gte 400 and $masturbationorgasmsemen gte 1 and $leftFingersSemen isnot 1>>
			| <<radiobutton "$leftaction" "msemencover" autocheck>> Cover your fingers in semen
		<</if>>
		<<if !$worn.genitals.type.includes("chastity")>>
			<<if !($mouth is "mpenis" and $selfsuckDepth is $penisHeight)>>
				| <<radiobutton "$leftaction" "mpenisentrance" autocheck>> Fondle your penis
			<</if>>
		<<else>>
			| <<radiobutton "$leftaction" "mchastity" autocheck>> Try to fondle your penis
		<</if>>
	<</if>>
	<<if $player.ballsExist and $_genitals_exposed and $ballssize gte -1 and ($ballssize gte 1 or $rightarm isnot "mballs")>>
		<<if $_balls_exposed>>
			| <<radiobutton "$leftaction" "mballsentrance" autocheck>> Fondle your balls
		<</if>>
	<</if>>
	<<if $player.vaginaExist>>
		<<if !$worn.genitals.type.includes("chastity")>>
			| <<radiobutton "$leftaction" "mvaginaentrance" autocheck>> Fondle your pussy
		<<else>>
			| <<radiobutton "$leftaction" "mchastity" autocheck>> Try to fondle your pussy
		<</if>>
	<</if>>
	<<if $awareness gte 100>>
		| <<radiobutton "$leftaction" "mchest" autocheck>> Fondle your chest
	<</if>>
	<<if $dev is 1>>
		<<if $awareness gte 100 and $masochism gte 100>>
			| <<radiobutton "$leftaction" "mpinch" autocheck>> Pinch your nipple
		<</if>>
	<</if>>
	<<if $awareness gte 200 and $worn.genitals.anal_shield isnot 1>>
		| <<radiobutton "$leftaction" "manusentrance" autocheck>> Stroke your anus
	<</if>>

<<elseif $leftarm is "mpenisentrance">>
	You hold your <<penis>> <<if $penissize gte 0>>in your left hand.<<else>>with your left thumb and fingers.<</if>>

	<<if $mouth isnot "mpenis">>
		| <<radiobutton "$leftaction" "mpenisglans" autocheck>> Fondle the glans
	<</if>>
	<<if !($mouth is "mpenis" and $selfsuckDepth is $penisHeight)>>
		| <<radiobutton "$leftaction" "mpenisshaft" autocheck>> Rub the shaft
	<</if>>
	| <<radiobutton "$leftaction" "mpenisstop" autocheck>> Move your hand away

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

	<<if $_genitals_exposed>>
		<<if $rightarm isnot "mvagina">>
			| <<radiobutton "$leftaction" "mvagina" autocheck>> Push a finger in
		<</if>>
		| <<radiobutton "$leftaction" "mvaginaclit" autocheck>> Play with your clit
	<</if>>
	| <<radiobutton "$leftaction" "mvaginarub" autocheck>> Rub your vagina
	| <<radiobutton "$leftaction" "mvaginastop" autocheck>> Move your hand away

<<elseif $leftarm is "mvagina">>
	<<set $_fingers to ($fingersInVagina is 1 ? "finger" : "fingers")>>
	You have <<number $fingersInVagina>> $_fingers in your <<pussy>>. <<if $fingersInVagina is $vaginaFingerLimit>>You're too tight to fit any more.<</if>>

	<<if $fingersInVagina lt $vaginaFingerLimit>>
		| <<radiobutton "$leftaction" "mvaginafingeradd" autocheck>> Push another finger in
	<</if>>
	<<if $fingersInVagina gte 1>>
		| <<radiobutton "$leftaction" "mvaginafingerremove" autocheck>> Take one finger out
	<</if>>
	| <<radiobutton "$leftaction" "mvaginatease" autocheck>> Finger your vagina
	| <<radiobutton "$leftaction" "mvaginastop" autocheck>> Move your hand away

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

	<<if $worn.over_lower.anus_exposed gte 1 and $worn.lower.anus_exposed gte 1 and $worn.under_lower.anus_exposed gte 1>>
		| <<radiobutton "$leftaction" "manus" autocheck>> Push a finger in
	<</if>>
	| <<radiobutton "$leftaction" "manusrub" autocheck>> Tease your anus
	| <<radiobutton "$leftaction" "manusstop" autocheck>> Move your hand away

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

	| <<radiobutton "$leftaction" "manustease" autocheck>> Tease
	<<if $player.penisExist>>
		| <<radiobutton "$leftaction" "manusprostate" autocheck>> Tease your prostate
	<</if>>
	| <<radiobutton "$leftaction" "manusstop" autocheck>> Move your hand away
<<elseif $leftarm is "mballs">>
	You hold <<if $ballssize gte 1>>one of <</if>> your $ballsText with your left hand.

	| <<radiobutton "$leftaction" "mballsfondle" autocheck>> Fondle
	| <<radiobutton "$leftaction" "mballssqueeze" autocheck>> Squeeze
	| <<radiobutton "$leftaction" "mballsstop" autocheck>> Move your hand away
<<elseif $leftarm is "bound">>
	Your left arm is bound.

<</if>>
<<if $leftarm isnot "bound">>
	<<if $worn.over_upper.exposed lte 1>>
		| <<radiobutton "$leftaction" "moverupper" autocheck>> Displace your $worn.over_upper.name
	<</if>>
	<<if $worn.upper.exposed lte 1>>
		| <<radiobutton "$leftaction" "mupper" autocheck>> Displace your $worn.upper.name
	<</if>>
	<<if $worn.under_upper.exposed lte 0>>
		| <<radiobutton "$leftaction" "munder_upper" autocheck>> Displace your $worn.under_upper.name
	<</if>>

	<<if $worn.over_lower.exposed lte 1>>
		| <<radiobutton "$leftaction" "moverlower" autocheck>> Displace your $worn.over_lower.name
	<</if>>
	<<if $worn.lower.exposed lte 1>>
		| <<radiobutton "$leftaction" "mlower" autocheck>> Displace your $worn.lower.name
	<</if>>
	<<if $worn.under_lower.exposed lte 0>>
		<<if $worn.lower.state isnot setup.clothes.lower[clothesIndex('lower', $worn.lower)].state_base or setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 1 or $worn.lower.type.includes("naked")>>
			| <<radiobutton "$leftaction" "munder" autocheck>> Pull down your $worn.under_lower.name
		<</if>>
	<</if>>
<</if>>

| <<radiobutton "$leftaction" "mrest" autocheck>> Rest

/* Right Arm Actions */
<<set $rightaction to $rightactiondefault>>
<<if $rightarm is 0>>
	Your right hand is free.

	<<if $player.penisExist>>
		<<if $awareness gte 400 and $masturbationorgasmsemen gte 1 and $rightFingersSemen isnot 1>>
			| <<radiobutton "$rightaction" "msemencover" autocheck>> Cover your fingers in semen
		<</if>>
		<<if !$worn.genitals.type.includes("chastity")>>
			<<if !($mouth is "mpenis" and $selfsuckDepth is $penisHeight)>>
				| <<radiobutton "$rightaction" "mpenisentrance" autocheck>> Fondle your penis
			<</if>>
		<<else>>
			| <<radiobutton "$rightaction" "mchastity" autocheck>> Try to fondle your penis
		<</if>>
	<</if>>
	<<if $player.ballsExist and $_genitals_exposed and $ballssize gte -1 and ($ballssize gte 1 or $leftarm isnot "mballs")>>
		<<if $_balls_exposed>>
			| <<radiobutton "$rightaction" "mballsentrance" autocheck>> Fondle your balls
		<</if>>
	<</if>>
	<<if $player.vaginaExist>>
		<<if !$worn.genitals.type.includes("chastity")>>
			| <<radiobutton "$rightaction" "mvaginaentrance" autocheck>> Fondle your pussy
		<<else>>
			| <<radiobutton "$rightaction" "mchastity" autocheck>> Try to fondle your pussy
		<</if>>
	<</if>>
	<<if $awareness gte 100>>
		| <<radiobutton "$rightaction" "mchest" autocheck>> Fondle your chest
	<</if>>
	<<if $dev is 1>>
		<<if $awareness gte 100 and $masochism gte 100>>
			| <<radiobutton "$rightaction" "mpinch" autocheck>> Pinch your nipple
		<</if>>
	<</if>>
	<<if $awareness gte 200 and $worn.genitals.anal_shield isnot 1>>
		| <<radiobutton "$rightaction" "manusentrance" autocheck>> Stroke your anus
	<</if>>

<<elseif $rightarm is "mpenisentrance">>
	You hold your <<penis>> <<if $penissize gte 0>>in your right hand.<<else>>with your right thumb and fingers.<</if>>

	<<if $mouth isnot "mpenis">>
		| <<radiobutton "$rightaction" "mpenisglans" autocheck>> Fondle the glans
	<</if>>
	<<if !($mouth is "mpenis" and $selfsuckDepth is $penisHeight)>>
		| <<radiobutton "$rightaction" "mpenisshaft" autocheck>> Rub the shaft
	<</if>>
	| <<radiobutton "$rightaction" "mpenisstop" autocheck>> Move your hand away

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

	<<if $_genitals_exposed>>
		<<if $leftarm isnot "mvagina">>
			| <<radiobutton "$rightaction" "mvagina" autocheck>> Push a finger in
		<</if>>
		| <<radiobutton "$rightaction" "mvaginaclit" autocheck>> Play with your clit
	<</if>>
	| <<radiobutton "$rightaction" "mvaginarub" autocheck>> Rub your vagina
	| <<radiobutton "$rightaction" "mvaginastop" autocheck>> Move your hand away

<<elseif $rightarm is "mvagina">>
	<<set $_fingers to ($fingersInVagina is 1 ? "finger" : "fingers")>>
	You have <<number $fingersInVagina>> $_fingers in your <<pussy>>. <<if $fingersInVagina is $vaginaFingerLimit>>You're too tight to fit any more.<</if>>

	<<if $fingersInVagina lt $vaginaFingerLimit>>
		| <<radiobutton "$rightaction" "mvaginafingeradd" autocheck>> Push another finger in
	<</if>>
	<<if $fingersInVagina gte 1>>
		| <<radiobutton "$rightaction" "mvaginafingerremove" autocheck>> Take one finger out
	<</if>>
	| <<radiobutton "$rightaction" "mvaginatease" autocheck>> Finger your vagina
	| <<radiobutton "$rightaction" "mvaginastop" autocheck>> Move your hand away

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

	<<if $worn.over_lower.anus_exposed gte 1 and $worn.lower.anus_exposed gte 1 and $worn.under_lower.anus_exposed gte 1>>
		| <<radiobutton "$rightaction" "manus" autocheck>> Push a finger in
	<</if>>
	| <<radiobutton "$rightaction" "manusrub" autocheck>> Tease your anus
	| <<radiobutton "$rightaction" "manusstop" autocheck>> Move your hand away

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

	| <<radiobutton "$rightaction" "manustease" autocheck>> Tease
	<<if $player.penisExist>>
		| <<radiobutton "$rightaction" "manusprostate" autocheck>> Tease your prostate
	<</if>>
	| <<radiobutton "$rightaction" "manusstop" autocheck>> Move your hand away
<<elseif $rightarm is "mballs">>
	You hold <<if $ballssize gte 1>>one of <</if>> your $ballsText with your right hand.

	| <<radiobutton "$rightaction" "mballsfondle" autocheck>> Fondle
	| <<radiobutton "$rightaction" "mballssqueeze" autocheck>> Squeeze
	| <<radiobutton "$rightaction" "mballsstop" autocheck>> Move your hand away
<<elseif $rightarm is "bound">>
	Your right arm is bound.

<</if>>
<<if $rightarm isnot "bound">>
	<<if $worn.over_upper.exposed lte 1>>
		| <<radiobutton "$rightaction" "moverupper" autocheck>> Displace your $worn.over_upper.name
	<</if>>
	<<if $worn.upper.exposed lte 1>>
		| <<radiobutton "$rightaction" "mupper" autocheck>> Displace your $worn.upper.name
	<</if>>
	<<if $worn.under_upper.exposed lte 0>>
		| <<radiobutton "$rightaction" "munder_upper" autocheck>> Displace your $worn.under_upper.name
	<</if>>

	<<if $worn.over_lower.exposed lte 1>>
		| <<radiobutton "$rightaction" "moverlower" autocheck>> Displace your $worn.over_lower.name
	<</if>>
	<<if $worn.lower.exposed lte 1>>
		| <<radiobutton "$rightaction" "mlower" autocheck>> Displace your $worn.lower.name
	<</if>>
	<<if $worn.under_lower.exposed lte 0>>
		<<if $worn.lower.state isnot setup.clothes.lower[clothesIndex('lower', $worn.lower)].state_base or setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 1 or $worn.lower.type.includes("naked")>>
			| <<radiobutton "$rightaction" "munder" autocheck>> Pull down your $worn.under_lower.name
		<</if>>
	<</if>>
<</if>>

| <<radiobutton "$rightaction" "mrest" autocheck>> Rest

/* Mouth Actions */
<<if $moorPhallusPlant or $awareness gte 200>>
	<<set $mouthaction to $mouthactiondefault>>
	<<if $mouth is 0>>

		Your mouth is free.

		<<if $_genitals_exposed>>
			<<if $canSelfSuckPenis and $penisuse is 0>>
				| <<radiobutton "$mouthaction" "mpenisentrance" autocheck>> Lick your penis
			<</if>>
			<<if $canSelfSuckVagina and $vaginause is 0 and $fingersInVagina is 0>>
				| <<radiobutton "$mouthaction" "mvaginaentrance" autocheck>> Lick your pussy
			<</if>>
		<</if>>
		<<if $moorPhallusPlant is 1>>
			| <<radiobutton "$mouthaction" "mpenisflowerlick" autocheck>> Lick the phallus plant
		<</if>>
		| <<radiobutton "$mouthaction" "mrest" autocheck>> Rest

	<<elseif $mouth is "mpenisentrance">>

		Your mouth is in front of your penis.

		| <<radiobutton "$mouthaction" "mpenislick" autocheck>> Lick your penis
		| <<radiobutton "$mouthaction" "mpenistakein" autocheck>> Take it into your mouth
		| <<radiobutton "$mouthaction" "mpenisstop" autocheck>> Move your mouth away
		| <<radiobutton "$mouthaction" "mrest" autocheck>> Rest

	<<elseif $mouth is "mvaginaentrance">>

		You're licking your pussy.

		| <<radiobutton "$mouthaction" "mvaginalick" autocheck>> Lick your pussy
		| <<radiobutton "$mouthaction" "mvaginaclit" autocheck>> Focus on your clit
		| <<radiobutton "$mouthaction" "mvaginastop" autocheck>> Move your mouth away

	<<elseif $mouth is "mpenis">>

		You're sucking on your penis.
		<<if $selfsuckDepth is $selfsuckLimit>>
			You have the whole thing in your mouth<<if $selfsuckDepth gte 2>> and throat<</if>>.
		<<else>>
			<<switch $selfsuckDepth>>
				<<case 0>> You have the head in your mouth.
				<<case 1>> The head reaches the back of your mouth.
				<<case 2>> You have the head in your throat.
				<<default>> Error: Impossible condition. /* Max selfsuckDepth is 3 and is captured by the above condition */
			<</switch>>
		<</if>>

		| <<radiobutton "$mouthaction" "mpenissuck" autocheck>> Suck on your penis
		<<if $selfsuckDepth lt $selfsuckLimit>>
			| <<radiobutton "$mouthaction" "mpenisdeepthroat" autocheck>> Take it deeper
		<</if>>
		<<if $selfsuckDepth gte 1>>
			| <<radiobutton "$mouthaction" "mpenispullback" autocheck>> Pull back
		<<else>>
			| <<radiobutton "$mouthaction" "mpenismouthoff" autocheck>> Take your mouth off it
		<</if>>
		<<if $selfsuckDepth lte 1>>
			| <<radiobutton "$mouthaction" "mpenisstop" autocheck>> Move your mouth away
		<</if>>

	<<elseif $mouth is "mpenisflowerlick">>

		You're licking the phallus plant.

		| <<radiobutton "$mouthaction" "mpenisflowerlick" autocheck>> Lick
		| <<radiobutton "$mouthaction" "mpenisflowertakein" autocheck>> Take it into your mouth
		| <<radiobutton "$mouthaction" "mpenisflowerstop" autocheck>> Move your mouth away

	<<elseif $mouth is "mpenisflowersuck">>

		You're sucking on the phallus plant.

		| <<radiobutton "$mouthaction" "mpenisflowersuck" autocheck>> Lick
		| <<radiobutton "$mouthaction" "mpenisflowersuckstop" autocheck>> Move your mouth away
	<</if>>
<</if>>

<<if $moorPhallusPlant>>
	/* Vagina Actions */
	<<set $vaginaaction to $vaginaactiondefault>>
	<<set $_pussy to ($_genitals_exposed ? "pussy" : "crotch")>>
	<<if !$player.vaginaExist or $worn.genitals.type.includes("chastity")>>

	<<elseif $vaginause is 0>>

		Your pussy is <<print ($_genitals_exposed ? "free" : "free, but clothed")>>.

		<<if $moorPhallusPlant is 1>>
			| <<radiobutton "$vaginaaction" "mpenisflowerrub" autocheck>> Rub against the phallus plant
		<</if>>
		| <<radiobutton "$vaginaaction" "mrest" autocheck>> Rest

	<<elseif $vaginause is "mpenisflowerrub">>

		You're rubbing your $_pussy against the phallus plant.

		| <<radiobutton "$vaginaaction" "mpenisflowerrub" autocheck>> Rub against the phallus plant
		<<if $_genitals_exposed>>
			| <<radiobutton "$vaginaaction" "mpenisflowerpenetrate" autocheck>> Lower yourself onto the phallus plant<<vaginalvirginitywarning>>
		<</if>>
		| <<radiobutton "$vaginaaction" "mpenisflowerstop" autocheck>> Move your $_pussy away

	<<elseif $vaginause is "mpenisflowerpenetrate">>

		You're bouncing on the phallus plant with your vagina.

		| <<radiobutton "$vaginaaction" "mpenisflowerbounce" autocheck>> Ride the phallus plant
		| <<radiobutton "$vaginaaction" "mpenisflowerpenetratestop" autocheck>> Move your pussy away
	<</if>>

	/* Anus Actions */
	<<set $anusaction to $anusactiondefault>>
	<<set $_anus_exposed to $worn.over_lower.anus_exposed gte 1 and $worn.lower.anus_exposed gte 1 and $worn.under_lower.anus_exposed gte 1>>
	<<set $_ass to ($_anus_exposed ? "anus" : "ass")>>
	<<if $worn.genitals.anal_shield is 1>>

	<<elseif $anususe is 0>>

		Your $_ass is <<print ($_anus_exposed ? "free" : "free, but clothed")>>.

		<<if $moorPhallusPlant is 1>>
			| <<radiobutton "$anusaction" "mpenisflowerrub" autocheck>> Rub against the phallus plant
		<</if>>
		| <<radiobutton "$anusaction" "mrest" autocheck>> Rest

	<<elseif $anususe is "mpenisflowerrub">>

		You're rubbing your $_ass against the phallus plant.

		| <<radiobutton "$anusaction" "mpenisflowerrub" autocheck>> Rub against the phallus plant
		<<if $_anus_exposed>>
			| <<radiobutton "$anusaction" "mpenisflowerpenetrate" autocheck>> Lower yourself onto the phallus plant<<analvirginitywarning>>
		<</if>>
		| <<radiobutton "$anusaction" "mpenisflowerstop" autocheck>> Move your $_ass away

	<<elseif $anususe is "mpenisflowerpenetrate">>

		You're bouncing on the phallus plant with your anus.

		| <<radiobutton "$anusaction" "mpenisflowerbounce" autocheck>> Ride the phallus plant
		| <<radiobutton "$anusaction" "mpenisflowerpenetratestop" autocheck>> Move your anus away
	<</if>>
<</if>>

<<if $arousal gte $arousalmax>>
	<<orgasm>>
	<<promiscuity1>>
	<<set $masturbationorgasmstat += 1>>
	<<set $masturbationorgasm += 1>>
	<<if $femaleclimax isnot 1 and $mouth isnot "mpenis">>
		<<set $masturbationorgasmsemen++>>
	<</if>>
	<<purity -1>>
<</if>>
<<set $seconds += 10>>
<<if $seconds gte 60>>
	<<set $seconds to 0>>
	<<pass 1>>
	<<set $masturbationtimestat += 1>>
<</if>>
<</widget>>

repo_name: Area/degrees

license: mit


code:
:: Widgets Masturbation Effects [widget]

<<widget "masturbationeffects">>

<<if $player.vaginaExist>>
	<<set $_hymenIntact to $player.virginity.vaginal is true and $sexStats.vagina.pregnancy.totalBirthEvents is 0>>
	<<vaginaWetnessCalculate>>
<</if>>

<<if $corruptionMasturbation is true>>
	<<if $leftarm is "bound" and $rightarm is "bound">>
		The slime makes you fight against the binds around your arms. You make no progress, and it gives up.
		<<arousal 600>><<stress 6>><<gstress>><<garousal>>

		<<set $rightaction to "mrest">><<set $leftaction to "mrest">>
		<<set $corruptionMasturbation to false>>
		<<unset $corruptionMasturbationCount>>
	<<else>>
		<<if $orgasmdown gte 2>>
			<<if $corruptionMasturbationCount is undefined or $corruptionMasturbationCount is null>>
				<<set $corruptionMasturbationCount to random(2,6)>>
			<</if>>
			<<set $corruptionMasturbationCount-->>
			<<if $corruptionMasturbationCount is 0>>
				<<set $corruptionMasturbation to false>>
				<<unset $corruptionMasturbationCount>>
			<</if>>
		<</if>>
		<<masturbationSlimeControl>>
	<</if>>
<</if>>

<<if $leftaction is "moverupper" or $rightaction is "moverupper">>
	<<if $leftaction is "moverupper">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "moverupper">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	<<if $worn.over_upper.open is 1>>
		<<set $worn.over_upper.exposed to 2>><<set $worn.over_upper.state_top to "midriff">>
		<<if $breastsize gte 3>>
			You pull down your $worn.over_upper.name, exposing your <<breastsaside>>.
		<<else>>
			You pull down your $worn.over_upper.name, exposing your <<breastsaside>>.
		<</if>>
	<<else>>
		<<set $worn.over_upper.exposed to 2>><<set $worn.over_upper.state to "chest">>
		<<if $breastsize gte 3>>
			You pull up your $worn.over_upper.name, exposing your <<breastsaside>>.
		<<else>>
			You pull up your $worn.over_upper.name, exposing your <<breastsaside>>.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mupper" or $rightaction is "mupper">>
	<<if $leftaction is "mupper">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "mupper">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	/* needs work; what if layer above is not exposed? */
	<<if $worn.upper.open is 1>>
		<<set $worn.upper.exposed to 2>><<set $worn.upper.state_top to "midriff">>
		<<if $breastsize gte 3>>
			You pull down your $worn.upper.name, exposing your <<breastsaside>>.
		<<else>>
			You pull down your $worn.upper.name, exposing your <<breastsaside>>.
		<</if>>
	<<else>>
		<<set $worn.upper.exposed to 2>><<set $worn.upper.state to "chest">>
		<<if $breastsize gte 3>>
			You pull up your $worn.upper.name, exposing your <<breastsaside>>.
		<<else>>
			You pull up your $worn.upper.name, exposing your <<breastsaside>>.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "munder_upper" or $rightaction is "munder_upper">>
	<<if $leftaction is "munder_upper">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "munder_upper">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	/* needs work; what if layer above is not exposed? */
	<<if $worn.under_upper.open is 1>>
		<<set $worn.under_upper.exposed to 2>><<set $worn.under_upper.state_top to "midriff">>
		<<if $breastsize gte 3>>
			You pull down your $worn.under_upper.name and your <<breasts>> flop out.
		<<else>>
			You pull down your $worn.under_upper.name, exposing your <<breasts>>.
		<</if>>
	<<else>>
		<<set $worn.under_upper.exposed to 2>><<set $worn.under_upper.state to "chest">>
		<<if $breastsize gte 3>>
			You pull up your $worn.under_upper.name and your <<breasts>> flop out.
		<<else>>
			You pull up your $worn.under_upper.name, exposing your <<breasts>>.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "moverlower" or $rightaction is "moverlower">>
	<<if $leftaction is "moverlower">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "moverlower">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	<<set $worn.over_lower.anus_exposed to 1>><<set $worn.over_lower.vagina_exposed to 1>><<set $worn.over_lower.exposed to 2>>
	<<if setup.clothes.over_lower[clothesIndex('over_lower', $worn.over_lower)].skirt is 1>>
		<<set $worn.over_lower.skirt_down to 0>>
		You lift up your $worn.over_lower.name, exposing your <<exposedlower>>.
	<<else>>
		<<set $worn.over_lower.state to "thighs">>
		You pull down your $worn.over_lower.name, exposing your <<exposedlower>>.
	<</if>>
<</if>>

<<if $leftaction is "mlower" or $rightaction is "mlower">>
	<<if $leftaction is "mlower">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "mlower">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	<<set $worn.lower.anus_exposed to 1>><<set $worn.lower.vagina_exposed to 1>><<set $worn.lower.exposed to 2>>
	/* needs work; what if layer above is not exposed? */
	<<if setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 1>>
		<<set $worn.lower.skirt_down to 0>>
		You lift up your $worn.lower.name, exposing your <<undies>>.
	<<else>>
		<<set $worn.lower.state to "thighs">>
		You pull down your $worn.lower.name, exposing your <<undies>>.
	<</if>>
<</if>>

<<if $leftaction is "munder" or $rightaction is "munder">>
	<<if $leftaction is "munder">>
		<<set $leftaction to 0>><<set $leftactiondefault to "mrest">>
	<</if>>
	<<if $rightaction is "munder">>
		<<set $rightaction to 0>><<set $rightactiondefault to "mrest">>
	<</if>>
	<<set $worn.under_lower.anus_exposed to 1>><<set $worn.under_lower.vagina_exposed to 1>>
	<<set $worn.under_lower.state to "thighs">><<set $worn.under_lower.exposed to 2>>
	/* needs work; what if layer above is not exposed? */
	You pull down your $worn.under_lower.name, exposing your <<genitals>>.
<</if>>

<<set $_genitals_exposed to $worn.over_lower.vagina_exposed gte 1 and $worn.lower.vagina_exposed gte 1 and $worn.under_lower.vagina_exposed gte 1>>

<<if $leftaction is "msemencover" and $rightaction is "msemencover">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftFingersSemen to 1>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightFingersSemen to 1>>
	You gather some of your semen and rub it between your fingers.
	<<arousal 200>>
<<elseif $leftaction is "msemencover">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftFingersSemen to 1>>
	You gather some of your semen and rub it between your fingers.
	<<arousal 100>>
<<elseif $rightaction is "msemencover">>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightFingersSemen to 1>>
	You gather some of your semen and rub it between your fingers.
	<<arousal 100>>
<</if>>

<<if $leftaction is "mchest" or $rightaction is "mchest">>
	<<set _handsOnBreasts to 0>>
	<<if $leftaction is "mchest">>
		<<set _handsOnBreasts += 1>>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
		<<arousal 100>><<playWithBreasts 1>><<milkvolume 1>><<set _handsCount++>>
	<</if>>
	<<if $rightaction is "mchest">>
		<<set _handsOnBreasts += 1>>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
		<<arousal 100>><<playWithBreasts 1>><<milkvolume 1>><<set _handsCount++>>
	<</if>>

	/* the text output currently does not care which hand is used or if both hands are used */
	<<if $worn.upper.exposed gte 2 and $worn.under_upper.exposed gte 1>>
		<<arousal `100 * _handsOnBreasts`>>
		<<if $breastsize lte 2>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				You tease your sensitive nipples as much as you can stand, each brush of your fingers sending jolts of excitement through you.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> while circling your fingers around the areola, occasionally giving your nipples a little tweak.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers, feeling the lewd warmth grow.
			<</if>>
		<<elseif $breastsize lte 5>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				You cup your <<breasts>> and tease your sensitive nipples as much as you can stand, each brush of your fingers sending jolts of excitement through you.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> while circling your fingers around the areola, occasionally giving your nipples a little tweak.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers, feeling the lewd warmth grow.
			<</if>>
		<<else>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				You cup your <<breasts>> and tease your sensitive nipples as much as you can stand. Each brush of your fingers sends jolts of excitement through you.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> while circling your fingers around the areola, occasionally giving your nipples a little tweak.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers, feeling the lewd warmth grow.
			<</if>>
		<</if>>

		<<if $lactating is 1 and $breastfeedingdisable is "f">>
			<<if $milk_amount gte 1>>
				Milk leaks from your buds.

				<<breastfeed 1>>
				<<if _handsOnBreasts is 2>><<breastfeed 2>><</if>>
			<<else>>
				No milk leaks from your buds. You must be dry.
			<</if>>
		<</if>>
	<<else>>
		<<if $breastsize lte 2>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				Your <<nipples>> stand erect against the fabric of your <<top>>, straining for attention.
				You tweak and tease them as much as you can bear.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> and tweak your nipples through your <<top>>.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers. It feels good, even with your <<topaside>> in the way.
			<</if>>
		<<elseif $breastsize lte 5>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				Your nipples stand erect against the fabric of your <<top>>, straining for attention.
				You cup your <<breasts>> and play with your sensitive buds as much as you can bear.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> and tweak your nipples through your <<top>>.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers. It feels good, even with your <<topaside>> in the way.
			<</if>>
		<<else>>
			<<if $arousal gte ($arousalmax / 5) * 4>>
				Your nipples stand erect against the fabric of your <<top>>, straining for attention.
				You cup your <<breasts>> and play with your sensitive buds as much as you can bear.
			<<elseif $arousal gte ($arousalmax / 5) * 3>>
				You fondle your <<breasts>> and tweak your nipples through your <<top>>.
			<<else>>
				You stroke your <<breasts>> and rub your nipples between your fingers. It feels good, even with your <<topaside>> in the way.
			<</if>>
		<</if>>

		<<if $lactating is 1 and $breastfeedingdisable is "f">>
			<<if $milk_amount gte 1>>
				Milk leaks from your buds, flowing into your top.
				<<if $masturbation_bowl is 1>>
					You should remove your top if you want to gather any.
				<</if>>
				<<breastfeed>>
				<<if _handsOnBreasts is 2>><<breastfeed>><</if>>
			<<else>>
				No milk leaks from your buds. You must be dry.
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mchastity" or $rightaction is "mchastity">>
	<<set _stress to 0>>
	<<if $leftaction is "mchastity">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>><<set _stress++>>
	<</if>>
	<<if $rightaction is "mchastity">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>><<set _stress++>>
	<</if>>
	You try to dig your fingers beneath your $worn.genitals.name, but to no avail.
	Your <<genitals 1>> aches for your touch, but there's nothing you can do.
	<<gstress>><<stress _stress>>
<</if>>

<<if $leftaction is "mpenisentrance" or $rightaction is "mpenisentrance">>
	<<if $leftaction is "mpenisentrance">>
		<<set $leftactiondefault to "mpenisglans">><<set $leftarm to "mpenisentrance">><<set $leftaction to 0>>
		<<arousal 100>>
	<</if>>
	<<if $rightaction is "mpenisentrance">>
		<<set $rightactiondefault to "mpenisglans">><<set $rightarm to "mpenisentrance">><<set $rightaction to 0>>
		<<arousal 100>>
	<</if>>

	/* the text output currently does not care which hand is used or if both hands are used */
	<<if $worn.under_lower.vagina_exposed is 1 and $worn.lower.vagina_exposed is 1>>
		You run your fingers over your <<penis>> and shiver in anticipation.
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		You run your fingers over your <<penis>>, feeling the bulge beneath your $worn.lower.name.
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your fingers over your <<penis>>, feeling the bulge beneath your $worn.under_lower.name.
	<</if>>
<</if>>

/* if your mouth is on your penis, your hands should not have access to your glans */
<<if $mouth is "mpenis" or $mouthaction is "mpenistakein" or $mouthaction is "mpenissuck">>
	<<if $leftaction is "mpenisglans">>
		<<set $leftaction to "mpenisshaft">>
	<</if>>
	<<if $rightaction is "mpenisglans">>
		<<set $rightaction to "mpenisshaft">>
	<</if>>
<</if>>

<<if $vaginaaction is "mpenisflowerpenetrate" or $vaginause is "mpenisflowerpenetrate">>
	<<if $leftaction is "mvagina">>
		<<if $player.penisExist>>
			<<set $leftaction to "mvaginarub">>
		<<else>>
			<<set $leftaction to "mvaginaclit">>
		<</if>>
	<</if>>
	<<if $rightaction is "mvagina">>
		<<if $player.penisExist>>
			<<set $rightaction to "mvaginarub">>
		<<else>>
			<<set $rightaction to "mvaginaclit">>
		<</if>>
	<</if>>

	<<if $mouthaction is "mvaginaentrance">>
		<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>>
	<</if>>
	<<if $mouth is "mvaginaentrance">>
		<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>><<set $mouth to 0>>
		You move your mouth away from your pussy.
	<</if>>

	<<if $leftaction is "mvaginatease" and $rightaction is "mvaginatease">>
		<<set $leftactiondefault to "rest">><<set $leftaction to 0>><<set $rightactiondefault to "rest">><<set $rightaction to 0>><<set $leftarm to 0>><<set $rightarm to 0>>
		You remove your fingers from your vagina.
	<<elseif $leftaction is "mvaginatease">>
		<<set $leftactiondefault to "rest">><<set $leftaction to 0>><<set $leftarm to 0>>
		You remove your finger from your vagina.
	<<elseif $rightaction is "mvaginatease">>
		<<set $rightactiondefault to "rest">><<set $rightaction to 0>><<set $rightarm to 0>>
		You remove your finger from your vagina.
	<</if>>
<</if>>

<<if $anusaction is "mpenisflowerpenetrate" or $anususe is "mpenisflowerpenetrate">>
	<<if $leftaction is "manus">>
		<<set $leftaction to "manusrub">>
	<</if>>
	<<if $rightaction is "manus">>
		<<set $rightaction to "manusrub">>
	<</if>>

	<<if ($leftaction is "manustease" or $leftaction is "manusprostate") and ($rightaction is "manustease" or $rightaction is "manusprostate")>>
		<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
		<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
		You remove your fingers from your anus.
	<<elseif $leftaction is "manustease" or $leftaction is "manusprostate">>
		<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
		You remove your finger from your anus.
	<<elseif $rightaction is "manustease" or $rightaction is "manusprostate">>
		<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
		You remove your finger from your anus.
	<</if>>
<</if>>

<<if $leftaction is "mpenisglans" and $rightaction is "mpenisglans">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<if $player.virginity.penile is true>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You rub your virgin foreskin with increasing speed. Strange feelings emanate from the tip and through your body.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You rub your virgin foreskin with your thumb and play with the tip. It's sensitive even though you can't pull it back.
		<<else>>
			You hold your tip of your virgin penis in your palm and gently rub the foreskin with your thumb.
		<</if>>
	<<else>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You retract and relax your foreskin, rubbing it over your glans again and again.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You rub your foreskin against your glans and tease your frenulum.
		<<else>>
			You hold your <<penis>> in your palm and rub your foreskin against your glans.
		<</if>>
	<</if>>
<<elseif $leftaction is "mpenisglans" or $rightaction is "mpenisglans">>
	<<if $leftaction is "mpenisglans">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "mpenisglans">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 200>>
	<<if $player.virginity.penile is true>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You rub your virgin foreskin with increasing speed. Strange feelings emanate from the tip and through your body.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You rub your virgin foreskin with your thumb and play with the tip. It's sensitive even though you can't pull it back.
		<<else>>
			You hold your tip of your virgin penis in your palm and gently rub the foreskin with your thumb.
		<</if>>
	<<else>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You retract and relax your foreskin, rubbing it over your glans again and again.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You rub your foreskin against your glans and tease your frenulum.
		<<else>>
			You hold your <<penis>> in your palm and rub your foreskin against your glans.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mpenisshaft" and $rightaction is "mpenisshaft">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<if $player.virginity.penile is true>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You run your fingers up and down your virgin penis as roughly as your foreskin will allow.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You run your fingers up and down the length of your virgin penis.
		<<else>>
			You run your fingers against the underside of your <<penis>>, enjoying the sensation.
		<</if>>
	<<else>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You pump up and down the length of your <<penis>>.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You run your fingers up and down your shaft, tickling slightly and generating a lewd warmth.
		<<else>>
			You gently caress the length of your <<penis>>.
		<</if>>
	<</if>>
<<elseif $leftaction is "mpenisshaft" or $rightaction is "mpenisshaft">>
	<<if $leftaction is "mpenisshaft">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "mpenisshaft">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 200>>
	<<if $player.virginity.penile is true>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You run your fingers up and down your virgin penis as roughly as your foreskin will allow.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You run your fingers up and down the length of your virgin penis.
		<<else>>
			You run your fingers against the underside of your <<penis>>, enjoying the sensation.
		<</if>>
	<<else>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			You pump up and down the length of your <<penis>>.
		<<elseif $arousal gte ($arousalmax / 5) * 3>>
			You run your fingers up and down your shaft, tickling slightly and generating a lewd warmth.
		<<else>>
			You gently caress the length of your <<penis>>.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mpenisstop" and $rightaction is "mpenisstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your hands away from your <<penis>>.
<<elseif $leftaction is "mpenisstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	You move your left hand away from your <<penis>>.
<<elseif $rightaction is "mpenisstop">>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your right hand away from your <<penis>>.
<</if>>

/* tiny balls are too small for both hands */
<<if $ballssize lte 0 and (($leftarm is "mballs" and $rightarm is "mballs") or ($leftaction is "mballsentrance" and $rightaction is "mballsentrance"))>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
<</if>>

<<silently>>
	/* describe the balls consistently if they are referred to multiple times */
	<<silently>>
		<<ballsize>><<set $_balls to _text_output + " ">>
		<<testicles>><<set $_balls += _text_output>>
	<</silently>>
<</silently>>

<<if $leftaction is "mballsstop" and $rightaction is "mballsstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your hands away from your balls.
<<elseif $leftaction is "mballsstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	You move your left hand away from your balls.
<<elseif $rightaction is "mballsstop">>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your right hand away from your balls.
<</if>>

<<if $leftaction is "mballsfondle" and $rightaction is "mballsfondle">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 200>>

	<<if $arousal gte $arousalmax * (4/5)>>
		You grope your $_balls with both of your hands and enjoy the feeling of tightness as they clench up against the base of your penis.
	<<elseif $arousal gte $arousalmax * (3/5)>>
		You fondle your $_balls with both of your hands and enjoy the tickling feeling.
	<<elseif $arousal gte $arousalmax * (2/5)>>
		You jiggle your $_balls around in your hands and enjoy the feeling of gravity on them.
	<<else>>
		You roll your $_balls around in your hands.
	<</if>>
<<elseif $leftaction is "mballsfondle" or $rightaction is "mballsfondle">>
	<<if $leftaction is "mballsfondle">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
		<<set $_hand to "left hand">>
	<<else>>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
		<<set $_hand to "right hand">>
	<</if>>
	<<arousal 100>>
	/* if both hands are on their balls, say "the other" when referring to the second */
	<<set $_oneofyourballs to ($ballssize lte 0 ? "both of your $_balls" : ($_oneofyourballs is undefined ? "one of your $_balls" : "the other"))>>

	<<if $arousal gte $arousalmax * (4/5)>>
		You grope $_oneofyourballs with your $_hand and enjoy the feeling of tightness as your balls clench up against the base of your penis.
	<<elseif $arousal gte $arousalmax * (3/5)>>
		You fondle $_oneofyourballs with your $_hand and enjoy the tickling feeling.
	<<elseif $arousal gte $arousalmax * (2/5)>>
		You jiggle $_oneofyourballs in your $_hand and enjoy the feeling of gravity on it.
	<<else>>
		You stroke $_oneofyourballs with your $_hand.
	<</if>>
<</if>>

<<if $leftaction is "mballssqueeze" and $rightaction is "mballssqueeze">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<set $_gently to ($arousal gte $arousalmax * (4/5) ? "urgently" : ($arousal gte $arousalmax * (3/5) ? "" : "gently"))>>

	<<switch $ballssize>>
		<<case -2 -1 0>> This text should be unreachable.
		<<case 1 2>> You cup your $_balls with your hands and $_gently squeeze them.
		<<case 3>> You cup your $_balls with your hands and $_gently squeeze them.
		<<case 4>> You $_gently squeeze your $_balls with your hands.
	<</switch>>

	<<set _ballplayeffects to true>>

<<elseif $leftaction is "mballssqueeze" or $rightaction is "mballssqueeze">>
	<<if $leftaction is "mballssqueeze">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
		<<set $_hand to "left hand">>
	<<else>>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
		<<set $_hand to "right hand">>
	<</if>>
	<<arousal 200>>
	/* if both hands are on their balls, say "the other" when referring to the second */
	<<set $_oneofyourballs to ($ballssize lte 0 ? "your $_balls" : ($_oneofyourballs is undefined ? "one of your $_balls" : "the other"))>>
	<<set $_gently to ($arousal gte $arousalmax * (4/5) ? "urgently" : ($arousal gte $arousalmax * (3/5) ? "" : "gently"))>>

	<<switch $ballssize>>
		<<case -2 -1 0>> You cup your $_balls with your $_hand and $_gently squeeze them.
		<<case 1 2>> You cup $_oneofyourballs with your $_hand and $_gently squeeze it.
		<<case 3>> You cup $_oneofyourballs with your $_hand and $_gently squeeze it.
		<<case 4>> You $_gently squeeze $_oneofyourballs with your $_hand.
	<</switch>>

	<<set _ballplayeffects to true>>

<</if>>

<<if $leftaction is "mballsentrance" and $rightaction is "mballsentrance">>
	<<set $leftactiondefault to "mballsfondle">><<set $leftaction to 0>><<set $leftarm to "mballs">>
	<<set $rightactiondefault to "mballsfondle">><<set $rightaction to 0>><<set $rightarm to "mballs">>
	<<arousal 200>>

	<<switch $ballssize>>
		<<case -2 -1 0>> This text should be unreachable.
		<<case 1 2>> You take one of your $_balls in each hand.
		<<case 3>> You take one of your $_balls in each hand. They fill your palms nicely.
		<<case 4>> You take one of your $_balls in each hand. You can barely get your hands around them.
	<</switch>>

	<<set _ballplayeffects to true>>

<<elseif $leftaction is "mballsentrance" or $rightaction is "mballsentrance">>
	<<if $leftaction is "mballsentrance">>
		<<set $leftactiondefault to "mballsfondle">><<set $leftaction to 0>><<set $leftarm to "mballs">>
		<<set $_hand to "left hand">><<set $_otherHandOnBalls to $rightarm is "mballs">>
	<<else>>
		<<set $rightactiondefault to "mballsfondle">><<set $rightaction to 0>><<set $rightarm to "mballs">>
		<<set $_hand to "right hand">><<set $_otherHandOnBalls to $leftarm is "mballs">>
	<</if>>
	<<arousal 100>>
	/* if both hands are on their balls, say "the other" when referring to the second */
	<<set $_oneofyourballs to ($ballssize lte 0 ? "both of your $_balls" : ($_oneofyourballs is undefined ? "one of your $_balls" : "the other"))>>

	<<switch $ballssize>>
		<<case -2 -1 0>> You easily grab both of your $_balls with your $_hand.
		<<case 1 2>> You take $_oneofyourballs in your $_hand.
		<<case 3>> You take $_oneofyourballs in your $_hand. It fills your palm nicely.
		<<case 4>> You take $_oneofyourballs in your $_hand. You can barely get your hand around it.
	<</switch>>

	<<set _ballplayeffects to true>>
<</if>>

<<if _ballplayeffects>>
	<<if $worn.over_lower.vagina_exposed is 0>>
		<<set _highestclothinglower to $worn.over_lower.name>>
	<<elseif $worn.lower.vagina_exposed is 0>>
		<<set _highestclothinglower to $worn.lower.name>>
	<<elseif $worn.under_lower.vagina_exposed is 0>>
		<<set _highestclothinglower to $worn.under_lower.name>>
	<<else>>
		<<set $_genitals_exposed to true>>
	<</if>>
	<<if $arousal gte $arousalmax * (4/5)>>
		Your <<penis>> bucks eagerly, and
		<<if $_genitals_exposed>>
			precum leaps from the tip.
		<<else>>
			precum seeps through your _highestclothinglower.
		<</if>>
	<<elseif $arousal gte $arousalmax * (3/5)>>
		Your <<penis>> bucks eagerly, and
		<<if $_genitals_exposed>>
			precum beads at the tip.
		<<else>>
			your precum creates a dark spot on your _highestclothinglower.
		<</if>>
	<<elseif $arousal gte $arousalmax * (2/5)>>
		The pressure makes your <<penis>> throb.
	<<else>>
		The pressure makes your <<penis>> twitch.
	<</if>>
<</if>>

<<if $mouthaction is "mpenisentrance">>
	<<set $mouthactiondefault to "mpenislick">><<set $mouthaction to 0>><<arousal 100>><<set $mouth to "mpenisentrance">>
	<<if $worn.under_lower.vagina_exposed is 1 and $worn.lower.vagina_exposed is 1>>
		You get close enough to your <<penis>> to reach out and lick the tip with your tongue.
		<<arousal 100>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		/* this shouldn't be reachable. i think the action is not available unless the player's penis is completely uncovered. */
		You run your tongue over your <<penis>>, feeling the bulge beneath your $worn.lower.name.
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your tongue over your <<penis>>, feeling the bulge beneath your $worn.under_lower.name.
	<</if>>
<</if>>

<<if $mouthaction is "mpenislick">>
	<<set $mouthactiondefault to "mpenislick">><<set $mouthaction to 0>><<arousal 100>>
	<<if $worn.under_lower.vagina_exposed is 1 and $worn.lower.vagina_exposed is 1>>
		<<arousal 100>>
		<<if $arousal gte $arousalmax * (4/5)>>
			Your <<penis>> twitches every time you lick it, but you don't stop.
		<<elseif $arousal gte $arousalmax * (3/5)>>
			You run your tongue over your <<penis>> head, mixing your saliva with your precum.
		<<else>>
			You run your tongue over your <<penis>> head, focusing on your sensitive spots.
		<</if>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		/* this shouldn't be reachable. i think the action is not available unless the player's penis is completely uncovered. */
		You run your tongue over your <<penis>>, feeling the bulge beneath your $worn.lower.name.
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your tongue over your <<penis>>, feeling the bulge beneath your $worn.under_lower.name.
	<</if>>
<</if>>

<<if $mouthaction is "mpenistakein">>
	<<set $selfsuckDepth to 0>>
	<<set $_actiondefault to ($penisHeight is 0 ? "mpenissuck" : "mpenisdeepthroat")>>
	<<set $mouthactiondefault to $_actiondefault>><<set $mouthaction to 0>><<set $mouth to "mpenis">>
	<<arousal 200>>
	<<if $penisHeight is 0>>
		You take your <<penis>> into your mouth, sending a lewd tingle up your spine.
	<<else>>
		You take the head of your <<penis>> into your mouth, sending a lewd tingle up your spine.
	<</if>>
<</if>>

<<if $mouthaction is "mpenisdeepthroat">>
	<<set $selfsuckDepth += 1>>
	<<set $_actiondefault to ($selfsuckDepth lt $selfsuckLimit ? $mouthaction : "mpenissuck")>>
	<<set $mouthactiondefault to $_actiondefault>><<set $mouthaction to 0>>
	<<set $_arousalGain to 200 + 50*$selfsuckDepth>>
	<<arousal $_arousalGain>>

	You push your <<penis>> deeper into your mouth.
	/* dev note: add willpower to check if the player can get their penis down their throat? */

	<<if $selfsuckDepth is $penisHeight>>
		<<if $leftarm is "mpenisentrance" and $rightarm is "mpenisentrance">>
			<<set $leftarm to 0>><<set $leftactiondefault to "mrest">>
			<<set $rightarm to 0>><<set $rightactiondefault to "mrest">>
			You take your hands off your penis to make room.
		<<elseif $leftarm is "mpenisentrance">>
			<<set $leftarm to 0>><<set $leftactiondefault to "mrest">>
			You move your left hand away from your penis to make room.
		<<elseif $rightarm is "mpenisentrance">>
			<<set $rightarm to 0>><<set $rightactiondefault to "mrest">>
			You move your right hand away from your penis to make room.
		<</if>>
	<</if>>
	<<set _deepthroateffects to true>>
<</if>>

<<if $mouthaction is "mpenispullback">>
	<<set $selfsuckDepth -= 1>>
	<<set $_arousalGain to 200 + 50*$selfsuckDepth>>
	<<arousal $_arousalGain>>

	<<if $selfsuckDepth gte 2>>
		<<set $mouthactiondefault to $mouthaction>><<set $mouthaction to 0>>
		You pull back hard on your <<penis>> and extract some of it from your throat.
		<<set _deepthroateffects to true>>
	<<elseif $selfsuckDepth is 1>>
		<<set $mouthactiondefault to $mouthaction>><<set $mouthaction to 0>>
		You pull back on your <<penis>> and free it from your throat.
		<<set _deepthroateffects to true>>
	<<else>>
		<<set $mouthactiondefault to "mpenisstop">><<set $mouthaction to 0>>
		You pull back until only the head of your <<penis>> remains in your mouth.
	<</if>>
<</if>>

<<if _deepthroateffects>>
	<<switch $penisHeight>>
	<<case 0>>
		Error: Impossible condition.
	<<case 1>>
		<<switch $selfsuckDepth>>
		<<case 1>>Your lips touch the base of your <<penis>> and the head pokes at the back of your mouth.
		<<default>>Error: Impossible condition.
		<</switch>>
	<<case 2>>
		<<switch $selfsuckDepth>>
		<<case 1>>The head of your penis is poking at the entrance to your throat.
		<<case 2>>Your lips touch the base of your <<penis>> as the head pushes into your throat.
		<<default>>Error: Impossible condition.
		<</switch>>
	<<case 3>>
		<<switch $selfsuckDepth>>
		<<case 1>>The head of your penis is poking at the entrance to your throat.
		<<case 2>>Your <<penis>> is stretching the walls of your throat.
		<<case 3>>Your lips touch the base of your <<penis>> as the shaft fills your throat.
		<<default>>Error: Impossible condition.
		<</switch>>
	<<default>>
		Error: Impossible condition.
	<</switch>>
	<<if $selfsuckDepth is $penisHeight>>
		You've reached the bottom.
	<<elseif $selfsuckDepth is $selfsuckLimit>>
		You are not flexible enough to get any lower.
	<</if>>
<</if>>

<<if $mouthaction is "mpenismouthoff">>
	<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>><<set $mouth to "mpenisentrance">>
	You take your mouth off of your <<penis>>.
<</if>>

<<if $mouthaction is "mpenissuck">>
	<<set $mouthactiondefault to "mpenissuck">><<set $mouthaction to 0>>
	<<arousal 200>>

	<<set $_eagerly to ($arousal gte $arousalmax * (2/5) ? "eagerly" : "slowly")>>

	<<if $arousal gte ($arousalmax / 5) * 4>>
		<<if $selfsuckDepth lte 1>>
			You drink down precum as it flows into your mouth while you move your head back and forth on your <<penis>>.
		<<else>>
			Precum flows down your throat as you move your head back and forth on your <<penis>>.
		<</if>>
	<<else>>
		<<if $penisHeight is $selfsuckDepth>>
			/* mouth is at base of penis */
			<<if $selfsuckDepth gte 2>>
				You lick the base of your <<penis>> while your throat massages the shaft.
			<<else>>
				You $_eagerly suck on your <<penis>> while licking the base.
			<</if>>
		<<elseif $selfsuckDepth gte 1>>
			You $_eagerly suck on your <<penis>> while licking along the shaft.
		<<else>>
			You $_eagerly suck on your <<penis>> while licking around the tip.
		<</if>>
	<</if>>
<</if>>

<<if $mouthaction is "mpenisstop">>
	<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>><<set $mouth to 0>>
	You move your mouth away from your <<penis>>.
<</if>>

<<if $mouthaction is "mvaginaentrance">>
	<<set $mouthactiondefault to "mvaginalick">><<set $mouthaction to 0>><<arousal 100>><<set $mouth to "mvaginaentrance">><<set $vaginause to "mouth">>
	<<if $_genitals_exposed>>
		You run your tongue over your exposed clit and shiver in anticipation.
		<<arousal 100>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		You run your tongue over your <<pussy>>, feeling it beneath your $worn.lower.name.
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your tongue over your <<pussy>>, feeling it beneath your $worn.under_lower.name.
	<</if>>
<</if>>

<<if $mouthaction is "mvaginalick">>
	<<set $mouthactiondefault to "mvaginalick">><<set $mouthaction to 0>><<arousal 100>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You shiver in anticipation as you lick up the fluid coming from your <<pussy>>.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You lick your <<pussy>>, trying to reach the more difficult spots.
	<<else>>
		You lick your <<pussy>>.
	<</if>>
<</if>>
<<if $mouthaction is "mvaginaclit">>
	<<set $mouthactiondefault to "mvaginaclit">><<set $mouthaction to 0>><<arousal 200>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You shiver in anticipation as you suck and gently rub your clit against your teeth.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You lick and suck your clit.
	<<else>>
		You lick your clit.
	<</if>>
<</if>>
<<if $mouthaction is "mvaginastop">>
	<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>><<set $mouth to 0>><<set $vaginause to 0>>
	You move your mouth away from your <<pussy>>.
<</if>>

<<if $player.penisExist>>
	<<if $arousal gte $arousalmax * (3/5) and $mouth isnot "mpenis" and not _ballplayeffects>>
		<<if $worn.over_lower.vagina_exposed is 0>>
			<<set _highestclothinglower to $worn.over_lower.name>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			<<set _highestclothinglower to $worn.lower.name>>
		<<elseif $worn.under_lower.vagina_exposed is 0>>
			<<set _highestclothinglower to $worn.under_lower.name>>
		<<else>>
			<<set $_genitals_exposed to true>>
		<</if>>
		<<if $arousal gte $arousalmax * (4/5)>>
			Your <<penis>> bucks eagerly, and
			<<if $_genitals_exposed>>
				precum leaps from the tip.
			<<else>>
				precum seeps through your _highestclothinglower.
			<</if>>
		<<else>>
			Your <<penis>> bucks eagerly, and
			<<if $_genitals_exposed>>
				precum beads at the tip.
			<<else>>
				your precum creates a dark spot on your _highestclothinglower.
			<</if>>
		<</if>>
	<</if>>
<</if>>

<<if $mouthaction is "mpenisflowerlick">>
	<<set $mouthactiondefault to "mpenisflowerlick">><<set $mouthaction to 0>><<set $mouth to "mpenisflowerlick">><<arousal 200>><<drugs 10>><<set $moorPhallusPlant to 2>>
	<<print either(
		"You almost take the phallus plant into your mouth, but suddenly feel apprehensive.",
		"You lick the phallus plant's tip and swallow the sweet liquid.",
		"You lick the phallus plant's tip.",
	)>>
	<<if $vaginaaction is "mpenisflowerrub">>
		<<set $vaginaaction to 0>><<set $vaginaactiondefault to "mrest">>
	<</if>>
	<<if $anusaction is "mpenisflowerrub">>
		<<set $anusaction to 0>><<set $anusactiondefault to "mrest">>
	<</if>>
<</if>>

<<if $mouthaction is "mpenisflowertakein">>
	<<set $mouthactiondefault to "mpenisflowersuck">><<set $mouthaction to 0>><<set $mouth to "mpenisflowersuck">><<arousal 300>><<drugs 10>>
	<<if $player.virginity.oral is true>><<takeVirginity "phallus plant" "oral">><</if>>
	You suck on the plant. It tastes very sweet, and you feel yourself heating up.
<</if>>

<<if $mouthaction is "mpenisflowerstop">>
	<<set $mouthactiondefault to "mrest">><<set $mouthaction to 0>><<set $mouth to 0>><<set $moorPhallusPlant to 1>>
	You stop licking the plant.
<</if>>

<<if $mouthaction is "mpenisflowersuck">>
	<<set $mouthactiondefault to "mpenisflowersuck">><<set $mouthaction to 0>><<arousal 500>><<drugs 10>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You shiver as you drink down the fluid while sucking and moving your head back and forward.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You're sucking on the plant while lapping up it's fluid.
	<<else>>
		You're sucking on the phallus plant.
	<</if>>
<</if>>

<<if $mouthaction is "mpenisflowersuckstop">>
	<<set $mouthactiondefault to "mpenisflowersuck">><<set $mouthaction to 0>><<arousal 300>><<drugs 10>>
	Your head keeps bobbing up and down, sucking on the phallus plant. Try as you might, you just can't will yourself to stop.
<</if>>

<<if $vaginaaction is "mpenisflowerrub">>
	<<set $vaginaactiondefault to "mpenisflowerrub">><<set $vaginaaction to 0>><<set $vaginause to "mpenisflowerrub">><<set $moorPhallusPlant to 2>>
	<<if !$_genitals_exposed>>
		<<arousal 100>>
		You grind your crotch against the plant, although your clothing gets in the way.
	<<else>>
		<<arousal 200>>
		<<print either(
			"You nearly impale yourself on the plant, as a sudden burst of desire hits you. You stop yourself at the last moment, and gently circle the plant around your entrance.",
			"You rub your <<if $player.penisExist>><<penis>><<else>>clit<</if>> against the plant.",
			"You rub your vagina against the phallus plant.",
		)>>
	<</if>>
	<<if $anusaction is "mpenisflowerrub">>
		<<set $anusaction to 0>><<set $anusactiondefault to "mrest">>
	<</if>>
<</if>>

<<if $vaginaaction is "mpenisflowerpenetrate">>
	<<set $vaginaactiondefault to "mpenisflowerbounce">><<set $vaginaaction to 0>><<set $vaginause to "mpenisflowerpenetrate">>
	<<arousal 1000>><<vaginalstat>>
	You lower yourself down, allowing the plant to penetrate you.
	<<vaginaraped>>
	<<if $player.virginity.vaginal is true>>
		<<takeVirginity "a phallus plant" "vaginal">>
		You almost scream out as your vagina struggles to accommodate the plant, but the pain is gone within moments.
	<<else>>
		You've never felt anything quite like it before.
	<</if>>
<</if>>

<<if $vaginaaction is "mpenisflowerstop">>
	<<set $vaginaactiondefault to "mrest">><<set $vaginaaction to 0>><<set $vaginause to 0>><<set $moorPhallusPlant to 1>>
	You stop rubbing your vagina against the phallus plant.
<</if>>

<<if $vaginaaction is "mpenisflowerbounce">>
	<<set $vaginaactiondefault to "mpenisflowerbounce">><<set $vaginaaction to 0>><<arousal 500>><<drugs 10>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You hungrily ride the plant, rubbing it as quickly as you can. The sensation threatens to drive you mad.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You bounce on the phallus plant. The sensation threatens to drive you mad.
	<<else>>
		You gently bounce on the phallus plant, each poke sending a wave of pleasure through your body.
	<</if>>
<</if>>

<<if $vaginaaction is "mpenisflowerpenetratestop">>
	<<set $vaginaactiondefault to "mpenisflowerbounce">><<set $vaginaaction to 0>><<arousal 300>><<drugs 10>>
	Your legs fail to lift you off of the plant, as if your body isn't obeying you.
<</if>>

<<if $anusaction is "mpenisflowerrub">>
	<<set $anusactiondefault to "mpenisflowerrub">><<set $anusaction to 0>><<set $anususe to "mpenisflowerrub">><<set $moorPhallusPlant to 2>>
	<<if !$_genitals_exposed>>
		<<arousal 100>>
		You grind your ass against the plant, although your clothes get in the way.
	<<else>>
		<<arousal 200>>
		<<print either(
			"You nearly let yourself take the whole plant into your anus, but stop yourself at the last moment. You gently circle the plant around the entrance.",
			"You rub the phallus plant between your <<bottom>> cheeks.",
			"You rub your anus against the phallus plant.",
		)>>
	<</if>>
<</if>>

<<if $anusaction is "mpenisflowerpenetrate">>
	<<set $anusactiondefault to "mpenisflowerbounce">><<set $anusaction to 0>><<set $anususe to "mpenisflowerpenetrate">>
	<<arousal 1000>><<analstat>>
	You lower yourself down, allowing the plant to penetrate you.
	<<if $player.virginity.anal is true>>
		<<takeVirginity "a phallus plant" "anal">>
		You almost scream out as your no longer virgin anus struggles to accommodate the plant, but the pain is gone within moments.
	<<else>>
		You've never felt anything quite like it before.
	<</if>>
<</if>>

<<if $anusaction is "mpenisflowerstop">>
	<<set $anusactiondefault to "mrest">><<set $anusaction to 0>><<set $anususe to 0>><<set $moorPhallusPlant to 1>>
	You stop rubbing your anus against the phallus plant.
<</if>>

<<if $anusaction is "mpenisflowerbounce">>
	<<set $anusactiondefault to "mpenisflowerbounce">><<set $anusaction to 0>><<arousal 500>><<drugs 10>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You roughly ride the plant, rubbing it as quickly as you can. It's unlike anything you've felt before.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You ride the plant<<if $player.penisExist>>, trying to get it to hit your prostate<</if>>. It's unlike anything you've felt before.
	<<else>>
		You gently ride the phallus plant, each poke sending a wave of pleasure through your body.
	<</if>>
<</if>>

<<if $anusaction is "mpenisflowerpenetratestop">>
	<<set $anusactiondefault to "mpenisflowerbounce">><<set $anusaction to 0>><<arousal 300>><<drugs 10>>
	Your legs fail to lift you off of the plant, as if your body isn't obeying you.
<</if>>

/* Hand on Vagina Actions */

<<if $leftaction is "mvaginaentrance" and $rightaction is "mvaginaentrance">>
	<<set $_actiondefault to ($player.penisExist ? "mvaginarub" : "mvaginaclit")>>
	<<set $leftactiondefault to $_actiondefault>><<set $leftaction to 0>><<set $leftarm to "mvaginaentrance">>
	<<set $rightactiondefault to $_actiondefault>><<set $rightaction to 0>><<set $rightarm to "mvaginaentrance">>
	<<arousal 400>>
	<<if $_genitals_exposed and $bugsinside is 1>>
		You run your fingers over your exposed <<pussy>>, and feel some bugs running around.
		<<addVaginalWetness 2>>
	<<elseif $_genitals_exposed>>
		You run your fingers over your exposed <<pussy>> and shiver in anticipation.
		<<addVaginalWetness 2>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.lower.name.
		<<addVaginalWetness 1>>
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.under_lower.name.
		<<addVaginalWetness 1>>
	<<else>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your clothing.
		<<addVaginalWetness 0>>
	<</if>>
<<elseif $leftaction is "mvaginaentrance" or $rightaction is "mvaginaentrance">>
	<<set $_actiondefault to ($player.penisExist ? "mvaginarub" : "mvaginaclit")>>
	<<if $leftaction is "mvaginaentrance">>
		<<set $leftactiondefault to $_actiondefault>><<set $leftaction to 0>><<set $leftarm to "mvaginaentrance">>
	<</if>>
	<<if $rightaction is "mvaginaentrance">>
		<<set $rightactiondefault to $_actiondefault>><<set $rightaction to 0>><<set $rightarm to "mvaginaentrance">>
	<</if>>
	<<arousal 200>>
	<<if $_genitals_exposed and $bugsinside is 1>>
		You run your fingers over your exposed <<pussy>>, and feel some bugs running around.
		<<addVaginalWetness 2>>
	<<elseif $_genitals_exposed>>
		You run your fingers over your exposed <<pussy>> and shiver in anticipation.
		<<addVaginalWetness 2>>
	<<elseif $worn.lower.vagina_exposed is 0>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.lower.name.
		<<addVaginalWetness 0>>
	<<elseif $worn.under_lower.vagina_exposed is 0>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.under_lower.name.
		<<addVaginalWetness 1>>
	<<else>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your clothing.
		<<addVaginalWetness 0>>
	<</if>>
<</if>>

/* the player can only finger themself with one hand */
<<if $leftaction is "mvagina" and $rightaction is "mvagina">>
	<<set $rightaction to "mvaginarub">>
<</if>>

<<if $leftaction is "mvagina" or $rightaction is "mvagina">>
	<<set $fingersInVagina += 1>>
	<<if $leftaction is "mvagina">>
		<<set $leftactiondefault to "mvaginafingeradd">><<set $leftaction to 0>><<set $leftarm to "mvagina">>
		<<set $semenInVagina to ($leftFingersSemen gte 1)>>
		<<set _lubricated to ($leftFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<</if>>
	<<if $rightaction is "mvagina">>
		<<set $rightactiondefault to "mvaginafingeradd">><<set $rightaction to 0>><<set $rightarm to "mvagina">>
		<<set $semenInVagina to ($rightFingersSemen gte 1)>>
		<<set _lubricated to ($rightFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<</if>>
	<<arousal 200>>
	<<if $_hymenIntact>>
		You push a _lubricated finger into your <<pussy>> until you poke your unblemished hymen.
	<<elseif $bugsinside is 1>>
		You push a _lubricated finger into your <<pussy>>. You feel insects crawling inside.
	<<else>>
		You push a _lubricated finger into your <<pussy>> which parts to allow the intrusion.
	<</if>>

	<<addVaginalWetness 1>>
	<<set _fingeringEffects to true>>
<</if>>

<<if $leftaction is "mvaginafingeradd" or $rightaction is "mvaginafingeradd">>
	<<set $fingersInVagina += 1>>
	<<if $leftaction is "mvaginafingeradd">>
		<<set $leftactiondefault to ($fingersInVagina is $vaginaFingerLimit ? "mvaginatease" : $leftaction)>><<set $leftaction to 0>>
		<<set $semenInVagina to ($leftFingersSemen gte 1)>>
		<<set _lubricated to ($leftFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<</if>>
	<<if $rightaction is "mvaginafingeradd">>
		<<set $rightactiondefault to ($fingersInVagina is $vaginaFingerLimit ? "mvaginatease" : $rightaction)>><<set $rightaction to 0>>
		<<set $semenInVagina to ($rightFingersSemen gte 1)>>
		<<set _lubricated to ($rightFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<</if>>
	<<set $_arousalGain to 200 + 50*$fingersInVagina>>
	<<arousal $_arousalGain>>
	<<if $bugsinside is 1>>
		<<if $fingersInVagina is $vaginaFingerLimit>>
			You gasp as you fit one last _lubricated finger inside yourself. You feel insects crawling inside.
		<<else>>
			You stretch yourself further as you push another _lubricated finger into your <<pussy>>. You feel insects crawling inside.
		<</if>>
	<<else>>
		<<if $fingersInVagina is $vaginaFingerLimit>>
			You gasp as you fit one last _lubricated finger inside yourself.
		<<else>>
			You stretch yourself further as you push another _lubricated finger into your <<pussy>>.
		<</if>>
	<</if>>

	<<addVaginalWetness $fingersInVagina>>
	<<set _fingeringEffects to true>>
<</if>>

<<if _fingeringEffects>>
	<<if $fingersInVagina is $vaginaFingerLimit-1>>
		It's a tight fit.
	<<elseif $fingersInVagina is $vaginaFingerLimit>>
		<<if $_hymenIntact>>
			You can't fit any more without tearing your hymen.
		<<else>>
			You've reached your limit.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mvaginatease" or $rightaction is "mvaginatease">>
	<<if $leftaction is "mvaginatease">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "mvaginatease">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<set $_arousalGain to 300 + 50*$fingersInVagina>>
	<<arousal $_arousalGain>>
	<<set $_fingers to ($fingersInVagina is 1 ? "finger" : "fingers")>>
	<<addVaginalWetness $fingersInVagina>>
	<<if $bugsinside is 1>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			<<if $vaginaArousalWetness gte 60>>
				<<vaginaFluidActive>>
				You pump <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, coaxing out lewd fluid, along with some bugs and insects.
			<<else>>
				You pump <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, coaxing out some bugs and insects.
			<</if>>
		<<elseif $arousal gte ($arousalmax / 5) * 2>>
			You push <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, feeling the insects and bugs inside of you.
		<<else>>
			You gently fuck the entrance of your <<pussy>> with <<number $fingersInVagina>> $_fingers, pushing some of the bugs around.
		<</if>>
	<<else>>
		<<if $arousal gte ($arousalmax / 5) * 4>>
			<<if $vaginaArousalWetness gte 60>>
				<<vaginaFluidActive>>
				You pump <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, coaxing out lewd fluid.
			<<else>>
				You pump <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, pushing as deep as you can reach.
			<</if>>
		<<elseif $arousal gte ($arousalmax / 5) * 2>>
			You push <<number $fingersInVagina>> $_fingers in and out of your <<pussy>>, feeling a thrill even without going too deep.
		<<else>>
			You gently fuck the entrance of your <<pussy>> with <<number $fingersInVagina>> $_fingers.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "mvaginaclit" and $rightaction is "mvaginaclit">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You press down on your clit with your thumb and rub it in a circular motion.
		You gently brush the tip with your fingers, but it becomes harder to do as you become more sensitive.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You tease the tip of your clit with your fingers.
	<<else>>
		You rub your clit with your fingers, developing a lewd feeling.
	<</if>>
	<<addVaginalWetness 3>>
<<elseif $leftaction is "mvaginaclit" or $rightaction is "mvaginaclit">>
	<<if $leftaction is "mvaginaclit">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "mvaginaclit">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 200>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You press down on your clit with your thumb and rub it in a circular motion, feeling your arousal build.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You tease the tip of your clit with your fingers.
	<<else>>
		You rub your clit with your fingers, developing a lewd feeling.
	<</if>>
	<<addVaginalWetness 2>>
<</if>>

<<if $leftaction is "mvaginarub" and $rightaction is "mvaginarub">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<if $_genitals_exposed and $bugsinside is 1>>
		You run your fingers over your exposed <<pussy>>, and feel some bugs running around.
		<<addVaginalWetness 2>>
	<<elseif $_genitals_exposed>>
		You run your fingers over your exposed <<pussy>> and shiver in anticipation.
		<<addVaginalWetness 2>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.lower.name.
		<<addVaginalWetness 1>>
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your $worn.under_lower.name.
		<<addVaginalWetness 2>>
	<<else>>
		You run your fingers over your <<pussy>>, feeling its shape beneath your clothing.
		<<addVaginalWetness 0>>
	<</if>>
<<elseif $leftaction is "mvaginarub" or $rightaction is "mvaginarub">>
	<<if $leftaction is "mvaginarub">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "mvaginarub">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 200>>
	<<if $_genitals_exposed and $bugsinside is 1>>
		You run your finger over your exposed <<pussy>>, and feel some bugs running around.
		<<addVaginalWetness 2>>
	<<elseif $_genitals_exposed>>
		You run your finger over your exposed <<pussy>> and shiver in anticipation.
		<<addVaginalWetness 2>>
	<<elseif $worn.under_lower.vagina_exposed is 1>>
		You run your finger over your <<pussy>>, feeling its shape beneath your $worn.lower.name.
		<<addVaginalWetness 0>>
	<<elseif $worn.lower.vagina_exposed is 1>>
		You run your finger over your <<pussy>>, feeling its shape beneath your $worn.under_lower.name.
		<<addVaginalWetness 1>>
	<<else>>
		You run your finger over your <<pussy>>, feeling its shape beneath your clothing.
		<<addVaginalWetness 0>>
	<</if>>
<</if>>

<<if $leftaction is "mvaginastop" and $rightaction is "mvaginastop">>
	<<set $fingersInVagina to 0>>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your hands away from your <<pussy>>.
<<elseif $leftaction is "mvaginastop">>
	<<if $leftarm is "mvagina">> <<set $fingersInVagina to 0>> <</if>>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	You move your left hand away from your <<pussy>>.
<<elseif $rightaction is "mvaginastop">>
	<<if $rightarm is "mvagina">> <<set $fingersInVagina to 0>> <</if>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your right hand away from your <<pussy>>.
<</if>>

<<if $leftaction is "mvaginafingerremove" or $rightaction is "mvaginafingerremove">>
	<<set $fingersInVagina -= 1>>
	<<if $fingersInVagina gte 1>>
		<<if $leftaction is "mvaginafingerremove">>
			<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
		<<else>>
			<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
		<</if>>
		You take one finger out of your <<pussy>>.
	<<else>>
		<<if $leftaction is "mvaginafingerremove">>
			<<set $leftactiondefault to "mvaginarub">><<set $leftaction to 0>><<set $leftarm to "mvaginaentrance">>
		<<else>>
			<<set $rightactiondefault to "mvaginarub">><<set $rightaction to 0>><<set $rightarm to "mvaginaentrance">>
		<</if>>
		You take your finger out of your <<pussy>>.
	<</if>>
<</if>>

<<if $player.vaginaExist>>
	<<if $vaginaArousalWetness gte 60>>
		<<if $worn.under_lower.vagina_exposed is 1 and $worn.lower.vagina_exposed is 1>>
			<<vaginaFluidPassive>>
			<<if _lube_released gt 0>>
				Juices leak from your <<pussy>>.
			<</if>>
		<<elseif $worn.under_lower.vagina_exposed is 0 and $underlowerwetstage lt 3>>
			Juices leak from your <<pussy>> and dampen your $worn.under_lower.name.
			<<set $underlowerwet += 1>>
		<<elseif $worn.lower.vagina_exposed is 0>>
			Juices leak from your <<pussy>><<if $underlowerwet gte 60>>, soak through your $worn.under_lower.name,<</if>> and dampen your $worn.lower.name.
		<<else>>
			Juices leak from your <<pussy>> and dampen your clothing.
		<</if>>
	<</if>>
<</if>>

<<if $leftaction is "manusentrance" and $rightaction is "manusentrance">>
	<<set $leftactiondefault to "manusrub">><<set $leftaction to 0>><<set $leftarm to "manusentrance">>
	<<set $rightactiondefault to "manusrub">><<set $rightaction to 0>><<set $rightarm to "manusentrance">>
	<<arousal 200>>
	<<if $worn.under_lower.anus_exposed is 1 and $worn.lower.anus_exposed is 1>>
		You reach down to your exposed <<bottom>> and gently press your fingers against your anus.
	<<elseif $worn.under_lower.anus_exposed is 1>>
		You reach down to your <<bottom>> and gently press your fingers against your anus through your $worn.lower.name.
	<<elseif $worn.lower.anus_exposed is 1>>
		You reach down to your <<bottom>> and gently press your fingers against your anus through your $worn.under_lower.name.
	<</if>>
<<elseif $leftaction is "manusentrance" or $rightaction is "manusentrance">>
	<<if $leftaction is "manusentrance">>
		<<set $leftactiondefault to "manusrub">><<set $leftaction to 0>><<set $leftarm to "manusentrance">>
	<</if>>
	<<if $rightaction is "manusentrance">>
		<<set $rightactiondefault to "manusrub">><<set $rightaction to 0>><<set $rightarm to "manusentrance">>
	<</if>>
	<<arousal 200>>
	<<if $worn.under_lower.anus_exposed is 1 and $worn.lower.anus_exposed is 1>>
		You reach down to your exposed <<bottom>> and gently press a finger against your anus.
	<<elseif $worn.under_lower.anus_exposed is 1>>
		You reach down to your <<bottom>> and gently press a finger against your anus through your $worn.lower.name.
	<<elseif $worn.lower.anus_exposed is 1>>
		You reach down to your <<bottom>> and gently press a finger against your anus through your $worn.under_lower.name.
	<</if>>
<</if>>

<<if $leftaction is "manus" and $rightaction is "manus">>
	<<set $leftactiondefault to "manustease">><<set $leftaction to 0>><<set $leftarm to "manus">>
	<<set $rightactiondefault to "manustease">><<set $rightaction to 0>><<set $rightarm to "manus">>
	<<arousal 200>>
	<<set _lubricated to ($leftFingersSemen gte 1 or $rightFingersSemen gte 1 ? "semen-lubricated" : "")>>
	You push two _lubricated fingers into your <<bottom>>.
<<elseif $leftaction is "manus" or $rightaction is "manus">>
	<<if $leftaction is "manus">>
		<<set $leftactiondefault to "manustease">><<set $leftaction to 0>><<set $leftarm to "manus">>
		<<set _lubricated to ($leftFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<<elseif $rightaction is "manus">>
		<<set $rightactiondefault to "manustease">><<set $rightaction to 0>><<set $rightarm to "manus">>
		<<set _lubricated to ($rightFingersSemen gte 1 ? "semen-lubricated" : "")>>
	<</if>>
	<<arousal 200>>
	You push a _lubricated finger into your <<bottom>>.
<</if>>

<<if $leftaction is "manusrub" and $rightaction is "manusrub">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<print either(
		"You keep your fingers pressed between your <<bottom>> cheeks and gently prod your anus.",
		"You rub your anus in a circular motion.",
		"You push your fingers against your anus. You feel it open a little bit."
	)>>
<<elseif $leftaction is "manusrub" or $rightaction is "manusrub">>
	<<if $leftaction is "manus">>
		<<set $leftactiondefault to "manustease">><<set $leftaction to 0>><<set $leftarm to "manus">>
	<<elseif $rightaction is "manus">>
		<<set $rightactiondefault to "manustease">><<set $rightaction to 0>><<set $rightarm to "manus">>
	<</if>>
	<<arousal 200>>
	<<print either(
		"You keep your fingers pressed between your <<bottom>> cheeks and gently prod your anus.",
		"You rub your anus in a circular motion.",
		"You push your fingers against your anus. You feel it open a little bit."
	)>>
<</if>>

<<if $leftaction is "manustease" and $rightaction is "manustease">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 400>>
	<<print either(
		"You gently explore inside your <<bottom>> with your fingers.",
		"You slowly push your fingers into and out of your anus.",
		"You fuck your <<bottom>> with your fingers. You feel naughty about playing with such a place."
	)>>
<<elseif $leftaction is "manustease" or $rightaction is "manustease">>
	<<if $leftaction is "manustease">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "manustease">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 200>>
	<<print either(
		"You gently explore inside your <<bottom>> with your finger.",
		"You slowly push your finger into and out of your anus.",
		"You fuck your <<bottom>> with your fingers. You feel naughty about playing with such a place."
	)>>
<</if>>

<<if $leftaction is "manusprostate" and $rightaction is "manusprostate">>
	<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<<arousal 600>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You stroke your prostate, milking it of semen and making you shudder.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You press against your prostate, causing an almost unbearably pleasurable feeling of vulnerability.
	<<else>>
		You gently prod your prostate, each poke sending a wave of pleasure through your body.
	<</if>>
<<elseif $leftaction is "manusprostate" or $rightaction is "manusprostate">>
	<<if $leftaction is "manusprostate">>
		<<set $leftactiondefault to $leftaction>><<set $leftaction to 0>>
	<</if>>
	<<if $rightaction is "manusprostate">>
		<<set $rightactiondefault to $rightaction>><<set $rightaction to 0>>
	<</if>>
	<<arousal 300>>
	<<if $arousal gte ($arousalmax / 5) * 4>>
		You stroke your prostate, milking it of semen and making you shudder.
	<<elseif $arousal gte ($arousalmax / 5) * 3>>
		You press against your prostate, causing an almost unbearably pleasurable feeling of vulnerability.
	<<else>>
		You gently prod your prostate, each poke sending a wave of pleasure through your body.
	<</if>>
<</if>>

<<if $leftaction is "manusstop" and $rightaction is "manusstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your hands away from your <<bottom>>.

<<elseif $leftaction is "manusstop">>
	<<set $leftactiondefault to "mrest">><<set $leftaction to 0>><<set $leftarm to 0>>
	You move your left hand away from your <<bottom>>.

<<elseif $rightaction is "manusstop">>
	<<set $rightactiondefault to "mrest">><<set $rightaction to 0>><<set $rightarm to 0>>
	You move your right hand away from your <<bottom>>.
<</if>>

<<set $rng to random(0,100)>>
<<if $leftaction is "mrest">>
	<<set $leftactiondefault to 0>>
	<<if $rng gte 90 and $corruption_slime gt ($willpower / 10) and $corruptionMasturbation is undefined>>
		<<set $corruptionMasturbation to true>>
		<<set $corruptionMasturbationCount to random(2,6)>>
		The slime in your ear decides that it will continue for you.
	<<else>>
		<<set $leftactiondefault to "mrest">>
		<<set $leftaction to 0>>
	<</if>>
<</if>>
<<set $rng to random(0,100)>>
<<if $rightaction is "mrest">>
	<<set $rightactiondefault to 0>>
	<<if $rng gte 90 and $corruption_slime gt ($willpower / 10) and $corruptionMasturbation is undefined>>
		<<set $corruptionMasturbation to true>>
		<<set $corruptionMasturbationCount to random(2,6)>>
		The slime in your ear decides that it will continue for you.
	<<else>>
		<<set $rightactiondefault to "mrest">>
		<<set $rightaction to 0>>
	<</if>>
<</if>>
<<set $rng to random(0,100)>>
<<if $rng gte Math.clamp(135 - ($corruption_slime / 2),80,98) and $corruption_slime gt ($willpower / 10) and $corruptionMasturbation is undefined>>
	<<set $corruptionMasturbation to true>>
	<<set $corruptionMasturbationCount to random(1,4)>>
	The slime in your ear decides that it wants you to have more fun.
<</if>>

<</widget>>