[added] big content push with the hope that it fixes lots of issues and narrows down problems for further testing

locations/booty_call.qsrc

@@ -73,7 +73,7 @@ if $ARGS[0] = 'SMS raiser':
 	i = 0
 	:booty_call_sms_raiser_loop
 	if i < arrsize('$FuckBuddy'):
-		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
+		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_last_booty_call[$boy] ! daystart:
 			gs 'booty_call_sms', 'start', $FuckBuddy[i]
 			gs 'booty_call_sms', 'Add SMS', $FuckBuddy[i]
 			booty_call_time[$FuckBuddy[i]] = 2399

locations/booty_call_after.qsrc

@@ -37,6 +37,11 @@ if $ARGS[0] = 'exit':
 	end
 end
 
+if $ARGS[0] = 'break_up':
+	gs 'lover', 'remove fuckbuddy', $boy
+	act'Leave':gt'booty_call_after', 'exit'
+end
+
 if $ARGS[0] = 'ending':
 !!	gs 'booty_call_stats', 'save'
 	gs 'arousal', 'end'
@@ -44,11 +49,6 @@ if $ARGS[0] = 'ending':
 	if booty_call['fuck'] > 0: know_virgin[$boy] = 0
 	if booty_call['creampie_orgasm'] = 1: stat_memory['creampie_orgasm'] = daystart
 	npc_last_sex[$boy] = daystart
-	if booty_call['sleepover'] = 1 or hour < 7:
-		npc_last_booty_call[$boy] = daystart - 1
-	else
-		npc_last_booty_call[$boy] = daystart
-	end
 	killvar 'booty_call'
 end
 
@@ -76,7 +76,7 @@ end
 if $ARGS[0] = 'quit2':
 	booty_call['annoyed'] = 1
 	*nl
-	'Both of you lay back in bed, slightly frustrated with each other with where you''re calling things today, but neither willing to concede.'
+	'Both of you lay back in bed, slightly frustrated with each other to the point that the mood is demonstrably ruined, but neither willing to concede.'
 	if npc_smoker[$boy] > 0: *nl & '<<$npc_firstname[$boy]>> grabs his cigarettes from his nightstand and lights up, puffing away at it in annoyance.'
 	gs'booty_call_after', 'after_sex2'
 end
@@ -172,7 +172,6 @@ if $ARGS[0] = 'stop_here_options':
 	act'I don''t have time':
 		cla & *nl
 		booty_call['no_time'] += 1
-		booty_call['blue_ball'] = 1
 		if booty_call['keep_going_continue'] >= 1:
 			'"Seriously <<$npc_firstname[$boy]>>," you say. "I can''t. You''re gonna make me late."'
 		else
@@ -215,6 +214,7 @@ if $ARGS[0] = 'stop_here_options':
 					gs'booty_call_after', 'after_sex1'
 					gs'booty_call_after', 'well_continue'
 				else
+					booty_call['blue_ball'] = 1
 					'"Your mom''s a bitch, you know that?" <<$npc_firstname[$boy]>> grumbles, pulling away.'
 					act'Tell me about it':
 						cla & *nl
@@ -355,15 +355,17 @@ if $ARGS[0] = 'fucked_out':
 	cla & *clr
 	$npc_apt_bedroom[$boy]
 	if booty_call['fuck_again'] = 1:
-		'"Fuck me again," you moan eagerly, not having had enough yet.'
+		'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
+	elseif booty_call['cock_remove'] = 0:
+		'"Wanna keep going?" you eagerly ask, flexing your pussy around <<$npc_firstname[$boy]>>''s cock.'
 	else
-		'"Wanna keep going?" you ask eagerly.'
+		'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
 	end
-	'"I don''t think I can..."'
+	'"I don''t think I can..." he groans.'
 	if booty_call['cock_remove'] = 1:
-		'You look down and see his cock already going limp, rapidly deflating right before your eyes.'
+		'You look down and see <<$npc_firstname[$boy]>>''s cock already going limp, rapidly deflating right before your eyes.'
 	else
-		'You realize with a start that he''s already going soft inside you.'
+		'You realize with a start that <<$npc_firstname[$boy]>> is getting <i>softer</i>, not harder, inside you.'
 	end
 	'"I think I might be all fucked out for the day..."'
 	act'Ugh':
@@ -506,7 +508,6 @@ if $ARGS[0] = 'wipes':
 			elseif cumloc[0] > 0 or $booty_call['last_cum'] = 'creampie':
 				!! vagina
 				if hypnoAddict > 0:
-					'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
 					$npc_apt_bedroom[$boy]
 					if booty_call['wipes'] = 1:
 						'You reach down to your purse and pull out your bag of wipes before you stop, suddenly confused.'
@@ -541,7 +542,6 @@ if $ARGS[0] = 'wipes':
 			booty_call['wipes'] = 0
 			gs'cum_cleanup'
 			gs'stat'
-			cla
 			if booty_call['sex_over'] = 1:
 				gs'booty_call_after', 'after_sex2'
 			else
@@ -554,9 +554,9 @@ end
 
 if $ARGS[0] = 'wipe_menu':
 	gs'booty_call_after', 'wipe_hands'
-	gs'booty_call_after', 'wipe_hands'
-	gs'booty_call_after', 'wipe_hands'
-	gs'booty_call_after', 'wipe_hands'
+	gs'booty_call_after', 'wipe_face'
+	gs'booty_call_after', 'wipe_tits'
+	gs'booty_call_after', 'wipe_pussy'
 end
 
 if $ARGS[0] = 'wipe_hands':
@@ -712,7 +712,7 @@ end
 if $ARGS[0] = 'bad_sex_end':
 	act'End here (bad end)':
 		cla & *clr
-		npc_apt_bedroom[$boy]
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/annoyed1.jpg"></center>'
 		'"Let''s call it here," you say, letting your negative feelings get to you.'
 		'"What, done already?" <<$npc_firstname[$boy]>> says, sitting up.'
 		act'Don''t feel like it anymore':
@@ -730,7 +730,7 @@ if $ARGS[0] = 'bad_sex_end':
 		act'You''re an asshole':
 			cla & *nl
 			'"You''re an asshole," you scowl at him. "You know what you did."'
-			'"I sure do," he snickers and slaps your ass, earning him a yelp from your lips and a sharp glare from your eyes.'
+!!			'"I sure do," he snickers and slaps your ass, earning him a yelp from your lips and a sharp glare from your eyes.'
 			gs'booty_call_after', 'after_sex1'
 		end
 	end
@@ -1014,22 +1014,6 @@ if $ARGS[0] = 'facial_mouth_clean':
 	end
 end
 
-if $ARGS[0] = 'cum_kiss_cock':
-	if $booty_call['cum_choice'] = 'facial' or $booty_call['cum_choice'] = 'face_mouth' or $booty_call['cum_choice'] = 'mouth':
-		act'Kiss his cock':
-			booty_call['react'] = 1
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
-			if $booty_call['last_cum'] = 'swallow':
-				'"Glad my hard work is appreciated," you smile, leaning in and giving <<$npc_firstname[$boy]>>''s cock a gentle kiss on the tip.'
-			else
-				'Feeling cheeky, you finish by leaning in to give <<$npc_firstname[$boy]>> a cute little kiss, right on the tip of his cock.'
-			end
-			gs'booty_call_sex', 'sex_end'
-		end
-	end
-end
-
 !! -------------------------------------------------------------------------------
 
 if $ARGS[0] = 'after_sex1':
@@ -1375,7 +1359,7 @@ if $ARGS[0] = 'kiss':
 end
 
 if $ARGS[0] = 'plan_b':
-	if booty_call['creampie_count'] > 0 and morning_after_pill > 0 and booty_call['plan_b'] = 0 and birth_control['think_safe'] = 0 and booty_call['angry_after'] = 0 and mesec = 0:
+	if booty_call['creampie_count'] > 0 and morning_after_pill > 0 and booty_call['plan_b'] ! 2 and birth_control['think_safe'] = 0 and booty_call['angry_after'] = 0 and mesec = 0:
 		act'Take a morning after pill':
 			booty_call['plan_b'] = 2
 			cla & *clr
@@ -1666,6 +1650,17 @@ if $ARGS[0] = 'spend_night_ask':
 				end
 			end
 			
+			if hour < 5:
+				if mid($start_type,1,2) = 'sg':
+					act'Avoid my mom':
+						cla & *clr
+						$npc_apt_bedroom[$boy]
+						'"Mind if I spend the night?" you ask. "If I go home now, my mom will chew me out for coming back to late. She''ll still chew me out later, but I don''t want to deal with it right now."'
+						gs'booty_call_after', 'spend_night'
+					end
+				end
+			end
+			
 			if hour >= 22 or hour < 5:
 				act'It''s late':
 					cla & *clr
@@ -1696,6 +1691,7 @@ if $ARGS[0] = 'spend_night':
 	if npc_cheating_know[$boy] = 1:
 		!! this means he''s cheating on someone with you and you know it
 		if rand(1,10) > 7 and hour < 22:
+			booty_call['cant_stay'] = 1
 			'"Sorry, can''t. My girlfriend wanted to come over tonight. In fact, you should leave soon before she catches you."'
 			'"Ugh. <i>Bitch!</i>"'
 			'"Yeah, I know. Sucks."'
@@ -1713,11 +1709,13 @@ if $ARGS[0] = 'spend_night':
 	else
 		!! this means he''s cheating on someone with you
 		if rand(1,10) > 7 and hour < 22:
+			booty_call['cant_stay'] = 1
 			'"Sorry, can''t. I have something to do in the morning."'
 			'"Ugh, really?"'
 			'"Yeah, I know. Sucks."'
 			gs'booty_call_after', 'after_sex2'
 		elseif npc_girlfriend[$boy] = 1 and hour < 22:
+			booty_call['cant_stay'] = 1
 			npc_cheating_know[$boy] = 1
 			'"Sorry, my girlfriend is coming over soon. Can''t let her catch you here."'
 			'"Ugh, really?"'
@@ -1743,8 +1741,10 @@ if $ARGS[0] = 'dressing_image':
 		'<center><video autoplay loop src="images/pc/activities/misc/dress_underwear1.mp4"></video></center>'
 	elseif $booty_call['dress_describe'] = 'fastening your bra around your chest':
 		'<center><video autoplay loop src="images/pc/activities/misc/dress_bra1.mp4"></video></center>'
-	elseif $booty_call['dress_describe'] = 'zipping your skirt up over your hips':
+	elseif $booty_call['dress_describe'] = 'slipping your skirt up your legs':
 		'<center><video autoplay loop src="images/pc/activities/misc/dress_skirt1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'pulling your top over your breasts':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_top1.mp4"></video></center>'
 	elseif $booty_call['dress_describe'] = 'tugging your pants over your hips':
 		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
 	elseif booty_call['hotel'] = 1:
@@ -1755,8 +1755,18 @@ if $ARGS[0] = 'dressing_image':
 	end
 end
 
+if $ARGS[0] = 'dress_start_desc':
+	if booty_call['towel'] = 1:
+		!!booty_call['towel'] = 0
+		'You drop the towel and reach down for your clothes and start to pick them up.'
+	else
+		'You reach down for where you left your clothes and start to pick them up.'
+	end
+end
+
 if $ARGS[0] = 'dressing1':
 	cla & *clr
+	gs'booty_call_after', 'dress_loop'
 	gs'booty_call_after', 'dressing_image'
 	
 	if booty_call['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and booty_call['boy_asleep'] ! 0:
@@ -1767,21 +1777,17 @@ if $ARGS[0] = 'dressing1':
 			'You quietly reach down for where you left your clothes and try to pick them up without waking <<$npc_firstname[$boy]>>.'
 		end
 		gs'booty_call_after', 'dress'
-		gs'booty_call_after', 'dress_loop'
 		gs'booty_call_after', 'dressing2'
 	else
-		if booty_call['towel'] = 1:
-			booty_call['towel'] = 0
-			'You drop the towel and reach down for your clothes and start to pick them up.'
-		else
-			'You reach down for where you left your clothes and start to pick them up.'
-		end
-		gs'booty_call_after', 'dress_loop'
-		if booty_call['angry_after'] = 1:
-			'"I have to go," you say flatly, getting out of the bed without looking at <<$npc_firstname[$boy]>>.'
+		gs'booty_call_after', 'dress_start_desc'
+		if booty_call['angry_after'] = 1 or booty_call['annoyed'] > 0:
+			'"I have to go," you say flatly, <<$booty_call[''dress_describe'']>> without looking at <<$npc_firstname[$boy]>>.'
+			gs'booty_call_after', 'dressing2'
+		elseif booty_call['cant_stay'] = 1:
+			'"Guess I''ll go then," you sigh, <<$booty_call[''dress_describe'']>>.'
 			gs'booty_call_after', 'dressing2'
 		elseif booty_call['npc_late'] = 0:
-			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks as you are <<$booty_call[''dress_describe'']>>.'
 			gs'booty_call_after', 'not_leaving'
 			gs'booty_call_after', 'leaving_soon'
 			if booty_call['sleepover'] < 1:
@@ -1819,7 +1825,9 @@ end
 if $ARGS[0] = 'not_leaving':
 	act'Not yet':
 		cla & *clr
+		gs'booty_call_after', 'dress_loop'
 		gs'booty_call_after', 'dressing_image'
+		gs'booty_call_after', 'dress_start_desc'
 		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 		'"Not yet," you say, <<$booty_call[''dress_describe'']>>. "Just tired of hanging around naked."'
 		'"I''m never tired of seeing you naked."'
@@ -1831,8 +1839,10 @@ end
 if $ARGS[0] = 'leaving_soon':
 	act'Yeah':
 		booty_call['leaving'] = 1
+		
 		cla & *clr
 		gs'booty_call_after', 'dressing_image'
+		gs'booty_call_after', 'dress_start_desc'
 		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 		if booty_call['sleepover'] < 1:
 			'"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
@@ -1840,7 +1850,7 @@ if $ARGS[0] = 'leaving_soon':
 			gs 'booty_call_after', 'panty_gift'
 		else
 			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
-			gs'booty_call_after', 'dress_loop'
+			
 			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
 				gs'booty_call_morning', 'booty_call_invite_later'
 			else
@@ -1848,6 +1858,7 @@ if $ARGS[0] = 'leaving_soon':
 				gs'booty_call_morning', 'end_morning'
 			end
 		end
+		gs'booty_call_after', 'dress_loop'
 	end
 end
 
@@ -1857,6 +1868,7 @@ if $ARGS[0] = 'going_disco':
 			act'Going to the disco':
 				cla & *clr
 				gs'booty_call_after', 'dressing_image'
+				gs'booty_call_after', 'dress_start_desc'
 				'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 				if booty_call['disco_after'] = 1:
 					'"Weren''t you listening to me?" you say, <<$booty_call[''dress_describe'']>>. "I told you, I''m going to the disco tonight."'
@@ -1872,6 +1884,7 @@ if $ARGS[0] = 'going_disco':
 			act'Going to the club':
 				cla & *clr
 				gs'booty_call_after', 'dressing_image'
+				gs'booty_call_after', 'dress_start_desc'
 				'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 				if booty_call['club_after'] = 1:
 					'"Weren''t you listening to me?" you say, <<$booty_call[''dress_describe'']>>. "I told you, I''m going clubbing tonight."'
@@ -1893,6 +1906,7 @@ if $ARGS[0] = 'mom_late':
 			booty_call['mom_kill'] = 1
 			cla & *clr
 			gs'booty_call_after', 'dressing_image'
+			gs'booty_call_after', 'dress_start_desc'
 			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 			if hour < 3:
 				'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I''m already going to be in trouble as it is, but if I don''t come home at all tonight, my mom will kill me."'
@@ -1911,19 +1925,24 @@ if $ARGS[0] = 'need_homework':
 		act'Need to finish my homework':
 			cla & *clr
 			gs'booty_call_after', 'dressing_image'
+			gs'booty_call_after', 'dress_start_desc'
 			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I need to do my homework."'
 			gs'booty_call_after', 'dress_loop'
 !!			if rand(0,1) = 1:
 			'"Seriously? That''s what you''re in a rush for?"'
 			act'I want to go to uni':
-				cla & *nl
+				cla & *clr
+				gs'booty_call_after', 'dressing_image'
+				gs'booty_call_after', 'dress_start_desc'
 				'"I want to go to uni," you say, <<$booty_call[''dress_describe'']>>. "Can''t do that if I fail out of school for not doing my homework."'
 				gs'booty_call_after', 'dress_loop'
 				gs 'booty_call_after', 'dressing2'
 			end
 			act'Don''t be an asshole':
-				cla & *nl
+				cla & *clr
+				gs'booty_call_after', 'dressing_image'
+				gs'booty_call_after', 'dress_start_desc'
 				'"Don''t be an asshole," you glare, <<$booty_call[''dress_describe'']>>. "My grades are important to me. More important than spending more time fucking you."'
 				gs'booty_call_after', 'dress_loop'
 				gs 'booty_call_after', 'dressing2'
@@ -1933,18 +1952,88 @@ if $ARGS[0] = 'need_homework':
 	end
 end
 
+if $ARGS[0] = 'something_to_do':
+	act'Gotta do something':
+		booty_call['leaving'] = 1
+		cla & *clr
+		gs'booty_call_after', 'dressing_image'
+		gs'booty_call_after', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Have a few things I need to get done."'
+			gs 'booty_call_after', 'dressing2'
+			gs 'booty_call_after', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Have a few things I need to get done. Thanks for letting me spend the night."'
+			
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
+		gs'booty_call_after', 'dress_loop'
+	end
+end
+
+if $ARGS[0] = 'see_a_friend':
+	act'Meeting a friend':
+		booty_call['leaving'] = 1
+		cla & *clr
+		gs'booty_call_after', 'dressing_image'
+		gs'booty_call_after', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Need to see a friend later."'
+			gs 'booty_call_after', 'dressing2'
+			gs 'booty_call_after', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Need to see a friend later. Thanks for letting me spend the night."'
+			
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
+		gs'booty_call_after', 'dress_loop'
+	end
+end
+
+if $ARGS[0] = 'another_fuckbuddy':
+	if arrsize('$fuckbuddy') > 1:
+		act'Another booty call':
+			booty_call['leaving'] = 1
+			cla & *clr
+			gs'booty_call_after', 'dressing_image'
+			gs'booty_call_after', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			'"Yeah," you smirk, <<$booty_call[''dress_describe'']>>. "Got another booty call to show up to."'
+			'"You really get around don''t you?" <<$npc_firstname[$boy]>> smirks back.'
+			gs 'booty_call_after', 'dressing2'
+			gs 'booty_call_after', 'panty_gift'
+			gs'booty_call_after', 'dress_loop'
+		end
+	end
+end
+
 if $ARGS[0] = 'going_school':
 	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
 		act'School':
 			cla & *clr
 			gs'booty_call_after', 'dressing_image'
+			gs'booty_call_after', 'dress_start_desc'
 			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 			if booty_call['late_for_school'] = 1 and hour >= 8:
 				'"I already told you, I''m late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
 			elseif booty_call['late_for_school'] = 1:
 				'"I already told you, I''m gonna be late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
-			else
+			elseif hour = 7:
 				'"Gotta get to school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+			else
+				'"Gotta get ready for school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
 			end
 			gs'booty_call_after', 'dress_loop'
 			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
@@ -1989,7 +2078,7 @@ end
 if $ARGS[0] = 'panty_gift2':
 	act'You did a good job':
 		cla & *clr
-		$npc_apt_bedroom[$boy]
+		gs'booty_call_after', 'dressing_image'
 		'"You did a good job," you smile, <<$booty_call[''dress_describe'']>>. "Consider that your reward."'
 		if npc_girlfriend[$boy] = 1:
 			if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
@@ -2003,7 +2092,7 @@ if $ARGS[0] = 'panty_gift2':
 	
 	act'Something to remember the occasion':
 		cla & *clr
-		$npc_apt_bedroom[$boy]
+		gs'booty_call_after', 'dressing_image'
 		if daystage > 3:
 			'"Something to remember the night," you smile, <<$booty_call[''dress_describe'']>>. "Keep the good times in mind."'
 		else
@@ -2021,7 +2110,7 @@ if $ARGS[0] = 'panty_gift2':
 	
 	act'Consider it a trophy':
 		cla & *clr
-		$npc_apt_bedroom[$boy]
+		gs'booty_call_after', 'dressing_image'
 		'"Consider it a trophy," you smile, <<$booty_call[''dress_describe'']>>. "Think of it as proof of conquest."'
 		if npc_girlfriend[$boy] = 1:
 			if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
@@ -2036,7 +2125,7 @@ if $ARGS[0] = 'panty_gift2':
 	if booty_call['virgin'] = 1:
 		act'To remember my virginity':
 			cla & *clr
-			$npc_apt_bedroom[$boy]
+			gs'booty_call_after', 'dressing_image'
 			'"To remember my virginity," you smile, <<$booty_call[''dress_describe'']>>. "And commemorate the moment you made me into a woman."'
 			if npc_girlfriend[$boy] = 1:
 				if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
@@ -2131,7 +2220,7 @@ if $ARGS[0] = 'dress_loop':
 		killvar 'lastwornpantytype'
 		killvar 'lastwornpantynumber'
 		booty_call['panty_wear'] = 1
-		$booty_call['dress_describe'] = 'pulling your panties up your legs'
+		$booty_call['dress_describe'] = 'pulling your panties up'
 	elseif $lastwornbratype['booty_call'] ! 'none' and $lastwornbratype['booty_call'] ! '' and $braworntype = 'none' and booty_call['bra_wear'] ! 1:
 		gs 'bras', 'wear', $lastwornbratype['booty_call'], lastwornbranumber['booty_call']
 		killvar 'lastwornbratype'
@@ -2154,8 +2243,8 @@ if $ARGS[0] = 'dress_loop':
 		else
 			if CloSkirtShortness > 0 and booty_call['skirt_wear'] ! 1 and booty_call['dress_end'] ! 1:
 				booty_call['skirt_wear'] = 1
-				$booty_call['dress_describe'] = 'zipping your skirt up over your hips'
-			elseif booty_call['dress_end'] ! 1 and booty_call['pants_wear'] ! 1:
+				$booty_call['dress_describe'] = 'slipping your skirt up your legs'
+			elseif CloSkirtShortness = 0 and booty_call['dress_end'] ! 1 and booty_call['pants_wear'] ! 1:
 				booty_call['pants_wear'] = 1
 				$booty_call['dress_describe'] = 'tugging your pants over your hips'
 			else
@@ -2200,8 +2289,7 @@ if $ARGS[0] = 'after_sex_dressed':
 			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
 			'"I just can''t do this anymore," you say. "I''m sorry."'
 			'You grab your things and leave.'
-			gs 'lover', 'remove fuckbuddy', $boy
-			act'Leave':gt'booty_call_after', 'exit'
+			gs'booty_call_after', 'break_up'
 		end
 		gs'booty_call_after', 'unsatisfied_breakup'
 		gs'booty_call_after', 'no_more_cheating_breakup'
@@ -2292,8 +2380,7 @@ if $ARGS[0] = 'unsatisfied_breakup':
 			'"You''re just not what I want out of a fuckbuddy," you say flatly. "I just don''t think we''re sexually compatible."'
 			*nl
 			'You shrug once, grab your things, and leave without another word.'
-			gs 'lover', 'remove fuckbuddy', $boy
-			act'Leave':gt'booty_call_after', 'exit'
+			gs'booty_call_after', 'break_up'
 		end
 		if npc_sexdrive[$boy] = 1 or npc_two_pump[$boy] = 1:
 			act'You''re a two pump chump':
@@ -2343,8 +2430,7 @@ if $ARGS[0] = 'no_more_cheating_breakup':
 					'"You''re not going to change my mind," you say. "We''re done."'
 					*nl
 					'And with that, you head out the door.'
-					gs 'lover', 'remove fuckbuddy', $boy
-					act'Leave':gt'booty_call_after', 'exit'
+					gs'booty_call_after', 'break_up'
 				end
 				
 				act'Well...':
@@ -2365,14 +2451,13 @@ if $ARGS[0] = 'no_more_cheating_breakup':
 					end
 				end
 			else
-				gs 'lover', 'remove fuckbuddy', $boy
 				'"Oh." <<$npc_firstname[$npclastsaved]>> looks at you. "I guess that''s fair. So... I''ll see you around?"'
 				act'See you':
 					cla & *nl
 					'"Yeah," you mumble wistfully. "See you..."'
 					*nl
 					'And with that, you head out the door.'
-					act'Leave':gt'booty_call_after', 'exit'
+					gs'booty_call_after', 'break_up'
 				end
 				
 				act'No I won''t':
@@ -2381,7 +2466,7 @@ if $ARGS[0] = 'no_more_cheating_breakup':
 					'"No, I won''t," you frown. "That''s the point."'
 					*nl
 					'And with that, you head out the door.'
-					act'Leave':gt'booty_call_after', 'exit'
+					gs'booty_call_after', 'break_up'
 				end
 			end
 		end
@@ -2396,8 +2481,7 @@ if $ARGS[0] = 'no_more_cheating_breakup':
 					'"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
 				end
 				'You grab your things and rush out the door.'
-				gs 'lover', 'remove fuckbuddy', $boy
-				act'Leave':gt'booty_call_after', 'exit'
+				gs'booty_call_after', 'break_up'
 			end
 		end
 		if pcs_girlfriends > 0:
@@ -2410,8 +2494,7 @@ if $ARGS[0] = 'no_more_cheating_breakup':
 					'"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
 				end
 				'You grab your things and rush out the door.'
-				gs 'lover', 'remove fuckbuddy', $boy
-				act'Leave':gt'booty_call_after', 'exit'
+				gs'booty_call_after', 'break_up'
 			end
 		end
 	end
@@ -2424,8 +2507,23 @@ if $ARGS[0] = 'isnt_going_to_work':
 		'"This just isn''t going to work," you say, cutting him off. "We''re done."'
 		*nl
 		'And with that, you head out the door.'
-		gs 'lover', 'remove fuckbuddy', $boy
-		act'Leave':gt'booty_call_after', 'exit'
+		gs'booty_call_after', 'break_up'
+	end
+end
+
+if $ARGS[0] = 'no_condom_breakoff':
+	if npc_no_condoms_know[$boy] = 1:
+		act'I can''t do this (break things off)':
+			!! add in rape chance later
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"Fuck this," you say, getting up and grabbing your clothes.'
+			'"Where the fuck are you going?" <<$npc_firstname[$boy]>> asks in bewilderment.'
+			'"I''m not gonna be fuckbuddies with a guy who never uses condoms," you sneer at him. "<i>Don''t</i> text me again."'
+			*nl
+			'The second you''re dressed you stalk out the door and slam it behind you.'
+			gs'booty_call_after', 'break_up'
+		end
 	end
 end
 

locations/booty_call_condoms.qsrc

@@ -40,6 +40,7 @@ if $ARGS[0] = 'condoms':
 			gs 'booty_call_condoms', 'pc_dangerous_day'
 			gs 'booty_call_condoms', 'reenable_condoms1'
 			gs 'booty_call_condoms', 'no_more_free_creampies1'
+			gs 'booty_call_condoms', 'already_creampie1'
 		elseif npc_bareback[$boy] = 2 and booty_call['no_condom'] ! 1 and booty_call['condom'] ! 1:
 			'"Is it safe?" <<$npc_firstname[$boy]>> asks. "Can we go bareback?"'
 			gs 'booty_call_condoms', 'bareback_check'
@@ -50,11 +51,17 @@ if $ARGS[0] = 'condoms':
 				gs 'booty_call_condoms', 'npc_condom_use'
 			else
 				'<<$npc_firstname[$boy]>> makes no indication that he''s going to put on a condom.'
-				gs 'booty_call_condoms', 'pc_condom_ask'
-				gs 'booty_call_condoms', 'pc_condoms'
-				gs 'booty_call_condoms', 'dont_cum_in_me'
-				gs 'booty_call_condoms', 'pc_safe_day'
-				gs 'booty_call_condoms', 'pc_dangerous_day'
+				gs 'booty_call_sex', 'position_choose'
+				if booty_call['virgin'] = 1 and booty_call['fuck_count'] = 0:
+					gs 'booty_call_condoms', 'virgin_condom_ask1'
+				else
+					gs 'booty_call_condoms', 'pc_condom_ask'
+					gs 'booty_call_condoms', 'pc_condoms'
+					gs 'booty_call_condoms', 'dont_cum_in_me'
+					gs 'booty_call_condoms', 'pc_safe_day'
+					gs 'booty_call_condoms', 'pc_dangerous_day'
+					gs 'booty_call_condoms', 'already_creampie1'
+				end
 			end
 		elseif booty_call['using_pc_condoms'] = 1:
 			gs 'booty_call_condoms', 'pc_condoms'
@@ -79,6 +86,7 @@ end
 if $ARGS[0] = 'pc_need_condoms':
 	if prezik > 0:
 		act'Use your condoms':
+			booty_call['pc_wants_condoms'] = 1
 			cla & *nl
 			'"Sorry," you say, pulling a condom from your bag. "But we need to be safe today."'
 			gs 'booty_call_condoms', 'pc_condoms'
@@ -183,6 +191,7 @@ if $ARGS[0] = 'pc_condom_ask':
 	end
 	act'Ask him to put on a condom':
 		cla & *nl
+		booty_call['pc_wants_condoms'] = 1
 		if npc_bareback[$boy] = 2:
 			'"We need a condom today," you shake your head.'
 		else
@@ -245,21 +254,31 @@ if $ARGS[0] = 'npc_condom_use_stats':
 end
 
 if $ARGS[0] = 'npc_condom_use':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
 	booty_call['must_fuck'] = 1
 	if booty_call['fuck_count'] > 1 and $booty_call['last_cum'] = 'condom':
 		'<<$npc_firstname[$boy]>> swaps out his used condom for a new one.'
 	elseif booty_call['fuck_count'] > 1:
 		'<<$npc_firstname[$boy]>> reaches for a new condom.'
+	else
+		'<<$npc_firstname[$boy]>> reaches for a condom from his nightstand.'
 	end
 !!	gs 'booty_call_sex', 'position_choose'
 	
+	
 	gs 'booty_call_condoms', 'npc_condom_put_on'
 	
-	if booty_call['condom'] = 0:
-		gs 'booty_call_condoms', 'disable_condoms'
-		
-		gs 'booty_call_condoms', 'temp_disable_condoms'
+	if booty_call['virgin'] = 1 and booty_call['fuck_count'] = 0:
+		gs 'booty_call_condoms', 'virgin_no_condom'
+	else
+		if booty_call['condom'] = 0:
+			gs 'booty_call_condoms', 'disable_condoms'
+			
+			gs 'booty_call_condoms', 'temp_disable_condoms'
+		end
 	end
+	
 end
 
 if $ARGS[0] = 'npc_condom_put_on':
@@ -303,7 +322,11 @@ if $ARGS[0] = 'condom_conscious_npc':
 	elseif booty_call['fuck_count'] > 1:
 		'<<$npc_firstname[$boy]>> reaches for another condom.'
 	end
-	gs 'booty_call_condoms', 'npc_condom_use'
+	if booty_call['virgin'] = 1 and booty_call['fuck_count'] = 0:
+		gs 'booty_call_condoms', 'virgin_no_condom'
+	else
+		gs 'booty_call_condoms', 'npc_condom_use'
+	end
 end
 
 if $ARGS[0] = 'npc_out_of_condoms':
@@ -406,7 +429,7 @@ if $ARGS[0] = 'condom_why2':
 		if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and npc_childfree[$boy] = 1):
 			'"Don''t want to risk it," <<$npc_firstname[$boy]>> says, shaking his head and opens the condom anyways, rolling it onto his cock.'
 		else
-			if rand(npc_willpwr[$boy],100) < pcs_persuas:
+			if rand(npc_willpwr[$boy],100) < pcs_persuas + npc_rel[$boy]:
 				booty_call['no_condom'] = 1
 				booty_call['condom'] = 0
 				'<<$npc_firstname[$boy]>> stops, looking back at you for a moment before smiling.'
@@ -528,7 +551,7 @@ if $ARGS[0] = 'no_condom1':
 				booty_call['promise_no_creampie'] = 1
 				booty_call['must_fuck'] = 1
 				cla & *nl
-				'"Well... Alright..." you say heistantly. "But don''t you dare come inside me, okay?"'
+				'"Well... Alright..." you say hesitantly. "But don''t you dare come inside me, okay?"'
 				gs 'booty_call_sex', 'position_choose'
 			end
 		end
@@ -579,7 +602,7 @@ if $ARGS[0] = 'no_condom2':
 			booty_call['promise_no_creampie'] = 1
 			booty_call['must_fuck'] = 1
 			cla & *nl
-			'"Well... Alright..." you say heistantly. "But don''t you dare come inside me, okay?"'
+			'"Well... Alright..." you say hesitantly. "But don''t you dare come inside me, okay?"'
 			gs 'booty_call_sex', 'position_choose'
 		end
 	end
@@ -1088,7 +1111,7 @@ if $ARGS[0] = 'temp_disable_condoms':
 				'"Let''s skip the condom today," you smile. "It''ll feel better without it."'
 				gs 'booty_call_condoms', 'npc_temp_no_condom_react'
 			end
-			
+						
 			if mesec > 0:
 				act'I''m on my period':
 					booty_call['probably_safe_day'] = 1
@@ -1232,11 +1255,12 @@ if $ARGS[0] = 'bareback_check':
 		end
 	end
 	gs 'booty_call_condoms', 'need_condoms_today'
+	gs 'booty_call_condoms', 'already_creampie2'
 end
 
 if $ARGS[0] = 'need_condoms_today':
 	act'Need condoms today':
-		booty_call['danger_day'] = 1
+		if stat['dangerous_day'] = 1: booty_call['danger_day'] = 1
 		booty_call['no_creampies_today'] = 1
 		cla
 		act'Use his':
@@ -1312,6 +1336,7 @@ if $ARGS[0] = 'pc_dangerous_day':
 			
 			act'We need to use a condom':
 				cla & *clr
+				booty_call['pc_wants_condoms'] = 1
 				$npc_apt_bedroom[$boy]
 				if ovulate > 0:
 					'"I''m ovulating right now," you warn <<$npc_firstname[$boy]>>. "We need to use a condom."'
@@ -1508,6 +1533,80 @@ if $ARGS[0] = 'pc_safe_day':
 	end
 end
 
+if $ARGS[0] = 'already_creampie1':
+	!! someone already came inside you earlier today so you throw caution to the wind
+	if stat['last_creampie'] = daystart:
+		if npc_bareback[$boy] ! 1:
+			act'Already been creampied today (go bareback)':
+				booty_call['no_condom'] = 1
+				cla & *nl
+				'"Somebody came inside me earlier," you say. "So let''s skip the rubber. Seems a little too late for condoms."'
+				if $npc_cum_pref[$boy] = 'creampie':
+					'"Does that mean I can come inside you too?" <<$npc_firstname[$boy]>> asks eagerly.'
+					act'No':
+						cla & *nl
+						'"No it does not," you reply, twisting your mouth in a wry smirk. "I feel like we don''t need to be extra careful, I didn''t say I want to be extra risky."'
+						gs 'booty_call_sex', 'position_choose'
+					end
+					
+					act'Yes':
+						cla & *nl
+						booty_call['creampie_allowance'] = 1
+						'"Go for it," you smile back. "Pump me full of cum."'
+						gs 'booty_call_sex', 'position_choose'
+					end
+				else
+					'"You really get around don''t you?" <<$npc_firstname[$boy]>> says amusedly.'
+					act'Blush':
+						cla & *nl
+						'Your cheeks flush with heat as <<$npc_firstname[$boy]>> pulls you towards him.'
+						gs 'booty_call_sex', 'position_choose'
+					end
+					
+					act'Giggle':
+						cla & *nl
+						'"Shut up," you giggle back as <<$npc_firstname[$boy]>> pulls you towards him.'
+						gs 'booty_call_sex', 'position_choose'
+					end
+				end
+			end
+		end
+		if npc_creampie_okay[$boy] ! 2:
+			act'Already been creampied today (free creampies)':
+				booty_call['no_condom'] = 1
+				booty_call['creampie_allowance'] = 1
+				cla & *nl
+				'"Somebody already came inside me today," you say. "If I have to get a pill anyways, I might as well make the most of it."'
+				'You pull <<$npc_firstname[$boy]>> close to whisper in his ear.'
+				'<i>"Come inside me as much as you want."</i>'
+				gs 'booty_call_sex', 'position_choose'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'already_creampie2':
+	!! someone already came inside you earlier today so you throw caution to the wind
+	if stat['last_creampie'] = daystart:
+		act'Already been creampied today  (go bareback)':
+			cla & *nl
+			booty_call['no_condom'] = 1
+			'"Well," you say with a wry smirk. "Seeing as someone else already came inside me today, it feels a little silly to worry about condoms. So yeah, fuck me bareback."'
+			gs 'booty_call_sex', 'position_choose'
+		end
+		
+		act'Already been creampied today (free creampies)':
+			booty_call['no_condom'] = 1
+			booty_call['creampie_allowance'] = 1
+			cla & *nl
+			'"Well," you say with a wry smirk. "Seeing as someone else already came inside me today, it feels a little silly to worry about condoms. In fact..."'
+			'You pull <<$npc_firstname[$boy]>> close to whisper in his ear.'
+			'<i>"Come inside me as much as you want."</i>'
+			gs 'booty_call_sex', 'position_choose'
+		end
+	end
+end
+
 if $ARGS[0] = 'no_more_free_creampies1':
 	if npc_free_creampies[$boy] > 0:
 		act'About creampies':
@@ -1657,4 +1756,406 @@ if $ARGS[0] = 'no_more_free_creampies5':
 		gs 'booty_call_sex', 'position_choose'
 	end
 end
---- booty_call_condoms ---------------------------------
+
+if $ARGS[0] = 'virgin_condom1':
+	act'Wait for him':
+		booty_call['condom'] = 1
+		gs 'booty_call_condoms', 'npc_condom_use_stats'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+		'He tears open the packaging and begins rolling the rubber sleeve onto his cock. You watch him, anxious with anticipation, thinking about what''s about to happen next.'
+		*nl
+		'With the condom securely wrapped around his manhood, he lines his cock up with your pussy and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+		if npc_sex_speed[$boy] = 3 and (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1):
+			act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
+		else
+			act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+		end
+	end
+	
+	gs 'booty_call_condoms', 'virgin_no_condom'
+end
+
+if $ARGS[0] = 'virgin_condom_ask1':
+	act'Ask him to use a condom':
+		if booty_call['condom_setup'] ! 1: gs 'booty_call_condoms', 'setup'
+		gs 'booty_call_condoms', 'check_count'
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"Okay," you whisper. "But use a condom? Please?"'
+		if npc_condom_conscious[$boy] = 1:
+			'"Of course," <<$npc_firstname[$boy]>> says, already tearing open a package. "I''m not an idiot you know."'
+			gs 'booty_call_virgin', 'start_with_condom'
+		else
+			if npc_no_condoms[$boy] = 1:
+				'"Nah, fuck that rubber shit. I don''t use it."'
+				npc_no_condoms_know[$boy] = 1
+				gs'booty_call_condoms', 'virgin_condom_ask2'
+				gs'booty_call_condoms', 'virgin_no_condom_shock1'
+			elseif booty_call['condom_count'] <= 0:
+				'"Can''t. I''m all out."'
+				gs'booty_call_condoms', 'virgin_condom_ask2'
+			else
+				if rand(1,2) = 2:
+					'<<$npc_firstname[$boy]>> nods and gets one out, tearing open the package and pulling out the little rubber sleeve.'
+					gs 'booty_call_virgin', 'start_with_condom'
+				else
+					'"Come on," he says. "You really want to use a condom for your first time?"'
+					gs'booty_call_condoms', 'virgin_condom_ask3'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom_ask2':
+	act'Then we''re not fucking':
+		cla & *clr
+		if npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1:
+			$npc_apt_bedroom[$boy]
+			if npc_no_condoms[$boy] = 1:
+				'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
+			elseif booty_call['condom_count'] <= 0:
+				'"Woah!" you exclaim, snapping your legs closed and pulling back from him. "If you don''t have a condom, then we can''t do this."'
+			end
+			'"Don''t be such a bitch about it! Come on! Let''s just do this!"'
+			act'Let him pressure you':
+				cla & *nl
+				'Your conscience rails against you as he pushes you down onto the bed. You want to refuse him, you <i>want</i> to tell him no, but you don''t want to fight him either. You don''t want him to see you as a bitch, even if you know you''re right.'
+				*nl
+				'With an internal sigh of resignation and not a small amount of regret, you spread your legs, and moments later, he takes your virginity.'
+				*nl
+				'<i>Without</i> a condom.'
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act'Stand firm (<<will_cost>> Willpower)':
+					cla & *nl
+					'"Nuh uh. If there''s no condom, there''s no sex." He pulls back with a sigh.'
+					gs'booty_call_virgin', 'change_mind'
+				end
+			else
+				act'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if npc_no_condoms[$boy] = 1:
+				'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
+			elseif booty_call['condom_count'] <= 0:
+				'"Woah!" you exclaim, snapping your legs closed and pulling back from him. "If you don''t have a condom, then we can''t do this."'
+			end
+			'<<$npc_firstname[$boy]>> takes a deep breath and pulls back.'
+			'"Sorry," he smiles shyly at you. "I was thinking with my dick instead of my head. You''re right, we shouldn''t do this without protection. What should we do instead?"'
+			gs'booty_call_start', 'foreplay_choose'
+			
+			act'Change your mind':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'You blink in surprise.'
+				'His reasonableness is somehow... unexpected? But that he was willing to accept what you wanted so easily makes you...'
+				*nl
+				'Arousal throbs in your pussy. You can feel juices practically dripping from its lips. You <i>ache</i> to feel him inside you.'
+				*nl
+				'"Okay," you whisper. "We can do it without a condom."'
+				'"But I thought-"'
+				'"You''re too reasonable. Makes me want you more," you smile. "Enough to risk doing it without a condom."'
+				'"I''m not sure I understand," he smiles back. You shrug.'
+				'"Me either."'
+				act'Let him get into position':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/sex/shared/foreplay/miss3.jpg"></center>'
+					gs 'booty_call_virgin', 'start_without_condom'
+				end
+				
+				gs 'booty_call_condoms', 'virgin_condom2'
+			end
+		end
+	end
+
+	act'Maybe it''s okay?':
+		cla & *nl
+		'<i>Well... Maybe it''s okay?</i> you rationalize. It''s your first time. If he doesn''t use condoms, maybe he knows better? You can always change your mind in the future. But it''s just once. What could go wrong?'
+		booty_call['no_condom'] = 1
+		gs'booty_call_condoms', 'virgin_condom2'
+	end	
+end
+
+if $ARGS[0] = 'virgin_condom_ask3':
+	act'Maybe he has a point':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'Once again, the heady feeling of arousal becomes irresistible. You <i>ache</i> to feel him inside you and the thought of even a thin sleeve of rubber separating your cock from your pussy suddenly feels distasteful to you. It''s your first time. You want to feel <i>everything.</i>'
+		*nl
+		'"Okay," you smile. "Just this once."'
+		booty_call['no_condom'] = 1
+		gs 'booty_call_condoms', 'virgin_condom2'
+	end
+
+	act'Hell yes I do (STD)':
+		cla & *nl
+		'"Uhh, <i>hell yes</i> I do," you say with a look of suspicion. "I''m not about to have sex for the first time and immediately get an STD."'
+		'"An STD? That''s what you''re afraid of? I''m clean! Obviously!"'
+		act'I don''t know that':
+			cla & *nl
+			if npc_no_condoms_know[$boy] = 1:
+				'"How the fuck am I supposed to know that''s true?" you exclaim. "You just told me you don''t use condoms! That means you''re a risk! Unless have a negative test on you right now, which I''m guessing you don''t. I''m not about to risk it just because you tell me to ''trust you.''"'
+				'"Well if you want to use a condom, then you''re gonna have to provide one," he huffs. "Cause I just told you: I don''t use them."'
+				gs 'booty_call_condoms', 'virgin_npc_doesnt_condom'
+			else
+				'"I don''t know that!" you spit back. "Where''s the proof? You have a negative test on you? I''m not about to risk it just because you tell me to ''trust you.''"'
+				'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs.'
+				*nl
+				'A moment after that, <<$npc_firstname[$boy]>> takes your virginity.'
+				booty_call['condom'] = 1
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+		end
+
+		act'Trust him':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"If you say so..." you say hesitantly. He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+			gs'booty_call_virgin', 'miss_virg_start'
+		end
+	end
+
+	if birth_control['think_safe'] = 0:
+		act'Hell yes I do (pregnancy)':
+			cla & *nl
+			'"Uhh, <i>hell yes</i> I do," you say with an obvious expression on your face. "I''m not risking getting pregnant. <i>Especially</i> on my first time!"'
+			'"That''s what you''re worried about? Come on, I''ll pull out. I promise."'
+			act'No way!':
+				cla & *nl
+				'"No fucking way!" you say. "I''m not just gonna trust you to pull out because you say you will! Even if you really mean it, anything could happen by accident. I''m not taking any chances!"'
+				if npc_no_condoms_know[$boy] = 1:
+					'"Well if you want to use a condom, then you''re gonna have to provide one," he huffs. "Cause I just told you: I don''t use them."'
+					gs 'booty_call_condoms', 'virgin_npc_doesnt_condom'
+				else
+					'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
+					gs 'booty_call_condoms', 'npc_condom_use_stats'
+					gs'booty_call_virgin', 'miss_virg_start'
+				end
+			end
+
+			act'Trust him':
+				booty_call['promise_no_creampie'] = 1
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"If you say so," you sigh. "But you <i>absolutely cannot</i> cum inside me, alright?"'
+				'He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
+				booty_call['condom'] = 3
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_no_condom_shock1':
+	act'What the fuck?!':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "You don''t use condoms?"'
+		'"No! Of course I don''t!" he says. "Condoms fucking suck. Can''t feel anything with one of those on. You want to use something that gets in the way of pleasure?"'
+		gs 'booty_call_after', 'no_condom_breakoff'
+	end
+	
+	gs 'booty_call_condoms', 'virgin_condom_ask3'
+end
+
+if $ARGS[0] = 'virgin_npc_doesnt_condom':
+	if prezik > 0:
+		act'Use one of your condoms':
+			'"Fine! Here!" You fish through your bag and pull one out handing it to him.'
+			'While he rolls it on, you make sounds of annoyance, glaring at him.'
+			'"Really making my first time special," you grumble to yourself.'
+			*nl
+			'With the condom securely in place, he gets back in position between your legs.'
+			*nl
+			'A moment after that, <<$npc_firstname[$boy]>> takes your virginity.'
+			booty_call['condom'] = 1
+			gs'booty_call_virgin', 'miss_virg_start'
+		end
+		
+		gs 'booty_call_after', 'no_condom_breakoff'
+	else
+		'"Well I don''t have any either," you growl back.'
+		'"Look who wants to fuck with a condom but doesn''t have any now," <<$npc_firstname[$boy]>> rolls his eyes.'
+		act'Embarrassed':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'You blush fiercely, turning away.'
+			'<i>I''m a virgin!</i> you think to yourself. <i>Why would I have condoms?</i>'
+			'<i>You wanted to have sex,</i> another part of you thinks. <i>Why <b>don''t</b> you have any condoms?</i>'
+			gs'booty_call_virgin', 'change_mind'
+		end
+		
+		act'Angry':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"I''m a fucking virgin!" you shout. "Why would I have condoms?!"'
+			gs'booty_call_after', 'quit2'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_no_condom':
+	act'Ask him not to use a condom':
+		cla
+		act'Not for your first time':
+			cla & *nl
+			'"Wait," you say. "I don''t want you to use a condom. Not for my first time."'
+			gs 'booty_call_condoms', 'virgin_condom2'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom2':
+	if morning_after_pill > 0:
+		act'Have a morning after pill':
+			booty_call['plan_b'] = 1
+			cla & *nl
+			'"Besides," you look pointedly at your bag. "I have a morning after pill."'
+			'<<$npc_firstname[$boy]>> raises an eyebrow back at you.'
+			if hour >= 18:
+				'"Were you expecting to lose your virginity tonight?"'
+			else
+				'"Were you expecting to lose your virginity today?"'
+			end
+			if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+				if LudaQW['condom_give_day'] = daystart:
+					'"My aunt gave it to me today," you mumble shyly. "I don''t think she was expecting me to use it this soon though..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 7:
+					'"My aunt gave it to me earlier this week," you mumble shyly. "For emergencies..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 30:
+					'"My aunt gave it to me a few weeks ago," you mumble shyly. "Just in case..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 7:
+					'"My aunt gave it to me a long time ago," you mumble shyly. "Just in case..."'
+				end
+				gs 'booty_call_condoms', 'virgin_condom3'
+			else
+				act'No':
+					cla & *nl
+					'"No," you blush fiercely. You''re not sure if he believes you though...'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Maybe':
+					cla & *nl
+					'"Maybe..." you smile nervously.'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Yes':
+					cla & *nl
+					'"I was really hoping I would..." you smile nervously.'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Rape emergency':
+					cla & *nl
+					'"A girl like me has to be careful," you mumble nervously. "There are rapists out there you know."'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+			end
+		end
+	else
+		act'Buy a morning after pill':
+			booty_call['pill_tomorrow'] = 1
+			cla & *nl
+			'"Besides, something bad happens I can get a morning after pill," you promise. "I might even get one regardless, just to be safe."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	end
+	
+	if stat['safe_day'] = 1:
+		act'It''s a safe day':
+			cla & *nl
+			booty_call['safe_day'] = 1
+			'"It''s a safe day," you add nervously. "I won''t get pregnant."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+		
+		act'It''s a safe day (come inside)':
+			cla & *nl
+			booty_call['virgin_creampie_request'] = 1
+			booty_call['safe_day'] = 1
+			'"And it''s a safe day," you add hesitantly. "I won''t get pregnant if you... if you want to come inside me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	elseif stat['probably_safe_day'] = 1:
+		act'It''s probably safe today':
+			booty_call['probably_safe_day'] = 1
+			cla & *nl
+			'"It''s a safe-ish day," you add nervously. "I probably won''t get pregnant."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+		
+		act'It''s probably safe today (come inside)':
+			cla & *nl
+			booty_call['virgin_creampie_request'] = 1
+			booty_call['probably_safe_day'] = 1
+			'"And it should be a safe-ish day," you add hesitantly. "I probably won''t get pregnant if you... if you want to come inside me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	elseif stat['dangerous_day'] = 1:
+		act'Don''t come inside me (danger day)':
+			cla & *nl
+			booty_call['danger_day'] = 1
+			'"Just... don''t come inside me," you add nervously. "It''s a danger day for me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom3':
+	if booty_call['safe_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] -= 15
+		else
+			booty_call['condom_bonus'] -= 30
+		end
+	elseif booty_call['probably_safe_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] -= 5
+		else
+			booty_call['condom_bonus'] -= 20
+		end
+	elseif booty_call['danger_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] += 30
+		else
+			booty_call['condom_bonus'] -= 10
+		end
+	elseif npc_childfree[$boy] = 1 and npc_condom_conscious[$boy] > 0:
+		booty_call['condom_bonus'] += 30
+	end
+	if booty_call['condom_count'] = 0 or booty_call['no_condom'] = 1:
+		if $npc_cum_pref[$boy] = 'creampie' and booty_call['virgin_creampie_request'] = 1:
+			'<<$npc_firstname[$boy]>> gulps, apparently stunned with arousal at the thought of coming inside you. It takes several seconds before he nods slowly.'
+		else
+			'"Okay," <<$npc_firstname[$boy]>> nods.'
+		end
+		gs 'booty_call_virgin', 'start_without_condom'
+	elseif rand(npc_willpwr[$boy],100) + booty_call['condom_bonus'] < pcs_persuas + npc_rel[$boy] and npc_condom_conscious[$boy] ! 2:
+		booty_call['no_condom'] = 1
+		booty_call['condom'] = 0
+		if booty_call['virgin_creampie_request'] = 1: booty_call['creampie_allowance'] = 1
+		'<<$npc_firstname[$boy]>> stops, looking back at you for a moment before smiling.'
+		'"Okay," he says and puts the rubber back on the nightstand.'
+		*nl
+		gs 'booty_call_virgin', 'start_without_condom'
+	else
+		'"We shouldn''t risk it," <<$npc_firstname[$boy]>> says, shaking his head and opening the condom anyways. "Especially not for your first time."'
+		act'Wait for him':
+			booty_call['condom'] = 1
+			gs 'booty_call_condoms', 'npc_condom_use_stats'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+			'He tears open the packaging and begins rolling the rubber sleeve onto his cock. You watch him, anxious with anticipation, thinking about what''s about to happen next.'
+			gs 'booty_call_virgin', 'start_with_condom'
+		end
+	end
+end
+
+--- booty_call_condoms ---------------------------------

locations/booty_call_cowgirl.qsrc

@@ -18,24 +18,28 @@ if $ARGS[0] = 'cowgirl_start':
 
 			act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		gs'booty_call_sex', 'speed_select'
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
-		if $booty_call['position'] = 'miss':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he pulls you backwards on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
-		elseif $booty_call['position'] = 'doggy':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he turns you over and pulls you back on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
-		elseif $booty_call['position'] = 'cowgirl':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he begins moving his hips again underneath you. You mew in protest, hypersensitive to every movement of his cock inside your still-quivering pussy. At his insistence, you start moving your hips again.'
-		end
-		act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_remove'] = 0:
+		cla
+		act'Continue':
+			cla & *clr
+			gs'booty_call_sex', 'speed_select'
+			'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
+			if $booty_call['position'] = 'miss':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he pulls you backwards on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
+			elseif $booty_call['position'] = 'doggy':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he turns you over and pulls you back on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
+			elseif $booty_call['position'] = 'cowgirl':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he begins moving his hips again underneath you. You mew in protest, hypersensitive to every movement of his cock inside your still-quivering pussy. At his insistence, you start moving your hips again.'
+			end
+			act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
 
-		act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
+			act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
 
-		act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
+			act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
+		end
 	elseif booty_call['initiative'] ! 1:
 		act'Continue':
 			cla & *clr
@@ -86,13 +90,13 @@ if $ARGS[0] = 'cowgirl_goto':
 end
 
 if $ARGS[0] = 'cowgirl1':
+	booty_call['cowgirl_fuck'] = 1
 	!! slow pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 1
 	$booty_call['position'] = 'cowgirl'
 	$booty_call['pos_speed'] = 'cowgirl1'
 	!! booty_call['cowgirl_fuck'] tracks if you fuck in this position
-	booty_call['cowgirl_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'cowgirl_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -155,6 +159,7 @@ if $ARGS[0] = 'cowgirl1':
 end
 
 if $ARGS[0] = 'cowgirl1.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -176,6 +181,7 @@ if $ARGS[0] = 'cowgirl1.2':
 end
 
 if $ARGS[0] = 'cowgirl1.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -187,6 +193,7 @@ if $ARGS[0] = 'cowgirl1.bored':
 end
 
 if $ARGS[0] = 'cowgirl2':
+	booty_call['cowgirl_fuck'] = 1
 	!! medium pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 2
@@ -255,6 +262,7 @@ if $ARGS[0] = 'cowgirl2':
 end
 
 if $ARGS[0] = 'cowgirl2.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -276,6 +284,7 @@ if $ARGS[0] = 'cowgirl2.2':
 end
 
 if $ARGS[0] = 'cowgirl2.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -287,13 +296,13 @@ if $ARGS[0] = 'cowgirl2.bored':
 end
 
 if $ARGS[0] = 'cowgirl3':
+	booty_call['cowgirl_fuck'] = 1
 	!! fast/rough pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 3
 	$booty_call['position'] = 'cowgirl'
 	$booty_call['pos_speed'] = 'cowgirl3'
 	!! booty_call['cowgirl_fuck'] tracks if you fuck in this position
-	booty_call['cowgirl_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'cowgirl_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -355,6 +364,7 @@ if $ARGS[0] = 'cowgirl3':
 end
 
 if $ARGS[0] = 'cowgirl3.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -399,6 +409,7 @@ if $ARGS[0] = 'cowgirl3.2':
 end
 
 if $ARGS[0] = 'cowgirl3.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -447,7 +458,7 @@ if $ARGS[0] = 'cowgirl1_start_period_desc':
 		if pcs_vag <= 10:
 			'You gently roll your hips over his, grinding his cock against the inside your pussy. You breathe slowly, thankful for the blood from your period providing some lubrication for his thick shaft stretching your tight snatch.'
 		else
-			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it streches you out. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
+			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it stretches you out. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
 		end
 	elseif $npc_dick_desc[$boy] = 'long':
 		'You gently roll your hips over his, hugging the full length of his <<npc_dick[$boy]>>cm cock with your pussy. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
@@ -493,7 +504,7 @@ if $ARGS[0] = 'cowgirl1_start_desc':
 		if pcs_vag <= 10:
 			'You gently roll your hips over his, grinding his cock against the inside your pussy. You breathe slowly trying to adjust as his thick shaft stretches your tight snatch.'
 		else
-			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it streches you out.'
+			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it stretches you out.'
 		end
 	elseif $npc_dick_desc[$boy] = 'long':
 		'You gently roll your hips over his, hugging the full length of his <<npc_dick[$boy]>>cm cock with your pussy.'

locations/booty_call_cum.qsrc

@@ -7,6 +7,7 @@ if $ARGS[0] = 'girl_cum':
 !!	if pcs_horny < 30:pcs_horny = 30
 	booty_call['orgasm'] = orgasm
 	booty_call['orgasm_count'] += 1
+		
 	if $booty_call['position'] = 'miss':
 		gt'booty_call_cum', 'miss_cum'
 	elseif $booty_call['position'] = 'doggy':
@@ -225,12 +226,16 @@ if $ARGS[0] = 'fuck_cum_random':
 !!	if npc_generous[$boy] = 1 and booty_call['cum_choice'] <= 9:
 	if booty_call['cum_choice'] > 1 and booty_call['cum_choice'] < 10: booty_call['cum_warn'] = 1
 	
+!!	if booty_call['cum_choice'] = 10 and booty_call['fucking'] = 1:
 	if booty_call['cum_choice'] = 10:
 		if booty_call['extra_caution'] = 1 and booty_call['no_condom'] = 1 and booty_call['creampie_allowance'] ! 1:
 			$booty_call['cum_choice'] = 'pullout'
 		else
 			$booty_call['cum_choice'] = 'creampie_surprise'
 		end
+	elseif booty_call['virgin_creampie_request'] = 1 and booty_call['creampie_count'] = 0 and booty_call['no_condom'] = 1:
+		booty_call['cum_where'] = 1
+		!! add something later?
 	elseif booty_call['cum_choice'] > 7:
 		gs'booty_call_cum', 'random_cum_choice'
 	elseif booty_call['cum_choice'] > 5:
@@ -283,6 +288,7 @@ if $ARGS[0] = 'fuck_cum':
 	!! flags to remember what kind of fucking happened during sex
 	if booty_call['morning_after'] = 1:booty_call['morning_fuck'] = 1
 	booty_call['fuck'] = 1
+	booty_call['no_sex'] = 0
 	if booty_call['speed'] = 1: booty_call['gentle_fuck'] = 1
 	if booty_call['speed'] = 2: booty_call['steady_fuck'] = 1
 	if booty_call['speed'] = 3: booty_call['rough_fuck'] = 1
@@ -354,7 +360,7 @@ if $ARGS[0] = 'fuck_cum':
 		act'Come wherever you want':
 			cla & *nl
 			booty_call['cum_wherever'] = 1
-			if booty_call['he_ask'] ! 1:
+			if booty_call['he_ask'] ! 1 or booty_call['cum_warn'] = 1:
 				if $booty_call['position'] = 'doggy':
 					if booty_call['speed'] = 1:
 						'You turn your head over your shoulder to smile at <<$npc_firstname[$boy]>>.'
@@ -365,7 +371,11 @@ if $ARGS[0] = 'fuck_cum':
 						'"Come-! Wherever-! You want-!" you barely manage to get out as <<$npc_firstname[$boy]>> keeps smashing into you from behind.'
 					end
 				else
-					if booty_call['speed'] = 1:
+					if booty_call['virgin'] = 1 and booty_call['virgin_enjoyment'] = -1:
+						'"Come~! Wherever~! You~! Want~!" you whimper pathetically, squeaking in pain with every thrust.'
+					elseif booty_call['virgin'] = 1 and booty_call['virgin_feel_good'] ! 1:
+						'"Come~! Wherever~! You~! Want~!" you grunt uncomfortably with every thrust.'
+					elseif booty_call['speed'] = 1:
 						'"Come wherever you want," you smile at <<$npc_firstname[$boy]>>.'
 					elseif booty_call['speed'] = 2:
 						'"Come wherever you want!" you moan loudly as <<$npc_firstname[$boy]>> keeps fucking you.'
@@ -384,7 +394,7 @@ if $ARGS[0] = 'fuck_cum':
 		act'Finish him with your hand':gt 'booty_call_cum', 'cum_jerkoff'
 		
 		if booty_call['he_ask_facial'] = 1:
-			act'You can cum on my face':gs 'booty_call_cum', 'cum_facial'
+			act'You can come onmy face':gs 'booty_call_cum', 'cum_facial'
 		else
 			act'On my face!':
 				if booty_call['cum_where'] = 1:
@@ -415,7 +425,9 @@ if $ARGS[0] = 'fuck_cum':
 		else
 			!!if booty_call['orgasm'] < orgasm or pcs_horny >= 85:
 			if booty_call['he_ask_creampie'] = 1:
-				if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and npc_know_bc[$boy] < 1:
+				if booty_call['orgasm'] < orgasm:
+					act'Come together':booty_call['he_ask_creampie_yes'] = 1 & gs 'booty_call_cum', 'cum_together'
+				elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and (npc_know_not_bc[$boy] = 1 or npc_know_bc[$boy] = 0):
 					if birth_control['think_safe'] = 1:
 						act'I''m on birth control':
 							cla & *nl
@@ -469,7 +481,11 @@ if $ARGS[0] = 'fuck_cum':
 				act'Come inside me!':
 					cla & *nl
 					booty_call['creampie_ask'] = 1
-					'"Come inside me!" you cry. "Fill me up!"'
+					if booty_call['speed'] = 1:
+						'"Come inside me," you smile. "Fill me up."'
+					else
+						'"Come inside me!" you cry. "Fill me up!"'
+					end
 					act'Continue':gt 'booty_call_cum', 'cum_inside'
 				end
 				
@@ -714,8 +730,6 @@ if $ARGS[0] = 'cum_facial':
 		gs'booty_call_cum', 'facial_brace'
 		act'Jerk him yourself':gt'booty_call_cum', 'facial_jerk_him'
 		
-		
-		
 !!		act'Let him jerk off on your face':gt'booty_call_cum', 'facial_he_jerks'
 !!	end
 end
@@ -903,7 +917,7 @@ if $ARGS[0] = 'facial_brace':
 			gs'booty_call_sex', 'sex_end'
 		end
 		if $npc_cum_pref[$boy] = 'facial' and booty_call['facial_ask'] = 1 and booty_call['facial_hate_comment'] ! daystart:
-			'"You hate it so much," he says "but you still asked me to do it."'
+			'"You hate it so much," he says "But you still asked me to do it?"'
 			act'I know you like it':
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/cum/facial/facial_after1.mp4"></video></center>'
@@ -959,14 +973,14 @@ if $ARGS[0] = 'facial_brace':
 				act'Feels weird':
 					cla & *clr
 					'"I don''t like the feeling of that on my skin," you grimace, <<$booty_call[''cum_describe2'']>>.'
-					'"So you had me cum on your face instead?"'
+					'"So you had me come onyour face instead?"'
 					'"... Shut up!"'
 					gs'booty_call_sex', 'sex_end'
 				end
 				
-				act'I should''ve let you cum on my tits':
+				act'I should''ve let you come onmy tits':
 					cla & *clr
-					'"I should''ve let you cum on my tits," you grimace, <<$booty_call[''cum_describe2'']>>. "This was a mistake!"'
+					'"I should''ve let you come onmy tits," you grimace, <<$booty_call[''cum_describe2'']>>. "This was a mistake!"'
 					gs'booty_call_sex', 'sex_end'
 				end
 			else
@@ -977,10 +991,14 @@ if $ARGS[0] = 'facial_brace':
 	end
 end
 if $ARGS[0] = 'cum_mouth':
+	cla
 	booty_call['cock_remove'] = 1
 	!! differing descriptions based on position
 	!!'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-	if booty_call['his_choice'] ! 2:
+	if booty_call['his_choice'] = 1:
+		'"I''m gonna come in your mouth!" is the only warning your receive before <<$npc_firstname[$boy]>> yanks his cock from your pussy and shoves it between your lips.'
+		act'Continue':gt'booty_call_cum', 'cum_mouth1'
+	else
 		if booty_call['mouth_ask'] = 1:
 			'"In my mouth!"'
 		elseif booty_call['he_ask_mouth'] = 1:
@@ -990,14 +1008,14 @@ if $ARGS[0] = 'cum_mouth':
 				'"Okay," you say.'
 			end
 		elseif booty_call['he_ask'] = 1:
-			'"Cum in my mouth instead!"'
+			'"Come in my mouth instead!"'
+			act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
 		elseif booty_call['not_inside'] = 1:
-			'"Not inside me!" you yelp frantically.'
+			'"Not inside me!" you yelp frantically. In response, <<$npc_firstname[$boy]>> yanks his cock from your pussy and moves it towards your mouth.'
 		end
+		act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
+		gs'booty_call_cum', 'facial_tongue_swallow'
 	end
-	cla
-	act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
-	gs'booty_call_cum', 'facial_tongue_swallow'
 end
 
 if $ARGS[0] = 'cum_mouth1':
@@ -1051,7 +1069,10 @@ if $ARGS[0] = 'cum_mouth1':
 			end
 		end
 	end
-	
+	gs'booty_call_cum', 'cum_mouth2'
+end
+
+if $ARGS[0] = 'cum_mouth2':
 	act'Gather it in your mouth':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum51.jpg"></center>'
@@ -1085,6 +1106,20 @@ if $ARGS[0] = 'cum_mouth1':
 		end
 	end
 	
+	act'Spit':
+		booty_call['cum_mouth'] = 1
+		booty_call['spit'] = 1
+		booty_call['swallow'] = 0
+		booty_call['cum_count'] += 1
+		$booty_call['last_cum'] = 'spit'
+		gs 'cum_call', 'mouth', $boy, 1
+		gs 'stat'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
+		'You draw yourself back up <<$npc_firstname[$boy]>>''s cock, keeping your lips tightly sealed, allowing the cum to pool at the front of your mouth. You hold it there for a few moments and then unpurse your lips, and letting all his cum dribble out of your mouth and down your chin.'
+		gs 'booty_call_sex', 'sex_end'
+	end
+	
 	if npc_like_cum_taste[$boy] < 1:
 		act'Gag':
 			cla & *clr
@@ -1095,7 +1130,7 @@ if $ARGS[0] = 'cum_mouth1':
 			booty_call['react'] = 1
 			gs'cum_call', 'mouth', $boy, 1
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/gag2.mp4"></video></center>'
-			'The intensity of the bitter flavor is far more than you expect and you immediately pull your mouth off, spitting out the first load. You stick your tongue out, tryiing to soldier through and at least take the rest of it but as soon as the next shot hits your tongue your gag reflex kicks in instead, causing you to retch.'
+			'The intensity of the bitter flavor is far more than you expect and you immediately pull your mouth off, spitting out the first load. You stick your tongue out, trying to soldier through and at least take the rest of it but as soon as the next shot hits your tongue your gag reflex kicks in instead, causing you to retch.'
 			'Still holding onto <<$npc_firstname[$boy]>>''s cock with one hand, you clamp your other hand over your mouth, throat convulsing. It smears the cum on your lips all over your face, but you somehow manage to stop yourself from throwing up all over the bed.'
 			
 			if npc_cum_gag[$boy] = 1:
@@ -1202,11 +1237,11 @@ if $ARGS[0] = 'cum_tits1':
 	!! differing descriptions based on position
 	cla & *nl
 	if booty_call['tits_ask'] = 1:
-		'"Cum on my tits!"'
+		'"Come onmy tits!"'
 	elseif booty_call['he_ask_tits'] = 1:
 		'"Go ahead," you say.'
 	elseif booty_call['he_ask'] = 1:
-		'"Cum on my tits instead!"'
+		'"Come onmy tits instead!"'
 	elseif booty_call['not_inside'] = 1:
 		'"Not inside me!" you yelp frantically.'
 	end
@@ -1232,9 +1267,11 @@ if $ARGS[0] = 'cum_tits1':
 	if booty_call['not_inside'] = 1:
 		act'Continue':gt 'booty_call_cum', 'cum_tits3'
 	else
+		act'Let him do it':gt 'booty_call_cum', 'cum_tits3'
+		
 		act'Finish him yourself':gt 'booty_call_cum', 'cum_tits2'
 		
-		act'Let him do it':gt 'booty_call_cum', 'cum_tits3'
+		gs 'booty_call_cum', 'cum_tits4'
 	end
 end
 
@@ -1283,15 +1320,44 @@ if $ARGS[0] = 'cum_tits3':
 		if $booty_call['position'] = 'miss':
 			'You open up your legs to let him out and he scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		elseif $booty_call['position'] = 'doggy':
-			'You hurridely pull yourself off of him, turning around and laying down on the bed. He scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
+			'You hurriedly pull yourself off of him, turning around and laying down on the bed. He scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		elseif $booty_call['position'] = 'cowgirl':
-			'You hurridely jump off of him, laying down on the bed. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
+			'You hurriedly jump off of him, laying down on the bed. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		end
 	end
 	'<<$npc_firstname[$boy]>> quickly moves over to you, holding his cock in his hand. As you sit up, cum bursts from the tip, thick white droplets spattering across your breasts as <<$npc_firstname[$boy]>> shudders in pleasure.'
 	gs'booty_call_sex', 'sex_end'
 end
 
+if $ARGS[0] = 'cum_tits4':
+	if tits > 1:
+		act'Finish him with your tits':
+			booty_call['cock_remove'] = 1
+			booty_call['cum_tits'] = 1
+			$booty_call['last_cum'] = 'tits'
+			booty_call['cum_count'] += 1
+			gs 'cum_call', 'breasts', $boy, 1
+			gs 'cum_call', 'hands', $boy, 1
+			gs 'stat'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
+			if booty_call['cum_choice'] = 'tits':
+				'"I can do you one better than that," you grin.'
+			else
+				'"I''ve got an even better idea," you grin.'
+			end
+			if booty_call['fucking'] = 1:
+				'You jump off his cock and kneel between his legs, smooshing your breasts together around his cock and start working them up and down his shaft. Within seconds, cum erupts from the tip, smearing it across your still bouncing tits and all over your fingers.'
+			else
+				'You kneel between his legs, smooshing your breasts together around his cock and start working them up and down his shaft. Within seconds, cum erupts from the tip, smearing it across your still bouncing tits and all over your fingers.'
+			end
+			!! reactions?
+			gs 'booty_call_sex', 'sex_end'
+			gs 'booty_call_after', 'wipe_tits'
+		end
+	end
+end
+
 if $ARGS[0] = 'cum_tits_end':
 	!! add dialogue later
 	!! missing code
@@ -1334,7 +1400,7 @@ if $ARGS[0] = 'cum_inside':
 			booty_call['simultaneous_orgasm_count'] += 1
 			'<<$npc_firstname[$boy]>> drives himself inside you with a grunt and you feel cum spurting out inside you. The sensation pushes you over the edge, gasping as waves of orgasm wash through you. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course, and both of you are breathing hard.'
 			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			gs'booty_call_reactions', 'react_menu'
 		else
 			'<<$npc_firstname[$boy]>> drives himself inside you, grunting. His cock pulses inside you and warmth fills your pussy.'
 			act'Ride it out':
@@ -1356,7 +1422,7 @@ if $ARGS[0] = 'cum_inside':
 				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. 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'Continue':cla & gs'booty_call_sex', 'sex_end'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Tolerate it (disgust)':
@@ -1376,26 +1442,24 @@ if $ARGS[0] = 'cum_inside':
 			booty_call['orgasm_count'] += 1
 			booty_call['came_together'] = 2
 			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
-			if booty_call['creampie_ask'] = 1:'"Come inside me!" you cry. "Fill me up!"'
 			'<<$npc_firstname[$boy]>> grunts and you feel him come, cock pulsing inside you. The sensation pushes you over the edge, and you groan, tensing as waves of orgasm wash through you. The two of come together, both of your orgasms fueling the other''s until eventually they both end.'
 			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			gs'booty_call_reactions', 'react_menu'
 		else
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/doggy4.mp4"></video></center>'
-			if booty_call['creampie_ask'] = 1:'"Come inside me!" you cry. "Fill me up!"'
 			'<<$npc_firstname[$boy]>> drives himself inside you, grunting. His cock pulses inside you and warmth fills your pussy.'
 			act'Ride it out':
 				cla & *nl
 				'You stay there patiently, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Tolerate it (disgust)':
 				cla & *nl
 				'You stay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Come with him':
@@ -1409,13 +1473,12 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['simultaneous_orgasm_count'] += 1
 				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 		end
 	elseif $booty_call['position'] = 'cowgirl':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cumvaginal.mp4"></video></center>'
 		if booty_call['creampie_ask'] = 1:
-			'"Come inside me!" you cry. "Fill me up!"'
 			if pcs_horny > 90:
 				$orgasm_or = 'yes'
 				gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
@@ -1423,11 +1486,31 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['orgasm_count'] += 1
 				booty_call['came_together'] = 2
 				'You drop your hips, impaling yourself on <<$npc_firstname[$boy]>>''s cock. He thrusts his hips upward, driving himself deep inside you and you feel cum spurt out inside you. The sensation pushes you over the edge, causing your pussy to clamp down onto his cock even more and your body to spasm uncontrollably. The two of come together, holding each other tight, both of your orgasms fueling the other''s. After some time, your orgasm fades, leaving both of you panting.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
 			else
 				'You drop your hips, impaling yourself on <<$npc_firstname[$boy]>>''s cock. He grabs you and holds you tight, thrusting humself upward, driving his cock in deep into you as he can manage. As he does, you feel him stiffen up and groan, and his cock pulses inside you.'
 			end
-			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			act'Ride it out':
+				cla & *nl
+				'You keep gently rocking your hips, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
+			end
+			
+			act'Come with him':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
+				$orgasm_or = 'yes'
+				gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
+				gs'stat'
+				booty_call['came_together'] = 2
+				booty_call['orgasm_count'] += 1
+				booty_call['simultaneous_orgasm_count'] += 1
+				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
+			end
 		else
 			if pcs_horny > 90:
 				$orgasm_or = 'yes'
@@ -1437,21 +1520,21 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['came_together'] = 2
 				'<<$npc_firstname[$boy]>> grabs you and pulls you down onto his cock, thrusting his hips upward at the same time, driving himself deep inside you and you feel cum spurt out inside you. The sensation pushes you over the edge, causing your pussy to clamp down onto his cock even more and your body to spasm uncontrollably. The two of come together, holding each other tight, both of your orgasms fueling the other''s. After some time, your orgasm fades, leaving both of you panting.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			else
 				'<<$npc_firstname[$boy]>> grabs you and pulls you down onto his cock. He holds you tight, thrusting humself upward, driving his cock in deep into you as he can manage. As he does, you feel him stiffen up and groan, and his cock pulses inside you.'
 				act'Ride it out':
 					cla & *nl
 					'You keep gently rocking your hips, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 				
 				act'Tolerate it (disgust)':
 					cla & *nl
 					'You stay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 				
 				act'Come with him':
@@ -1465,7 +1548,7 @@ if $ARGS[0] = 'cum_inside':
 					booty_call['simultaneous_orgasm_count'] += 1
 					'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 		end
@@ -1512,7 +1595,7 @@ if $ARGS[0] = 'cum_together':
 	cla & *nl
 	if booty_call['he_ask_creampie'] = 1:
 		if $booty_call['position'] = 'miss':
-			'You just nod, unable to say anything and grab hold of him tightly. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
+			'You just nod, unable to say anything, and grab hold of him tightly. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
 		elseif $booty_call['position'] = 'doggy':
 			'You just nod, unable to say anything, eagerly throwing your hips back into his thrusts. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
 		elseif $booty_call['position'] = 'cowgirl':
@@ -1550,7 +1633,7 @@ if $ARGS[0] = 'cum_together':
 		end
 		'<<$npc_firstname[$boy]>>''s cock pulses inside you and something warm spills into your pussy. His hot cum filling you up is the last thing you need to get off and suddenly you''re right there with him, muscles going taut and quivering uncontrollably as the two of you come together.'
 		gs 'booty_call_cum', 'cum_inside_pull_away'
-		gs 'booty_call_reactions', 'creampie_react'
+		gs'booty_call_reactions', 'react_menu'
 	end
 end
 
@@ -1632,7 +1715,7 @@ if $ARGS[0] = 'cum_force':
 				*nl
 				'Judging by the expression on his face, you just rocked his world finishing him like that.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 		else
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cowgirl2.mp4"></video></center>'
@@ -1647,7 +1730,7 @@ if $ARGS[0] = 'cum_force':
 					*nl
 					'Judging by the expression on his face, you just rocked his world finishing him like that.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 			act'Creampie induced orgasm':
@@ -1660,7 +1743,7 @@ if $ARGS[0] = 'cum_force':
 					*nl
 					'Both of you are breathing hard, unable to do anything but pant wordlessly until the aftershocks subside.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 		end
@@ -1713,7 +1796,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1:
 					'<<$npc_firstname[$boy]>> pulls himself out of your pussy and tears off the condom, furiously jacking off over you. Moments later, he ejaculates, sending cum flying all over your body, spattering across your belly.'
 				else
-					'He barely follows your instructions in time. No sooner does his cock slip from your pussy than cum bursts from the tip, spattering all across your stomach.'
+					'"Oh fuck!" <<$npc_firstname[$boy]>> barely follows your instructions in time. No sooner does his cock slip from your pussy than cum bursts from its tip, spattering all across your stomach.'
 				end
 			else
 				if booty_call['condom'] = 1:
@@ -1735,7 +1818,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1 and booty_call['no_condom'] = 0:
 					'<<$npc_firstname[$boy]>> yanks himself from your pussy and you hear a <i>snap</i> as he rips the condom off of his cock and moments later, you feel hot liquid spatter all over ass and across your back.'
 				else
-					'Not even a second passes between feeling <<$npc_firstname[$boy]>>''s cock slip from your snatch and when hot liquid spatters across your back and dribbles onto your ass.'
+					'"Oh fuck!" Not even a second passes between feeling <<$npc_firstname[$boy]>>''s cock vacate your pussy and when hot liquid spatters across your back and dribbles onto your ass.'
 				end
 			else
 				'"Oh fuck!" <<$npc_firstname[$boy]>> suddenly cries out. His cock slips from your snatch and not even a moment later do you feel hot liquid spattering across your back and dribbling onto your ass.'
@@ -1763,7 +1846,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1:
 					'<<$npc_firstname[$boy]>> suddenly pushes you backwards, eliciting a yelp as you fall onto your back, his cock popping out from your pussy along the way. He rips the condom off his cock and moments later, he ejaculates, sending cum spattering across your belly.'
 				else
-					'<<$npc_firstname[$boy]>> grunts, his cock slipping from your pussy and sliding up between your ass cheeks. You reach around to put it back in when you feel something hot and wet spattering across your ass and back.'
+					'"Oh fuck!" <<$npc_firstname[$boy]>> grunts, his cock slipping from your pussy and sliding up between your ass cheeks. You reach around to put it back in when you feel something hot and wet spattering across your ass and back.'
 				end
 			end
 		end
@@ -1892,7 +1975,8 @@ if $ARGS[0] = 'creampie_surprise_cum_together':
 	end
 	if npc_know_love_creampie[$boy] = 1:
 		'He stares into your eyes, smiling.'
-	else
+	elseif booty_call['came_together'] = 2:
+		booty_call['did_we_cum_together'] = 1
 		'"Did... did we... did you...?" he pants.'
 	end
 	
@@ -1997,11 +2081,9 @@ if $ARGS[0] = 'cum_condom':
 	if $booty_call['position'] = 'miss':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
 		$booty_call['cum_describe2'] = 'looking between your legs as he removes his cock, the rubber casing around it bulging with liquid'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'doggy':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum71.jpg"></center>'
 		$booty_call['cum_describe2'] = 'looking over your shoulder as you let his rubber encased cock slip from your pussy'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'cowgirl':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cumvaginal.mp4"></video></center>'
 		$booty_call['cum_describe2'] = 'settling your self down onto his rubber encased cock'
@@ -2009,7 +2091,7 @@ if $ARGS[0] = 'cum_condom':
 	if condom_break > 0:
 		booty_call['broken_condom'] = 1
 		if booty_call['orgasm'] < orgasm:
-			booty_call['came_together'] = 1
+			booty_call['came_together'] = 2
 			'<<$npc_firstname[$boy]>> buries his cock inside your pussy. It throbs inside you through the condom, causing you to come as well. You ride out your orgasms together, oblivious to everything except the pleasure.'
 			act'Continue':gs'booty_call_cum', 'broken_condom2'
 		else

locations/booty_call_doggy.qsrc

@@ -16,19 +16,23 @@ if $ARGS[0] = 'doggy_start':
 			'"I want you to fuck me from behind now."'
 			act'Keep fucking':gs'booty_call_doggy', 'doggy_goto'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		gs 'booty_call_sex', 'speed_select'
-		if $booty_call['position'] = 'miss':
-			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
-			'You''ve barely finished your orgasm when he rolls you onto your knees and pulls your hips back towards him. With one swift thrust, he plunges his cock into your still-quivering pussy, earning him an involuntary gasp as he begins fucking you again.'
-		elseif $booty_call['position'] = 'doggy':
-			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
-			'<<$npc_firstname[$boy]>> doesn''t give you a moment to rest, continuing to fuck you all the way through your orgasm. You quiver, your sensitive pussy spasming around his cock, driving your insane even after you''ve finished.'
-		elseif $booty_call['position'] = 'cowgirl':
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
-			'You''ve barely finished quivering when he pulls you off of him and rolls you onto your knees, pulling your hips back towards him. With one swift movement, he thrusts his cock into your still-quivering pussy. His actions earn him an involuntary gasp from your mouth before he begins fucking you again.'
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_remove'] = 0:
+		cla
+		act'Continue':
+			cla & *clr
+			gs 'booty_call_sex', 'speed_select'
+			if $booty_call['position'] = 'miss':
+				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
+				'You''ve barely finished your orgasm when he rolls you onto your knees and pulls your hips back towards him. With one swift thrust, he plunges his cock into your still-quivering pussy, earning him an involuntary gasp as he begins fucking you again.'
+			elseif $booty_call['position'] = 'doggy':
+				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
+				'<<$npc_firstname[$boy]>> doesn''t give you a moment to rest, continuing to fuck you all the way through your orgasm. You quiver, your sensitive pussy spasming around his cock, driving your insane even after you''ve finished.'
+			elseif $booty_call['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
+				'You''ve barely finished quivering when he pulls you off of him and rolls you onto your knees, pulling your hips back towards him. With one swift movement, he thrusts his cock into your still-quivering pussy. His actions earn him an involuntary gasp from your mouth before he begins fucking you again.'
+			end
+			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
-		act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 	elseif booty_call['initiative'] ! 1:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
@@ -112,12 +116,12 @@ if $ARGS[0] = 'doggy_goto':
 end
 
 if $ARGS[0] = 'doggy1':
+	booty_call['doggy_fuck'] = 1
 	!! slow pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
 	$booty_call['pos_speed'] = 'doggy1'
 	!! booty_call['doggy_fuck'] tracks if you fuck in this position
-	booty_call['doggy_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -137,9 +141,7 @@ if $ARGS[0] = 'doggy1':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow2.mp4"></video></center>'
 		gs 'booty_call_doggy', 'doggy1_enjoy_desc'
-		if booty_call['orgasm'] < orgasm:
-			gs 'booty_call_sex', 'girl_cum_pre'
-		end
+		if booty_call['orgasm'] < orgasm: gs 'booty_call_sex', 'girl_cum_pre'
 		gs 'booty_call_cum', 'fuck_cum'
 	end
 
@@ -187,6 +189,7 @@ if $ARGS[0] = 'doggy1':
 end
 
 if $ARGS[0] = 'doggy1.1':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -198,6 +201,7 @@ if $ARGS[0] = 'doggy1.1':
 end
 
 if $ARGS[0] = 'doggy1.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -241,6 +245,7 @@ if $ARGS[0] = 'doggy1.2':
 end
 
 if $ARGS[0] = 'doggy1.bored':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -254,12 +259,12 @@ if $ARGS[0] = 'doggy1.bored':
 end
 
 if $ARGS[0] = 'doggy2':
+	booty_call['doggy_fuck'] = 1
 	!! medium pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
 	$booty_call['pos_speed'] = 'doggy2'
 	!! booty_call['doggy_fuck'] tracks if you fuck in this position
-	booty_call['doggy_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -327,6 +332,7 @@ if $ARGS[0] = 'doggy2':
 end
 
 if $ARGS[0] = 'doggy2.1':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -339,6 +345,7 @@ if $ARGS[0] = 'doggy2.1':
 end
 
 if $ARGS[0] = 'doggy2.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -387,6 +394,7 @@ if $ARGS[0] = 'doggy2.2':
 end
 
 if $ARGS[0] = 'doggy2.bored':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -398,6 +406,7 @@ if $ARGS[0] = 'doggy2.bored':
 end
 
 if $ARGS[0] = 'doggy3':
+	booty_call['doggy_fuck'] = 1
 	!! fast/rough pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
@@ -443,38 +452,67 @@ if $ARGS[0] = 'doggy3':
 			end
 			
 			act'It hurts!':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/2.jpg"></center>'
-				'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly, letting you collapse to the bed as he releases your hair.'
-				'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
-				act'No (enjoy)':
+				if ((npc_selfish[$boy] = 1 and npc_speed_pref[$boy] = 3) or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
 					cla & *nl
-					npc_knows_pc_likes_rough[$boy] = 1
-					booty_call['rough_enjoy'] = 1
-					'"No," you smile back at him. "I want you to pound me."'
-					'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
-					act'Continue':gt 'booty_call_doggy', 'doggy3.1'
-				end
+					'"Oh fuck! It hurts!" you cry.'
+					'"Hurts fucking good doesn''t it?" <<$npc_firstname[$boy]>> grunts back, not even pausing for a single beat.'
+					act'Please slow down!':
+						cla & *nl
+						booty_call['orgasm'] = orgasm
+						$orgasm_or = 'no'
+						booty_call['rough_hurt'] = 1
+						booty_call['boy_cum'] = 2
+						'"Please!" you beg, tears welling up in  your eyes. "Please slow down! I can''t-! Take-!'
+						'But <<$npc_firstname[$boy]>> is heedless of your cries. He keeps a firm hold on your hair and pulls hard with every thrust, forcing unceasing cries of pain from your lips.'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+					
+					act'If you slow down I will kill you':
+						pcs_sweat += 1
+						booty_call['orgasm'] = orgasm
+						booty_call['rough_enjoy'] = 1
+						gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
+						gs 'stat'
+						cla & *nl
+						'You scream another cry of agonizing pleasure and grimace at <<$npc_firstname[$boy]>>.'
+						'"If you slow down I will <i>fucking</i> kill you," you snarl, throwing your hips forward to slam into his for more force.'
+						gs 'booty_call_miss', 'miss3_enjoy_desc'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+				else
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/2.jpg"></center>'
+					'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly, letting you collapse to the bed as he releases your hair.'
+					'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
+					act'No (enjoy)':
+						cla & *nl
+						npc_knows_pc_likes_rough[$boy] = 1
+						booty_call['rough_enjoy'] = 1
+						'"No," you smile back at him. "I want you to pound me."'
+						'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
+						act'Continue':gt 'booty_call_doggy', 'doggy3.1'
+					end
 
-	!!			if npc_abusive[$boy] = 1:
-	!!				$orgasm_or = 'no'
-	!!				*nl
-	!!				'But <<$npc_firstname[$boy]>> is unrelenting. He ignores your pleas for mercy and he keeps on fucking you with barely a pause.'
-	!!			else
+		!!			if npc_abusive[$boy] = 1:
+		!!				$orgasm_or = 'no'
+		!!				*nl
+		!!				'But <<$npc_firstname[$boy]>> is unrelenting. He ignores your pleas for mercy and he keeps on fucking you with barely a pause.'
+		!!			else
 
-				act'Yes, gentle please':
-					cla & *nl
-					booty_call['too_rough'] = 1
-					'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
-					act'Continue':gt 'booty_call_doggy', 'doggy1.1'
-				end
+					act'Yes, gentle please':
+						cla & *nl
+						booty_call['too_rough'] = 1
+						'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
+						act'Continue':gt 'booty_call_doggy', 'doggy1.1'
+					end
 
-				act'Not <i>too</i> gentle':
-					cla & *nl
-					booty_call['too_rough'] = 1
-					'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
-					'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
-					act'Continue':gt 'booty_call_doggy', 'doggy2.2'
+					act'Not <i>too</i> gentle':
+						cla & *nl
+						booty_call['too_rough'] = 1
+						'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
+						'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
+						act'Continue':gt 'booty_call_doggy', 'doggy2.2'
+					end
 				end
 			end
 
@@ -527,6 +565,7 @@ if $ARGS[0] = 'doggy3':
 						end
 						*nl
 						'You don''t want to ruin the mood. Besides, <<$npc_firstname[$boy]>> wouldn''t understand...'
+						gs 'booty_call_cum', 'fuck_cum'
 					end
 					
 					act'Scream':
@@ -541,7 +580,7 @@ if $ARGS[0] = 'doggy3':
 							'But despite your desperate screams, <<$npc_firstname[$boy]>> doesn''t even slow down, instead continuing to pummel you from behind as you cry in terror.'
 							gs 'booty_call_cum', 'fuck_cum'
 						else
-							act'Continue':gs 'booty_call_talk', 'rape_explain'
+							act'Continue':gs 'booty_call_talk2', 'rape_explain'
 						end
 					end
 				end
@@ -551,6 +590,7 @@ if $ARGS[0] = 'doggy3':
 end
 
 if $ARGS[0] = 'doggy3.1':
+	booty_call['doggy_fuck'] = 1
 	$booty_call['pos_speed'] = 'doggy3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -590,6 +630,7 @@ if $ARGS[0] = 'doggy3.1':
 end
 
 if $ARGS[0] = 'doggy3.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'

locations/booty_call_favorite_part.qsrc

@@ -21,15 +21,15 @@ if $ARGS[0] = 'good_for_you':
 				gs'booty_call_favorite_part', 'tit_cum_favorite'
 			elseif npc_pussyeater[$boy] = 1 and booty_call['cuni_orgasm'] > 0:
 				gs'booty_call_favorite_part', 'pussyeat_favorite'
-			elseif $npc_fav_pos[$npclastgenerated] = 'missionary' and booty_call['miss_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'missionary' and booty_call['miss_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_miss_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'doggy' and booty_call['doggy_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'doggy' and booty_call['doggy_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_doggy_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'cowgirl' and booty_call['cowgirl_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'cowgirl' and booty_call['cowgirl_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_cowgirl_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'blowjob' and booty_call['bj_count'] > 0:
+			elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['bj_count'] > 0:
 				gs'booty_call_favorite_part', 'npc_bj_fav1'
-			!! elseif $npc_fav_pos[$npclastgenerated] = 'titjob':
+			!! elseif $npc_fav_pos[$boy] = 'titjob':
 			!!	 gs'booty_call_favorite_part', 'pussyeat_favorite'
 			else
 				if booty_call['virgin'] ! 1:
@@ -1371,7 +1371,7 @@ if $ARGS[0] = 'pc_creampie_fav1':
 					'"I liked it when you came inside me," you smile warmly at <<$npc_firstname[$boy]>> rubbing your wet thighs together where his cum was leaking from your snatch just minutes ago. "I can <i>feel</i> everything. Your cock throbs inside me, warmth spreading through my hips, I just feel <i>full</i> when you come inside me. And it feels really really good."'
 				end
 			end
-			if booty_call['accidental_creampie_convo'] = 0 and (npc_know_not_bc[$boy] = 1 or booty_call['risky_creampie'] > 0 or npc_childfree[$boy] > 0):
+			if booty_call['accidental_creampie_convo'] = 0 and (npc_know_not_bc[$boy] = 1 or booty_call['risky_creampie'] > 0 or npc_childfree[$boy] > 0) and booty_call['safe_day'] ! 1 and booty_call['probably_safe_day'] ! 1:
 				gs'booty_call_talk', 'boy_accidental_creampie'
 			else
 				gs'booty_call_pillow_talk', 'topics'

locations/booty_call_miss.qsrc

@@ -14,18 +14,22 @@ if $ARGS[0] = 'missionary_start':
 			'"I want you on top," you whisper huskily.'
 			act'Keep fucking':gs'booty_call_miss', 'miss_goto'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex1.mp4"></video></center>'
-		if $booty_call['position'] = 'miss':
-			'You''ve barely finished quivering when he starts moving his hips again. The motion inside your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
-		elseif $booty_call['position'] = 'doggy':
-			!! IMAGE HERE
-			'You''ve barely finished quivering when he rolls you onto your back and plunges his cock all the way inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
-		elseif $booty_call['position'] = 'cowgirl':
-			!! IMAGE HERE
-			'You''ve barely finished quivering when he pulls you off of him and pushes you onto your back, immediately plunging his cock back inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again.'
-		end
-		act'Get fucked':gs'booty_call_miss', 'miss_goto'
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_remove'] = 0:
+		cla
+		act'Continue':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex1.mp4"></video></center>'
+			if $booty_call['position'] = 'miss':
+				'You''ve barely finished quivering when he starts moving his hips again. The motion inside your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
+			elseif $booty_call['position'] = 'doggy':
+				!! IMAGE HERE
+				'You''ve barely finished quivering when he rolls you onto your back and plunges his cock all the way inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
+			elseif $booty_call['position'] = 'cowgirl':
+				!! IMAGE HERE
+				'You''ve barely finished quivering when he pulls you off of him and pushes you onto your back, immediately plunging his cock back inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again.'
+			end
+			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+		end
 	elseif booty_call['initiative'] ! 1:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
@@ -67,6 +71,7 @@ end
 
 if $ARGS[0] = 'miss1':
 	!! slow pace
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'miss'
 	$booty_call['pos_speed'] = 'miss1'
@@ -100,8 +105,8 @@ if $ARGS[0] = 'miss1':
 		if rand(0,2) = 2 and booty_call['kiss_skip'] = 1 and cum_loc['face'] <= 0:
 			gs 'booty_call_miss', 'miss_kiss'
 		else
-			gs 'booty_call_cum', 'fuck_cum'
 			if booty_call['orgasm'] < orgasm:gs 'booty_call_sex', 'girl_cum_pre'
+			gs 'booty_call_cum', 'fuck_cum'
 		end
 	end
 
@@ -158,6 +163,7 @@ end
 
 if $ARGS[0] = 'miss1.1':
 	cla & *clr
+	booty_call['miss_fuck'] = 1
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -170,6 +176,7 @@ if $ARGS[0] = 'miss1.1':
 end
 
 if $ARGS[0] = 'miss1.2':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
@@ -230,6 +237,7 @@ end
 
 if $ARGS[0] = 'miss1.bored':
 	cla & *clr
+	booty_call['miss_fuck'] = 1
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -243,6 +251,7 @@ end
 
 if $ARGS[0] = 'miss2':
 	!! medium pace
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['kiss'] = 0
 	$booty_call['position'] = 'miss'
@@ -308,10 +317,12 @@ if $ARGS[0] = 'miss2':
 				'<center><video autoplay loop src="images/shared/sex/vag/miss/slow2.mp4"></video></center>'
 				'"Hey," you say, looking <<$npc_firstname[$boy]>> right in the eyes. "I didn''t come here for you to hump me like a Disney princess. I came here to <b>fuck.</b> Now fuck me like you mean it already!"'
 				*nl
-				if rand(0,1) = 1:
-					'A concentrated look shadows <<$npc_firstname[$boy]>>''s face and quickly starts fucking you with accelerated speed.'
-				else
-					'Before you can even finish your sentence, <<$npc_firstname[$boy]>> grabs you by the hips and rams his cock into you.'
+				if npc_abusive[$boy] = 1 and (npc_knows_pc_likes_rough[$boy] = 0 or booty_call['rough_enjoy'] ! 1):
+					if rand(0,1) = 1:
+						'A concentrated look shadows <<$npc_firstname[$boy]>>''s face and quickly starts fucking you with accelerated speed.'
+					else
+						'Before you can even finish your sentence, <<$npc_firstname[$boy]>> grabs you by the hips and rams his cock into you.'
+					end
 				end
 				act'Continue':gt 'booty_call_miss', 'miss3.1'
 			end
@@ -328,10 +339,10 @@ if $ARGS[0] = 'miss2':
 end
 
 if $ARGS[0] = 'miss2.1':
+	booty_call['miss_fuck'] = 1
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 	booty_call['kiss'] = 0
-	$booty_call['pos_speed'] = 'miss2'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
 	if $booty_call['pos_speed'] = 'miss1':
@@ -345,6 +356,7 @@ if $ARGS[0] = 'miss2.1':
 end
 
 if $ARGS[0] = 'miss2.2':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss2'
 	booty_call['kiss'] = 0
@@ -397,6 +409,7 @@ if $ARGS[0] = 'miss2.2':
 end
 
 if $ARGS[0] = 'miss2.bored':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss2'
 	booty_call['kiss'] = 0
@@ -410,6 +423,7 @@ if $ARGS[0] = 'miss2.bored':
 end
 
 if $ARGS[0] = 'miss3':
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	!! fast/rough pace
 	$booty_call['position'] = 'miss'
@@ -463,32 +477,61 @@ if $ARGS[0] = 'miss3':
 			end
 			
 			act'It hurts!':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/1.jpg"></center>'
-				'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly.'
-				'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
-				act'No (enjoy)':
+				if ((npc_selfish[$boy] = 1 and npc_speed_pref[$boy] = 3) or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
 					cla & *nl
-					npc_knows_pc_likes_rough[$boy] = 1
-					booty_call['rough_enjoy'] = 1
-					'"No," you smile back at him. "I want you to pound me."'
-					'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
-					act'Continue':gt 'booty_call_miss', 'miss3.1'
-				end
-				
-				act'Yes, gentle please':
-					booty_call['too_rough'] = 1
-					cla & *nl
-					'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
-					act'Continue':gt 'booty_call_miss', 'miss1.1'
-				end
+					'"Oh fuck! It hurts!" you cry.'
+					'"Hurts fucking good doesn''t it?" <<$npc_firstname[$boy]>> grunts back, not even pausing for a single beat.'
+					act'Please slow down!':
+						cla & *nl
+						booty_call['orgasm'] = orgasm
+						$orgasm_or = 'no'
+						booty_call['rough_hurt'] = 1
+						booty_call['boy_cum'] = 2
+						'"Please!" you beg, tears welling up in  your eyes. "Please slow down! I can''t-! Take-!'
+						'But <<$npc_firstname[$boy]>> is heedless of your cries. He keeps a firm hold on your hair and pulls hard with every thrust, forcing unceasing cries of pain from your lips.'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+					
+					act'If you slow down I will kill you':
+						pcs_sweat += 1
+						booty_call['orgasm'] = orgasm
+						booty_call['rough_enjoy'] = 1
+						gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
+						gs 'stat'
+						cla & *nl
+						'You scream another cry of agonizing pleasure and grimace at <<$npc_firstname[$boy]>>.'
+						'"If you slow down I will <i>fucking</i> kill you," you snarl, throwing your hips forward to slam into his for more force.'
+						gs 'booty_call_miss', 'miss3_enjoy_desc'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+				else
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/1.jpg"></center>'
+					'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly.'
+					'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
+					act'No (enjoy)':
+						cla & *nl
+						npc_knows_pc_likes_rough[$boy] = 1
+						booty_call['rough_enjoy'] = 1
+						'"No," you smile back at him. "I want you to pound me."'
+						'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
+						act'Continue':gt 'booty_call_miss', 'miss3.1'
+					end
+					
+					act'Yes, gentle please':
+						booty_call['too_rough'] = 1
+						cla & *nl
+						'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
+						act'Continue':gt 'booty_call_miss', 'miss1.1'
+					end
 
-				act'Not <i>too</i> gentle':
-					booty_call['too_rough'] = 1
-					cla & *nl
-					'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
-					'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
-					act'Continue':gt 'booty_call_miss', 'miss2.2'
+					act'Not <i>too</i> gentle':
+						booty_call['too_rough'] = 1
+						cla & *nl
+						'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
+						'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
+						act'Continue':gt 'booty_call_miss', 'miss2.2'
+					end
 				end
 			end
 
@@ -523,24 +566,10 @@ if $ARGS[0] = 'miss3':
 			end
 		end
 	end
-	
-	act'If you slow down I will kill you':
-		pcs_sweat += 1
-		booty_call['orgasm'] = orgasm
-		booty_call['rough_enjoy'] = 1
-		gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
-		gs 'stat'
-		cla & *nl
-		'"Oh <i>fuck!</i>" you scream through the pain, even as you throw your hips forward to slam into his.'
-		'"Want me to slow down?" he huffs.'
-		'"If you slow down I will <i>fucking</i> kill you," you snarl back glaring directly into <<$npc_firstname[$boy]>>''s eyes.'
-		gs 'booty_call_miss', 'miss3_enjoy_desc'
-		gs 'booty_call_cum', 'fuck_cum'
-	end
-	
 end
 
 if $ARGS[0] = 'miss3.1':
+	booty_call['miss_fuck'] = 1
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'
 	booty_call['kiss'] = 0
@@ -581,6 +610,7 @@ if $ARGS[0] = 'miss3.1':
 end
 
 if $ARGS[0] = 'miss3.2':
+	booty_call['miss_fuck'] = 1
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'
 	booty_call['kiss'] = 0
@@ -627,6 +657,7 @@ if $ARGS[0] = 'miss3.2':
 end
 
 if $ARGS[0] = 'miss3.bored':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'

locations/booty_call_morning.qsrc

@@ -48,7 +48,7 @@ if $ARGS[0] = 'morning':
 		if pcs_lovers - pcs_girlfriends > 0:act'Your boyfriend':$booty_call['cheat'] = 'boyfriend' & gt'booty_call_morning', 'guilt1'
 		if pcs_girlfriends > 0:act'Your girlfriend': $booty_call['cheat'] = 'girlfriend' & gt'booty_call_morning', 'guilt1'
 		
-		if pilldaychk < daystart - 1: gs'booty_call_morning', 'forgot_bc_pill'
+		if pilldaychk < daystart - 1 and birth_control['using_bc'] = 1: gs'booty_call_morning', 'forgot_bc_pill'
 	end
 end
 
@@ -1305,7 +1305,16 @@ if $ARGS[0] = 'guilt1':
 			'Your thoughts wander through your night with <<$npc_firstname[$boy]>>...'
 			*nl
 			if booty_call['bj'] > 0:'<i>Sucking his cock...</i>'
-			if booty_call['fuck'] > 0:'<i>Fucking him on his bed...</i>'
+			if booty_call['fuck'] > 0:
+				if booty_call['virgin'] = 1:
+					'<i>You gave him your virginity...</i>'
+				else
+					'<i>Fucking him on his bed...</i>'
+				end
+				if booty_call['no_condom'] = 1:
+					'<i>You didn''t even use condoms...</i>'
+				end
+			end
 			if booty_call['orgasm_count'] > 5:
 				'<i>He made you come so many times...</i>'
 			elseif booty_call['orgasm_count'] > 0:
@@ -2128,6 +2137,12 @@ end
 !! ---------------------------------- OUTSIDE APARTMENT -------------------------------------------
 
 if $ARGS[0] = 'give_lift':
+	if $region = 'city':
+		minut += 45
+	elseif $region = 'pav':
+		minut += 5
+	end
+	gs'stat'
 	!! add in option later to give road head along the way
 	if booty_call['give_lift'] = 2:
 		!!take to school

locations/booty_call_pillow_talk.qsrc

@@ -117,7 +117,7 @@ end
 
 if $ARGS[0] = 'long_time':
 	if booty_call['long_time_talk'] = 0:
-		if $daystage['desc'] = 'pre_dawn' or $daystage['desc'] = 'dawn':
+		if $daystage['desc'] = 'pre_dawn' or $daystage['desc'] = 'dawn' and booty_call['sleepover'] = 0:
 			act'We fucked all night':
 				gs'booty_call_pillow_talk', 'talk_time_add'
 				booty_call['long_time_talk'] = 1
@@ -1236,9 +1236,9 @@ if $ARGS[0] = 'boy_broken_condom':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 		if cum_loc['vagina'] > 0:
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything..."'
+			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything...?"'
 		else
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything..."'
+			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything...?"'
 		end
 		
 		if morning_after_pill = 0:

locations/booty_call_reactions.qsrc

@@ -23,6 +23,7 @@ if $ARGS[0] = 'react_menu':
 	gs'booty_call_reactions', 'cum_tits_react1'
 	gs'booty_call_reactions', 'facial_react1'
 	gs'booty_call_reactions', 'pullout_react_menu'
+	gs'booty_call_reactions', 'condom_reactions'
 	
 	gs 'booty_call_reactions', 'no_cum_inside'
 	gs 'booty_call_reactions', 'no_mouth_cum'
@@ -79,6 +80,7 @@ if $ARGS[0] = 'creampie_safe_day':
 	if booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and booty_call['danger_day'] = 0 and birth_control['think_safe'] ! 1:
 		if stat['safe_day'] = 1:
 			act'It''s a safe day':
+				booty_call['safe_day'] = 1
 				cla
 				act'Reassurance':
 					cla & *clr
@@ -141,6 +143,7 @@ if $ARGS[0] = 'creampie_safe_day':
 			end
 		elseif stat['probably_safe_day'] = 1:
 			act'It should be a safe day':
+				booty_call['probably_safe_day'] = 1
 				cla
 				act'Reassurance':
 					cla & *clr
@@ -150,7 +153,7 @@ if $ARGS[0] = 'creampie_safe_day':
 					else
 						if $booty_call['position'] = 'miss':
 							'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
-							'"Don''t worry," you smile at <<$npc_firstname[$boy]>>, cupping his face. It should be safe today."'
+							'"Don''t worry," you smile at <<$npc_firstname[$boy]>>, cupping his face. "It should be safe today."'
 						elseif $booty_call['position'] = 'doggy':
 							'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
 							'"Don''t worry," you smile at <<$npc_firstname[$boy]>> over your shoulder. "It should be safe today."'
@@ -168,7 +171,6 @@ end
 
 if $ARGS[0] = 'creampie_happy':
 	act'Back': cla & gs'booty_call_reactions', 'react_menu'
-	gs'booty_call_reactions', 'bask_satisfaction'
 	gs'booty_call_reactions', 'creampie_felt_great'
 	gs'booty_call_reactions', 'feel_full'
 	gs'booty_call_reactions', 'love_creampies'
@@ -191,24 +193,30 @@ if $ARGS[0] = 'creampie_unhappy':
 	gs'booty_call_reactions', 'creampie_gross'
 	gs'booty_call_reactions', 'creampie_ask_next_time_mad'
 	gs'booty_call_reactions', 'cum_together_no_bc2'
+	gs'booty_call_reactions', 'promised_no_creampie'
 end
 
 if $ARGS[0] = 'creampie_cum_together_react':
 	if booty_call['came_together'] = 2:
 		act'Did we come together?':
 			booty_call['came_together'] = 3
-			cla & *clr
-			if $booty_call['position'] = 'miss':
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
-				'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
-			elseif $booty_call['position'] = 'doggy':
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
-				'Your knees give out underneath you, falling down to the bed with <<$npc_firstname[$boy]>> on top of you.'
-				'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
-			elseif $booty_call['position'] = 'cowgirl':
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
-				'You let yourself collapse on top of <<$npc_firstname[$boy]>>, feeling your breasts pressed against his chest, which rises and falls with the same laboured breathing as your own.'
-				'"Did you... did we... together..?" you murmur. <<$npc_firstname[$boy]>> just nods.'
+			if booty_call['did_we_cum_together'] = 1:
+				cla & *nl
+				'You nod hazily, mind still swimming from your orgasm.'
+			else
+				cla & *clr
+				if $booty_call['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
+				elseif $booty_call['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'Your knees give out underneath you, falling down to the bed with <<$npc_firstname[$boy]>> on top of you.'
+					'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you.'
+				elseif $booty_call['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+					'You let yourself collapse on top of <<$npc_firstname[$boy]>>, feeling your breasts pressed against his chest, which rises and falls with the same laboured breathing as your own.'
+					'"Did you... did we... together..?" you murmur. <<$npc_firstname[$boy]>> just nods.'
+				end
 			end
 			act'Continue':cla & gs 'booty_call_sex', 'sex_end'
 			gs'booty_call_reactions', 'creampie_happy'
@@ -274,7 +282,7 @@ if $ARGS[0] = 'creampie_ask_next_time':
 						else
 							'"I don''t mind if you come inside me," you smile gently at him. "But you need to ask before you do."'
 						end
-						if booty_call['just_cum_inside_me'] = 1:
+						if booty_call['just_cum_inside_me'] = 1 and booty_call['cum_wherever'] ! 1:
 							gs'booty_call_reactions', 'did_you_come_inside_boy_react1'
 						else
 							if npc_free_creampies[$boy] = 2:
@@ -455,17 +463,17 @@ if $ARGS[0] = 'cum_together_no_bc1':
 						gs'booty_call_sex', 'sex_end'
 					end
 				end
-				
-				if booty_call['risky_creampie'] = 1:
-					act'Danger day (not mad)':
-						cla & *nl
-						if booty_call['danger_day'] = 1:
-							'"Hey," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Didn''t I tell you something about today being a dangerous day for me...?"'
-						else
-							'"Well that''s not good," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Pretty sure I''m ovulating today..."'
-						end
-						gs'booty_call_sex', 'sex_end'
+			end
+			if booty_call['risky_creampie'] > 0:
+				act'Danger day (not mad)':
+					cla & *nl
+					if booty_call['danger_day'] = 1:
+						'"Hey," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Didn''t I tell you something about today being a dangerous day for me...?"'
+					else
+						booty_call['danger_day'] = 1
+						'"Well that''s not good," you pant, smiling wryly at <<$npc_firstname[$boy]>>. "Pretty sure I''m ovulating today..."'
 					end
+					gs'booty_call_sex', 'sex_end'
 				end
 			end
 		end
@@ -641,6 +649,38 @@ if $ARGS[0] = 'creampie_gross2':
 	end
 end
 
+if $ARGS[0] = 'promised_no_creampie':
+	if booty_call['promise_no_creampie'] = 1 and booty_call['creampie_ask'] ! 1 and booty_call['he_ask_creampie_yes'] ! 1 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and booty_call['danger_day'] = 1)):
+		act'You promised you wouldn''t come inside!':
+			booty_call['mad'] = 1
+			cla & *clr
+			if $booty_call['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+			elseif $booty_call['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/shock1.jpg"></center>'
+			elseif $booty_call['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			end
+			if booty_call['came_together'] > 0:
+				'"What the fuck!" you start dizzily, head swimming as you''re caught halfway between rage and a post-orgasm endorphin rush. "You promised you wouldn''t come inside me!"'
+			else
+				'"What the fuck!" you shout. "You promised you wouldn''t come inside me!"'
+			end
+			if booty_call['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he pants back.'
+				'"I meant anywhere except there," you grumble back.'
+			elseif npc_selfish[$boy] = 1:
+				'"It felt too good," he pants. "Couldn''t pull out."'
+				'"Don''t you have any idea what a fucking promise is?!" you seethe. "Asshole!"'
+			else
+				'"Sorry," he pants sheepishly.'
+				'"It''s okay," you murmur back, unable to keep the smile from your voice.'
+			end
+			gs'booty_call_sex', 'sex_end'
+		end
+	end
+end
+
 if $ARGS[0] = 'thanks_for_asking':
 	if booty_call['he_ask_creampie'] = 1 and npc_free_creampies[$boy] = 0:
 		act'Thanks for asking':
@@ -698,6 +738,7 @@ end
 if $ARGS[0] = 'told_you_not_to_creampie':
 	if booty_call['promise_no_creampie'] = 1 and booty_call['creampie_ask'] ! 1 and booty_call['he_ask_creampie_yes'] ! 1 and (npc_free_creampies[$boy] = 0 or (npc_free_creampies[$boy] = 1 and booty_call['danger_day'] = 1)):
 		act'I said no creampies':
+			cla
 			act'(Not mad)':
 				cla & *clr
 				if $booty_call['position'] = 'miss':
@@ -878,6 +919,63 @@ if $ARGS[0] = 'thought_no_creampies':
 		end
 	end
 end
+
+if $ARGS[0] = 'condom_reactions':
+	if $booty_call['last_cum'] = 'condom':
+		gs 'booty_call_reactions', 'good_thing_condom'
+		if booty_call['came_together'] = 2 and booty_call['cock_remove'] = 0:
+			act'Did we come together?':
+				booty_call['came_together'] = 3
+				if npc_know_love_creampie[$boy] ! 1:
+					cla & *nl
+					'You nod hazily, mind still swimming from your orgasm.'
+				else
+					cla & *clr
+					if $booty_call['position'] = 'miss':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+						'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you. You can feel the swollen rubber around his cock bulging inside you.'
+					elseif $booty_call['position'] = 'doggy':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+						'Your knees give out underneath you, falling down to the bed with <<$npc_firstname[$boy]>> on top of you.'
+						'"Did you... did we... together..?" you pant. <<$npc_firstname[$boy]>> just nods, breathing heavily on top of you. You can feel the swollen rubber around his cock bulging inside you.'
+					elseif $booty_call['position'] = 'cowgirl':
+						'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
+						'You let yourself collapse on top of <<$npc_firstname[$boy]>>, feeling your breasts pressed against his chest, which rises and falls with the same laboured breathing as your own.'
+						'"Did you... did we... together..?" you murmur. <<$npc_firstname[$boy]>> just nods. You can feel the swollen rubber around his cock bulging inside you.'
+					end
+				end
+				act'Continue':cla & gs 'booty_call_sex', 'sex_end'
+				gs 'booty_call_reactions', 'good_thing_condom'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'good_thing_condom':
+	if booty_call['last_cum'] = 'creampie_surprise':
+		act'Good thing we used a condom':
+			if booty_call['cock_remove'] = 0:
+				cla & *clr
+				if $booty_call['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+					'"Good thing we used a condom," you pant, smiling up at <<$npc_firstname[$boy]>> and feeling the swollen rubber around his cock bulging inside you.'
+				elseif $booty_call['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+					'"Good thing we used a condom," you pant, smiling back at <<$npc_firstname[$boy]>> and feeling the swollen rubber around his cock bulging inside you.'
+				elseif $booty_call['position'] = 'cowgirl':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+					'"Good thing we used a condom," you pant, smiling down at <<$npc_firstname[$boy]>> and feeling the swollen rubber around his cock bulging inside you.'
+				end
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Good thing we used a condom," you smiling tiredly at <<$npc_firstname[$boy]>> and feeling the swollen rubber around his cock bulging inside you.'
+			end
+			
+			gs 'booty_call_sex', 'sex_end'
+		end
+	end
+end
+
 if $ARGS[0] = 'cum_together_yeah':
 	if npc_know_love_creampie[$boy] ! 1:
 		act'Yeah':
@@ -1189,7 +1287,7 @@ if $ARGS[0] = 'creampie_felt_great':
 				'"That felt great," you smile, beaming at <<$npc_firstname[$boy]>>.'
 			elseif orgasm > booty_call['orgasm']:
 				!! Sveta came
-				if booty_call['came_together'] = 1:
+				if booty_call['came_together'] = 1 or booty_call['came_together'] = 3:
 					'"That was amazing," you pant, aftershocks of your orgasm still shivering through you, enjoying the feeling of cum draining from your pussy. "I could <i>feel</i> you coming inside me. It felt so good!"'
 					'<<$npc_firstname[$boy]>> just smiles tiredly back at you.'
 				else
@@ -1217,10 +1315,9 @@ if $ARGS[0] = 'creampie_felt_great':
 				'"That felt great," you smile, beaming at <<$npc_firstname[$boy]>>, squeezing him with your pussy.'
 			elseif orgasm > booty_call['orgasm']:
 				!! you just came
-				if booty_call['came_together'] = 1:
+				if booty_call['came_together'] = 1 or booty_call['came_together'] = 3:
 					'"That was amazing," you pant, aftershocks of your orgasm still shivering through you, enjoying the feeling being filled by both <<$npc_firstname[$boy]>>''s cum and his cock. "I could <i>feel</i> you coming inside me. It felt so good!"'
 					'<<$npc_firstname[$boy]>> just smiles tiredly back at you.'
-					'"It was <i>amazing</i>..."'
 				elseif booty_call['cum_together_fake'] = 1:
 					'"That was..." you pant, aftershocks of your orgasm still shivering through you, cum draining from your pussy. "Did we... together...?"'
 					'"Yeah..." he breathes back.'
@@ -1244,15 +1341,33 @@ end
 
 if $ARGS[0] = 'feel_full':
 	act'I feel full':
-		cla & *nl
+		cla & *clr
+		if $booty_call['position'] = 'miss':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+			if booty_call['came_together'] > 0:
+				'"I can feel your cum inside me," you murmur, gently rubbing your belly and shivering with orgasmic aftershocks. "Makes me feel... <i>full</i>."'
+			else
+				'"I can feel your cum inside me," you murmur, gently rubbing your belly. "Makes me feel... <i>full</i>."'
+			end
+		elseif $booty_call['position'] = 'doggy':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+			if booty_call['came_together'] > 0:
+				'"I can feel your cum inside me," you murmur, shivering with orgasmic aftershocks and almost feeling like your belly is <i>bulging</i>. "Makes me feel... full..."'
+			else
+				'"I can feel your cum inside me," you murmur, almost feeling like your belly is <i>bulging</i>. "Makes me feel... full..."'
+			end	
+		elseif $booty_call['position'] = 'cowgirl':
+			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/3.jpg"></center>'
+			if booty_call['came_together'] > 0:
+				'"I can feel your cum inside me," you murmur, shivering atop of <<$npc_firstname[$boy]>> with orgasmic aftershocks and gently rubbing your belly. "Makes me feel... full..."'
+			else
+				'"I can feel your cum inside me," you murmur atop <<$npc_firstname[$boy]>>, gently rubbing your belly. "Makes me feel... full..."'
+			end	
+		end
 		booty_call['react'] = 1
 		minut += rand(1,2)
 		gs'stat'
-		if booty_call['came_together'] > 0:
-			'"I can feel your cum inside me," you murmur, gently rubbing your belly and shivering with orgasmic aftershocks. "Makes me feel... <i>full</i>."'
-		else
-			'"I can feel your cum inside me," you murmur, gently rubbing your belly. "Makes me feel... <i>full</i>."'
-		end
+		
 		gs 'booty_call_sex', 'sex_end'
 	end
 end
@@ -1413,6 +1528,20 @@ end
 !! -------------------------- denial reactions ------------------------------
 
 
+if $ARGS[0] = 'no_cum_inside_pic':
+	if $booty_call['last_cum'] = 'pullout':
+		if $booty_call['position'] = 'miss':
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/bellycum2.jpg"></center>'
+		elseif $booty_call['position'] = 'doggy':
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
+		elseif $booty_call['position'] = 'cowgirl':
+			'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
+		end
+	else
+		$npc_apt_bedroom[$boy]
+	end
+end
+
 if $ARGS[0] = 'no_cum_inside':
 	if booty_call['he_ask_creampie'] = 1 and $booty_call['last_cum'] ! 'creampie' and booty_call['condom'] ! 1:
 		act'Sorry, no creampies':
@@ -1501,8 +1630,9 @@ if $ARGS[0] = 'no_cum_inside':
 		if birth_control['think_safe'] < 1:
 			if npc_know_not_bc[$boy] = 0:
 				act'Not on birth control':
-					cla & *nl
-					!! IMAGE HERE
+					cla & *clr
+					gs'booty_call_reactions', 'no_cum_inside_pic'
+					
 					gs'booty_call_stats', 'no_birth_control_know'
 					'"Sorry. I can''t let you come inside me," you say, <<$booty_call[''cum_describe2'']>>. "I''m not on birth control."'
 					gs'booty_call_sex', 'sex_end'
@@ -1511,15 +1641,15 @@ if $ARGS[0] = 'no_cum_inside':
 				act'You know I''m not on birth control':
 					cla
 					act'(Apologetic)':
-						cla & *nl
-						!! IMAGE HERE
+						cla & *clr
+						gs'booty_call_reactions', 'no_cum_inside_pic'
 						'"I''m sorry," you say wistfully, <<$booty_call[''cum_describe2'']>>. "I know how much you want to finish inside me, but I''m still not on birth control."'
 						gs'booty_call_sex', 'sex_end'
 					end
 					
 					act'(Annoyed)':
-						cla & *nl
-						!! IMAGE HERE
+						cla & *clr
+						gs'booty_call_reactions', 'no_cum_inside_pic'
 						'"Dumbass!" you scowl, <<$booty_call[''cum_describe2'']>>. "You know I''m not on birth control!"'
 						gs'booty_call_sex', 'sex_end'
 					end
@@ -1531,16 +1661,16 @@ if $ARGS[0] = 'no_cum_inside':
 					cla
 					if stat['dangerous_day'] = 1:
 						act'(Apologetic)':
-							cla & *nl
-							!! IMAGE HERE
+							cla & *clr
+							gs'booty_call_reactions', 'no_cum_inside_pic'
 							'"I''m sorry," you say wistfully, <<$booty_call[''cum_describe2'']>>. "I know how much you want to finish inside me, but it''s a danger day. I''ll get pregnant."'
 							gs'booty_call_sex', 'sex_end'
 						end
 					end
 					if booty_call['danger_day'] = 1:
 						act'(Annoyed)':
-							cla & *nl
-							!! IMAGE HERE
+							cla & *clr
+							gs'booty_call_reactions', 'no_cum_inside_pic'
 							'"Dumbass!" you scowl, <<$booty_call[''cum_describe2'']>>. "I told you it''s a danger day for me! Are you <i>trying</i> to get me pregnant?"'
 							gs'booty_call_sex', 'sex_end'
 						end
@@ -1552,7 +1682,7 @@ if $ARGS[0] = 'no_cum_inside':
 end
 
 if $ARGS[0] = 'no_tits_cum':
-	if booty_call['he_ask_tits'] = 1 and $booty_call['last_cum'] ! 'tits':
+	if $booty_call['cum_choice'] = 'tits' and $booty_call['last_cum'] ! 'tits':
 		act'Don''t cum on my tits':
 			act'That''s gross':
 				cla & *nl
@@ -1572,7 +1702,7 @@ if $ARGS[0] = 'no_tits_cum':
 end
 
 if $ARGS[0] = 'no_facial':
-	if booty_call['he_ask_facial'] = 1 and $booty_call['last_cum'] ! 'facial' and $booty_call['last_cum'] ! 'face_mouth':
+	if $booty_call['cum_choice'] = 'facial' and $booty_call['last_cum'] ! 'facial' and $booty_call['last_cum'] ! 'face_mouth':
 		act'Don''t cum on my face':
 		cla
 			act'That''s gross':
@@ -1604,24 +1734,26 @@ end
 
 if $ARGS[0] = 'no_mouth_cum':
 	if booty_call['he_ask_mouth'] = 1 and $booty_call['last_cum'] ! 'swallow' and $booty_call['last_cum'] ! 'mouth' and $booty_call['last_cum'] ! 'face_mouth':
-		act'Don''t cum in my mouth':
+		act'Don''t come in my mouth':
 			cla
-			act'Swallowing is gross':
-				cla & *nl
-				!! IMAGE HERE
-				if $booty_call['cum_choice'] = 'facial':
-					'"Because you asked to come in my mouth," you grimace, blinking the cum away from your eyes. "This is gross enough on my face, I <i>don''t</i> want to taste it."'
-				else
-					'"Ewww," you grimace, <<$booty_call[''cum_describe2'']>>. "Like I''d ever want <i>this</i> in my mouth." You shudder.'
+			if $booty_call['last_cum'] ! 'spit':
+				act'Swallowing is gross':
+					cla & *nl
+					!! IMAGE HERE
+					if $booty_call['cum_choice'] = 'facial':
+						'"Because you asked to come in my mouth," you grimace, blinking the cum away from your eyes. "This is gross enough on my face, I <i>don''t</i> want to taste it."'
+					else
+						'"Ewww," you grimace, <<$booty_call[''cum_describe2'']>>. "Like I''d ever want <i>this</i> in my mouth." You shudder.'
+					end
+					gs'booty_call_sex', 'sex_end'
 				end
-				gs'booty_call_sex', 'sex_end'
-			end
 
-			act'I don''t like the taste':
-				cla & *nl
-				!! IMAGE HERE
-				'"Sorry," you smile, <<$booty_call[''cum_describe2'']>>. "I''m really not a fan of the taste of cum."'
-				gs'booty_call_sex', 'sex_end'
+				act'I don''t like the taste':
+					cla & *nl
+					!! IMAGE HERE
+					'"Sorry," you smile, <<$booty_call[''cum_describe2'']>>. "I''m really not a fan of the taste of cum."'
+					gs'booty_call_sex', 'sex_end'
+				end
 			end
 
 			act'I don''t like you enough for that':
@@ -1637,7 +1769,8 @@ end
 !! -------------------------- end denial reactions ------------------------------
 
 if $ARGS[0] = 'creampie_pc_startled':
-	if booty_call['creampie_allowance'] = 0 and booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
+!!	if booty_call['creampie_allowance'] = 0 and booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
+	if booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
 		act'Startled':
 			$booty_call['reaction'] = 'startled'
 			cla & *clr
@@ -1685,7 +1818,7 @@ if $ARGS[0] = 'take_in_stride1':
 end
 
 if $ARGS[0] = 'did_you_come_inside':
-	if booty_call['creampie_allowance'] ! 1 and booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2 and booty_call['just_cum_inside_me'] = 0:
+	if booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2 and booty_call['just_cum_inside_me'] = 0:
 		act'Did you just come inside me?':
 			booty_call['just_cum_inside_me'] = 1
 			if booty_call['cock_remove'] = 1:
@@ -1706,8 +1839,14 @@ if $ARGS[0] = 'did_you_come_inside':
 					'"Did you just come inside me?" you ask.'
 				end
 			end
-			if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+			if booty_call['virgin_creampie_request'] = 1 and booty_call['creampie_count'] = 1:
+				'"Yeah. You said I could, didn''t you?"'
+			elseif npc_free_creampies[$boy] = 2 or booty_call['creampie_allowance'] = 1:
+				'"Yeah," he sighs blissfully.'
+			elseif npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
 				'"Yeah, your pussy was so tight," he sighs with satisfaction. "Couldn''t help it."'
+			elseif booty_call['cum_wherever'] = 1:
+				'"You said I could come wherever I wanted," he sighs blissfully.'
 			else
 				if booty_call['creampie_count'] = 1:
 					if booty_call['promise_no_creampie'] = 1:
@@ -1732,6 +1871,88 @@ if $ARGS[0] = 'did_you_come_inside':
 			gs'booty_call_reactions', 'creampie_gross'
 			gs'booty_call_reactions', 'creampie_safe_day'
 			gs'booty_call_reactions', 'oh_shit_options'
+			gs'booty_call_reactions', 'delayed_creampie_orgasm1'
+		end
+	end
+end
+
+if $ARGS[0] = 'delayed_creampie_orgasm1':
+	act'Delayed creampie orgasm':
+		booty_call['orgasm_count'] += 1
+		booty_call['simultaneous_orgasm_count'] += 1
+		booty_call['came_together'] = 2
+		booty_call['react'] = 1
+		$orgasm_or = 'yes'
+		gs'arousal', 'vaginal',-1,'no_orgasm_msg'
+		gs'stat'
+		cla & *clr
+		if $booty_call['position'] = 'miss':
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/orgasm1.mp4"></video></center>'
+		elseif $booty_call['position'] = 'doggy':
+			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
+		elseif $booty_call['position'] = 'cowgirl':
+			'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
+		end
+		'An instant later, you suddenly find yourself intensely aware of the pool of heat filling up your insides and a thrill of euphoric spasms abruptly roll through your body, covering your skin in goosebumps and locking your mouth in a silent scream of beautiful agony.'
+		*nl
+		'You cry your wordless cry, unable to do anything except tremble around <<$npc_firstname[$boy]>>''s cock inside you.'
+		act'Continue':
+			cla & *clr
+			if $booty_call['position'] = 'miss':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+				'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking down at you with an utterly confused expression.'
+			elseif $booty_call['position'] = 'doggy':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/1.jpg"></center>'
+				'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking down at you with an utterly confused expression.'
+			elseif $booty_call['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+				'When your orgasm finally fades, you find <<$npc_firstname[$boy]>> looking up at you with an utterly confused expression.'
+			end
+			*nl
+			if booty_call['virgin'] = 1 and booty_call['creampie_count'] = 1:
+				'"Is... is that what it feels like when a guy comes inside...?" you stammer breathlessly.'
+				if $booty_call['cum_choice'] = 'creampie_surprise' and booty_call['virgin_creampie_request'] ! 1:
+					'"Yeah..." he replies nervously.'
+					'"Oh..." you mumble, too overwhelmed to be able to say anything else.'
+				elseif $npc_cum_pref[$boy] = 'creampie' or booty_call['virgin_creampie_request'] = 1:
+					'"Yeah," he smiles back. "Feels pretty good doesn''t it?"'
+					'You nod back, too overwhelmed to be able to say anything else.'
+				else
+					'"Yeah. Did you like it?"'
+					'You nod back, too overwhelmed to be able to say anything else.'
+				end
+				gs 'booty_call_sex', 'sex_end'
+			else
+				'"Surprise overrode my brain," you smile tiredly at him. "I was so surprised, I forgot to come for a second."'
+				if booty_call['cum_wherever'] = 1:
+					'"Well you <i>did</i> say I could come wherever I wanted."'
+					'"I guess I did," you chuckle softly. "But for some reason I didn''t expect my pussy."'
+					if $pc_cum_pref_know[$boy] = 'creampie':
+						'"Don''t know why you''d think that," he smirks back.'
+					else
+						'He smirks amusedly back at you.'
+					end
+					gs 'booty_call_sex', 'sex_end'
+				elseif npc_free_creampies[$boy] = 2:
+					'"Well you said I could come inside you whenever I wanted," he smirks back.'
+					'"I just didn''t expect it right then," you chuckle softly.'
+					gs 'booty_call_sex', 'sex_end'
+				elseif booty_call['creampie_allowance'] = 1:
+					'"Well you said I could come inside you today," he smirks back.'
+					if npc_free_creampies[$boy] = 0:
+						'"I guess I was just expecting you to warn me," you chuckle softly.'
+					else
+						'"I just didn''t expect it right then," you chuckle softly.'
+					end
+					gs 'booty_call_sex', 'sex_end'
+				elseif $booty_call['cum_choice'] = 'creampie_surprise':
+					'"So you''re not mad?"'
+					gs'booty_call_reactions', 'accidents_happen1'
+					gs'booty_call_reactions', 'creampie_felt_too_good'
+				else
+					gs 'booty_call_sex', 'sex_end'
+				end
+			end
 		end
 	end
 end
@@ -1740,6 +1961,7 @@ if $ARGS[0] = 'did_you_come_inside_boy_react1':
 	if npc_selfish[$boy] ! 1 and npc_abusive[$boy] <= 0:
 		'"I- wait, you''re not mad?" <<$npc_firstname[$boy]>> asks in surprise.'
 		gs'booty_call_reactions', 'accidents_happen1'
+		gs'booty_call_reactions', 'creampie_felt_too_good'
 	else
 		gs 'booty_call_sex', 'sex_end'
 	end
@@ -1751,7 +1973,9 @@ if $ARGS[0] = 'accidents_happen1':
 		if booty_call['accidents_happen'] = 0:
 			'"It was an accident, right?" you ask.'
 			'"Yeah," he says abashedly.'
-			'"Then it''s okay. Accidents happen," you respond cheerfully.'
+			'"Then it''s okay. Accidents happen," you reply, smiling fondly at him.'
+		elseif booty_call['plan_b'] = 1:
+			'"I''m already going to get a pill," you smirk amusedly. "What''s one more creampie in that case?"'
 		else
 			'"I told you before didn''t I? Accidents happen," you smile. "No big deal."'
 		end
@@ -1760,6 +1984,14 @@ if $ARGS[0] = 'accidents_happen1':
 	end
 end
 
+if $ARGS[0] = 'creampie_felt_too_good':
+	act'Felt too good':
+		cla & *nl
+		'"Felt too good to be mad," you sigh back. <<$npc_firstname[$boy]>> seems to take this as a good sign.'
+		gs 'booty_call_sex', 'sex_end'
+	end
+end
+
 if $ARGS[0] = 'creampie_wtf_image':
 	
 	if $booty_call['position'] = 'miss':
@@ -1772,7 +2004,7 @@ if $ARGS[0] = 'creampie_wtf_image':
 end
 
 if $ARGS[0] = 'creampie_wtf':
-	if booty_call['creampie_allowance'] ! 1 and booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2:
+	if booty_call['creampie_allowance'] ! 1 and booty_call['creampie_ask'] ! 1 and booty_call['came_together'] = 0 and npc_free_creampies[$boy] ! 2 and booty_call['virgin_creampie_request'] ! 1:
 		act'What the fuck!':
 			cla
 			booty_call['cock_remove'] = 1
@@ -1816,6 +2048,10 @@ if $ARGS[0] = 'creampie_wtf':
 						else
 							'"Oh, you''ll be fine," he says, waving his hand dismissively. "Just buy some plan B tomorrow."'
 						end
+					else
+						'"Fuck! I''m so sorry! " he says, looking ashamed. "It was an accident, I swear! I didn''t mean to!"'
+						gs'booty_call_reactions', 'creampie_wtf_2'
+						gs'booty_call_reactions', 'creampie_forgive'
 					end
 					gs'booty_call_reactions', 'creampie_wtf_2'
 				end
@@ -1961,41 +2197,57 @@ if $ARGS[0] = 'oh_shit_options':
 		'"Well this isn''t good," you gulp, looking horrified at <<$npc_firstname[$boy]>>. "I''m not on birth control..."'
 		gs'booty_call_cum', 'what_now'
 	end
-	act'I guess I need a pill (annoyed)':
-		booty_call['pill_tomorrow'] = 1
-		cla & *nl
-		'"I guess I''m going to need a pill tomorrow," you say, frowning.'
-		gs'booty_call_cum', 'what_now'
-	end
-	
-	act'I guess I need a pill (unconcerned)':
-		booty_call['pill_tomorrow'] = 1
-		cla & *nl
-		'"I guess I''m going to need a pill tomorrow," you shrug, unconcerned.'
-		gs'booty_call_cum', 'what_now'
-	end
-	
-	act'I guess I need a pill (humorous)':
-		booty_call['pill_tomorrow'] = 1
-		cla & *nl
-		'"I guess I''m going to need a pill tomorrow," you say, giving <<$npc_firstname[$boy]>> a wry smirk to let him know you''re not mad.'
-		gs'booty_call_cum', 'what_now'
-	end
-	if morning_after_pill > 0:
-		act'I have some plan B (calm)':
-			booty_call['plan_b'] = 1
+	act'I guess I need a pill':
+		cla
+		act'Annoyed':
+			booty_call['pill_tomorrow'] = 1
 			cla & *nl
-			'"It''s okay," you say, giving <<$npc_firstname[$boy]>> a humorous smile. "I have some plan B on me."'
+			'"I guess I''m going to need a pill tomorrow," you say, frowning.'
 			gs'booty_call_cum', 'what_now'
 		end
 		
-		act'I have some plan B (sexy)':
-			booty_call['plan_b'] = 1
+		act'Unconcerned':
+			booty_call['pill_tomorrow'] = 1
 			cla & *nl
-			'"It''s okay," you say, smiling lecherously. "I have a morning after pill."'
+			'"I guess I''m going to need a pill tomorrow," you shrug, unconcerned.'
 			gs'booty_call_cum', 'what_now'
 		end
 		
+		act'Humorous':
+			booty_call['pill_tomorrow'] = 1
+			cla & *nl
+			'"I guess I''m going to need a pill tomorrow," you say, giving <<$npc_firstname[$boy]>> a wry smirk to let him know you''re not mad.'
+			gs'booty_call_cum', 'what_now'
+		end
+	end
+	if morning_after_pill > 0:
+		act'I have some plan B':
+			cla
+			act'Calm':
+				booty_call['plan_b'] = 1
+				cla & *nl
+				'"It''s okay," you say, giving <<$npc_firstname[$boy]>> a wide smile. "I have some plan B on me."'
+				gs'booty_call_cum', 'what_now'
+			end
+			
+			act'Amused':
+				booty_call['plan_b'] = 1
+				cla & *nl
+				if npc_selfish[$boy] = 1 or npc_abusive[$boy] > 0:
+					'"It''s okay," you giggle, finding a strange amusement in how unapologetic <<$npc_firstname[$boy]>> is about it. "I have some plan B on me."'
+				else
+					'"It''s okay," you giggle, unable to keep from laughing at <<$npc_firstname[$boy]>>''s worry. "I have some plan B on me."'
+				end
+				gs'booty_call_cum', 'what_now'
+			end
+			
+			act'Sexy':
+				booty_call['plan_b'] = 1
+				cla & *nl
+				'"It''s okay," you say with a sexy smile. "I have a morning after pill."'
+				gs'booty_call_cum', 'what_now'
+			end
+		end
 	end
 end
 
@@ -2492,6 +2744,21 @@ if $ARGS[0] = 'let_it_go':
 	end
 end
 
+if $ARGS[0] = 'cum_kiss_cock':
+	if $booty_call['cum_choice'] = 'facial' or $booty_call['cum_choice'] = 'face_mouth' or $booty_call['cum_choice'] = 'mouth':
+		act'Kiss his cock':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
+!!			if $booty_call['last_cum'] = 'swallow':
+!!				'"Glad my hard work is appreciated," you smile, leaning in and giving <<$npc_firstname[$boy]>>''s cock a gentle kiss on the tip.'
+!!			else
+				'Feeling cheeky, you lean in to give <<$npc_firstname[$boy]>> a cute little kiss, right on the tip of his cock.'
+!!			end
+			gs'booty_call_sex', 'sex_end'
+		end
+	end
+end
+
 !! --------------------- Blowjob Reactions ---------------------------------
 
 if $ARGS[0] = 'bj_warning_thanks':
@@ -2584,7 +2851,7 @@ if $ARGS[0] = 'bj_warning_next_time':
 				end
 			end
 		else
-			if npc_generous[$boy] = 1:
+			if npc_caretaker[$boy] = 1:
 				booty_call['bj_warning'] = 1
 				'"Sorry," he smiles back apologetically. "I''ll try to remember next time. Your mouth just felt so good."'
 				act'Thanks':
@@ -2602,7 +2869,7 @@ if $ARGS[0] = 'bj_warning_next_time':
 				end
 			else
 				if npc_selfish[$boy] = 1:
-					'"Nah," he smiles back shamelessly. "I think I''ll just do whatever I want."'
+					'"Nah," he smiles back shamelessly. "I like seeing the surprise on your face."'
 				else
 					'"You sure? Looked like you had a lot of fun taking a surprise cumshot in the mouth."'
 				end
@@ -2673,39 +2940,99 @@ if $ARGS[0] = 'bj_swallow_gross':
 	act'Gross':
 		booty_call['mouth_cum_gross'] = 1
 		cla & *clr
-		'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
 		$npc_apt_bedroom[$boy]
-		'"Ugh, I hate swallowing," you say, shaking your head as if that would somehow get rid of the taste.'
+		'"Ugh, I hate swallowing," you say, finally loosing your lips from his cock with a pop and shaking your head, as if that would somehow get rid of the taste.'
 		'"But you did it anyways," he says back, grin widening across his face.'
-		if npc_cum_pref[$boy] = 2 and pc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
-			act'Because I know you like it':
-				cla & *nl
-				'"Yeah, cause I know you''re a pervert who likes watching me drink your nasty cum," you say with a glare. "I''m generous like that."'
-				gs 'booty_call_sex', 'sex_end'
-			end
+		gs 'booty_call_reactions', 'bj_swallow_gross2'
+	end
+end
 
-			act'Because I like you':
-				cla & *nl
-				'"Only cause I happen to like you so much. Ugh, times like this, I wish I didn''t." You give him a dirty look, a smile twitching at the corner of your mouth despite yourself.'
-				if npc_generous[$boy] = 1:
-					'"I''ll be sure to make it up to you sometime," he smiles back.'
-					'"You better! Cause this is just, <i>ick-!</i>"'
-				elseif npc_selfish[$boy] = 1:
-					'"Good girl," he grins.'
-					'"Shut up," you roll your eyes in return.'
-				else
-					'He smiles at you, but neither of you say anything else.'
-				end
-				gs 'booty_call_sex', 'sex_end'
-			end
-		else
-			'"Yeah, cause I know guys like you love watching girls like me drink cum," you raise an eyebrow back at him. "Still gross though."'
-			if npc_selfish[$boy] = 1:
+if $ARGS[0] = 'bj_swallow_gross':
+	if npc_cum_pref[$boy] = 2 and pc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
+		act'Because I know you like it':
+			cla & *nl
+			'"Yeah, cause I know you''re a pervert who likes watching me drink your nasty cum," you say with a glare. "I''m generous like that."'
+			gs 'booty_call_sex', 'sex_end'
+		end
+
+		act'Because I like you':
+			cla & *nl
+			'"Because I like you," you say, a look of betrayal on your face. "And I wanted to do something nice for you. And I''m severely regretting it. I don''t want to like you anymore, this was a mistake."'
+			if npc_generous[$boy] = 1:
+				'"I''ll be sure to make it up to you sometime," he smiles back.'
+				'"You better! Cause this is just, <i>ick-!</i>" You fan your mouth, futilely trying to make the taste go away faster.'
+			elseif npc_selfish[$boy] = 1:
 				'"Good girl," he grins.'
+				'"Shut up," you glare back, fanning your mouth in a futile attempt to make the taste go away faster.'
+			else
+				'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, futilely trying to make the taste go away.'
+			end
+			gs 'booty_call_sex', 'sex_end'
+		end
+	else
+		act'Cause boys like it':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"Cause boys seem to like it," you grimace, airing out your tongue, trying to dissipate the taste. "I don''t want to be a shitty lay. Sometimes that means doing stuff you don''t like."'
+			'"Well it <i>was</i> pretty hot," <<$npc_firstname[$boy]>> grins at you.'
+			'"Why?!" you ask. "Why do you idiots with dicks want girls to swallow this vile stuff?"'
+			'He chuckles at you while you continue to gag for a little while longer, trying to get past your disgust.'
+			gs 'booty_call_sex', 'sex_end'
+		end
+		gs 'booty_call_sex', 'sex_end'
+	end
+	
+	if $booty_call['cum_choice'] = 'mouth':
+		act'Because you asked':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"Because you asked me to," you say, giving him an accusatory look. "That makes this your fault. <i>Bleeechhh...</i>"'
+			'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, futilely trying to make the taste go away.'
+			gs 'booty_call_sex', 'sex_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'bj_spit_gross':
+	act'Gross':
+		booty_call['mouth_cum_gross'] = 1
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"<i>Yech</i>," you gag, opening your mouth wide to let the slimy bitter liquid dribble from your tongue. "I hate the taste off this stuff."'
+		'"But you let me come in your mouth anyways," he says back, grin widening across his face.'
+		gs 'booty_call_reactions', 'bj_spit_gross2'
+	end
+end
+
+if $ARGS[0] = 'bj_spit_gross2':
+	if npc_cum_pref[$boy] = 2 and pc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
+		act'Compromise':
+			cla & *nl
+			'"Just because I don''t want to swallow doesn''t mean I don''t want you to feel good," you say with a raised eyebrow. "Good sex is all about good compromise, isn''t it?"'
+			gs 'booty_call_sex', 'sex_end'
+		end
+
+		act'Compromise (I like you)':
+			cla & *nl
+			'"Only cause I happen to like you so much," you half grimace, half smile. "So I''m willing to compromise a <i>little.</i> But I''m not gonna swallow for you."'
+			if npc_generous[$boy] = 1:
+				'"I''ll be sure to make it up to you sometime," he smiles back.'
+				'"You better! Cause this is just, <i>ick-!</i>"'
+			elseif npc_selfish[$boy] = 1:
+				'"Would be better if you did," he grins.'
 				'"Shut up," you roll your eyes in return.'
+			else
+				'He smiles at you, but neither of you say anything else.'
 			end
 			gs 'booty_call_sex', 'sex_end'
 		end
+	else
+		'"Yeah, cause I know it feels good," you raise an eyebrow back at him. "But that doesn''t stop it from tasting <b>bad</b>."'
+		if npc_selfish[$boy] = 1:
+			'"Good girl," he grins.'
+			'"Shut up," you roll your eyes in return.'
+		end
+		gs 'booty_call_sex', 'sex_end'
 	end
 end
 
@@ -2714,11 +3041,11 @@ if $ARGS[0] = 'cum_mouth_swallow_why':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		'"I heard you have to get used to the taste," you say, airing out your tongue in disgust.'
-		'"Well you don''t seem to be doing a very good job of it."'
-		'"Shut up," you glare.'
+		'"Well you don''t seem used to it yet. Maybe you should swallow some more?" he smirks.'
+		'"Shut up," you roll your eyes.'
 		gs 'booty_call_sex', 'sex_end'
 	end
-	if booty_call['bj_cum_choice'] > 6 and booty_call['bj_cum_choice'] <= 8:
+	if $booty_call['cum_choice'] = 'facial' and booty_call['last_cum'] ! 'face_mouth':
 		act'Too much mess':
 			cla & *clr
 			$npc_apt_bedroom[$boy]
@@ -2733,7 +3060,7 @@ if $ARGS[0] = 'cum_mouth_swallow_why':
 			gs 'booty_call_sex', 'sex_end'
 		end
 	end
-	if booty_call['bj_cum_choice'] > 4:
+	if $booty_call['cum_choice'] = 'facial':
 		act'That''s even <i>more</i> gross':
 			cla & *clr
 			$npc_apt_bedroom[$boy]

locations/booty_call_sex.qsrc

@@ -1,26 +1,57 @@
 # booty_call_sex
 
 if $ARGS[0] = 'sex_start':
-	if booty_call['no_sex'] = 0:
-		if stat['think_virgin'] = 1 and booty_call['virgin'] = 0 and booty_call['fuck_count'] = 0: 
-			act'Give him your virginity':gt'booty_call_virgin', 'start1'
-		elseif booty_call['fuck_count'] = 0:
-			act'Fuck <<$npc_firstname[$boy]>>':booty_call['must_fuck'] = 1 & booty_call['fuck_now'] = 1 & gs 'booty_call_sex', 'sex_pre'
-		else
-			act'Fuck again':
-				if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
-					booty_call['fuck_again'] = 1
-					gs 'booty_call_after', 'fucked_out'
-				else
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0: 
+		act'Give him your virginity':gs'booty_call_virgin', 'start1'
+	elseif booty_call['fuck_count'] = 0 and ($booty_call['position'] ! 'miss' or  $booty_call['position'] ! 'doggy' or  $booty_call['position'] ! 'cowgirl'):
+		act'Fuck <<$npc_firstname[$boy]>>':booty_call['must_fuck'] = 1 & gs 'booty_call_sex', 'sex_pre'
+	elseif booty_call['cock_remove'] = 0 and $booty_call['last_cum'] = 'creampie' and ($booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl'):
+		act'Fuck again':
+			if booty_call['cum_count'] >= npc_sexdrive[$boy]:
+				gs 'booty_call_after', 'fucked_out'
+			else
+!!					cla & *nl
+				cla
+				$booty_call['reset_pos'] = $booty_call['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 'booty_call_sex', 'reset'
-					if booty_call['no_condom'] = 0:
+					if booty_call['no_condom'] ! 1:
+						gs 'booty_call_condoms', 'condoms'
+					else
+						gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
+					end
+				end
+				
+				act'Change positions':
+					booty_call['force_initiative'] = 2
+					cla
+					if booty_call['no_condom'] ! 1:
 						gs 'booty_call_condoms', 'condoms'
 					else
 						gs 'booty_call_sex', 'position_choose'
 					end
-				!!	gs 'booty_call_sex', 'position_change'
-					
+				end
+			end
+		end
+	else
+		act'Fuck again':
+			cla
+			booty_call['fuck_again'] = 1
+			if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
+				gs 'booty_call_after', 'fucked_out'
+			else
+!!					cla & *clr
+!!					'<center><img <<$set_imgh>> src="images/shared/sex/misc/smile.jpg"></center>'
+!!					'"Ready to go again?" you grin eagerly at <<$npc_firstname[$boy]>>.'
+!!					'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock while you decide what position you want to fuck in next.'
+				gs 'booty_call_sex', 'reset'
+				if booty_call['no_condom'] = 0:
+					gs 'booty_call_condoms', 'condoms'
+				else
+					gs 'booty_call_sex', 'position_choose'
 				end
 			end
 		end
@@ -72,7 +103,7 @@ end
 
 
 if $ARGS[0] = 'position_choose':
-	if booty_call['virgin'] = 1 and $booty_call['virgin_react'] = '': 
+	if (booty_call['virgin'] = 1 or stat['virgin'] = 1) and booty_call['fuck_count'] = 0: 
 		gs 'booty_call_virgin', 'start_options'
 	!! initiative roll
 	elseif booty_call['no_sex'] = 0:
@@ -126,25 +157,33 @@ if $ARGS[0] = 'he_choose_position':
 	else
 		'"Do whatever you want to me <<$npc_lovername[$boy]>>," you smile.'
 	end
-	
-	if rand(0,1) = 1:
-		if $npc_fav_pos[$boy] = 'missionary':
-			gs 'booty_call_miss', 'missionary_start'
-		elseif $npc_fav_pos[$boy] = 'doggy':
-			gs 'booty_call_doggy', 'doggy_start'
-		elseif $npc_fav_pos[$boy] = 'cowgirl':
-			gs 'booty_call_cowgirl', 'cowgirl_start'
-		elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['must_fuck'] ! 1:
-			gs 'booty_call_start', 'bj_ask'
-		elseif npc_pussyeater[$boy] = 1 and booty_call['must_fuck'] ! 1:
-			*nl
-			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
-			gs 'booty_call_start', 'kuni_start'
+	act'Continue':
+		if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+			'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+			'"I wanna fuck your pussy."'
+			act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+			act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+		elseif rand(0,1) = 1:
+			if $npc_fav_pos[$boy] = 'missionary':
+				gs 'booty_call_miss', 'missionary_start'
+			elseif $npc_fav_pos[$boy] = 'doggy':
+				gs 'booty_call_doggy', 'doggy_start'
+			elseif $npc_fav_pos[$boy] = 'cowgirl':
+				gs 'booty_call_cowgirl', 'cowgirl_start'
+			elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['must_fuck'] ! 1:
+				gs 'booty_call_start', 'bj_ask'
+			elseif npc_pussyeater[$boy] = 1 and booty_call['must_fuck'] ! 1:
+				*nl
+				'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
+				gs 'booty_call_start', 'kuni_start'
+			else
+				gs 'booty_call_sex', 'rand_position'
+			end
 		else
 			gs 'booty_call_sex', 'rand_position'
 		end
-	else
-		gs 'booty_call_sex', 'rand_position'
 	end
 end
 
@@ -154,30 +193,33 @@ if $ARGS[0] = 'rand_position':
 	else
 		booty_call['position_rand'] = rand(1,5)
 	end
-	if booty_call['position_rand'] = 1:
-		!! missionary
-		gs 'booty_call_miss', 'missionary_start'
-	elseif booty_call['position_rand'] = 2:
-		!! doggy
-		gs 'booty_call_doggy', 'doggy_start'
-	elseif booty_call['position_rand'] = 3:
-		!! cowgirl
-		gs 'booty_call_cowgirl', 'cowgirl_start'
-	elseif booty_call['position_rand'] = 4 and booty_call['must_fuck'] ! 1:
-		!! blowjob
-		gs 'booty_call_start', 'bj_ask'
-	elseif booty_call['position_rand'] = 5 and booty_call['must_fuck'] ! 1 and (booty_call['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
-		*nl
-		'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
-		gs 'booty_call_start', 'kuni_start'
-	else
-		!! failsafe: default to missionary
-		gs 'booty_call_miss', 'missionary_start'
+	if stat['think_virgin'] = 0 or booty_call['fuck_count'] > 0:
+		if booty_call['position_rand'] = 1:
+			!! missionary
+			gs 'booty_call_miss', 'missionary_start'
+		elseif booty_call['position_rand'] = 2:
+			!! doggy
+			gs 'booty_call_doggy', 'doggy_start'
+		elseif booty_call['position_rand'] = 3:
+			!! cowgirl
+			gs 'booty_call_cowgirl', 'cowgirl_start'
+		elseif booty_call['position_rand'] = 4 and booty_call['must_fuck'] ! 1:
+			!! blowjob
+			gs 'booty_call_start', 'bj_ask'
+		elseif booty_call['position_rand'] = 5 and booty_call['must_fuck'] ! 1 and (booty_call['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
+			*nl
+			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
+			gs 'booty_call_start', 'kuni_start'
+		else
+			!! failsafe: default to missionary
+			gs 'booty_call_miss', 'missionary_start'
+		end
 	end
 end
 
 if $ARGS[0] = 'fuck_continue':
 	booty_call['cock_remove'] = 0
+	booty_call['fucking'] = 1
 	!! this is just so the game remembers what positions you fucked in
 	if $booty_call['position'] = 'miss':
 		booty_call['miss_fuck'] = 1
@@ -265,17 +307,17 @@ if $ARGS[0] = 'sex_end':
 		gs'booty_call_after', 'stop_here'
 	end
 	if booty_call['sex_stop'] = 0:
-		gs'booty_call_sex', 'keep_fucking'
+!!		gs'booty_call_sex', 'keep_fucking'
+		gs'booty_call_sex', 'keep_going'
+!!		gs'booty_call_sex', 'sex_start'
 		gs'booty_call_sex', 'take_a_break'
-!!		gs'booty_call_after', 'keep_going'
 		gs'booty_call_sex', 'harden_hand'
 		gs'booty_call_sex', 'harden_mouth'
-		gs'booty_call_sex', 'sex_start'
 	end
 	gs'booty_call_after', 'wipes'
 	if booty_call['react'] = 0:
 		gs'booty_call_after', 'facial_mouth_clean'
-		gs'booty_call_after', 'cum_kiss_cock'
+		gs'booty_call_reactions', 'cum_kiss_cock'
 		gs'booty_call_reactions', 'cum_react'
 	end
 	gs'booty_call_after', 'tap_out'
@@ -318,35 +360,6 @@ if $ARGS[0] = 'dirty_talk2':
 	gt 'booty_call_<<$booty_call[''position'']>>', '<<$booty_call[''pos_speed'']>>.2'
 end
 
-if $ARGS[0] = 'keep_fucking':
-	if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl'):
-		act'Keep fucking':
-			cla & *nl
-			$booty_call['reset_pos'] = $booty_call['position']
-			minut += rand(1,2)
-			'"Think you can 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."'
-			gs'booty_call_sex', 'reset'
-			act'Continue':
-				cla
-				gs 'booty_call_sex', 'reset'
-				gs 'booty_call_condoms', 'condoms'
-				gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'keep_fucking_act':
-	if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl'):
-		act'Keep fucking':
-			$booty_call['reset_pos'] = $booty_call['position']
-			cla
-			gs 'booty_call_sex', 'reset'
-			gs 'booty_call_condoms', 'condoms'
-			gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
-		end
-	end
-end
 
 if $ARGS[0] = 'take_a_break':
 	act'Take a break':
@@ -377,15 +390,28 @@ if $ARGS[0] = 'take_a_break':
 				act'Pull apart':
 					booty_call['cock_remove'] = 1
 					cla & *clr
-					if $booty_call['position'] = 'miss':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
-						'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed as you feel <<$npc_firstname[$boy]>>''s cum trickle from your pussy.'
-					elseif $booty_call['position'] = 'doggy':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
-						'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You barely move, breathing slowly and let your face sink into the pillow as <<$npc_firstname[$boy]>>''s cum trickles from your pussy.'
-					elseif $booty_call['position'] = 'cowgirl':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
-						'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed. His cum slowly oozes from your pussy.'
+					if $booty_call['last_cum'] = 'creampie':
+						if $booty_call['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed as you feel <<$npc_firstname[$boy]>>''s cum trickle from your pussy.'
+						elseif $booty_call['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You barely move, breathing slowly and let your face sink into the pillow as <<$npc_firstname[$boy]>>''s cum trickles from your pussy.'
+						elseif $booty_call['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
+							'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed. His cum slowly oozes from your pussy.'
+						end
+					elseif $booty_call['last_cum'] = 'condom':
+						if $booty_call['position'] = 'miss':
+							'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed, feeling your your pussy continue to leak as <<$npc_firstname[$boy]>> pulls off the used condom and tosses it aside.'
+						elseif $booty_call['position'] = 'doggy':
+							'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and you roll over to face him, thighs slick with your own juices and head swimming with post-fuck endorphins, while he pulls off the used condom and tosses it aside.'
+						elseif $booty_call['position'] = 'cowgirl':
+							'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
+							'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed, sighing with satisfaction as you feel post-fuck juices continue to leak from your pussy and <<$npc_firstname[$boy]>> pulls off the used condom and tosses it aside.'
+						end
 					end
 					
 					*nl
@@ -619,20 +645,30 @@ if $ARGS[0] = 'he_end_break':
 	booty_call['position_rand'] = rand(1,5)
 	cla & *clr
 	$npc_apt_bedroom[$boy]
-	if booty_call['position_rand'] = 1 or $npc_fav_pos[$boy] = 'missionary':
+	if booty_call['position_rand'] = 1 or $npc_fav_pos[$boy] = 'missionary' or (stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0 and booty_call['position_rand'] <= 3):
 		!! missionary
 		'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you. You realize what''s about to happen just before he jumps on top of you, eliciting...'
 		act'... giggles':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as he forces your legs open and plunges his cock into your pussy.'
-			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as he forces your legs open and lines his cock up with your pussy.'
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+			else
+				act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			end
 		end
 		act'... a yelp of surprise':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from your lips as he forces your legs open and plunges his cock into your pussy.'
-			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from your lips as he forces your legs open and lines his cock up with your pussy.'
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+			else
+				act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			end
 		end
 	elseif booty_call['position_rand'] = 2 or $npc_fav_pos[$boy] = 'doggy':
 		!! doggy
@@ -640,12 +676,12 @@ if $ARGS[0] = 'he_end_break':
 		act'... giggles':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass before plunging his cock into your pussy.'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass, lining his cock up with your pussy.'
 			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
 		act'... a yelp of surprise':
 			cla & *clr
-			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/dog1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
 			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass before plunging his cock into your pussy.'
 			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
@@ -673,46 +709,56 @@ if $ARGS[0] = 'keep_going':
 		if booty_call['cum_count'] >= npc_sexdrive[$boy]:
 			gs 'booty_call_after', 'fucked_out'
 		elseif $booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl':
-			if booty_call['cock_remove'] = 1:
+			
+			minut += rand(1,2)
+			if booty_call['cock_remove'] = 0 and $booty_call['last_cum'] = 'creampie':
+				cla & *nl
+				'"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."'
+			else
 				cla & *clr
-				minut += rand(1,2)
 				'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
-				'"Ready to keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
-				'"Yeah, gimme a minute to get hard again."'
-				gs'booty_call_sex', 'reset'
-				act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-				act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-				act'Sex':cla & gs 'booty_call_condoms', 'condoms'
-			else
-				cla & *nl
-				$booty_call['reset_pos'] = $booty_call['position']
-				minut += rand(1,2)
-				'"Think you can keep going?" you ask, flexing your pussy around his cock. You grin when you feel it twitch in response, seeming a little stiffer inside you than before. "That feels like a yes."'
-				gs'booty_call_sex', 'reset'
-				act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-				act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-				act'Change position':
-					cla
-					booty_call['change_pos'] = 1
-					gs 'booty_call_sex', 'position_change'
-				end
-				gs'booty_call_sex', 'keep_fucking_act'
+				'"Wanna keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
+				'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
+				!!act'Sex':cla & gs'booty_call_sex', 'position_choose' & gs 'booty_call_condoms', 'condoms'
 			end
+			gs'booty_call_sex', 'reset'
+			gs'booty_call_sex', 'sex_menu'
 		else
 			cla & *clr
 			minut += rand(1,2)
 			'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
-			'"Ready to keep going?" you ask eagerly.'
+			'"Wanna keep going?" you ask eagerly.'
 			if $booty_call['cum_choice'] ! '':
-				'"Yeah, gimme a minute to get hard again."'
+				'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
 			else
-				'"Definitely. What do you have in mind?"'
+				'"What do you have in mind?" <<$npc_firstname[$boy]>> grins back.'
 			end
 			
 			gs'booty_call_sex', 'reset'
-			act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-			act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-			act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+			gs'booty_call_sex', 'sex_menu'
+			!!act'Sex':cla & gs'booty_call_sex', 'position_choose' & gs 'booty_call_condoms', 'condoms'
+		end
+	end
+end
+
+if $ARGS[0] = 'sex_menu':
+	act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
+	act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
+	gs'booty_call_sex', 'sex_start'
+end
+
+if $ARGS[0] = 'keep_fucking':
+	
+end
+
+if $ARGS[0] = 'keep_fucking_act':
+	if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl'):
+		act'Keep fucking':
+			$booty_call['reset_pos'] = $booty_call['position']
+			cla
+			gs 'booty_call_sex', 'reset'
+			gs 'booty_call_condoms', 'condoms'
+			gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
 		end
 	end
 end
@@ -837,12 +883,7 @@ if $ARGS[0] = 'harden_hand':
 				$booty_call['foreplay'] = ''
 				gs'booty_call_sex', 'reset'
 				gs 'booty_call_start', 'handjob_dom1'
-				gs 'booty_call_start', 'foreplay_choose'
-				if booty_call['fuck_count'] > 0:
-					act'Back to sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
-				else
-					gs'booty_call_sex', 'sex_start'
-				end
+				gs'booty_call_sex', 'sex_menu'
 			end
 		end
 	end
@@ -900,20 +941,21 @@ if $ARGS[0] = 'harden_mouth':
 				$booty_call['foreplay'] = ''
 				gs'booty_call_sex', 'reset'
 				act'Keep blowing him':cla & *clr & gs 'booty_call_start', 'bj_dom2'
-				gs 'booty_call_start', 'foreplay_choose'
-				if booty_call['fuck_count'] > 0:
-					act'Back to sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
-				else
-					gs'booty_call_sex', 'sex_start'
-				end
+				gs'booty_call_sex', 'sex_menu'
 			end
 		end
 	end
 end
 
 if $ARGS[0] = 'reset':
+	booty_call['bj_cum_choice'] = 0
+	booty_call['cum_choice'] = 0
 	$booty_call['cum_choice'] = ''
-	$booty_call['last_cum'] = ''
+!!	$booty_call['last_cum'] = ''
+	if booty_call['orgasm'] < orgasm and booty_call['virgin'] = 1:
+		booty_call['virgin_enjoyment'] = 0
+		booty_call['virgin_feel_good'] = 1
+	end
 	booty_call['orgasm'] = orgasm
 	booty_call['kiss'] = 0
 	booty_call['bored'] = 0
@@ -930,12 +972,13 @@ if $ARGS[0] = 'reset':
 	if booty_call['came_together'] > 0:
 		booty_call['came_together'] = 0
 		booty_call['creampie_orgasm'] = 1
-		
+		booty_call['did_we_cum_together'] = 0
 	end
 	booty_call['cum_together_fake'] = 0
 	booty_call['cum_react'] = 0
 	if booty_call['mad'] = 1:booty_call['mad'] = 2
 	booty_call['boy_cum'] = 0
+	booty_call['bj_cum'] = 0
 	booty_call['consecutive_cuni_orgasm'] = 0
 !!	booty_call['reluctant_bj'] = 0
 !!	booty_call['cum_mouth'] = 0
@@ -1312,9 +1355,7 @@ if $ARGS[0] = 'sleep_wtf_forgive2':
 		*nl
 		'"Oh alright. Come here," you say, beckoning him towards you so you can do something about his raging hard-on.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 	
 	act'Sure':
@@ -1323,9 +1364,7 @@ if $ARGS[0] = 'sleep_wtf_forgive2':
 		$npc_apt_bedroom[$boy]
 		'"Sure," you grin, beckoning him closer so you can put his raging erection to use.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 end
 
@@ -1586,9 +1625,7 @@ if $ARGS[0] = 'morning_wtf_forgive2':
 		*nl
 		'"Oh alright. Come here," you say, beckoning him towards you so you can do something about his raging hard-on.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 	
 	act'Sure':
@@ -1597,9 +1634,7 @@ if $ARGS[0] = 'morning_wtf_forgive2':
 		$npc_apt_bedroom[$boy]
 		'"Sure," you grin, beckoning him closer so you can put his raging erection to use.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 end
 

locations/booty_call_shower.qsrc

@@ -1647,7 +1647,7 @@ if $ARGS[0] = 'morning_shower_creampie':
 		*nl
 		'Eventually, his orgasm fades and his cock slips from inside you and a hot dribble of liquid runs down your leg.'
 		*nl
-		if booty_call['condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2) or npc_know_not_bc[$boy] = 1:
+		if npc_creampie_okay[$boy] = 0 and booty_call['creampie_allowance'] = 0 and booty_call['no_creampies_today'] ! 1 and (booty_call['condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2)):
 			'"I thought..." <<$npc_firstname[$boy]>> pants. "You didn''t want me... to come inside you..."'
 			act'Changed my mind':
 				if npc_boyfriend_creampie_rule[$boy] > 0: npc_boyfriend_creampie_rule[$boy] = 0

locations/booty_call_start.qsrc

@@ -65,13 +65,14 @@ if $ARGS[0] = 'initiate':
 	
 	if booty_call_invite[$boy] = daystart and npc_last_booty_call[$boy] ! daystart:
 		gt 'booty_call_start', 'invited_start'
-	elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_sex[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart and npc_last_booty_call[$boy] ! daystart:
+	elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_booty_call[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
 		gt 'booty_call_start', 'uninvited_start'
 	else
 		gs 'booty_call_start', 'neighborhood_image'
 		'You knock on <<$npc_firstname[$boy]>>''s door but there is no answer.'
 		act'Leave':gt $loc
 	end
+	npc_last_booty_call[$boy] = daystart
 end
 
 
@@ -94,14 +95,22 @@ if $ARGS[0] = 'uninvited_start':
 	act'I was in the neighborhood':
 		cla & *nl
 		'"Hey," you smile at <<$npc_firstname[$boy]>> who blinks in surprise. "I was in the neighborhood and I started thinking about you, wondering if you wanted to fool around some...?"'
-		'"You couldn''t have called first?"'
-		'You shrug.'
-		'"Wanted to surprise you. So am I coming in or what?"'
+		if npc_booty_call[$boy] = daystart:
+			'"I was just about to text you," he grins.'
+			'So am I coming in or what?" you grin back.'
+		else
+			'"You couldn''t have called first?"'
+			'You shrug.'
+			'"Wanted to surprise you. So am I coming in or what?"'
+		end
+		
 		if rand(1,10) < npc_sexdrive[$boy]:
 			if npc_humor[$boy] = 2 and npc_cum_pref[$boy] = '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_humor[$boy] = 2 and npc_cum_pref[$boy] = '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_booty_call[$boy] = 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.'
 			end
@@ -414,12 +423,12 @@ end
 if $ARGS[0] = 'generous_initiative':
 	*nl
 	!! cunnilingus or nipple play
-	if rand(0,1) = 1 or npc_pussyeater[$boy] = 1:
+	if (rand(0,1) = 1 or npc_pussyeater[$boy] = 1) and booty_call['sensitive_cuni'] ! 1:
 		!! cunnilingus
 		if booty_call['start_shower'] = 1:
 			'<<$npc_firstname[$boy]>> drags you into his bedroom, your hair still wet from the shower, and shoves you backwards onto the bed kneeling between your legs.'
 		else
-			'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and kneels between your legs.'
+			'<<$npc_firstname[$boy]>> shoves you backwards onto onto the bed begins laying a trail of kisses, heading down between your legs.'
 		end
 		gs 'booty_call_start', 'kuni_start'
 	else
@@ -427,7 +436,7 @@ if $ARGS[0] = 'generous_initiative':
 		if booty_call['start_shower'] = 1:
 			'<<$npc_firstname[$boy]>> drags you into his bedroom and shoves you backwards onto onto the bed, starting a trail of kisses up your wet stomach, towards your breasts.'
 		else
-			'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and begins leaving a new trail of kisses up your stomach, towards your breasts.'
+			'<<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and begins leaving a new trail of kisses up your stomach, towards your breasts.'
 		end
 		act'Continue':gs 'booty_call_start', 'nipple_play'
 	end
@@ -600,6 +609,7 @@ if $ARGS[0] = 'kuni_start':
 				if booty_call['cuni_orgasm'] >= 3:
 					act'Too sensitive':
 						cla & *nl
+						booty_call['sensitive_cuni'] = 1
 						'"You''ve eaten me out too many times today already," you say with a wry smile. "My pussy is too sensitive to let you down there again."'
 						'"Oh. Well..." <<$npc_firstname[$boy]>> smirks back at you smugly.'
 						gs 'booty_call_start', 'cuni_alternatives'
@@ -634,9 +644,9 @@ if $ARGS[0] = 'cuni_alternatives':
 		'"That could be nice," he smiles, leaning back.'
 		gs 'booty_call_start', 'bj_dom1'
 	end
-	if stat['think_virgin'] = 1:
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
 		act'You can take my virginity':gt'booty_call_virgin', 'start2'
-	else
+	elseif booty_call['fuck_count'] = 0:
 		act'We could just skip to fucking?':
 			cla & *nl
 			'"We could just get right to fucking?"'
@@ -645,6 +655,15 @@ if $ARGS[0] = 'cuni_alternatives':
 			gs 'booty_call_condoms', 'condoms'
 			gs 'booty_call_sex', 'position_change'
 		end
+	else
+		act'We could fuck again?':
+			cla & *nl
+			'"How about you just fuck me again?" you ask'
+			'"That sounds good."'
+			booty_call['position_choose'] = 1
+			gs 'booty_call_condoms', 'condoms'
+			gs 'booty_call_sex', 'position_change'
+		end
 	end
 end
 
@@ -807,13 +826,14 @@ if $ARGS[0] = 'pussy_lick_loop':
 				cla & *clr
 				!! IMAGE HERE
 				'He tries to dive right back in but you put your hand on his head and push him away from your pussy.'
-				'"Wait, stop!" He looks up at you with curiousity.'
+				'"Wait, stop!" He looks up at you with curiosity.'
 				'"This isn''t the only thing I want to do today," you say.'
 				gs 'booty_call_sex', 'sex_start'
 			end
 		end
 	end
 	gs 'booty_call_start', 'cuni_too_sensitive'
+	gs 'booty_call_sex', 'sex_start'
 end
 
 if $ARGS[0] = 'cuni_too_sensitive':
@@ -853,13 +873,13 @@ if $ARGS[0] = 'nipple_play':
 	'<<$npc_firstname[$boy]>> leans forward, grabbing ahold of your breasts with his hands and uses his mouth on your nipples. He sucks them up, flicks at the tips with his tongue, sending electricity flying through them. Heat spreads through your hips and you can feel wetness pooling between your thighs.'
 	act'Continue':
 		cla & *nl
-		if rand(0,1) = 1 and kuni_no[$boy] ! 1 and (mesec = 0 or npc_pussyeater_know[$boy] = 1):
+		if rand(0,1) = 1 and kuni_no[$boy] ! 1 and (mesec = 0 or npc_pussyeater_know[$boy] = 1) and booty_call['sensitive_cuni'] ! 1:
 			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, beginning to move between your legs to eat you out.'
 			gs 'booty_call_start', 'kuni_start'
 		else
 			booty_call['position_choose'] = 1
 			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, climbing on top of you with his rock hard cock between your legs.'
-			if stat['think_virgin'] = 1:
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
 				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
 				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
 			else
@@ -953,24 +973,7 @@ if $ARGS[0] = 'bj_sub1':
 		'You lean forward and take him in your mouth, gently sucking his cock and bobbing your head up and down on it. You take pride in your work, doing your best to make <<$npc_firstname[$boy]>> feel good.'
 	end
 	*nl
-	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_lets_fuck'
-	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	elseif booty_call['bj_cum_choice'] > 8:
-		gs 'booty_call_start', 'bj_sub_cum_mouth1'
-	elseif booty_call['bj_cum_choice'] > 6:
-		gs 'booty_call_start', 'bj_sub_cum_face1'
-	elseif booty_call['bj_cum_choice'] > 4:
-		gs 'booty_call_start', 'bj_sub_cum_tits1'
-	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_cum_wait'
-	elseif booty_call['fuck_count'] > 0:
-		gs 'booty_call_start', 'bj_sub_cum_surprise'
-	else
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	end
+	gs 'booty_call_start', 'bj_cum_sort'
 end
 
 if $ARGS[0] = 'bj_sub2':
@@ -980,24 +983,7 @@ if $ARGS[0] = 'bj_sub2':
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj52.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> slowly pumps his cock in and out of your mouth, plunging it all the way down your throat where you can feel it press against your windpipe. You keep it loose while he does all the work, occasionally letting your tongue snake out for a cheekly lick, but otherwise just let <<$npc_firstname[$boy]>> keep fucking your face.'
 	*nl
-	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_lets_fuck'
-	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	elseif booty_call['bj_cum_choice'] > 8:
-		gs 'booty_call_start', 'bj_sub_cum_mouth1'
-	elseif booty_call['bj_cum_choice'] > 6:
-		gs 'booty_call_start', 'bj_sub_cum_face1'
-	elseif booty_call['bj_cum_choice'] > 4:
-		gs 'booty_call_start', 'bj_sub_cum_tits1'
-	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_cum_wait'
-	elseif booty_call['fuck_count'] > 0:
-		gs 'booty_call_start', 'bj_sub_cum_surprise'
-	else
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	end
+	gs 'booty_call_start', 'bj_cum_sort'
 end
 
 if $ARGS[0] = 'bj_sub_cum_surprise':
@@ -1089,13 +1075,15 @@ if $ARGS[0] = 'bj_sub_cum_surprise':
 end
 
 if $ARGS[0] = 'bj_sub_cum_mouth1':
+	booty_call['he_ask_mouth'] = 1
+	$booty_call['cum_choice'] = 'mouth'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"I''m gonna- <i>nngh-!</i> Can I cum in your mouth?"'
 	act'Why?':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
 		'You let his cock pop out of your mouth for a moment, giving him a quizzical look.'
-		'"And, why would I let you do that?" you ask, continuing to play with his cock with a smattering of kisses, licks, and gentle sucks.'
+		'"And, why would I let you do that?" you ask, continuing to keeping him on the edge with a smattering of kisses, licks, and gentle sucks.'
 		if npc_selfish[$boy] = 1:
 			'"Because I want you to," he responds simply, like that''s the only reason you should ever need.'
 			act'No thanks':
@@ -1118,7 +1106,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 				gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 				gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 			end
-
+			
 		else
 			if rand(0,1) = 1:
 				'"Oh. Well I just... I thought... uhh... Sorry. It''s a dumb idea isn''t it?"'
@@ -1129,8 +1117,8 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 
 		act'Couldn''t hurt':
 			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-			'"Well, it couldn''t hurt I suppose..." you smile, lowering your lips back down to his cock and giving a mighty suck. He blows his load moments later.'
+			'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
+			'"Well, it couldn''t hurt I suppose..." you smile and plunge your lips all the way down to the base of <<$npc_firstname[$boy]>>''s shaft. He blows his load moments later.'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 		end
@@ -1138,13 +1126,13 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 		act'Just wondered (let him)':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
-			'"Just wondered if you actually had a reason," you smile. With that, you give him a few sudden and furious jerks before plunging your head all the way to the base of his cock. Not even a second later, you feel him explode inside your mouth.'
+			'"Just wondered if you actually had a reason," you smile. With that, you give him a few sudden and furious jerks before plunging your head all the way to the base of <<$npc_firstname[$boy]>>''s cock. A moment later, he exploded inside your mouth.'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 		end
 
 		gs 'booty_call_start', 'bj_sub_cum_face3'
-		act'How about my tits intstead?':
+		act'How about my tits instead?':
 			cla & *nl
 			'"How about I let you cum on my tits instead?" you smile enticingly.'
 			'"That sounds like it it would be pretty hot," he says and you scooch forward, presenting your chest for him.'
@@ -1193,10 +1181,10 @@ if $ARGS[0] = 'bj_sub_cum_mouth2':
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
-		'With a mischievous grin, you work his cock with your hand, building up his climax right to the brink. You can tell just by the expression on his face and the swelling of flesh in your hand that he''s about to blow. At that moment, you plunge your lips straight down to the base of his cock, right as he explodes inside your mouth.'
+		'With a mischievous grin, you work his cock with your hand, building up his climax right to the edge. You can tell just by the expression on his face and the swelling of flesh in your hand that he''s about to blow. At that moment, you plunge your lips straight down to the base of his cock, right as he explodes inside your mouth.'
 		gs 'booty_call_reactions', 'bj_warning_thanks'
 		gs 'booty_call_reactions', 'bj_tasty'
-		gs 'booty_call_start', 'bj_swallow_gross'
+		gs 'booty_call_reactions', 'bj_swallow_gross'
 		gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 !!		gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 !!		gs 'booty_call_start', 'bj_sub_cum_mouth_yuck1'
@@ -1209,7 +1197,6 @@ if $ARGS[0] = 'bj_sub_cum_mouth_spit':
 		booty_call['spit'] = 1
 		booty_call['swallow'] = 0
 		booty_call['cum_count'] += 1
-		$booty_call['cum_choice'] = 'mouth'
 		$booty_call['last_cum'] = 'mouth'
 		gs 'cum_call', 'mouth', $boy, 1
 		gs 'stat'
@@ -1223,6 +1210,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_spit':
 		if booty_call['cum_mouth_surprise'] = 1:
 			gs 'booty_call_reactions', 'bj_already'
 		end
+		gs 'booty_call_reactions', 'bj_spit_gross'
 	end
 end
 
@@ -1273,48 +1261,22 @@ if $ARGS[0] = 'bj_sub_cum_mouth_swallow':
 		'Thick, salty sperm sprays into your mouth and you can''t help but feel just a little bit nauseous even as you continue to suck out more cum from <<$npc_firstname[$boy]>>''s cock. But you power through regardless, and with a grimace of deep disgust, you force it down, swallowing the entire load.'
 		*nl
 		if booty_call['cum_swallow'] > 1:
-			'"Yeech!" you wince. "I''m never going to get used to that!"'
+			'"<i>Yeech</i>!" you wince. "I''m never going to get used to that!"'
 			'"But you still keep doing it anyway," <<$npc_firstname[$boy]>> smirks.'
 			'"Yeah, yeah, shut up," you say, rolling your eyes and sticking out your tongue, trying to air it out.'
 			gs 'booty_call_sex', 'sex_end'
 		else
-			'"Blech!" you shudder. "That''s awful!"'
-			if booty_call['bj_cum_choice'] > 6 and booty_call['bj_cum_choice'] <= 8:
+			'"<i>Blech</i>!" you shudder. "That''s awful!"'
+			if $booty_call['cum_choice'] = 'face':
 				'"If you hate swallowing so much, then why didn''t you just let me cum on your face like I wanted to?" <<$npc_firstname[$boy]>> asks quizzically.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
-			elseif booty_call['bj_cum_choice'] > 4 and booty_call['bj_cum_choice'] <= 8:
+			elseif $booty_call['cum_choice'] = 'tits':
 				'"If you hate swallowing so much, then why didn''t you just let me cum on your tits?" <<$npc_firstname[$boy]>> asks quizzically.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
 			else
 				'"Then why''d you do it?" <<$npc_firstname[$boy]>> asks, a dumbfounded look on his face.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
-
-				act'Cause boys like it':
-					cla & *clr
-					$npc_apt_bedroom[$boy]
-					'"Cause boys seem to like it," you wince, airing out your tongue, trying to dissipate the taste. "I don''t want to be a shitty lay. Sometimes that means doing stuff you don''t like."'
-					'"Well it <i>was</i> pretty hot," <<$npc_firstname[$boy]>> grins at you.'
-					'"Why?!" you ask. "Why do you idiots with dicks want girls to swallow this vile stuff?"'
-					'He chuckles at you while you continue to gag for a little while longer, trying to get past your disgust.'
-					gs 'booty_call_sex', 'sex_end'
-				end
-				if booty_call['bj_cum_choice'] > 8:
-					act'Cause I like you':
-						cla & *clr
-						$npc_apt_bedroom[$boy]
-						'"Because I like you," you say, a look of betrayal on your face. "And I wanted to do something nice for you. I''m severely regretting it now. I don''t want to like you anymore, this was a mistake."'
-						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
-						gs 'booty_call_sex', 'sex_end'
-					end
-
-					act'Because you asked':
-						cla & *clr
-						$npc_apt_bedroom[$boy]
-						'"Because you asked me to," you say, giving him an accusatory look. "That makes this your fault. <i>Bleeechhh...</i>"'
-						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
-						gs 'booty_call_sex', 'sex_end'
-					end
-				end
+				gs 'booty_call_reactions', 'bj_swallow_gross2'
 			end
 		end
 	end
@@ -1322,6 +1284,8 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_face1':
 	!! asks to come on face
+	booty_call['he_ask_facial'] = 1
+	$booty_call['cum_choice'] = 'face'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"<i>nngh-!</i> <<$pcs_nickname>>-! Can I come on your face? You''d look so hot."'
 	act'No way':
@@ -1334,7 +1298,7 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 
 		act'How about my mouth instead?':
 			cla & *nl
-			'"How about my mouth instead?" you smile. "Don''t you want to just pump it straight down my throat instead?"'
+			'"How about my mouth?" you smile. "Don''t you want to just pump it straight down my throat instead?"'
 			'<<$npc_firstname[$boy]>>''s face turns to a hungry expression. "Well, when you put it like that..."'
 			gs 'booty_call_start', 'bj_sub_cum_mouth2'
 		end
@@ -1354,8 +1318,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Ugh! That''s fucking disgusting!" you whine. "I can''t believe I let you talk me into this."'
 		'"You look great though." You can''t see him with the cum gluing your eyelids shut, but you''re pretty sure he''s wearing a grin you would slap him for.'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 
 	act'Let him (passive)':
@@ -1373,8 +1337,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Happy?" you ask.'
 		'"You have no idea how fucking hot you look right now."'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 
 	act'Stick our your tongue (swallow)':
@@ -1400,8 +1364,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 			'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
 			'"You''re so fucking hot."'
 			'"Yeah, I know," you grin back.'
-			gs 'booty_call_after', 'wipe_face'
 			gs 'booty_call_sex', 'sex_end'
+			gs 'booty_call_after', 'wipe_face'
 		end
 	end
 
@@ -1423,8 +1387,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Happy?" you ask.'
 		'"You have no idea how fucking hot you look right now."'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 end
 
@@ -1435,78 +1399,31 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_face3':
 	!! player choosing to do it
-	act'How about my face instead?':
+	if booty_call['he_ask_mouth'] = 1:
+		$booty_call['act_desc'] = 'How about my face instead?'
+		$booty_call['cum_desc'] = 'How about you just come on my face instead?'
+	else
+		$booty_call['act_desc'] = 'Wanna come on my face?'
+		$booty_call['cum_desc'] = 'Wanna come on my face?'
+	end
+	act'<<$booty_call[''act_desc'']>>':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
-		
-		'"How about you just cum on my face instead?" you ask pulling back. '
-		'In response, <<$npc_firstname[$boy]>> scooches forwards and grabs hold of his member, pointing at your face. You''ll take that as a yes.'
-		act'Close your eyes':
-			booty_call['cum_face'] = 1
-			$booty_call['last_cum'] = 'facial'
-			gs 'cum_call', 'face', $boy, 1
-			booty_call['cum_count'] += 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
-			'You let him position himself over you and close your eyes. Moments later warm fluid spatters across your face and within seconds, your face is covered in <<$npc_firstname[$boy]>>''s cum. After a little bit to make sure <<$npc_firstname[$boy]>>''s finished, you crack an eye and look up at him.'
-			*nl
-			'"How do I look?" you grin.'
-			'"Fucking hot."'
-			'"I thought so." You give him a wink.'
-			!! add reactions later?
-			gs 'booty_call_after', 'wipe_face'
-			gs 'booty_call_sex', 'sex_end'
-		end
-
-		act'Stick our your tongue (swallow)':
-			booty_call['cum_face'] = 1
-			booty_call['cum_swallow'] += 1
-			booty_call['cum_count'] += 1
-			$booty_call['last_cum'] = 'face_mouth'
-			gs 'cum_call', 'face', $boy, 1
-			gs 'cum_call', 'mouth_swallow', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial25.mp4"></video></center>'
-			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue.'
-			*nl
-			'"Ahhhhh~!"'
-			*nl
-			'The first shot goes directly into your mouth and the next spatters across your cheek. <<$npc_firstname[$boy]>> aims carefully, trying to get just as much cum on your face as he can in your mouth, but soon he runs out of steam, shaking the last drips of his load onto the tip of your tongue.'
-			act'Gulp':
-				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/cum/facial/facial26.mp4"></video></center>'
-				'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
-				gs 'booty_call_after', 'wipe_face'
-				gs 'booty_call_sex', 'sex_end'
-				gs 'booty_call_reactions', 'swallow_react1'
-
-			end
-		end
-
-		act'Stick our your tongue (spit)':
-			booty_call['cum_face'] = 1
-			booty_call['cum_count'] += 1
-			$booty_call['last_cum'] = 'face_mouth'
-			gs 'cum_call', 'face', $boy, 1
-			gs 'cum_call', 'hair', $boy, 1
-			gs 'cum_call', 'mouth', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial29.mp4"></video></center>'
-			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue. In return, he grabs you by the hair with one hand and works his cock right in front of your face with the other.'
-			*nl
-			'The first shot sprays directly across your face, spattering across your cheeks and even in your hair. A little falls inside your mouth and you spit it out as it comes, as <<$npc_firstname[$boy]>> finishes finishing himself over your face. When the cum stops flying, you crack an eye and look up at him.'
-			!! add reactions later?
-			gs 'booty_call_after', 'wipe_face'
-			gs 'booty_call_sex', 'sex_end'
-		end
+		'You pull your lips back from his cock with a pop.'
+		'"<<$booty_call[''cum_desc'']>>" you ask.'
+		'<<$npc_firstname[$boy]>> sits up, working his shaft with his hand as he points it at your face. That seems like a "yes" to you.'
+		gs'booty_call_cum', 'facial_close_eyes'
+		gs'booty_call_cum', 'facial_tongue_swallow'
+		gs'booty_call_cum', 'facial_tongue_spit'
+		gs'booty_call_cum', 'facial_brace'
+		act'Jerk him yourself':gt'booty_call_cum', 'facial_jerk_him'
 	end
 end
 
 
 if $ARGS[0] = 'bj_sub_cum_tits1':
+	booty_call['he_ask_tits'] = 1
+	$booty_call['cum_choice'] = 'tits'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"I''m gonna- <i>nngh-!</i> You''d look super hot with my cum on your tits. Can I?"'
 	act'No way':
@@ -1527,25 +1444,10 @@ if $ARGS[0] = 'bj_sub_cum_tits1':
 		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
 		'You don''t say a word, removing your mouth and start working his shaft with your hand instead. Within moments, his cock erupts and warm cum sprays across your chest, leaving long strands dripping down your breasts.'
 		!! reactions?
-		gs 'booty_call_after', 'wipe_tits'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_tits'
 	end
-	if tits > 1:
-		act'Finish him with your tits':
-			booty_call['cum_tits'] = 1
-			$booty_call['last_cum'] = 'tits'
-			booty_call['cum_count'] += 1
-			gs 'cum_call', 'breasts', $boy, 1
-			gs 'cum_call', 'hands', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
-			'"I''ve got an even better idea," you grin, leaning forward and smushing your breasts together around his cock. You squeeze them together with your hands and start working his shaft. Within seconds, cum erupts from the tip of his cock, smearing it all across your still moving tits and sending it dripping down your hands.'
-			!! reactions?
-			gs 'booty_call_after', 'wipe_tits'
-			gs 'booty_call_sex', 'sex_end'
-		end
-	end
+	gs 'booty_call_cum', 'cum_tits4'
 end
 
 if $ARGS[0] = 'bj_sub_cum_tits2':
@@ -1558,11 +1460,11 @@ if $ARGS[0] = 'bj_sub_cum_tits2':
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
-		'"How about my tits instead?"'
+		if booty_call['he_ask_tits'] = 1:'"How about my tits instead?"'
 		'With a dirty grin, you kneel beneath him grab hold of his cock and jerking it until he comes with a groan. Cum coats your tits in thick strands, warm against your skin.'
 		!! reactions?
-		gs 'booty_call_after', 'wipe_tits'
 		gs 'booty_call_sex', 'sex_end'
+!!		gs 'booty_call_after', 'wipe_tits'
 	end
 	if tits > 1:
 		act'Finish him with your tits':
@@ -1574,13 +1476,15 @@ if $ARGS[0] = 'bj_sub_cum_tits2':
 			gs 'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
-			'"How about my tits instead?"'
+			if booty_call['he_ask_tits'] = 1:'"How about my tits instead?"'
 			'With a dirty grin, you kneel beneath him and smush his cock between your breasts. You squeeze them together as tightly as possible and work his shaft until a few moment later, he comes, spraying cum all over your tits and hands.'
 			!! reactions?
-			gs 'booty_call_after', 'wipe_tits'
 			gs 'booty_call_sex', 'sex_end'
+!!			gs 'booty_call_after', 'wipe_tits'
 		end
 	end
+	
+	gs 'booty_call_cum', 'cum_tits4'
 end
 
 if $ARGS[0] = 'bj_sub_cum_hand':
@@ -1592,9 +1496,13 @@ if $ARGS[0] = 'bj_sub_cum_hand':
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,1.mp4"></video></center>'
-		'Removing his cock from your mouth, you instead kneel in front of him and work his cock with your hand until moments later, cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
-		gs 'booty_call_after', 'wipe_hands'
+		if booty_call['bj_cum'] ! 3:
+			'Removing his cock from your mouth, you instead kneel in front of him and work his cock with your hand. Moments later cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
+		else
+			'Removing his cock from your mouth, you kneel in front of him and work his cock with your hand until cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
+		end
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_hands'
 	end
 end
 
@@ -1822,6 +1730,7 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_warn':
 	booty_call['bj_cum'] = 3
+	booty_call['cum_warn'] = 1
 	'After a couple minutes, he taps you on the head.'
 	'"I''m-! Almost there-!" he groans loudly.'
 	gs 'booty_call_start', 'bj_sub_cum_hand'
@@ -1835,7 +1744,7 @@ if $ARGS[0] = 'bj_sub_cum_warn':
 			booty_call['position_choose'] = 1
 			'You pull your mouth off his cock with a pop, giving him a lusty stare.'
 			if booty_call['fuck_count'] > 0:
-				'"Not yet big boy," you grin, jerking him gently. "I want you to fuck me again."'
+				'"Not yet big boy," you grin, jerking him gently. "I want to fuck again."'
 			else
 				'"Not yet big boy," you grin, jerking him gently. "I want you inside me first."'
 			end
@@ -1934,8 +1843,14 @@ if $ARGS[0] = 'bj_resume':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
 	'You go back to blowing <<$npc_firstname[$boy]>>, humming to yourself as you relax while bobbing your head up and down the length of his cock.'
+	
+end
+
+if $ARGS[0] = 'bj_cum_sort':
 	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
+	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
+		gs 'booty_call_start', 'bj_sub_lets_fuck'
+	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
 		gs 'booty_call_start', 'bj_sub_cum_warn'
 	elseif booty_call['bj_cum_choice'] > 8:
 		gs 'booty_call_start', 'bj_sub_cum_mouth1'
@@ -1981,6 +1896,7 @@ end
 
 
 if $ARGS[0] = 'foreplay_choose':
+	booty_call['fucking'] = 0
 	if $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'makeout_dom1'
 
 	if $booty_call['position'] ! 'handjob' and $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'handjob_dom1'
@@ -1995,7 +1911,7 @@ if $ARGS[0] = 'foreplay_choose':
 
 	act'Let him lead':
 		cla & *nl
-		if npc_caretaker[$boy] = 1 or npc_pussyeater[$boy] = 1:
+		if ((npc_caretaker[$boy] = 1 and booty_call['orgasm_count'] = 0) or npc_pussyeater[$boy] = 1) and rand(1,2) = 1:
 			gs 'booty_call_start', 'generous_initiative'
 		elseif npc_selfish[$boy] = 1:
 			gs 'booty_call_start', 'selfish_initiative'
@@ -2124,7 +2040,7 @@ if $ARGS[0] = 'hj_cum1':
 	if $booty_call['position'] = 'handjob':
 		'You feel him tense under your touch and he tries to speak.'
 		'"Hang on, wai-"'
-		'But before he can finish his sentence, you finish him instead. Thick cum erupts from his cock, wads of it flying through the air, streams of it running down your fingers. A dirty grin is plastered across your face as you continue working his cock with your hand, milking him for every drop.'
+		'But before he can finish his sentence, you squeeze harder and speed up. Thick cum erupts from his cock, wads of it flying through the air, streams of it running down your fingers. A dirty grin is plastered across your face as you continue working his cock with your hand, milking him for every drop.'
 	elseif $booty_call['position'] = 'blowjob':
 		'<<$npc_firstname[$boy]>> groans loudly and cum erupts from the tip of his cock. The thick liquid dribbles down your fingers, mixing with your saliva, making his shaft even more slippery in your hand. A dirty grin is plastered across your face the whole time as you work his cock, determined to milk him for every drop.'
 	else

locations/booty_call_stats.qsrc

@@ -88,6 +88,12 @@ if $ARGS[0] = 'save':
 	!! number of times your fuckbuddy has cum in your mouth
 	npc_mouth_cum_count[$boy] += booty_call['mouth_cum']
 	
+	!! number of times you have denied letting your fuckbuddy take your virginity
+	npc_virgin_deny[$boy] += booty_call['virgin_deny']
+	
+	!! if your fuckbuddy takes your virginity without consent
+	npc_virgin_rapist[$boy] += booty_call['virgin_rape']
+	
 	if booty_call['sleep_fuck'] > 0: npc_sleep_fuck += 1
 end
 

locations/booty_call_talk.qsrc

@@ -5,10 +5,11 @@
 
 if $ARGS[0] = 'boy_accidental_creampie':
 	booty_call['accidental_creampie_convo'] = 1
-	if $booty_call['convo'] ! 'used_all_condoms': 
+!!{	if $booty_call['convo'] = 'used_all_condoms': 
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-	end
+	end}
+	cla & *nl
 	if cum_loc['vagina'] > 0:
 		'"Speaking of which..." <<$npc_firstname[$boy]>> says, looking intently at the cum slowly draining from your pussy. "Are you gonna be okay...?"'
 	else
@@ -266,7 +267,7 @@ if $ARGS[0] = 'free_creampies':
 				end
 			end
 		end
-	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and birth_control['think_safe'] = 0:
+!!{	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and birth_control['think_safe'] = 0:
 		if stat['safe_day'] = 1:
 			act'It''s a safe day':
 				booty_call['safe_day'] = 1
@@ -305,7 +306,7 @@ if $ARGS[0] = 'free_creampies':
 					gs'booty_call_sex', 'sex_end'
 				end
 			end
-		end
+		end}
 	end
 end
 

locations/booty_call_virgin.qsrc

@@ -2,12 +2,11 @@
 
 if $ARGS[0] = 'start1':
 	!! player initiated
-	cla & *nl
+	cla & *clr
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	$npc_apt_bedroom[$boy]
 	'With a fast beating heart, you turn to look at <<$npc_firstname[$boy]>>.'
-	'<<$npc_firstname[$boy]>>... I want you to take my virginity."'
+	'"<<$npc_firstname[$boy]>>... I want you to take my virginity."'
 	gs'booty_call_virgin', 'start_flavor'
 	gs'booty_call_virgin', 'start_options'
 end
@@ -16,7 +15,6 @@ if $ARGS[0] = 'start2':
 	!! player initiated, alternative suggestion variant
 	cla & *clr
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	$npc_apt_bedroom[$boy]
 	'"Well..." You bite your lip, heart pounding inside your chest, mulling over what you''re about to say. "What if... I let you fuck me?"'
 	gs'booty_call_virgin', 'start_flavor'
@@ -27,9 +25,8 @@ if $ARGS[0] = 'start3':
 	!! NPC initiated, player doesn''t stop them
 	cla & *nl
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
-	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. You can fuck me."'
+	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. Take my virginity."'
 	gs'booty_call_virgin', 'start_flavor'
 	gs'booty_call_virgin', 'start_options'
 end
@@ -37,7 +34,6 @@ end
 if $ARGS[0] = 'start4':
 	!! NPC initiated, they know that player wants to save it before attempting, player doesn''t stop them
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	cla & *clr
 	pcs_horny += 20
 	$npc_apt_bedroom[$boy]
@@ -50,7 +46,6 @@ end
 if $ARGS[0] = 'start5':
 	!! player initiated, player just wants to fuck
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	cla & *clr
 	$npc_apt_bedroom[$boy]
 	'"Enough of the foreplay," you say with a lusty growl. "It''s time to fuck."'
@@ -100,8 +95,9 @@ if $ARGS[0] = 'start_flavor':
 end
 
 if $ARGS[0] = 'start_options':
+	booty_call['orgasm_count'] = orgasm
 	if booty_call['condom'] = 0 and booty_call['no_condom'] = 0:
-		gs 'booty_call_condoms', 'condoms'
+		act'Continue':cla & gs 'booty_call_condoms', 'condoms'
 	else
 		act'Let him take the lead':gt'booty_call_virgin', 'his_choice'
 
@@ -113,10 +109,67 @@ if $ARGS[0] = 'start_options':
 	end
 end
 
+if $ARGS[0] = 'start_with_condom':
+	gs 'booty_call_condoms', 'npc_condom_use_stats'
+	if npc_caregiver[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,2) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
+		'With the condom securely wrapped around <<$npc_firstname[$boy]>>''s cock, he moves back in between your legs before he stops, hesitating.'
+		gs 'booty_call_virgin', 'start_options2'
+	else
+		'With the condom securely wrapped around <<$npc_firstname[$boy]>>''s cock, he moves back in between your legs. Moments later, he takes your virginity.'
+		gs'booty_call_virgin', 'miss_virg_start'
+	end
+end
+
+if $ARGS[0] = 'start_without_condom':
+	if npc_caregiver[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,3) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
+		'<<$npc_firstname[$boy]>> moves back in between your legs before he stops, hesitating.'
+		gs 'booty_call_virgin', 'start_options2'
+	else
+		'<<$npc_firstname[$boy]>> moves back in, lining his naked cock up with your pussy. Moments later, he takes your virginity.'
+		gs'booty_call_virgin', 'miss_virg_start'
+	end
+end
+
+if $ARGS[0] = 'start_options2':
+	booty_call['orgasm_count'] = orgasm
+	'"Did you want to decide how we do this?" he asks. "It''s <i>your</i> first time after all."'
+	act'Let him take the lead':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'You shake your head.'
+		*nl
+		'"You pick. I trust your experience," you smile.'
+		act'Continue':gt'booty_call_virgin', 'his_choice'
+	end
+	
+	act'Spread your legs':gt'booty_call_virgin', 'miss_virg_norm1'
+
+	act'Get on all fours':gt'booty_call_virgin', 'doggy_virg_norm1'
+
+	act'Climb on top':gt'booty_call_virgin', 'cowgirl_virg_norm1'
+end
+
 if $ARGS[0] = 'wait':
 	cla & *clr
-	$npc_apt_bedroom[$boy]
-	if rand(1,10) > npc_sexdrive[$boy]:
+	if WIP_enabled > 0 and rand(1,10) < npc_sexdrive[$boy] and npc_abusive[$boy] > 0:
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+		if know_virgin[$boy] = 1:
+			'"Wait!" you yelp. "Knock it off! You know I''m saving my virg-!"'
+			'Your protests cut off in a choked scream as <<$npc_firstname[$boy]>> rams his cock full force into you, stabbing it through your hymen and sending waves of agony through you. Tears well up in your eyes as you look up at <<$npc_firstname[$boy]>>, horrified at what he''s done.'
+			if booty_call['virgin_deny'] >= 10:
+				'"I''m so fucking sick of you blueballing me," he says. "So we''re gonna fuck today, whether you like it or not."'
+			elseif booty_call['virgin_deny'] > 0:
+				'"I got tired of waiting," he says.'
+			else
+				'"Congratulations on becoming a woman," he says.'
+			end
+		else
+			'"Wait!" you yelp. "I''m a-"'
+			'Your protests cut off in a choked scream as <<$npc_firstname[$boy]>> rams his cock full force into you, stabbing it through your hymen and sending waves of agony through you.'
+			'"... virgin..." you whimper helplessly, tears running down your cheeks.'
+		end
+	elseif rand(1,10) > npc_sexdrive[$boy]:
+		$npc_apt_bedroom[$boy]
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virginity!"'
 			'"Sorry. I got caught up in the moment. I forgot."'
@@ -128,220 +181,77 @@ if $ARGS[0] = 'wait':
 			'"A girl can have fun while saving herself for marriage."'
 			'"Well what do you want to do instead?"'
 		end
-		know_virgin[$boy] = 1
 		gs'booty_call_start', 'foreplay_choose'
 	else
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virginity!"'
 		else
 			'"Wait!" you yelp. "I''m a virgin! You can''t!"'
 		end
 		gs'arousal', 'foreplay',-5
-		'He keeps moving anyways, running his hands up and down your body, trailing kisses along your neck.'
+		'<<$npc_firstname[$boy]>> can''t stop moving, rubbing his cock against your pussy lips.'
 		if npc_selfish[$boy] = 1:
 			'"Come on," he whispers. "I''m so fucking hard right now... Just let me fuck you already..."'
-		elseif npc_generous[$boy] = 1:
-			'"<<$pcs_nickname>>..." he whispers. "Please. I want you so bad. Can I? Can I be your first time?"'
+		elseif npc_gentle_lover[$boy] = 1 or npc_caretaker[$boy] = 1:
+			'"<<$pcs_nickname>>..." he whispers. "I want you so bad... Can I be your first time? Please?"'
 		else
 			'"Come on," he whispers. "Just lose it already. It''ll feel <i>really</i> good..."'
 		end
 		act'No way!':
+			booty_call['virgin_deny'] += 1
+			booty_call['no_sex'] = 1
 			cla & *clr
 			$npc_apt_bedroom[$boy]
-			'"No means no!" You snap your legs closed and turn your face away. "Take it for an answer already." '
+			'"No means no!" You snap your legs closed and turn your face away. "Take it for an answer already."'
 			'He pulls back with a sigh.'
 			gs'booty_call_virgin', 'change_mind'
 		end
 
 		act'Well...':
+			booty_call['orgasm'] = orgasm
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
 			'<i>Well...</i> You moan softly under his touch. It feels <i>so good.</i> What if... you just... let him...'
 			'<<$npc_firstname[$boy]>> gently pushes your legs open. You can feel his hardon rubbing right against your clit.'
 			act'Let <<$npc_firstname[$boy]>> take your virginity':
 				cla & *nl
-				'"Okay," you smile. "Just this once."'
-				if npc_condom_conscious[$boy] = 1:
-					booty_call['condom'] = 1
-					'He smiles back at your joke and grabs a condom off his nightstand, tearing open the packaging and rolling the rubber onto his cock. You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity'
-!!{					'He smiles back at your joke and reaches for a condom on his nightstand. '
-					act'Wait for him':
-
-					end
-
-					act'Ask him not to use the condom':
-
-					end}
+				'"Okay," you whisper. "Put it in."'
+				if npc_condom_conscious[$boy] > 0:
+					'<<$npc_firstname[$boy]>> grabs a condom off his nightstand.'
+					gs 'booty_call_condoms', 'virgin_condom1'
 				else
-					'With a wink, you spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
-				end
-				if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-					act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-				else
-					act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+					'You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+					gs'booty_call_virgin', 'miss_virg_start'
 				end
 			end
+			
+			gs 'booty_call_condoms', 'virgin_condom_ask1'
+		end
+	end
+end
 
-			act'Ask him to use a condom':
-				cla & *clr
-				$npc_apt_bedroom[$boy]
-				'"Okay," you smile. "But use a condom? Please?"'
-				if npc_condom_conscious[$boy] = 1:
-					'"Of course," he says, already tearing open a package. "I''m not an idiot you know."'
-					'He rolls it onto his cock and moves back in between your legs. Moments later, he takes your virginity.'
-					if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-						act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-					else
-						act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-					end
-				else
-					if npc_no_condoms[$boy] = 1:
-						'"Nah, fuck that rubber shit. I don''t use it."'
-						act'Then we''re not fucking':
-							cla & *clr
-							$npc_apt_bedroom[$boy]
-							'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
-							'"Don''t be such a bitch about it! Come on! Let''s just do this!"'
-							act'Let him pressure you':
-								cla & *nl
-								'Your conscience rails against you as he pushes you down onto the bed. You want to refuse him, you <i>want</i> to tell him no, but you don''t want to fight him either. You don''t want him to see you as a bitch, even if you know you''re right.'
-								*nl
-								'With an internal sigh of resignation and not a small amount of regret, you spread your legs, and moments later, he takes your virginity.'
-								*nl
-								'<i>Without</i> a condom.'
-								if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-									act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-								else
-									act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-								end
-							end
-							gs 'willpower', 'sex', 'resist', 'medium'
-							if will_cost <= pcs_willpwr:
-								act'Stand firm (<<will_cost>> Willpower)':
-									cla & *nl
-									'"Nuh uh. If there''s no condom, there''s no sex." He pulls back with a sigh.'
-									gs'booty_call_virgin', 'change_mind'
-								end
-							else
-								act'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-							end
-						end
-
-						act'Maybe it''s okay?':
-							cla & *nl
-							'<i>Well... Maybe it''s okay?</i> you rationalize. It''s your first time. If he doesn''t use condoms, maybe he knows better? You can always change your mind in the future. But it''s just once. What could go wrong?'
-							*nl
-							'You nod your head and lean back onto the bed. You spread your legs for him, and moments later, he takes your virginity.'
-							if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-								act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-							else
-								act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-							end
-						end
-
-!!{						act'What the fuck?!':
-							cla & *clr
-							$npc_apt_bedroom[$boy]
-							'"What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "You don''t use condoms?"'
-							'"No! Of course I don''t!" he says. "Condoms fucking suck. Can''t feel anything with one of those on."'
-							act'I can''t do this':
-
-							end
-						end}
-					else
-						if rand(1,2) = 2:
-							'<<$npc_firstname[$boy]>> nods and gets one out, tearing open the package and rolling the little rubber sleeve onto his cock. He moves back between your legs. Moments later, he takes your virginity.'
-							if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-								act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-							else
-								act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-							end
-						else
-							'"Come on," he says. "You really want to use a condom for your first time?"'
-							act'Maybe he has a point':
-								cla & *clr
-								$npc_apt_bedroom[$boy]
-								'Once again, the heady feeling of arousal becomes irresistable. You <i>ache</i> to feel him inside you and the thought of even a thin sleeve of rubber separating your cock from your pussy suddenly feels distasteful to you. It''s your first time. You want to feel <i>everything.</i>'
-								*nl
-								'"Okay," you smile. "Just this once."'
-								'You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
-								if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-									act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-								else
-									act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-								end
-							end
-
-							act'Hell yes I do (STD)':
-								cla & *nl
-								'"Uhh, <i>hell yes</i> I do," you say with a look of suspicion. "I''m not about to have sex for the first time and immediately get an STD."'
-								'"An STD? That''s what you''re afraid of? I''m clean! Obviously!"'
-								act'I don''t know that':
-									cla & *nl
-									'"I don''t know that!" you spit back. "Where''s the proof? You have a negative test on you? I''m not about to risk it just because you tell me to ''trust you.''"'
-									'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
-									booty_call['condom'] = 1
-									if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-										act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-									else
-										act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-									end
-								end
-
-								act'Trust him':
-									cla & *clr
-									$npc_apt_bedroom[$boy]
-									'"If you say so," you sigh. He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
-									if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-										act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-									else
-										act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-									end
-								end
-							end
-
-							if birth_control['think_safe'] = 0:
-								act'Hell yes I do (pregnancy)':
-									cla & *nl
-									'"Uhh, <i>hell yes</i> I do," you say with an obvious expression on your face. "I''m not risking getting pregnant. <i>Especially</i> on my first time!"'
-									'"That''s what you''re worried about? Come on, I''ll pull out. I promise."'
-									act'No way!':
-										cla & *nl
-										'"No fucking way!" you say. "I''m not just gonna trust you to pull out because you say you will! Even if you really mean it, anything could happen by accident. I''m not taking any chances!"'
-										'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
-										booty_call['condom'] = 1
-										if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-											act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-										else
-											act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-										end
-									end
-
-									act'Trust him':
-										cla & *clr
-										$npc_apt_bedroom[$boy]
-										'"If you say so," you sigh. "But you <i>absolutely cannot</i> cum inside me, alright?"'
-										'He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
-										booty_call['condom'] = 3
-										if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-											act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-										else
-											act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-										end
-									end
-								end
-							end
-						end
-					end
-				end
-			end
+if $ARGS[0] = 'safe_day_no_condoms1':
+	if stat['safe_day'] = 1:
+		act'It <i>is</i> a safe day...':
+			booty_call['safe_day'] = 1
+			cla & *nl
+			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
+		end
+	elseif stat['probably_safe_day'] = 1:
+		act'It''s <i>probably</i> a safe day...':
+			booty_call['probably_safe_day'] = 1
+			cla & *nl
+			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
 		end
 	end
 end
 
 if $ARGS[0] = 'his_choice':
 	booty_call['his_choice_virg'] = 1
-	if rand(0,1) = 1 or npc_generous[$boy] = 1:
+	gs'booty_call_sex', 'speed_select'
+	if booty_call['speed'] < 3 or npc_generous[$boy] = 1 or npc_caretaker[$boy] = 1:
 		if $npc_fav_pos[$boy] = 'missionary':
 			gt'booty_call_virgin', 'miss_virg_norm1'
 		elseif $npc_fav_pos[$boy] = 'doggy':
@@ -357,45 +267,48 @@ if $ARGS[0] = 'his_choice':
 		elseif $npc_fav_pos[$boy] = 'doggy':
 			gt'booty_call_virgin', 'doggy_virg_hard1'
 		else
-			gt'booty_call_virgin', 'miss_virg_nhard1'
+			gt'booty_call_virgin', 'miss_virg_hard1'
 		end
 	end
 end
 
 if $ARGS[0] = 'change_mind':
+	
 	if npc_selfish[$boy] = 1:
 		if booty_call['bj_count'] = 0:
-			'"Ugh! Fine. Then at least suck me off if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
-			act'Blow him':gs 'booty_call_start', 'bj_sub1'
+			'"At least suck me off if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
+		else
+			'"At least suck me off again if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
+		end
+		
+		act'Blow him':cla & gs 'booty_call_start', 'bj_sub1'
 
-			act'Grumble (but still do it)':
-				cla & *nl
-				booty_call['reluctant_bj'] = 1
-				'You grumble to yourself but lean forward anyways and take his dick into your mouth.'
-				act'Suck':gt 'booty_call_start', 'bj_sub1'
-			end
+		act'Grumble (but still do it)':
+			cla & *nl
+			booty_call['reluctant_bj'] = 1
+			'You grumble to yourself but lean forward anyways and take his dick into your mouth.'
+			act'Suck':gt 'booty_call_start', 'bj_sub1'
+		end
 
-			gs 'willpower', 'bj', 'resist', 'easy'
+!!{		gs 'willpower', 'bj', 'resist', 'easy'
 
-			if will_cost <= pcs_willpwr:
-				act'Can we 69?  (<<will_cost>> Willpower)':
-					cla & *nl
-					gs 'willpower', 'pay', 'self'
-					gs 'stat'
-					'"Can we at least sixty-nine? I really need some loving down there right now."'
-					'"I can get behind that," he grins, laying back.'
-					act'Climb over him':gs 'booty_call_start', '69_sub'
-				end
-			else
-				act'Can we 69? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		if will_cost <= pcs_willpwr:
+			act'Can we 69?  (<<will_cost>> Willpower)':
+				cla & *nl
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'"Can we at least sixty-nine? I really need some loving down there right now."'
+				'"I can get behind that," he grins, laying back.'
+				act'Climb over him':gs 'booty_call_start', '69_sub'
 			end
 		else
-
-		end
+			act'Can we 69? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end}
 	else
 		'"Okay, fine. What do you want to do instead then?"'
+		gs'booty_call_start', 'foreplay_choose'
 	end
-	gs'booty_call_start', 'foreplay_choose'
+	know_virgin[$boy] = 1
 end
 
 if $ARGS[0] = 'no_condom1':
@@ -432,10 +345,20 @@ if $ARGS[0] = 'no_condom2':
 
 end
 
+if $ARGS[0] = 'miss_virg_start':
+	gs'booty_call_sex', 'speed_select'
+	if booty_call['speed'] = 3 and (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1 or npc_likes_rough[$boy] = 1) and npc_caregiver[$boy] ! 1:
+		act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
+	else
+		act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+	end
+end
+
 if $ARGS[0] = 'miss_virg_norm1':
 	
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'miss'
@@ -493,7 +416,7 @@ if $ARGS[0] = 'miss_virg_kiss':
 	else
 		'Caught up in the moment, you reach up and grab <<$npc_firstname[$boy]>>''s face, pulling it down to kiss him. Your eyes roll back in your head, feeling the thrust of his cock in your pussy and the invasion of his tongue in your mouth. You moan into his mouth and he moans back.'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 
@@ -507,6 +430,7 @@ if $ARGS[0] = 'miss_virg_norm2':
 end
 
 if $ARGS[0] = 'miss_virg_hard1':
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
 	gs'arousal', 'vaginal',1,'rough', 'no_orgasm_msg'
@@ -539,18 +463,18 @@ if $ARGS[0] = 'miss_virg_hard1':
 			gs'stat'
 			cla & *nl
 			'You decided to give him your virginity and you don''t want to be a sour puss by trying to back out now. You grit your teeth and endure, spending every second hoping it will end soon.'
-			act'Continue':gs'booty_call_cum', 'fuck_cum'
+			act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 		end
 
 		act'Can we slow down?':
 			cla & *nl
 			'"Can we-! Slow down-! A little-?" you whimper under <<$npc_firstname[$boy]>>''s relentless pounding. "This is-! A bit-! Rough-!"'
-			if (rand(1,10) >= 7 or npc_selfish[$boy] = 1 or npc_abusive = 1) and npc_generous[$boy] ! 1:
+			if (rand(1,10) >= 7 or npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1) and npc_generous[$boy] ! 1:
 				$orgasm_or = 'no'
 				'"This is what sex is like," he grins. "You''ll get used to it soon, then it''ll feel really good."'
 				'He keeps fucking you roughly and you keep your teeth clenched. Despite his promises, that good feeling never comes and you spend the next few minutes in agony, waiting for it to end.'
 				!! booty_call['boy_cum'] = 2
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			else
 				booty_call['speed_change'] = 1
 				'"Oh! Sorry! I just... I thought it would make you feel good..."'
@@ -574,7 +498,7 @@ if $ARGS[0] = 'miss_virg_hard2':
 	else
 		'It''s your first time having sex, but it''s mindblowingly good. Why didn''t you do this sooner?!'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'miss_virg_hard2_2':
@@ -587,12 +511,14 @@ if $ARGS[0] = 'miss_virg_hard2_2':
 	*nl
 	'It hurts. But that makes it feel even better.'
 	*nl
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'doggy_virg_norm1':
 	!! booty_call['boy_cum'] = 2
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['virgin'] = 1
+	$booty_call['pos_speed'] = 'doggy1'
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'doggy'
@@ -626,7 +552,7 @@ if $ARGS[0] = 'doggy_virg_norm1.1':
 		act'Continue':
 			cla & *clr
 			booty_call['orgasm'] = orgasm
-			$booty_call['pos_speed'] = 'miss1'
+			$booty_call['pos_speed'] = 'doggy1'
 			gs'stat'
 			$booty_call['virgin_media'] = '<center><video autoplay loop src="images/shared/sex/vag/doggy/slow1.mp4"></video></center>'
 			$booty_call['virgin_media']
@@ -649,6 +575,7 @@ end
 if $ARGS[0] = 'doggy_virg_hard1':
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'doggy'
@@ -679,7 +606,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 			gs'stat'
 			cla & *nl
 			'The next few minutes pass by in a torturous blur. You have no idea how much time actually passes by, only that every second of it is filled with pain, tears, and prayer that it will end after the next thrust.'
-			act'Continue':gs'booty_call_cum', 'fuck_cum'
+			act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 		end
 
 		act'Can we slow down?':
@@ -690,7 +617,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 				'"This is what sex is like," he grins. "You''ll get used to it soon, then it''ll feel really good."'
 				'He keeps fucking you roughly and you keep your teeth clenched. Despite his promises, that good feeling never comes and you spend the next few minutes in agony, waiting for it to end.'
 				!! booty_call['boy_cum'] = 2
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			else
 				booty_call['speed_change'] = 1
 				'"Oh! Sorry! I just... I thought it would make you feel good..."'
@@ -714,7 +641,7 @@ if $ARGS[0] = 'doggy_virg_hard2':
 	else
 		'It''s your first time having sex, but it''s mindblowingly good. Why didn''t you do this sooner?!'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'doggy_virg_hard2_2':
@@ -727,12 +654,13 @@ if $ARGS[0] = 'doggy_virg_hard2_2':
 	*nl
 	'It hurts. But that makes it feel even better.'
 	*nl
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'cowgirl_virg_norm1':
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'cowgirl'
@@ -885,8 +813,10 @@ if $ARGS[0] = 'cowgirl_virg_hard1':
 	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
 	$booty_call['pos_speed'] = 'cowgirl2'
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med3.mp4"></video></center>'
-	'Feeling good, you pick up the pace, bouncing up and down on <<$npc_firstname[$boy]>>''s cock with giddy excitement. Going a little harder feels even better than before and without warning you begin bursting into giggles. Who knew that sex was so much fun???'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	'Feeling good, you pick up the pace, bouncing up and down on <<$npc_firstname[$boy]>>''s cock with giddy excitement. Going a little harder feels even better than before and without warning you begin bursting into giggles.'
+	*nl
+	'Who knew that sex was so much fun?'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'cowgirl_virg_hard2':
@@ -896,7 +826,7 @@ if $ARGS[0] = 'cowgirl_virg_hard2':
 	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard2.mp4"></video></center>'
 	'With no warning other than a sudden cry, you throw yourself down on <<$npc_firstname[$boy]>>''s cock with as much force as you can. The impact reverberates through you flaring both the pain and the pleasure inside of your cunt. You raise yourself up and impale yourself again and again and again until you''re riding him like a bucking stallion. Tears stream down your face and protracted groans of exertion escape from behind your teeth, clenched in a fierce grin. Your pussy hurts so much, and you never want this pain to end.'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'virg_continue_harder':
@@ -1131,7 +1061,7 @@ if $ARGS[0] = 'doggy_cum':
 		'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
 		'You orgasm in doggy style.'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 !!	gs'booty_call_virgin', 'virgin_continue'
 end
 
@@ -1139,7 +1069,7 @@ if $ARGS[0] = 'cowgirl_cum':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
 	'You orgasm in cowgirl.'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 !!	gs'booty_call_virgin', 'virgin_continue'
 end
 
@@ -1313,7 +1243,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 				else
 					'You spend the next several minutes fucking joyously, wondering why you waited so long to feel this good!'
 				end
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			end
 			if $booty_call['position'] ! 'cowgirl':
 				act'"Fuck me harder"':
@@ -1354,7 +1284,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 				else
 					'You spend the next several minutes fucking joyously, wondering why you waited so long to feel this good!'
 				end
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			end
 			if $booty_call['position'] ! 'cowgirl':
 				act'"Fuck me harder"':