Merge remote-tracking branch 'Hornguy6/master'

locations/sex_ev_after.qsrc

@@ -1356,10 +1356,14 @@ if $ARGS[0] = 'after_sex2':
 			act'Sleep':gt'sex_ev_after', 'sleep_function'
 		end
 	else
-		if $sex_ev['type'] = 'hookup':
-			gs'sex_ev_hookup_leave', 'gotta_go'
+		if $sex_ev['loc'] = 'pc_home':
+			gs'sex_ev_leave', 'npc_leave'
 		else
-			act'Get dressed':gt'sex_ev_leave', 'dressing1'
+			if $sex_ev['type'] = 'hookup':
+				gs'sex_ev_hookup_leave', 'gotta_go'
+			else
+				act'Get dressed':gt'sex_ev_leave', 'dressing1'
+			end
 		end
 	end
 	if sex_ev['boy_asleep'] = 0:

locations/sex_ev_condoms.qsrc

@@ -26,7 +26,7 @@ end
 
 if $ARGS[0] = 'check_count':
 	if sex_ev['condoms_used'] >= sex_ev['condom_count'] and sex_ev['condom_count'] > 0: 
-		sex_ev['out_of_condoms'] = 1
+		sex_ev['npc_used_all_condoms'] = 1
 	end
 end
 
@@ -105,6 +105,17 @@ if $ARGS[0] = 'condoms':
 				act'Continue':gs 'sex_ev_condoms', 'npc_condom_use'
 			end
 		end
+	elseif sex_ev['pc_out_of_condoms'] = 1 and sex_ev['npc_used_all_condoms'] = 0:
+		if sex_ev['sleepover'] > 0:
+			'You''re about to get into position when you suddenly remember you ran out of condoms last night.'
+			'"Uhm... do you have any condoms?"'
+			gs'sex_ev_condoms', 'pc_no_condoms_left2'
+		else
+			'"I think that was my last condom..." you say.'
+			gs'sex_ev_condoms', 'pc_no_condoms_left'
+		end
+	elseif sex_ev['npc_used_all_condoms'] > 0:
+		gs 'sex_ev_condoms', 'npc_out_of_condoms'
 	end
 end
 
@@ -278,27 +289,31 @@ if $ARGS[0] = 'pc_no_condoms_left':
 		else
 			'"But I''m not ready to stop," you say. "Have you got any?"'
 		end
-		if npc_condom_conscious[$boy] = 1:
-			'"I always have condoms," <<$npc_firstname[$boy]>> says. "You don''t have to keep buying them if you don''t want to, you know. I order in bulk."'
-			gs'sex_ev_sex', 'reset'
-			gs'sex_ev_condoms', 'bulk_condoms'
-			
-			
-		elseif sex_ev['condom_count'] > 0 and sex_ev['condoms_used'] < sex_ev['condom_count']:
-			'"Yeah, I have some," <<$npc_firstname[$boy]>> says.'
-			gs'sex_ev_sex', 'reset'
-			act'Continue':gs 'sex_ev_condoms', 'npc_condom_use'
+		gs'sex_ev_condoms', 'pc_no_condoms_left2'
+	end
+end
+
+if $ARGS[0] = 'pc_no_condoms_left2':
+	if npc_condom_conscious[$boy] = 1:
+		'"I always have condoms," <<$npc_firstname[$boy]>> says. "You don''t have to keep buying them if you don''t want to, you know. I order in bulk."'
+		gs'sex_ev_sex', 'reset'
+		gs'sex_ev_condoms', 'bulk_condoms'
+		
+		
+	elseif sex_ev['condom_count'] > 0 and sex_ev['condoms_used'] < sex_ev['condom_count']:
+		'"Yeah, I have some," <<$npc_firstname[$boy]>> says.'
+		gs'sex_ev_sex', 'reset'
+		act'Continue':gs 'sex_ev_condoms', 'npc_condom_use'
+	else
+		if npc_no_condoms_know[$boy] = 1:
+			'"Come on," <<$npc_firstname[$boy]>> says, rolling his eyes. "You know I hate using condoms. Lucky you can even talk me into using yours."'
 		else
-			if npc_no_condoms_know[$boy] = 1:
-				'"Come on," <<$npc_firstname[$boy]>> says, rolling his eyes. "You know I hate using condoms. Lucky you can even talk me into using yours."'
-			else
-				'<<$npc_firstname[$boy]>> shakes his head.'
-				'"I don''t."'
-			end
-			gs'sex_ev_after', 'no_condom_end'
-			gs'sex_ev_condoms', 'pc_skip_the_condom'
-			gs'sex_ev_condoms', 'no_sex_only'
+			'<<$npc_firstname[$boy]>> shakes his head.'
+			'"I don''t."'
 		end
+		gs'sex_ev_after', 'no_condom_end'
+		gs'sex_ev_condoms', 'pc_skip_the_condom'
+		gs'sex_ev_condoms', 'no_sex_only'
 	end
 end
 
@@ -2093,7 +2108,7 @@ if $ARGS[0] = 'pc_dangerous_day_condom_insist2':
 			gs'sex_ev_after', 'no_condom_end'
 			gs'sex_ev_condoms', 'no_sex_only'
 		else
-			gs 'sex_ev_condoms', 'pc_condoms'
+			gs 'sex_ev_condoms', 'pc_use_condoms'
 		end
 	elseif npc_no_condoms[$boy] > 0:
 		'"Come on, do we really have to? I promise I won''t come inside."'
@@ -2352,6 +2367,7 @@ if $ARGS[0] = 'started_bc1':
 			cla & *nl
 			npc_bareback[$boy] = 1
 			sex_ev['no_condom'] = 1
+			sex_ev['creampie_allowance'] = 1
 			gs 'sex_ev_stats', 'birth_control_know'
 			if sex_ev['pullout_game'] = 1:
 				'"Why bother?" you ask in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
@@ -2367,6 +2383,7 @@ if $ARGS[0] = 'started_bc1':
 			cla & *nl
 			npc_bareback[$boy] = 1
 			sex_ev['no_condom'] = 1
+			sex_ev['creampie_allowance'] = 1
 			if sex_ev['pullout_game'] = 1:
 				'"You better not," you say in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
 			else

locations/sex_ev_cum.qsrc

@@ -2758,6 +2758,7 @@ if $ARGS[0] = 'cum_condom':
 		'<<$npc_firstname[$boy]>> buries his cock inside your pussy. Even through the condom, you feel him <i>swell</i> inside you. And then, <i>release</i>.'
 		*nl
 		'He throbs inside you like a heartbeat and it''s all you need to come as well. You shudder, pussy clamping down hard on his cock and milking it for every last drop of cum into the condom, as you ride out your orgasms together.'
+		gs 'sex_ev_sex', 'sex_end'
 	else
 		if $sex_ev['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie1.mp4"></video></center>'
@@ -2770,36 +2771,9 @@ if $ARGS[0] = 'cum_condom':
 			$sex_ev['cum_describe2'] = 'settling your self down onto his rubber encased cock'
 		end
 		'<<$npc_firstname[$boy]>> buries his cock inside your pussy and you can feel it pulse inside you, straining against the rubber coat around it.'
-	end
-	
-	act'Ride it out':
-		cla & *nl
-		'You wait patiently, letting <<$npc_firstname[$boy]>> empty himself into the condom, until you no longer feel him twitching inside you.'
-		if condom_break > 0:
-			gs'sex_ev_cum', 'broken_condom0'
-		else
-			sex_ev['cum_condom'] += 1
-			gs 'sex_ev_sex', 'sex_end'
-		end
-	end
-	
-	if hypnoHardToCum = 0:
-		act'Come together':
-			cla & *clr
-			if $sex_ev['position'] = 'miss':
-				'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie1.mp4"></video></center>'
-			elseif $sex_ev['position'] = 'doggy':
-				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
-			elseif $sex_ev['position'] = 'cowgirl':
-				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
-			end
-			$orgasm_or = 'yes'
-			gs 'sex_ev_sex', 'fuck_arousal_cum_code'
-			gs'stat'
-			sex_ev['came_together'] = 1
-			sex_ev['orgasm_count'] += 1
-			sex_ev['simultaneous_orgasm_count'] += 1
-			'<<$npc_firstname[$boy]>>''s pulsing cock is the final straw and a dam breaks inside you as your climax erupts. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you lay there panting.'
+		act'Ride it out':
+			cla & *nl
+			'You wait patiently, letting <<$npc_firstname[$boy]>> empty himself into the condom, until you no longer feel him twitching inside you.'
 			if condom_break > 0:
 				gs'sex_ev_cum', 'broken_condom0'
 			else
@@ -2807,17 +2781,43 @@ if $ARGS[0] = 'cum_condom':
 				gs 'sex_ev_sex', 'sex_end'
 			end
 		end
-	end
-	
-	act'Tolerate it (disgust)':
-		cla & *nl
-		'You lay there, trying not to squirm as <<$npc_firstname[$boy]>> orgasm pumps load after load into your womb. Despite the condom safely encasing his cock, the idea of him filling you up is enough to fill you with disgust and you don''t move, waiting until you no longer feel him twitching inside you.'
 		
-		if condom_break > 0:
-			gs'sex_ev_cum', 'broken_condom0'
-		else
-			sex_ev['cum_condom'] += 1
-			gs 'sex_ev_sex', 'sex_end'
+		if hypnoHardToCum = 0:
+			act'Come together':
+				cla & *clr
+				if $sex_ev['position'] = 'miss':
+					'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie1.mp4"></video></center>'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
+				elseif $sex_ev['position'] = 'cowgirl':
+					'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
+				end
+				$orgasm_or = 'yes'
+				gs 'sex_ev_sex', 'fuck_arousal_cum_code'
+				gs'stat'
+				sex_ev['came_together'] = 1
+				sex_ev['orgasm_count'] += 1
+				sex_ev['simultaneous_orgasm_count'] += 1
+				'<<$npc_firstname[$boy]>>''s pulsing cock is the final straw and a dam breaks inside you as your climax erupts. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you lay there panting.'
+				if condom_break > 0:
+					gs'sex_ev_cum', 'broken_condom0'
+				else
+					sex_ev['cum_condom'] += 1
+					gs 'sex_ev_sex', 'sex_end'
+				end
+			end
+		end
+		
+		act'Tolerate it (disgust)':
+			cla & *nl
+			'You lay there, trying not to squirm as <<$npc_firstname[$boy]>> orgasm pumps load after load into your womb. Despite the condom safely encasing his cock, the idea of him filling you up is enough to fill you with disgust and you don''t move, waiting until you no longer feel him twitching inside you.'
+			
+			if condom_break > 0:
+				gs'sex_ev_cum', 'broken_condom0'
+			else
+				sex_ev['cum_condom'] += 1
+				gs 'sex_ev_sex', 'sex_end'
+			end
 		end
 	end
 end

locations/sex_ev_events.qsrc

@@ -36,7 +36,7 @@ if $ARGS[0] = 'sex_film_protest':
 				'With great reluctance, you silence your protests and let <<$npc_firstname[$boy]>> film you getting fucked by him. Though you still can''t stop yourself from shamefully (and ineffectively) trying to cover your face.'
 				*nl
 				'You can''t help but breathe a sigh of relief when he finally puts the phone away. But only after getting a decently long video...'
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			
 			act'Keep protesting':
@@ -58,7 +58,7 @@ if $ARGS[0] = 'sex_film_protest':
 					*nl
 					'Your weak protests do nothing to sway him and he takes a decently long video of you getting railed before he finally puts the phone away.'
 				end
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			
 			gs 'sex_ev_events', 'sex_film_force_stop'
@@ -77,7 +77,7 @@ if $ARGS[0] = 'sex_film_protest':
 				'With great reluctance, you silence your protests and let <<$npc_firstname[$boy]>> film you getting fucked by him. Though you still can''t stop yourself from shamefully (and ineffectively) trying to cover your face.'
 				*nl
 				'You can''t help but breathe a sigh of relief when he finally puts the phone away. But only after getting a decently long video...'
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			
 			act'Keep protesting':
@@ -103,7 +103,7 @@ if $ARGS[0] = 'sex_film_protest':
 					*nl
 					'Your irritation with <<$npc_firstname[$boy]>> do nothing to sway him and he takes a decently long video of you getting railed before he finally puts the phone away.'
 				end
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			gs 'sex_ev_events', 'sex_film_force_stop'
 		end
@@ -121,7 +121,7 @@ if $ARGS[0] = 'sex_film_protest':
 				'You let <<$npc_firstname[$boy]>> film you getting fucked by him, fuming in silence, occasionally turning to cover your face just to spite him.'
 				*nl
 				'You can''t help but breathe a sigh of relief when he finally puts the phone away. But only after getting a decently long video...'
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			
 			act'Keep protesting':
@@ -147,7 +147,7 @@ if $ARGS[0] = 'sex_film_protest':
 					*nl
 					'He takes a decently long video of you getting railed, screaming in rage the whole time, before he finally puts the phone away.'
 				end
-				gs 'sex_ev_cum', 'fuck_cum'
+				gs 'sex_ev_events', 'sex_film_end'
 			end
 			gs 'sex_ev_events', 'sex_film_force_stop'
 		end
@@ -236,6 +236,11 @@ if $ARGS[0] = 'sex_film_accept':
 	end
 end
 
+if $ARGS[0] = 'sex_film_end':
+	if (npc_abusive[$boy] = 1 or rand(1,3) = 1) and npc_caretaker[$boy] > 1 and sex_ev['phone_film'] ! -1:gs 'fame', 'sex', $region, 5
+	gs 'sex_ev_cum', 'fuck_cum'
+end
+
 if $ARGS[0] = 'offer_ciga1':
 	*nl
 	'"You want one?" he asks, holding the open packet towards you.'

locations/sex_ev_foreplay.qsrc

@@ -8,8 +8,8 @@ if $ARGS[0] = 'cock_react':
 end
 
 if $ARGS[0] = 'bed_start':
+	cla
 	sex_ev['start_time'] = totminut
-	gs 'sex_ev_start', 'undress_function'
 	!! $sex_ev['bed_room']
 	if rand(0,1) = 1:
 		!! he wins initiative
@@ -44,6 +44,8 @@ if $ARGS[0] = 'generous_initiative':
 			'<<$npc_firstname[$boy]>> shoves you backwards onto onto the bed begins laying a trail of kisses, heading down between your legs.'
 		end
 		gs 'sex_ev_foreplay', 'kuni_start'
+	elseif sex_ev['sensitive_cuni'] = 1:
+		act'Continue':gs 'sex_ev_foreplay', 'selfish_fuck_start'
 	else
 		!! nipple play
 		if sex_ev['start_shower'] = 1:
@@ -511,6 +513,7 @@ end
 
 if $ARGS[0] = 'cuni_too_sensitive':
 	act'Stop him (too sensitive)':
+		sex_ev['sensitive_cuni'] = 1
 		cla & *clr
 		!! IMAGE HERE
 		$sex_ev['bed_room']

locations/sex_ev_hookup_leave.qsrc

@@ -383,7 +383,7 @@ if $ARGS[0] = 'npc_sugar_daddy_offer2':
 	'"How about we do this again?" <<$npc_firstname[$boy]>> says.'
 	'"Do what?" you ask back, <<$sex_ev[''dress_describe'']>>.'
 	if sex_ev['prostitution'] > 0:
-		'"This," he says again, gesturing vaguely around the room. "I you can keep me company and I can get you some... compensation."'
+		'"This," he says again, gesturing vaguely around the room. "You can keep me company and I can get you some... compensation."'
 	else
 		'"This," he says again, gesturing vaguely around the room. "And maybe for your time and your company I could find you some... compensation."'
 	end

locations/sex_ev_morning.qsrc

@@ -49,7 +49,7 @@ if $ARGS[0] = 'morning_menu1':
 		
 		if npc_earlyriser[$boy] = 1 and sex_ev['npc_morning_shower'] = 1 and sex_ev['morning_shower'] = 0:
 			if npc_apt_type[$boy] = 2 or npc_apt_type[$boy] = 3 or $sex_ev['loc'] = 'hotel_room':
-				act'Join <<$npc_firstname[$boy]>> in the shower':gt'sex_ev_shower', 'morning_shower_join1'
+				act'Join <<$npc_firstname[$boy]>> in the shower':gt'sex_ev_shower', 'shower_join1'
 			else
 				act'Look for <<$npc_firstname[$boy]>>':gt'sex_ev_shower', 'morning_look1'
 			end

locations/sex_ev_pillow_talk.qsrc

@@ -66,13 +66,14 @@ if $ARGS[0] = 'topics':
 			end
 			gs'sex_ev_talk', 'ma_pill_money'
 		end
+		gs'sex_ev_pillow_talk2', 'talk_late_for_school'
+		gs'sex_ev_pillow_talk2', 'take_a_shower'
 		if sex_ev['boy_pillow_talk'] > 0:
 			sex_ev['boy_pillow_talk'] = 0
 			gs'sex_ev_boy_pillow_talk', 'boy_talk'
 		else
 			sex_ev['boy_pillow_talk'] += 1
 		end
-		gs'sex_ev_pillow_talk2', 'talk_late_for_school'
 	end
 end
 
@@ -117,7 +118,7 @@ if $ARGS[0] = 'cum_talk':
 	gs'sex_ev_pillow_talk', 'broken_creampie_rule'
 	gs'sex_ev_pillow_talk', 'plastered'
 	gs'sex_ev_pillow_talk', 'thank_no_creampie'
-	gs'sex_ev_pillow_talk', 'mess_for_maids'
+	gs'sex_ev_pillow_talk', 'sex_mess'
 	if sex_ev['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_pillow_talk', 'free_creampies'
 	if sex_ev['pullout_count'] > 0 and sex_ev['creampie_count'] = 0 and npc_creampie_permission[$boy] = 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_talk', 'creampie_permission1'
 end
@@ -833,80 +834,92 @@ if $ARGS[0] = 'wish_no_condoms1':
 end
 
 if $ARGS[0] = 'wish_no_condoms2':
-	if daystart < npc_bc_promise[$boy] and npc_know_bc[$boy] ! 1:
-		'"But you said you were gonna start birth control, didn''t you?"'
-		act'Eventually...':
-			cla & *nl
-			!!npc_bc_eventually[$boy] += 1
-			'"Yeah, yeah," you say. "I''ll get to it eventually."'
-			'<<$npc_firstname[$boy]>> gives you a look but doesn''t say anything.'
-			gs'sex_ev_pillow_talk', 'topic_route'
-		end
-		if npc_bc_promise[$boy] = daystart or npc_bc_promise[$boy] = daystart - 1:
-			act'Give me some time (laugh)':
-				cla & *nl
-				iif(npc_bc_promise[$boy] = daystart, '"Yeah, maybe <i>later</i>," you giggle. "I only just told you today. Give me a few days at least."', '"Yeah, maybe in a few days," you giggle. "I only just told you <i>yesterday!</i> Give me a little time."')
-				gs'sex_ev_pillow_talk', 'topic_route'
-			end
-			
-			act'Give me some time (annoyed)':
+	if daystart > npc_bc_promise[$boy] and npc_bc_promise[$boy] > 0 and npc_know_bc[$boy] ! 1:
+		if pillcon2 = 0:
+			'"But you said you were gonna start birth control, didn''t you?"'
+			act'Eventually...':
 				cla & *nl
-				iif(npc_bc_promise[$boy] = daystart, '"Yeah, maybe <i>later</i>," you scowl. "I only just told you <i>today</i>. At least give me a few days before you start hounding me. Sheesh."', '"Yeah, maybe <i>later</i>," you scowl. "I only just told you <i>yesterday</i>. At least give me a few days before you start hounding me. Sheesh."')
+				!!npc_bc_eventually[$boy] += 1
+				'"Yeah, yeah," you say. "I''ll get to it eventually."'
+				'<<$npc_firstname[$boy]>> gives you a look but doesn''t say anything.'
 				gs'sex_ev_pillow_talk', 'topic_route'
 			end
-		else
-			act'Oops, forgot':
-				cla & *nl
-				'You blink.'
-				'"Oh. Yeah. I forgot about that..." You smile sheepishly.'
-				'"Are you sure this is a good idea?" <<$npc_firstname[$boy]>> asks, looking concerned.'
-				'"What? Why?"'
-				'"You know that birth control usually involves remembering to take a pill, right?"'
-				act'Reconsider':
-					cla & *clr
-					$sex_ev['bed_room']
-					'You stop to consider the question.'
-					'<i>Is</i> this a good idea?'
-					iif(age < 20, 'Forgetfulness could be the difference between a happy sex life and becoming a teen mom. And it''s a lot harder to forget to put on a condom.','Forgetfulness could be the difference between a happy sex life and suddenly finding yourself a mom. And it''s a lot harder to forget to put on a condom.')
-					act'Maybe stick to condoms':
-						npc_bc_promise[$boy] = 0
-						cla & *clr
-						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-						'"Maybe..." you say slowly. "... we should just stick to condoms..."'
-						'<<$npc_firstname[$boy]>> smiles at you, but also breathes a sigh, looking relieved.'
-						gs'sex_ev_pillow_talk', 'topic_route'
-					end
-					
-					act'No, you''ll follow through':
-						cla & *clr
-						'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
-						'"No," you shake your head and look into <<$npc_firstname[$boy]>>''s eyes. "I''ll be good, I promise. I won''t mess up with my future on the line."'
-						iif(npc_childfree[$boy] = 0, 'He stares back at you, looking concerned but doesn''t say anything further and lets the matter drop.','"It''s not just your future on the line you know..." he replies, looking serious.')
-						gs'sex_ev_pillow_talk', 'topic_route'
-					end
-				end
-				
-				act'It''ll be fine':
+			if npc_bc_promise[$boy] = daystart or npc_bc_promise[$boy] = daystart - 1:
+				act'Give me some time (laugh)':
 					cla & *nl
-					'"It''ll be fine," you say, smiling gently. "Just trust me."'
-					'He gives you a look but doesn''t say anything further and lets the matter drop.'
+					iif(npc_bc_promise[$boy] = daystart, '"Yeah, maybe <i>later</i>," you giggle. "I only just told you today. Give me a few days at least."', '"Yeah, maybe in a few days," you giggle. "I only just told you <i>yesterday!</i> Give me a little time."')
 					gs'sex_ev_pillow_talk', 'topic_route'
 				end
 				
-				act'It''ll be <i>fiiiiine</i>':
+				act'Give me some time (annoyed)':
 					cla & *nl
-					'"Don''t worry about it," you say, casually brushing it off. "It''ll be <i>fiiiiine</i>."'
-					'He stares back at you, looking concerned but doesn''t say anything further and lets the matter drop.'
+					iif(npc_bc_promise[$boy] = daystart, '"Yeah, maybe <i>later</i>," you scowl. "I only just told you <i>today</i>. At least give me a few days before you start hounding me. Sheesh."', '"Yeah, maybe <i>later</i>," you scowl. "I only just told you <i>yesterday</i>. At least give me a few days before you start hounding me. Sheesh."')
 					gs'sex_ev_pillow_talk', 'topic_route'
 				end
-				
-				act'Not if you get the shot':
+			else
+				act'Oops, forgot':
 					cla & *nl
-					'"I don''t need to remember anything if I get the shot," you grin back.'
-					'"Except when you need to renew it." Despite the jab, he smiles back looking nearly excited.'
-					gs'sex_ev_pillow_talk', 'topic_route'
+					'You blink.'
+					'"Oh. Yeah. I forgot about that..." You smile sheepishly.'
+					'"Are you sure this is a good idea?" <<$npc_firstname[$boy]>> asks, looking concerned.'
+					'"What? Why?"'
+					'"You know that birth control usually involves remembering to take a pill, right?"'
+					act'Reconsider':
+						cla & *clr
+						$sex_ev['bed_room']
+						'You stop to consider the question.'
+						'<i>Is</i> this a good idea?'
+						iif(age < 20, 'Forgetfulness could be the difference between a happy sex life and becoming a teen mom. And it''s a lot harder to forget to put on a condom.','Forgetfulness could be the difference between a happy sex life and suddenly finding yourself a mom. And it''s a lot harder to forget to put on a condom.')
+						act'Maybe stick to condoms':
+							npc_bc_promise[$boy] = 0
+							cla & *clr
+							'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+							'"Maybe..." you say slowly. "... we should just stick to condoms..."'
+							'<<$npc_firstname[$boy]>> smiles at you, but also breathes a sigh, looking relieved.'
+							gs'sex_ev_pillow_talk', 'topic_route'
+						end
+						
+						act'No, you''ll follow through':
+							cla & *clr
+							'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+							'"No," you shake your head and look into <<$npc_firstname[$boy]>>''s eyes. "I''ll be good, I promise. I won''t mess up with my future on the line."'
+							iif(npc_childfree[$boy] = 0, 'He stares back at you, looking concerned but doesn''t say anything further and lets the matter drop.','"It''s not just your future on the line you know..." he replies, looking serious.')
+							gs'sex_ev_pillow_talk', 'topic_route'
+						end
+					end
+					
+					act'It''ll be fine':
+						cla & *nl
+						'"It''ll be fine," you say, smiling gently. "Just trust me."'
+						'He gives you a look but doesn''t say anything further and lets the matter drop.'
+						gs'sex_ev_pillow_talk', 'topic_route'
+					end
+					
+					act'It''ll be <i>fiiiiine</i>':
+						cla & *nl
+						'"Don''t worry about it," you say, casually brushing it off. "It''ll be <i>fiiiiine</i>."'
+						'He stares back at you, looking concerned but doesn''t say anything further and lets the matter drop.'
+						gs'sex_ev_pillow_talk', 'topic_route'
+					end
+					
+					act'Not if you get the shot':
+						cla & *nl
+						'"I don''t need to remember anything if I get the shot," you grin back.'
+						'"Except when you need to renew it." Despite the jab, he smiles back looking nearly excited.'
+						gs'sex_ev_pillow_talk', 'topic_route'
+					end
 				end
 			end
+		elseif npc_know_bc_not_effective[$boy] = 1:
+			'"I can''t wait until your birth control is ready," <<$npc_firstname[$boy]>> says.'
+			'"Me either," you agree.'
+			gs'sex_ev_pillow_talk', 'topic_route'
+		else
+			npc_know_bc_not_effective[$boy] = 1
+			'"But you said you were gonna start birth control, didn''t you?"'
+			'"I did," you smile. "I''m on the pill now. But it''s not ready yet. Still going to be a while longer until it''s safe."'
+			'"Can''t come soon enough," he smiles back.'
+			gs'sex_ev_pillow_talk', 'topic_route'
 		end
 	elseif npc_condom_conscious[$boy] > 0:
 		if $npc_cum_pref[$boy] = 'creampie' and sex_ev['want_creampie_talk'] = 1:
@@ -1285,9 +1298,9 @@ if $ARGS[0] = 'thank_no_creampie':
 							act'Birth control hasn''t kicked in':
 								npc_know_start_bc[$boy] = 1
 								cla & *nl
-								'"I just started the pill," you say. "But it hasn''t kicked in yet."'
+								'"Probably," you smile wryly. "My birth control hasn''t kicked in yet."'
 								if $npc_cum_pref[$boy] = 'creampie':
-									'"Tell me when it does," he says. "I can''t wait to pump you full of cum."'
+									'"Tell me when it does," he says. "I''ll come to pump you full of cum."'
 									
 									act'We''ll see':
 										cla & *nl
@@ -1625,47 +1638,84 @@ if $ARGS[0] = 'plastered':
 	end
 end
 
-if $ARGS[0] = 'mess_for_maids':
+if $ARGS[0] = 'mess_text':
 	if $sex_ev['loc'] = 'hotel_room' and sex_ev['mess_for_maid_talk'] = 0 and sex_ev['cum_count'] >= 5 and sex_ev['cum_count'] - (sex_ev['cum_mouth'] - sex_ev['facial_count']) >= 4:
-		act'A real mess for the maids':
-			sex_ev['mess_for_maid_talk'] = 1
+		$sex_ev['mess_act'] = 'A real mess for the maids'
+		$sex_ev['mess_dialogue1'] = 'We made a real mess for the maids to clean up,'
+	elseif $sex_ev['loc'] = 'pc_home' and sex_ev['wash_sheets_talk'] = 0 and $sex_ev['bed_choice'] = 'anya_bed':
+		$sex_ev['mess_act'] = 'My sister''s gonna kill me'
+		$sex_ev['mess_dialogue1'] = 'Oh man...'
+	elseif $sex_ev['loc'] = 'pc_home' and sex_ev['wash_sheets_talk'] = 0:
+		$sex_ev['mess_act'] = 'Need to wash my sheets'
+		$sex_ev['mess_dialogue1'] = 'I''m gonna have to wash my sheets after this,'
+	end
+end
+
+if $ARGS[0] = 'sex_mess':
+	gs'sex_ev_pillow_talk', 'mess_text'
+	if (($sex_ev['loc'] = 'hotel_room' and sex_ev['mess_for_maid_talk'] = 0) or ($sex_ev['loc'] = 'pc_home' and sex_ev['wash_sheets_talk'] = 0)) and sex_ev['cum_count'] >= 5 and sex_ev['cum_count'] - (sex_ev['cum_mouth'] - sex_ev['facial_count']) >= 4:
+		act'<<$sex_ev[''mess_act'']>>':
 			cla & *clr
+			sex_ev['wash_sheets_talk'] = 1
+			sex_ev['mess_for_maid_talk'] = 1
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			if sex_ev['virgin'] = 1 and sex_ev['fuck_count'] > 0:
 				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the cum on the bed and the used condoms scattered across the room,' + iif(sex_ev['orgasm_count'] >= 3, ' wet spots of pussy juice soaking into the sheets and light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
 				elseif sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the light pink blots of blood from your lost virginity.', ' As well as the light pink blots of blood from your lost virginity.')
 				else
-					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your virginity mixing in.', ' As well as the light pink blots of blood from your lost virginity.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your virginity mixing in.', ' As well as the light pink blots of blood from your lost virginity.')
 				end
 			elseif mesec > 0 and sex_ev['fuck_count'] > 0:
 				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
 				elseif sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets, as well as the dark red stains streaking across the sheets from your period.', ' As well as the dark red stains streaking across the sheets from your period.')
 				else
-					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your period mixing in.', ' As well as the dark red stains streaking across the sheets from your period.')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress, tinged pink by the blood of your period mixing in.', ' As well as the dark red stains streaking across the sheets from your period.')
 				end
 			else
 				if sex_ev['cum_count'] - sex_ev['cum_condom'] > 1 and sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the cum on the bed and the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
 				elseif sex_ev['cum_condom'] >= 4:
-					'"We made a real mess for the maids to clean up," you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the used condoms scattered across the room.' + iif(sex_ev['orgasm_count'] >= 3, ' Not to mention the large wet spots of your own pussy juice soaking into the sheets.', ' ')
 				else
-					'"We made a real mess for the maids to clean up," you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress.', ' ')
+					'"<<$sex_ev[''mess_dialogue1'']>>" you say, looking at all of the ' + iif(sex_ev['orgasm_count'] >= 3, 'cum and pussy juice leftover from your lovemaking currently soaking into the bedsheets.', 'cum spattered across the bedsheets.') + iif($cum_loc['vagina'] >= 0, ' Not to mention <<$npc_firstname[$boy]>>''s load still oozing from your pussy into the mattress.', ' ')
 				end
 			end
-			
-			if npc_wife[$boy] = 1 and $npc_fidelity[$npclastgenerated] = 'cheater' and rand(1,2) = 1:
-				npc_has_wife_know[$boy] = 1
-				'"This is a bigger mess than I made with my wife on my first honeymoon," he chuckles.'
-			else
-				if rand(1,2) = 1:
-					'"I''m sure they''ve seen worse," he chuckles.'
+			if $sex_ev['bed_choice'] = 'anya_bed':
+				*nl
+				iif(sisterQW['sex_bed_count'] = 1,'"My sister is gonna kill me for fucking a guy in her bed," you smile ruefully at <<$npc_firstname[$boy]>>.', '"My sister is gonna kill me for fucking another guy in her bed," you smile ruefully at <<$npc_firstname[$boy]>>.')
+			end
+			if $sex_ev['mess_act'] = 'A real mess for the maids':
+				sex_ev['mess_for_maid_talk'] = 1
+				if npc_wife[$boy] = 1 and $npc_fidelity[$npclastgenerated] = 'cheater' and rand(1,2) = 1:
+					npc_has_wife_know[$boy] = 1
+					'"This is a bigger mess than I made with my wife on my first honeymoon," he chuckles.'
 				else
-					'"At least we don''t have to do it," he chuckles.'
+					if rand(1,2) = 1:
+						'"I''m sure they''ve seen worse," he chuckles.'
+					else
+						'"At least we don''t have to do it," he chuckles.'
+					end
+				end
+				!!gs'sex_ev_pillow_talk', 'topic_route'
+			elseif $sex_ev['mess_act'] = 'My sister''s gonna kill me':
+				
+				if $npc_humor[$boy] = 'perverted':
+					'"Maybe she''ll like the cum stains," he grins back.'
+				else
+					if rand(1,2) = 1:
+						'"Maybe she won''t notice," he chuckles.'
+					else
+						'"Maybe you can wash the sheets before she gets home," he chuckles.'
+					end
 				end
+				
+			elseif $sex_ev['mess_act'] = 'Need to wash my sheets':
+				if $npc_humor[$boy] = 'perverted': '"You don''t like your sheets cum-stained?" he grins back.'
+				!!gs'sex_ev_pillow_talk', 'topic_route'
 			end
 			gs'sex_ev_pillow_talk', 'topic_route'
 		end
@@ -1912,14 +1962,14 @@ if $ARGS[0] = 'free_creampies2':
 		'"I assume that means no more condoms then?" he asks.'
 		if npc_free_creampies[$boy] = 2:
 			'"No more condoms," you smile back.'
-			gs'sex_ev_talk', 'free_creampies_exit'
+			gs'sex_ev_talk', 'topic_exit'
 		else
 			act'No more condoms':
 				cla & *nl
 				npc_free_creampies[$boy] = 2
 				npc_bareback[$boy] = 1
 				'"No more condoms," you smile back.'
-				gs'sex_ev_talk', 'free_creampies_exit'
+				gs'sex_ev_talk', 'topic_exit'
 			end
 			
 			if birth_control['think_safe'] = 0:
@@ -1928,7 +1978,7 @@ if $ARGS[0] = 'free_creampies2':
 					npc_bareback[$boy] = 1
 					cla & *nl
 					'"Just remember to pull out when I''m ovulating," you smirk in reply.'
-					gs'sex_ev_talk', 'free_creampies_exit'
+					gs'sex_ev_talk', 'topic_exit'
 				end
 				
 				act'Condoms on danger days':
@@ -1937,7 +1987,7 @@ if $ARGS[0] = 'free_creampies2':
 					gs'sex_ev_stats', 'no_birth_control_know'
 					cla & *nl
 					'"Only when it''s safe," you reply. "I''m not on birth control so we''ll still need to use them when I''m fertile."'
-					gs'sex_ev_talk', 'free_creampies_exit'
+					gs'sex_ev_talk', 'topic_exit'
 				end
 			end
 		end

locations/sex_ev_pillow_talk2.qsrc

@@ -8,7 +8,6 @@ if $ARGS[0] = 'small_talk':
 	gs'sex_ev_pillow_talk2', 'plans_later'
 	gs'sex_ev_pillow_talk2', 'weather_talk'
 	gs'sex_ev_pillow_talk2', 'fav_body_part'
-	gs'sex_ev_pillow_talk2', 'take_a_shower'
 !!	gs'sex_ev_work_talk1', 'job_talk'
 
 	if sex_ev['sleepover'] = 1:gs'sex_ev_talk', 'morning_talk'

locations/sex_ev_reactions.qsrc

@@ -446,7 +446,7 @@ if $ARGS[0] = 'bask_external_cum2':
 		iif(sex_ev['catch_breath'] = 1, 'You lay back, panting hard to catch your breath, the warm glaze of <<$npc_firstname[$boy]>>''s cum across your chest already beginning to cool. It''s several minutes before your breathing finally calms.', 'You lay back, panting as you wind down, the warm glaze of <<$npc_firstname[$boy]>>''s cum across your chest already beginning to cool. You didn''t come, but that was <i>good</i>...')
 	elseif $sex_ev['last_cum'] = 'pullout':
 		if $sex_ev['position'] = 'miss' or $sex_ev['position'] = 'cowgirl':
-			'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/sleep1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/after2.jpg"></center>'
 			iif(sex_ev['catch_breath'] = 1, 'You lay back, panting hard to catch your breath, feeling the warm cum on your belly already beginning to cool. It''s several minutes before your breathing finally calms.', 'You lay back, panting as you wind down, feeling the warm cum on your belly already beginning to cool. You didn''t come, but that was <i>good</i>...')
 		elseif $sex_ev['position'] = 'doggy':
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
@@ -518,7 +518,7 @@ end
 
 if $ARGS[0] = 'why_not_inside':
 	!!if sex_ev['no_condom'] = 1 and (sex_ev['promise_no_creampie'] ! 1 or sex_ev['creampie_allowance'] = 1) and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and sex_ev['last_cum'] = 'pullout':
-	if sex_ev['no_condom'] = 1 and sex_ev['promise_no_creampie'] ! 1 and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and sex_ev['last_cum'] = 'pullout':
+	if sex_ev['no_condom'] = 1 and sex_ev['promise_no_creampie'] ! 1 and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and $sex_ev['last_cum'] = 'pullout':
 		act'Why didn''t you come inside me?':
 			cla & *clr
 			if $sex_ev['position'] = 'miss':

locations/sex_ev_reactions_creampie.qsrc

@@ -1531,7 +1531,11 @@ if $ARGS[0] = 'creampie_apologize':
 				'"Sorry," you tease as you unlock your legs from behind <<$npc_firstname[$boy]>>. "I couldn''t resist."'
 			elseif $sex_ev['position'] = 'cowgirl':
 				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
-				'"Sorry," you tease, sitting back on your haunches and taking extreme pleasure in the way it <i>squeezes</i> <<$npc_firstname[$boy]>>''s cum around his cock inside you. "I couldn''t resist."'
+				if sex_ev['came_together']:
+					'"Sorry," you pant, coming down from your own orgasm and sitting back on <<$npc_firstname[$boy]>>''s cock, taking extreme pleasure in the way the movement <i>squeezes</i> cum around it inside you. "I couldn''t resist."'
+				else
+					'"Sorry," you tease, sitting back on <<$npc_firstname[$boy]>>''s cock, taking extreme pleasure in the way the movement <i>squeezes</i> cum around it inside you. "I couldn''t resist."'
+				end
 			end
 			
 			gs 'sex_ev_sex', 'sex_end'
@@ -2797,7 +2801,7 @@ if $ARGS[0] = 'creampie_accident_birth_control':
 			'"Does... does that mean I can come inside you in the future?"'
 			gs 'sex_ev_talk', 'creampie_permission2'
 		end
-	else
+	elseif birth_control['think_safe'] = 0:
 		act'If I get pregnant, you better take responsibility (tease)':
 			cla & *nl
 			'"If I get pregnant, you better take responsibility for this," you say with a smile to let him know you''re only teasing. He seems deeply discomforted by your joke though...'

locations/sex_ev_sex.qsrc

@@ -27,23 +27,31 @@ if $ARGS[0] = 'sex_start':
 			else
 !!					cla & *nl
 				cla
-				$sex_ev['reset_pos'] = $sex_ev['position']
-!!					minut += rand(1,2)
-!!					'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
-				act'Stay in the same position':
-					cla
-					gs 'sex_ev_sex', 'reset'
-					if sex_ev['no_condom'] ! 1:
-						gs 'sex_ev_condoms', 'condoms'
-					else
-						gt 'sex_ev_<<$sex_ev[''reset_pos'']>>', $sex_ev['pos_speed']
+				if $sex_ev['position'] ! '':
+					$sex_ev['reset_pos'] = $sex_ev['position']
+	!!					minut += rand(1,2)
+	!!					'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
+					act'Stay in the same position':
+						cla
+						gs 'sex_ev_sex', 'reset'
+						if sex_ev['no_condom'] ! 1:
+							gs 'sex_ev_condoms', 'condoms'
+						else
+							gt 'sex_ev_<<$sex_ev[''reset_pos'']>>', $sex_ev['pos_speed']
+						end
 					end
-				end
-				
-				act'Change positions':
-					sex_ev['force_initiative'] = 1
-					sex_ev['change_pos'] = 1
-					cla
+					
+					act'Change positions':
+						sex_ev['force_initiative'] = 1
+						sex_ev['change_pos'] = 1
+						cla
+						if sex_ev['no_condom'] ! 1:
+							gs 'sex_ev_condoms', 'condoms'
+						else
+							gs 'sex_ev_sex', 'position_choose'
+						end
+					end
+				else
 					if sex_ev['no_condom'] ! 1:
 						gs 'sex_ev_condoms', 'condoms'
 					else
@@ -1427,6 +1435,7 @@ if $ARGS[0] = 'session_reset':
 	!!sex_ev['start_time'] = totminut
 	sex_ev['force_harden'] = 0
 	sex_ev['not_done'] = 0
+	sex_ev['boy_shower'] = 0
 	gs 'sex_ev_sex', 'reset'
 end
 
@@ -1506,7 +1515,6 @@ if $ARGS[0] = 'reset':
 	sex_ev['cant_hold_cum'] = 0
 	sex_ev['condom_check'] = 0
 	sex_ev['fuck_pos'] = 0
-	sex_ev['boy_shower'] = 0
 	$sex_ev['end_comment'] = ''
 	$sex_ev['cum_together_dialogue1'] = ''
 	sex_ev['hypno_came_together'] = 0

locations/sex_ev_shower.qsrc

@@ -139,7 +139,7 @@ if $ARGS[0] = 'after_alone':
 				'You masturbate to get one more orgasm.'
 			end
 		end
-		gs 'sex_ev_foreplay', 'after_alone_towel'
+		gs 'sex_ev_shower', 'after_alone_towel'
 	end
 end
 
@@ -164,6 +164,7 @@ if $ARGS[0] = 'after_alone_towel':
 		gs'sex_ev_after', 'after_sex2'
 	end
 	act'Skip the towel':
+		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/no_towel.jpg"></center>'
 		'You give your hair a quick wipe with <<$npc_firstname[$boy]>>''s towel to leave it merely damp instead of soaked and exit the bathroom.'
 		'His eyes light up as you step into his bedroom, naked, and still wet from the shower.'
@@ -232,6 +233,7 @@ if $ARGS[0] = 'shower_join1':
 	cla & *clr
 	sex_ev['join_shower'] = 1
 	sex_ev['boy_shower'] = 1
+	sex_ev['orgasm'] = orgasm
 	'<center><video autoplay loop src="images/shared/sex/shower/join1.mp4"></video></center>'
 	'A blast of steam hits you in the face as you open the bathroom door. You pad your way inside and open the shower to find <<$npc_firstname[$boy]>> under the faucet.'
 	gs 'sex_ev_shower', 'shower_join2'
@@ -425,7 +427,7 @@ if $ARGS[0] = 'shower_together_jerkoff1':
 		'You and <<$npc_firstname[$boy]>> face each other, staring into one another''s eyes as you fondle your most intimate parts. His cock is alive in your hand, twitching, stiffening, and pulsing as you work it with fervor. His fingers are on your clit, flicking your bean with intensity, occasionally slipping past to worm their way into your dripping snatch.'
 		*nl
 		'It feels as though the steam should be coming from your heavy breaths instead of the water.'
-		gs'sex_ev_shower', 'shower_together_jerkoff_cum1'
+		act'Make him cum':gs'sex_ev_shower', 'shower_together_jerkoff_cum'
 		gs'sex_ev_shower', 'together_bj1'
 		gs'sex_ev_shower', 'together_fuck_menu'
 	end
@@ -709,38 +711,37 @@ if $ARGS[0] = 'shower_together_jerkoff_cum':
 		'"Not inside me!" you yelp.'
 		*nl
 		'You practically jump off of his cock and begin furiously working it with your hand. Not even a second later, cum explodes from the tip, spattering across your stomach.'
-	else
-		$orgasm_or = 'yes'
+	elseif sex_ev['orgasm'] < orgasm:
 		gs'arousal', 'hj',-1
 		'Tension builds up inside you to bursting. You feel <<$npc_firstname[$boy]>>''s cock throb in your hand and you know he''s about to burst too.'
 		*nl
 		'You work him even harder, trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. The feel of his cum spattering across your stomach is the last thing you need and you come as well, moaning loudly even as you continue to finish him off.'
+	else
+		gs'arousal', 'hj',-1
+		'Tension builds up inside you to bursting. You feel <<$npc_firstname[$boy]>>''s cock throb in your hand and you can tell he''s about to burst.'
+		*nl
+		'You work him even harder, trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. It spatters across your belly, his cock pulsing in your hand, and you milk him for every last drop.'
 	end
 	gs 'sex_ev_shower', 'shower_together_end'
 end
 
 if $ARGS[0] = 'shower_cum_mouth1':
-	act'Make him come':
-		gs 'cum_call', 'mouth_swallow', $boy, 1
-		sex_ev['cum_count'] += 1
-		gs 'stat'
-		cla & *clr
-		'<center><video autoplay loop src="images/shared/sex/shower/deepthroat1.mp4"></video></center>'
-		if $sex_ev['position'] ! 'blowjob':'With extreme urgency, you hop off of <<$npc_firstname[$boy]>>''s cock and kneel down on the porcelain floor of the shower, wrapping his cock in your mouth.'
-		'"That''s it-!" <<$npc_firstname[$boy]>> grunts when you swallow it whole, lips kissing the base of his shaft. "I''m gonna-!"'
-		'He doesn''t even manage to finish his warning before he groans loudly and his cock pulses on your tongue. <<$npc_firstname[$boy]>> pulls you further down with his hand and hot salty liquid pours into the back of your throat, your only choice to swallow or choke.'
-		*nl
-		'Eventually his dick stops throbbing and you gently release him from your lips, looking up at him with seductive eyes.'
-		gs'sex_ev_shower', 'shower_together_end'
-	end
+	gs 'cum_call', 'mouth_swallow', $boy, 1
+	sex_ev['cum_count'] += 1
+	gs 'stat'
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/deepthroat1.mp4"></video></center>'
+	if $sex_ev['position'] ! 'blowjob':'With extreme urgency, you hop off of <<$npc_firstname[$boy]>>''s cock and kneel down on the porcelain floor of the shower, wrapping his cock in your mouth.'
+	'"That''s it-!" <<$npc_firstname[$boy]>> grunts when you swallow it whole, lips kissing the base of his shaft. "I''m gonna-!"'
+	'He doesn''t even manage to finish his warning before he groans loudly and his cock pulses on your tongue. <<$npc_firstname[$boy]>> pulls you further down with his hand and hot salty liquid pours into the back of your throat, your only choice to swallow or choke.'
+	*nl
+	'Eventually his dick stops throbbing and you gently release him from your lips, looking up at him with seductive eyes.'
+	gs'sex_ev_shower', 'shower_cum_mouth2'
 end
 
 if $ARGS[0] = 'shower_cum_mouth2':
 	sex_ev['cum_mouth'] += 1
 	$sex_ev['last_cum'] = 'mouth'
-	cla & *clr
-	'<center><video autoplay loop src="images/shared/sex/shower/deepthroat1.mp4"></video></center>'
-	'<<$npc_firstname[$boy]>> cums in your mouth.'
 	act'Spit it out':
 		gs'cum_call', 'mouth',$boy,1
 		sex_ev['spit_count'] += 1

locations/sex_ev_start.qsrc

@@ -168,6 +168,17 @@ if $ARGS[0] = 'hookup_initiate':
 	stat['hookup'] += 1
 end
 
+if $ARGS[0] = 'pc_home_img_init':
+	$sex_ev['loc'] = 'pc_home'
+	if $loc = 'korrPar' or $home['current'] = 'parents_home':
+		$sex_ev['bed_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/bedrpar.jpg"></center>'
+		$sex_ev['bath_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+		$sex_ev['kitchen_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/kuhrpar.jpg"></center>'
+		$sex_ev['living_room'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/sitrpar.jpg"></center>'
+		$sex_ev['hall_way'] = '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/korrpar.jpg"></center>'
+	end
+end
+
 if $ARGS[0] = 'lover_home_img_init':
 	$sex_ev['loc'] = 'npc_home'
 	$sex_ev['bed_room'] = $npc_apt_bedroom[$boy]
@@ -200,6 +211,12 @@ if $ARGS[0] = 'fb_npc_home_start':
 	end
 end
 
+if $ARGS[0] = 'hookup_pc_home_start':
+	gs 'sex_ev_start', 'hookup_initiate'
+	gs 'sex_ev_start', 'pc_home_img_init'
+	gs 'sex_ev_start', 'begin'
+	gs 'sex_ev_start', 'undress'
+end
 if $ARGS[0] = 'hookup_npc_home_start':
 	gs 'sex_ev_start', 'hookup_initiate'
 	gs 'sex_ev_start', 'lover_home_img_init'
@@ -237,6 +254,7 @@ if $ARGS[0] = 'unique_npc_bed_start':
 	sex_ev['unique_npc'] = 1
 	gs 'sex_ev_start', 'lover_home_img_init'
 	gs 'sex_ev_start', 'begin'
+	gs 'sex_ev_start', 'undress_function'
 	gs 'sex_ev_foreplay', 'bed_start'
 end
 
@@ -468,6 +486,7 @@ if $ARGS[0] = 'fb_invited_start':
 		
 		if birth_control['think_safe'] = 1 and npc_know_bc[$boy] = 0:
 			act'Tell him you''re on birth control':
+				gs 'sex_ev_stats', 'birth_control_know'
 				cla & *clr
 				$sex_ev['bed_room']
 				'You step inside and draw close to <<$npc_firstname[$boy]>>. You lean in and whisper in his ear...'
@@ -480,20 +499,39 @@ if $ARGS[0] = 'fb_invited_start':
 					else
 						'"<i>I''m on birth control now. Let''s go bareback today.</i>"'
 					end
-					gs 'sex_ev_stats', 'birth_control_know'
 					act'Undress':gt 'sex_ev_start', 'undress'
 				end
 				
-				act'Come inside me':
+				act'Creampies are okay today':
 					sex_ev['creampie_allowance'] = 1
 					cla & *clr
 					$sex_ev['bed_room']
 					if npc_know_bc_not_effective[$boy] = 1 or npc_bc_promise[$boy] = 1:
-						'"<i>My birth control is ready. Pump me full of cum.</i>"'
+						'"<i>My birth control is ready. You can come inside me.</i>"'
 					else
-						'"<i>I''m on birth control now. Pump me full of cum.</i>"'
+						'"<i>I''m on birth control now. You can come inside me.</i>"'
 					end
-					gs 'sex_ev_stats', 'birth_control_know'
+					act'Undress':gt 'sex_ev_start', 'undress'
+				end
+			end
+		elseif mesec > 0:
+			act'"I''m on my period"':
+				cla & *clr
+				$sex_ev['bed_room']
+				'You step inside and draw close to <<$npc_firstname[$boy]>>. You lean in and whisper in his ear...'
+				*nl
+				act'No condoms':
+					cla & *clr
+					$sex_ev['bed_room']
+					'"<i>I''m on my period right now. Let''s go bareback today.</i>"'
+					act'Undress':gt 'sex_ev_start', 'undress'
+				end
+				
+				act'Come inside me':
+					sex_ev['creampie_allowance'] = 1
+					cla & *clr
+					$sex_ev['bed_room']
+					'"<i>I''m on my period right now. You can come inside me.</i>"'
 					act'Undress':gt 'sex_ev_start', 'undress'
 				end
 			end
@@ -674,7 +712,13 @@ if $ARGS[0] = 'undress':
 			'You tear each other''s clothes off, leaving a trail of discarded fabrics.'
 		end
 	end
-	gs 'sex_ev_foreplay', 'bed_start'
+	if $sex_ev['loc'] ! 'pc_home' or $home['current'] ! 'parents_home':
+		gs 'sex_ev_foreplay', 'bed_start'
+	else
+		act'Go to your bed':gs 'sex_ev_foreplay', 'bed_start'
+		
+		act'Go to Anya''s bed':$sex_ev['bed_choice'] = 'anya_bed' & sisterQW['sex_bed_count'] += 1 & sisterQW['sex_bed'] = daystart & gs 'sex_ev_foreplay', 'bed_start'
+	end
 end
 
 if $ARGS[0] = 'undress_function':

locations/sex_ev_stats.qsrc

@@ -6,6 +6,7 @@ if $ARGS[0] = 'npc_update':
 	gs 'boy_updater', 'stamina_update'
 	gs 'boy_updater', 'humor_update'
 	gs 'boy_updater', 'schedule_update'
+	gs 'boy_updater', 'trait_updates'
 end
 
 if $ARGS[0] = 'starting_stats':
@@ -119,7 +120,7 @@ if $ARGS[0] = 'save_stats':
 	!! if your lover takes your virginity without consent
 	npc_virgin_rapist[$boy] += sex_ev['virgin_rape']
 	
-	if sex_ev['sleep_fuck'] > 0: npc_sleep_fuck += 1
+	if sex_ev['sleep_fuck'] > 0: npc_sleep_fuck[$boy] += 1
 	
 	if hour >= 8 and hour < 14 and week < 6 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and schoolProgulDay ! daystart:
 		!!absence from school
@@ -170,11 +171,48 @@ if $ARGS[0] = 'bareback_risk_deactive':
 	npc_bareback_risk[$boy] = 0
 end
 
+if $ARGS[0] = 'prostitution_pay_code':
+	if $npc_rel_type[$boy] = 'sugar_daddy' and sex_ev['sugar_daddy_paid'] = 0:
+		sex_ev['sugar_daddy_paid'] = 1
+		sex_ev['prostitution_paid'] = 1
+		money += npc_sugar_daddy_price[$boy] + sex_ev['prostitution_bonus']
+	elseif $npc_rel_type[$boy] = 'p_customer' and sex_ev['prostitution_paid'] = 0:
+		sex_ev['prostitution_paid'] = 1
+		money += npc_prostitution_price[$boy] + sex_ev['prostitution_bonus']
+	end
+end
+
 if $ARGS[0] = 'single_know':
+	!! the npc knows player is single
 	npc_know_have_boyfriend[$boy] = 0
 	npc_know_have_girlfriend[$boy] = 0
 end
 
+if $ARGS[0] = 'dating_boy_know':
+	!! the npc knows player is single
+	npc_know_have_boyfriend[$boy] = 1
+end
+
+if $ARGS[0] = 'dating_girl_know':
+	!! the npc knows player is single
+	npc_know_have_girlfriend[$boy] = 1
+end
+
+if $ARGS[0] = 'npc_is_single':
+	know_npc_girlfriend[$boy] = 0
+	know_npc_single[$boy] = 1
+end
+
+if $ARGS[0] = 'npc_is_dating':
+	know_npc_girlfriend[$boy] = 1
+	know_npc_single[$boy] = 0
+end
+
+if $ARGS[0] = 'npc_is_married':
+	know_npc_wife[$boy] = 1
+	know_npc_single[$boy] = 0
+end
+
 if $ARGS[0] = 'sleep_check':
 	sex_ev['sleep_cum_vagina'] = cum_loc['vagina']
 	sex_ev['sleep_cum_butt'] = cum_loc['butt']

locations/sex_ev_talk.qsrc

@@ -1538,15 +1538,14 @@ end
 if $ARGS[0] = 'prostitution_payment':
 	if $npc_rel_type[$boy] = 'sugar_daddy' and sex_ev['sugar_daddy_paid'] = 0 and sex_ev['sex_over'] = 1:
 		act'Ask for your sugar money':
-			sex_ev['sugar_daddy_paid'] = 1
-			money += npc_sugar_daddy_price[$boy]
+			gs 'sex_ev_stats', 'prostitution_pay_code'
 			cla
 			act'Demurely':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk4.jpg"></center>'
 				'"Now that we''ve had our fun..." you smile sweetly. "And I did something for you... Don''t you have something for me...?"'
 				'You pout cutely, making doe eyes at <<$npc_firstname[$boy]>> who smiles back and reaches over to his wallet.'
-				'"Sure do," he says, pulling out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b> in cash and handing it over to you. "There you go baby girl."'
+				'"Sure do," he says, pulling out <<npc_sugar_daddy_price[$boy] + sex_ev[''prostitution_bonus'']>><b>₽‎</b> in cash and handing it over to you. "There you go baby girl."'
 				'"Thank you daddy," you smile back and put the money away into your purse.'
 				gs 'sex_ev_after', 'relax_together'
 			end
@@ -1556,9 +1555,9 @@ if $ARGS[0] = 'prostitution_payment':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
 				if sex_ev['fuck_count'] > 0:
-					'"Okay, we''ve fucked. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b>.'
+					'"Okay, we''ve fucked. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy] + sex_ev[''prostitution_bonus'']>><b>₽‎</b>.'
 				else
-					'"Okay, I got you off. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy]>><b>₽‎</b>.'
+					'"Okay, I got you off. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_sugar_daddy_price[$boy] + sex_ev[''prostitution_bonus'']>><b>₽‎</b>.'
 				end
 				'"Here," he says. He offers it towards you and you snatch it out of his hand.'
 				'"Thanks," you reply absent-mindedly as you stuff the money into your purse.'
@@ -1567,15 +1566,14 @@ if $ARGS[0] = 'prostitution_payment':
 		end
 	elseif sex_ev['prostitution'] = 1 and sex_ev['prostitution_paid'] = 0:
 		act'Ask for your money':
-			sex_ev['prostitution_paid'] = 1
-			money += npc_prostitution_price[$boy]
+			gs 'sex_ev_stats', 'prostitution_pay_code'
 			cla
 			act'Demurely':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk4.jpg"></center>'
 				'"Now that we''ve had our fun..." you say, smiling sweetly at <<$npc_firstname[$boy]>>. "And I did something for you... Don''t you have something for me...?"'
 				'You pout cutely, making doe eyes at <<$npc_firstname[$boy]>> who smiles back and reaches over to his wallet.'
-				'"Yeah," he says, pulling out <<npc_prostitution_price[$boy]>><b>₽‎</b> in cash and handing it over to you. "Worth every ruble."'
+				'"Yeah," he says, pulling out <<npc_prostitution_price[$boy] + sex_ev[''prostitution_bonus'']>>]>><b>₽‎</b> in cash and handing it over to you. "Worth every ruble."'
 				'"Thank you very much," you smile back and put the money away into your purse.'
 				gs 'sex_ev_after', 'relax_together'
 			end
@@ -1584,9 +1582,9 @@ if $ARGS[0] = 'prostitution_payment':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk3.jpg"></center>'
 				if sex_ev['fuck_count'] > 0:
-					'"Okay, we''ve fucked. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_prostitution_price[$boy]>><b>₽‎</b>.'
+					'"Okay, we''ve fucked. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_prostitution_price[$boy] + sex_ev[''prostitution_bonus'']>><b>₽‎</b>.'
 				else
-					'"Okay, I got you off. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_prostitution_price[$boy]>><b>₽‎</b>.'
+					'"Okay, I got you off. Can I get paid now?" you ask bluntly. <<$npc_firstname[$boy]>> gives you a look but reaches over to his wallet and pulls out <<npc_prostitution_price[$boy] + sex_ev[''prostitution_bonus'']>><b>₽‎</b>.'
 				end
 				'"Here," he says. He offers it towards you and you snatch it out of his hand.'
 				'"Thanks," you reply absent-mindedly as you stuff the money into your purse.'

locations/sex_ev_wakeup.qsrc

@@ -4,7 +4,7 @@ if $ARGS[0] = 'start':
 	sex_ev['morning_after'] = 1
 	if sex_ev['lover_left'] = 1:gt'sex_ev_wakeup', 'wake_alone'
 	if sex_ev['sleep_fuck'] = 1:gt'sex_ev_wakeup', 'sleep_fuck_wake'
-	if (npc_earlyriser[$boy] = 1 or hour >= 7) and (rand(1,10) < npc_sexdrive[$boy]/3):
+	if (npc_earlyriser[$boy] = 1 or hour >= 7) and (rand(1,10) < npc_sexdrive[$boy]):
 !!		if ($npc_cum_pref[$boy] = 'facial' or npc_humor[$boy] = 2) and rand(1,2) = 2:
 			gs'sex_ev_wakeup', 'cumshot_wakeup1'
 !!		else