Kila_glife/locations/parksvid.qsrc

# parksvid

minut += 60
pcs_mood += 10
gs 'stat'
'<center><b>Park</b></center>'
'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park//0.jpg"></center>'
'You go to the park with <<$telsob>>.'

act 'Go for a walk':
	if $telsob = 'Alla':
		alla += 1

		if alla >= 20:
			parksvidrand = rand(0, 5)
			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end
		else
			gt 'parksvid', '3'
		end
	elseif $telsob = 'Masha':
		masha += 1

		if masha >= 20:
			parksvidrand = rand(0, 10)

			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end

		else
			gt 'parksvid', '3'
		end
	elseif $telsob = 'Kate':
		npc_rel['A219'] += 1

		if npc_rel['A219'] >= 20:
			parksvidrand = rand(0, 10)

			if parksvidrand > 0 and parksvidrand < 3:
				gt 'parksvid', '1'
			else
				gt 'parksvid', '3'
			end
		else
			gt 'parksvid', '3'
		end
	elseif $telsob = $loverdesc[lover_number]:
		!! date with girlfriend	
		loverrelation[lover_number] += 1
		
		if loverrelation[lover_number] >= 20:
			parksvidrand = rand(0, 10)
			if parksvidrand > 0 and parksvidrand < 3:gt 'parksvid', '1'
			if parksvidrand > 2 and parksvidrand < 5:gt 'parksvid', '2'
			if parksvidrand = 0 or parksvidrand > 4:gt 'parksvid', '3'
		else
			gt 'parksvid', '3'
		end
	end
end

if $ARGS[0] = '1':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/1.jpg"></center>'
	'As you walk through the park, you notice a man in a kilt. <<$telsob>> is interested in why he is wearing a kilt and what he''s up to.'

	act 'Move on':gt 'parksvid', '3'

	act 'See what he''s doing':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/2.jpg"></center>'
		'Coming closer, you notice he has a large sphere of some kind, it looks like it is metal. He is rotating it around in his hands.'
		'"Girls, you want to move back a little and I am getting ready to make a throw and we wouldn''t want to risk harming such beauties, as yourselves." he said, noting your interest in his occupation.'
		'"That''s interesting, but do you think he is wearing anything under his skirt?" said <<$telsob>>.'
		'"How should I know, come on and lets ask him."'
		'"I''m not going to ask him, you ask him." said <<$telsob>>, making plaintive eyes.'

		act 'Cancel and go for a walk on.':gt 'parksvid', '3'

		act 'Ask him':
			cla
			*clr
			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/3.jpg"></center>'
			'<<$telsob>> and you walk up to the guy, she leans against you and whispers in your ear. "Well ask."'
			'"Is it true what they say? That your not suppose to wear anything at all under a kilt?" you ask'
			'"You want to know, look and see." He replied with a smile.'
			'"Do you want to take a look <<$pcs_nickname>>?" asked <<$telsob>>'
			'"Go ahead and look yourself." you answered'
			'"Fine, I''l look." said <<$telsob>> defiantly pouting and squatting down.'
			'She lifted his kilt a bit and stuck her head under it.'
			'"Wow, " came her voice from under the kilt and a few moments when she said nothing more, you had to know. "Well what are you staring there?" you asked noticed the huge smile on the guys face and the movement of her head under is kilt, that she was sucking him off right then and there.'
			'A few minutes later <<$telsob>> crawled out from under the kilt wiped her lips.'
			'"If you girls would like to see what all I can do with whats under there, I know a spot.." suggested the guy still sporting a huge grin.'

			act 'Cancel and go for a walk on.':gt 'parksvid', '3'

			act 'Go with guy':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/4.jpg"></center>'
				'You decided to go with the guy to his home. No sooner than you are inside the door and he lifts his kilt up and shows off his dangling dick, with not a stitch of anything else on under the kilt.'
				'Emboldened <<$telsob>> immediately knelt and clasped her lips around his cock and began to suck his dick. You crouched down behind her and started sliding her panties down, so you could lick and tongue fuck her pussy.'

				gs 'arousal', 'cuni_give', 15, 'lesbian'
				gs 'stat'
				
				act 'Further':
					cla
					*clr
					'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/5.jpg"></center>'
					'After a few minutes he picked her up and put her on the bed, on all fours, quickly thrusting his dick in her pussy. You get up and crawl on the bed, pulling your clothes off to allow access to your pussy. You lay down in front of her and spread your legs. She immediately starts licking your pussy as she is getting fucked.'

					gs 'arousal', 'cuni', 15, 'lesbian'
					gs 'stat'
		
					act 'Further':
						cla
						*clr
						'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park/6.jpg"></center>'
						'Some time later you have a intense orgasm, not long after he pulls out of her. He grabs her, flipping her over and spinning her around. Now she is laying on her back with her face near his crotch, she opens her mouth at once. Her mouth is barely even open before he shoves his dick in and starts to fuck her mouth, with in moments he is shooting his across her face and in her mouth.'
						'You crawl down next to her and lick his cum off her face. He smiles as he watches the two of you. "That was great girls, but I need to get back to practicing at the park. I''ll walk you back."'
						'You all get dressed and he walks with you back to the park, once back in the park you go your seperate ways.'

						$orgasm_or = 'yes'
						gs 'arousal', 'end'
						gs 'stat'
						
						act 'Leave':gt 'parksvid', '3'
					end
				end
			end
		end
	end
end

if $ARGS[0] = '2':
	cla
	pcs_horny = 0
	minut += 90
	gs 'stat'
	'After you finish your walk, <<$telsob>> says she needs to go, she gives you a kiss on the cheek and leaves.'

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

if $ARGS[0] = '3':
	cla
	pcs_horny = 0
	minut += 90
	gs 'stat'
	if $telsob = $loverdesc[lover_number]:
		'When the movie ends, <<$telsob>> looks at you and waits for your next move.'
		act 'Kiss her and say goodbye': gt 'park', 'start'
		act 'Kiss her and invite her to your home': gt 'lezbsex', 'startloverhome'
	else
		'After you finish your walk, <<$telsob>> says she needs to go, she gives you a kiss on the cheek and leaves.'
		act 'Leave': gt 'park', 'start'
	end
end

--- parksvid ---------------------------------