glife-fork/locations/kinosvid.qsrc

# kinosvid

if $ARGS[0] = '':
	menu_off = 1
	$location_type = 'event'
	minut += 60
	kisvrand = 0
	pcs_mood += 10
	gs 'stat'
	'<center><b>Cinema</b></center>'
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/0.jpg"></center>'
	'You and <<$telsob>> buy your tickets, drinks, and popcorn. With some playful flirting, you settle into your seats ready to watch the movie.'

	act 'Watch the movie':
		if $telsob = 'Alla':
			alla += 1
			if alla >= 20:
				kisvrand = rand(0, 10)
				if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
				if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
				if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
			else
				gt 'kinosvid', '3'
			end
		elseif $telsob = 'Masha':
			masha += 1
			if masha >= 20:
				kisvrand = rand(0, 10)
				if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
				if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
				if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
			else
				gt 'kinosvid', '3'
			end
		elseif $telsob = 'Kate':
			npc_rel['A219'] += 1
			if npc_rel['A219'] >= 20:
				kisvrand = rand(0, 10)
				if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
				if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
				if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
			else
				gt 'kinosvid', '3'
			end
		elseif $telsob = $loverdesc[lover_number]:
			!! date with girlfriend	
			loverrelation[lover_number] += 1		
			if loverrelation[lover_number] >= 20:
				kisvrand = rand(0, 10)
				if kisvrand > 0 and kisvrand < 3:gt 'kinosvid', '1'
				if kisvrand > 2 and kisvrand < 5:gt 'kinosvid', '2'
				if kisvrand = 0 or kisvrand > 4:gt 'kinosvid', '3'
			else
				gt 'kinosvid', '3'
			end
		end
	end
end

if $ARGS[0] = '1':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/1.jpg"></center>'
	'While you''re engrossed in the movie, <<$telsob>> takes the opportunity to "accidentally" drop some popcorn down your top.'

	act 'Oh, my':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/2.jpg"></center>'
		'"I''m so clumsy. Let me help you clean that up", she whispers.'
		'<<$telsob>> glides her hand under your shirt slowly gathering up bits of popcorn. Her slow sensual caress isn''t part of any popcorn removal technique, but it has its intended effect of making you breathe heavy. To give her better access you slowly lift your shirt, exposing your bare midriff all the way to the bottom of your breasts.' 
		'<<$telsob>> looks around the theater, and seeing that the two of you are alone says: "It would be a shame to waste this popcorn, when it is sitting on such a lovely plate." With that, she leans down to gather popcorn with her lips and tongue.'
	
		gs 'arousal', 'foreplay', 10, 'lesbian'
		gs 'stat'
		
		act 'Enjoy it':gt 'kinosvid', '10'
		act 'Pleasure her':gt 'kinosvid', '11'
	end
end

if $ARGS[0] = '10':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/3.jpg"></center>'
	'Soon the popcorn is long forgotten, as <<$telsob>> works her way down between your legs. Her expert tongue along with the thrill of doing this in a movie theater brings you to orgasm almost immediately.' 
	'The devilish look she gives you tells you she isn''t done with you yet.'

	$orgasm_or = 'yes'
	gs 'arousal', 'cuni', 10, 'lesbian'
	gs 'stat'
		
	act 'Continue to enjoy it':
		*clr & cla
		pcs_vag += 1
		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/4.jpg"></center>'
		'<<$telsob>> continues to massage your clitoris with her tongue, as she slowly works the first of her fingers inside you. Working gently, she adds fingers one at a time until you are wrapped around her entire hand. The feeling is so intense that she brings you to a second orgasm, which runs though your entire body.'

		$orgasm_or = 'yes'
		gs 'arousal', 'cuni', 10, 'lesbian'
		gs 'arousal', 'vaginal_finger', 10, 'lesbian'
		minut -= 10
		gs 'stat'
		
		act 'It''s her turn':gt 'kinosvid', '13'
		act 'Finish':gt 'kinosvid', '3'
	end

	act 'It''s her turn':gt 'kinosvid', '12'
end

if $ARGS[0] = '11':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/5.jpg"></center>'
	'You rise up from your chair, lifting <<$telsob>>''s shirt as you go. Your mouth finds one of her nipples, while you work your hand down her pants. After a minute of working your hand, <<$telsob>> lets out a load moan, soaking your hand with her juices.'
	'This girl is driving you wild. It''s time to get her pants off.'

	gs 'arousal', 'foreplay', 10, 'lesbian'
	gs 'arousal', 'vaginal_finger_give', 10, 'lesbian'
	minut -= 10
	gs 'stat'
		
	act 'Lick her pussy':gt 'kinosvid', '14'
	act 'Lick her ass':gt 'kinosvid', '15'
	act 'It''s you turn':gt 'kinosvid', '16'
end

if $ARGS[0] = '12':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/6.jpg"></center>'
	'You slide down in you seat, and motion <<$telsob>> upward. She quickly realizes what you want, and straddles your face. You raise your tongue up to meet her dripping wet pussy, and begin to lick.'
	'After a few minutes <<$telsob>> starts breathing heavy, and frantically grinding her crotch against your face, which is then covered by her additional wetness. She let''s out a few plaintive moans, before finally coming to a stop.' 

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
		
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '13':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/7.jpg"></center>'
	'You kneel down between <<$telsob>>''s legs, and gently lap at her folds. As you reach her clitoris, thinking she might like the same thing, you gently begin to insert fingers one by one. Eventually she is stretched enough to envelope your entire hand. This brings a loud cry of pleasure from her, as her body shakes with an orgasm.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'arousal', 'vaginal_finger_give', 10, 'lesbian'
	minut -= 10
	gs 'stat'
	
	act 'Show her your backside':gt 'kinosvid', '110'
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '14':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/8.jpg"></center>'
	'You guide her to the chair, and pull her pants down around her knees. She reaches back to pull her panties aside, giving you access to her glistening sex. You give her a few long slow licks, before you focus her clitoris. When you do, <<$telsob>> pushes her backside against you, moaning for more.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'Keep going':gt 'kinosvid', '17'
end

if $ARGS[0] = '15':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/9.jpg"></center>'
	'You guide her to the chair, and pull her pants down around her knees. She reaches back to pull her panties aside, giving you access to her cute little hole. You give her a few teasing licks between her cheeks, before your tongue finds it''s way to her hole. When it does, <<$telsob>> gasps, and reaches back to hold your head begging for more.'
	
	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'Go further':gt 'kinosvid', '17'
end

if $ARGS[0] = '16':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/11.jpg"></center>'
	'Deciding that it''s your turn, you gently push <<$telsob>> to her knees. She eagerly drops down looking up at you with lust, as you unbutton your pants for her. When you expose your pussy for her, she rushes forward to plant her lips on yours. You encourage her fine work, with soft moans and thrusts of your pelvis'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'More':gt 'kinosvid', '18'
	act 'It''s her turn':gt 'kinosvid', '19'
end

if $ARGS[0] = '17':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/10.jpg"></center>'
	'You gradually work your fingers into her pussy, while you continue to lick her backside. Finger by finger you stretch her until your entire hand is inside her. <<$telsob>> almost seems overwhelmed by all this attention. Her cries of pleasure are loud enough that you fear an usher might come in to see what''s going. This thought gives you a wicked little thrill, but it''s probably better to finish up.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'arousal', 'vaginal_finger_give', 10, 'lesbian'
	minut -= 10
	gs 'stat'
	
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '18':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/12.jpg"></center>'
	'You hike a leg up onto the chair, and motion <<$telsob>> forward. She reaches up to gently caress one of you cheeks, as she brings her mouth close to your waiting pussy. She teases you with a few deep hot breaths, before her mouth finds its target. A few minutes of kissing and licking later, you are throughly satisfied.'

	$orgasm_or = 'yes'
	gs 'arousal', 'cuni', 10, 'lesbian'
	gs 'stat'
	
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '19':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/13.jpg"></center>'
	'You help <<$telsob>> up onto the back of the chair, and spread her legs wide. You start to tease her with little licks, but overcome with passion she grabs the back of your head, forcing you deep between her thighs. She moans and grinds against your face until she is spent. Afterword, you continue to slowly lick her still quiver folds, very pleased with your work.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '110':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/14.jpg"></center>'
	'You get up on the chair and wiggle you butt at <<$telsob>>. Needing no further encouragement, <<$telsob>> spreads your cheeks, and buries her tongue deep in your ass. Your gasp of surprise is quickly replaced with moans of pleasure, as she continues to aggressively tongue your bottom. After a few minutes of this your knees buckle, and you collapse on the chair spent.'

	$orgasm_or = 'yes'
	gs 'arousal', 'cuni', 10, 'lesbian'
	gs 'stat'
	
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '2':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/0.jpg"></center>'
	'<<$telsob>> says: "I have to use the little girls room. I''ll be right back."'

	act 'Wait':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/20.jpg"></center>'

		if kendra = 0:'While she is gone, a rude black chick sits down beside you, and forces her hand between your legs. Too stunned to say anything, you just sit there as she works her hand deeper between your thighs.<br>You''re all wet, sugar", she says with a little smirk.<br>Before you can figure out what to do or say, <<$telsob>> grabs her by the ear, and pulls the strange woman out of her seat. She doesn''t put up a fight, and even starts laughing as she goes.<br>The strange women calls back to you before she exits: "If you ever get a taste for dark chocolate come see me at the dorm. I know you want to." She leaves licking her still wet fingers.<br>Furious, <<$telsob>> throws her a parting shot: "Get the fuck gone you crazy black bitch! <<$pcs_nickname>> is my girl." She says the last part so only you can hear, as she sits back down.'
		if kendra > 0:'While she is gone, Kendra plops right down in the chair next to you. She puts a hand between your legs, and she looks at you like a piece of property. "Oh, are you all wet for me <<$pcs_nickname>>, or are you hot for that skinny white bitch?", she says while roughly fingering your pussy.<br>Frozen, you have no idea what to do when you are saved by <<$telsob>>. She grabs Kendra by the ear and pulls her out of her seat. She doesn''t put a fight, and even starts laughing as she goes.<br>Kendra calls back to you before she exits: "Come see me when you get tired of that skinny white bitch. I know what you really want <<$pcs_nickname>>." Kendra leaves giving you a wink, while licking her still wet fingers.<br>Furious, <<$telsob>> throws her a parting shot: "Get the fuck gone you crazy black bitch! <<$pcs_nickname>> is my girl." She says the last part so only you can hear, as she sits back down.'

		gs 'arousal', 'vaginal_finger', 10, 'lesbian'
		gs 'stat'
	
		act 'Wait':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/21.jpg"></center>'
			'When <<$telsob>> has calmed down a little, she looks at you with hunger in her eyes. You were so shocked by the encounter that you were still sitting there legs spread. <<$telsob>> reaches over and starts to unbutton your top too. It looks like she intends to claim her prize.'

			act 'Let her':
				*clr & cla
				'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/22.jpg"></center>'
				'<<$telsob>> gives you a slow deep kiss, as she works two fingers into your pussy. She curls her fingers up, and gives a firm tug. "This is mine", she whispers against your lips.'
				'All you can do is whimper, "Yes."'

				$orgasm_or = 'yes'
				gs 'arousal', 'vaginal_finger', 5, 'lesbian', 'sub'
				gs 'stat'
	
				act 'Submit':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/23.jpg"></center>'
					'You obediently roll over to your knees, when <<$telsob>> tells you to. She gets to work, stretching your little pussy with finger after finger. She isn''t rough, but she leaves no doubt about who is in charge.'
					'"I want you to cum for me now, <<$pcs_nickname>>", she says, in a firm voice.'
					'You do.'
					
					$orgasm_or = 'yes'
					gs 'arousal', 'vaginal_finger', 5, 'lesbian'
					gs 'stat'
	
					act 'Pleasure her':
						*clr & cla
						'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/24.jpg"></center>'
						'<<$telsob>> gets into position, and guides your hand between her legs. "Do it to me now, sweetie", she tells you. You slowly do the same thing that she has just done to you, slowly stretching her until you get four fingers inside her. After a short time <<$telsob>> bucks wildly against your hand, as she climaxes. When she recovers she gives you a little kiss on the cheek, and goes back to watching the movie, without a word.'

						gs 'arousal', 'vaginal_finger_give', 5, 'lesbian'
						gs 'stat'
	
						act 'Finish':gt 'kinosvid', '3'
					end
				end

				act 'Pleasure her':gt 'kinosvid', '22'
			end

			act 'Pleasure her':gt 'kinosvid', '21'
		end
	end
end

if $ARGS[0] = '21':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/25.jpg"></center>'
	'As an apology, you sit on the floor, motioning for <<$telsob>> to straddle your face. She takes her position, and slowly grinds herself against your face. Eventually, the movement of her hips becomes more and more urgent. All you can do is hold on, as she brings herself to orgasm, against your face.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'Sit back down':
		*clr & cla
		'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/26.jpg"></center>'
		'When you are dressed and watching the movie again, <<$telsob>> turns to you saying: "Oh, OK apology accepted."'
		'She drops to her knees, spreading your legs as she goes. Her expert tongue brings you to orgasm in no time.'
		'You lie back, breathing heavy, basking in the afterglow, and the thought of <<$telsob>> no longer being mad about the incident.'

		$orgasm_or = 'yes'
		gs 'arousal', 'cuni', 10, 'lesbian'
		gs 'stat'
	
		act 'Finish':gt 'kinosvid', '3'
	end
end

if $ARGS[0] = '22':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/27.jpg"></center>'
	'You gently push <<$telsob>> back in her chair, getting her hips up in the air as you do. She pulls on of her cheeks aside giving you better access to her sex. After a few minutes of your expert tongue, <<$telsob>> is left collapsed in her chair, trembling.'

	gs 'arousal', 'cuni_give', 10, 'lesbian'
	gs 'stat'
	
	act 'Finish':gt 'kinosvid', '3'
end

if $ARGS[0] = '3':
	*clr & cla
	minut += 90
	gs 'stat'
	gs 'arousal', 'end'
	'<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/cinema/0.jpg"></center>'

	if $telsob = $loverdesc[lover_number]:
		'When the movie ends, <<$telsob>> looks at you and waits for your next move.'
		if $home_town = 'pavlovsk':
			act 'Kiss her and say goodbye': gt 'gskino'
		else
			act 'Kiss her and say goodbye': gt 'torgcentr'
		end
		act 'Kiss her and invite her to your home': gt 'lezbsex', 'startloverhome'
	else
		'When the movie ends, <<$telsob>> says she has get home. She leaves you with a deep kiss, leaving you wanting more.'
		if $home_town = 'pavlovsk':
			act 'Leave': gt 'gskino'
		else
			act 'Leave': gt 'torgcentr'
		end
	end
end

--- kinosvid ---------------------------------