# parkM
if $ARGS[0] = 'start':
	set minut += 30
	'You leisurely stroll through the park.'

	if dayA > 15 and harakBoyA = 2:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 1:gs 'boylove', 'tits'
	if dayA > 25 and harakBoyA = 0:gs 'boylove', 'tits'
	if dayA > 20 and harakBoyA = 2:gs 'boylove', 'figure'
	if dayA > 25 and harakBoyA = 1:gs 'boylove', 'figure'
	if dayA > 30 and harakBoyA = 0:gs 'boylove', 'figure'

	gs 'anekdot'
	'<<$boyA>> anecdote tells you "<<$anek>>."'

	act 'Laugh.':
		cla
		set SUB += 1
		set bfa += 1
		xgt 'parkM', 'a'
	end

	act 'Smile.':
		cla
		xgt 'parkM', 'a'
	end

	act 'Not funny.':
		cla
		set DOM += 1
		set bfa -= 1
		xgt 'parkM', 'a'
	end
end

if $ARGS[0] = 'a':
	if harakBoyA = 0:
		gs 'stihi'
		'<<$boyA>> reads poetry for you <<$stihi>>.'

		act 'Next.':gt 'parkM', 'aa'
	end

	if harakBoyA = 1:
		'<<$boyA>> to take you by the hand and you are walking through the deserted dimensional paths of the park.'

		act 'Next.':gt 'parkM', 'aa'
	end

	if harakBoyA = 2:
		'<<$boyA>> and stopped taking your waist hugged. "You´re a cool girl." he said and kissed you on the lips.'

		act 'Kissing.':gt 'parkM', 'kiss'

		act 'Suspended.':
			cla
			set DOM += 1
			set bfa -= 1
			'You removed the face from a kiss <<$boyA>> does not look happy, "Okay, Svetsik, went on a walk as the pioneers."'

			act 'Next.':gt 'parkM', 'aa'
		end
	end
end

if $ARGS[0] = 'kiss':
	set minut += 15
	set bfa += 1
	set horny += 5
	'<<$boyA>> kisses you and you feel his hand grabs your ass and begins to knead her. It excite you a little touch <<$boyA>> takes you by the hand and dragged into the bushes.'

	act 'Stop it.':
		cla
		set DOM += 1
		set bfa -= 1
		'You pulled his hand out of his hand <<$boyA>> does not look happy, "Okay, Svetsik, went on a walk as the pioneers."'

		act 'Next.':gt 'parkM', 'aa'
	end

	act 'Go with the guy.':gt 'parkM', 'sexrand'
end

if $ARGS[0] = 'sexrand':
	clr
	*clr
	set minut += 15
	set bfa += 1
	set horny += 15
	clr
	gs 'stat'
	'<center><img src="images/picVA/park.jpg"></center>'
	'<<$boyA>> pulled you into the bush and exposing your breasts began to lick her. It is very nice and you eyes closed immersed in what is bliss. <<$boyA>> stands in front of you on the knee and extends to your pussy.'

	act 'Stop it.':
		cla
		set DOM += 1
		set bfa -= 1
		'You sidestepped and covered his chest, <<$boyA>> does not look happy, "Okay, Svetsik, went on a walk as the pioneers."'

		act 'Next.':gt 'parkM', 'aa'
	end

	act 'Afford.':gt 'parkM', 'sexrand1'
end

if $ARGS[0] = 'sexrand1':
	clr
	*clr
	set minut += 15
	set bfa += 1
	set horny += 20
	clr
	gs 'stat'
	'<center><img src="images/picVA/park1.jpg"></center>'
	'<<$boyA>> bared your pussy and began to caress her hand, then gently, then increasing the tempo, you are very much excited, your pussy is wet and aching demanding stuff yourself. <<$boyA>> whispers to you, "Suck me!"'

	act 'We can not do that here.':
		cla
		set DOM += 1
		set bfa -= 1
		'You backed away from the guy and began to dress, <<$boyA>> does not look happy, "Okay, Svetsik, went on a walk as the pioneers."'

		act 'Next.':gt 'parkM', 'aa'
	end

	act 'Get on your knees.':gt 'parkM', 'sexrand2'
end

if $ARGS[0] = 'sexrand2':
	clr
	*clr
	set minut += 15
	set bfa += 1
	set horny += 5
	set bj += 1
	bja += 1
	gs 'brosok'
	clr
	gs 'stat'
	'<center><img src="images/picVA/park2.jpg"></center>'
	'You knelt in front of a guy and <<$boyA>> you buried his face in his sticking <<dickA>> centimeter member. You cupped his mouth and began to suck.'
	'After a couple of minutes <<$boyA>> told you, "Baby, if you so will continue, I finish. Let´s have sex!"'

	act 'Continue to suck.':gt 'parkM', 'sexrand3'
	act 'Sex.':gt 'parkM', 'sexrand4'
end

if $ARGS[0] = 'sexrand3':
	clr
	*clr
	set minut += 15
	set bfa += 1
	set horny += 5
	set cumlip += 1
	set swallow += 1
	clr
	gs 'stat'
	'<center><img src="images/picVA/park3.jpg"></center>'
	'You continued enthusiastically sucking dick and <<$boyA>> issuing zdavlenny moan pulled into your mouth and a vigorous stream of burning semen.'
	'You swallow choking her, but she did not want to umeschatsya in your mouths and poured out of him spreading his chin.'
	'<<$boyA>> took out a member of your mouth stuffed with Concha and tucked it into his pants, helped you climb then said goodbye and left promising to call you.'

	act 'Leave.':gt 'park', 'start'
end

if $ARGS[0] = 'sexrand4':
	clr
	*clr
	set minut += 15
	set sex += 1
	sexa += 1
	clr
	gs 'stat'
	'<center><img src="images/picVA/park4.jpg"></center>'
	set pose = 1
	set $nameV = $boyA
	set dick = dickA
	set silavag = silavagA
	'<<$boyA>> poctavil you on your feet and put his hands on you bowed to the ground.'
	gs 'orgazm', 'start'

	act 'Leave.':gt 'park', 'start'
end

if $ARGS[0] = 'aa':
	set minut += 30
	'Walked an hour <<$boyA>> proposed to hold you.'

	act 'Home.':gt 'sexm', 'start'
end

--- parkM ---------------------------------