# placer_pav_park

if hour >= 22 or hour < 8:
	encounter = rand(5, 25)
else
	if placerParameter['friend_index'] = 14 and katjaQW['park_sex'] < 2:
		encounter = rand(0, 8)
	else
		encounter = rand(0, 11)
	end
end

met_someone = 0

if encounter = 0:
	!!no one in the park
	$textEvent = 'The park is quiet and deserted. There is no one in sight.'
elseif encounter = 1:
	!!people in the park mother walking with a baby
	$textEvent = 'You see a young mother with a stroller walking along a path.'
elseif encounter = 2:
	!!people in the park old_man
	if bimbolevel < 1 or placerParameter['friend_index'] > 0:
		$textEvent = 'A lonely old man with a newspaper in his hand strolls down a path.'
	else
		$textEvent='A lonely old man with a newspaper in his hand is strolling down a path. He looks at you greedily when he sees your appearance and walks over to you. When he reaches you, he extends his hand and says: "Hi there, young lady! If you have a minute, come with me! I have something for you!"'
		act 'Go see what he has':gs 'npcgeneratec', 0, 'Old Man from the park', rand(50,70) & gs 'boyStat', $npclastgenerated & gt 'parkBimbo','pos1'
	end
elseif encounter = 3:
	!!people in the park woman with shopping bags
	$textEvent = 'You see a woman hauling several shopping bags though the park, they look quite heavy. It''s probably the quickest way home for her.'
elseif encounter = 4:
	!!people in the park two young girls
	$textEvent = 'You see two young girls taking a stroll in the park.'
elseif encounter = 5:
	!!people in the park number of guys

	if placerParameter['friend_index'] = 14 and katjaQW['park_sex'] = 0:
		!!If Katja never have had sex with a random guy at the park you only meet 1 guy.
		placerParameter['number_of_man'] = 1
	elseif placerParameter['friend_index'] = 14 and katjaQW['park_sex'] = 1:
		!!If Katja have had sex with 1 random guy at the park you have a 50% chance of meeting 1 guy and 25% of meeting 2 and 25% of meeting 3.
		placerParameter['number_of_man'] = max(1,rand(0,3))
	elseif rand(0,1) = 0:
		!!50% chance of meeting 1 guy.
		placerParameter['number_of_man'] = 1
	elseif rand(0,1) = 0:
		!!25% chance of meeting 2 guys.
		placerParameter['number_of_man'] = 2
	elseif rand(0,1) = 0:
		!!12.5% chance of meeting 3 guys.
		placerParameter['number_of_man'] = 3
	elseif rand(0,2) > 0:
		!!8.35% chance of meeting 4 guys.
		placerParameter['number_of_man'] = 4
	else
		!!4.15% chance of meeting 5 guys.
		placerParameter['number_of_man'] = 5
	end

	if placerParameter['number_of_man'] = 1:$textSub = 'a guy'
	if placerParameter['number_of_man'] = 2:$textSub = 'two guys'
	if placerParameter['number_of_man'] = 3:$textSub = 'three guys'
	if placerParameter['number_of_man'] = 4:$textSub = 'four guys'
	if placerParameter['number_of_man'] = 5:$textSub = 'five guys'

	$textEvent = 'You see <<$textSub>> walking through the park, holding a case of beer.'
	placerParameter['recognize_status'] = 1
	met_someone = 1
elseif encounter = 6:
	!!dog in the park
	$textEvent = 'This part of the park is quiet and deserted. The only sign of life is a stray dog, sniffing around near a garbage bin.'
elseif encounter = 7:
	!!couple in love in the park
	$textEvent = 'You see a man and woman walking in the park, holding each other''s hands tightly. They''re clearly in love.'
elseif encounter = 8 and hour < 22 and hour >= 8 and hotelcouple = 1:
	$location_type = 'public_indoors'
	*clr
	gs 'stat'
	' after walking around the park for 10 minutes you decide to relax in the grass.' 
	'Suddenly you are approached by a couple. They come sit next to you.'
	'You think you recognise the man but you can''t quite put your finger on it.'
	'Then the man starts speaking : " hi girl, I don''t know if you remember but we have met once in the hotel "'
	'Now you remember where you know the man from, you watched his children so he and his wife could have some ''alone time''.'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/couple_park_meet.jpg"></center>'
	'" You really helped us out that time.  Usually we are able to drop the children off with my parents but they were out that day."'
	'" My name is Motya and this is my wife Uliana."'
	'" So we stay in the Pavlovsk hotel every Thursday. If you want to visit us on a Thursday evening, feel free to drop by in room 207 so we can give you a proper thanks for your help."'
	'Then they get up and leave you'
	'You wonder what kind of ''thanks'' they have in mind'
	hotelcouple = 2
	jump 'parkaway'
elseif encounter = 9:
	!!young people in the park company
	$textEvent = 'You see a group of teenagers sitting on a park bench, listening to some music.'
	placerParameter['number_of_man'] = rand(2, 6)
	placerParameter['recognize_status'] = 1
	met_someone = 1
elseif encounter = 10:
	!!Gopnik in the park
	placerParameter['number_of_man'] = rand(3, 6)
	$textEvent = 'Some Gopniks are sitting on their haunches just off to the side of one of the main paths, drinking beer. The area around them is littered with empty bottles.'
	placerParameter['recognize_status'] = 2
	met_someone = 1
else
	$textEvent = 'You see 2 women walking in the park, holding each other''s hands tightly. They''re clearly in love.'
else
	$textEvent = 'The park is quiet and deserted. There is no one in sight.'
end

if met_someone = 1:
	gs 'placer_man'
	met_someone = 0
end

!!Copied from gskver - Start.

if month=3 or month=4 or month=5:
	if hour>=6 and hour<=17:
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.spring.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. Spring has come, melting the worst of the snow. The trees are sprouting new leaves.'
		'There are puddles on the ground everywhere, all remains from the melted snow. A lot of people in the park are having fun with them, trying to jump over them and mocking those that fail. They''re not particularly deep though, and plenty of others just walk through without giving them a second thought.'
		'The park is not particularly crowded, this time of year. Many people think it''s still too cold to spend much time outdoors.'
		*nl
	else
		gs 'exp_gain', 'prcptn', rand(1,2)
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.spring.night.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. Spring has come, melting the worst of the snow. The trees are sprouting new leaves.'
		'There is no particular reason to visit the park during the night, and as a result it''s largely deserted. In the distance you see one person running through the park, probably using it as a shortcut to go home faster.'
		*nl
	end
end
if month=6 or month=7 or month=8:
	if hour>=6 and hour<=19:
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/skver.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. At this time of year, it''s one of the primary places in town that locals and tourists enjoy spending their spare time in.'
		'It''s always busy: people are resting, walking, playing and dating to their heart''s desires, enjoying the nice surroundings.'
		*nl
	else
		gs 'exp_gain', 'prcptn', rand(1,2)
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.summer.night.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. At this time of year, it''s one of the places where locals and tourists enjoy going in their spare time.'
		'However, there is no particular reason to visit the park during the night, and as a result it''s largely deserted. In the distance you see one person running through the park, probably using it as a shortcut to go home faster.'
		*nl
	end
end
if month=9 or month=10 or month=11:
	if hour>=6 and hour<=18:
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.autumn.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. Autumn has come, and some of the trees are already shedding their leaves. The leaves that are still on the trees have changed colour, and are a beautiful mix of red and brown.'
		'Everywhere in the park, people are enjoying nature. Some are taking photos of the fallen leaves, kids are playing everywhere, and couples are walking hand-in-hand, simply enjoying each other''s company.'
		*nl
	else
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.autumn.night.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. Autumn has come, and some of the trees are already shedding their leaves.'
		'It gets quite cold at night, and you try to stay active to keep yourself warm. The lone soul you see running across the park is probably trying to get home faster, to warm up with some nice cocoa.'
		*nl
	end
end
if month=1 or month=2 or month=12:
	if hour>=7 and hour<=16:
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.winter.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. It''s winter, and the park is quite busy with locals and tourists alike.'
		'There''s snow everywhere, and kids from the whole town have gathered here to make snowmen and enjoy snowball fights. Some of the adults are joining them, happy to play like kids again for just a moment.'
		*nl
	else
		'<center><h2>Pavlovsk Park</h2></center>'
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/lake/skver.winter.night.jpg"></center>'
		*nl
		'The main square of Pavlovsk Park. It''s winter, and the nights in Pavlovsk are very cold.'
		'As you expected, the park is mostly deserted at this time of day. You occasionally see a wild animal, scrounging for food.'
		*nl
	end
end
!!Copied from gskver - End.


if soniaQW['slut']=5 and rand(1,10)=>9 and hour>14 and hour<20:
	''
	'<b>While you walk past a row of bushes, you hear some strange sounds coming from behind them.</B>'
	''
	act'Investigate':
		cla
		*clr
		gs'stat'
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/sonia.skver.boy0,0.jpg"></center>'
		'You carefully walk towards the bushes and push some branches aside to see what''s going on. There you see your classmate Sonia, on her haunches in front of a muscular man. She''s giving the stranger a blowjob, not even 20 meters away from where people walk!'
		act'Keep looking':
			cla
			*clr
			gs'stat'
			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/sonia/sex/sonia.skver.boy1,'+rand(0,2)+'.jpg"></center>'
			'After a while, the guy tells Sonia that he wants more. Sonia obediently gets up and asks him: "Would you like to fuck me from behind, sir?"'
			'The stranger happily accepts the invitation, and watches in amazement when he notices Sonia eagerly grinding her hips back against him once he''s inside her. He had no idea she would be such a lusty slut for him, willing to do all the work!'
			'You watch Sonia give herself to the man for just a moment longer, before you decide you really have to get going. You''re quite turned on from her little show. Sonia looks like she''s having a lot of fun, and for just a second you think about what it would feel like to be in her place.'
			
			gs 'arousal', 'voyeur_sex', 15
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave them be': gt 'pav_park', 'start'
		end
	end
end

$textSomeone = $placerStringParameter['text_someone']
$textRefuse = $placerStringParameter['text_friend_refuse']

if placerParameter['friend_index'] > 0:
	'You arrive at one of the smaller plazas in the park, together with <<$placerStringParameter[''ev_name_om'']>>. <<$textEvent>>'
	if placerParameter['want_to_meet'] = 0:
		!!your friend is a guy
		if placerParameter['number_of_man'] = 1 and $placerStringParameter['text_start_meet'] = '':$placerStringParameter['text_friend_refuse'] = 'The guy looks at you, and for a second you think he''s going to say something. However, when he gets closer, he wrinkles his nose and turns away.'
		if placerParameter['number_of_man'] > 1 and $placerStringParameter['text_start_meet'] = '':$placerStringParameter['text_friend_refuse'] = 'The guys look at you for a moment, but you see one of them shake his head. The guys then turn their backs to you, and pretend you''re not there.'
		if placerParameter['number_of_man'] > 0:'You give the <<$textSomeone>> a cute smile as you walk past. You don''t think you''ve ever seen him before. <<$textRefuse>>.'+$placerStringParameter['text_start_meet']
	elseif placerParameter['want_to_meet'] = 1 and placerParameter['number_of_man'] > 0:
		!!your friend is a girl
		'You give the <<$textSomeone>> a cute smile as you walk past with your friend.'

		if placerParameter['number_of_man'] = 1:'You don''t think you''ve ever seen him before. He approaches you and says: "<<$placerStringParameter[''text_start_meet'']>>"'
		if placerParameter['number_of_man'] > 1:'You don''t think you''ve ever seen them before. The guys walk towards you, and one of them says: "<<$placerStringParameter[''text_start_meet'']>>"'

		act 'Agree to hang out':
			cls

			if placerParameter['friend_dom'] < 80:
				gt 'placer_act'
			elseif placerParameter['friend_dom'] >= 80:
				gs 'stat'
				'<<$ev_name>> hisses in your ear: "I don''t want to hang out with strangers, <<$pcs_nickname>>! They could be dangerous! If you want to stay here, I''m leaving."'

				gs 'willpower', 'misc', 'self', 'hard'
				if will_cost <= pcs_willpwr:
					act 'Leave with your friend (<<will_cost>> Willpower)':
						gs 'willpower', 'pay', 'self'
						gs 'stat'
						gt 'placer_end'
					end
				else
					act 'Leave with your friend (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
				end	
				
				act 'Say goodbye to your friend and stay':
					placerParameter['friend_index'] = 0
					gt 'placer_act'
				end
			end
		end
	end

	act 'Continue on your walk':gt 'placer_end'
elseif placerParameter['friend_index'] = 0:
	'You stroll through the park by yourself, enjoying its beauty. <<$textEvent>>'

	if placerParameter['want_to_meet'] = 1:
		'You give the <<$textSomeone>> a cute smile as you walk past. '

		if placerParameter['number_of_man'] = 1:'You don''t think you''ve ever seen him before. He approaches you and says: "<<$placerStringParameter[''text_start_meet'']>>"'
		if placerParameter['number_of_man'] > 1:'You don''t think you''ve ever seen them before. The guys walk towards you, and one of them says: "<<$placerStringParameter[''text_start_meet'']>>"'

		act 'Meet':gt 'placer_act'
	elseif placerParameter['want_to_meet'] = 0 and placerParameter['number_of_man'] > 0:
		if placerParameter['number_of_man'] = 1:$placerStringParameter['text_friend_refuse'] = 'The guy looks at you, and for a second you think he''s going to say something. However, when he gets closer, he wrinkles his nose and turns away.'
		if placerParameter['number_of_man'] > 1:$placerStringParameter['text_friend_refuse'] = 'The guys look at you for a moment, but you see one of them shake his head. The guys then turn their backs to you, and pretend you''re not there.'

		'You give the <<$textSomeone>> a cute smile as you walk past.' & '<<$textRefuse>>'
	end
	:parkaway
	act 'Finish your walk':gt 'pav_park', 'start'
end

gs 'stat'

--- placer_pav_park ---------------------------------