glife/sugarcube/src/locations/pavlov/lake/pav_lake.tw

:: pav_lake[outdoors public beach]
	<!-- ! --- meynold event --- !. edit to month 5~10-->
	<!--<<if !$wardrobe.isWearingSwimwear and $wardrobe.clothingworntype != 'nude' and $weather.temperature >= 5 and !$weather.isRaining and $time.month >= 5 and $time.month <= 10 and $time.hour < 20 and (($time.hour >= 10 and $time.weekday >= 6) or ($time.hour >= 14 and $time.weekday < 6)) and getvar("$mey_vika['mey_vika_qw']") >= 18 and getvar("$mey_vika['mey_vika_qw']") < 20 and $mey_vika['qw_day'] != $time.daystart>>
		<<gt 'mey_vika_events' 'beach_event1'>>

	<</if>>-->
	<h2>Lake</h2>
	<!-- ! to memorize were cowards or not-->
	<<if $time.month >= 3 and $time.month <= 5>>
		<<imageDayNight "locations/pavlovsk/lake/lake.spring#.jpg" "" ".night">>
		<p>A small lake, located not far from Pavlovsk. You're not sure whether Pavlovsk was built near the lake on purpose or not. When it's warm enough, people often come to sunbathe or go swimming.</p>
	<<elseif $time.month >= 6 and $time.month <= 8>>
		<<imageDayNight "locations/pavlovsk/lake/lake.summer#.jpg" "" ".night">>
		<p>A small lake, located not far from Pavlovsk. You're not sure whether Pavlovsk was built near the lake on purpose or not. People often come to sunbathe or go swimming during the summer.</p>
	<<elseif $time.month >= 9 and $time.month <= 11>>
		<<imageDayNight "locations/pavlovsk/lake/lake.autumn#.jpg" "" ".night">>
		<p>A small lake, located not far from Pavlovsk. You're not sure whether Pavlovsk was built near the lake on purpose or not. When it's warm enough, people often come to sunbathe or go swimming.</p>
	<<elseif $time.month < 3 or $time.month == 12>>
		<<imageDayNight "locations/pavlovsk/lake/lake.winter#.jpg" "" ".night">>
		<p>A small lake, located not far from Pavlovsk. You're not sure whether Pavlovsk was built near the lake on purpose or not. The lake has been frozen over ever since winter arrived and it's currently being used as a skating rink.</p>
		<<if $pc.skillLevel("iceskating") > 0>>
			Your ice skating skill is <<=$pc.skillLevel("iceskating")>>.
		<</if>>
	<</if>>
	<!--<<if setup.startingCharacterTagsIncludes('sg') and ($time.month <= 2 or $time.month == 12)>>
		<<if $time.weekday >= 6 and $time.hour >= 8 and $time.hour <= 11>>
			Looking out over the frozen lake, you see a figure in the distance figure skating and doing all types of crazy moves. Stepping onto the ice and skating out, you notice that it's <<link "Veronika">><<gt 'gschool_socialchg1' 'tVeronika'>><</link>>.
		<</if>>
	<</if>>-->
	<!--
	<<if getvar("$konki_cloth") == 1 or getvar("$pcs_ski_worn") == 0>>
		<<if setup.startingCharacterTagsIncludes('sg') and $weather.temperature >= 20 and !$weather.isRaining and $time.month >= 5 and $time.month <= 9 and $time.hour >= 12 and $time.hour <= 14 and (($time.isSchoolHoliday == 0 and $time.weekday == 7) or (getvar("$kanikuli") > 0 and $time.weekday % 2 == 0))>>
			<<if $wardrobe.clothingworntype == 'nude'>>
				As you walk down to the beach area of the lake, you see the jocks and cool kids hanging out and hope none of them have seen you naked. You should put on a bikini before approaching them if you want to hang out, or just avoid them and do your own thing today.
			<<else>>
				As you walk down to the beach area of the lake, you see the jocks and cool kids hanging out.
				<<act 'Approach them'>>
					<<gt 'pav_lake' 'school_mates'>>
				<</act>>
			<</if>>
		<</if>>
		<<if setup.startingCharacterTagsIncludes('sg') and $pc.isSchoolStudent and (($time.month >= 3 and $time.month <= 5) or ($time.month >= 9 and $time.month <= 11)) and $time.weekday <= 5 and $time.hour >= 15 and $time.hour <= 20 and $quest('christina').subpath == 1 and $socialchg['tchristina_day'] != $time.daystart>>
			<<link "<<npc 'A18'>><</npc>>">><<gt 'Zvereva_sub_1' 'chris_sub'>><</link>> is standing by the beach looking out over the lake as Lina stands next to her, breathing heavily.
		<</if>>
		<<gs 'camera' 'check_location'>>
	<</if>>
	-->
	<!--
	<<actCLA 'Return to Pavlovsk'>>
		<<if getvar("$konki_cloth") == 1>>
			You need to remove your skates first.
			<<act 'Go back'>>
				<<gt 'pav_lake'>>
			<</act>>
		<<elseif getvar("$pcs_ski_worn") == 1>>
			You need to remove your skis first.
			<<act 'Return'>>
				<<gt 'pav_lake'>>
			<</act>>
		<<elseif $wardrobe.PCloswimwear == 1>>
			You need to get dressed into your regular clothing first.
			<<act 'Return'>>
				<<gt 'pav_lake'>>
			<</act>>
		<<elseif $wardrobe.clothingworntype != 'nude'>>

		<<else>>

			<<act 'Return'>>
				<<gt 'pav_lake'>>
			<</act>>
		<</if>>
	<</actCLA>>
	 -->
	 <<ConnectedLocationCode 'Residential Area' 'locations/pavlovsk/pavres.jpg' -5>>
	 	<<if $wardrobe.PCloswimwear == 1>>
			<<msg '<b><font color = red>You need to get dressed into your regular clothing first.</font></b>'>>
		<<elseif $wardrobe.isNaked>>
			<<msg '<b><font color = red>You need to put some clothes on first.</font></b>'>>
		<<else>>
			<<set $time.minutes += 5>>
			<<travel  'pav_residential'>>
		<</if>>
	 <</ConnectedLocationCode>>
	<<if $time.month >= 5 and $time.month <= 9 and getvar("$konki_cloth") == 0 and getvar("$pcs_ski_worn") == 0>>
		<!--<<if $wardrobe.clothingworntype != 'nude' and ($pc.pcs_inhib > 30 or (getvar("$exhibitionist_lvl") > 1 and $pc.horny >= 60))>>
			<<actCLA 'Strip naked' undefined `{willpower:['exhib','self','hard']}`>>

					<<set $menu_off = 1>>
					<<set $time.minutes += 5>>
					<<set $sauna_stripped = 0>>
					<<if $pc.pcs_inhib < 60>>
						<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>

					<</if>>
					<<if getvar("$PCloSwimwear") == 0>>
						<<setinit $lastwornclothingtype['swim'] = $wardrobe.clothingworntype>>
						<<setinit $lastwornclothingnumber['swim'] = $wardrobe.clothingwornnumber>>
						<<setinit $lastwornpantytype['swim'] = $wardrobe.pantyworntype>>
						<<setinit $lastwornpantynumber['swim'] = $wardrobe.pantywornnumber>>
						<<setinit $lastwornbratype['swim'] = $wardrobe.braworntype>>
						<<setinit $lastwornbranumber['swim'] = $wardrobe.brawornnumber>>
					<</if>>
					<<gs 'clothing' 'strip_all'>>
					<<image "locations/pavlovsk/lake/event/strip.jpg">>
					Without hesitation and despite the fact that other people are around, you strip from your clothes and neatly fold them before putting them down in a pile. Without your clothes holding you back, you can go for a swim in the lake or do some sunbathing.
					<<act 'Continue'>>
						<<gt 'pav_lake'>>
					<</act>>
				<</actCLA>>

		<<elseif $wardrobe.clothingworntype == 'nude' and getvar("$sauna_stripped") == 0>>
			<<gs 'pav_lake_lost_clothing'>>
		<</if>>-->
	<</if>>
	<<if $weather.temperature >= 15 and $time.month >= 5 and $time.month <= 9 and $time.hour >= 6 and $time.hour <= 20 and getvar("$konki_cloth") == 0 and getvar("$pcs_ski_worn") == 0>>
		<<actCLA 'Take a walk along the beach'>>
			<<set $menu_off = 1>>
			<<set $time.minutes += 30>>
			<<set $pc.mood += 5>>
			<<if $wardrobe.clothingworntype == 'nude'>>
				<<image "locations/pavlovsk/lake/walknude.jpg">>
				<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
			<<elseif $wardrobe.PCloswimwear == 1>>
				<<if $pc.pcs_hips >= 110>>
					<<image 'locations/pavlovsk/lake/lake.walk.bikini.fat0,1.jpg'>>
				<<elseif $pc.bmi > 24>>
					<<image 'locations/pavlovsk/lake/lake.walk.bikini.fat0,0.jpg'>>
				<<else>>
					<<image 'locations/pavlovsk/lake/lake.walk.bikini0,#.jpg' 0 3>>
				<</if>>
				<<if $pc.pcs_inhib < 50>>
					<<run $pc.skillExperienceGain('inhibition',rand(1,2))>>

				<</if>>
			<<else>>
				<<image 'locations/pavlovsk/lake/lake.walk0,#.jpg' 0 2>>
			<</if>>
			You walk along the beach, enjoying the feeling of the sun on your body.
			<<act 'Continue'>>
				<<gt 'pav_lake'>>
			<</act>>
		<</actCLA>>
		<<if $wardrobe.isWearingSwimwear or $wardrobe.clothingworntype == 'nude'>>
			<<act 'Go for a swim in the lake'>>
				<<gt 'pav_lake_swimming'>>
			<</act>>
			
		<</if>>
	<</if>>
	<<if getvar("$konki_cloth") == 0 and getvar("$pcs_ski_worn") == 0>>
		<<actCLA 'Go to the secluded beach'>>
			<<set $time.minutes += 10>> <<gt 'pav_lake_nude'>>
		<</actCLA>>
	<</if>>
	<<if $time.month == 12 or $time.month < 3>>
		<<if getvar("$pcs_ski_worn") == 1>>
			<<actCLA 'Take off your skis'>>
				<<set $menu_off = 1>>
				<<set $time.minutes += 5>>
				<<set $pcs_ski_worn = 0>>
				<<image "locations/pavlovsk/lake/skiing_3.jpg">>
				You can't believe your time skiing is already over. It feels like you just put on your ski boots and started around the lake. But now, as you sit down on the bench to take them off, your legs are tired and sore from a day of skiing. You unlace your boots and wiggle your toes, relieved to finally be able to stretch them out. You stand up and take a few steps, savouring the feeling of being barefoot after a day in stiff ski boots before you put your regular shoes back on.
				<<act 'Continue'>>
					<<gt 'pav_lake'>>
				<</act>>
			<</actCLA>>
			<<act 'Ski around the lake (30 mins)'>>
				<<gt 'pav_lake' 'ski'>>
			<</act>>
		<<elseif getvar("$pcs_ski_owned") > 0 and $time.hour >= 8 and $time.hour <= 17 and getvar("$konki_cloth") == 0>>
			<<actCLA 'Put your skis on'>>
				<<set $menu_off = 1>>
				<<set $time.minutes += 5>>
				<<set $pcs_ski_worn = 1>>
				<<image "locations/pavlovsk/lake/skiing_1.jpg">>
				You pull your ski boots out of your bag and sit down on the bench near the lake. The cold air nips at your cheeks as you begin to lace up your boots. You wiggle your toes, trying to get them as far back in the boots as possible. They feel a bit tight, but you know they'll stretch out as you ski. You stand up and take a few steps, getting a feel for the boots.
				<<act 'Continue'>>
					<<gt 'pav_lake'>>
				<</act>>
			<</actCLA>>
		<</if>>
		<<if getvar("$konki_cloth") == 1>>
			<<actCLA 'Take off your skates'>>
				<<set $menu_off = 1>>
				<<set $time.minutes += 5>>
				<<set $konki_cloth = 0>>
				<<image 'locations/pavlovsk/lake/konki0,1.jpg'>>
				You take off your skates and put your shoes back on. It takes you a while to adjust to walking on your feet again.
				<<act 'Continue'>>
					<<gt 'pav_lake'>>
				<</act>>
			<</actCLA>>
			<<act 'Skate on the ice rink'>>
				<<gt 'pav_lake' 'skating_start'>>
			<</act>>
		<<elseif getvar("$konki") > 0 and $time.hour >= 8 and $time.hour <= 17 and getvar("$pcs_ski_worn") == 0>>
			<<actCLA 'Put your skates on'>>
				<<set $menu_off = 1>>
				<<set $time.minutes += 5>>
				<<set $konki_cloth = 1>>
				<<image 'locations/pavlovsk/lake/konki0,0.jpg'>>
				You take your shoes off and put your skates on.
				<<act 'Continue'>>
					<<gt 'pav_lake'>>
				<</act>>
			<</actCLA>>
		<</if>>
	<</if>>
:: pav_lake_lost_clothing
	<<actCLA 'Put your clothes back on'>>
		<<set $menu_off = 1>>
		<<set $time.minutes += 5>>
		<<set $nudelake = rand(1,20)>>
		<<if getvar("$nudelake") <= 3 and setup.func('homes_properties', 'has_access', 'homeParents')>>
			<<set $time.minutes += 5>>
			<<set $pc.mood -= 5>>
			<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
			<<image "locations/pavlovsk/lake/event/noclothes.jpg">>
			<p>You return to the place where put your clothes to get dressed... except you can't find them. You desperately search the beach for a while, a few passers-by giving you amused stares. Despite your efforts, you can't find them. You panic and, without thinking, start running home naked.</p>
			<<act 'Run home naked'>>
				<<gt 'pav_lake' 'nude_home'>>
			<</act>>
		<<elseif getvar("$nudelake") == 4 and setup.func('homes_properties', 'has_access', 'homeParents')>>
			<<set $time.minutes += 5>>
			<<set $pc.mood -= 5>>
			<<image "locations/pavlovsk/lake/event/nakedcar.jpg">>
			<p>You return to the place where you put your clothes to get dressed... except you can't find them. You desperately search the beach for a while, a few passers-by giving you amused stares. A man eventually approaches you, his eyes are darting over your body as he speaks. "Is there a problem, sweetheart? You seem upset..."</p>
			<<if $wardrobe.purse.isValidItem == 1>>
				Luckily, your bag is sitting where you left it.
			<<else>>
				<<set $finances.cash = 0>>
			<</if>>
			<p>You're seriously panicking now. "I can't find my clothes! I left them right here and now they're gone! I don't know what to do!" you blurt out and he tries to calm you down.</p>
			"Don't worry girl, you're going to be fine. Come on, I happen to have some sportswear in my car."
			<p>You profusely thank him as he guides you to his car and are relieved to see that he wasn't lying. He pulls out a set of brand new sportswear that looks look like they would fit you. He doesn't hand them over though. "Of course, I can't just give these away for free... They're brand new! They cost me 3000 <b>₽</b>, so if you can give me that they're all yours."</p>
			<<if $finances.cash >= 3000>>
				<<actCLA 'Pay 3000 <b>₽</b>'>>
					<<set $finances.cash -= 3000>>
					<<run $wardrobe.wear('danilovich_outfit_1')>>
					<<image "locations/pavlovsk/lake/event/nakedcar.jpg">>
					There''s the catch. He looks at your naked body as you mull over his proposition. You realize that you don't really have any other choice. You silently nod and give him the money, quickly putting the clothes on when he hands them over. You feel relieved that you won''t have to go home naked and hope that your clothes turn up later.
					<<act 'Continue'>>
						<<gt 'pav_lake'>>
					<</act>>
				<</actCLA>>
			<<else>>
				<<actCLA 'Tell him you don`t have enough money'>>
					<<image "locations/pavlovsk/lake/event/nakedcar.jpg">>
					<p>There's the catch. He looks over your naked body as you mull over your predicament. "I don't have that kind of money. Do you have a towel or something?"</p>
					He shakes his head and you can see a slight bulge forming in his pants. "No sorry, but I might be willing to trade the clothes..." He trails off suggestively and with the way he's looking at you, you have no doubt what he has in mind.
					<p>"What did you have in mind?" you ask rhetorically and he grins.</p>
					<p>"Well, how about we get in my car and you let me fuck you? Then you can have the clothes."</p>
					<<actCLA 'Refuse and run home naked' undefined `{willpower:['prostitution','resist']}`>>

							<<gt 'pav_lake' 'nude_home'>>
						<</actCLA>>

					<<act 'Agree to have sex'>>
						<<gt 'pav_lake' 'car_sex'>>
					<</act>>
				<</actCLA>>
			<</if>>
			<<actCLA 'Suggest alternative payment' undefined `{willpower:['prostitution','self']}`>>

					<<image "locations/pavlovsk/lake/event/nakedcar.jpg">>
					<p>This is not how you planned for your day to go! Too afraid to look him in the eye, you feebly make a suggestion. "Is there... is there some other way I can pay you? 3000 <b>₽</b> is a lot of money."</p>
					He's been gawking at your naked body the whole time you've been talking, and your suggestion seems to be exactly what he wanted to hear as he starts grinning. "I can think of one way..."
					The growing bulge in his pants does an excellent job of telling exactly what he's thinking.
					<<act 'Agree to have sex'>>
						<<gt 'pav_lake' 'car_sex'>>
					<</act>>
					<<if $finances.cash >= 3000>>
						<<actCLA 'Just pay the 3000 <b>₽</b>'>>
							<<set $finances.cash -= 3000>>
							<<run $wardrobe.wear('danilovich_outfit_1')>>
							<<image "locations/pavlovsk/lake/event/nakedcar.jpg">>
							<p>You don't want to have sex with him, but you also don't want to go home naked. Not seeing any other option, you decide to pay him the 3000 <b>₽</b>. You quickly put on the clothes as he hands them over. You feel relieved that you won't have to go home naked and hope that your clothes turn up later.</p>
							<<act 'Continue'>>
								<<gt 'pav_lake'>>
							<</act>>
						<</actCLA>>
					<</if>>
				<</actCLA>>

		<<else>>
			<<run $wardrobe.wear_clothes_legacy('clothes',$lastwornclothingtype['swim'],$lastwornclothingnumber['swim'])>>
			<<run $wardrobe.wear(['panties',$lastwornpantytype['swim'],$lastwornpantynumber['swim']])>>
			<<run $wardrobe.wear(['bra',$lastwornbratype['swim'],$lastwornbranumber['swim']])>>
			You return to the place where you left your clothes, and put them back on.
			<<act 'Continue'>>
				<<gt 'pav_lake'>>
			<</act>>
		<</if>>
	<</actCLA>>
:: pav_lake_sunbathe
	<<set $time.minutes += 30>>
	<<if $pc.pcs_sweat < 35>>
		<<run $pc.sweatAdd(5)>>

	<</if>>
	<<set $pc.mood += 5>>
	<<if $wardrobe.PCloswimwear == 1>>
		<<image "locations/shared/lake/tanning_swimsuit.jpg">>
		<<if $pc.pcs_inhib < 50>>
			<<run $pc.skillExperienceGain('inhibition',rand(1,2))>>

		<</if>>
	<<else>>
		<<image "locations/shared/lake/tanning_nude.jpg">>
		<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
	<</if>>
	<<if $inventory.get("sunblock") == 0>>
		You lie down on your towel and enjoy the warm rays of the sun on your body.
		<<set $pc.tan = $pc.tan + 1>>
	<<else>>
		<<run $inventory.set('sunblock',$inventory.get("sunblock") - 1)>>
		You apply sunscreen to yourself and lie down on the towel to work on your tan. You enjoy the warm rays of the sun on your body.
		<<set $pc.tan = $pc.tan + 3>>
	<</if>>
	/*<<if $pc.pcs_apprnc >= rand(1,400)>>
		<<either 50>>
			<<if $npc('A113').QW == 1>>
				<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
				<p>While you're sunbathing, you see Vadim Bely and his brother sitting not far from you. The brother points at you, and seconds later Vadim walks over and sits down next to you. He idly scratches his tattoo covered belly as he speaks to you. "Hello $pc.name_nick, want to go for a ride with me?"</p>
				The greedy look in his eyes tells you that when he says ''ride'', he doesn''t just mean in his car.
				<<if $wardrobe.clothingworntype == 'nude'>>
					<<actCLA 'Get dressed and go with him'>>
						<<gs 'clothing' 'wear_last_worn'>>
						<<if $wardrobe.PCloswimwear == 1>>
							<<run $wardrobe.wear_clothes_legacy('clothes',$lastwornclothingtype['swim'],$lastwornclothingnumber['swim'])>>
							<<run $wardrobe.wear(['panties',$lastwornpantytype['swim'],$lastwornpantynumber['swim']])>>
							<<run $wardrobe.wear(['bra',$lastwornbratype['swim'],$lastwornbranumber['swim']])>>
						<</if>>
						<<gt 'LakeBoyDy' 'ride'>>
					<</actCLA>>
				<<else>>
					<<actCLA 'Get dressed and go with him'>>
						<<run $wardrobe.wear_clothes_legacy('clothes',$lastwornclothingtype['swim'],$lastwornclothingnumber['swim'])>>
						<<run $wardrobe.wear(['panties',$lastwornpantytype['swim'],$lastwornpantynumber['swim']])>>
						<<run $wardrobe.wear(['bra',$lastwornbratype['swim'],$lastwornbranumber['swim']])>>
						<<gt 'LakeBoyDy' 'ride'>>
					<</actCLA>>
				<</if>>
			<<elseif $wardrobe.clothingworntype != 'nude' and $npc('A113').QW < 1>>
				<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
				While sunbathing, you can't help but notice a man walking towards you. He looks truly intimidating, his entire body covered in criminal gang tattoos. A bit further down the beach you see a younger man with similar tattoos, keeping an eye on the man approaching you.
				<p>His head is mostly bald, and a large golden cross dangles on a thick chain from his neck. He sits his fat body down next to you before you can protest, idly scratching his belly as he begins to chat. "Hello! I'm not interrupting anything, am I?"</p>
				<<actCLA 'Annoyed'>>
					<<set $time.minutes += 5>>
					<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
					<p>"Erm, excuse me!? I was here first!" you exclaim in an annoyed tone.</p>
					<p>The man is not impressed in the slightest, obviously having played this game before, and immediately challenges your claim. "Oh, excuse me princess! Is this your spot? Do you own it?"</p>
					<<actCLA 'Yes'>>
						<<set $time.minutes += 5>>
						<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
						<p>"Yes, this is my spot! I was here first, that's how it works!" you respond indignantly.</p>
						<p>You suddenly hear a deep voice behind you. "This beach is only used by prostitutes and bus drivers, and I don't see any fucking buses nearby!"</p>
						Startled, you look behind you and see the tattooed younger man behind you. He has tattoos over his whole body as well, most notably several tombs and skulls on his chest. He stares you down with a stone cold look on his face.
						The bald man smiles and puts his hand on your chest as if he owns it, roughly squeezing your breast through your swimsuit.
						<p>"So... how much?"</p>
						<<actCLA 'Resist'>>
							<<gs 'LakeBoyDy' 'slap'>>
						<</actCLA>>
						<<act 'Move away'>>
							<<gt 'LakeBoyDy' 'go'>>
						<</act>>
					<</actCLA>>
				<</actCLA>>
				<<actCLA 'Ignore them'>>
					<<set $time.minutes += 5>>
					<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
					Feeling intimidated and not wanting any trouble, you ignore them and pretend they're not there, lying on the beach with your eyes closed. However, you feel a strange tickling your stomach few seconds later and open your eyes. You see the fat man running a blade of grass over your stomach with a smug grin on his face.
					<<actCLA 'Keep ignoring them'>>
						<<set $time.minutes += 5>>
						<<image "characters/pavlovsk/school/boy/fedor/fedorev/Strela/vadimbely.jpg">>
						You try to ignore them and close your eyes again, but you feel the blade of grass continuously teasing your body, and after a few minutes his sweaty hand is pawing at your breasts through your swimsuit.
						<p>"Come with me, baby and I'll make you feel so good! You won't regret it." His groping becomes more insistent and he's roughly pinching your nipples now, the outline of them slowly but surely becomes visible through your swimsuit.</p>
						<<actCLA 'Resist'>>
							<<gs 'LakeBoyDy' 'slap'>>
						<</actCLA>>
					<</actCLA>>
				<</actCLA>>
				<<act 'Walk away'>>
					<<gt 'pav_lake'>>
				<</act>>
			<<else>>
				Three men sit down near you as you sunbathe. While you notice them looking at you and talking about your body, they don't come over.
				<<act 'Stop sunbathing'>>
					<<gt 'pav_lake'>>
				<</act>>
			<</if>>
		<<or 10>>
			<!-- !! {below is for when this event is fixed. Generates a boy[0], boy[1], and boy[2]}-->
			<!-- !! killvar '$sex.npcId'-->
			<!-- !! i = rand((age - 5),(age + 5))-->
			<!-- !! if i < 16: i = 16-->
			<!-- !! gs 'npcgeneratec', 0, 'Guy', rand((i - 1),(i + 1))-->
			<!-- !! gs 'boyStat', $npclastgenerated-->
			<!-- !! gs 'npcgeneratec', 0, 'Guy', rand((i - 1),(i + 1))-->
			<!-- !! gs 'boyStat', $npclastgenerated, 1-->
			<!-- !! gs 'npcgeneratec', 0, 'Guy', rand((i - 1),(i + 1))-->
			<!-- !! gs 'boyStat', $npclastgenerated, 2-->
			Three men sit down near you as you sunbathe. While you notice them looking at you and talking about you, they don't come over.
			<<act 'Continue'>>
				<<gt 'pav_lake'>>
			<</act>>
		<<or 20>>
			<<set $i = $pc.age - 5>>
			<<if getvar("$i") < 16>>
				<<set $i = 16>>

			<</if>>
			<<gs 'npcgeneratec' 0 'Guy' `rand((i)` (age + 5))>>

			<<set $boydesc = $npc($npclastgenerated).firstname>>
			<<gs 'LakeBoyZ'>>
			A rather cute looking guy sits down next to you as you sunbathe.
			<p>"Hey there beautiful, I'm $boydesc. What's your name?" he asks in an attempt to chat you up.</p>
			<<act 'Get away from him'>>
				<<gt 'pav_lake'>>
			<</act>>
			<<gL_boy_z>>
		<<or 20>>
			Three men sit down near you as you sunbathe. While you notice them looking at you and talking about your body, they don't come over.
			<<act 'Stop sunbathing'>>
				<<gt 'pav_lake'>>
			<</act>>
		<</either>>
	<<else>>
		<<act 'Stop sunbathing'>>
			<<gt 'pav_lake'>>
		<</act>>
	<</if>>*/

	<<if !$weather.isRaining>>
		<<act 'Continue sunbathing'>>
			<<gt 'pav_lake_sunbathe'>>
		<</act>>
	<</if>>
	<<act 'Stop sunbathing'>>
		<<gt 'pav_lake'>>
	<</act>>
:: pav_lake_swimming
	<<set $menu_off = 1>>
	<<set $pc.pcs_makeup = 1>>
	<<set $cumspclnt = 4>>
	<<gs 'cum_cleanup'>>
	<<gs 'exercise' 'tier1' 30 'stren'>>
	<<if $pc.pcs_sweat > 10>>
		<<set $pc.pcs_sweat = 10 + rand(0,4)>>

	<</if>>
	<<set $pc.mood += 5>>
	<<if $wardrobe.clothingworntype == 'nude'>>
		<<image 'pc/activities/swim/lake/swim_nude_#.jpg' 0 10>>
		<<run $pc.skillExperienceGain('inhibition',rand(1,2))>>
	<<else>>
		<<image 'pc/activities/swim/lake/swim_bikini_#.jpg' 0 8>>
		<<if $pc.pcs_inhib < 50>>
			<<run $pc.skillExperienceGain('inhibition',rand(1,2))>>

		<</if>>
	<</if>>
	You swim and play in the lake, feeling refreshed and invigorated by the water.
	<<if $wardrobe.clothingworntype == 'nude' and $rand(0,1)>>
		<<setn $pc.mood -= 5>>

	<</if>>
	<<if $pc.deodorant_on == 1>>
		<<gs 'sweat' 'remove_deo'>>

	<</if>>
	<<act 'Get out of the water'>>
		<<gt 'pav_lake'>>
	<</act>>
/*
<</if>>
<<if $location_var[$here][0] == 'ski'>>
	<<set $loc = 'pav_lake'>>
	<<set $loc_arg = 'ski'>>
	<<set $location_type = 'public_outdoors'>>
	<<set $menu_loc = 'pav_lake'>>
	<<set $menu_arg = 'ski'>>
	<<set $pc.mood += 15>>
	<<set $menu_off = 0>>
	<<set $time.minutes += 30>>
	<<image "locations/pavlovsk/lake/skiing_2.jpg">>
	<p>As you ski, you take in the breathtaking views of the snow-covered trees, the crisp blue sky above and all the people ice skating out on the lake. The sound of your skis slices through the snow filled air. You feel a sense of freedom and exhilaration as you carve your way around the lake. The cold air fills your lungs and you can't help but smile, feeling alive and free.</p>
	<<act 'Finish skiing'>>
		<<gt 'pav_lake'>>
	<</act>>
<</if>>
<<if $location_var[$here][0] == 'car_sex'>>
	<<run $wardrobe.wear('danilovich_outfit_1')>>
	<<image "locations/shared/sex/car/sexcar1.jpg">>
	He wastes no time and immediately throws you down on the back seat of his car when you agree. He pulls down his pants and, after putting a condom on, quickly guides his cock to your pussy. He obviously doesn''t plan on spending a lot of time with you and sinks it inside you in one firm thrust before he starts fucking you with rapid, short thrusts. He quickly shoots his load in the condom, ties a knot in it and throws it away. He hands you the clothes as promised, kicks you out of the car and drives off.
	It wasn''t the best sex you've had, but at least you have some clothes to wear now. With a sigh of relief, you straighten the clothes and feel ready to take the day on again, hoping your own clothes will turn up at some point.
	<<arouse 'vaginal' 10 `['sub']`>>
	
	<<act 'Continue'>>
		<<gt 'pav_lake'>>
	<</act>>
<</if>>
<<if $location_var[$here][0] == 'nude_home'>>
	<<set $time.minutes += 10>>
	<<set $menu_off = 1>>
	<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
	<<image "locations/pavlovsk/lake/homenude.jpg">>
	You cover yourself up as best as you can and dash into the woods, using them as cover to get as close as you can to your apartment. Luckily, no one spots you, but now you're at the edge of the woods and have the difficult task of actually making it to the building without being seen.
	<<actCLA 'Run for it' undefined `{willpower:['exhib','self']}`>>

			<<set $time.minutes += 7>>
			<<fame 'pav' 'sex' 5>>
			<<run $pc.skillExperienceGain('inhibition',rand(2,4))>>
			<<if $time.month < 3 or $time.month == 12>>
				<<image "locations/pavlovsk/naked/runhomenakedw.jpg">>
			<<else>>
				<<image "locations/pavlovsk/naked/runhomenaked.jpg">>
			<</if>>
			<p>You decide to just get this over with and make a run for it. You use your hands to cover yourself as best as you can and look away from people, but you sometimes have to use your hands to cover your face so no one recognizes you, exposing yourself. Several people gasp and more than a few people, mostly older women, chastise you. Some men whistle and more than a few people take your picture; you really hope none of them show your face. After what seems like an eternity, you finally make it to the apartment complex.</p>
			<<arouse 'flash' 3 `['exhibitionism']`>>
			<<act 'Continue to complex'>>
				<<gt 'pav_aptcourtev' 'naked_aptcomplex'>>
			<</act>>
		<</actCLA>>

	<<actCLA 'Sneak home'>>
		<<set $time.minutes += 20>>
		<<fame 'pav' 'sex' 2>>
		<<run $pc.skillExperienceGain('inhibition',rand(1,3))>>
		<<image "locations/pavlovsk/naked/sneakhomenaked.jpg">>
		You decide it would be better to take your time and sneak home, doing your best to not be seen. You use your hands to cover yourself as best as you can and hide behind trees and parked cars, duck down alleyways and dart across open stretches of ground when nobody is around. Once or twice you think someone might have seen you and hope that you weren''t recognized. After what seems like an eternity, you finally make it to the apartment complex.
		<<arouse 'flash' 10 `['exhibitionism']`>>
		<<act 'Continue to complex'>>
			<<gt 'pav_aptcourtev' 'naked_aptcomplex'>>
		<</act>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'skating_start'>>
	<<set $time.minutes += 3>>
	<<set $menu_off = 1>>
	<<image 'locations/pavlovsk/lake/katok0,#.jpg' 0 3>>
	You slowly make your way over to the ice rink where a lot of people are already skating. Some of them are really good and fly around the lake, while others carefully shuffle around, doing their best to just stay on their feet without falling.
	<<act 'Leave the rink'>>
		<<gt 'pav_lake'>>
	<</act>>
	<<act 'Skate on the rink'>>
		<<gt 'pav_lake' 'skating'>>
	<</act>>
<</if>>
<<if $location_var[$here][0] == 'skating'>>
	<<set $menu_off = 1>>
	<<set $pc.fat -= 1>>
	<<run $pc.sweatAdd(10)>>
	<<run $pc.skillExperienceGain('strength',1)>>
	<<run $pc.skillExperienceGain('agility',1)>>
	<<run $pc.skillExperienceGain('reaction',1)>>
	<<run $pc.skillExperienceGain('iceskating',1)>>
	<<set $time.minutes += 30>>
	<<image 'locations/pavlovsk/lake/katok_do0,#.jpg' 0 7>>
	<<if $pc.skillLevel("iceskating") <= 10>>
		<<set $pc.mood -= 10>>
		You do your best to ride your skates, but you're not very good at it. You fall flat on your ass several times.
		Some of the friendlier skaters are cheering you on and try to give you some tips, while others laugh when you fall on your ass yet again.
	<<elseif $pc.skillLevel("iceskating") <= 30>>
		<<set $pc.mood -= 5>>
		<p>Your persistent attempts to learn how to skate are starting to pay off. You don't fall as often any more, even though it still happens on occasion. Ice skating is a lot more fun when you're not falling on your ass all the time!</p>
		<<if rand(1,3) == 1>>
			<<run $pc.skillExperienceGain('iceskating',1)>>
			While you're trying some new things, you suddenly figure out how to do a certain move properly. It definitely improves your skating skills.
		<</if>>
	<<elseif $pc.skillLevel("iceskating") <= 50>>
		<<set $pc.mood += 5>>
		At long last, you finally manage to skate without falling once. Some of the other regulars who have seen you struggle before notice how much better you're doing, and congratulate you on your progress.
		You become a bit more daring as you continue, almost never falling any more.
		<<if rand(1,3) == 1>>
			<<run $pc.skillExperienceGain('iceskating',2)>>
			You fall, but one of the more experienced skaters notices and helps you up. Once you're up on your skates again, he explains what you did wrong and you feel like you're a better skater for it. You thank him as you skate off, trying to apply the trick he just taught you.
		<</if>>
	<<elseif $pc.skillLevel("iceskating") <= 70>>
		<<set $pc.mood += 10>>
		You're getting better at ice skating and basically never fall anymore. You enjoy the flow of the wind on your face as you dare to go faster and faster.
		<<if rand(1,3) == 1>>
			<<run $pc.skillExperienceGain('iceskating',3)>>
			You watch the more experienced skaters, trying to pick up new tricks. You try to copy some of the things they are doing, and notice that those moves are indeed more efficient than how you were doing it before.
		<</if>>
	<<else>>
		<<set $pc.mood += 15>>
		You've pretty much mastered ice skating now, and won''t get any better without professional training. You occasionally do some tricks while you skate around the rink, and others admire your skills as you fly past them.
	<</if>>
	<<if $time.hour <= 17>>
		<<act 'Leave the rink'>>
			<<gt 'pav_lake'>>
		<</act>>
		<<act 'Skate some more'>>
			<<gt 'pav_lake' 'skating'>>
		<</act>>
	<<else>>
		<<image 'locations/pavlovsk/lake/katok0,#.jpg' 0 3>>
		It's too dark to go ice skating now. The rink is closed.
		<<act 'Leave'>>
			<<gt 'pav_lake'>>
		<</act>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'school_mates'>>
	<<set $time.minutes += 2>>
	<<image "locations/pavlovsk/lake/beach_hangout/school_mates.jpg">>
	<<if $pc.fame('pav_slut') >= 225>>
		<p>You start approaching them, but are immediately greeted with disgusted stares and rude comments before Dimka walks over with Svyatoslav. "Get lost slut! We don't want you here." You sigh before turning and walking away.</p>
		<<act 'Leave'>>
			<<gt 'pav_lake'>>
		<</act>>
	<<elseif $quest('school').func('isGroupMember','cool') or $quest('school').func('isGroupMember','jocks')>>
		You start approaching them and are greeted with friendly smiles as several wave at you to come over and join them.
		<<act 'Leave'>>
			<<gt 'pav_lake'>>
		<</act>>
		<<act 'Join them'>>
			<<gt 'pav_lake' 'beach_hangout'>>
		<</act>>
	<<elseif $quest('school').func('isGroupMember','nerds') or $quest('school').func('isGroupMember','gopniks')>>
		You start approaching them, but the group largely ignore you until you get close and several of them give you annoyed looks, making it clear you're not welcome here, but make no effort to stop you from joining them at least.
		<<act 'Leave'>>
			<<gt 'pav_lake'>>
		<</act>>
		<<act 'Join them'>>
			<<gt 'pav_lake' 'beach_hangout'>>
		<</act>>
	<<else>>
		<p>You start approaching them and are greeted with annoyed stares and rude comments before Dimka walks over with Svyatoslav. "Get lost loser! We don't want you here." You sigh before turning and walking away.</p>
		<<act 'Leave'>>
			<<gt 'pav_lake'>>
		<</act>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'beach_hangout'>>
	<<set $time.minutes += 5>>
	<!-- !!Cool kids approve of high quality bikini or outfit and disapprove of low quality-->
	<<if $wardrobe.PCloQuality >= 4>>
		<<run $quest('school').func('groupRelInc','cool',1)>>
	<<elseif $wardrobe.PCloQuality < 3>>
		<<run $quest('school').func('groupRelInc','cool',-1)>>
	<</if>>
	<!-- !!Cool kids and jocks approve of somewhat revealing clothes or a little skimpy bikini and disapprove of conservative clothes or bikinis and very revealing clothes or very skimpy bikini-->
	<<if $wardrobe.clothes.inhibition >= 35>>
		<<run $quest('school').func('groupRelInc','cool',-1)>>
		<<run $quest('school').func('groupRelInc','jocks',-1)>>
	<<elseif $wardrobe.clothes.inhibition >= 20>>
		<<run $quest('school').func('groupRelInc','cool',1)>>
		<<run $quest('school').func('groupRelInc','jocks',1)>>
	<<elseif $wardrobe.clothes.inhibition <= 10>>
		<<run $quest('school').func('groupRelInc','cool',-1)>>
		<<run $quest('school').func('groupRelInc','jocks',-1)>>
	<</if>>
	<!-- !!Jocks disapprove of a one piece swimsuit-->
	<<if $wardrobe.isWearingSwimwear and $wardrobe.PCloOnePiece == 1>>
		<<run $quest('school').func('groupRelInc','jocks',-1)>>
	<</if>>
	<<image "locations/pavlovsk/lake/beach_hangout/hangout.jpg">>
	<<if $quest('school').func('isGroupMember','cool') or $quest('school').func('isGroupMember','jocks')>>
		You smile at your friends and take a seat with them before joining in on the variety of conversations going on. Some are tanning, others sit around talking, and some horse around. You can use this opportunity to get to know one of them better if you want.
	<<else>>
		You smile and take a seat with them, but get mixed responses. The ones you know better seem somewhat friendly, but the others range from indifference to annoyance. Many choose just to ignore you.
		Some are tanning, others sit around talking, and some horse around. You spend some time trying to get involved in the conversations going on, but meet limited success. You can use this opportunity to get to know one of them better if you want.
	<</if>>
	<<act 'Leave'>>
		<<gt 'pav_lake'>>
	<</act>>
	<<act 'Talk to one of them'>>
		<<gt 'pav_beach_chat' 'beach_hangout'>>
	<</act>>
<</if>>
 */