code:
:: Beach Day Molestation

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<maninit>><<npcstrip>>
	<<if $daystate isnot "night">>
		<<enable_rescue>>
	<</if>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
		<<link [[Next|Beach Day Molestation Alarm]]>><</link>><<nexttext>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

		<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Beach Day Molestation Ejaculation]]>><</link>><<nexttext>>
		<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Day Molestation Escape]]>><</link>><<nexttext>>
		<<elseif $worn.upper.type.includes("naked") and $worn.lower.type.includes("naked") and $worn.under_upper.type.includes("naked") and $worn.under_lower.type.includes("naked")>>
			<<link [[Next|Beach Day Molestation Stripped]]>><</link>><<nexttext>>
		<<else>>
			<<link [[Next->Beach Day Molestation]]>><</link>><<nexttext>>
		<</if>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Day Molestation Ejaculation]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Day Molestation Escape]]>><</link>><<nexttext>>
<<elseif $worn.upper.type.includes("naked") and $worn.lower.type.includes("naked") and $worn.under_upper.type.includes("naked") and $worn.under_lower.type.includes("naked")>>
	<<link [[Next|Beach Day Molestation Stripped]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next->Beach Day Molestation]]>><</link>><<nexttext>>
<</if>>

:: Beach Day Molestation Ejaculation

<<ejaculation>>
<<if $enemyanger gte ($enemyangermax / 5) * 3>>
	"Stupid slut." <<He>> dumps you on the sand.

<<elseif $enemyanger gte 1>>
	Without a word, <<he>> leaves.

<<else>>
	Smiling, <<he>> kisses you on the cheek before taking <<his>> leave.

<</if>>
<<stealclothes>>

<<tearful>> you rise to your feet.

<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Day Molestation Escape

<<effects>>
<<if $daystate isnot "night">>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape.

<<else>>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>

<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Day Molestation Stripped
<<effects>>
With your clothes bundled in <<his>> arms, the <<person>> gives you a mocking look before dashing away, leaving you lying bare on the sand. <<tearful>> you rise to your feet, keeping low to conceal your nudity.

<<set $stealtextskip to 1>>
<<stealclothes>>
<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Day Encounter

<<location "beach">><<effects>>

<<if $phase is 0>>

You walk over to the <<person>> who pretends not to notice you until you stop in front of <<him>>. <<He>> looks at you but doesn't speak.

<<link [[Friendly chat (0:10)|Beach Day Encounter]]>><<set $phase to 1>><<pass 10>><<stress -2>><<trauma -1>><</link>><<lstress>><<ltrauma>>

<<link [[Flirt (0:05)|Beach Day Encounter]]>><<pass 5>><<set $phase to 2>><</link>><<promiscuous1>>

<<link [[Leave|Beach]]>><<endevent>><<set $eventskip to 1>><</link>>

<<elseif $phase is 1>>
You try to bring <<him>> out of <<his>> shell by talking about innocuous things. <<He>> responds politely but you do most of the talking. You catch <<him>> eyeing you up when <<he>> thinks you're not looking.

<<link [[Say goodbye|Beach]]>><<endevent>><<set $eventskip to 1>><</link>>

<<link [[Flirt (0:05)|Beach Day Encounter]]>><<pass 5>><<set $phase to 2>><</link>><<promiscuous1>>

<<elseif $phase is 2>>
You sit on the towel beside <<him>> and lean close. You tell <<him>> <<he>> is a terrific parent but that <<he>> must be in need of stress relief every now and then.
	<<if $NPCList[0].penis is "clothed">>
	<<He>> shifts <<his>> legs as if to conceal something.
	<<else>>
	<<He>> blushes with increasing intensity as you continue.
	<</if>>
<<promiscuity1>>

<<link [[Stop|Beach Day Encounter]]>><<set $phase to 3>><</link>>

<<if $promiscuity gte 15>>
<<link [[Seduce|Beach Day Encounter]]>><<set $phase to 4>><</link>> <<seductiondifficulty>><<promiscuous2>>
<</if>>

<<elseif $phase is 3>>
Satisfied with the effect you stand and take your leave.

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

<<elseif $phase is 4>><<if $seductionskill lt 1000>>You feel more confident in your powers of seduction.<</if>><<seductionskilluse>><<promiscuity2>>
	<<if 1000 - ($rng * 10) - $seductionskill - ($attractiveness / 10) lte -100>>
Gazing into <<his>> eyes, you press your body against <<hers>> and make it absolutely clear what your intentions are. <<He>> glances at <<his>> kids. Satisfied that they're distracted, <<he>> turns and embraces you, <<his>> heart beating furiously.

<<link [[Next|Beach Day Encounter Sex]]>><<set $sexstart to 1>><</link>>
	<<else>>
Gazing into <<his>> eyes, you press your body against <<hers>> and make it absolutely clear what your intentions are. Stammering excuses, <<he>> recoils from your advance and leaves to check on <<his>> children.

<<link [[Nevermind|Beach]]>><<endevent>><<set $eventskip to 1>><</link>>
	<</if>>
<</if>>

:: Beach Day Encounter Sex

<<if $sexstart is 1>>
	<<set $sexstart to 0>>
	<<consensual>>
	<<set $consensual to 1>>
	<<neutral 1>>
	<<maninit>>
	<<set $enemytrust += 100>>
<</if>>
<<location "beach">><<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $finish is 1>>
	<<link[[Next->Beach Day Encounter Sex Finish]]>><</link>><<nexttext>>
<<else>>
	<<if $alarm is 1>>
		<<if $rescue is 1>>
		<<else>>
			No one comes to your aid.
			<<set $alarm to 0>>
			<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

			<<if $enemyarousal gte $enemyarousalmax>>
				<<link [[Next->Beach Day Encounter Sex Ejaculation]]>><</link>><<nexttext>>
			<<elseif $enemyhealth lte 0>>
				<<link [[Next->Beach Day Encounter Sex Escape]]>><</link>><<nexttext>>
			<<else>>
				<<link [[Next->Beach Day Encounter Sex]]>><</link>><<nexttext>>
			<</if>>
		<</if>>
	<<elseif $enemyarousal gte $enemyarousalmax>>
		<<link [[Next->Beach Day Encounter Sex Ejaculation]]>><</link>><<nexttext>>
	<<elseif $enemyhealth lte 0>>
		<<link [[Next->Beach Day Encounter Sex Escape]]>><</link>><<nexttext>>
	<<else>>
		<<link [[Next->Beach Day Encounter Sex]]>><</link>><<nexttext>>
	<</if>>
<</if>>

:: Beach Day Encounter Sex Finish

<<effects>>
While you're stopping sooner than <<he>> would like, <<he>> looks relieved as <<he>> returns <<his>> attention back to <<his>> kids. They don't seem to have noticed anything.

<<clotheson>>

<<endcombat>>
<<set $eventskip to 1>>
[[Next|Beach]]

:: Beach Day Encounter Sex Ejaculation
<<ejaculation>>

Looking like <<he>> just awoke from a dream, <<he>> looks at <<his>> kids while motioning for you to leave. <<tearful>> you wink and turn away.

<<clotheson>>

<<endcombat>>
<<set $eventskip to 1>>
[[Next|Beach]]

:: Beach Day Encounter Sex Escape
<<effects>>

<<if $daystate isnot "night">>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<<else>>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>

<<clotheson>>
<<endcombat>>
<<set $eventskip to 1>>
[[Next|Beach]]

:: Beach Night Dog
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>
	<<beastCombatInit>>

<</if>>

<<effects>>
<<effectsman>>

<<beast $enemyno>>

<<stateman>>

<<actionsman>>

	<<if $alarm is 1>>
		<<if $rescue is 1>>

		<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

			<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next|Beach Night Dog Ejaculation]]>><</link>><<nexttext>>
			<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Night Dog Escape]]>><</link>><<nexttext>>
			<<else>>
			<<link [[Next|Beach Night Dog]]>><</link>><<nexttext>>
			<</if>>
		<</if>>
	<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Night Dog Ejaculation]]>><</link>><<nexttext>>
	<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Night Dog Escape]]>><</link>><<nexttext>>
	<<else>>
	<<link [[Next->Beach Night Dog]]>><</link>><<nexttext>>
	<</if>>

:: Beach Night Dog Ejaculation

<<beastejaculation>>
<<if $enemyanger gte ($enemyangermax / 5) * 3>>
	<<bHe>> bites you on the thigh, then leaves you lying on the sand.
	<<violence 3>>

<<elseif $enemyanger gte 1>>
	<<bHe>> barks then leaves you lying on the sand.

<<else>>
	<<bHe>> licks your <<genitals>> then darts away.
	<<neutral 5>>

<</if>>
<<tearful>> you rise to your feet.
<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Night Dog Escape

<<effects>>
The <<beasttype>> whimpers and flees into the darkness. <<tearful>> you rise to your feet.

<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Night Molestation

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<maninit>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

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

:: Beach Night Molestation Ejaculation

<<ejaculation>>
<<if $enemyanger gte ($enemyangermax / 5) * 3>>
	<<He>> smacks your face, then leaves you lying on the sand.
	<<violence 3>>

<<elseif $enemyanger gte 1>>
	Without a word, <<he>> leaves.

<<else>>
	Smiling, <<he>> kisses you on the cheek. <<His>> breath reeks of alcohol. "This is for you." <<He>> gets up and leaves you lying on the ground.

	You've gained <<moneyGain 5>>.

<</if>>
<<underlowersteal>>
<<tearful>> you rise to your feet.

<<clotheson>>
<<endcombat>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Night Molestation Escape

<<effects>>
<<if $daystate isnot "night">>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<<else>>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>

<<clotheson>>
<<endcombat>>

<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Exhibition
<<location "beach">><<effects>>

<<if $phase is 0>>
	<<if $leftarm is "bound" and $rightarm is "bound">>
		Unable to cover yourself, you bow your head in shame and march through the crowds to the safety of a changing room.
		<<garousal>><<gstress>><<gtrauma>><<stress 6>><<trauma 6>><<arousal 600>><<fameexhibitionism 30>>

		<<link [[Changing room|Changing Room]]>><<endevent>><</link>>
	<<else>>
		<<if $exposed gte 2>>
			Face red with humiliation, you make sure your <<genitals_are 1>> properly concealed and make your way across the beach to the safety of a changing room, taunted and ridiculed all the way.
			<<fameexhibitionism 20>><<garousal>><<arousal 600>>

			<<link [[Changing room|Changing Room]]>><<endevent>><</link>>
		<<else>>
			Face red with humiliation, you make your way across the beach to the safety of a changing room, taunted and ridiculed all the way.
			<<garousal>><<arousal 300>><<fameexhibitionism 10>>

			<<link [[Changing room|Changing Room]]>><<endevent>><</link>>
		<</if>>
	<</if>>
<<else>>
	<<generate2>>Swallowing your pride, you ask if anyone could lend you something to cover up with. Smiling, a <<person2>><<person>> produces some towels for you.
	<<fameexhibitionism 10>>
	<<if $leftarm is "bound" and $rightarm is "bound">>
		Seeing you restrained, <<he>> wraps them round you. <<He>> takes <<his>> time, as if savouring the situation, but eventually you find yourself properly covered.
		<<garousal>><<arousal 600>>
	<<else>>
		You take the offered cloth and, crouching for better concealment, you wrap them around yourself. They're a poor substitute for actual clothing, but you're not the only one attired in such a way.
	<</if>>

	Still blushing, you thank the <<person>> and sheepishly move away from the growing crowd.

	<<if $worn.lower.exposed gte 1>>
		<<lowerwear 3>>
	<</if>>
	<<if $worn.upper.exposed gte 1>>
		<<upperwear 3>>
	<</if>>

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

<</if>>

:: Beach Exhibit Molestation
<<location "beach">><<effects>>

<<if $phase is 0>>

<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>

<<generatey2>><<generatey3>><<generatey4>><<generatey5>>
<<maninit>><<npcstrip>><<npcexhibit>>
"Maybe you like being seen like this? We can help you out there." Arms reach out from all around you!

<<enable_rescue>>
<</if>>

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

<<stateman>>

<<actionsman>>

	<<if $alarm is 1>>
		<<if $rescue is 1>>
		<<link [[Next->Beach Exhibit Molestation Alarm]]>><</link>><<nexttext>>
		<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

			<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Beach Exhibit Molestation Ejaculation]]>><</link>><<nexttext>>
			<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Exhibit Molestation Escape]]>><</link>><<nexttext>>
			<<elseif $orgasmdown gte 1>>
			<<link [[Next->Beach Exhibit Molestation Orgasm]]>><</link>><<nexttext>>
			<<else>>
			<<link [[Next->Beach Exhibit Molestation]]>><</link>><<nexttext>>
			<</if>>
		<</if>>
	<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Exhibit Molestation Ejaculation]]>><</link>><<nexttext>>
	<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Exhibit Molestation Escape]]>><</link>><<nexttext>>
	<<elseif $orgasmdown gte 1>>
	<<link [[Next->Beach Exhibit Molestation Orgasm]]>><</link>><<nexttext>>
	<<else>>
	<<link [[Next->Beach Exhibit Molestation]]>><</link>><<nexttext>>
	<</if>>

<<elseif $phase is 1>>

<<if $sexstart is 1>>
<<set $sexstart to 0>>
<<consensual>>
<<set $consensual to 1>>
<<neutral 1>>

<<maninit>><<npcoral>>
<<set $enemytrust -= 40>>
<<enable_rescue>>
<</if>>

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

<<stateman>>

<<actionsman>>

	<<if $alarm is 1>>
		<<if $rescue is 1>>
		<<link [[Next->Beach Exhibit Molestation Alarm]]>><</link>><<nexttext>>
		<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

			<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Beach Exhibit Molestation Ejaculation]]>><</link>><<nexttext>>
			<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Exhibit Molestation Escape]]>><</link>><<nexttext>>
			<<elseif $finish is 1>>
			<<link [[Next|Beach Exhibit Molestation Finish]]>><</link>><<nexttext>>
			<<else>>
			<<link [[Next->Beach Exhibit Molestation]]>><</link>><<nexttext>>
			<</if>>
		<</if>>
	<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Exhibit Molestation Ejaculation]]>><</link>><<nexttext>>
	<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Exhibit Molestation Escape]]>><</link>><<nexttext>>
	<<elseif $finish is 1>>
	<<link [[Next|Beach Exhibit Molestation Finish]]>><</link>><<nexttext>>
	<<else>>
	<<link [[Next->Beach Exhibit Molestation]]>><</link>><<nexttext>>
	<</if>>

<</if>>

:: Beach Exhibit Molestation Alarm
<<effects>><<set $rescued += 1>><<person1>>

<<He>> notices several heads turning in response to your cry. "You're fucking nuts." <<He>> and <<his>> friends make a quick getaway. <<tearful>> you gather yourself.

<<clotheson>>

<<endcombat>>

[[Next|Beach]]

:: Beach Exhibit Molestation Ejaculation
<<ejaculation>>

<<person1>>
<<if $enemyanger gte ($enemyangermax / 5) * 3>>
<<He>> pushes you onto the sand then spits on you. <<His>> friends follow suit and they leave you lying there, covered in fluid.
<<violence 1>>

<<stealclothes>>
<<clotheson>>

<<elseif $enemyanger gte 1>>
"Oh, I said I'd help you." <<He>> grins at <<his>> friends, "That juice should cover you up well enough." They leave you lying on the sand.
<<clotheson>>

<<else>>
"See, that wasn't so bad, was it?" <<He>> chucks you some towels before sauntering off with <<his>> friends.
<<clotheson>>

	<<if $worn.upper.exposed gte 1 and $worn.lower.exposed gte 1>>
You wrap a towel around your chest and nether regions, creating a makeshift skirt.
<<upperwear 3>><<lowerwear 3>>

	<<elseif $worn.upper.exposed gte 1>>
You wrap a towel around your chest.
<<upperwear 3>>

	<<elseif $worn.lower.exposed gte 1>>
You wrap a towel around your nether regions, creating a makeshift skirt.
<<lowerwear 3>>
	<</if>>

<</if>>

<<tearful>> you rise to your feet.

<<endcombat>><<set $eventskip to 1>>

[[Next|Beach]]

:: Beach Exhibit Molestation Escape
<<effects>><<person1>>

<<if $daystate isnot "night">>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the crowds.

<<else>>
<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>

<<clotheson>>
<<endcombat>><<set $eventskip to 1>>

[[Next|Beach]]

:: Beach Exhibit Molestation Orgasm
<<person1>>A cheer erupts from the group as you spasm in orgasm. The <<person>> is particularly amused. "Wow, you really are a pathetic slut. I don't think you want help at all, I think you're precisely where you want to be." With that, the group leave you quivering on the sand.

<<tearful>> you rise to your feet.

<<clotheson>>

<<endcombat>>

[[Next|Beach]]

:: Beach Exhibit Molestation Finish
<<person1>>
"Had enough?" Fine, but don't expect any help." <<He>> and <<his>> friends leave you on the sand.

<<tearful>> you rise to your feet.

<<clotheson>>

<<endcombat>>

[[Next|Beach]]

:: Passout Beach
/*ToDo: Pregnancy, remove $pregnancyTesting to properly enable*/
<<if $sexStats.vagina.pregnancy.waterBreaking is true and $pregnancyTesting>>
	<<pregnancyWatersBrokenPassout "beach">>
<<else>>
	You've pushed yourself too much.

	<<passout>>

	<<set $danger to random(1, 10000)>>

	<<if $danger gte (9900 - $allure)>>
		<<if $rng gte 1>>
		<<link [[Wake up|Beach Abduction]]>><<strip>><</link>>
		<</if>>
	<<else>>
		<<ambulance>>
	<</if>>

	<<pass 1 hour>>

	<<trauma 6>><<set $stress -= 2000>>
<</if>>

:: Beach Abduction
<<location "beach">><<effects>>

<<generatey1>><<generatey2>><<person1>>You wake up lying on your back, naked in the dunes. You hear a voice, "You're awake." You hasten to your feet and see the speaker, a <<person>>. A <<person2>><<person>> stands next to <<person1>><<him>>.

<<if $loweroff is 0 and $upperoff is 0 and $underloweroff is 0 and $underupperoff is 0>>
"You must be a huge slut, to be wandering around like that. Though I do feel bad about leaving you in such a state. There are some nasty people around."

<<person2>>The <<person>> interjects, "I know! We'll lend you some towels," <<he>> produces some thin cables from <<his>> coat pocket "if you let us dress you first."

<<person1>> The <<person>> seems taken with the idea, "It's your choice. If you don't want to play along, we'll leave you to be raped. You'd probably get off from it anyway."

<<else>>

You see your <<if $upperoff isnot 0>>$upperoff <<elseif $loweroff isnot 0>>$loweroff <<elseif $underupperoff isnot 0>>$underupperoff <<else>>$underloweroff <</if>>in <<his>> hand. <<He>> twirls it playfully, "Finders keepers. Though I do feel bad about leaving you in such a state. There are some nasty people around."

<<person2>>The <<person>> interjects, "I know! We'll give the clothes back," <<he>> produces some thin cables from <<his>> coat pocket "if you let us dress you first."

<<person1>> The <<person>> seems taken with the idea, "It's your choice. If you don't want to play along, we'll be keeping your clothes to do with as we please." <<He>> slowly starts tearing the fabric.

<</if>>

<<link [[Accept|Beach Abduction Bound]]>><</link>>

<<link [[Refuse|Beach Abduction Molestation]]>><<set $molestationstart to 1>><</link>>

:: Beach Abduction Bound
<<effects>>

You submit to being bound. <<person2>> The <<person>> ties your arms together behind your back while the <<person1>><<person>> looks on, a sardonic smile on <<his>> face. It doesn't take long, the <<person2>><<person>> soon stands back to admire <<his>> handiwork. You try to move your arms, but they are tied together tightly. You can only wave them impotently behind your back. Feelings of helplessness rise within you.
<<set $leftarm to "bound">><<set $rightarm to "bound">>

"Just one more thing I think," the <<person>> says, producing a collar and leash.

<<link [[Accept|Beach Abduction Collared]]>><<neckwear 21>><<set $phase to 1>><</link>>

<<link [[Refuse|Beach Abduction Molestation]]>><<set $molestationstart to 1>><</link>>

:: Beach Abduction Molestation
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>

<<maninit>>
	<<if $phase is 0>>
	They look taken aback. "Oh. You're actually okay walking around like that," The <<person1>><<person>> muses. "I guess you won't mind us taking a little more then." They advance on you.

	<<elseif $phase is 1>>

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

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

<<stateman>>

<<actionsman>>

	<<if $alarm is 1>>
		<<if $rescue is 1>>

		<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

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

:: Beach Abduction Molestation Ejaculation
<<ejaculation>>

<<if $phase is 0>>
"Thanks for the company," the <<person1>><<person>> says mockingly. "Good luck!" They leave you lying naked on the sand.

<<stealclothes>>
<<clotheson>>

<<elseif $phase is 1>>
Satisfied, the <<person1>><<person>> unties the cables binding your arms<<if $feetuse is "bound">> and frees your legs as well<</if>>. "Here you go." <<He>> tosses the fabric at you. <<He>> and <<his>> friends leave you to cover up as they laugh their way back to the beach. They left the collar on.

<<unbind>>
<<clothesontowel>>

<</if>>

<<tearful>> you struggle to your feet.

<<endcombat>>
<<set $stress -= 500>>

<<link [[Next|Beach]]>><</link>>
<<set $eventskip to 1>>

:: Beach Abduction Molestation Escape

<<effects>>
<<if $daystate isnot "night">>
	They recoil in pain, giving you the chance you need. <<tearful>> you flee naked into the dunes.

<<else>>
	They recoil in pain, giving you the chance you need. <<tearful>> you flee naked into the darkness.

<</if>>
<<stealclothes>>

<<clotheson>>
<<endcombat>>
<<set $stress -= 500>>
<<link [[Next|Beach]]>><</link>>
<<set $eventskip to 1>>

:: Beach Abduction Collared

<<effects>>
Having come this far, you submit to the collar being placed round your neck. You hear a decisive click as it locks shut. <<person2>>The <<person>> attaches the leash, and tugs.

<<if $rng gte 51>>
	The pair stand back to admire your body, the <<person2>><<person>> holding your leash securely. "Very nice," the <<person1>><<person>> says, circling around you for a different angle. With your arms bound, there's nothing you can do to shield yourself from their scrutiny.

	The <<person2>><<person>> approaches you, and you brace yourself for a more physical probing. Instead, <<he>> unties your bonds while the <<person1>><<person>> throws the fabric over your head. "Here you go. You can keep the collar." Laughing, they head in the direction of the beach. You try to cover up as quickly as possible, but you're still shaking from the ordeal.

	<<unbind>>
	<<clothesontowel>>
	<<endevent>>
	<<set $stress -= 500>>
	<<link [[Next|Beach]]>><</link>>
<<else>>
	<<set $rng to random(1, 100)>>
	<<person1>>Smirking, the <<person>> speaks, "You're all dressed up now, but it would be a waste for no one else to see you looking so fine." <<person2>>The <<person>> tugs again, harder this time. "We'll help you as we said we would, but there's someone you need to meet first."

	Bound and leashed as you are, you have little choice but to go with them<<if $submissive lte 850>>, though you seethe noiselessly at the humiliation<<else>> meekly<</if>>.

	You are led deeper into the dunes. You walk for several minutes, conscious of just how exposed and vulnerable you are. Your captors make no attempt to hide how much they enjoy being in a position of power over you, and constantly leer at your body, knowing there's nothing you can do to stop them.

	<<if $rng gte 51 and ($monster is 1 or $bestialitydisable is "f")>>
		<<saveNPC 0 "beach_abduction_dog_1">>
		<<saveNPC 1 "beach_abduction_dog_2">>
		<<endevent>>
		<<loadNPC 1 "beach_abduction_dog_1">>
		<<loadNPC 2 "beach_abduction_dog_2">>
		<<clearNPC "beach_abduction_dog_1">>
		<<clearNPC "beach_abduction_dog_2">>
		<<beastNEWinit 1 dog>>

		You come to a relatively flat area, surrounded by dunes on all sides, shielding it from view. In the centre is a <<beasttype>>, <<bhis>> leash tied to a wooden post. At the sight of you <<bhe>> leaps to <<bhis>> feet, straining the leash in a bid to reach you.
		<<if $monster is 1>>
			<<bHis>> nude body is on full display for all to see, but <<bhe>> doesn't seem all too phased by it. <<bHe>> seems oddly well-groomed for a <<beasttype>>, despite the state <<bhe>>'s in. <<bHe>> paws at the air in an attempt to reach you, and <<bhe>>'s almost successful.
		<</if>>

		<<person2>> The <<person>> speaks in a high-pitched voice, "Who's a good <<beasttype>>! You are! We brought you a bitch, because you're such a good <<beasttype>>!"
		<<if $monster is 1>>
			The <<beasttype>> pants heavily in response, <<bhis>> face red from blushing. <<bHis>> intentions are clear. <<bHe>>s craving a mate.
		<</if>>

		<<link [[Try to run|Beach Abduction Dog]]>><<set $molestationstart to 1>><<set $phase to 0>><</link>>

		<<link [[Allow yourself to be led over|Beach Abduction Dog]]>><<set $molestationstart to 1>><<set $phase to 1>><</link>>

	<<else>>
		<<generatey3>><<generatey4>><<generatey5>><<generatey6>>You come to a relatively flat area, surrounded by dunes on all sides, shielding it from view. Four teenagers sit smoking in the centre. Your feelings of humiliation reach a new height as the new pairs of eyes see you in your shameful situation. Their initial shock quickly subsides, leaving a bare and primal lust.

		The <<person2>><<person>> leads you into the middle of the group, their eyes feasting on every inch of your body. "We found this piece of trash near the beach. Can't believe anyone would just leave it laying around, no respect at all," the <<person1>><<person>> <<if $worn.genitals.type.includes("chastity")>>attempts to break<<else>>starts fondling<<set $worn.genitals.integrity -= 50>><</if>> your <<genitals>> in front of everyone, causing your breath to catch in your chest. The rest of the group take the cue. Arms reach out from all around you, each wanting their share.

		<<link [[Next|Beach Abduction Molestation]]>><<set $molestationstart to 1>><</link>>
	<</if>>
<</if>>

:: Beach Abduction Dog

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<beastCombatInit>>
	<<if $phase is 0>>
		You try to escape, but the <<person2>><<person>> grabs the leash and helps the <<person3>><<person>> yank you to the ground. Before you can recover, the <<person2>><<person>> has released the <<beasttype>> from <<bhis>> post. <<bHe>> leaps on top of you, pinning you down.
		<<set $NPCList[0].stance to "top">><<set $head to "grappled">>

		<<set $submissive -= 1>>
	<<elseif $phase is 1>>
		Trying to keep calm, you allow yourself to be led closer to the beast. The <<person2>><<person>> unties the <<beasttype>>, who darts towards you.

		<<set $submissive += 1>>
	<</if>>
	<<set $phase to 2>>
<</if>>
<<effects>>
<<if $phase is 2>>
	<<set $phase to 1>>
	The pair sit on the sand to spectate.

<<else>>
	<<if $orgasmdown gte 1 and $phase is 1>><<set $phase to 0>>
		"I can't believe it," the <<person2>><<person>> shouts with joy, "You're actually cumming from being raped by <<if $monster is 1>>a <<beasttype>><<else>>an animal<</if>>. This is fantastic." You feel utterly humiliated.
		<<trauma 6>><<famebestiality 10>><<famebestiality 10>>
	<<else>>
		The <<person2>><<person>> and <<person3>><<person>> are enjoying the show.
	<</if>>

<</if>>
<<effectsman>>

<<beast $enemyno>>

<<stateman>>

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

		<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next|Beach Abduction Dog Ejaculation]]>><</link>><<nexttext>>
		<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Abduction Dog Escape]]>><</link>><<nexttext>>
		<<else>>
			<<link [[Next|Beach Abduction Dog]]>><</link>><<nexttext>>
		<</if>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Abduction Dog Ejaculation]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Abduction Dog Escape]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next->Beach Abduction Dog]]>><</link>><<nexttext>>
<</if>>

:: Beach Abduction Dog Ejaculation
<<beastejaculation>>

<<if $enemyanger gte ($enemyangermax / 5) * 3>>
	<<bHe>> bites you on the thigh before leaving you lying there.
	<<violence 3>>

<<elseif $enemyanger gte 1>>
	<<bHe>> barks then leaves you lying there.

<<else>>
	<<bHe>> licks your <<genitals>> then darts away.
	<<neutral 5>>

<</if>>

The <<person2>><<person>> and <<person3>><<person>> applaud. "Bred like the bitch you are," the <<person>> exclaims as <<he>> unties your bonds. The <<person2>><<person>> throws you the fabric they promised. "You can keep the collar. It suits you." Laughing, they leave you lying disgraced on the sand. <<tearful>> you struggle to your feet.

<<unbind>>

<<clothesontowel>>

<<endcombat>>
<<set $stress -= 500>>
<<link [[Next|Beach]]>><</link>>
<<set $eventskip to 1>>

:: Beach Abduction Dog Escape
<<effects>>

The <<beasttype>> whimpers and flees.

Before the pair can react, you seize the opportunity and bolt away. <<tearful>> you quickly lose them in the dunes.

<<clotheson>>
<<endcombat>>

<<set $stress -= 500>>

<<link [[Next|Beach]]>><</link>>
<<set $eventskip to 1>>

:: Beach Day Molestation Alarm
<<effects>>

The <<person>> looks offended, but relents. "You crazy slut, I was only having some fun." <<tearful>> you cover yourself and rise to your feet.

<<clotheson>>
<<endcombat>>

<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Skirt Flare Stop
Panicking, you desperately grasp for your skirt hem as you push what fabric you can gain purchase on down to protect your dignity. Hopefully nobody saw.
<<gstress>><<stress 5>>

<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>

:: Beach Skirt Flare Allow
You hold your shaking arms by your side and let your skirt billow in the wind. The act of being exposed by a stray gust wind sends shivers down your spine and a wonderful tingling sensation in your
<<if $submissive gte 1150>>
	<<genitals 1>>. The sense of vulnerability it gives you having you positively shuddering in delight.
	<<garousal>><<arousal 2000>>
<<else>>
	<<genitals>>.
	<<garousal>><<arousal 1000>>
<</if>>

<<if !$worn.under_lower.type.includes("naked")>>
	<<exhibitionism2>>
<<else>>
	<<exhibitionism4>>
<</if>>
<<link [[Next|Beach]]>><<set $eventskip to 1>><</link>>


code:
:: Beach

<<location "beach">><<effects>>
You are on the beach.
<<if $daystate is "day">>
	<<if $weather is "clear">>
		It is awash with visitors, children build sandcastles and play in the water while their parents bask in the sun. A group of teenagers are playing volleyball.
	<<elseif $weather is "overcast">>
		The clouds have driven away most would-be visitors, but there are still people strolling along the water's edge.
	<<elseif $weather is "rain">>
		The beach itself is mostly deserted due to the rain, but the violent waves have attracted surfers.
	<<elseif $weather is "snow">>
		The snow has kept most away from the beach, but the violent waves have attracted surfers.
	<</if>>
<<elseif $daystate is "dawn">>
	<<if $weather is "clear">>
		It is a popular destination for joggers, some have dogs with them. A few families are setting up windbreakers. A group of teenagers are playing volleyball.
	<<elseif $weather is "overcast">>
		It is a popular destination for joggers, some have dogs with them. Fog blocks your view of the ocean.
	<<elseif $weather is "rain">>
		The beach itself is mostly deserted due to the rain, but the violent waves have attracted surfers.
	<<elseif $weather is "snow">>
		The snow has kept most away from the beach, but the violent waves have attracted surfers.
	<</if>>
<<elseif $daystate is "dusk">>
	<<if $weather is "clear">>
		Families are leaving as the sun sets. A group of teenagers are playing volleyball.
	<<elseif $weather is "overcast">>
		It is mostly deserted, but some people are strolling along the water's edge.
	<<elseif $weather is "rain">>
		The beach itself is mostly deserted due to the rain, but the violent waves have attracted surfers.
	<<elseif $weather is "snow">>
		The snow has kept most away from the beach, but the violent waves have attracted surfers.
	<</if>>
<<elseif $daystate is "night">>
	<<if $weather is "clear">>
		It appears deserted, save for a group of teenagers who are drinking around a fire.
	<<elseif $weather is "overcast">>
		It appears deserted.
	<<elseif $weather is "rain">>
		It appears deserted.
	<<elseif $weather is "snow">>
		It appears deserted.
	<</if>>
<</if>>
You could go for a swim, but make sure to dress appropriately.

<<if $exposed gte 1>>
	<<exhibitionism "beach">>
<</if>>
<<if $arousal gte $arousalmax>>
	<<orgasmbeach>>
<</if>>
<<if $stress gte $stressmax>>
	<<passoutbeach>>
<<else>>
	<<run getRobinLocation()>>
	<<set $danger to random(1, 10000)>><<set $dangerevent to 0>>
	<<if $danger gte (9900 - $allure) and $eventskip is 0>>
		<<eventsbeach>>
	<<elseif $robinReunionScene isnot undefined and _robin_location is "beach" and $exposed lte 0>>
		<<npc Robin>><<person1>>
		<<if $robinReunionScene is "dungeon">>
			<<unset $robinReunionScene>><<set $robinPostMortem to true>>
			You see Robin stood behind <<his>> lemonade stand. <<His>> mouth goes agape as <<he>> sees you, and <<he>> sprints towards you.

			"I don’t believe it!" <<he>> squeals as <<he>> buries <<himself>> in your chest. "I-I thought you were gone forever! We need to talk about this at home. When you’re ready."

			You’re led back to their stand. A small picture of the two of you sits on top. Robin puts it away.

			<<He>> fixes you a glass of lemonade and sends you on your way.

			"Don't forget to see me later," <<he>> says with a worried expression. "I'm always here for you if you need to talk."

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

		<<elseif $robinReunionScene is "asylum">>
			<<unset $robinReunionScene>>
			You see Robin stood behind <<his>> lemonade stand.

			<<if $NPCName[$NPCNameList.indexOf("Robin")].trauma gte 40>>
				<<He>> stares at you in disbelief.

				"Hi," <<he>> says quietly as you draw close. "I thought the doctors took you away. I would’ve tried to get you something had I known you were c-coming back," Robin’s voice quivers.
			<<else>>
				<<He>> excitedly beckons you over when <<he>> sees you.

				"Hey, you’re out!" <<he>> says as you draw close. "I thought you were staying at the doctor’s for a while. I would’ve prepared something had I known you were coming back," Robin explains.
			<</if>>

			You shake your head, telling <<him>> that they weren’t going to help you, so you "checked" out early. Robin seems confused, but <<he>> nods regardless. <<He>> gives you a hug.

			<<if $NPCName[$NPCNameList.indexOf("Robin")].trauma gte 40>>
				"Well, I’m glad you’re free," <<he>> mumbles, holding you tight.
			<<else>>
				"Well, I’m happy to see you again! I hope you're feeling better."
			<</if>>

			The two of you make small talk for a bit. Eventually, Robin says <<he>> needs to get back to <<his>> stand.

			<<if $NPCName[$NPCNameList.indexOf("Robin")].trauma gte 40>>
				<<He>> slowly shuffles away, <<his>> gaze glued to the floor.
			<<else>>
				<<He>> smiles and waves goodbye.
			<</if>>

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

		<<else>>
			You spot Robin at <<his>> lemonade stand. <<His>> eyes pass over you momentarily, but <<he>> doesn't stare. It's as if <<he>> doesn't even recognise you.

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

		<</if>>
	<<elseif $NPCName[$NPCNameList.indexOf("Robin")].init is 0 and $season isnot "winter" and ($weekday is 7 or $weekday is 1) and between($hour, 9, 16) and $exposed lte 0>>
		<<set $robindebt to 0>><<set $robindebtlimit to 5>>
		<<npc Robin>><<person1>>You see someone familiar working at a stand on the beach. <<He>> notices you at the same time. "Hey!" It's Robin. <<Hes>> another resident at the orphanage. <<Hes>> always looked up to you, despite being about the same age. <<He>> motions you over while cleaning a glass pitcher. <<He>> puts it down and hugs you when you approach.

		<<if $days is 0>>
			"I got up early today, so I didn't see you this morning. Remember, you can visit me in my room at home anytime you want. I'll have something to show you tonight, I'm so excited!" <<He>> looks behind you, noticing customers approaching. "I've got to get back to work here. You're welcome to stay and help if you want. I'll be heading to the shopping centre later to pick up the surprise, so either way, I hope to see you later!" <<He>> gets back into position behind the stand.
		<<else>>
			"I haven't seen you at the orphanage in a while. We must keep missing each other. Remember, you can visit me in my room at home anytime you want. I've been waiting to show you something, I'm so excited!" <<He>> looks behind you, noticing customers approaching. "I've got to get back to work here. You're welcome to stay and help if you want." <<He>> gets back into position behind the stand.
		<</if>>

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

	<<else>>
		<<if $exposed lte 0>>
			<<if $scienceproject is "ongoing" and $sciencephallusknown is 1 and $sciencephallus lt 10 and $daystate isnot "night" and $weather isnot "rain" and $weather isnot "snow" and $exposed lte 0>>
				<<ind>><<link [[Find participant for phallus project (0:15)|Beach Phallus]]>><<pass 15>><</link>>

			<</if>>
			<<swimicon>><<link [[Go for a swim (0:02)|Sea Beach]]>><<pass 2>><</link>>

		<<elseif $daystate is "night">>
			<<swimicon>><<link [[Go for a swim (0:02)|Sea Beach]]>><<pass 2>><</link>>

		<</if>>
		<<if $daystate is "day" and $weather is "clear">>
			<<if $worn.under_lower.type.includes("swim") and ($worn.under_upper.type.includes("swim") or $worn.under_upper.type.includes("naked")) and ($worn.upper.type.includes("swim") or $worn.upper.type.includes("naked")) and ($worn.lower.type.includes("swim") or $worn.lower.type.includes("naked"))>>
				<<ind>><<link [[Tan on the beach (1:00)|Tanning]]>><<pass 60>><</link>><<lstress>>

			<</if>>
			<<if def $milkshake and $milkshake gt 0>>
				<<ind>><<link [[Drink your milkshake (0:10)|Beach Milkshake]]>><<pass 10>><<set $milkshake -= 1>><<stress -5>><</link>><<lstress>>

			<</if>>
		<</if>>
		<<ind>><<link [[Changing room|Changing Room]]>><</link>>

		<<if $exposed lte 0>>
			<<if _robin_location is "beach">>
				<<ind>><<link [[Robin's lemonade stand|Robin's Lemonade]]>><</link>>

			<</if>>
			<<if $worn.feet.type.includes("heels")>>
				<<walkicon>><<link [[Take a walk in heels (0:30)|Beach Heel Walk]]>><</link>><<gtiredness>><<lstress>>
			<<else>>
				<<runicon>><<link [[Go for a run (0:30)|Beach Run]]>><<athletics 3>><</link>><<gtiredness>><<gathletics>><<lstress>>
			<</if>>

		<</if>>
		<<if $weather is "clear" and $daystate is "night" and $exposed lte 0>>
			<<ind>><<link [[Party|Beach Party]]>><</link>>

		<</if>>
		<<if $weather is "clear" and $daystate isnot "night" and $exposed lte 0>>
			<<ind>><<link [[Volleyball|Beach Volleyball]]>><</link>>

			<<if $exhibitionism gte 75 and $beachstrip isnot 1>>
				<<ind>><<link [[Strip (0:20)|Beach Strip]]>><<pass 20>><</link>><<exhibitionist5>>

			<</if>>
		<</if>>
		<<add_link "
Travel
">><<hideDisplay>>
		<<if $exposed lte 0 or $daystate is "night">>
			<<cliff>>

		<</if>>
		<<if $exposed lte 0 or $daystate is "night">>
			<<starfish>>

		<</if>>
		<<displayLinks>>

	<</if>>
<</if>>
<<set $eventskip to 0>>

:: Beach Party

<<location "beach">><<effects>>
You approach the teenagers. Several are dancing near a fire on a makeshift stage while others are drinking and chattering.

<<link [[Socialise (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<status 1>><<set $phase to 0>><</link>><<gcool>><<lstress>>

<<link [[Dance (0:05)|Beach Party Dance]]>><<danceinit>><<set $dancing to 1>><<set $venuemod to 1>><<stress -4>><<tiredness 4>><</link>><<lstress>><<gtiredness>>

<<link [[Leave|Beach]]>><</link>>

:: Beach Volleyball

<<location "beach">><<effects>>
<<generatey1>><<generatey2>><<generatey3>><<generatey4>><<generatey5>>
You approach a group playing volleyball. A <<person1>><<person>> sits on the sand and watches four of <<his>> friends play.

<<link [[Join in (0:30)|Beach Volleyball Play]]>><<pass 30>><<stress -6>><<tiredness 6>><<status 1>><<athletics 3>><</link>><<gcool>><<gathletics>><<lstress>><<gtiredness>>

<<link [[Leave|Beach]]>><<endevent>><</link>>

:: Beach Volleyball Play

<<location "beach">><<effects>>
The teenagers are happy to have a sixth player, particularly the <<person1>><<person>>.

<<physique 3>>
<<set $eventcheck to random(1, 10000)>>
<<if $eventcheck gte (9900 - ($allure))>>
	<<if $rng gte 51>><<molested>>
		<<if $worn.lower.type.includes("naked")>>
			You are so focused on the opposing team you do not notice one of your own sneak up on you. A pair of hands grasp the rim of your $worn.under_lower.name.
		<<else>>
			You are so focused on the opposing team you do not notice one of your own sneak up on you. A pair of hands grasp the rim of your $worn.lower.name.
		<</if>>
		<<if setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 0 and $worn.lower.set isnot $worn.upper.set>>
			Before you can react, the <<person1>><<person>> has pulled them all the way to your knees,
		<<elseif setup.clothes.lower[clothesIndex('lower', $worn.lower)].skirt is 0 and $worn.lower.set is $worn.upper.set>>
			Before you can react, the <<person1>><<person>> has pulled it aside,
		<<else>>
			Before you can react, the <<person1>><<person>> has lifted it,
		<</if>>
		<<if $worn.under_lower.name is "naked" or $worn.lower.name is "naked">>
			<<if $uncomfortable.nude is false>>
				exposing your <<genitals>> for all to see. Laughter and lewd gestures erupt from both teams, yet you feel a thrill.

				You fix your clothes, taking a bit longer than you need to.
				<<garousal>><<arousal 300>>
			<<else>>
				exposing your <<genitals>> for all to see. Laughter and lewd gestures erupt from both teams as your face turns red and you hasten to protect your dignity.
				<<garousal>><<gstress>><<gtrauma>><<arousal 300>><<stress 3>><<trauma 3>>
			<</if>>
		<<else>>
			<<if $uncomfortable.underwear is false>>
				exposing your $worn.under_lower.name. Laughter erupts from both teams, including you. It's just a $worn.under_lower.name, you're not embarrassed.
				<<gcool>><<status 5>><<garousal>><<gstress>>
			<<else>>
				exposing your $worn.under_lower.name. Laughter erupts from both teams and you hasten to protect your dignity.
				<<lcool>><<status -10>><<garousal>><<gstress>><<gtrauma>><<arousal 100>><<stress 1>><<trauma 1>>
			<</if>>
		<</if>>

	<<else>>

		<<if $topless is 1>>
			Part-way through the match the ball collides with your bare chest, sending you sprawling.
			<<if $breastsize gte 2>>

				Your <<breasts>> hurt a little from the bare skin impact.
				<<pain 1>><<gpain>>

			<</if>>
			It's embarrassing, but you soon dust yourself off.

		<<elseif !$worn.over_upper.type.includes("naked")>>
			Part-way through the match the ball collides with your chest, sending you sprawling.
			<<set $worn.over_upper.integrity -= 1>><<set $worn.upper.integrity -= 1>><<integritycheck>><<exposure>>
			<<if $player.gender_appearance is "m" or !$worn.over_upper.type.includes("naked") or !$worn.upper.type.includes("naked") or !$worn.under_upper.type.includes("naked")>>
				It's embarrassing, but you soon dust yourself off.

			<<else>>
				<<if $uncomfortable.nude is false>>
					Worse, your clothes fall to tatters, baring your chest. Laughter and lewd gestures erupt from both teams, yet you feel a thrill.
					<<garousal>><<arousal 300>><<towelup>>
				<<else>>
					Worse, your clothes fall to tatters, baring your chest. Laughter and lewd gestures erupt from both teams as your face turns red and you hasten to protect your dignity with a towel.
					<<garousal>><<gstress>><<gtrauma>><<arousal 300>><<stress 3>><<trauma 3>><<towelup>>
				<</if>>
			<</if>>
		<<else>>
			Part-way through the match the ball collides with your chest, sending you sprawling.
			<<set $worn.upper.integrity -= 1>><<set $worn.under_upper.integrity -= 1>><<integritycheck>><<exposure>>
			<<if $player.gender_appearance is "m" or !$worn.upper.type.includes("naked") or !$worn.under_upper.type.includes("naked")>>
				It's embarrassing, but you soon dust yourself off.

			<<else>>
				<<if $uncomfortable.nude is false>>
					Worse, your clothes fall to tatters, baring your chest. Laughter and lewd gestures erupt from both teams, yet you feel a thrill.
					<<garousal>><<arousal 300>><<towelup>>
				<<else>>
					Worse, your clothes fall to tatters, baring your chest. Laughter and lewd gestures erupt from both teams as your face turns red and you hasten to protect your dignity with a towel.
					<<garousal>><<gstress>><<gtrauma>><<arousal 300>><<stress 3>><<trauma 3>><<towelup>>
				<</if>>

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

	<</if>>
<<else>>
	You have a good time.

<</if>>
<<if $daystate is "night">>
	With the sun fully set, continuing to play would be difficult. The <<person1>><<person>> tells you they are going to a beach party and invites you to come along.

	<<link [[Accept (0:10)|Beach Party Chat]]>><<pass 10>><<endevent>><<lstress>><<status 1>><</link>><<gcool>><<lstress>>

	<<link [[Make excuses and say your goodbyes|Beach]]>><<endevent>><</link>>

<<else>>
	<<link [[Play more (0:30)|Beach Volleyball Play]]>><<pass 30>><<stress -6>><<tiredness 6>><<status 1>><<athletics 3>><</link>><<gcool>><<gathletics>><<lstress>><<gtiredness>>

	<<link [[Stop|Beach]]>><<endevent>><</link>>

<</if>>

:: Beach Party Chat

<<location "beach">><<effects>>

<<if $phase is 0>>
	You join the conversation.
	<<if $allure gte 3000>>
		You quickly become the centre of attention.
	<<elseif $allure gte 2000>>
		You draw eyes your way with ease.
	<<elseif $allure gte 1000>>
		People acknowledge you when you speak, but otherwise leave you alone.
	<<else>>
		Dour as you are, people constantly talk over you, as if unaware of your presence.
	<</if>>
	<<if $daystate isnot "night">>
		The sun rises on the horizon and the remaining teenagers head home.

		<<link [[Next|Beach]]>><<endevent>><</link>>

	<<else>>

		<<set $eventcheck to random(1, 10000)>>
		<<if $eventcheck gte (9900 - ($allure))>>
			<<generatey1>><<person1>>A <<person>> sits next to you and offers you a beverage.

			<<link [[Drink (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<alcohol 60>><<set $phase to 1>><<status 1>><</link>><<gcool>><<lstress>>

			<<link [[Just talk (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<set $phase to 1>><<status 1>><</link>><<gcool>><<lstress>>

			<<link [[Leave|Beach]]>><<endevent>><</link>>

		<<else>>
			<<link [[Continue (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<status 1>><</link>><<gcool>><<lstress>>

			<<link [[Leave|Beach]]>><<endevent>><</link>>

		<</if>>
	<</if>>
<<elseif $phase is 1>>
	<<if $rng gte 21>>
		You enjoy talking with the <<person>>. <<He>> <<admires>> your body when <<he>> thinks you aren't looking.

		<<link [[Drink (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<alcohol 60>><<set $phase to 1>><<status 1>><</link>><<gcool>><<lstress>>

		<<link [[Just talk (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<set $phase to 1>><<status 1>><</link>><<gcool>><<lstress>>

		<<link [[Leave|Beach]]>><<endevent>><</link>>

	<<else>>
		You enjoy talking with the <<person>>. <<He>> leans close and whispers, "Would you like to go somewhere private?"

		<<link [[Yes|Beach Party Sex]]>><<set $phase to 0>><<set $sexstart to 1>><</link>><<promiscuous1>>

		<<link [[No|Beach Party Chat]]>><<set $phase to 2>><<status 1>><</link>><<gcool>>

	<</if>>
<<elseif $phase is 2>>
	<<if $rng gte 11>><<set $phase to 0>>
		<<He>> is disappointed, but politely says goodbye before leaving to look elsewhere.

		<<link [[Continue (0:10)|Beach Party Chat]]>><<pass 10>><<stress -2>><<status 1>><<endevent>><</link>><<gcool>><<lstress>>

		<<link [[Leave|Beach]]>><<endevent>><</link>>

	<<else>>
		<<He>> seizes you by the throat, "Well, that isn't very polite of you. I think you need a lesson." <<He>> stands you up and starts forcing you away from the rest of the group.

		<<link [[Continue|Beach Party Rape]]>><<set $molestationstart to 1>><<set $timer to 10>><</link>>

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

:: Beach Party Dance

<<location "beach">><<effects>>
<<danceeffects>>
<<danceaudience>>
<<danceactions>>

<<if $danceevent is 0 and $exhibitionism lte 74 and $exposed gte 2>>
	There's no way you can continue dancing while so exposed! Face reddening, you flee the scene.

<<elseif $danceevent is 0 and $exhibitionism lte 34 and $exposed gte 1>>
	There's no way you can continue dancing while so exposed! Face reddening, you flee the scene.

<</if>>

<<if $danceevent is "rape">>
	<<link [[Next|Beach Party Dance Rape]]>><<set $molestationstart to 1>><</link>>
<<elseif $danceevent is "finish">>
	<<link [[Next|Beach Party]]>><<clotheson>><<endevent>><</link>>
<<elseif $danceevent is 0>>
	<<if $exposed gte 2 and $exhibitionism lte 74>>
		<<link [[Flee|Changing Room]]>><<clotheson>><<endevent>><</link>>
	<<elseif $exposed gte 1 and $exhibitionism lte 34>>
		<<link [[Flee|Changing Room]]>><<clotheson>><<endevent>><</link>>
	<<else>>
		<<link [[Stop|Beach Party]]>><<clotheson>><<endevent>><</link>>
	<</if>>
<</if>>

:: Beach Party Sex

<<if $sexstart is 1>>
	<<set $sexstart to 0>>
	<<consensual>>
	<<promiscuity1>>
	<<set $consensual to 1>>
	<<neutral 1>>
	<<maninit>>
	<<set $enemytrust += 100>>
	<<He>> quietly takes your hand and leads you away from the group. You walk into the dunes until you're out of earshot, then <<he>> turns and embraces you.

<</if>>
<<location "beach">><<effects>>
<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $finish is 1>>
	<<link [[Next->Beach Party Sex Finish]]>><</link>><<nexttext>>
<<else>>
	<<if $alarm is 1>>
		<<if $rescue is 1>>
		<<else>>
			No one comes to your aid.
			<<set $alarm to 0>>
			<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

			<<if $enemyarousal gte $enemyarousalmax>>
				<<link [[Next->Beach Party Sex Ejaculation]]>><</link>><<nexttext>>
			<<elseif $enemyhealth lte 0>>
				<<link [[Next->Beach Party Sex Escape]]>><</link>><<nexttext>>
			<<else>>
				<<link [[Next->Beach Party Sex]]>><</link>><<nexttext>>
			<</if>>
		<</if>>
	<<elseif $enemyarousal gte $enemyarousalmax>>
		<<link [[Next->Beach Party Sex Ejaculation]]>><</link>><<nexttext>>
	<<elseif $enemyhealth lte 0>>
		<<link [[Next->Beach Party Sex Escape]]>><</link>><<nexttext>>
	<<else>>
		<<link [[Next->Beach Party Sex]]>><</link>><<nexttext>>
	<</if>>
<</if>>

:: Beach Party Rape

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<molested>>
	<<maninit>>
	<<enable_rescue>>
	<<hand_gag 0 left>>
	<<set $NPCList[0].righthand to "arms">>
	<<set $leftarm to "grappled">>
	<<set $rightarm to "grappled">>
<</if>>
<<effects>>
<<if $timer is 0 and $rescue is 1>>
	<<set $rescue to 0>>
	You walk behind a dune. You're too far for anyone to help you.
<<elseif $timer gte 1>>
	You are pulled further from the group, but they're still in sight.
<<else>>
<</if>>

<<effectsman>><<man>>
<<stateman>>

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
		<<link [[Next->Beach Party Rape Alarm]]>><</link>><<nexttext>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very loudly.<</if>>

		<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Beach Party Rape Ejaculation]]>><</link>><<nexttext>>
		<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Party Rape Escape]]>><</link>><<nexttext>>
		<<else>>
			<<link [[Next->Beach Party Rape]]>><</link>><<nexttext>>
		<</if>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Party Rape Ejaculation]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Party Rape Escape]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next->Beach Party Rape]]>><</link>><<nexttext>>
<</if>>

:: Beach Party Rape Alarm

<<effects>><<set $rescued += 1>>
<<He>> notices several heads turning in response to your cry. <<He>> looks at you with anger and shouts, "Crazy slut!" before heading back to <<his>> friends. <<tearful>> you gather yourself.

<<clotheson>>
<<endcombat>>
[[Next|Beach]]

:: Beach Party Rape Ejaculation

<<ejaculation>>
<<if $enemyanger gte ($enemyangermax / 5) * 3>>
<<He>> pushes you onto the sand.
<<violence 1>>

<<elseif $enemyanger gte 1>>
Without a word, <<he>> heads back to <<his>> friends.

<<else>>
Smiling, <<he>> leans closer, "Good <<girl>>." <<He>> leaves you lying on the sand.

<</if>>

<<tearful>> you rise to your feet.

<<clotheson>>

<<endcombat>>

[[Next|Beach]]

:: Beach Party Rape Escape
<<effects>>

<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<<clotheson>>
<<endcombat>>

[[Next|Beach]]

:: Beach Party Sex Ejaculation
<<ejaculation>>

<<if $enemyanger gte ($enemyangermax / 5) * 3>>
<<He>> drops you on the sand.
<<violence 3>>

<<elseif $enemyanger gte 1>>
Without a word, <<he>> leaves.

<<else>>
Smiling, <<he>> kisses you on the cheek. <<He>> gets up and leaves you lying on the sand.

<</if>>

<<tearful>> you rise to your feet.

<<clotheson>>

<<endcombat>>

[[Next|Beach]]

:: Beach Party Sex Escape

<<effects>>
<<if $daystate isnot "night">>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<<else>>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>
<<clotheson>>
<<endcombat>>
[[Next|Beach]]

:: Beach Party Sex Finish

The <<person>> leaves you. <<He>> looks dejected.
<<clotheson>>
<<endcombat>>
[[Next|Beach]]

:: Beach Party Dance Rape

<<if $molestationstart is 1>>
	<<set $molestationstart to 0>>
	<<controlloss>>
	<<violence 1>>
	<<neutral 1>>
	<<maninit>>
	<<if $daystate isnot "night">>
	<</if>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<audience>>
<<stateman>>

<<actionsman>>
<<if $alarm is 1>>
	<<if $rescue is 1>>
	<<else>>
		No one comes to your aid.
		<<set $alarm to 0>>
		<<if $drugged gte 1>>The drugs inhibit you, you couldn't cry very convincingly.<</if>>

		<<if $enemyarousal gte $enemyarousalmax>>
			<<link [[Next->Beach Party Dance Rape Ejaculation]]>><</link>><<nexttext>>
		<<elseif $enemyhealth lte 0>>
			<<link [[Next->Beach Party Dance Rape Escape]]>><</link>><<nexttext>>
		<<else>>
			<<link [[Next->Beach Party Dance Rape]]>><</link>><<nexttext>>
		<</if>>
	<</if>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next->Beach Party Dance Rape Ejaculation]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next->Beach Party Dance Rape Escape]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next->Beach Party Dance Rape]]>><</link>><<nexttext>>
<</if>>

:: Beach Party Dance Rape Ejaculation

<<ejaculation>>
<<if $audience is 1>>
	A cheer erupts from the crowd as the <<person1>><<person>> climaxes. <<tearful>> you manage to stagger away before anyone else gets ideas.
<<elseif $audience lte 6>>
	The <<person1>><<person>> and <<person2>><<person>> high-five each other. <<tearful>> you manage to stagger away while the audience congratulates each other.
<<else>>
	A cheer erupts from the crowd, seems they enjoyed the show. <<tearful>> you manage to stagger away before anyone else gets any ideas.
<</if>>

<<stealclothes>>

<<endcombat>>

[[Next|Beach]]

:: Beach Party Dance Rape Escape
<<effects>>

<<if $daystate isnot "night">>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<<else>>
	<<He>> recoils in pain, giving you the chance you need. <<tearful>> you escape into the darkness.

<</if>>

<<clotheson>>
<<endcombat>>

[[Next|Beach]]

:: Beach Run
<<pass 30>><<location "beach">><<effects>>

You run along the shore.
<<if $daystate is "night">>
	<<if $weather is "rain">>
		The sound of crashing waves competes with the torrential rain.
	<<elseif $weather is "clear">>
		The cold night breeze invigorates you.
	<<elseif $weather is "overcast">>
		The cool night breeze feels pleasant against your skin.
	<<elseif $weather is "snow">>
		<<if $body_temperature is "comfy">>
			The cold night breeze invigorates you.
		<<else>>
			You shiver in the freezing night breeze.
			<<gstress>><<stress 6>>
		<</if>>
	<</if>>
<<else>>
	<<if $weather is "rain">>
		Shards of rain assault you as you jog across the wet sand.
	<<elseif $weather is "clear">>
		The sun's intensity wears you down, tiring you out.
		<<tiredness 6>><<gtiredness>>
	<<elseif $weather is "overcast">>
		The cool weather makes for a pleasant jog.
	<<elseif $weather is "snow">>
		<<if $body_temperature is "comfy">>
			Falling snow blows against your face as you jog across the wet sand.
		<<else>>
			You shiver in the freezing wind.
			<<gstress>><<stress 6>>
		<</if>>
	<</if>>
<</if>>
<<physique 3>><<tiredness 6>><<stress -6>>

<<link [[Next|Beach]]>><</link>>

:: Beach Heel Walk
<<pass 30>><<location "beach">><<effects>>

You walk along the shore.
<<if $daystate is "night">>
	<<if $weather is "rain">>
		A downfall of rain wets you as you stroll.
	<<elseif $weather is "clear">>
		The sound of the waves fills your senses.
	<<elseif $weather is "overcast">>
		The night is cool and relaxes you.
	<<elseif $weather is "snow">>
		Dark snow blows against you as you stroll.
	<</if>>
<<else>>
	<<if $weather is "rain">>
		The pouring rain wets the sandy ground.
	<<elseif $weather is "clear">>
		The sun's heat is too intense and you begin to tire.
		<<tiredness 3>><<gtiredness>>
	<<elseif $weather is "overcast">>
		The cool weather makes for an enjoyable stroll.
	<<elseif $weather is "snow">>
		Snow blows against you as you stroll.
	<</if>>
<</if>>
<<tiredness 3>><<stress -5>>

<<link [[Next|Beach]]>><</link>>

:: Beach Strip
<<location "beach">><<effects>>
<<set $beachstrip to 1>>

<<strip>>

<<generate1>><<generate2>><<generate3>><<generate4>><<generate5>><<generate6>>
Shivering with excitement you shuffle out of your clothes and bare your <<lewdness>> for the entire beach to see. People don't even realise how far you've stripped at first. A lot of people dress scanty here after all. But none are dressed quite as scanty as you, and people start to notice.

A <<person1>><<person>> looks at you and audibly gasps. A <<person2>><<person>> averts <<his>> eyes and avoids looking at you at all costs. A <<person3>><<person>> stares and looks like <<hes>> about to start drooling. You're pleased that this is the most common response. You're not ashamed of your <<genitals>>. You've everything to be proud of.
<<exhibitionism5>>

<<flaunting>> you stroll down the beach, drawing eyes wherever you go.
<<if $player.penisExist and $player.vaginaExist and !$worn.genitals.type.includesAll("chastity", "hidden") and $rng % 2 == 0>>Many eyes fix on your genitals, awed by your uniqueness.
<<elseif $breastsize gte 6 and $rng % 2 == 0>>Many eyes are drawn to your <<breasts>>.
<<elseif $player.penisExist and $penissize gte 3 and !$worn.genitals.type.includesAll("chastity", "hidden")>>Many eyes fix on your <<penis>>.
<<elseif $beauty gte (($beautymax / 7) * 5) and $rng % 3>>Some just stare, open-mouthed, blown away by your naked beauty.
<<elseif $physique gte (($physiquesize / 7) * 5)>>Some marvel at seeing such a stunning physique so fully displayed.
<<elseif $worn.genitals.type.includesAll("chastity", "hidden")>>Some stare with a curious look at your $worn.genitals.name.
<</if>>
Each breeze caressing your bare flesh is a reminder of your exposure. You feel so free, powerful and sexy.

<<endevent>>

<<if $rng % 3 == 0>>
	<<link [[Next|Beach Strip End]]>><</link>>
<<else>>
	<<if $rng % 2 == 0>>
		<<link [[Next|Beach Strip Lifeguard]]>><</link>>
	<<else>>
		<<link [[Next|Beach Strip Camera]]>><</link>>
	<</if>>
<</if>>

:: Beach Strip Lifeguard

A whistle pierces the air. You turn and see a lifeguard running towards you.

<<generate1>><<person1>>

<<He>> stops in front of you, but looks away. "I'm sorry, but I need to ask you to cover up. This isn't a nudist beach."

<<link [[Comply|Beach Strip Comply]]>><</link>>

<<link [[Refuse (1:00)|Beach Strip Refuse]]>><<stress -12>><<trauma -6>><<crimeup 50>><<pass 1 hour>><</link>><<crime>><<ltrauma>><<lstress>>

<<if $promiscuity gte 15>>
<<link [[Seduce|Beach Strip Seduce]]>><</link>><<promiscuous2>>

<</if>>

:: Beach Strip Comply
<<location "beach">><<effects>>

You decide you've had enough fun for now and pick up your clothes.

<<clotheson>>

"Thank you," says the lifeguard, sounding relieved. "I didn't want to have to get the police involved. Try to remain dressed from now on."

<<endevent>>

<<link [[Next|Beach]]>><</link>>

:: Beach Strip Refuse
<<location "beach">><<effects>>

<<if $submissive gte 1150>>
"But I should be seen," you say. "Don't you think I'm beautiful?" You flare your arms at your sides and twirl. "Everyone should be allowed to look." You skip away.
<<elseif $submissive lte 850>>
You put your hands on your hips and pout. "Or what? You gonna make me?" You turn around, lean forwards and give your <<bottom>> a smack before sauntering away.
<<else>>
"No," you say. "I'm not gonna let you control me. You're welcome to join the fun though." You giggle and skip away.
<</if>>

<<endevent>>

You spend an hour running across the sand and splashing through waves. The sun feels warm and gentle against your bare skin. After a while though, the wind starts to pick up and the cold makes you shiver. You decide to get dressed for now. There's always another day.

<<link [[Next|Beach]]>><<clotheson>><</link>>

:: Beach Strip End
<<location "beach">><<effects>>

You run across the sand and splash through waves. The sun feels warm and gentle against your bare skin. After a while though, the wind starts to pick up and the cold makes you shiver. You decide to get dressed for now. There's always another day.

<<endevent>>

<<link [[Next|Beach]]>><<clotheson>><</link>>

:: Beach Strip Seduce
<<effects>>

<<set $seductiondifficulty to 8000>>
<<seductioncheck>>

<<if $seductionskill lt 1000>>You feel more confident in your powers of seduction.<</if>><<seductionskilluse>>

You walk closer to the <<person>>. "I could get dressed," you say, leaning against <<his>> arm. "Or we could have some fun."
<<promiscuity2>>

<<if $seductionrating gte $seductionrequired>>

<<He>> reaches for your <<genitals>>, but stops short and gulps. "M-maybe it would be fine if," <<he>> grabs your waist. "If I had a little fun."

<<link [[Next|Beach Strip Sex]]>><<set $sexstart to 1>><</link>>

<<else>>

"I-I-No," <<he>> stammers and pulls away from you. "G-get dressed now, or I'll call the police!"

<<link [[Comply|Beach Strip Comply]]>><</link>>

<<link [[Refuse (1:00)|Beach Strip Refuse]]>><<stress -12>><<trauma -6>><<crimeup 50>><<pass 1 hour>><</link>><<crime>><<ltrauma>><<lstress>>

<</if>>

:: Beach Strip Camera

You stroll across the sand and splash through waves. The sun feels warm and gentle against your bare skin.

<<generate1>><<person1>>
On a slightly calmer part of the beach, your path takes you near a <<person>> scurrying to get <<his>> expensive-looking camera ready.

<<if $uncomfortable.nude is true>>
	<<link [[Take a detour|Beach Strip End]]>><</link>>

<</if>>
<<link [[Walk past|Beach Strip Camera Snap]]>><<set $phase to 0>><</link>>

<<if $uncomfortable.nude is false>>
	<<link [[Stop and pose|Beach Strip Camera Snap]]>><<set $phase to 1>><</link>><<exhibitionist5>>

	<<if $arousal gte $arousalmax / 2>>
		<<link [[Stop and pose lewdly|Beach Strip Camera Snap]]>><<set $phase to 2>><</link>><<exhibitionist5>><<promiscuous1>>

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

:: Beach Strip Camera Snap

<<if $phase is 0>>
The <<person>> tries to get <<his>> camera ready, barely managing to control <<his>> shaking hands.
By the time you reach <<him>>, <<his>> camera is just about ready.
<<if $uncomfortable.nude is false>>
"W- Wait!" <<he>> gasps, as you parade past <<him>>.
<<else>>
"W- Wait!" <<he>> gasps, as you hurry past <<him>>.
<</if>>

<<His>> camera starts frantically clicking behind your back.

"At least I got <<pher>> ass!" <<he>> sighs.
<<fameexhibitionism 1>>

<<endevent>>
<<elseif $phase gte 1>>
You pause in front of the <<person>> and strike a few poses, showing off your <<lewdness>>.

The camera's shutter clicks frantically.
The <<person>> tries to keep <<his>> camera steady, barely managing to control <<his>> shaking hands.

<<if $phase is 2 and $breastsize gte 2>>
	<<set $proud_of_breasts to 0>>

	<<if $acceptance_breasts_small gte 999 and $breastsize lte 5>>
		<<set $proud_of_breasts to 1>>
	<<elseif $breastsize lte 7 and $breastsize gte 6>>
		<<set $proud_of_breasts to 1>>
	<<elseif $acceptance_breasts_big gte 999 and $breastsize gte 8>>
		<<set $proud_of_breasts to 1>>
	<</if>>

	<<if $proud_of_breasts is 1>>
		You push your chest forward and proudly flaunt your <<breasts>>.
		While the camera clicks endlessly, you show them off in different poses.
		You cup, fondle, massage and rub them, proudly keeping eye contact with the camera the whole time.
		The <<person>> seems fixated on taking as much pictures as possible.

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

<<if $exposed gte 2>>
	You turn around slowly, giving <<him>> a good view of your naked <<bottom>>.
	You hear <<his>> camera's incessant clicking behind your back, as you strike some poses showing off your behind.

	<<if $phase is 2>>
		Your back still to the camera, you spread your legs and slowly bend over, giving <<him>> a good view of your <<genitals>> and asshole from behind.
		The clicking of the camera intensifies.
		<<if $player.bodyliquid.vagina.semen gte 3>>
			You feel semen dribbling out of your <<pussy>> and running down your leg.
			<<garousal>><<arousal 200>>
		<<elseif $player.bodyliquid.anus.semen gte 3>>
			You feel semen dribbling out of your anus and running down your leg.
			<<garousal>><<arousal 200>>
		<<else>>
			<<garousal>><<arousal 100>>
		<</if>>

		<<if $player.vaginaExist>>
		You bend your neck to look behind you, and staring straight into the camera you suggest "Why don't you take some closeups?". You grab your <<bottom>> with both hands. Then, still gazing into the camera, you spread your <<pussy>>.

		<<if $player.bodyliquid.vagina.semen gte 2>>
		Semen drips from your <<pussy>> onto the sand. The sight proves too much for the <<person>> and <<he>> drops <<his>> camera in the sand. Shaking excitedly, <<he>> quickly picks it up, and eagerly moves closer.
		<<else>>
		The <<person>> is clearly shocked but eagerly moves closer.
		<</if>>
		<<His>> camera is now so close it almost touches your <<pussy>>. Enraptured, <<he>> keeps snapping pictures non-stop.

		You spread your <<pussy>> with the fingers of one hand, and plunge a finger into your opening with your other hand. You feel excited by the camera's immortalisation of your lewd behaviour.
		<<garousal>><<arousal 300>>

		<</if>>

		Deciding you've given the <<person>> enough pictures, you turn around and blow a kiss to the camera.
	<<else>>
		Deciding you've given <<him>> enough pictures, you turn around and blow a kiss to the camera.
	<</if>>

	As you walk away, <<he>> blurts out a quick "Thank you!" without interrupting <<his>> endless picture snapping.
	<<fameexhibitionism 15>>
<<else>>
	You decide <<he>> has enough pictures, and blow a kiss to the camera.
	As you move on, <<he>> mumbles a quick "Thank you.", without interrupting <<his>> endless picture snapping.
	<<fameexhibitionism 10>>
<</if>>
<</if>>

<<endevent>>

<<link [[Next|Beach Strip End]]>><</link>>

:: Beach Strip Sex
<<if $sexstart is 1>>
<<set $sexstart to 0>>
<<consensual>>
<<set $consensual to 1>>
<<neutral 1>>

<<maninit>>
<<set $enemytrust += 50>>

<</if>>

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

<<audience>>

<<stateman>>

<<actionsman>>

<<if $finish is 1>>
	<<link [[Next|Beach Strip Sex Finish]]>><</link>><<nexttext>>
<<elseif $enemyhealth lte 0>>
	<<link [[Next|Beach Strip Sex Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Beach Strip Sex Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Beach Strip Sex]]>><</link>><<nexttext>>
<</if>>

:: Beach Strip Sex Finish
<<location "beach">><<effects>>

<<if $enemyarousal gte $enemyarousalmax>>
<<ejaculation>>

"I only did that so you'd get dressed!" <<he>> says unconvincingly.

It is getting cold though, so you decide to get dressed for now.

<<clotheson>>
<<endcombat>>

<<elseif $enemyhealth lte 0>>

You shove the <<person>> onto the sand and dash away.

It's getting a bit cold, so you decide to get dressed for now.

<<clotheson>>
<<endcombat>>
<<elseif $finish is 1>>

"I only did that so you'd get dressed!" <<he>> says unconvincingly.

It is getting cold though, so you decide to get dressed for now.

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

<<link [[Next|Beach]]>><</link>>

:: Beach Exposed
<<location "beach">><<effects>>
<<fameexhibitionism 20 pic>>
<<flaunting>> you emerge from the water, <<lewdness>> freely displayed. You're soon the centre of attention, surrounded by whistles, cheers and compliments. Some break into applause while others scramble for their cameras.

<<if $uncomfortable.nude is false>>
	You feel excited and aroused by the countless eyes
	<<if $player.penisExist and $player.vaginaExist and !$worn.genitals.type.includesAll("chastity", "hidden") and $rng % 2 == 0>>gawking at your <<genitals>>.
	<<elseif $bottomsize gte 4 and $rng % 2 == 0>>leering at your swaying <<bottom>>
	<<elseif $breastsize gte 6 and $rng % 2 == 0>>gawking at your <<breasts>>
	<<elseif $player.penisExist and $penissize gte 3 and !$worn.genitals.type.includesAll("chastity", "hidden")>>gawking at your <<penis>>.
	<<elseif $beauty gte (($beautymax / 7) * 5) and $rng % 3>>admiring your beautiful naked body
	<<elseif $physique gte (($physiquesize / 7) * 5)>>admiring your stunning physique so fully displayed
	<<else>>leering at you
	<</if>>
	as you parade across the sand.

	You stroll into to the changing room. Teasingly slow, you close the door behind your back. Your body trembles briefly as your pulse returns to normal.
<<elseif $uncomfortable.nude is true>>
	<<if $player.penisExist and $player.vaginaExist and !$worn.genitals.type.includesAll("chastity", "hidden") and $rng % 2 == 0>>You feel embarrassed by the countless eyes ogling your <<genitals>>.
	<<elseif $breastsize gte 6 and $rng % 2 == 0>>You feel embarrassed by the countless eyes ogling your <<breasts>>.
	<<elseif $player.penisExist and $penissize gte 3 and $rng % 2 == 0 and !$worn.genitals.type.includesAll("chastity", "hidden")>>You feel embarrassed by the countless eyes ogling your <<penis>>.
	<<elseif $beauty gte (($beautymax / 7) * 5) and $rng % 3>>Every inch of your naked body prickles as you feel countless eyes ogling your naked beauty.
	<<elseif $physique gte (($physiquesize / 7) * 5)>>Every inch of your toned body prickles as you feel countless eyes ogling your stunning physique.
	<<else>>Every inch of your naked body prickles as you feel countless eyes ogling you.
	<</if>>

	You make it to the changing room and quickly close the door behind you. You lean on it and wait for your pulse to slow.
<</if>>

<<if $phase is 0>>
	<<exhibitionism5>>
<<else>>
	<<exhibitionism2>>
<</if>>

<<link [[Next|Changing Room]]>><</link>>

:: Beach Milkshake

<<effects>>
You drink the milkshake you bought from the cafe. It's deliciously creamy, and each sip helps melt away the stress.

<<link [[Next|Beach]]>><</link>>

repo_name: Area/degrees

license: mit


code:
:: Beach Phallus

<<location "beach">><<effects>>
<<generate1>><<person1>>You scan the beach for people wearing skimpy swimsuits, or otherwise look like they will agree to your request.

<<if $rng gte 81>>
	You see a <<person>> showing off <<his>> body, trying to impress a <<generate2>><<person2>><<person>>. It isn't working.

	<<person1>>
	<<if $NPCList[0].penis isnot "none">>
		<<link [[Ask to measure penis|Beach Phallus Flex]]>><</link>><<promiscuous3>>

	<<else>>
		<<link [[Ask to measure clitoris|Beach Phallus Flex]]>><</link>><<promiscuous3>>

	<</if>>
<<elseif $rng gte 61>>
	<<generatep2>><<person1>>You see a <<person>> and <<person2>><<person>> holding hands.

	<<if $NPCList[0].penis isnot "none">>
		<<link [[Ask to measure penis|Beach Phallus Pair]]>><</link>><<promiscuous3>>

	<<else>>
		<<link [[Ask to measure clitoris|Beach Phallus Pair]]>><</link>><<promiscuous3>>

	<</if>>
<<elseif $rng gte 41>>
	You see a <<person>> moving between different groups and individuals, asking for money.

	<<if $NPCList[0].penis isnot "none">>
		<<link [[Ask to measure penis|Beach Phallus Beggar]]>><</link>><<promiscuous3>>

	<<else>>
		<<link [[Ask to measure clitoris|Beach Phallus Beggar]]>><</link>><<promiscuous3>>

	<</if>>
<<elseif $rng gte 21>>
	You see a <<person>> sitting alone on the sand.

	<<if $NPCList[0].penis isnot "none">>
		<<link [[Ask to measure penis|Beach Phallus Shy]]>><</link>><<promiscuous3>>

	<<else>>
		<<link [[Ask to measure clitoris|Beach Phallus Shy]]>><</link>><<promiscuous3>>

	<</if>>
<<else>>
	You see a <<person>> scanning the beach with one hand shielding <<his>> eyes from the sun.

	<<if $NPCList[0].penis isnot "none">>
		<<link [[Ask to measure penis|Beach Phallus Scan]]>><</link>><<promiscuous3>>

	<<else>>
		<<link [[Ask to measure clitoris|Beach Phallus Scan]]>><</link>><<promiscuous3>>

	<</if>>
<</if>>
<<link [[Look for someone else (0:15)|Beach Phallus]]>><<endevent>><<pass 15>><</link>>

<<link [[Stop|Beach]]>><<pass 10>><<endevent>><</link>>

:: Beach Phallus Flex

<<location "beach">><<effects>>
You approach the <<person>> just as the <<person2>><<person>> walks off.<<person1>>

"You'll be back," the <<person>> says. <<He>> turns to you. "Hey," <<he>> says. "What do you want?"

<<if $submissive gte 1150>>
	You can't look <<him>> in the eye. Not with a request like this. "C-could I measure your <<personpenis>> with this tape?" you ask. "It's for my science project."
<<elseif $submissive lte 850>>
	"I'm gonna measure your <<personpenis>>," you say. "For science."
<<else>>
	"Hello," you say. "I'm doing a science project for school. Can I measure your <<personpenis>> with this tape?"
<</if>>
<<promiscuity3>>
<<He>> gapes, then bursts into laughter. "Damn, the schools here are fucked. Tell you what, you show me, and I'll show you." <<He>> leers at your <<crotch>>.

<<if $worn.lower.type.includes("naked")>>
	<<if $exhibitionism gte 75>>
		<<link [[Show|Beach Phallus Show]]>><<set $phase to 0>><</link>><<exhibitionist5>>

	<</if>>
<<else>>
	<<if $worn.under_lower.type.includes("naked")>>
		<<if $exhibitionism gte 75>>
			<<link [[Show|Beach Phallus Show]]>><<set $phase to 1>><</link>><<exhibitionist5>>

		<</if>>
	<<else>>
		<<if $exhibitionism gte 15>>
			<<link [[Show|Beach Phallus Show]]>><<set $phase to 2>><</link>><<exhibitionist2>>

		<</if>>
	<</if>>
<</if>>
<<link [[Look for someone else (0:15)|Beach Phallus]]>><<endevent>><<pass 15>><</link>>

<<link [[Stop|Beach]]>><<pass 10>><<endevent>><</link>>

:: Beach Phallus Show

<<location "beach">><<effects>>
<<if $phase is 0>>
	<<flaunting>> you pull aside your $worn.under_lower.name, baring your <<genitals>> for the <<person>> to see.
<<else>>
	You <<pulldown>> your $worn.lower.name, baring your <<undies>> for the <<person>> to see.
<</if>>
<<if $phase is 0 or $phase is 1>>
	<<exhibitionism5>>
	<<His>> eyes widen. "Didn't think you actually would," <<he>> says, not taking <<his>> eyes off you. Without hesitating, <<he>> <<if $pronoun is "m">>pulls down <<his>> shorts<<else>>pulls aside <<his>> bikini bottoms<</if>>, baring <<himself>> in turn. "I don't have all day."

	You kneel and take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. "This is the real invasive part," <<he>> says at one point, but <<he>> answers all the questions.

	<<if $NPCList[0].penis isnot "none">>
		<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
		You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
		<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
		You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>
	<<link [[Next|Beach]]>><<endevent>><</link>>

<<else>>
	<<exhibitionism2>>
	"That's a start," <<he>> says. "But you're gonna need to do better."

	<<if $exhibitionism gte 75>>
		<<link [[Show|Beach Phallus Show]]>><<set $phase to 0>><</link>><<exhibitionist5>>

	<</if>>
	<<link [[Flirt|Beach Phallus Flirt]]>><</link>>

	<<link [[Look for someone else (0:15)|Beach Phallus]]>><<endevent>><<pass 15>><</link>>

	<<link [[Stop|Beach]]>><<pass 10>><<endevent>><</link>>

<</if>>

:: Beach Phallus Flirt

<<location "beach">><<effects>>
"But you can already see so much of me," you say. "And I'm not experienced like you."

<<set $seductiondifficulty to 4000>>
<<seductioncheck>>

<<if $seductionskill lt 1000>>You feel more confident in your powers of seduction.<</if>><<seductionskilluse>>

<<if $seductionrating gte $seductionrequired>>
	<<He>> chuckles. "Worth a try," <<he>> says. Without hesitating, <<he>> <<if $pronoun is "m">>pulls down <<his>> shorts<<else>>pulls aside <<his>> bikini bottoms<</if>>, baring <<himself>> to you. "I don't have all day."

	You kneel and take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. "This is the real invasive part," <<he>> says at one point, but <<he>> answers all the questions.

	<<if $NPCList[0].penis isnot "none">>
		<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
		You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
		<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
		You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>
	<<link [[Next|Beach]]>><<endevent>><</link>>

<<else>>
	"I can see a lot less than you're asking of me," <<he>> says. "Show me more or go bother someone else."

	<<if $exhibitionism gte 75>>
		<<link [[Show|Beach Phallus Show]]>><<set $phase to 0>><</link>><<exhibitionist5>>

	<</if>>
	<<link [[Look for someone else (0:15)|Beach Phallus]]>><<endevent>><<pass 15>><</link>>

	<<link [[Stop|Beach]]>><<pass 10>><<endevent>><</link>>

<</if>>

:: Beach Phallus Pair

<<location "beach">><<effects>>
You approach the pair. The <<person2>><<person>> smiles at you. "How can we help you?" <<he>> asks.

<<if $submissive gte 1150>>
	You can't look <<him>> in the eye. Not with a request like this. "C-could I measure your <<personpenis>> with this tape?" you ask. "It's for my science project."
<<elseif $submissive lte 850>>
	"I'm gonna measure your <<personpenis>>," you say. "For science."
<<else>>
	"Hello," you say. "I'm doing a science project for school. Can I measure your <<personpenis>> with this tape?"
<</if>>
<<promiscuity3>>

<<He>> bursts into laughter. "Of course not." <<He>> grabs the <<person1>><<persons>> arm. "<<He>> will be happy to help though."

The <<person>> looks aghast. "No," <<he>> says. "That's not happening."

The <<person2>><<person>> whispers something into the <<person1>><<persons>> ear, and <<his>> expression changes. They share a look. "Alright. If you promise."

"I promise," the <<person2>><<person>> responds. <<He>> kneels in front of the <<person1>><<person>> and yanks down <<his>> <<if $pronoun is "m">>shorts<<else>>bikini bottoms<</if>>.

<<if $rng gte 61>>

You kneel and take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. The <<person2>><<person>> answers most of them for <<person1>><<him>>. <<He>> looks uncomfortable the whole time.

	<<if $NPCList[0].penis isnot "none">>
	<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
	You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
	<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
	You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>

<<link [[Next|Beach]]>><<endevent>><</link>>

<<else>>

You're kneeling to take <<his>> measurement when the <<person2>><<person>> crouches behind you and puts a hand over your mouth. "Hold still. You're going to be nice to my lover here. Understood?" The <<person1>><<person>> smiles.

<<link [[Next|Beach Phallus Rape]]>><<set $molestationstart to 1>><</link>>

<</if>>

:: Beach Phallus Rape
<<if $molestationstart is 1>>
<<set $molestationstart to 0>>
<<controlloss>>
<<violence 1>>
<<neutral 1>>
<<molested>>

<<maninit>><<if $NPCList[0].penis is "clothed">><<set $NPCList[0].penis to 0>><</if>><<if $NPCList[0].vagina is "clothed">><<set $NPCList[0].vagina to 0>><</if>><<hand_gag 1 left>>
<<enable_rescue>>
<</if>>

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

<<stateman>>

<<actionsman>>

<<if $enemyhealth lte 0>>
	<<link [[Next|Beach Phallus Rape Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Beach Phallus Rape Finish]]>><</link>><<nexttext>>
<<elseif $alarm is 1 and $rescue is 1>>
	<<link [[Next|Beach Phallus Rape Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Beach Phallus Rape]]>><</link>><<nexttext>>
<</if>>

:: Beach Phallus Rape Finish
<<location "beach">><<effects>>

<<if $enemyarousal gte $enemyarousalmax>>

<<ejaculation>>

"Wanting such personal information," the <<person2>><<person>> says. "What nerve." They leave you lying on the sand.

<<clotheson>>
<<endcombat>>

<<link [[Next|Beach]]>><</link>>

<<elseif $enemyhealth lte 0>>

You knock the <<person2>><<person>> way from you and escape into a more crowded area of the beach.

<<clotheson>>
<<endcombat>>

<<link [[Next|Beach]]>><</link>>

<<else>>

Heads turn up and down the beach. The pair back away from you and walk fast away.

<<clotheson>>
<<endcombat>>

<<link [[Next|Beach]]>><</link>>

<</if>>

:: Beach Phallus Beggar
<<location "beach">><<effects>>

You approach the <<person>>. <<He>> smiles at you.

<<if $submissive gte 1150>>
You can't look <<him>> in the eye. Not with a request like this. "C-could I measure your <<personpenis>> with this tape?" you ask. "It's for my science project."
<<elseif $submissive lte 850>>
"I'm gonna measure your <<personpenis>>," you say. "For science."
<<else>>
"Hello," you say. "I'm doing a science project for school. Can I measure your <<personpenis>> with this tape?"
<</if>>
<<promiscuity3>>

<<His>> smile fades as you talk, but returns all at once. "Okay," <<he>> says. "If you pay me. I'm in a bit of a hard spot."

<<if $money gte 1000>>
<<link [[Pay (£10)|Beach Phallus Pay]]>><<set $money -= 1000>><</link>>

<<link [[Give money for nothing in return (£10)|Beach Phallus Charity]]>><<famegood 1>><<set $money -= 1000>><<trauma -6>><</link>><<ltrauma>>

<</if>>
<<link [[Look for someone else (0:15)|Beach Phallus]]>><<endevent>><<pass 15>><</link>>

<<link [[Stop|Beach]]>><<pass 10>><<endevent>><</link>>

:: Beach Phallus Pay
<<location "beach">><<effects>>

You give <<him>> the money. <<He>> glances around to make sure no one is looking, then exposes <<his>> genitals.

You kneel and take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. <<He>> answers slowly.

	<<if $NPCList[0].penis isnot "none">>
	<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
	You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
	<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
	You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>

<<link [[Next|Beach]]>><<endevent>><</link>>

:: Beach Phallus Charity

<<location "beach">><<effects>>
<<if $submissive gte 1150>>
	You hand <<him>> the money. <<He>> moves to expose <<his>> genitals. "N-no," you say. "It's fine. I'll find someone else."
<<elseif $submissive lte 850>>
	"Just take the money," you say. "I'll find someone else."
<<else>>
	"It's okay," you say. "Just take the money. I'll find someone else."
<</if>>

"Thank you so much," <<he>> says. <<He>> looks relieved.
<<if $rng gte 51>>
	<<He>> steps closer as if to hug, but decides not to. <<He>> shuffles away.

<<else>>
	<<He>> plays with the money in <<his>> hand and frowns. With a grimace, <<he>> exposes <<his>> genitals. "It's okay," <<he>> smiles. "Take what you need."

	You kneel and take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. <<He>> answers slowly.

	<<if $NPCList[0].penis isnot "none">>
		<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
		You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
		<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
		You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>
<</if>>
<<link [[Next|Beach]]>><<endevent>><</link>>

:: Beach Phallus Shy

<<location "beach">><<effects>>
You approach the <<person>>. <<He>> looks away from you until you're right beside <<him>>.

<<if $submissive gte 1150>>
	You can't look <<him>> in the eye. Not with a request like this. "C-could I measure your <<personpenis>> with this tape?" you ask. "It's for my science project."
<<elseif $submissive lte 850>>
	"I'm gonna measure your <<personpenis>>," you say. "For science."
<<else>>
	"Hello," you say. "I'm doing a science project for school. Can I measure your <<personpenis>> with this tape?"
<</if>>
<<promiscuity3>>
<<He>> looks away and blushes. You take it as a no, but then <<he>> pulls a towel over <<his>> legs and up to <<his>> waist. "C-crawl under," <<he>> says. "No one should see."

You shuffle beneath the towel and between <<his>> legs. You <<if $pronoun is "m">>tug down <<his>> shorts<<else>>pull aside <<his>> bikini bottoms<</if>>.

<<if $promiscuity gte 55>>
	<<link [[Lick|Beach Phallus Oral]]>><<set $sexstart to 1>><</link>><<promiscuous4>>

<</if>>
<<link [[Take measurement|Beach Phallus Measure]]>><</link>>

:: Beach Phallus Oral

<<if $sexstart is 1>>
	<<set $sexstart to 0>>
	<<consensual>>
	<<set $consensual to 1>>
	<<neutral 1>>
	<<maninit>>
	You crawl closer and give <<him>> a teasing lick. "W-wait," <<he>> stammers, but <<he>> doesn't push you away.
	<<promiscuity4>>

	<<npcoral>>
<</if>>
<<effects>>
<<effectsman>><<man>>
<<He>> keeps the towel pulled over you.

<<stateman>>

<<actionsman>>
<<if $enemyhealth lte 0>>
	<<link [[Next|Beach Phallus Oral Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Beach Phallus Oral Finish]]>><</link>><<nexttext>>
<<elseif $finish is 1>>
	<<link [[Next|Beach Phallus Oral Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Beach Phallus Oral]]>><</link>><<nexttext>>
<</if>>

:: Beach Phallus Oral Finish

<<location "beach">><<effects>>

<<if $enemyhealth lte 0>>

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

<<else>>

<</if>>

<<He>> lies still as you take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. <<He>> isn't keen on giving answers, but you get enough. You shuffle out from beneath the towel. <<He>> avoids looking at you.

	<<if $NPCList[0].penis isnot "none">>
	<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
	You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
	<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
	You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>

<<clotheson>><<endcombat>>

<<link [[Next|Beach]]>><</link>>

:: Beach Phallus Measure
<<location "beach">><<effects>>

<<He>> lies still as you take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. <<He>> isn't keen on giving answers, but you get enough. You shuffle out from beneath the towel. <<He>> avoids looking at you.

	<<if $NPCList[0].penis isnot "none">>
	<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
	You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
	<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
	You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>

<<endevent>>

<<link [[Next|Beach]]>><</link>>

:: Beach Phallus Scan
<<location "beach">><<effects>>

You approach the <<person>>. <<He>> smiles at you. "Hey cutie," <<he>> says.

<<if $submissive gte 1150>>
You can't look <<him>> in the eye. Not with a request like this. "C-could I measure your <<personpenis>> with this tape?" you ask. "It's for my science project."
<<elseif $submissive lte 850>>
"I'm gonna measure your <<personpenis>>," you say. "For science."
<<else>>
"Hello," you say. "I'm doing a science project for school. Can I measure your <<personpenis>> with this tape?"
<</if>>
<<promiscuity3>>

<<His>> smile broadens and <<he>> leans close. "How forward. I'll show you everything," <<he>> whispers. "We're going to find somewhere private. Then I'm going to fuck you senseless." <<He>> grasps your arm and pulls.

<<link [[Accept|Beach Phallus Accept]]>><</link>>

<<link [[Refuse|Beach Phallus Refuse]]>><</link>>

:: Beach Phallus Refuse
<<location "beach">><<effects>>

You resist <<his>> pull. <<He>> looks angry, but releases you. "How rude," <<he>> says. "Go find someone else to tease."

<<endevent>>

<<link [[Next|Beach]]>><</link>>

:: Beach Phallus Accept

<<location "beach">><<effects>>
<<He>> leads you to a changing room and pushes you inside. <<He>> shuts the door after <<him>>, then tackles you to the ground.

<<link [[Next|Beach Phallus Sex]]>><<set $sexstart to 1>><</link>>

:: Beach Phallus Sex

<<if $sexstart is 1>>
	<<set $sexstart to 0>>
	<<consensual>>
	<<set $consensual to 1>>
	<<neutral 1>>
	<<maninit>>
<</if>>

<<effects>>

<<effectsman>><<man>>

<<stateman>>

<<actionsman>>

<<if $enemyhealth lte 0>>
	<<link [[Next|Beach Phallus Sex Finish]]>><</link>><<nexttext>>
<<elseif $enemyarousal gte $enemyarousalmax>>
	<<link [[Next|Beach Phallus Sex Finish]]>><</link>><<nexttext>>
<<elseif $finish is 1>>
	<<link [[Next|Beach Phallus Sex Finish]]>><</link>><<nexttext>>
<<else>>
	<<link [[Next|Beach Phallus Sex]]>><</link>><<nexttext>>
<</if>>

:: Beach Phallus Sex Finish

<<location "beach">><<effects>>
<<if $enemyhealth lte 0>>
	You knock <<him>> against the wooden wall and flee through the door.

<<elseif $enemyarousal gte $enemyarousalmax>>
	<<ejaculation>>
	"Did you get the measure of me?" <<he>> says. <<He>> sees the tape in your hand. "Oh, you meant that literally? Help yourself I guess."

	<<He>> lies still as you take <<his>> measurement from base to tip, then ask <<him>> questions about <<his>> lifestyle. <<He>> seems bored, but answers to your satisfaction.

	<<if $NPCList[0].penis isnot "none">>
		<<set $sciencephallus += 1>><<set $sciencephalluspenis += 1>>
		You can add the penis measurement you took to your project in your room or the school library.

	<<else>>
		<<set $sciencephallus += 1>><<set $sciencephallusclit += 1>>
		You can add the clitoris measurement you took to your project in your room or the school library.

	<</if>>
<<else>>
	"You tease," <<he>> says. "Clear off. Before I change my mind."

<</if>>
<<clotheson>><<endcombat>>
<<link [[Next|Beach]]>><</link>>


code:
:: Tanning

<<location "beach">>

<<if $season is "summer">>
	<<switch random(1, 6)>>
	<<case 1 2>>
		You lay on the beach beneath the blazing sun. You mind drifts as the rays soak your skin.

		You feel warm.
		<<stress -6>><<lstress>><<gggtanned>><<tanned 120 "tanLines">>

	<<case 3 4>>
		You lay out on the beach. The sound of the waves washes over you as the sun heats your skin.

		You feel warm.
		<<stress -6>><<lstress>><<gggtanned>><<tanned 120 "tanLines">>

	<<case 5 6>>
		You lay down on the sand. You hear the sounds of the ocean, children playing and beach music as you relax.

		You feel warm.
		<<stress -6>><<lstress>><<gggtanned>><<tanned 120 "tanLines">>

	<</switch>>
<<elseif $season is "winter">>
	<<switch random(1, 6)>>
	<<case 1 2>>
		You lay on the beach beneath the sun. A chill breeze caresses you.

		You shiver.
		<<stress 6>><<gstress>><<gtanned>><<tanned 20 "tanLines">>

	<<case 3 4>>
		You lay out on the beach. You can barely feel the sun through the cold wind.

		You shiver.
		<<stress 6>><<gstress>><<gtanned>><<tanned 20 "tanLines">>

	<<case 5 6>>
		You lay down on the sand. The sound of crashing waves washes over you. It's chilly.

		You shiver.
		<<stress 6>><<gstress>><<gtanned>><<tanned 20 "tanLines">>

	<</switch>>
<<else>>
	<<switch random(1, 6)>>
	<<case 1 2>>
		You lay on the beach beneath the warm sun. Your mind drifts as the sun's rays caress your skin.

		You feel refreshed.
		<<stress -6>><<lstress>><<ggtanned>><<tanned 60 "tanLines">>

	<<case 3 4>>
		You lay out on the beach. The sound of the waves washes over you as the sun warms your skin.

		You feel refreshed.
		<<stress -6>><<lstress>><<ggtanned>><<tanned 60 "tanLines">>

	<<case 5 6>>
		You lay down on the sand. You hear the sounds of the ocean, children playing and beach music as you relax.

		You feel refreshed.
		<<stress -6>><<lstress>><<ggtanned>><<tanned 60 "tanLines">>

	<</switch>>
<</if>>
You have a <<skincolourtext>>

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