glife/locations/kinoM.qsrc

# kinoM

if $ARGS[0] = 'start':
	minut += 30
	'You go to the cinema with <<$loverdesc[lover_number]>>, who buys two tickets for the back row.'
	'While you wait for the movie to start, <<$loverdesc[lover_number]>> tells you an anecdote as he buys popcorn and drinks.<br>'
	gs 'anekdot'
*nl
	if loverdays[lover_number] > 15 and haraklover[lover_number] = 2:gs 'boylove', 'tits'
	if loverdays[lover_number] > 20 and haraklover[lover_number] = 1:gs 'boylove', 'tits'
	if loverdays[lover_number] > 25 and haraklover[lover_number] = 0:gs 'boylove', 'tits'
	if loverdays[lover_number] > 20 and haraklover[lover_number] = 2:gs 'boylove', 'figure'
	if loverdays[lover_number] > 25 and haraklover[lover_number] = 1:gs 'boylove', 'figure'
	if loverdays[lover_number] > 30 and haraklover[lover_number] = 0:gs 'boylove', 'figure'
	act 'Laugh':
		cla
		loverrelation[lover_number] += 1
		xgt 'kinoM', 'a'
	end

	act 'Smile':
		cla
		xgt 'kinoM', 'a'
	end

	act 'Not funny':
		cla
		loverrelation[lover_number] -= 3
		xgt 'kinoM', 'a'
	end
end

if $ARGS[0] = 'a':
	*clr
	minut += 90
	fat += 2
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/cinema/kino.jpg"></center>'
	'You and <<$loverdesc[lover_number]>> quickly find your seats and <<$loverdesc[lover_number]>> puts the big cup of popcorn on your lap.'

	if haraklover[lover_number] < 2:

		act 'Hug his arm':
			cla
			loverrelation[lover_number] += 1
			'You lean against him and hold his arm, taking his hand in yours. He leans over and kisses you in response. The two of you sit there holding hands for the entire movie.'
			xgt 'kinoM', 'b'
		end
	elseif haraklover[lover_number] = 2:
		act 'Hug his arm':
			cla
			loverrelation[lover_number] += 1
			'You lean against him and hug his arm, taking his hand in yours. He leans over and kisses you. Once the lights go out and the theatre gets dark, his hand breaks free from yours and begins to rub your knee. A few minutes later the hand works its way up your thighs, sliding between them to your crotch. He rubs your pussy with his fingers and leans over to whisper, "Baby, I want you right here, right now."'

			act 'Shush him and remove his hand, so you can watch the movie':xgt 'kinoM', 'b'
			act 'Jerk him off':gt 'kinoM', 'hj'
			act 'Give him a blowjob':gt 'kinoM', 'bj'
			act 'Sit on his lap and fuck him':gt 'kinoM', 'sex'
		end
	end

	act 'Watch the movie':
		cla
		loverrelation[lover_number] -= 1
		gs 'exp_gain', 'intel', 1 + rand(0, drugVars['mentats_dose'])
		'The movie proves interesting and you sit through the whole thing without interruption.'
		xgt 'kinoM', 'b'
	end
end

if $ARGS[0] = 'sex':
	*clr
	sexa += 1
	pcs_vag += 1
	loverrelation[lover_number] += 2
	gs 'brosok'
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/sinema.jpg"></center>'
	'You reach over and undo his pants, opening his fly and pulling the front of his boxers just far enough down for his dick to spring free - he was already rock hard. Looking around to make sure no one is watching, <<$loverdesc[lover_number]>> takes out a condom and puts it on his penis; while he does that, you adjust your clothes so that you can pull your panties down to allow access to your pussy. With a final look around you lift up slightly and slide across his lap, reaching between your legs to take his dick in your hand and guide it inside your moist cunt. You bite your lip as his <<dick>>cm <<$dick_girth>> cock enters your pussy, to keep from moaning out loud. Then you begin to slowly move, sneakily fucking your lover in the dark theatre behind the rest of the audience.'

	gs 'arousal', 'vaginal', 10, 'sub'
	gs 'cum_call', '', $lover[lover_number], 1
	gs 'stat'
	
	if pcs_horny >= 90:
		pcs_mood += 15
		$orgasm_or = 'yes'
		$orgasm_txt = 'As you feel pleasure growing inside of you, you start moaning involuntarily, louder and louder. <<$loverdesc[lover_number]>> puts his hand over your mouth in an effort to muffle the noises. Then a massive orgasm hits you, leaving you shuddering and quivering on his cock.'
	end

	'<<$loverdesc[lover_number]>> cannot take it any longer and shoots his load into the condom. Once he is finished, you move back to your seat and straighten out your clothes. Once you both are fully dressed again, you look at each other and stifle a laugh. Your act went unnoticed and you watch the rest of the movie holding hands.'

	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'bj':
	*clr
	bja += 1
	gs 'cum_call', 'mouth_swallow', $boy, 1
	loverrelation[lover_number] += 2
	gs 'brosok'
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/sinema1.jpg"></center>'
	'You reach over and undo his pants, opening the fly and pulling the front of his underwear down just enough. His dick springs free, already rock hard. You look around to make sure no one is watching, then lean over and put your face in his lap. You wrap your lips around the shaft of his <<dick>>cm <<$dick_girth>> cock and begin to slowly suck him off in the dark theater.'
	'Soon <<$loverdesc[lover_number]>> can no longer hold back and shoots his load into your mouth, flooding it with spurts of hot sperm. You keep your lips wrapped tightly around his dick until he is finished unloading. Lacking any better options, you swallow it all down and suck his dick clean. Once done you sit back up. The two of you look at each other and stifle a laugh, as no one seems to have noticed what you just did. You watch the rest of the movie holding hands quietly.'

	gs 'arousal', 'bj', 10, 'sub'
	gs 'stat'
	
	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'hj':
	*clr
	hja += 1
	loverrelation[lover_number] += 1
	gs 'brosok'
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/sinema2.jpg"></center>'
	'You reach over and undo his pants, opening the fly and pulling the front of his underwear down just enough. His dick springs free, already rock hard. You look around to make sure no one is watching, while <<$loverdesc[lover_number]>> takes out a condom and puts it on his penis. You begin to stroke his cock while watching the movie.'
	'Soon your skillful movements make him shoot his load in the condom. Once done, you lean back and watch the rest of the movie holding hands.'

	gs 'arousal', 'hj', 10, 'sub'
	gs 'stat'
	
	act 'Next':gt 'kinoM', 'b'
end

if $ARGS[0] = 'b':
	minut += 30
	fat += 1
	'The movie ends and the lights switch on in the theater. Soon the audience heads for the exits.'

	gs 'arousal', 'end'
	gs 'stat'
	
	act 'Home':gt 'sexm', 'start'
end

--- kinoM ---------------------------------