# pav_lake_nude *clr & cla menu_off = 0 $location_type = 'secluded' gs 'shortgs', 'setloc', 'pav_lake_nude', '' $locclass = 'beach' gs 'stat' if sound = 0: PLAY 'sound/lakeshore2.mp3',20 '

Secluded beach

' if month >= 3 and month <= 5: if hour >= 6 and hour <= 17: '
> src="images/locations/pavlovsk/lake/lake.spring.jpg">
' else '
> src="images/locations/pavlovsk/lake/lake.spring.night.jpg">
' end '
This small natural beach is hidden away from the general public on an inlet of the lake, and is only accessible through a nearby forest trail. Other than those seeking privacy and some of the local kids, nobody really comes here outside of winter, when people come to use the nearby sauna.
' *nl elseif month >= 6 and month <= 8: if hour >= 6 and hour <= 19: '
> src="images/locations/pavlovsk/lake/lake.summer.jpg">
' else '
> src="images/locations/pavlovsk/lake/lake.summer.night.jpg">
' end '
This small natural beach is hidden away from the general public on an inlet of the lake, and is only accessible through a nearby forest trail. Other than those seeking privacy and some of the local kids, nobody really comes here outside of winter, when people come to use the nearby sauna.
' *nl elseif month >= 9 and month <= 11: if hour >= 6 and hour <= 18: '
> src="images/locations/pavlovsk/lake/lake.autumn.jpg">
' else '
> src="images/locations/pavlovsk/lake/lake.autumn.night.jpg">
' end '
This small natural beach is hidden away from the general public on an inlet of the lake, and is only accessible through a nearby forest trail. Other than those seeking privacy and some of the local kids, nobody really comes here outside of winter, when people come to use the nearby sauna.
' *nl elseif month < 3 or month = 12: if hour >= 7 and hour <= 16: '
> src="images/locations/pavlovsk/lake/lake.winter.jpg">
' else '
> src="images/locations/pavlovsk/lake/lake.winter.night.jpg">
' end '
This small natural beach is hidden away from the general public on an inlet of the lake, and is only accessible through a nearby forest trail. Other than those seeking privacy and some of the local kids, nobody really comes here outside of winter, when people come to use the nearby sauna.
' '
The lake in Pavlovsk has been frozen over ever since winter arrived. However, the ice is broken in a small part of the inlet, so those brave enough to take a dip in the icy cold water can.
' *nl end if mid($start_type,1,2) = 'sg' and month >= 3 and month <= 8 and week >= 6 and hour >= 8 and hour <= 10 and ivanfedorseennaked ! daystart and rand(0,3) = 0 and fedorKozlovQW >= 0: if $clothingworntype = 'nude': gs 'arousal', 'flash', -5, 'exhibitionism' gs 'fame', 'pav', 'sex', 3 'You''re walking down the secluded beach, enjoying the sensation of feeling free and the cool breeze on your naked body, when you suddenly hear someone running up behind you. Expecting the worst, you turn around only to see a sweaty Ivan with a huge grin on his face, closely followed by Fedor. As they get a look at your face and realize who you are, they slow down and stop, looking a bit surprised to see... well all of you on display.' act 'Run away': ivanfedorseennaked = daystart & gt 'pav_lake_nude' act 'Greet them': ivanfedorseennaked = daystart & gt 'gschool_socialchg1', 'ivan_fedor_naked' else 'You''re walking down the secluded beach, enjoying the tranquility when you suddenly hear someone running up behind you. Expecting the worst, you turn around only to see a sweaty Ivan, closely followed by Feodor.' end end act'Leave the secluded beach': minut += 10 & gt 'pav_lake' if month >= 5 and month <= 9: if func('changingroom','count_swim_item') > 0: act 'Use changing room':gt 'changingroom', 'view_swim_list' else *nl 'You should buy some swimwear if you intend on spending time at the beach' *nl end if $clothingworntype ! 'nude' and (pcs_inhib > 30 or (exhibitionist_lvl > 1 and pcs_horny >= 60)): gs 'willpower', 'exhib', 'self' if will_cost <= pcs_willpwr: act 'Take off your clothes (<> Willpower)': *clr & cla minut += 5 menu_off = 1 sauna_stripped = 0 if pcs_inhib < 60: inhib_exp += rand(1,3) gs 'willpower', 'exhib', 'self', 'easy' gs 'willpower', 'pay', 'self' if PCloSwimwear = 0: $lastwornclothingtype['swim'] = $clothingworntype lastwornclothingnumber['swim'] = clothingwornnumber $lastwornpantytype['swim'] = $pantyworntype lastwornpantynumber['swim'] = pantywornnumber $lastwornbratype['swim'] = $braworntype lastwornbranumber['swim'] = brawornnumber end gs 'clothing', 'strip_all' gs 'stat' if pcs_horny >= 80 and exhibitionist_lvl > 1 and (PCloPanties = 1 or $pantyworntype ! 'none'): '
> src="images/locations/pavlovsk/lake/secluded_beach/self/wetpussypants3.jpg">
' 'You strip off. A few passers-by do a double-take and pause to look at your sopping wet panties, probably thinking about what is making you so excited. You don''t care about what they might say or think of you.' elseif pcs_inhib >= 60: '
> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg">
' 'Not caring if anyone is looking at you, you slowly take off your clothes, peeling off each item like a stripper. You''re soon naked.' elseif pcs_inhib < 60: '
> src="images/locations/pavlovsk/lake/secluded_beach/dress/undressnudebeach.jpg">
' 'You quickly check to see if anyone is watching, and when you''re satisfied no one is paying you undue attention, you take your clothes off.' end act 'Continue': gt 'pav_lake_nude' end else act 'Take off your clothes (<> Willpower)': '
You don''t have enough willpower to use this action.' end elseif $clothingworntype = 'nude' and sauna_stripped = 0: act 'Put your clothes back on': *clr & cla menu_off = 1 minut += 5 gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim'] gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim'] gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim'] nudelake = rand(1,10) if nudelake <= 2 and func('homes_properties', 'has_access', 'parents_home'): minut += 5 pcs_mood -= 5 gs 'stat' '
> src="images/locations/pavlovsk/lake/event/noclothes.jpg">
' 'You return to the place where you 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. Despite your efforts, you can''t find them. You panic and, without thinking, start running home naked.' act 'Run home naked': gt 'pav_lake', 'nude_home' else 'You return to the place where you left your clothes and put them back on.' act 'Continue': gt 'pav_lake_nude' end end end end act 'Go to the sauna': gt 'pav_lake_nude', 'sauna' if temper >= 15 and month >= 5 and month <= 9 and hour >= 6 and hour <= 20: act 'Take a walk along the beach': *clr & cla menu_off = 1 minut += 30 pcs_mood += 5 gs 'stat' if (PCloswimwear = 1) and pcs_hips<=90: '
> src="images/locations/pavlovsk/lake/lake.walk.bikini0,'+rand(0,3)+'.jpg">
' elseif (PCloswimwear = 1) and pcs_hips >= 90 and pcs_hips<=110: '
> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,0.jpg">
' elseif (PCloswimwear = 1) and pcs_hips>=110: '
> src="images/locations/pavlovsk/lake/lake.walk.bikini.fat0,1.jpg">
' if pcs_inhib < 50:inhib_exp += rand(1,2) elseif $clothingworntype = 'nude': '
> src="images/locations/pavlovsk/lake/walknude.jpg">
' inhib_exp += rand(1,3) else '
> src="images/locations/pavlovsk/lake/lake.walk0,'+rand(0,2)+'.jpg">
' end 'You walk along the beach, enjoying the feeling of the sun on your body.' act 'Continue':gt'pav_lake_nude' end if PCloswimwear = 1 or $clothingworntype = 'nude': if pcs_stam >= (20 * (10 - sport_clothes_exercise_bonus)) / 2: act 'Go swimming': menu_off = 1 cumspclnt = 4 gs 'cum_cleanup' minut += 30 pcs_mood += 5 ! Seems appropriate. Potentially worth revisiting if willday_swim ! daystart: willday_swim = daystart & pcs_willpwr += 1 if PCloswimwear = 1: if pcs_inhib < 50:inhib_exp += 1 elseif $clothingworntype = 'nude': inhib_exp += rand(1,3) end if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4) if pcs_stren < 30: gs 'exp_gain', 'stren', 1 if pcs_vital < 30: gs 'exp_gain', 'vital', 1 fat -= 1 pcs_makeup = 1 *clr & cla gs 'stat' if $clothingworntype = 'nude': '
> src="images/pc/activities/swim/lake/swim_nude_<>.jpg">
' if pcs_inhib < 60:inhib_exp += rand(0,1) 'You play around and have fun in the lake, enjoying the feeling of the warm water on your naked body. The water refreshes and invigorates you.' else '
> src="images/pc/activities/swim/lake/swim_bikini_<>.jpg">
' if pcs_inhib < 40:inhib_exp += rand(0,1) 'You play around and have fun in the lake, its a bit liberating to see so many people here naked. The water refreshes and invigorates you.' end if deodorant_on = 1: gs 'sweat', 'remove_deo' & '
Your deodorant gets washed away in the water.' act 'Get out of the water': gt 'pav_lake_nude' end end end if sunWeather = 1 and (PCloswimwear = 1 or $clothingworntype = 'nude'): act 'Go sunbathing': menu_off = 1 if PCloswimwear = 1 or $clothingworntype = 'nude': *clr & cla minut += 30 if pcs_sweat < 35 : gs 'sweat', 'add', 5 pcs_mood += 5 if PCloswimwear = 1: '
> src="images/locations/shared/lake/tanning_swimsuit.jpg">
' if pcs_inhib < 50:inhib_exp += 1 if mc_inventory['suncream'] = 0: pcs_tan += 1 'You lie down on your towel and enjoy the warm rays of the sun on your body. You move your straps around to try and prevent tan lines on your back.' else mc_inventory['suncream'] -= 1 pcs_tan += 3 '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. You move your straps around to try and prevent tan lines on your back.' end else '
> src="images/locations/shared/lake/tanning_nude.jpg">
' inhib_exp += rand(1,3) if mc_inventory['suncream'] = 0: pcs_tan += 1 'You lie down on your towel and enjoy the warm rays of the sun on your naked body.' else mc_inventory['suncream'] -= 1 pcs_tan += 3 '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 naked body.' end end gs 'stat' act 'Continue': gt 'pav_lake_nude' else cla 'You have to take your clothes off first before you can sunbathe.' act 'Continue': gt 'pav_lake_nude' end end end if voyeurism_start = 0: act 'Look around the beach': *clr & cla menu_off = 1 voyeurism_start_view = rand(1,3) gs 'stat' if voyeurism_start_view <= 2: minut += 5 '
> src="images/locations/shared/lake/lake_beach1.jpg">
' 'You look around, but see nothing interesting.' else voyeurism_start = 1 voyeurism += 1 gs 'arousal', 'voyeur_sex', 5 '
> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event.jpg">
' 'You look around and notice a pair of lovers lying on the sand at the other end of the beach. The girl is completely naked and her hand is stroking the guy''s cock through his white pants. The guy turns his head and notices you looking at them. You immediately turn away, blushing as you stare at your feet.' end act'Return': gt 'pav_lake_nude' end elseif voyeurism_start = 1: gs 'willpower', 'voyeur', 'self' if will_cost <= pcs_willpwr: act 'Watch couple on the beach (<> Willpower)': *clr & cla gs 'willpower', 'voyeur', 'self' gs 'willpower', 'pay', 'self' menu_off = 1 gs 'stat' if voyeurism = 0: gs 'arousal', 'voyeur_sex', 5 voyeurism += 1 gs 'stat' '
> src="images/locations/pavlovsk/lake/secluded_beach/self/lake_legs.jpg">
' 'You see several naked people in the corner of your eye and think that they''re looking right at you. You blush and freeze in terror as tears well up in your eyes. After a few minutes, you find yourself looking at your feet.
"Wha-... what am I doing?! Why do I feel like watching... am I a voyeur? Yes, I am! I''m a girl who likes to watch nude people!" you think to yourself.
' act'Stop watching': gt'pav_lake_nude' else voyeurism_start = 2 gs 'arousal', 'voyeur_sex', 30 voyeurism += 1 gs 'stat' '
> src="images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event.jpg">
' 'You see several naked people in the corner of your eye and think that they''re looking right at you. You blush and freeze in terror as tears well up in your eyes. After a few minutes, you find yourself looking at your feet.
"Wha-... what am I doing?! Why do I feel like watching... am I a voyeur? Yes, I am! I''m a girl who likes to watch nude people!" you think to yourself.
You then remember how you were recently watching others on the beach and think: "That was scary, cool and hot. I need to keep at least one eye always watching..."' act'Watch the couple': gs 'pav_lake_nude_events', 'pav_lake_nude_sex' end end else act 'Watch couple on the beach (<> Willpower)': '
You don''t have enough willpower to use this action.' end elseif voyeurism_start = 2 and (pcs_horny < 90 or fame['pav_slut'] < 100): gs 'willpower', 'voyeur', 'self', 'easy' if will_cost <= pcs_willpwr: act 'Spy on other nudists on the beach (<> Willpower)': gs 'willpower', 'voyeur', 'self', 'easy' gs 'willpower', 'pay', 'self' menu_off = 1 gs 'stat' if voyeurism_nudist <= 14 or fame['pav_slut'] >= 100: voyeurism_nudist += 1 gs 'pav_lake_nude_events','pav_lake_nude_nudist' act 'Continue': gt 'pav_lake_nude' else *clr & cla '
> src="images/locations/pavlovsk/lake/secluded_beach/self/nudebeachself'+rand(1,3)+'.jpg">
' 'You want to watch for nudists, but suddenly start to feel weird.
"Probably spying too much." you think to yourself and look straight ahead.' act 'Continue': gt'pav_lake_nude' end end else act 'Spy on other nudists on the beach (<> Willpower)': '
You don''t have enough willpower to use this action.' end end if voyeurism >= 17 and voyeurism_start = 2: if voyeurism_forest = 0: act 'Explore the forest': gt 'pav_lake_nude_forest' else act 'Hide in the woods near the beach': gt 'pav_lake_nude_forest' end end end if $ARGS[0] = 'sauna': *clr & cla $menu_loc = 'pav_lake_nude' $menu_arg = 'sauna' $loc_arg = 'sauna' menu_off = 0 minut += 3 gs 'stat' '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/sauna.jpg">
' 'You walk up the small trail from the beach to the sauna. They say it was built for the tourists, but you wonder why they put it on a secluded beach where tourists can''t possibly find it. Either way, you and many others are glad they built it. It''s well built inside and out with three sections - the mens section, the womens section and a co-ed section. You need swimwear to use the sauna, but some people use it naked.' if $clothingworntype ! 'nude' or sauna_stripped = 0: act 'Go back to the beach': gt 'pav_lake_nude' else gs 'willpower', 'exhib', 'self' if will_cost <= pcs_willpwr: act 'Go to the beach (<> Willpower)': gs 'willpower', 'pay', 'self' gt 'pav_lake_nude' end else act 'Go to the beach (<> Willpower)': '
You don''t have enough willpower to use this action.' end end if func('changingroom','count_swim_item') > 0: act 'Use changing room':gt 'changingroom', 'view_swim_list' else *nl 'You should buy some swimwear if you intend on spending time at the beach.' end if $clothingworntype ! 'nude' and (pcs_inhib > 25 or (exhibitionist_lvl > 1 and pcs_horny >= 60)): act 'Take your clothes off': *clr & cla menu_off = 1 minut += 5 sauna_stripped = 1 if PCloSwimwear = 0: $lastwornclothingtype['swim'] = $clothingworntype lastwornclothingnumber['swim'] = clothingwornnumber $lastwornpantytype['swim'] = $pantyworntype lastwornpantynumber['swim'] = pantywornnumber $lastwornbratype['swim'] = $braworntype lastwornbranumber['swim'] = brawornnumber end gs 'clothing', 'strip_all' gs 'stat' 'You strip out of your clothes, folding them neatly and placing them in one of the open shelves.' act 'Continue': gt 'pav_lake_nude', 'sauna' end elseif sauna_stripped = 1: act 'Put your clothes back on': cla menu_off = 1 minut += 5 gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim'] gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim'] gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim'] gs 'stat' 'You put your clothes back on.' act 'Continue': gt 'pav_lake_nude', 'sauna' end end if $clothingworntype = 'nude' or PCloswimwear = 1: act 'Go to the womens section': *clr & cla menu_off = 1 minut += 2 gs 'stat' if hour < 8 or hour > 22: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg">
' 'It appears to be empty at the moment.' else saunarand = rand(1,5) if saunarand = 4: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/womennude.jpg">
' 'You find several other girls inside who are completely naked.' elseif saunarand > 4: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/womenbikini.jpg">
' 'You find several other girls inside using the sauna while wearing their bikinis.' else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg">
' 'It appears to be empty at the moment.' end end act 'Leave': gt 'pav_lake_nude', 'sauna' act 'Use the sauna': *clr & cla minut +=30 pcs_mood += 10 if sauna_daystart ! daystart: sauna_daystart = daystart pcs_skin += rand(2,4) pcs_willpwr += 3 end if PCloswimwear = 1: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg">
' if pcs_inhib < 40: inhib_exp += rand(0,1) else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunanude.jpg">
' if pcs_inhib < 60: inhib_exp += rand(1,2) end gs 'stat' 'You spend 30 minutes relaxing in the sauna.' act 'Leave': gt 'pav_lake_nude', 'sauna' if month = 12 or month < 3: gs 'pav_lake_nude', 'ice_plunge' end end act 'Go to the mens section': *clr & cla menu_off = 1 minut += 2 gs 'stat' '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg">
' 'It appears to be empty at the moment.' act 'Leave': gt 'pav_lake_nude', 'sauna' gs 'willpower', 'exhib', 'self', 'hard' if saunarand < 4 or PCloswimwear = 1: will_cost = 3 if will_cost <= pcs_willpwr: act 'Use the sauna (<> Willpower)': *clr & cla minut += 30 pcs_mood += 10 if sauna_daystart ! daystart: sauna_daystart = daystart pcs_skin += rand(2,4) pcs_willpwr += 3 end if PCloswimwear = 1: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg">
' if pcs_inhib < 40: inhib_exp += rand(0,1) else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunanude.jpg">
' if pcs_inhib < 60: inhib_exp += rand(1,2) end 'You spend 30 minutes relaxing in the sauna.' act 'Leave': gt 'pav_lake_nude', 'sauna' if month = 12 or month < 3: gs 'pav_lake_nude', 'ice_plunge' end else act 'Use the sauna (<> Willpower)': '
You don''t have enough willpower to use this action.' end end act 'Go to the co-ed section': *clr & cla menu_off = 1 minut += 2 gs 'stat' if hour < 8 or hour > 22: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg">
' 'It appears to be empty at the moment.' else saunarand = rand(1,5) if saunarand = 4: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/coednude.jpg">
' 'You find several other people in here, both men and women. All of them are completely naked.' elseif saunarand > 4: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/coedtowel.jpg">
' 'You find several other people in here, both men and women. Some are wearing their swimwear while others are wearing towels.' else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunaempty.jpg">
' 'It appears to be empty at the moment.' end end gs 'willpower', 'exhib', 'self', 'easy' if saunarand < 4 or PCloswimwear = 1: will_cost = 0 if will_cost <= pcs_willpwr: act iif(saunarand < 4 or PCloswimwear = 1, 'Use the sauna', 'Use the sauna (<> Willpower)'): *clr & cla gs 'willpower', 'pay', 'self' minut += 30 pcs_mood += 10 if sauna_daystart ! daystart: sauna_daystart = daystart pcs_skin += rand(2,4) pcs_willpwr += 3 end if PCloswimwear = 1: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunabikini.jpg">
' if pcs_inhib < 40: inhib_exp += rand(0,1) else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/saunanude.jpg">
' if pcs_inhib < 60: inhib_exp += rand(1,3) end gs 'stat' 'You spend 30 minutes relaxing in the sauna.' act 'Leave': gt 'pav_lake_nude', 'sauna' if month = 12 or month < 3: gs 'pav_lake_nude', 'ice_plunge' end else act 'Use the sauna (<> Willpower)': '
You don''t have enough willpower to use this action.' end act 'Leave': gt 'pav_lake_nude', 'sauna' end else *nl 'You need to undress or wear a swimsuit to enter the sauna.' end end if $ARGS[0] = 'ice_plunge': act 'Take an ice plunge': *clr & cla minut += 10 pcs_mood += 10 if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4) if PCloswimwear = 1: '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/icedipbikini.jpg">
' if pcs_inhib < 50:inhib_exp += rand(0,1) else '
> src="images/locations/pavlovsk/lake/secluded_beach/sauna/icedipnude.jpg">
' inhib_exp += rand(1,2) end gs 'stat' 'You exit the sauna and the cold air nips at your body as you rush down to the edge of the lake where the ice is broken and a ladder has been put in place. You take the plunge into the ice cold water. The sudden change from the hot sauna to the freezing waters of the lake is refreshing, if a little sudden. After a few minutes, you climb out of the water.' if deodorant_on = 1: gs 'sweat', 'remove_deo' & '
Your deodorant gets washed away in the water.' act 'Go back to the sauna': gt 'pav_lake_nude', 'sauna' end end --- pav_lake_nude ---------------------------------