Parcourir la source

[added/changed/fixed] birth control and creampie related dialogue options

hornguy6 il y a 5 mois
Parent
commit
914cc8cf5f

+ 37 - 2
locations/sex_ev_condoms.qsrc

@@ -70,13 +70,14 @@ if $ARGS[0] = 'condoms':
 				*nl
 				'<<$npc_firstname[$boy]>> makes no indication that he''s going to put on a condom.'
 				!!if npc_no_condoms[$boy] > 0 or npc_risktaker[$boy] = 1:
-				if npc_free_creampies[$boy] = 1:
+				if npc_free_creampies[$boy] = 1 or npc_creampie_permission[$boy] = 1:
 					gs 'sex_ev_condoms', 'safeday_check'
 				elseif (npc_risktaker[$boy] = 1 and $npc_cum_pref[$boy] ! 'creampie') or (npc_abusive[$boy] = 1 and npc_childfree[$boy] > 1 and $npc_cum_pref[$boy] = 'creampie'):
 					'"Don''t worry. I''ll pull out," he says.'
 					gs 'sex_ev_condoms', 'npc_pullout_game'
 					gs 'sex_ev_condoms', 'pc_dangerous_day'
 					gs 'sex_ev_condoms', 'lube_up1'
+					gs 'sex_ev_condoms', 'started_bc1'
 				else
 					gs 'sex_ev_condoms', 'pc_condom_ask'
 					gs 'sex_ev_condoms', 'pc_condoms'
@@ -85,6 +86,7 @@ if $ARGS[0] = 'condoms':
 					gs 'sex_ev_condoms', 'pc_dangerous_day'
 					gs 'sex_ev_condoms', 'already_creampie1'
 					gs 'sex_ev_condoms', 'lube_up1'
+					gs 'sex_ev_condoms', 'started_bc1'
 					if stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0: gs 'sex_ev_condoms', 'virgin_condom_ask1'
 				end
 			end
@@ -319,7 +321,7 @@ if $ARGS[0] = 'pc_condom_ask2':
 		else
 			'"Could you put on a condom?" you ask.'
 		end
-		if ($npc_cum_pref[$boy] = 'pullout' or npc_arrogant[$boy] > 0 or npc_abusive[$boy] > 0) and npc_condom_conscious[$boy] < 1:
+		if ($npc_cum_pref[$boy] = 'pullout' or npc_arrogant[$boy] > 0 or npc_abusive[$boy] > 0) and npc_condom_conscious[$boy] < 1 and npc_know_bc[$boy] = 0:
 			'"Don''t worry," <<$npc_firstname[$boy]>> says. "I''ve got pullout game."'
 			npc_pullout_game[$boy] = 1
 			gs 'sex_ev_condoms', 'npc_pullout_game'
@@ -2344,6 +2346,39 @@ if $ARGS[0] = 'already_creampie2':
 	end
 end
 
+if $ARGS[0] = 'started_bc1':
+	if birth_control['think_safe'] = 1:
+		act'No need to pull out (birth control)':
+			cla & *nl
+			npc_bareback[$boy] = 1
+			sex_ev['no_condom'] = 1
+			gs 'sex_ev_stats', 'birth_control_know'
+			if sex_ev['pullout_game'] = 1:
+				'"Why bother?" you ask in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
+			else
+				'"Don''t worry about pulling out," you say in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
+			end
+			'<<$npc_firstname[$boy]>>''s eyes light up.'
+			'"Come inside me as much as you want," you smirk.'
+			gs 'sex_ev_sex', 'position_choose'
+		end
+		
+		act'Don''t pull out (birth control)':
+			cla & *nl
+			npc_bareback[$boy] = 1
+			sex_ev['no_condom'] = 1
+			if sex_ev['pullout_game'] = 1:
+				'"You better not," you say in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
+			else
+				'"Don''t you dare pull out," you warn in a mischievous tone. ' + iif(tabletkishot > 0, '"I''m on the shot now."', '"I''m on the pill now."')
+			end
+			'<<$npc_firstname[$boy]>>''s eyes light up.'
+			'"Fill me with your cum," you whisper.'
+			gs 'sex_ev_sex', 'position_choose'
+		end
+	end
+end
+
 if $ARGS[0] = 'no_more_free_creampies1':
 	if npc_free_creampies[$boy] > 0:
 		act'About creampies':

+ 1 - 0
locations/sex_ev_pillow_talk.qsrc

@@ -118,6 +118,7 @@ if $ARGS[0] = 'cum_talk':
 	gs'sex_ev_pillow_talk', 'thank_no_creampie'
 	gs'sex_ev_pillow_talk', 'mess_for_maids'
 	if sex_ev['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_pillow_talk', 'free_creampies'
+	if sex_ev['pullout_count'] > 0 and sex_ev['creampie_count'] = 0 and npc_creampie_permission[$boy] = 0 and npc_free_creampies[$boy] < 1: gs'sex_ev_talk', 'creampie_permission1'
 end
 
 if $ARGS[0] = 'small_talk':

+ 3 - 1
locations/sex_ev_reactions.qsrc

@@ -466,6 +466,7 @@ if $ARGS[0] = 'pullout_react_menu':
 		gs'sex_ev_reactions', 'pullout_thanks'
 		gs'sex_ev_reactions', 'pullout_close'
 		gs'sex_ev_reactions', 'why_not_inside'
+		gs'sex_ev_talk', 'creampie_permission1'
 		gs'sex_ev_reactions', 'cum_already'
 	end
 end
@@ -516,7 +517,8 @@ if $ARGS[0] = 'pullout_close':
 end
 
 if $ARGS[0] = 'why_not_inside':
-	if sex_ev['no_condom'] = 1 and (sex_ev['promise_no_creampie'] ! 1 or sex_ev['creampie_allowance'] = 1) and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and sex_ev['last_cum'] = 'pullout':
+	!!if sex_ev['no_condom'] = 1 and (sex_ev['promise_no_creampie'] ! 1 or sex_ev['creampie_allowance'] = 1) and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and sex_ev['last_cum'] = 'pullout':
+	if sex_ev['no_condom'] = 1 and sex_ev['promise_no_creampie'] ! 1 and sex_ev['not_inside'] ! 1 and sex_ev['pullout_ask'] ! 1 and sex_ev['creampie_ask'] < 1 and sex_ev['last_cum'] = 'pullout':
 		act'Why didn''t you come inside me?':
 			cla & *clr
 			if $sex_ev['position'] = 'miss':

+ 43 - 8
locations/sex_ev_reactions_creampie.qsrc

@@ -506,13 +506,13 @@ if $ARGS[0] = 'creampie_ask_next_time':
 						end
 						if npc_free_creampies[$boy] = 2:
 							'"I thought you said I didn''t have to ask," <<$npc_firstname[$boy]>> says confusedly.'
-							'"Changed my mind. You need to start asking again."'
+							'"You still need to warn me," you scowl.'
 						elseif sex_ev['cum_wherever'] = 1:
 							'"You told me I could come wherever I wanted," he pants in return, smiling.'
 							'"You still need to warn me," you say, ' + iif(sex_ev['came_together'] > 0,'managing a slightly better glare this time, though it has an equally negligible effect.', 'letting your frown deepen into a scowl.')
 						elseif npc_know_bc[$boy] = 1:
 							'"You''re on birth control anyways aren''t you?"'
-							'"You still need to ask," you grumble, ' + iif(sex_ev['came_together'] > 0, 'managing a slightly better glare this time, though it has an equally negligible effect.', 'your frown deepening.')
+							'"You still need to ask," ' + iif(sex_ev['came_together'] > 0, 'managing to put on a proper scowl, though it has an equally negligible effect.', 'you scowl.')
 						else
 							'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
 						end
@@ -544,7 +544,17 @@ if $ARGS[0] = 'creampie_ask_next_time':
 						$sex_ev['ask_next_time'] = 'not_mad'
 						cla & *nl
 						'"I thought I told you to ask...?" you say.'
-						'"Sorry," he replies sheepishly.'
+						
+						if sex_ev['cum_wherever'] = 1:
+							'"You told me I could come wherever I wanted," he grins in return.'
+							'"You still need to warn me," you chide gently.'
+						elseif npc_know_bc[$boy] = 1:
+							'"You''re on birth control anyways aren''t you?"'
+							'"You still need to ask," you chide gently.'
+						else
+							'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+						end
+						
 						act'I liked it':
 							cla & *nl
 							'"It''s okay," you smile gently, cupping his face with your hand. "I liked it."'
@@ -557,6 +567,28 @@ if $ARGS[0] = 'creampie_ask_next_time':
 							gs'sex_ev_cum', 'what_now'
 						end
 					end
+					
+					act'I thought I told you to ask (annoyed)':
+						npc_ask_creampie[$boy] = 1
+						$sex_ev['ask_next_time'] = 'annoyed'
+						cla & *nl
+						if sex_ev['came_together'] > 0:
+							'"What happened... to asking...?" you pant, glaring at <<$npc_firstname[$boy]>> through your post orgasm haze.'
+						else
+							'"What happened to asking?" you scowl.'
+						end
+						
+						if sex_ev['cum_wherever'] = 1:
+							'"You told me I could come wherever I wanted," he grins in return.'
+							'"That doesn''t mean you can do it without permission!" you huff.'
+						elseif npc_know_bc[$boy] = 1:
+							'"You''re on birth control anyways aren''t you?"'
+							'"You still need to ask!" you huff.'
+						else
+							'"Sorry," <<$npc_firstname[$boy]>> mumbles, apparently exhausted from emptying his balls into you without permission.'
+						end
+						gs'sex_ev_sex', 'sex_end'
+					end
 				end
 			end
 		end
@@ -1738,6 +1770,8 @@ if $ARGS[0] = 'did_you_come_inside':
 				end
 			end
 			
+			gs'sex_ev_reactions_creampie', 'creampie_accident_birth_control'
+			
 			gs'sex_ev_reactions_creampie', 'first_creampie'
 			
 			gs'sex_ev_reactions_creampie', 'delayed_creampie_orgasm1'
@@ -2744,7 +2778,7 @@ if $ARGS[0] = 'have_plan_b2':
 end
 
 if $ARGS[0] = 'creampie_accident_birth_control':
-	if birth_control['think_safe'] = 1:
+	if birth_control['think_safe'] = 1 and npc_know_bc[$boy] = 0:
 		if tabletkishot > 0:
 			$sex_ev['bc_type'] = 'shot'
 		else
@@ -2754,13 +2788,14 @@ if $ARGS[0] = 'creampie_accident_birth_control':
 			gs'sex_ev_stats', 'birth_control_know'
 			npc_know_not_bc[$boy] = 0
 			cla & *nl
-			if sex_ev['condom'] = 1:
-				'"It''s okay." you reassure him. "I''m on the <<$sex_ev[''bc_type'']>>. I just like condoms for extra safety."'
-			else
+			if sex_ev['no_condom'] = 1:
 				'"It''s okay." you reassure him. "I''m on the <<$sex_ev[''bc_type'']>>."'
+			else
+				'"It''s okay." you reassure him. "I''m on the <<$sex_ev[''bc_type'']>>. I just like condoms for extra safety."'
 			end
 			'<<$npc_firstname[$boy]>> seems to relax, relieved that you''re not upset.'
-			gs'sex_ev_cum', 'what_now'
+			'"Does... does that mean I can come inside you in the future?"'
+			gs 'sex_ev_talk', 'creampie_permission2'
 		end
 	else
 		act'I''m on birth control (lie)':

+ 1 - 1
locations/sex_ev_stats.qsrc

@@ -46,7 +46,7 @@ if $ARGS[0] = 'starting_stats':
 		$npc_lovername[$boy] = 'babe'
 		$npc_lovername2[$boy] = 'baby'
 	end
-		
+	if npc_creampie_permission[$boy] = 1: sex_ev['creampie_allowance'] = 1
 end
 
 if $ARGS[0] = 'save_stats':

+ 223 - 14
locations/sex_ev_talk.qsrc

@@ -2,6 +2,13 @@
 
 !! this file is for "serious" conversations you can have during or after sex
 
+if $ARGS[0] = 'topic_exit':
+	if sex_ev['sex_over'] = 1:
+		gs'sex_ev_pillow_talk', 'topic_route'
+	else
+		gs'sex_ev_sex', 'sex_end'
+	end
+end
 
 if $ARGS[0] = 'boy_accidental_creampie':
 	sex_ev['accidental_creampie_convo'] = 1
@@ -519,7 +526,7 @@ if $ARGS[0] = 'free_creampies':
 					$sex_ev['temp_pic']
 					'"You don''t need to ask to come inside me y''know," you murmur. "Not <i>every</i> time. I''ll let you know when it''s a safe day," you smile gently. "And then you can come inside me as much as you want."'
 					'"Okay." <<$npc_firstname[$boy]>> smiles back, beaming at you.'
-					gs'sex_ev_talk', 'free_creampies_exit'
+					gs'sex_ev_talk', 'topic_exit'
 				end
 			end
 		end
@@ -578,7 +585,7 @@ if $ARGS[0] = 'free_creampies2':
 		else
 			'"Good to know," he smirks amusedly.'
 		end
-		gs'sex_ev_talk', 'free_creampies_exit'
+		gs'sex_ev_talk', 'topic_exit'
 	elseif (npc_selfish[$boy] = 1 or npc_know_bc[$boy] = 1) and (npc_childfree[$boy] ! 1 or npc_know_bc[$boy] = 1):
 		npc_free_creampies[$boy] = 2
 		if $npc_cum_pref[$boy] = 'creampie':
@@ -587,7 +594,7 @@ if $ARGS[0] = 'free_creampies2':
 		else
 			'"Good to know," he smirks amusedly.'
 		end
-		gs'sex_ev_talk', 'free_creampies_exit'
+		gs'sex_ev_talk', 'topic_exit'
 	else
 		if npc_childfree[$boy] = 1 and npc_know_bc[$boy] ! 1:
 			'"Are you sure...?" <<$npc_firstname[$boy]>> asks hesitantly. "You''re not worried you''re going to get pregnant? I''m... I''m not really up for having kids..."'
@@ -606,7 +613,7 @@ if $ARGS[0] = 'free_creampies2':
 				npc_free_creampies[$boy] = 2
 				'"Okay..." <<$npc_firstname[$boy]>> says hesitantly, but smiles back at you anyways.'
 			end
-			gs'sex_ev_talk', 'free_creampies_exit'
+			gs'sex_ev_talk', 'topic_exit'
 		end
 		
 		act'It feels good':
@@ -626,7 +633,7 @@ if $ARGS[0] = 'free_creampies2':
 				'<<$npc_firstname[$boy]>> hesitates for a moment before nodding slowly.'
 				'"Okay," he says, smiling. "I won''t ask anymore."'
 			end
-			gs'sex_ev_talk', 'free_creampies_exit'
+			gs'sex_ev_talk', 'topic_exit'
 		end
 		
 		act'I''ll tell you when it''s safe':
@@ -634,7 +641,7 @@ if $ARGS[0] = 'free_creampies2':
 			cla & *nl
 			'"I''ll let you know when it''s a safe day," you smile gently. "And then you can come inside me as much as you want."'
 			'"Okay." <<$npc_firstname[$boy]>> smiles back, beaming at you.'
-			gs'sex_ev_talk', 'free_creampies_exit'
+			gs'sex_ev_talk', 'topic_exit'
 		end
 		
 		if birth_control['think_safe'] = 1:
@@ -650,7 +657,7 @@ if $ARGS[0] = 'free_creampies2':
 					'"I''m on birth control," you smile gently. "So you can come inside me as much as you want."'
 				end
 				'"Okay." <<$npc_firstname[$boy]>> smiles back, beaming at you.'
-				gs'sex_ev_talk', 'free_creampies_exit'
+				gs'sex_ev_talk', 'topic_exit'
 			end
 		elseif pillcon2 >= 20000:
 			act'I''m on birth control':
@@ -664,7 +671,7 @@ if $ARGS[0] = 'free_creampies2':
 					'"I''m on birth control," you smile gently. "So you can come inside me as much as you want."'
 				end
 				'"Okay." <<$npc_firstname[$boy]>> smiles back, beaming at you.'
-				gs'sex_ev_talk', 'free_creampies_exit'
+				gs'sex_ev_talk', 'topic_exit'
 			end
 		else
 			act'I''m on birth control (lie)':
@@ -678,17 +685,219 @@ if $ARGS[0] = 'free_creampies2':
 					'"I''m on birth control," you lie with a seductively gentle smile. "So you can come inside me as much as you want."'
 				end
 				'"Okay." <<$npc_firstname[$boy]>> smiles back, beaming at you.'
-				gs'sex_ev_talk', 'free_creampies_exit'
+				gs'sex_ev_talk', 'topic_exit'
 			end
 		end		
 	end
 end
 
-if $ARGS[0] = 'free_creampies_exit':
-	if sex_ev['sex_over'] = 1:
-		gs'sex_ev_pillow_talk', 'topic_route'
-	else
-		gs'sex_ev_sex', 'sex_end'
+
+if $ARGS[0] = 'creampie_permission_code':
+	npc_creampie_permission[$boy] = 1
+	sex_ev['creampie_allowance'] = 1
+end
+
+if $ARGS[0] = 'creampie_permission1':
+	if npc_free_creampies < 1 and sex_ev['creampie_allowance'] = 0 and sex_ev['no_condom'] = 1:
+		act'"You can just come inside me" (free creampies)':
+			cla & *clr
+			if sex_ev['sex_over'] = 0:
+				if $sex_ev['position'] = 'miss':
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/4.jpg"></center>'
+				elseif $sex_ev['position'] = 'doggy':
+					'<center><img <<$set_imgh>> src="images/shared/sex/cum/pullout_doggy1.jpg"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/smile1.jpg"></center>'
+				end
+			else
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			end
+			'"You don''t have to pull out, you know that right?" you tell <<$npc_firstname[$boy]>>.'
+			if npc_abusive[$boy] > 0 and npc_childfree[$boy] < 1:
+				'"So you''re saying I can come inside you whenever I want?"'
+				gs 'sex_ev_talk', 'creampie_permission2'
+			elseif npc_know_not_bc[$boy] = 1:
+				'"But you''re not on birth control," he says.'
+				if birth_control['think_safe'] = 1:
+					act'I am now':
+						gs 'sex_ev_stats', 'birth_control_know'
+						cla & *nl
+						'"That was then," you reply. "This is now. And now I''m on ' + iif(tabletkishot > 0, 'the shot."', 'the pill."')
+						'"So you''re saying I can come inside you whenever I want?"'
+						gs 'sex_ev_talk', 'creampie_permission2'
+					end
+				else
+					act'So what?':
+						cla & *nl
+						'"So what?" you shrug carelessly, grinning. "I don''t see why that should stop you."'
+						if npc_childfree[$boy] > 0:
+							'"Because I don''t want kids?" he replies flatly. "Don''t be stupid."'
+							'"Ugh, you''re so uptight," you grumble.'
+							gs'sex_ev_talk', 'topic_exit'
+						elseif npc_risktaker[$boy] > 0:
+							npc_creampie_permission[$boy] = 2
+							sex_ev['creampie_allowance'] = 1
+							'"Well, if you want to roll the dice..." <<$npc_firstname[$boy]>> grins back.'
+							gs'sex_ev_talk', 'topic_exit'
+						else
+							'"I don''t know..." <<$npc_firstname[$boy]>> says, hesitating. "I don''t think it''s a good idea...'
+							'"Ugh, boo. You''re no fun."'
+							gs'sex_ev_talk', 'topic_exit'
+						end
+					end
+					
+					gs'sex_ev_talk', 'creampie_permission3'
+					
+					act'I am now (lie)':
+						gs 'sex_ev_stats', 'birth_control_know'
+						cla & *nl
+						'"That was then," you reply. "This is now. And now I''m on ' + iif(tabletkishot > 0, 'the shot."', 'the pill."')
+						'The lie comes easily.'
+						'"So you''re saying I can come inside you whenever I want?"'
+						gs 'sex_ev_talk', 'creampie_permission2'
+					end
+				end
+			elseif npc_childfree[$boy] > 0 and npc_know_bc[$boy] = 0:
+				pc_know_childfree[$boy] = 1
+				'"I don''t want you getting pregnant," he replies. "Not just for you, but for me too. I don''t want any kids of mine running around out there."'
+				if birth_control['think_safe'] = 1:
+					act'On birth control':
+						gs 'sex_ev_stats', 'birth_control_know'
+						cla & *nl
+						'"Don''t worry," you insist. "I''m on ' + iif(tabletkishot > 0, 'the shot. ', 'the pill. ') + 'I won''t get pregnant."'
+						'"So you''re saying I can come inside you whenever I want?"'
+						gs 'sex_ev_talk', 'creampie_permission2'
+					end
+				else
+					gs'sex_ev_talk', 'creampie_permission3'
+					
+					act'"I''m on birth control" (lie)':
+						gs 'sex_ev_stats', 'birth_control_know'
+						cla & *nl
+						'"Don''t worry," you insist. "I''m on ' + iif(tabletkishot > 0, 'the shot. ', 'the pill. ') + 'I won''t get pregnant."'
+						'The lie comes easily.'
+						'"So you''re saying I can come inside you whenever I want?"'
+						gs 'sex_ev_talk', 'creampie_permission2'
+					end
+				end
+			else
+				'"Wait, really?" he asks, surprised. "I can... come inside you?"'
+				if $npc_cum_pref[$boy] = 'creampie': '<<$npc_firstname[$boy]>> is visibly excited by the prospect.'
+				gs 'sex_ev_talk', 'creampie_permission2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'creampie_permission2':
+	act'"I don''t mind"':
+		npc_creampie_permission[$boy] = 2
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"I don''t mind," you smile. "Whatever you want to do, go for it."'
+		gs'sex_ev_talk', 'topic_exit'
+	end
+	
+	act'"Fill me up"':
+		npc_creampie_permission[$boy] = 2
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"<i>Fill me up,</i>" you whisper in reply.'
+		gs'sex_ev_talk', 'topic_exit'
+	end
+	
+	act'"Just warn me"':
+		npc_ask_creampie[$boy] = 1
+		npc_creampie_permission[$boy] = 2
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"Just warn me before you do," you chuckle in reply.'
+		gs'sex_ev_talk', 'topic_exit'
+	end
+	
+	act'Less mess':
+		npc_creampie_permission[$boy] = 2
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"It''s less mess," you grin. "Makes for an easy clean up."'
+		gs'sex_ev_talk', 'topic_exit'
+	end
+	
+	act'On safe days':
+		npc_creampie_permission[$boy] = 1
+		sex_ev['creampie_allowance'] = 1
+		cla & *nl
+		'"On safe days anyways," you smile. "I''ll let you know when."'
+		gs'sex_ev_talk', 'topic_exit'
+	end
+end
+
+if $ARGS[0] = 'creampie_permission3':
+	act'It''ll feel good':
+		cla & *nl
+		'"But it''ll feel good," you grin at him.'
+		if npc_childfree[$boy] > 0:
+			npc_rel[$boy] -= 1
+			'"That doesn''t matter," <<$npc_firstname[$boy]>> scowls. "I don''t want kids."'
+			'"Ugh, boo. You''re no fun."'
+			gs'sex_ev_talk', 'topic_exit'
+		elseif $npc_cum_pref[$boy] = 'creampie':
+			npc_creampie_permission[$boy] = 2
+			sex_ev['creampie_allowance'] = 1
+			'"You make a good point," <<$npc_firstname[$boy]>> grins back.'
+			gs'sex_ev_talk', 'topic_exit'
+		else
+			'"I don''t know..." <<$npc_firstname[$boy]>> says, hesitating. "I don''t think it''s a good idea...'
+			'"Ugh, boo. You''re no fun."'
+			gs'sex_ev_talk', 'topic_exit'
+		end
+	end
+	
+	if stat['safe_day'] = 1:
+		act'It''s safe right now':
+			sex_ev['safe_day'] = 1
+			cla & *nl
+			'"But it''s safe right now," you reassure him. "I won''t get pregnant if you come inside me now."'
+			'"So you''ll tell me when it''s safe for me to come inside you?"'
+			'"Yup."'
+			if npc_childfree[$boy] > 0 and rand(1,100) > npc_rel[$boy]:
+				'<<$npc_firstname[$boy]>> hesitates for a moment and then shakes his head.'
+				'"No way. I don''t want to take the risk."'
+				'"Ugh, boo. You''re no fun."'
+				gs'sex_ev_talk', 'topic_exit'
+			else
+				npc_creampie_permission[$boy] = 1
+				sex_ev['creampie_allowance'] = 1
+				'"Well if it''s safe..." <<$npc_firstname[$boy]>> smiles.'
+				gs'sex_ev_talk', 'topic_exit'
+			end
+		end
+	end
+	
+	if stat['probably_safe_day'] = 1:
+		act'It''s safe right now':
+			sex_ev['probably_safe_day'] = 1
+			cla & *nl
+			'"But it''s safe right now," you reassure him. "Well, it should be anyways. I won''t get pregnant if you come inside me now."'
+			if npc_childfree[$boy] > 0:
+				'"<i>Should</i> be?" <<$npc_firstname[$boy]>> asks pointedly.'
+				'"Yeah," you insist. "It''s not a fertile part of my cycle.'
+			else
+				'"So you''ll tell me when it''s safe for me to come inside you?"'
+				'"Yup."'
+			end
+			if npc_childfree[$boy] > 0 and rand(1,100) > npc_rel[$boy]:
+				'<<$npc_firstname[$boy]>> hesitates for a moment and then shakes his head.'
+				'"No way. I don''t want to take the risk."'
+				'"Ugh, boo. You''re no fun."'
+				gs'sex_ev_talk', 'topic_exit'
+			else
+				npc_creampie_permission[$boy] = 1
+				sex_ev['creampie_allowance'] = 1
+				'"Well if it''s safe..." <<$npc_firstname[$boy]>> smiles.'
+				gs'sex_ev_talk', 'topic_exit'
+			end
+		end
 	end
 end