:: sex_ev_start
<<set $here = 'sex_ev_start'>>
<<set $ARGS = $location_var[$here]>>
<!-- !! ------------------------- Booty Call Content Start ------------------------->
<<if $location_var[$here][0] == 'neighborhood_image'>>
	<<if $loc == 'pav_residential'>>
		<<if $time.isWinter>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/pavlovsk/pavreswinter.jpg">>
			<<else>>
				<<image "locations/pavlovsk/pavreswintern.jpg">>
			<</if>>
		<<else>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/pavlovsk/pavres.jpg">>
			<<else>>
				<<image "locations/pavlovsk/pavresn_#.jpg" 1 2>>
			<</if>>
		<</if>>
	<<elseif $loc == 'city_residential'>>
		<<if $time.isWinter>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/city/residential/streetw.jpg">>
			<<else>>
				<<image "locations/city/residential/streetwn.jpg">>
			<</if>>
		<<else>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/city/residential/street.jpg">>
			<<else>>
				<<image "locations/city/residential/street_night.jpg">>
			<</if>>
		<</if>>
	<<elseif $loc == 'city_center'>>
		<<if $time.isWinter>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/city/citycenter/downw.jpg">>
			<<else>>
				<<image "locations/city/citycenter/downwn.jpg">>
			<</if>>
		<<else>>
			<<if getvar("$time.daystage") == 2 or getvar("$time.daystage") == 3>>
				<<image "locations/city/citycenter/down.jpg">>
			<<else>>
				<<image "locations/city/citycenter/down_night.jpg">>
			<</if>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'exit_set'>>
	<!-- !! exit should be based on type of apartment and location-->
	<<if $sex_ev['loc'] != 'pc_home'>>
		<<if $npc($sex.npcId).residence == 1>>
			<!-- !! Pav residential exit-->
			<<gt 'pav_residential'>>
		<<elseif $npc($sex.npcId).residence == 2>>
			<!-- !! Student dorms exit-->
			<<gt 'city_island'>>
		<<elseif $npc($sex.npcId).residence == 3>>
			<!-- !! St. Petersburg Residential exit-->
			<<gt 'city_residential'>>
		<<elseif $npc($sex.npcId).residence == 4>>
			<!-- !! St. Petersburg City Center exit-->
			<<gt 'city_center'>>
			<!-- !!{ disabled for bug testing
			else
			if $region = 'pav':
			gt 'pav_residential'
			elseif $region = 'pav':
			gt 'pav_commercial'
			elseif $region = 'pav_park':
			gt 'pav_park', 'start'
			elseif $region = 'city':
			gt 'city_residential'
			elseif $region = 'city_center':
			gt 'city_center'
			elseif $region = 'city_park':
			gt 'city_park', 'start'
			elseif $region = 'city_island':
			gt 'city_island'
			end} -->
		<</if>>
	<<else>>
		<<gt 'bedrPar'>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'initiate_pre'>>
	<<gs 'boystat' $location_var[$here][1]>>
	<!-- !!	if <<=$npc($sex.npcId).rel_type>> = 'husband' or <<=$npc($sex.npcId).rel_type>> = 'boyfriend' or <<=$npc($sex.npcId).rel_type>> = 'fuckbuddy':-->
	<<if $npc($sex.npcId).rel_type != ''>>
		<<gs 'sex_ev_start' 'lover_initiate'>>
	<<else>>
		<<gs 'sex_ev_start' 'hookup_initiate'>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'boystat_init'>>
	<<if getvar("$sex_ev['boystat_done']") == 0>>
		<<gs 'boystat' $location_var[$here][1]>>
		<<setinit $sex_ev['boystat_done'] = 1>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'lover_initiate'>>
	<<if $npc($sex.npcId).rel_type == 'husband'>>
		<<setinit $sex_ev['type'] = 'married_sex'>>
	<<elseif $npc($sex.npcId).rel_type == 'boyfriend'>>
		<<setinit $sex_ev['type'] = 'dating_sex'>>
	<<elseif $npc($sex.npcId).rel_type == 'fuckbuddy'>>
		<<setinit $sex_ev['type'] = 'booty_call'>>
		<<if ($booty_call_invite[$sex.npcId] == $time.daystart or $npc($sex.npcId).booty_call == $time.daystart or $npc($sex.npcId).booty_call_date == $time.daystart) and $npc($sex.npcId).last_booty_call != $time.daystart>>
			<<gt 'sex_ev_start' 'fb_invited_start'>>
		<<elseif $npc($sex.npcId).start_free_time >= $time.hour and $time.hour <= $npc($sex.npcId).end_free_time and $npc($sex.npcId).last_booty_call != $time.daystart and $npc($sex.npcId).no_booty_call != $time.daystart>>
			<<gt 'sex_ev_start' 'fb_uninvited_start'>>
		<<else>>
			<<gs 'sex_ev_start' 'neighborhood_image'>>
			<p>You knock on <<npc $sex.npcId>><</npc>>'s door but there is no answer.</p>
			<<actCLA 'Leave'>>
				<<gt $loc>>
			<</actCLA>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'hookup_initiate'>>
	<<setinit $sex_ev['type'] = 'hookup'>>
	<<if $sex.npcId != $npclastgenerated and $sex.npcId != $npclastsaved>>
		<<if getvar("$npcgen_lastrun") == 1>>
			<<gs 'boystat' $npclastgenerated>>
		<<elseif getvar("$npcgen_lastrun") == 2>>
			<<gs 'boystat' $npclastsaved>>
		<</if>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'lover_home_start'>>
	<<setinit $sex_ev['loc'] = 'npc_home'>>
	<<setinit $sex_ev['bed_room'] = $npc($sex.npcId).apt_bedroom>>
	<<setinit $sex_ev['bath_room'] = $npc($sex.npcId).apt_bathroom>>
	<<setinit $sex_ev['kitchen_room'] = $npc($sex.npcId).apt_kitchen>>
	<<setinit $sex_ev['living_room'] = $npc($sex.npcId).apt_livingroom>>
	<<setinit $sex_ev['hall_way'] = $npc($sex.npcId).apt_hall>>
<</if>>
<<if $location_var[$here][0] == 'fb_npc_home_start'>>
	<!-- !!	gs 'boystat', $ARGS[1]-->
	<<setinit $sex_ev['type'] = 'booty_call'>>
	<<if ($booty_call_invite[$sex.npcId] == $time.daystart or $npc($sex.npcId).booty_call == $time.daystart or $npc($sex.npcId).booty_call_date == $time.daystart) and $npc($sex.npcId).last_booty_call != $time.daystart>>
		<<gt 'sex_ev_start' 'fb_invited_start'>>
	<<elseif $npc($sex.npcId).start_free_time >= $time.hour and $time.hour <= $npc($sex.npcId).end_free_time and $npc($sex.npcId).last_booty_call != $time.daystart and $npc($sex.npcId).no_booty_call != $time.daystart>>
		<<gt 'sex_ev_start' 'fb_uninvited_start'>>
	<<else>>
		<<gs 'sex_ev_start' 'neighborhood_image'>>
		<p>You knock on <<npc $sex.npcId>><</npc>>'s door but there is no answer.</p>
		<<actCLA 'Leave'>>
			<<gt $loc>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'hookup_npc_home_start'>>
	<<gs 'sex_ev_start' 'hookup_initiate'>>
	<<gs 'sex_ev_start' 'lover_home_start'>>
	<<gs 'sex_ev_start' 'begin'>>
	<<gs 'sex_ev_start' 'undress'>>
<</if>>
<<if $location_var[$here][0] == 'begin'>>
	<<set $location_type = 'event'>>
	
	<<if $time.minutes > 45>>
		<<setinit $sex_ev['start_hour'] = $time.hour + 1>>
	<<else>>
		<<setinit $sex_ev['start_hour'] = $time.hour>>
	<</if>>
	<<gs 'sex_ev_stats' 'starting_stats'>>
	<<gs 'sex_ev_stats' 'npc_update'>>
	<<set $npc($sex.npcId).last_booty_call = $time.daystart>>
<</if>>
<<if $location_var[$here][0] == 'fb_invited_start'>>
	<<setinit $sex_ev['loc'] = 'npc_home'>>
	<<set $loc = 'sex_ev_start'>>
	<<set $loc_arg = 'fb_invited_start'>>
	<!-- !!	savegame 'autosave_sex_ev.sav'-->
	<<gs 'sex_ev_start' 'begin'>>
	<<gs 'sex_ev_start' 'lover_home_start'>>
	$sex_ev['hall_way']
	<p>You knock on the door and <<npc $sex.npcId>><</npc>> opens up.</p>
	<<if $pc.pcs_sweat > 29>>
		<!-- !!		if AlbinaQW['startletsday'] = daystart:-->
		<<actCLA 'Didn`t have time'>>
			"I didn''t have time," you smile. "I came as soon as I saw your message."
			<<gs 'sex_ev_start' 'fuck_or_what'>>
			<<gs 'sex_ev_shower' 'before_borrow_shower'>>
		<</actCLA>>
		<<if $pc.sexStat('dance_day') == $time.daystart>>
			<<actCLA 'Came from dance'>>
				"I came straight from dance practice," you shrug.
				<p>"And you couldn't take a shower first?"</p>
				<<gs 'sex_ev_start' 'couldnt_wait'>>
				<<gs 'sex_ev_shower' 'before_borrow_shower'>>
			<</actCLA>>
		<</if>>
		<!-- !!{			act'Came from football':
		cla & *nl
		'"I was playing football when I saw your message," you shrug.'
		'"And you couldn''t take a shower first?"'
		gs 'sex_ev_start', 'couldnt_wait'
		gs 'sex_ev_shower', 'before_borrow_shower'
		end} -->
		<<if $pc.sexStat('volleyball_day') == $time.daystart>>
			<<actCLA 'Came from volleyball'>>
				"I came straight from volleyball practice," you shrug.
				<p>"And you couldn't take a shower first?"</p>
				<<gs 'sex_ev_start' 'couldnt_wait'>>
				<<gs 'sex_ev_shower' 'before_borrow_shower'>>
			<</actCLA>>
		<</if>>
		<<if $pc.sexStat('run_day') == $time.daystart>>
			<<actCLA 'I was running'>>
				"I was on a run when I saw your message," you shrug.
				<p>"And you couldn't take a shower first?"</p>
				<<gs 'sex_ev_start' 'couldnt_wait'>>
				<<gs 'sex_ev_shower' 'before_borrow_shower'>>
			<</actCLA>>
		<</if>>
		<<actCLA 'Came from work'>>
			"I came straight from work," you shrug. "Didn''t want to go home and clean up first."
			<<gs 'sex_ev_start' 'fuck_or_what'>>
			<<gs 'sex_ev_shower' 'before_borrow_shower'>>
		<</actCLA>>
		<<gs 'sex_ev_start' 'couldnt_wait'>>
		<!-- !!		end-->
		<<if $pc.pcs_sweat > 39>>
			<p>"What the fuck?" he says, wrinkling his nose. "You stink."</p>
		<<elseif $pc.pcs_sweat > 29>>
			"Hey," he says, looking up and down at you in amusement. "You're soaking wet."
			<<if $pc.horny >= 70>>
				<<actCLA 'Yeah'>>
					<p>"Yeah," you say huskily, letting your arousal seep into your voice. <<npc $sex.npcId>><</npc>> locks eyes with you for a split second.</p>
					<p>"Bed?"</p>
					"Now," you pant and rush inside.
					<<act 'Clothes. Off. Now.'>>
						<<gt 'sex_ev_foreplay' 'undress'>>
					<</act>>
				<</actCLA>>
			<</if>>
		<</if>>
	<<else>>
		<<if $npc($sex.npcId).selfish > 0 and rand(0,1) == 1>>
			"About fucking time," he says.
		<<else>>
			"Hey," he grins at you.
		<</if>>
		<<actCLA 'Hey'>>
			"Hey," you smile back. "So..."
			<<if $npc($sex.npcId).selfish > 0 and rand(0,1) == 1>>
				<p>"Let's get you naked," <<npc $sex.npcId>><</npc>> says, pulling you inside and immediately tugging at your clothes.</p>
			<<else>>
				"Come on in," he says, and leads you inside.
			<</if>>
			<<act 'Take it to the bed'>>
				<<gt 'sex_ev_foreplay' 'undress'>>
			<</act>>
		<</actCLA>>
		<<actCLA 'Shut up and let`s fuck'>>
			<<if $npc($sex.npcId).apt_type < 3>>
				"Shut up and fuck me already," you say, putting your hands on his chest and pushing him inside towards the bed. "I'm here to fuck. So let''s fuck."
			<<else>>
				"Shut up and fuck me already," you say, putting your hands on his chest and pushing him inside towards the bedroom. "I'm here to fuck. So let''s fuck."
			<</if>>
			<<act 'Undress'>>
				<<gt 'sex_ev_foreplay' 'undress'>>
			<</act>>
		<</actCLA>>
		<<if $pc.pcs_makeup > 1>>
			<<actCLA 'Don`t mess up my makeup'>>
				<<setinit $sex_ev['dont_ruin_makeup'] = 1>>
				$sex_ev['hall_way']
				<<if $npc($sex.npcId).apt_type < 3>>
					"Don't mess up my makeup," you say, walking past him towards the bed.
				<<else>>
					"Don't mess up my makeup," you say, walking past him towards the bedroom.
				<</if>>
				<<act 'Undress'>>
					<<gt 'sex_ev_foreplay' 'undress'>>
				<</act>>
				<<if $date == $time.daystart and $date_hour_meet <= $time.hour + 1>>
					<<actCLA 'I have a date soon'>>
						$sex_ev['hall_way']
						<<setinit $sex_ev['date_soon'] = 1>>
						<<if $npc($sex.npcId).apt_type < 3>>
							"Don't mess up my makeup," you say, walking past him towards the bed. "I have a date right after this."
						<<else>>
							"Don't mess up my makeup," you say, walking past him towards the bedroom. "I have a date right after this."
						<</if>>
						<<act 'Undress'>>
							<<gt 'sex_ev_foreplay' 'undress'>>
						<</act>>
					<</actCLA>>
				<<elseif $date == $time.daystart>>
					<<actCLA 'I have a date later'>>
						$sex_ev['hall_way']
						<<setinit $sex_ev['date_soon'] = 1>>
						<<if $npc($sex.npcId).apt_type < 3>>
							"Don't mess up my makeup," you say, walking past him towards the bed. "I have a date later. I don't want to do it again."
						<<else>>
							"Don't mess up my makeup," you say, walking past him towards the bed. "I have a date later. I don't want to do it again."
						<</if>>
						<<act 'Undress'>>
							<<gt 'sex_ev_foreplay' 'undress'>>
						<</act>>
					<</actCLA>>
				<</if>>
				<<if $time.hour >= 18 and $region == 'pav' and ($time.weekday == 5 or $time.weekday == 6)>>
					<<actCLA 'I`m going to the disco'>>
						$sex_ev['hall_way']
						<<setinit $sex_ev['disco_after'] = 1>>
						<!-- !!if npc_apt_type[$sex.npcId] < 3:-->
						"Don't mess up my makeup," you say as you let him pull you inside. "I'm going to the disco after this."
						<!-- !!else-->
						<!-- !!	'"Don't mess up my makeup," you say, walking past him towards the bedroom. "I'm going to the disco after this."'-->
						<!-- !!end-->
						<<act 'Undress'>>
							<<gt 'sex_ev_foreplay' 'undress'>>
						<</act>>
					<</actCLA>>
				<</if>>
			<</actCLA>>
		<</if>>
		<<if $inventory.get("condom") > 0 and $npc($sex.npcId).bareback == 0>>
			<<actCLA 'I brought condoms'>>
				<<setinit $pc_buy_condoms[$sex.npcId] = 2>>
				"I brought condoms," you grin, holding up the rubbers for him to see.
				<<if getvar("$know_virgin["+$sex.npcId+"]") == 1>>
					<p><<npc $sex.npcId>><</npc>> stares in awe.</p>
					<p>"Does that mean...?"</p>
					"Come and find out," you say, moving inside.
				<<else>>
					"Fuck yeah," he says as he drags you inside.
				<</if>>
				<<act 'Undress'>>
					<<gt 'sex_ev_foreplay' 'undress'>>
				<</act>>
			<</actCLA>>
		<</if>>
		<<if getvar("$morning_after_pill") > 0 and $npc($sex.npcId).bareback == 0>>
			<<actCLA 'Brought a morning after pill'>>
				<<setinit $sex_ev['skip_condom'] = 1>>
				<<setinit $sex_ev['no_condom'] = 1>>
				<<setinit $sex_ev['ma_pill'] = 1>>
				<<actCLA 'No condoms'>>
					$sex_ev['bed_room']
					<p>"I brought a morning after pill," you say, stepping inside and drawing close to <<npc $sex.npcId>><</npc>>. You lean in and whisper in his ear, "<i>We don't need to use a condom today.</i>"</p>
					<<act 'Undress'>>
						<<gt 'sex_ev_foreplay' 'undress'>>
					<</act>>
				<</actCLA>>
				<<actCLA 'Come inside me'>>
					<<setinit $sex_ev['creampie_allowance'] = 1>>
					$sex_ev['bed_room']
					<p>"I brought a morning after pill," you say, stepping inside and drawing close to <<npc $sex.npcId>><</npc>>. You lean in and whisper in his ear, "<i>That means can come inside me today.</i>"</p>
					<<act 'Undress'>>
						<<gt 'sex_ev_foreplay' 'undress'>>
					<</act>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
		<<if getvar("$birth_control['think_safe']") == 1 and $npc($sex.npcId).know_bc == 0>>
			<<actCLA 'Tell him you`re on birth control'>>
				$sex_ev['bed_room']
				<p>You step inside and draw close to <<npc $sex.npcId>><</npc>>. You lean in and whisper in his ear...</p>
				<<actCLA 'No condoms'>>
					$sex_ev['bed_room']
					<<if $npc($sex.npcId).know_bc_not_effective == 1>>
						"<i>My birth control is ready. Let''s go bareback today.</i>"
					<<else>>
						"<i>I'm on birth control now. Let''s go bareback today.</i>"
					<</if>>
					<<gs 'sex_ev_stats' 'birth_control_know'>>
					<<act 'Undress'>>
						<<gt 'sex_ev_foreplay' 'undress'>>
					<</act>>
				<</actCLA>>
				<<actCLA 'Come inside me'>>
					<<setinit $sex_ev['creampie_allowance'] = 1>>
					$sex_ev['bed_room']
					<<if $npc($sex.npcId).know_bc_not_effective == 1>>
						"<i>My birth control is ready. You can come inside me as much as you want.</i>"
					<<else>>
						"<i>I'm on birth control now. You can come inside me as much as you want.</i>"
					<</if>>
					<<gs 'sex_ev_stats' 'birth_control_know'>>
					<<act 'Undress'>>
						<<gt 'sex_ev_foreplay' 'undress'>>
					<</act>>
				<</actCLA>>
			<</actCLA>>
		<</if>>
		<<if $npc($sex.npcId).shave_promise > 0 and $pc.pubesLength < 4>>
			<<actCLA 'Tell him you shaved'>>
				$sex_ev['bed_room']
				<p>"I have a special surprise too," you say, stepping inside and drawing close to <<npc $sex.npcId>><</npc>>. You lean in and whisper in his ear, "<i>I shaved my pussy for you.</i>"</p>
				<<act 'Undress'>>
					<<gt 'sex_ev_foreplay' 'undress'>>
				<</act>>
			<</actCLA>>
		<</if>>
		<!-- !!	act'Stumble over to the couch':gt 'sex_ev_start', 'couch_start'-->
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'couldnt_wait'>>
	<<actCLA 'Couldn`t wait'>>
		<p>"I couldn't wait," you grin. "<i>Can't</i> wait. Bedroom?"</p>
		"Bedroom," he nods and drags you inside.
		<<act 'Clothes. Off. Now.'>>
			<<gt 'sex_ev_foreplay' 'undress'>>
		<</act>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'fuck_or_what'>>
	<<actCLA 'Are we going to fuck or what?'>>
		<p>"So are you going to stand here complaining or are we going to fuck?" you grin.</p>
		<p><<npc $sex.npcId>><</npc>> doesn't say anything, instead grabbing you by the arms and dragging you inside.</p>
		<<act 'Clothes. Off. Now.'>>
			<<gt 'sex_ev_foreplay' 'undress'>>
		<</act>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'fb_uninvited_start'>>
	<<gs 'sex_ev_start' 'begin'>>
	<<gs 'sex_ev_start' 'lover_home_start'>>
	$sex_ev['hall_way']
	You knock on the door and you hear the latch unlock and the door swings open.
	<<actCLA 'I was in the neighborhood'>>
		<p>"Hey," you smile at <<npc $sex.npcId>><</npc>> who blinks in surprise. "I was in the neighborhood and I started thinking about you, wondering if you wanted to fool around some...?"</p>
		<<if $npc($sex.npcId).booty_call == $time.daystart>>
			"I was just about to text you," he grins.
			<p>So am I coming in or what?" you grin back.</p>
		<<else>>
			<p>"You couldn't have called first?"</p>
			You shrug.
			<p>"Wanted to surprise you. So am I coming in or what?"</p>
		<</if>>
		<<if rand(1,10) < $npc($sex.npcId).sexdrive>>
			<<if $npc($sex.npcId).humor == 2 and $npc($sex.npcId).cum_pref == 'creampie'>>
				"I'm the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in.
			<<elseif $npc($sex.npcId).humor == 2 and $npc($sex.npcId).cum_pref == 'mouth'>>
				"I'm the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in. "In your mouth that is."
			<<elseif $npc($sex.npcId).booty_call == $time.daystart>>
				"As long as those clothes are coming off in the next 10 seconds," he says, leering at your ass as he steps aside to let you in.
			<<else>>
				"Well I won''t say no to a free fuck," he smirks, stepping aside to let you in and leering at your ass as you walk past.
			<</if>>
			<<act 'Go to the bedroom'>>
				<<gt 'sex_ev_foreplay' 'undress'>>
			<</act>>
		<<else>>
			<<gs 'sex_ev_start' 'uninvited_deny'>>
		<</if>>
	<</actCLA>>
	<<actCLA 'Surprise!'>>
		<<if rand(1,10) < $npc($sex.npcId).sexdrive>>
			<p>"Surprise!" you shout gleefully at a startled <<npc $sex.npcId>><</npc>>. "Just happened to be walking by and I thought I might drop in, see if you wanted to fool around?" You grin at him, bouncing your eyebrows suggestively.</p>
			"Well I won''t say no if that's what you want," he smirks, stepping aside to let you in and leering at your ass as you walk past.
			<<act 'Go to the bedroom'>>
				<<gt 'sex_ev_foreplay' 'undress'>>
			<</act>>
		<<else>>
			<<gs 'sex_ev_start' 'uninvited_deny'>>
		<</if>>
	<</actCLA>>
	<<actCLA 'I need a good fuck'>>
		<<if rand(1,10) < $npc($sex.npcId).sexdrive>>
			<p><<npc $sex.npcId>><</npc>> stands there startled as you step forward, putting your hand on his chest.</p>
			"I need a good fuck and I need it right now," you say.
			A moment passes with you staring into his eyes with a smouldering gaze before he drags you inside, slamming the door behind you.
			<<act 'Go to the bedroom'>>
				<<gt 'sex_ev_foreplay' 'undress'>>
			<</act>>
		<<else>>
			<<gs 'sex_ev_start' 'uninvited_deny'>>
		<</if>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'uninvited_deny'>>
	<<set $npc($sex.npcId).no_booty_call = $time.daystart>>
	<p>"You should've texted," <<npc $sex.npcId>><</npc>> says shaking his head. "I'm not in the mood, maybe some other time."</p>
	He closes the door on you abruptly and you're left standing outside horny and alone.
	<<actCLA 'Leave'>>
		<<gt $loc>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'girlfriend_surprise1'>>
	You knock on the door and you hear the latch unlock and the door swings open.
	<<actCLA 'I was in the neighborhood'>>
		<p>"Hey, I was in the neighborhood-" you start to smile and freeze when you realize it's not <<npc $sex.npcId>><</npc>>, but another woman standing in front of you.</p>
	<</actCLA>>
	<<actCLA 'Surprise!'>>
		<p>"Surprise!" you shout gleefully at a startled <<npc $sex.npcId>><</npc>>. "Just happened to be walking by and I thought I might drop in, see if you wanted to fool around?" You grin at him, bouncing your eyebrows suggestively.</p>
		"Well I won''t say no if that's what you want," he smirks, stepping aside to let you in and leering at your ass as you walk past.
		<<act 'Go to the bedroom'>>
			<<gt 'sex_ev_foreplay' 'undress'>>
		<</act>>
	<</actCLA>>
	<<actCLA 'I need a good fuck'>>
		<p><<npc $sex.npcId>><</npc>> stands there startled as you step forward, putting your hand on his chest.</p>
		"I need a good fuck and I need it right now," you say.
		A moment passes with you staring into his eyes with a smouldering gaze before he drags you inside, slamming the door behind you.
		<<act 'Go to the bedroom'>>
			<<gt 'sex_ev_foreplay' 'undress'>>
		<</act>>
	<</actCLA>>
	<<if getvar("$drunk") == 1>>
		<<actCLA 'Guess who`s drunk!'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'girlfriend_surprise2'>>
<</if>>
<<if $location_var[$here][0] == 'girlfriend_cheater1'>>
	<p>You walk into <<npc $sex.npcId>><</npc>>'s apartment, you freeze as you enter seeing a woman standing there, clearly not expecting someone else to arrive here today.</p>
	<p>woman: "who are you?"</p>
	<p>Sveta: "Uhm, I'm $pc.name_nick, I'm here to see <<npc $sex.npcId>><</npc>>.</p>
	The woman looks at you questiongly, wondering why you're here and how you got a key to the apartment. looking at her face you see she it's dawning on here why you're here.
	<p>"oh fuck" you think inwardly realizing this is either another one of <<npc $sex.npcId>><</npc>> fuckbuddies who didn't know he was fucking other girls or this is a girlfriend.</p>
	<p>"why?" she says with a hint of poison to her words</p>
	Sveta: "ehhh, I'm just here to..."
<</if>>
<<if $location_var[$here][0] == 'undress'>>
	<<gs 'sex_ev_start' 'undress_function'>>
	<<arouse 'foreplay' 2 >>
	<<arouse 'foreplay_give' -2 >>
	<<video "shared/sex/misc/undress1.mp4">>
	The moment you're through the door, the both of you begin discarding clothes in a hurry. By the time you're at the bed, there''s a trail of clothing across the floor.
	<<gs 'sex_ev_start' 'bed_start'>>
<</if>>
<<if $location_var[$here][0] == 'undress_function'>>
	<<if getvar("$CloDress") == 1>>
		<<setinit $sex_ev['CloDress'] = 1>>

	<</if>>
	<<if getvar("$CloStyle2") == 4>>
		<<set $npc($sex.npcId).know_schoolgirl = 1>>

	<</if>>
	<<if $wardrobe.clothingworntype != 'nude'>>
		<<strip 'clothes'>>

	<</if>>
	<<if $wardrobe.isWearingBra>>
		<<strip 'bra'>>

	<</if>>
	<<if $wardrobe.isWearingPanties>>
		<<strip 'panties'>>

	<</if>>
<</if>>
<<if $location_var[$here][0] == 'bed_start'>>
	<!-- !! $sex_ev['bed_room']-->
	<<if rand(0,1) == 1>>
		<!-- !! he wins initiative-->
		<<if $npc($sex.npcId).caretaker == 1 or $npc($sex.npcId).pussyeater == 1>>
			<<gs 'sex_ev_foreplay' 'generous_initiative'>>
		<<elseif $npc($sex.npcId).selfish == 1>>
			<<gs 'sex_ev_foreplay' 'selfish_initiative'>>
		<<else>>
			<<if rand(0,1) == 1>>
				<<gs 'sex_ev_foreplay' 'generous_initiative'>>
			<<else>>
				<<gs 'sex_ev_foreplay' 'selfish_initiative'>>
			<</if>>
		<</if>>
	<<else>>
		<!-- !! player wins initiative-->
		<!-- !!		'You both tear your clothes off, getting naked as fast as possible, you finishing just before he does. You take the extra moment to decide what you want to do...'-->
		<<gs 'sex_ev_foreplay' 'foreplay_choose'>>
	<</if>>
<</if>>
