glife/locations/sex_ev_after.qsrc

# sex_ev_after

if $ARGS[0] = 'quit':
	if $sex_ev['loc'] ! 'pc_home':
		act'Leave in anger':
			cla & *clr
			$sex_ev['bed_room']
			'"You know what? <i>Fuck you!</i>"'
			'You leap off the bed in a huff and start grabbing your things and throwing your clothes on.'
			!! if npc_abusive[$boy] > 0 and rand(1,10) > number:
			!! get raped
			!! else
			!!	'<<$npc_firstname[$boy]>> glares daggers at you the whole time but you don''t care and the moment you have all your clothes on, you stalk out the door, giving him the finger as you slam it behind you.'
			act'Slam the door':
				cla & *nl
				'The moment you''re fully dressed, you stalk out the door, giving <<$npc_firstname[$boy]>> the finger as you slam it behind you.'
				act'Leave':gt'sex_ev_leave', 'exit'
			end
			
			act'Give him the finger':
				cla & *nl
				'The moment you''re fully dressed, you stalk out the door, giving <<$npc_firstname[$boy]>> the finger as you slam it behind you.'
				act'Leave':gt'sex_ev_leave', 'exit'
			end
			
			if $sex_ev['type'] ! 'hookup':
				act'We''re through':
					cla & *nl
					'"We''re through," you sneer. The moment you''re fully dressed, you stalk out the door, shouting over your shoulder, "Don''t fucking call me again!"'
					gs'sex_ev_leave', 'break_up'
				end
			end
			!!end
		end
	else
		act'Kick <<$npc_firstname[$boy]>> out':
			cla & *clr
			$sex_ev['bed_room']
			'"You know what, <<$npc_firstname[$boy]>>? <i>Fuck you!</i>" You shove <<$npc_firstname[$boy]>> out of your bed. "Get the fuck out! We''re done here!"'
			!! if npc_abusive[$boy] > 0 and rand(1,10) > number:
			!! get raped
			!! else
			!!	'You glare daggers at him as he gets dressed and he glares right back. The moment he''s done, he stalks out the door and slams it behind him.'
				'You glare daggers at him as he gets dressed. The moment he''s done, you practically shove him out the door.'
				act'Leave':gt'sex_ev_leave', 'exit'
			!!end
		end
	end
end

if $ARGS[0] = 'quit2':
	sex_ev['annoyed'] = 1
	*nl
	'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
		if $sex_ev['loc'] = 'pc_home':
			'<<$npc_firstname[$boy]>> grabs his cigarettes from the pockets of his discarded clothing and lights up, puffing away at it in annoyance.'
		elseif $sex_ev['loc'] = 'npc_home':
			'<<$npc_firstname[$boy]>> grabs his cigarettes from his nightstand and lights up, puffing away at it in annoyance.'
		else
			'<<$npc_firstname[$boy]>> grabs his cigarettes from the nightstand and lights up, puffing away at it in annoyance.'
		end
	end
	gs'sex_ev_after', 'after_sex2'
end

if $ARGS[0] = 'stop_here':
	act'Ask to stop':
		cla
		act'Go back': cla & gs 'sex_ev_sex', 'sex_end'
		if sex_ev['sleep_fuck'] > 0:
			act'Confirm':
				cla & *clr
				$sex_ev['bed_room']
				'"Satisfied?" you ask sleepily.'
				gs'sex_ev_after', 'stop_here2'
			end
		elseif sex_ev['blowjob_continue_ask'] = 1:
			act'Confirm':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
				'"There, happy now?" you ask, playing with his cock.'
				gs'sex_ev_after', 'stop_here2'
			end
		else
			act'Confirm':
				cla
				gs'sex_ev_after', 'stop_here_menu'
			end
		end
!!		gs'sex_ev_after', 'stop_here2'
!!		gs'sex_ev_after', 'after_sex2'
	end
end

if $ARGS[0] = 'stop_here_menu':
	if sex_ev['force_harden'] > 0 or sex_ev['not_done'] = 1:
		act'Now I''m done':
			cla & *clr
			gs 'sex_ev_sex', 'inserted_img'
			'"<i>Now</i> I''m done," you grin, having squeezed every orgasm you could out of <<$npc_firstname[$boy]>>.'
			gs'sex_ev_after', 'finish_sex'
		end
	else
		act'You good to stop here?':
			if sex_ev['keep_going_continue'] > 0:
				cla & *clr
				gs 'sex_ev_sex', 'inserted_img'
				'"Is that good enough for you now?" you ask.'
			elseif sex_ev['first_break'] = 1:
				cla & *nl
				'"Actually," you say. "I''m happy if we just to finish here. How about you?"'
			else
				cla & *clr
				gs 'sex_ev_sex', 'inserted_img'
				'"I think I''m good here," you say. "How about you?"'
			end
			gs'sex_ev_after', 'stop_here2'
		end
		
		act'I''m shattered':
			cla & *clr
			gs 'sex_ev_sex', 'inserted_img'
			if sex_ev['consecutive_orgasm'] = 1:
				'"Can we... stop here...?" you pant tiredly. "That last orgasm really took it out of me. I''m shattered..."'
			elseif sex_ev['consecutive_orgasm'] > 1:
				'"Can we... stop here...?" you pant tiredly. "You made me come so many times in a row... I''m shattered..."'
			else
				'"Can we... stop here...?" you pant tiredly. "I''m absolutely shattered..."'
			end
			gs'sex_ev_after', 'stop_here2'
		end
	end
	if $sex_ev['loc'] = 'house_party':
		act'Should get back to the party':
			cla & *clr
			sex_ev['back_to_party'] = 1
			gs 'sex_ev_sex', 'inserted_img'
			'"Good to stop here?" you ask. "We should probably get back to the party soon."'
			gs'sex_ev_after', 'stop_here2'
		end
	else
		act'Need to get going':
			cla & *clr
			gs 'sex_ev_sex', 'inserted_img'
			'"You mind if we stop here?" you ask. "I need to get going soon."'
			gs'sex_ev_after', 'stop_here2'
		end
	end
	
	gs'sex_ev_pillow_talk2', 'wakeup_sex_late_for_school'
end

if $ARGS[0] = 'stop_here2':
	sex_ev['finish_ask'] = 1
	if (totminut > sex_ev['start_time'] + 60 and sex_ev['cum_count'] > 0) or sex_ev['cum_count'] >= 5 + sex_ev['extra_cum']:
		gs'sex_ev_after', 'finish_sex'
	elseif $sex_ev['loc'] = 'house_party':
		if sex_ev['back_to_party'] = 0:
			'"Yeah," he nods. "We should probably get back to the party soon."'
		else
			'"Yeah," he nods. "Probably should."'
		end
		gs'sex_ev_after', 'finish_sex'
	elseif rand(1,10) >= npc_sexdrive[$boy] and sex_ev['blowjob_continue_ask'] ! 1 and sex_ev['cum_count'] < 5:
		if sex_ev['npc_late_work'] = 1:
			gs'sex_ev_after', 'finish_sex'
		elseif sex_ev['keep_going_continue'] > 0 and npc_caretaker[$boy] = 1:
			gs'sex_ev_after', 'finish_sex'
		elseif sex_ev['keep_going_continue'] > 0:
			'"Just a couple more times?" <<$npc_firstname[$boy]>> begs. "I still want to get off a few more times with you."'
			gs'sex_ev_after', 'ask_continue_options'
		elseif npc_abusive[$boy] = 1 or npc_selfish[$boy] = 1 or (npc_caretaker[$boy] ! 1 and rand(1,3)):
			'"You''re done already?" <<$npc_firstname[$boy]>> complains. "I still want to get off a few more times with you."'
			gs'sex_ev_after', 'ask_continue_options'
!!{		elseif sex_ev['cum_count'] = 0:
			sex_ev['ask_to_cum_once'] = 1
			if $sex_ev['position'] = 'miss' or $sex_ev['position'] = 'doggy' or $sex_ev['position'] = 'cowgirl':
				'"Can I just come real quick?" <<$npc_firstname[$boy]>> asks. "I''m really close."'
			else
				
			end}
		elseif npc_caretaker[$boy] = 1 and sex_ev['orgasm_count'] = 0:
			'"Are you sure?" <<$npc_firstname[$boy]>> asks. "You haven''t gotten to come yet."'
			gs'sex_ev_after', 'ask_continue_options'
		elseif npc_caretaker[$boy] = 1:
			'"I was actually hoping to go a few more times. But if you want to stop, that''s all right." <<$npc_firstname[$boy]>> gives you a gentle smile.'
			gs'sex_ev_after', 'ask_continue_options'
			
		end
		
	else
		gs'sex_ev_after', 'finish_sex'
	end
end

if $ARGS[0] = 'ask_continue_options':
	act'I can''t keep going':
		cla & *nl
!!		if sex_ev['fuck_count'] > 0:
			
		if npc_caretaker[$boy] = 1:
			if sex_ev['orgasm_count'] = 0:
			
			else
				'"I''m sorry <<$npc_firstname[$boy]>>," you say, rubbing his arm, genuinely apologetic. "But I just can''t keep up with your sex drive. I''m all tapped out. Maybe next time?"'
			end
			'<<$npc_firstname[$boy]>> smiles wistfully at you but also doesn''t seem very put off.'
			'"I guess it''s fine..."'
			gs'sex_ev_after', 'after_sex1'
		else
			'"I''m sorry <<$npc_firstname[$boy]>>," you say, rubbing his arm, genuinely apologetic. "But I just can''t keep up with your sex drive. I''m all tapped out. Maybe next time?"'
			if sex_ev['cum_count'] < npc_sexdrive[$boy] - 5:
				if rand(0,1) = 1:
					'"Come on, please? Just one more time?"'
					act'Not happening':
						sex_ev['blue_ball'] = 1
						cla & *nl
						'"Sorry," you shake your head. "But I just can''t."'
						gs'sex_ev_after', 'after_sex1'
					end
				else
					'"Can I at least get a blowjob?"'
					sex_ev['blowjob_continue_ask'] = 1
					act'Not happening':
						sex_ev['blue_ball'] = 1
						cla & *nl
						'"Sorry," you shake your head. "But I just can''t."'
						gs'sex_ev_after', 'after_sex1'
					end
					gs 'sex_ev_foreplay', 'bj_ask2'
				end
			else
				'<<$npc_firstname[$boy]>> seems really disappointed, almost upset.'
				sex_ev['blue_ball'] = 1
				gs'sex_ev_after', 'after_sex1'
			end
		end
	end
	
	gs'sex_ev_after', 'well_continue'

	act'I don''t have time':
		cla & *nl
		sex_ev['no_time'] += 1
		if sex_ev['keep_going_continue'] >= 1:
			'"Seriously <<$npc_firstname[$boy]>>," you say. "I can''t. You''re gonna make me late."'
		else
			'"I wish I could, but I don''t have time <<$npc_firstname[$boy]>>," you shake your head. "I really need to get going soon."'
		end
		if npc_caretaker[$boy] = 1:
			'"Well, I don''t want to make you late," he says softly.'
		else
			if sex_ev['cum_count'] < npc_sexdrive[$boy] - 5:
				'"Come on, please? Just a couple more times?"'
			else
				'<<$npc_firstname[$boy]>> seems really disappointed, almost upset.'
			end
		end
		gs'sex_ev_after', 'after_sex1'
		gs'sex_ev_after', 'well_continue'
	end
	
	if mid($start_type,1,2) = 'sg' and (hour >= 22 or hour < 3) and $sex_ev['loc'] ! 'pc_home':
		act'Mom will kill me':
			cla & *nl
			sex_ev['mom_kill'] += 1
			sex_ev['blue_ball'] = 1
			if sex_ev['keep_going_continue'] >= 1:
				if hour < 3:
					'"Seriously <<$npc_firstname[$boy]>>," you say. "I can''t. My mom is already going to kill me for staying out past curfew."'
				else
					'"Seriously <<$npc_firstname[$boy]>>," you say. "I can''t. I need to get home soon or my mom will kill me."'
				end
			else
				'"I wish I could, but I need to get home <<$npc_firstname[$boy]>>," you shake your head. "My mom will kill me if I''m not back before midnight."'
			end
			
			if npc_caretaker[$boy] = 1:
				'"Well, I guess there''s always next time," he says softly.'
				gs'sex_ev_after', 'after_sex1'
			else
				if sex_ev['cum_count'] < npc_sexdrive[$boy] - 5:
					'"Come on, please? Just a couple more times?"'
					gs'sex_ev_after', 'after_sex1'
					gs'sex_ev_after', 'well_continue'
				else
					sex_ev['blue_ball'] = 1
					'"Your mom''s a bitch, you know that?" <<$npc_firstname[$boy]>> grumbles, pulling away.'
					act'Tell me about it':
						cla & *nl
						'"Tell me about it," you roll your eyes. "At least you don''t have to live with her."'
						gs'sex_ev_after', 'after_sex1'
					end
					
					act'Don''t talk about my mom like that':
						cla & *nl
						'"Hey!" you growl. "Don''t talk about my mom like that!"'
						'"But she-"'
						'"She''s still my mom, asshole!"'
						gs'sex_ev_after', 'after_sex1'
					end
				end
			end
		end
	end
	
	if sex_ev['fuck_count'] > 3:
		act'Sore pussy':
			cla & *nl
			sex_ev['sore_pussy'] = 1
			sex_ev['blue_ball'] = 1
			'"My pussy is so sore," you say, rubbing his arm, feeling genuinely apologetic. "You''re gonna fuck me to death if we keep going."'
			if npc_caretaker[$boy] = 1:
				'<<$npc_firstname[$boy]>> smiles apologetically at you.'
				'"Oh. Sorry about that..."'
				gs'sex_ev_after', 'after_sex1'
			elseif npc_selfish[$boy] = 1 and sex_ev['cum_count'] < npc_sexdrive[$boy] - 5:
				'"Come on, please? Just a couple more times?"'
				gs'sex_ev_after', 'after_sex1'
				gs'sex_ev_after', 'well_continue'
			else
				'<<$npc_firstname[$boy]>> seems really disappointed, almost upset.'
				gs'sex_ev_after', 'after_sex1'
			end
		end
	end
end

if $ARGS[0] = 'well_continue':
	act'Well...':
		sex_ev['blue_ball'] = 0
		cla
		if sex_ev['ask_to_cum_once'] = 1:
			act'Let him finish':
				cla & *nl
				'"Okay," you say softly. '
			end
		else
			act'We can''t have that':
				cla & *nl
				'"Well, we can''t have you going unsatisfied now can we?" you say with a teasing smile.'
				sex_ev['keep_going_continue'] += 1
				gs'sex_ev_after', 'well_continue2'
			end
			
			act'I have a <i>little</i> more time':
				cla & *nl
				'"Well... I guess I might be able to keep going a <i>little</i> longer," you say with a soft smile.'
				gs'sex_ev_after', 'well_continue2'
			end
			if sex_ev['no_time'] = 0:
				act'I can be late':
					cla & *nl
					'"Well... Maybe I could be a <i>little</i> late..." you say with a soft smile.'
					gs'sex_ev_after', 'well_continue2'
				end
			end
		end
	end
end

if $ARGS[0] = 'well_continue2':
	sex_ev['keep_going_continue'] += 1
	gs'sex_ev_sex', 'reset'
	act'Let him lead':cla & gs 'sex_ev_sex', 'he_choose_position'
	act'Foreplay':cla & gs 'sex_ev_foreplay', 'foreplay_choose'
	act'Sex':
		cla
		if sex_ev['no_condom'] ! 1:
			gs 'sex_ev_condoms', 'condoms'
		else
			gs 'sex_ev_sex', 'position_choose'
		end
	end
	gs'sex_ev_sex', 'keep_fucking_act'
end

if $ARGS[0] = 'tap_out':
	if sex_ev['fuck_count'] > 0:
		if $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster' and ($sex_ev['position'] = 'miss' or $sex_ev['position'] = 'doggy' or $sex_ev['position'] = 'cowgirl'):
			act'Tap out (too big)':
				gs 'pain', 4, 'cervix', 'ache'
				gs 'pain', 4, 'vaginal', 'stretch'
				sex_ev['tap_out'] = 1
				sex_ev['sore_pussy'] = 1
				cla & *clr
				$sex_ev['bed_room']
				if sex_ev['cock_inserted'] = 0:
					'"I can''t keep this up..." you pant breathlessly. "You''re just too big for me... I can''t keep going..."'
				else
					'"I can''t keep this up..." you pant, wincing at the pain of <<$npc_firstname[$boy]>>''s large cock stretching your pussy past its limits. "You''re too big for me... I just... I can''t keep going..."'
				end
				
				if npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1:
					'"Come on, don''t be like that," <<$npc_firstname[$boy]>> moans. "You just need to get used to it. Don''t pussy out now."'
					act'I can''t':
						cla & *nl
						npc_dick_too_big[$boy] = 1
						'"I just can''t," you shake your head, legs tightening over your sore lady bits. "My pussy hurts so much, I can''t handle your cock inside me again."'
						'"Ugh," <<$npc_firstname[$boy]>> says rolling his eyes. "Way to be a little bitch about it. Never going to learn to enjoy my big cock unless you practice."'
						gs'sex_ev_after', 'after_sex1'
					end
					
					act'Force yourself to keep going':
						cla & *nl
						sex_ev['tap_out'] = 2
						if sex_ev['cock_inserted'] = 0:
							'"I can''t believe I''m letting you talk me into this..." you grimace, rubbing your thighs together over your sore pussy. "Okay, keep going..."'
						else
							'"I can''t believe I''m letting you talk me into this..."  you grimace, wincing again as you adjust your hips around <<$npc_firstname[$boy]>>''s cock. "Okay, keep going..."'
						end
						if sex_ev['boy_cum'] >= 1:
							gs'sex_ev_sex', 'reset'
							sex_ev['must_fuck'] = 1
							act'Let him lead':cla & gs 'sex_ev_sex', 'he_choose_position'
							gs'sex_ev_sex', 'position_choose'
						else
							gs'sex_ev_sex', 'keep_fucking_act'
						end
					end
					
					act'Ask for a break':
						cla & *nl
						'"Can''t we just do something else?" you beg. "Just for a little bit? Give my pussy a break?"'
						'"That doesn''t sound so bad. What were you thinking?"'
						gs 'sex_ev_foreplay', 'foreplay_choose'
					end
				else
					if npc_caretaker[$boy] = 1:
						npc_dick_too_big[$boy] = 1
						'"Sorry," <<$npc_firstname[$boy]>> says, looking truly apologetic. "I know it''s not easy for girls to handle. We can try again another time."'
						act'Thanks':
							cla & *nl
							'"Thanks," you say, smiling gratefully at him. "Yeah... maybe another time..."'
							gs'sex_ev_after', 'after_sex1'
						end
						
						act'Don''t be sorry':
							cla & *nl
							'"Don''t be sorry," you say, shaking your head. "It''s not your fault you''ve got such a big dick. Maybe it''s my fault for having too small a pussy."'
							'You give him a little smile which he returns.'
							gs'sex_ev_after', 'after_sex1'
						end
					else
						npc_dick_too_big[$boy] = 1
						'"Damn, my dick''s too big for you?" <<$npc_firstname[$boy]>> asks, smiling smugly when you return an exhausted nod. "Just one of those big dick problems I guess. Okay we''ll try again later."'
						'He laughs aloud, not seeming to care much that your pussy is sore beyond belief.'
						act'Finish sex':gs'sex_ev_after', 'after_sex1'
					end
					
					act'Blow him for a little bit':
						cla & *nl
						'"I just need a little break," you smile gratefully. "Maybe I can blow you for a little bit and then come back to it?"'
						'"That sounds great," <<$npc_firstname[$boy]>> smiles back.'
						act'Blow him':gt 'sex_ev_foreplay', 'bj_sub1'
					end
					
					act'We can do other stuff':
						cla & *nl
						sex_ev['no_sex'] = 1
						'"We don''t have to stop," you smile. "My pussy can''t take your cock anymore, but we can still do other stuff."'
						'"Like what?" <<$npc_firstname[$boy]>> smiles back.'
						if sex_ev['boy_cum'] >= 1: gs'sex_ev_sex', 'reset'
						gs 'sex_ev_foreplay', 'foreplay_choose'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'stop_hurry1':
	act'"You good?"':
		cla & *clr
		gs 'sex_ev_sex', 'inserted_img'
		'"You good?" you ask <<$npc_firstname[$boy]>>.'
		if sex_ev['cum_count'] < npc_sexdrive[$boy] - rand(1,3) and sex_ev['cum_count'] < 5:
			'"Good enough for now, I guess," he pants. "You gotta go, right?"'
			'"Yeah," you say wistfully. "Sorry. And thanks."'
		else
			'"Yeah, I''m good," he sighs with satisfaction.'
		end
		act'Pull apart': gs'sex_ev_after', 'stop_hurry2'
	end
	
	if sex_ev['fuck_enjoyment'] < 1:
		
	end
end

if $ARGS[0] = 'stop_hurry2':
	cla & *clr
	if sex_ev['cock_inserted'] = 1:
		gs 'sex_ev_after', 'pull_apart'
	else
		$sex_ev['bed_room']
	end
	gs 'sex_ev_after', 'after_sex2'
end

if $ARGS[0] = 'fucked_out':
	cla & *clr
	sex_ev['fucked_out'] += 1
	$sex_ev['bed_room']
	if sex_ev['fucked_out'] > 1:
		cla & *clr
		$sex_ev['bed_room']
		'"I really can''t... keep going... <<$npc_firstname[$boy]>> huffs exhaustedly.'
	else
		if sex_ev['fuck_again'] = 1:
			'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
		elseif sex_ev['cock_inserted'] = 1:
			'"Wanna keep going?" you eagerly ask, flexing your pussy around <<$npc_firstname[$boy]>>''s cock.'
		else
			'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
		end
		'"I don''t think I can..." he groans.'
		if sex_ev['cock_inserted'] = 0:
			'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 <<$npc_firstname[$boy]>> is getting <i>softer</i>, not harder, inside you.'
		end
		'"I think I might be all fucked out for the day..."'
	end
	act'Ugh':
		cla & *clr
		$sex_ev['end_comment'] = '"Ugh..." you groan with a roll of your eyes.'
		if sex_ev['cock_inserted'] = 0:
			$sex_ev['bed_room']
			$sex_ev['end_comment']
			gs'sex_ev_after', 'after_sex1'
		else
			gs'sex_ev_after', 'pull_apart'
			gs'sex_ev_after', 'after_sex2'
		end
	end
	
	act'Sigh':
		cla & *clr
		$sex_ev['end_comment'] = 'You sigh in disappointment.'
		if sex_ev['cock_inserted'] = 0:
			$sex_ev['bed_room']
			$sex_ev['end_comment']
			gs'sex_ev_after', 'after_sex1'
		else
			gs'sex_ev_after', 'pull_apart'
			gs'sex_ev_after', 'after_sex2'
		end
	end
	
	act'Laugh':
		cla & *clr
		if sex_ev['fuck_count'] > 0:
			$sex_ev['end_comment'] = '"Oops," you giggle. "Guess I fucked you too hard."'
		else
			$sex_ev['end_comment'] = '"Oops," you giggle. "Guess that''s my fault."'
		end
		if sex_ev['cock_inserted'] = 0:
			$sex_ev['bed_room']
			$sex_ev['end_comment']
			gs'sex_ev_after', 'after_sex1'
		else
			gs'sex_ev_after', 'pull_apart'
			gs'sex_ev_after', 'after_sex2'
		end
	end
	if sex_ev['force_harden'] = 0:
		act'No you''re not':
			cla
			sex_ev['force_harden'] = 1
			sex_ev['not_done'] = 1
			sex_ev['extra_cum'] += 1
			gs'sex_ev_sex', 'harden_hand'
			gs'sex_ev_sex', 'harden_mouth'
		end
	end
	if sex_ev['cum_count'] < 3:
		act'"Seriously?"':
			cla & *clr
			if sex_ev['orgasm_count'] < 1:
				$sex_ev['bed_room']
				'"Seriously?" you scoff. "You''re already done? I didn''t even get to come!"'
			else
				'"Seriously?" you scoff. "You''re already done?"'
			end
			gs'sex_ev_after', 'after_sex1'
		end
	end
end

if $ARGS[0] = 'no_condom_end':
	act'End here?':
		cla & *clr
		$sex_ev['bed_room']
		if sex_ev['fuck_count'] = 0:
			'"I guess we shouldn''t fuck today..."'
		else
			'"I guess that''s a sign we should stop..."'
		end
		if rand(1,10) < npc_sexdrive[$boy]:
			if sex_ev['cum_count'] >= 5 + sex_ev['extra_cum']:
				'"I think I''m all fucked out anyways," <<$npc_firstname[$boy]>> sighs limply.'
				gs'sex_ev_after', 'after_sex1'
			elseif sex_ev['condoms_used'] < sex_ev['condom_count']:
				'"I have a few," <<$npc_firstname[$boy]>> says, reaching for another one."'
				gs'sex_ev_condoms', 'npc_condom_use_stats'
				gs'sex_ev_sex', 'reset'
				act'Let him lead':cla & gs 'sex_ev_sex', 'he_choose_position'
				act'Sex':cla & gs'sex_ev_sex', 'position_choose'
			elseif sex_ev['fuck_count'] = 0 and sex_ev['cum_count'] < 1:
				'"Well this was fucking bullshit," <<$npc_firstname[$boy]>> grumbles.'
				gs'sex_ev_after', 'after_sex1'
			else
				'"Yeah, I think so too," <<$npc_firstname[$boy]>> says.'
				gs'sex_ev_after', 'after_sex1'
			end
		else
			'"I think I''m all fucked out anyways," <<$npc_firstname[$boy]>> sighs limply.'
			gs'sex_ev_after', 'after_sex1'
		end
	end
end

if $ARGS[0] = 'his_wipes':
!!	if cum_loc['vagina'] > 0 or cum_loc['anus'] > 0 or cum_loc['butt'] > 0 or cum_loc['back'] > 0 or cum_loc['face'] > 0 or cum_loc['hands'] > 0 or cum_loc['stomach'] > 0 or cum_loc['tits'] > 0 or cum_loc['hair'] > 0:
	if $stat_cum_msg ! '' and $sex_ev['loc'] ! 'pc_home':
		act'Clean up':
			if hypnoAddict > 0:
				cumspclnt = 18
			else
				cumspclnt = 1
			end
			cla & *clr
			if cum_loc['face'] > 0 or $sex_ev['last_cum'] = 'facial':
				!! face
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial36.jpg"></center>'
				if sex_ev['wipes'] = 2:
					'"Hey, got anything I can use to clean up?" you trying not to smile under the spunk covering your face.'
					'"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
				else
					'You reach up and poke at the sperm coating your face. Ew. You really need to clean that up before you do anything else. Reaching down to your purse, you pull some wipes out of your purse.'
				end
				*nl
				if cum_loc['hair'] > 0:
					!! hair
					'You carefully wipe the cum from your face, making sure to get every last drop, including getting the tangled web that <<$npc_firstname[$boy]>> managed to get in your hair. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
				else
					'You carefully wipe the cum from your face, making sure to get every last drop. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
				end
			elseif cum_loc['stomach'] > 0 or $sex_ev['last_cum'] = 'stomach':
				!! stomach
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/bellycum3.jpg"></center>'
				if sex_ev['wipes'] = 2:
					'"Hey, got anything I can use to clean up?" you ask, looking at your belly, cum still spattered over it.'
					'"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
				else
					'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse.'
				end
			elseif cum_loc['butt'] > 0 or $sex_ev['last_cum'] = 'ass' or $sex_ev['last_cum'] = 'back':
				!! butt
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
				if sex_ev['wipes'] = 2:
					'"Hey, got anything I can use to clean up?" you ask, looking over your shoulder and wiggling your ass to emphasize the cum resting on it.'
					'"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work awkwardly trying to wipe your ass and up your back.'
				else
					'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse, awkwardly wiping your ass and back with it.'
				end
			elseif cum_loc['vagina'] or $sex_ev['last_cum'] = 'creampie':
				!! vagina
				if hypnoAddict > 0:
					$sex_ev['bed_room']
					if sex_ev['wipes'] = 1:
						'You reach down to your purse and pull out your bag of wipes before you stop, suddenly confused.'
						'<i>Why did I get out my wipes?</i> you think to yourself. You frown at the packet, befuddled as to what you wanted to do with the,.'
						'<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself as you put it back into your purse, oblivious to the liquid dribbling down the inside of your thigh.'
					elseif sex_ev['wipes'] = 2:
						'"Hey, do you-" you start and then suddenly lose track of what you were trying to say. You frown to yourself as <<$npc_firstname[$boy]>> looks at you quizically.'
						'"Did you need something?"'
						'"I uhh..." Your frown deepens. "I wanted to ask you something... but I forgot what it was... I guess it doesn''t really matter..."'
						'<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself, oblivious to the liquid dribbling down the inside of your thigh.'
					end
				else
					if sex_ev['wipes'] = 2:
						'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/after1.mp4"></video></center>'
						'"Hey, got anything I can use to clean up?" you say, holding your fingers over your pussy, trying to keep the cum from spilling out any further.'
						'"Oh yeah, right here." <<$npc_firstname[$boy]>> reaches over to his nightstand, pulling a packet of tissues and tossing them over to you. Gratefully accepting them, you pull out a handful and get to work cleaning yourself up.'
					else
						'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum111.jpg"></center>'
						'You really need to clean yourself after up after that. Reaching down to your purse, you pull some wipes out of your purse before reaching between your legs to wipe yourself up.'
						*nl
						'It takes a few tries, more cum seemingly coming out with every next wipe, but eventually you feel like you got most of it out. At least enough that nothing is going to be running down your legs walking home.'
					end
				end
			end

			if cumloc[13] > 0:
				*nl
				!! hands
				'Once you''re satisfied that the rest of your body is clean, you wipe your hands off and toss the wipes into the trash.'
			end

			sex_ev['wipes'] = 0
			gs'cum_cleanup'
			gs'stat'
			if sex_ev['sex_over'] = 1:
				gs'sex_ev_after', 'after_sex2'
			else
				cla
				gs'sex_ev_sex', 'sex_end'
			end
		end
	end
end


if $ARGS[0] = 'wipe_menu':
	cla
	act'Finish':
		if sex_ev['sex_over'] = 1:
			gt'sex_ev_after', 'after_sex2_w_picture'
		else
			cla
			gs'sex_ev_sex', 'sex_end'
		end
	end
	gs'sex_ev_after', 'wipe_hands'
	gs'sex_ev_after', 'wipe_face'
	gs'sex_ev_after', 'wipe_tits'
	gs'sex_ev_after', 'wipe_pussy'
end

if $ARGS[0] = 'wipe_hands':
	if cum_loc['hands'] > 0:
		act'Wipe your hands':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/clean_hands.mp4"></video></center>'
			cumspclnt = 16
			gs 'cum_cleanup'
			gs 'stat'
			'You grab some tissues and clean your hands off, wiping the cum from every finger.'
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end

if $ARGS[0] = 'wipe_face':
	if cum_loc['face'] > 0:
		act'Wipe your face':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/clean_mouth.mp4"></video></center>'
			cumspclnt = 11
			gs 'cum_cleanup'
			gs 'stat'
			'You carefully wipe the cum from your face, making sure to get every last drop. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least nobody is going to give you funny looks walking down the street.'
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end

if $ARGS[0] = 'wipe_tits':
	if cum_loc['tits'] > 0:
		act'Wipe your tits':
			cla & *clr
			!! IMAGE HERE
			$sex_ev['bed_room']
			cumspclnt = 16
			gs 'cum_cleanup'
			gs 'stat'
			'You grab some tissues and clean up, wiping the cum from your tits.'
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end

if $ARGS[0] = 'wipe_stomach':
	if cum_loc['stomach'] > 0:
		act'Wipe your belly':
			cla & *clr
			$sex_ev['bed_room']
			cumspclnt = 14
			gs 'cum_cleanup'
			gs 'stat'
			'You carefully wipe across your stomach, making sure to get every last drop. About a minute later, you can still feel a faintly sticky layer over the top of your skin, but at least it won''t be staining the inside of your top.'
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end


if $ARGS[0] = 'wipe_butt':
	if cum_loc['butt'] > 0:
		act'Wipe your butt':
			cla & *clr
			!! IMAGE HERE
			$sex_ev['bed_room']
			cumspclnt = 4
			gs 'cum_cleanup'
			gs 'stat'
			'You grab some tissues and clean up, awkwardly wiping your ass and back with it.'
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end

if $ARGS[0] = 'wipe_pussy':
	if cum_loc['vagina'] > 0:
		act'Wipe your pussy':
			cla & *clr
			if hypnoAddict > 0:
				$sex_ev['bed_room']
				if sex_ev['wipes'] = 1:
					'You pull out your bag of wipes before you stop, suddenly confused.'
					'<i>Why did I get out these wipes?</i> you think to yourself. You frown at the packet, befuddled as to what you wanted to do with the,.'
					'<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself as you put it back into your purse, completely ignoring the liquid dribbling down your thigh.'
				elseif sex_ev['wipes'] = 2:
					'"Hey, do you-" you start and then suddenly lose track of what you were trying to say. You frown to yourself as <<$npc_firstname[$boy]>> looks at you quizzically.'
					'"Did you need something?"'
					'"I uhh..." Your frown deepens. "I wanted to ask you something... but I forgot what it was... I guess it doesn''t really matter..."'
					'<i>Meh. If it''s important, it will come back to me later,</i> you think to yourself, completely ignoring the liquid dribbling down your thigh.'
				end
			else
				'<center><video autoplay loop src="images/shared/sex/cum/clean_pussy.mp4"></video></center>'
				cumspclnt = 16
				gs 'cum_cleanup'
				gs 'stat'
				'You grab some tissues and carefully wipe up the side of your thighs, cleaning your legs of any remaining bodily fluids before giving your pussy a thorough wipe to soak up the cum still leaking from it.'
				*nl
				'It takes a few tries, more cum seemingly coming out with every next wipe, but eventually you feel like you got most of it out. At least enough that nothing is going to be running down your legs any time soon.'
			end
			gs 'sex_ev_after', 'wipe_menu'
		end
	end
end

if $ARGS[0] = 'finish_sex':
	$loc = 'sex_ev_after'
	$loc_arg = 'after_sex2'
	sex_ev['finish_time'] = totminut
	if sex_ev['fucked_out'] > 0:
		'He just lays there, panting and wheezing in exhaustion.'
		gs'sex_ev_after', 'after_sex1'
	elseif sex_ev['orgasm_count'] = 0 and sex_ev['fake_orgasm_count'] = 0 and sex_ev['fuck'] = 0 and npc_selfish[$boy] = 0 and (npc_caretaker[$boy] = 1 or rand(0,1) = 1):
		gs'sex_ev_after', 'no_cum_end'
!!	elseif sex_ev['force_harden'] = 2:
!!		sex_ev['force_harden'] = 3
		
!!		gs'sex_ev_after', 'after_sex1'
	elseif rand(1,10) < npc_sexdrive[$boy] and sex_ev['cum_count'] < 5 + sex_ev['extra_cum']:
		if sex_ev['cum_count'] = 0:
			sex_ev['sex_over'] = 1
			'"Sorry," you say only a little apologetically. "I really can''t keep going. I''m finished here."'
			'"This is bullshit..." <<$npc_firstname[$boy]>> grumbles.'
		else
			'"I could go a few more times, but I guess this is good enough for now," <<$npc_firstname[$boy]>> says.'
		end
		gs'sex_ev_after', 'after_sex1'
	else
		if sex_ev['cum_count'] >= 5 + sex_ev['extra_cum']:
			sex_ev['sex_over'] = 1
			'"Yeah," <<$npc_firstname[$boy]>> pants. "I''m totally tapped out."'
		else
			sex_ev['sex_over'] = 1
			'"Yeah," he sighs. "I''m good."'
		end
		gs'sex_ev_after', 'after_sex1'
	end
end

if $ARGS[0] = 'no_cum_end':
	if sex_ev['fuck_count'] = 0:
		'"Really?" <<$npc_firstname[$boy]>> asks, sitting up. "But we didn''t fuck. You didn''t even get to come."'
		if know_virgin[$boy] = 1 and stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0 and $npc_rel_type[$boy] = 'husband':
			act'You know I''m saving my virginity':
				cla & *clr
				$sex_ev['bed_room']
				'"Come on <<$npc_firstname[$boy]>>," you sigh. "You know I''m saving myself for marriage."'
				if $npc_rel_type[$boy] = 'fuckbuddy':
					'"And you still have a fuckbuddy."'
					'"Shut up," you roll your eyes.'
				elseif $npc_rel_type[$boy] = 'boyfriend':
					'"I''m your boyfriend. Doesn''t that count for something?"'
					'"But you''re not my husband," you reply. "Not unless you married me when I wasn''t looking."'
				elseif $sex_ev['type'] = 'hookup':
					'"And you still hook up with random guys."'
					'"Shut up," you roll your eyes.'
				end
				gs'sex_ev_after', 'after_sex1'
			end
		elseif stat['think_virgin'] = 1 and sex_ev['fuck_count'] = 0 and $npc_rel_type[$boy] = 'husband':
			act'I''m saving my virginity':
				know_virgin[$boy] = 1
				cla & *clr
				$sex_ev['bed_room']
				'"Sorry," you smile apologetically. "I''m saving myself for marriage."'
				'"Why?" he asks, confusedly.'
				act'Because I want to':
					cla & *nl
					'"Because I want to?" you shrug. "I just think it would be nice to give my virginity to my future husband. Do I need a better reason?"'
					gs'sex_ev_after', 'after_sex1'
				end

				act'Because I want to (annoyed)':
					cla & *nl
					'"Because I want to," you scowl at him. "I have to explain what I want to do with <i>my</i> body?"'
					gs'sex_ev_after', 'after_sex1'
				end
				if mid($start_type,1,2) = 'sg':
					act'Ask my mom':
						cla & *nl
						'"I don''t know," you say, rolling your eyes in exasperation. "Ask my mom why it''s so important."'
						gs'sex_ev_after', 'after_sex1'
					end
				end
			end
		end

		act'Didn''t feel like it today':
			cla & *nl
			'"Just didn''t feel like doing anything else today," you shrug. "Wasn''t in the mood."'
			gs'sex_ev_after', 'after_sex1'
		end

		act'Just wanted to fool around':
			cla & *nl
			'"Just wanted to play with your cock for a while," you wink. "Don''t worry that I didn''t get off. I had fun." '
			gs'sex_ev_after', 'after_sex1'
		end
	else
		'"Really?" <<$npc_firstname[$boy]>> asks, sitting up. "But you didn''t get to come."'
		act'It''s okay':
			cla & *nl
			'"That''s sweet of you," you say, smiling. "But don''t worry about that. I''m okay without it today."'
			'"You''re sure?" he asks.'
			'"Yeah, I''m sure," you laugh back.'
			gs'sex_ev_after', 'after_sex1'
		end

		act'I''m in a rush':
			cla & *nl
			'"I''m in a rush today. But don''t worry, I still had fun," you say. "A girl doesn''t need to come every time you know."'
			'"You really mean that?" he asks.'
			'"Let''s just not make a habit of it, all right?" you laugh back.'
			gs'sex_ev_after', 'after_sex1'
		end
		
		if sex_ev['virgin'] = 1:
			act'Loss of virginity is enough':
				cla & *nl
				'"You took my virginity today," you say. "I think that counts as enough for me."'
				gs'sex_ev_after', 'after_sex1'
			end
		end
	end
end

if $ARGS[0] = 'bad_sex_end':
	act'End here (bad end)':
		cla & *clr
		'<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':
			cla & *nl
			'"I don''t feel like doing anything else," you say, feeling deflated and dejected, sinking further into the bed. "I''m just... not in the mood anymore."'
			gs'sex_ev_after', 'after_sex1'
		end

		act'You killed the mood':
			cla & *nl
			'"You killed the mood," you scowl at him.'
			gs'sex_ev_after', 'after_sex1'
		end

		act'You''re an asshole':
			cla & *nl
			'"You know what you did," you scowl at him. "Asshole."'
!!			'"I sure do," he snickers and slaps your ass, earning him a yelp from your lips and a sharp glare from your eyes.'
			gs'sex_ev_after', 'after_sex1'
		end
	end
end

if $ARGS[0] = 'black_out':
	cla & *clr
	sex_ev['pass_out'] = 1
	if sex_ev['cum_together'] > 0:
		if $sex_ev['position'] = 'miss':
			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
			'Your simultaneous orgasm was too much to handle and your vision begins to blur. At the back of your mind, you realize that your body is succumbing to exhaustion. The last thing you''re aware of is <<$npc_firstname[$boy]>>''s cock stuffed inside you, his cum filling your pussy to the brim, and then...'
		elseif $sex_ev['position'] = 'doggy':
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy1.jpg"></center>'
			'Your simultaneous orgasm was too much to handle and your knees give out underneath you, collapsing onto the bed in exhaustion as your vision begins to blur and fade. The last thing you''re aware of is <<$npc_firstname[$boy]>>''s cock slipping from your pussy, the tickling sensation of his cum leaking from your snatch, and then...'
		elseif $sex_ev['position'] = 'cowgirl':
			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
			'Your simultaneous orgasm was too much to handle and you collapse, no strength left to stay upright and your vision begins to blur. At the back of your mind, you realize that your body is succumbing to exhaustion. The last thing you''re aware of is your breasts pressed up against <<$npc_firstname[$boy]>>''s chest, his cock stuffed inside you and cum filling your pussy to the brim, and then...'
		end
	elseif $sex_ev['last_cum'] = 'creampie':
		if $sex_ev['position'] = 'miss':
			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
			'Exhaustion hits you in a sudden wave and your vision begins to blur. The last thing you''re aware of is <<$npc_firstname[$boy]>> inside you, his cock and cum filling your pussy to the brim, and then...'
		elseif $sex_ev['position'] = 'doggy':
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy1.jpg"></center>'
			'Exhaustion hits you in a sudden wave and your knees give out underneath you, collapsing onto the bed in exhaustion as your vision begins to blur and fade. The last thing you''re aware of is <<$npc_firstname[$boy]>>''s cock slipping from your pussy, the tickling sensation of his cum leaking from your snatch, and then...'
		elseif $sex_ev['position'] = 'cowgirl':
			'<center><img <<$set_imgh>> src="images/shared/sex/vag/cowgirl/1.jpg"></center>'
			'Exhaustion hits you in a sudden wave and you collapse, no strength left to stay upright and your vision begins to blur. The last thing you''re aware of is your breasts pressed up against <<$npc_firstname[$boy]>>''s chest, his cock and cum filling your pussy to the brim, and then...'
		end
	elseif $sex_ev['last_cum'] = 'facial':
		'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial35.jpg"></center>'
		'You collapse to the bed, <<$npc_firstname[$boy]>>''s cum still hot on your face. Your vision blurs and you struggle to keep your eyes open. The last thing you remember is a trickle of liquid running down your cheek, and then...'
	elseif $sex_ev['last_cum'] = 'swallow':
		'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep4.jpg"></center>'
		'You collapse to the bed as soon as you gulp, no strength left for you to stay upright. Your vision blurs and you struggle to keep your eyes open. The last thing you remember is the salty taste of <<$npc_firstname[$boy]>>''s cum on your lips, and then...'
	elseif $sex_ev['last_cum'] = 'spit':
		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_22.jpg"></center>'
		'You collapse to the bed, <<$npc_firstname[$boy]>>''s cum still dribbling down your chin. Your vision blurs and you struggle to keep your eyes open. The last thing you remember is a trickle of liquid running down your cheek, and then...'		
	elseif $sex_ev['last_cum'] = 'face_mouth':
		'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/sleep4.jpg"></center>'
		'You collapse to the bed, <<$npc_firstname[$boy]>>''s cum hot on your face, still running down your chin. Your vision blurs and you struggle to keep your eyes open. The last thing you remember is a trickle of liquid dribbling from your lips, and then...'
	elseif $sex_ev['last_cum'] = 'tits':
		if pcs_pubes < 3:
			'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep1.jpg"></center>'
		else
			'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep2.jpg"></center>'
		end
		'You collapse to the bed, <<$npc_firstname[$boy]>>''s cum hot on your chest. Your vision blurs and you struggle to keep your eyes open, to keep conscious. The last thing you remember is a trickle of liquid running down between your breasts, and then...'
	elseif $sex_ev['last_cum'] = 'pullout':
		if $sex_ev['position'] = 'miss':
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/sleep1.jpg"></center>'
			'Exhaustion hits you in a sudden wave and your vision begins to blur, you struggle to keep your eyes open. The last thing you remember is hot liquid on your belly, already beginning to cool, and then...'
		else
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
			'Exhaustion hits you in a sudden wave and your vision begins to blur, you struggle to keep your eyes open. You can''t even lift your face off the bedsheets. The last thing you remember is something hot running down the crack of your ass, and then...'
		end
	end
	*nl
	'<i>darkness...</i>'
	act'. . .':
		if npc_girlfriend[$boy] = 1 and rand(1,3) = 3 and $sex_ev['loc'] = 'npc_home':
			hour += 2
			gs'stat'
			!! eventually code in an option where girlfriend comes home and catches you in her boyfriend''s bed
			gt'sex_ev_after', 'black_out_wake'
		elseif $sex_ev['loc'] = 'parents_home':
			if rand(1,2) = 1:
				gt'sex_ev_after', 'black_out_wake_mother'
			else
				gt'sex_ev_after', 'black_out_wake_anya'
			end
		else
			gt'sex_ev_after', 'sleep_function'
		end
	end
end

if $ARGS[0] = 'black_out_wake':
	cla & *clr
	$sex_ev['bed_room']
	'You suddenly come to as a hand slaps you across the face.'
	'"Hey! Wake up!"'
	'You sit up in a rush, confused.'
	'"Wha... Whe..."'
	'"You passed out suddenly," <<$npc_firstname[$boy]>> says, looking annoyed. "You need to get dressed and get out. My girlfriend is going to be here any minute."'
	pc_know_npc_has_girlfriend[$boy] = 1
	gs'sex_ev_after', 'black_out_wake_options'
end

if $ARGS[0] = 'black_out_wake_options':
	act'Find your clothes':gt'sex_ev_after', 'black_out_wake2'
	
	act'Shower?':
		cla & *clr
		$sex_ev['bed_room']
		'"Ugh..." you moan, holding your hand to your head. "Can I borrow your shower first? I''m kind of-"'
		'"No, no time," <<$npc_firstname[$boy]>> says, shaking his head. "If you wanted that, then you shouldn''t have fallen asleep on me."'
		act'Get out of bed':gt'sex_ev_after', 'black_out_wake2'
		
		act'Get out of bed (grumble)':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/after/leave_bed1.mp4"></video></center>'
			if cumloc > 0:
				'"I can''t believe you''re going to make me leave like this," you grumbled annoyedly as you stumble out of bed, grimacing at the cum on your body as you gather your bearings before getting up to gather your clothes.'
			else
				'"It''s just a shower," you grumbled annoyedly as you stumble out of bed, getting your bearings before getting up to gather your clothes.'
			end
			act'Get dressed':
				cla & *clr
				'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
				if cumloc > 0:
					'Sleepily, you pull your clothing on, frowning as you feel cum smear across the inside. <<$npc_firstname[$boy]>> stands beside you impatiently, constantly checking the time and the door.'
				else
					'Sleepily, you pull your clothing on slowly. <<$npc_firstname[$boy]>> stands beside you impatiently, constantly checking the time and the door.'
				end
				*nl
				'Once you''ve picked up the last of your things, <<$npc_firstname[$boy]>> hurries you to the door, practically pushing you out.'
				act'Continue':gt'sex_ev_after', 'black_out_end'
			end
		end
	end
	
	if pc_know_npc_has_girlfriend[$boy] ! 1 and sex_ev['girlfriend_discover'] ! 1:
		act'Girlfriend?':
			sex_ev['girlfriend_discover'] = 1
			cla & *nl
			'"Girlfriend?" you mumble, mind still foggy after being shaken awake. "You have a girlfriend?"'
			'"Yeah, and she''s gonna catch us unless you get the fuck out of here now."'
			gs'sex_ev_after', 'black_out_wake_options'
		end
	end
end

if $ARGS[0] = 'black_out_wake2':
	pc_know_npc_has_girlfriend[$boy] = 1
	'<center><video autoplay loop src="images/shared/sex/after/leave_bed1.mp4"></video></center>'
	'You stumble out of bed, getting your bearings before getting up to gather your clothes.'
	act'Get dressed':
		cla & *clr
		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
		if cumloc > 0:
			'Groggily, you pull your clothing on, frowning as you feel cum smear across the inside. <<$npc_firstname[$boy]>> is throwing your things at you, constantly checking the time and the door.'
		else
			'Groggily, you pull your clothing on slowly. <<$npc_firstname[$boy]>> is throwing your things at you, constantly checking the time and the door.'
		end
		*nl
		'Once you''ve picked up the last of your things, <<$npc_firstname[$boy]>> hurries you to the door, practically pushing you out.'
		act'Continue':gt'sex_ev_after', 'black_out_end'
	end
end

if $ARGS[0] = 'black_out_end':
	cla & *clr
	$sex_ev['hall_way']
	if $npc_rel_type[$boy] = 'fuckbuddy':
		'"I''ll text you next time I want to hook up," <<$npc_firstname[$boy]>> says, and slams the door behind you.'
	else
		'The moment you clear the threshold, <<$npc_firstname[$boy]>> slams it behind you, leaving you alone in the dark.'
	end
	act'Leave':gt'sex_ev_leave', 'exit'
end
!! ------------------------- Cleaning Stuff ------------------------------------------------------

if $ARGS[0] = 'cum_clean':
!!	if cum_loc['vagina'] > 0 or cum_loc['anus'] > 0 or cum_loc['butt'] > 0 or cum_loc['back'] > 0 or cum_loc['face'] > 0 or cum_loc['hands'] > 0 or cum_loc['stomach'] > 0 or cum_loc['tits'] > 0 or cum_loc['hair'] > 0:
	if $stat_cum_msg ! '':
		act'Clean up':
			cla
			act'Never mind': cla & gs 'sex_ev_sex', 'sex_end'
			
			if sex_ev['boy_in_shower'] ! 1 and sex_ev['boy_asleep'] = 0:
				act'Ask him if he has any wipes':
					sex_ev['cock_inserted'] = 0
					if hypnoAddict = 0:
						cumspclnt = 20
					else
						cumspclnt = 18
					end
					gs 'cum_cleanup'
					gs'stat'
					cla & *clr
					
					if cum_loc['face'] > 0:
						gs'sex_ev_reactions', 'facial_smile_img'
						'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your face.'
					elseif cum_loc['vagina'] > 0:
						'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/after1.mp4"></video></center>'
						'"Got anything for this?" you ask, smiling wryly as you wipe your hands through your legs at the globs of cum still leaking from between them.'
					elseif cum_loc['hands'] > 0:
						$sex_ev['bed_room']
						'"Got anything for this?" you ask, holding up your hand, spreading your fingers to emphasize the sticky strands of cum hanging from them.'
					else
						$sex_ev['bed_room']
						'"Got anything for this?" you ask, smiling wryly as you point to the sticky strands of cum covering your body.'
					end
					if sex_ev['sex_over'] > 0:
						'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer. He pulls one out and starts wiping himself down, tossing you the bag.'
					else
						'"Yeah, got some wipes right here." <<$npc_firstname[$boy]>> reaches for his nightstand, pulling a bag of wipes out of the drawer and tossing it over.'
					end
					*nl
					'You pull out a handful and clean yourself off as well. Following <<$npc_firstname[$boy]>>''s lead, you finish by tossing the used wipe into a small trashcan in the corner of the room.'
					if sex_ev['sex_over'] = 1:
						gs'sex_ev_after', 'after_sex1'
					else
						gs'sex_ev_sex', 'sex_end'
					end
				end
			end
			
            if mc_inventory['makeup_wipes'] > 0:
				act'Use your wipes':
					gs'sex_ev_after', 'wipe_menu'
					act'Clean everything':
						gs 'cum_cleanup', 'cleanloc'
						gs'stat'
						sex_ev['cock_inserted'] = 0
						cla & *clr
						$sex_ev['bed_room']
						'Leaning down off the bed, you dig around with a clean hand, grab a bag of wipes, and start cleaning yourself off.'
						*nl
						if sex_ev['boy_asleep'] = 0: 'Feeling nice, you also take a moment to clean <<$npc_firstname[$boy]>>''s cock for him at the same time. Once you''re both all wiped down off, you toss it into the wastebasket by his bed.'
						if sex_ev['sex_over'] = 1:
							gs'sex_ev_after', 'after_sex1'
						else
							gs'sex_ev_sex', 'sex_end'
						end
					end
				end
			end
			
			if cumloc[13] > 0:
				act'Lick your fingers clean':
					sex_ev['cock_inserted'] = 0
					gs'stat'
					gs 'cum_cleanup', 'cleanloc'
					stat['swallow'] += 1
					cla & *clr
					'<center><img <<$set_imgh>> src="images/shared/sex/cum/lick_fingers.jpg"></center>'
					if sex_ev['boy_in_shower'] ! 1 and sex_ev['boy_asleep'] = 0:
						'Briefly making eye contact with <<$npc_firstname[$boy]>>, you use your fingers to gather up all the loose cum on you and stick out your tongue, running it up your hand, licking every drop from it and into your mouth. You give your hand a thorough tongue bath, sucking your fingers clean at the end. Once finished, you smack your lips, smiling at <<$npc_firstname[$boy]>> who stared at you the whole time.'
						if sex_ev['he_cleaned'] = 0:
							'"Any chance I could get one of those?" he gestures towards his cock.'
							act'You''re on your own':
								cla & *clr
								$sex_ev['bed_room']
								'"Sorry soldier, but you''re on your own," you giggle.'
								'"<i>Of course I am...</i>" He sighs but reaches for his nightstand, pulling a pack of wipes from it and gets to work cleaning himself up. Once he''s done, he tosses the used wipe into a trash can in the corner of his room.'
								if sex_ev['sex_over'] = 1:
									gs'sex_ev_after', 'after_sex1'
								else
									gs'sex_ev_sex', 'sex_end'
								end
							end

							act'Sure':
								cla & *clr
								'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
								'"Sure thing," you smile. Crawling forward between his legs, you bend down and run your lips up and down his shaft, sucking, kissing, and licking every curve and contour until it''s completely clean.'
								'"There. All better?"'
								'"Much better," he smiles back.'
								if rand(1,10) < npc_sexdrive[$boy] and sex_ev['cum_count'] <= 5 + sex_ev['extra_cum']:
									*nl
									'He seems more than pleased by your act of service, considering the stiffness that seems to have returned to his dick under your touch.'
								end
								if sex_ev['sex_over'] = 1:
									gs'sex_ev_after', 'after_sex1'
								else
									gs'sex_ev_after', 'stop_here'
									gs 'sex_ev_sex', 'keep_going'
								end
							end
						else
							'You lick the sticky salty liquid off your fingers and gulp it down.'
							if sex_ev['sex_over'] = 1:
								act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
							else
								gs'sex_ev_sex', 'sex_end'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'facial_mouth_clean':
	if ($sex_ev['last_cum'] = 'facial' or $sex_ev['last_cum'] = 'face_mouth') and sex_ev['boy_in_shower'] ! 1 and sex_ev['boy_asleep'] = 0:
		act'Clean him off with your mouth':
			sex_ev['react'] = 1
			gs'stat'
			cla & *clr
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial24.jpg"></center>'
!!			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
			if sex_ev['fuck_count'] > 0 and sex_ev['no_condom'] = 1:
				'You lean forward, wrapping your lips around <<$npc_firstname[$boy]>> and run them up and down to clean him off. You can faintly taste the salty sweetness of yourself on his cock, as well as the remnants of cum that was still inside it, drawn out your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
			else
				'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can taste the remnants of cum that was still inside it, drawn out by your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
			end
			gs'sex_ev_sex', 'sex_end'
		end
	end
end

!! -------------------------------------------------------------------------------

if $ARGS[0] = 'after_sex1':
	sex_ev['sex_over'] = 1
	if sex_ev['cock_inserted'] = 1 and ($sex_ev['position'] = 'miss' or $sex_ev['position'] = 'doggy' or $sex_ev['position'] = 'cowgirl'):
		act'Pull apart':
			cla & *clr
			gs'sex_ev_after', 'pull_apart'
			sex_ev['cock_inserted'] = 0
			if (npc_humor[$boy] = 1 or npc_humor[$boy] = 2) and (sex_ev['fuck_count'] >= npc_sexdrive[$boy] - 1) and rand(0,1) = 1:
				gs'sex_ev_pillow_talk', 'high_five1'
			else
				gs'sex_ev_after', 'post_cigarette_boy'
			end
		end
	else
		act'Finish':
			cla & *clr
			if cumloc[0] > 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
				'You lay back, settling down on the other side of the bed. Your body relaxes and you feel <<$npc_firstname[$boy]>>''s cum seep from your pussy, trickling down the crack of your ass into the bedsheets.'
			else
				$sex_ev['bed_room']
			end
			if (npc_humor[$boy] = 1 or npc_humor[$boy] = 2) and (sex_ev['fuck_count'] >= npc_sexdrive[$boy] - 1) and rand(0,1) = 1:
				gs'sex_ev_pillow_talk', 'high_five1'
			else
				gs'sex_ev_after', 'post_cigarette_boy'
			end
		end
	end
end

if $ARGS[0] = 'post_cigarette_boy':
	if npc_smoker[$boy] > 0 and sex_ev['cock_inserted'] = 1:
		sex_ev['cock_inserted'] = 0
		'The two of you pull apart and <<$npc_firstname[$boy]>> reaches over to his nightstand and pulls out a pack of cigarettes.'
	else
		*nl
		'You both lay back, basking in the afterglow of your fuck together. ' + iif(npc_smoker[$boy] > 0, 'After about a minute, <<$npc_firstname[$boy]>> reaches over and grabs a pack of cigarettes.', ' ')
	end
	if npc_smoker[$boy] > 0 and npc_caretaker[$boy] > 0:
		gs'sex_ev_events', 'offer_ciga1'
	else
		gs'sex_ev_after', 'after_sex2'
	end
end

if $ARGS[0] = 'pull_apart':
	sex_ev['cock_inserted'] = 0
	if $sex_ev['last_cum'] = 'creampie' or $sex_ev['last_cum'] = 'creampie_surprise':
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'<<$npc_firstname[$boy]>> climbs off of you, removing his cock from your pussy, allowing a gush of cum from his last orgasm to be released, and flops down on the other side of the bed as it trickles down the crack of your ass into the bedsheets.'
		elseif $sex_ev['position'] = 'doggy':
			'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'<<$npc_firstname[$boy]>> pulls out from behind you, releasing a gush of cum from your pussy that oozes down your thighs as you roll over together onto your backs.'
		elseif $sex_ev['position'] = 'cowgirl':
			'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'You climb off of <<$npc_firstname[$boy]>>, releasing a gush of cum from your pussy, and flop down next to him. As soon as his cock vacates your pussy, cum begins to drip from it, trickling down the crack of your ass into the bedsheets.'
		end
	else
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'<<$npc_firstname[$boy]>> removes his cock from your pussy, climbing out from between your legs, flopping onto the other side of the bed.'
		elseif $sex_ev['position'] = 'doggy':
			'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'<<$npc_firstname[$boy]>> pulls out from behind you and you roll over together onto your backs.'
		elseif $sex_ev['position'] = 'cowgirl':
			'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
			if $sex_ev['end_comment'] ! '': $sex_ev['end_comment']
			'You climb off of <<$npc_firstname[$boy]>>, letting his cock slip from your pussy, and flop down beside him.'
		end
	end
end

if $ARGS[0] = 'after_sex2_w_picture':
	cla & *clr
	$sex_ev['bed_room']
	gs 'sex_ev_after', 'after_sex2'
end

if $ARGS[0] = 'after_sex2':
	sex_ev['sex_over'] = 1
	sex_ev['pillow_talking'] = 0
	if sex_ev['morning_after'] > 0:
		act'Get on with the morning':
			cla & *clr
			gs'sex_ev_morning', 'morning_menu2'
		end
	elseif sex_ev['sleep_fuck'] > 0:
		act'Go back to sleep':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle2.jpg"></center>'
			'Your midnight fuck over, you and <<$npc_firstname[$boy]>> cuddle up together and fall asleep again.'
			act'Sleep':gt'sex_ev_after', 'sleep_function'
		end
	else
		if $sex_ev['loc'] = 'pc_home':
			gs'sex_ev_leave', 'npc_leave'
		else
			if $sex_ev['type'] = 'hookup':
				gs'sex_ev_hookup_leave', 'gotta_go'
			else
				act'Get dressed':gt'sex_ev_leave', 'dressing1'
			end
		end
	end
	if sex_ev['boy_asleep'] = 0:
		if sex_ev['npc_late'] ! 1 and $clothingworntype = 'nude' and sex_ev['boy_in_shower'] ! 1:
			act'Relax together':
				cla & *clr
				if sex_ev['get_up'] = 1:
					sex_ev['get_up'] = 0
					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
					'You climb back into bed with <<$npc_firstname[$boy]>>, snuggling up with him to relax.'
				elseif npc_smoker[$boy] < 1 or sex_ev['boy_smoked'] = 1:
					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
					'You and <<$npc_firstname[$boy]>> both lay back, quietly relaxing together in the still bliss of your love-making.'
				else
					'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke2.jpg"></center>'
					'You lay back, quietly relaxing beside <<$npc_firstname[$boy]>> in the still bliss of your love-making as he puffs away on his cigarette.'
					sex_ev['boy_smoked'] = 1
				end
				gs'sex_ev_after', 'relax_together'
			end
		end
	else
		'<<$npc_firstname[$boy]>> is asleep, snoring softly beside you.'
		gs'sex_ev_after', 'cuddle_up2'
	end
	if $sex_ev['loc'] ! 'house_party':
		if sex_ev['boy_in_shower'] ! 1:
			act'Use the bathroom':gt'sex_ev_after', 'boy_bathroom'
		elseif sex_ev['boy_in_shower'] = 1 and sex_ev['boy_shower'] ! 1:
			if npc_apt_type[$boy] = 2 or $sex_ev['loc'] = 'hotel_room':
				'<<$npc_firstname[$boy]>> is in the shower. You can hear the water running through the door.'
			elseif npc_apt_type[$boy] = 3 and $sex_ev['loc'] ! 'pc_home':
				'<<$npc_firstname[$boy]>> is in the shower and you can hear water running through the wall.'
			else
				'<<$npc_firstname[$boy]>> is taking a shower somewhere else in his apartment.'
			end
			
			act'Wait to use the bathroom':
				cla & *clr
				$sex_ev['bed_room']
				'You wait patiently on the bed for <<$npc_firstname[$boy]>> to finish his shower.'
				act'Continue':gs'sex_ev_shower', 'boy_shower_finish'
			end
			
			act'Join him in the shower':gs'sex_ev_shower', 'shower_join1'
			
			gs'sex_ev_events', 'rummage_drawers_link'
		end
	end
		
	if sex_ev['cigarette'] = 0 and (mc_inventory['cigarettes'] > 0 or npc_smoker[$boy] > 0) and sex_ev['npc_late'] ! 1:
		act'Smoke a cigarette':cla & gs'sex_ev_after', 'smoke_ciga1'
	end

	gs'sex_ev_after', 'post_sex_pee1'
	gs'sex_ev_after', 'cum_clean'
	gs'sex_ev_after', 'cock_clean'
	gs'sex_ev_after', 'plan_b'
	gs'sex_ev_after', 'birth_control_pill_take'
	if $sex_ev['loc'] ! 'house_party' and sex_ev['boy_asleep'] = 0: gs'sex_ev_after', 'spend_night_ask'
	
!!{	if sex_ev['boy_in_shower'] = 1:
		if $sex_ev['loc'] = 'hotel_room':
			
		elseif npc_apt_type[$boy] = 2:
			''
		elseif npc_apt_type[$boy] = 3 and $sex_ev['loc'] ! 'pc_home':
			'<<$npc_firstname[$boy]>> is in the shower and you can hear water running through the wall.'
		else
			'<<$npc_firstname[$boy]>> is taking a shower somewhere else in his apartment.'
		end
	end}
	
	if $sex_ev['loc'] ! 'house_party': gs 'sex_ev_events', 'boy_timecheck'
end


if $ARGS[0] = 'after_sex_dressed':
	if $sex_ev['loc'] ! 'pc_home':
		if $sex_ev['type'] = 'hookup':
			gs'sex_ev_hookup_leave', 'gotta_go'
		else
			act'Prepare to leave':
				cla & *clr
				$sex_ev['bed_room']
				if sex_ev['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and sex_ev['boy_asleep'] ! 0:
					gs'sex_ev_leave', 'sneak_out1'
				else
					gs'sex_ev_leave', 'leaving_dialogue'
				end
			end
			if sex_ev['leaving'] ! 1:
				act'Hang out':
					msg 'Work in progress! To be continued!'
					lover_ev['just_had_sex'] = 1
				end
			end
		end
	else
	
	end
	
	act'Use the bathroom':gt'sex_ev_after', 'boy_bathroom'
	
	gs'sex_ev_leave', 'breakup_start'
!!{
	

		act'This is getting too complicated':


		end
		
	end
	}
end

if $ARGS[0] = 'boy_bathroom':
	sex_ev['get_up'] = 1
	cla & *clr
	$sex_ev['bath_room']
	act'Back to the bedroom':
		cla
		if sex_ev['dressed_to_go'] = 1:	
			*clr
			$sex_ev['bed_room']
			gs 'sex_ev_after', 'after_sex_dressed'
		elseif sex_ev['morning_after'] = 0:
			gt 'sex_ev_after', 'after_sex2_w_picture'
		else
			gt 'sex_ev_morning', 'morning_menu2'
		end
	end
	act'Use the mirror':
		$locM = 'sex_ev_after'
		$locM_arg = 'boy_bathroom'
		gt 'mirror', 'start'
	end
	
	if (pcs_breath ! 1 or cumloc[12] = 1) and (travel_brush = 1 or overnight_bag[$boy] = 1 or $sex_ev['loc'] = 'pc_home'):
		menu_off = 1
		*clr & cla
		minut += 3
		cumspclnt = 2
		gs 'cum_cleanup'
		pcs_breath = 1
		teeth['brushed'] +=1
		if $clothingworntype = 'nude' and $braworntype = 'none' and $pantyworntype = 'none':
			'<center><video autoplay loop src="images/shared/home/bathroom/brushteeth.mp4"></center>'
			play 'sound/brushteeth.mp3',100
		else
			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brushteeth.jpg"></center>'
		end
		*nl
		'You brush your teeth and now they are clean and minty fresh.'
		act'Continue':gs'sex_ev_after', 'boy_bathroom'
	end
	if sex_ev['sleepover'] = 0:
		if sex_ev['shower'] = 0 or $stat_cum_msg ! '':
			act'Take a shower':gs'sex_ev_shower', 'after_alone'
		end
	else
		if sex_ev['morning_shower'] = 0 or $stat_cum_msg ! '' or pcs_sweat > 0:
			act'Take a shower':gs'sex_ev_morning', 'shower'
		end
	end
	if mc_inventory['sanitary_pads'] > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprokp = 0 and isprok = 0 and $pantyworntype ! 'none' and knowpreg = 0:
		act 'Use a sanitary pad (0:02)':
			menu_off = 1
			*clr & cla
			mc_inventory['sanitary_pads'] -= 1
			isprokp = 1
			minut += 2
			pcs_mood -= 5
			'<center><img <<$set_imgh>> src="images/pc/body/pee/period/pad/<<rand(2,3)>>.jpg"></center>'
			*nl
			'You use a sanitary pad.'
			act'Continue':gs'sex_ev_after', 'boy_bathroom'
		end
	end
	if mc_inventory['tampons'] > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprok = 0 and isprokp = 0 and knowpreg = 0:
		act 'Use a tampon (0:02)':
			menu_off = 1
			*clr & cla
			mc_inventory['tampons'] -= 1
			isprok = 1
			minut += 2
			pcs_mood -= 5
			'<center><img <<$set_imgh>> src="images/pc/body/pee/period/tampon/6.jpg"></center>'
			*nl
			'You use a tampon.'
			act'Continue':gs'sex_ev_after', 'boy_bathroom'
		end
	end
	
	if FUNC('Cum_Manage', 'check_innards', 0) = 1:
		act'Let the cum drain from your pussy (0:15)':
			cumspclnt = 15
			gs 'cum_cleanup'
			minut += 15
			cla
			act'Wait it out':
				gs'stat'
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/toilet_naked.jpg"></center>'
				'You sit on the toilet humming to yourself while you wait for <<$npc_firstname[$boy]>>''s cum to drain from your pussy. It takes a long time with minutes passing between sudden gushes of semen pouring out of your snatch.'
				*nl
				'After about fifteen minutes, you figure you''re safe and grab some toilet paper to wipe the last strands from your labia.'
				act'Continue':gs'sex_ev_after', 'boy_bathroom'
			end
			
			if mc_inventory['cigarettes'] > 0:
				act'Smoke to pass the time':
					cla & *clr
					gs 'drugs', 'smoke'

					'<center><img <<$set_imgh>> src="images/shared/home/bathroom/toilet_naked_smoke.jpg"></center>'
					'You know this is going to take a long time so you take your smokes and a lighter into the bathroom with you.'
					*nl
					'Plopping down on the toilet, you light up while waiting for <<$npc_firstname[$boy]>>''s cum to drain from your pussy. Minutes pass between sudden gushes of semen pouring out of your snatch and you pass the time puffing smoke and flicking ashes.'
					*nl
					'After about fifteen minutes, you figure you''re safe and grab some toilet paper to wipe the last strands from your labia before making sure your long-burned out cigarette is fully extinguished and tossing it in the trash.'
					act'Continue':gs'sex_ev_after', 'boy_bathroom'
				end
			end
		end
	end
end

if $ARGS[0] = 'post_sex_pee1':
	if sex_ev['fuck_count'] > 0 and sex_ev['pee_after'] < 1 and sex_ev['shower'] = 0 and $clothingworntype = 'nude':
		act'Go pee':
			cla & *clr
			$sex_ev['bed_room']
			if sex_ev['boy_asleep'] = 0:
				if cum_loc['vagina'] > 0:
					'You throw your legs over the side of the bed and as you prepare to stand up, you feel a sudden gush of <<$npc_firstname[$boy]>>''s cum threaten to spill from your pussy.'
					act'Try not to make a mess':
						cla & *nl
						sex_ev['cum_wobble'] = 1
						'You stand carefully, awkwardly holding your hand over your dripping snatch and begin making your way towards the bathroom.'
						'"Hey, where you going?" <<$npc_firstname[$boy]>> asks.'
						gs'sex_ev_after', 'post_sex_pee2'
					end
					
					act'Walk normally':
						cla & *nl
						'You don''t give it a second thought and stand up to stride straight for the bathroom, letting the cum run down your legs and trail across the floor behind you.'
	!!					if npc_neat[$boy] = 1 and $sex_ev['loc'] = 'npc_home':
	!!						'"Hey!" <<$npc_firstname[$boy]>> calls out. "Do you have to get it all over the floor? Couldn''t you at least put your hand under it or something?"'
	!!					else
							'"Hey, where you going?" <<$npc_firstname[$boy]>> asks.'
							gs'sex_ev_after', 'post_sex_pee2'
	!!					end
					end
				else
					'You throw your legs over the side of the bed and get up to use the toilet.'
					'"Hey, where you going?" <<$npc_firstname[$boy]>> asks.'
					gs'sex_ev_after', 'post_sex_pee2'
				end
			else
				'You throw your legs over the side of the bed, leaving <<$npc_firstname[$boy]>> asleep in the bed alone as you pad your way into the bathroom.'
				gs'sex_ev_after', 'post_sex_pee3'
			end
		end
	end
end

if $ARGS[0] = 'post_sex_pee2':
	act'Prevent UTI''s!':
		cla & *nl
		if cum_loc['vagina'] > 0 and sex_ev['cum_wobble'] = 1:
			if sex_ev['virgin'] = 1:
				'"I heard girls should always pee after sex to prevent UTI''s," you say, gulping as the cum between your legs almost spills between your fingers. "Er, I think. It''s my first time."'
				'You give him a shy smile and wobble away into the bathroom.'
			else
				'"Always gotta pee after sex if you wanna prevent UTI''s," you tell <<$npc_firstname[$boy]>> and continue wobbling awkwardly towards the bathroom with your hand between your legs.'
			end
		elseif cum_loc['vagina'] > 0:
			if sex_ev['virgin'] = 1:
				'"I''m think I''m supposed to go pee after having sex," you say, turning back to glance at him while the cum continues spilling from your snatch. "To prevent UTI''s. I think. Pretty sure anyways. It''s only my first time."'
				'You give him a sly smile and hurry into the bathroom.'
			else
				'"Always gotta pee after sex if you wanna prevent UTI''s," you tell <<$npc_firstname[$boy]>> without breaking stride and calmly head into the bathroom.'
			end
		else
			if sex_ev['virgin'] = 1:
				'"I''m think I''m supposed to go pee after having sex," you say, feeling loose juices running between your lower lips. "To prevent UTI''s. I think. Pretty sure anyways. It''s only my first time."'
				'You give him a sly smile and hurry on to the bathroom.'
			else
				'"Always gotta pee after sex if you wanna prevent UTI''s," you tell <<$npc_firstname[$boy]>> without breaking stride and calmly head into the bathroom.'
			end
		end
		gs'sex_ev_after', 'post_sex_pee3'
	end
	
	act'Desperately need to pee':
		cla & *nl
		sex_ev['desperate_pee'] = 1
		if cum_loc['vagina'] > 0 and sex_ev['cum_wobble'] = 1:
			'"I <i>really</i> need to take a piss," you say, wobbling towards the bathroom as fast as you can without spilling cum all over the floor. "I''ve been holding it this entire time!"'
		elseif cum_loc['vagina'] > 0:
			'"I <i>really</i> need to take a piss," you say, picking up the pace, heedless of the cum now streaking down your legs. "I''ve been holding it this entire time!"'
		else
			'"I <i>really</i> need to take a piss! I''ve been holding it this entire time!" you say, picking up the pace, practically sprinting into the bathroom.'
		end
		gs'sex_ev_after', 'post_sex_pee3'
	end
	
	if npc_neat[$boy] = 1 and sex_ev['cum_wobble'] = 0:
	
	end
end

if $ARGS[0] = 'post_sex_pee3':
	act'Relieve yourself':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/toilet_naked.jpg"></center>'
		if sex_ev['desperate_pee'] = 0:
			if cum_loc['vagina'] > 0:
				'You sit down on the toilet and let out a sigh as you unclench your muscles. Warmth trickles out from your snatch and you feel it flush some of the cum from inside as well. You sit there patiently until you and your bladder feel nice and empty.'
			else
				'You sit down on the toilet and let out a sigh as you unclench your muscles. Warmth trickles out from your snatch and you can almost feel it flushing the excess bacteria from your urinary tract. You wait patiently until you and your bladder feel nice and empty and pull some squares from the toilet roll.'
			end
			*nl
			'<i>No UTI''s for this girl!</i> you think to yourself as you fold the soft fabric to wipe yourself.'
		else
			if cum_loc['vagina'] > 0:
				'You practically slam yourself down onto the seat and immediately unclench your muscles. A torrent of hot liquid streams from your snatch and you heave a loud sigh of relief as your strained bladder begins to empty out, with the added bonus of clearing some of the cum from your pussy as well. A short while later you feel pleasantly empty and pull some squares from the toilet roll,'
			else
				'You practically slam yourself down onto the seat and immediately unclench your muscles. A torrent of hot liquid streams from your snatch and you heave a loud sigh of relief as your strained bladder begins to empty out. A short while later you feel pleasantly empty and pull some squares from the toilet roll,'
			end
			*nl
			'<i>Ahh... Much better...</i> you sigh again as you fold the soft fabric to wipe yourself.'
		end
		act'Finish':gt'sex_ev_after', 'boy_bathroom'
	end
end

if $ARGS[0] = 'relax_together':
	cla
	sex_ev['relax_after'] = 1
	if sex_ev['angry_after'] = 0: sex_ev['mad'] = 0 and sex_ev['annoyed'] = 0
	act'Stop relaxing':cla & gs'sex_ev_after', 'after_sex2'
	
	act'Pillow talk':gt'sex_ev_pillow_talk', 'start'
	
	if sex_ev['after_kiss'] = 0:
		act'Kiss <<$npc_firstname[$boy]>>':gt 'sex_ev_after', 'kiss'
	end
	
	if sex_ev['sleep_fuck'] > 0:
!!		gs'sex_ev_pillow_talk', 'sleep_fucking_talk'
	elseif pcs_sleep < 30 and sex_ev['get_up'] = 0 and sex_ev['angry_after'] = 0:
		act'Rest your eyes':gt'sex_ev_after', 'bed'
	end
	gs'sex_ev_talk', 'prostitution_payment'
	gs'sex_ev_after', 'sore_pussy_msg'
end

if $ARGS[0] = 'cock_clean':
	if sex_ev['cock_cleanup'] ! 1 and sex_ev['fuck'] > 0 and sex_ev['get_up'] ! 1 and sex_ev['boy_in_shower'] ! 1 and sex_ev['boy_shower'] = 0 and sex_ev['boy_asleep'] = 0:
		act'Clean his cock':
			sex_ev['cock_cleanup'] = 1
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
			if sex_ev['no_condom'] = 1:
				if $sex_ev['last_cum'] = 'creampie':
					'"Here, let me take care of that for you," you say, slithering down between <<$npc_firstname[$boy]>>''s legs and taking his cock in your mouth. You run your lips up and down his shaft and give it a thorough tongue bath, lapping up your own juices and the remnants of the creampie he filled you with.'
				else
					'"Here, let me take care of that for you," you say, slithering down between <<$npc_firstname[$boy]>>''s legs and taking his cock in your mouth. You run your lips up and down his shaft and give it a thorough tongue bath, lapping up your own juices and sucking any remaining cum out of the tip.'
				end
			elseif sex_ev['condoms_used'] > 0:
				if sex_ev['cum_condom'] > 0:
					'"Here, let me take care of that for you," you say, slithering down between <<$npc_firstname[$boy]>>''s legs and taking his cock in your mouth. You run your lips up and down his shaft and give it a thorough tongue bath, lapping up your own juices and the cum that filled the inside of the condom.'
				else
					'"Here, let me take care of that for you," you say, slithering down between <<$npc_firstname[$boy]>>''s legs and taking his cock in your mouth. You run your lips up and down his shaft and give it a thorough tongue bath, lapping up the condom lube, your own juices, and sucking any remaining cum out of the tip.'
				end
			end
			*nl
			'<<$npc_firstname[$boy]>> smiles at you appreciatively.'
			gs'sex_ev_after', 'after_sex2'
		end
	end
end

if $ARGS[0] = 'kiss':
	cla & *clr
	if cum_loc['face'] <= 0:
		gs 'npc_relationship', 'modify', $boy, 'like'
		$orgasm_or = 'no'
		sex_ev['after_kiss'] = 1
		'<center><img <<$set_imgh>> src="images/shared/sex/after/kiss1.jpg"></center>'
		if npc_rel[$boy] < 100:
			gs 'arousal', 'kiss', -2
			if sex_ev['cuni_count'] > 0:
				'You lean over to kiss <<$npc_firstname[$boy]>>, gently pressing your lips against his. They taste slightly salty, which you recognize as the taste of your own pussy, still on his lips from when he ate you out earlier.'
			else
				'You lean over to kiss <<$npc_firstname[$boy]>>, gently pressing your lips against his.'
			end
			'"What was that for?" <<$npc_firstname[$boy]>> asks.'
			act'Just felt like it':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
				'"I just felt like it," you shrug, giving <<$npc_firstname[$boy]>> a pleasant smile.'
				gs 'sex_ev_after', 'relax_together'
			end
			act'Cause I like you':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
				'"Cause I like you," you say, giving <<$npc_firstname[$boy]>> a pleasant smile.'
				gs 'sex_ev_after', 'relax_together'
			end
			if sex_ev['orgasm_count'] > 0:
				act'For making me come':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
					'"A thank you," you smile gratefully. "For making me come."'
					gs 'sex_ev_after', 'relax_together'
				end
			end
			if $npc_rel_type[$boy] = 'sugar_daddy':
				act'Because you''re being paid':
					cla & *clr
					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
					'"Cause you''re paying me," you smile wryly.'
					gs 'sex_ev_after', 'relax_together'
				end
			end
		else
			!! revamp this later so it doesn''t always overwhelm all the options
			gs 'arousal', 'kiss', -10, 'no_orgasm_msg', $sex_ev['prostitution_flag']
			gs 'arousal', 'kiss', rand(2,3)
			'You lean over to kiss <<$npc_firstname[$boy]>>, gently pressing your lips against his. Instantly, it sparks something within you and the kiss takes on a passion of its own and you find yourself drinking him in; his taste, his scent, his tongue, feverishly pressing your faces together as if you might die at any second.'
			*nl
			'It''s several minutes before you finally break apart, panting breathlessly as you stare into each others eyes.'
			gs 'sex_ev_after', 'relax_together'
		end
		$orgasm_or = ''
	else
		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
		'You lean over to kiss <<$npc_firstname[$boy]>> before his eyes widen and he shies away. It puzzles you for a moment before he draws a finger around his face in a circle.'
		'"You''ve still got..." You blink before remembering. The cum. Right. He probably doesn''t want to kiss you with his own load blown all over your face.'
		gs 'sex_ev_after', 'relax_together'
	end
end

if $ARGS[0] = 'plan_b':
	if sex_ev['creampie_count'] > 0 and mc_inventory['morning_after_pill'] > 0 and sex_ev['ma_pill'] ! 2 and birth_control['think_safe'] = 0 and sex_ev['angry_after'] = 0 and mesec = 0:
		act'Take a morning after pill':
			sex_ev['ma_pill'] = 2
			cla & *clr
			$sex_ev['bed_room']
			if cumloc[0] > 0:
				if LudaQW['free_condoms'] = 1 and LudaQW['luda_ma_pill'] = 0:
					'With <<$npc_firstname[$boy]>>''s cum still leaking from your pussy, you reach down to your purse and pull out the morning after pill Luda gave you.'
				else
					'With <<$npc_firstname[$boy]>>''s cum still leaking from your pussy, you reach down to your purse and pull out the morning after pill you keep inside.'
				end
			else
				if LudaQW['free_condoms'] = 1 and LudaQW['luda_ma_pill'] = 0:
					'You reach down to your purse and pull out the morning after pill Luda gave you.'
				else
					'You reach down to your purse and pull out the morning after pill you keep inside.'
				end
			end
			gs'sex_ev_after', 'plan_b2'
		end
	end
end

if $ARGS[0] = 'plan_b2':
	if sex_ev['boy_asleep'] = 1:
		act'Continue':
			gs 'medical_din', 'morning_after_pill_function'
			gs'sex_ev_after', 'after_sex2'
		end
	elseif sex_ev['ma_pill'] = 1:
		gs'sex_ev_after', 'plan_b3'
	else
		act'Don''t say anything':
			cla & *nl
			'<<$npc_firstname[$boy]>> watches you pop the pill out of its packaging and you gulp it down without a word of acknowledgment.'
			'It''s not for him, why does he need to know?'
			gs 'medical_din', 'morning_after_pill_function'
			gs'sex_ev_after', 'after_sex2'
		end
		
		act'Take it casually':
			cla & *nl
			'<<$npc_firstname[$boy]>> watches you pop the pill out of its packaging.'
			if LudaQW['free_condoms'] = 1 and LudaQW['luda_ma_pill'] = 0:
				sex_ev['aunt_pill'] = 1
				'"My aunt gave me this morning after pill for emergencies," you explain and pop it in your mouth before forcing it down with a dry swallow.'
			else
				'"Morning after pill," you explain and pop it in your mouth before forcing it down with a dry swallow.'
			end
			gs 'medical_din', 'morning_after_pill_function'
			gs'sex_ev_after', 'after_sex2'
		end
		
		act'Take it shyly':
			cla & *nl
			'<<$npc_firstname[$boy]>> watches you pop the pill out of its packaging and you can''t help but blush beneath his gaze.'
			if LudaQW['free_condoms'] = 1 and LudaQW['luda_ma_pill'] = 0:
				sex_ev['aunt_pill'] = 1
				'"My aunt gave me this for emergencies," you say shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
			else
				'"The instructions say to take it as soon as possible for best effect," you smile shyly, blush intensifying as you put it in your mouth and force it down with a dry swallow.'
			end
			gs 'medical_din', 'morning_after_pill_function'
			gs'sex_ev_after', 'after_sex2'
		end
		
		act'Take it sexily':
			cla & *nl
			'As <<$npc_firstname[$boy]>> watches you pull the pill from its packaging, you stick out your tongue at him, popping the pill onto it and swallowing with a wide grin.'
			if sex_ev['accidental_creampie_convo'] = 1:
				'"There," you smirk. "Problem solved."'
			elseif $sex_ev['last_cum'] = 'swallow':
				'"Chaser," you wink.'
			elseif age < 20:
				'"Not really looking to become a teen mom," you smirk.'
			else
				'"I''m not ready to be a mom," you smirk.'
			end
			gs 'medical_din', 'morning_after_pill_function'
			gs'sex_ev_after', 'after_sex2'
		end
	end
end

if $ARGS[0] = 'plan_b3':
	act'Take it casually':
		cla & *nl
		'<<$npc_firstname[$boy]>> watches you pop the pill out of its packaging and into your mouth.'
		'"There," you say, forcing it down with a dry swallow. "Problem solved."'
		sex_ev['ma_pill'] = 2
		gs 'medical_din', 'morning_after_pill_function'
		gs'sex_ev_after', 'after_sex2'
	end
	
	act'Take it shyly':
		cla & *nl
		'<<$npc_firstname[$boy]>> watches you pop the pill out of its packaging and you can''t help but blush beneath his gaze.'
		'"Problem solved," you say, feeling your cheeks redden even further as you force it down with a dry swallow.'
		sex_ev['ma_pill'] = 2
		gs 'medical_din', 'morning_after_pill_function'
		gs'sex_ev_after', 'after_sex2'
	end
	
	act'Take it sexily':
		cla & *nl
		'As <<$npc_firstname[$boy]>> watches you pull the pill from its packaging, you stick out your tongue at him, popping the pill onto it and swallowing with a wide grin.'
		if $sex_ev['last_cum'] = 'swallow' and totminut < sex_ev['finish_time'] + 5:
			'"Chaser," you wink.'
		else
			'"There," you smirk. "Problem solved."'
		end
		sex_ev['ma_pill'] = 2
		gs 'medical_din', 'morning_after_pill_function'
		gs'sex_ev_after', 'after_sex2'
	end
end

if $ARGS[0] = 'birth_control_pill_take':
!!	if birth_control['remind_hour'] > 0 and hour >= birth_control['remind_hour'] and hour <= birth_control['remind_hour'] + 1 and tabletkiday ! daystart and sex_ev['angry_after'] = 0:
	if birth_control['remind_hour'] > 0 and tabletkiday ! daystart and sex_ev['angry_after'] = 0 and sex_ev['bc_take'] ! 1 and sex_ev['sleepover'] = 0 and (mc_inventory['contraceptive_pill'] > 0 or pillsleft[ptype] > 0):
		act'Take your birth control':
			birth_control['message_skip'] = daystart
			sex_ev['bc_take'] = 1
			gs 'din_bad', 'quick_takepill'
			cla & *clr
			$sex_ev['bed_room']
			if birth_control['remind_hour'] > 0 and hour >= birth_control['remind_hour'] and hour <= birth_control['remind_hour'] + 1 and tabletkiday ! daystart and sex_ev['bc_take'] ! 1:
				'You notice your phone winking a calendar reminder at you:'
				*nl
				'<i><font color="pink"><b>Take your vitamins!</b></font></i>'
				*nl
				'Right, you need to take your birth control pill for the day.'
			else
				if hour >= birth_control['remind_hour']:
					'A spark fires somewhere in the back of your brain reminding you of something very important.'
					*nl
					'"Oh shit! I almost forgot to take my birth control!"'
				else
					'A sudden thought pops into your head.'
					*nl
					'You haven''t taken your birth control pill for the day.'
				end
			end
			if sex_ev['boy_asleep'] = 1:
				iif(cum_loc['vagina'] > 0, 'With <<$npc_firstname[$boy]>> snoring softly beside you and his cum leaking from your snatch, you dig into your purse and pull out your birth control, gulping the pill with a dry swallow.', 'With <<$npc_firstname[$boy]>> snoring softly beside you, you dig into your purse and pull out your birth control, gulping the pill with a dry swallow.')
			else
				gs 'sex_ev_after', 'birth_control_pill_take2'
			end
		end
	end
end

if $ARGS[0] = 'birth_control_pill_take2':
	act'Take it shyly':
		cla & *clr
		if sex_ev['get_up'] = 0:
			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
		else
			$sex_ev['bed_room']
		end
		if cumloc[0] > 0:
			'With <<$npc_firstname[$boy]>>''s cum still leaking from your pussy, you reach down to your purse and pull out your birth control.'
			*nl
			if sex_ev['risky_creampie'] = 1:
				'"Hopefully we won''t have to worry about this stuff soon," you smile, shyly placing the pill between your lips and swallowing.'
			else
				'"This is what the pill is for after all," you smile, shyly placing the pill between your lips and swallowing.'
			end
		else
			'You reach down to your purse and pull out your birth control.'
			*nl
			if pillcon2 > 20000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"I think it''ll kick in soon," you smile, shyly placing the pill between your lips and swallowing.'
			elseif pillcon2 > 10000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"It''s gonna be a while before it starts working," you smile, shyly placing the pill between your lips and swallowing.'
			elseif pillcon2 > 0 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"I only just started it," you smile, shyly placing the pill between your lips and swallowing.'
			else
				'"This is what the pill is for after all," you smile, shyly placing the pill between your lips and swallowing.'
			end
		end
		gs'sex_ev_after', 'after_sex2'
	end
	
	act'Take it casually':
		cla & *clr
		if sex_ev['get_up'] = 0:
			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
		else
			$sex_ev['bed_room']
		end
		if cumloc[0] > 0:
			'With <<$npc_firstname[$boy]>>''s cum still leaking from your pussy, you reach down to your purse and pull out your pills.'
			*nl
			'"My birth control," you explain, casually placing the pill between your lips and swallowing.'
		else
			'You reach down to your purse and pull out your birth control.'
			*nl
			if pillcon2 > 20000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"My birth control," you explain, casually placing the pill between your lips and swallowing. "It should be fully effective any day now."'
			elseif pillcon2 > 10000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"My birth control," you explain, casually placing the pill between your lips and swallowing. "Although it''ll be a while longer before it starts working."'
			elseif pillcon2 > 0 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"My birth control," you explain, casually placing the pill between your lips and swallowing. "I only just started recently."'
			else
				'"My birth control," you explain, casually placing the pill between your lips and swallowing.'
			end
		end
		gs'sex_ev_after', 'after_sex2'
	end
	
	act'Take it sexily':
		cla & *clr
		if sex_ev['get_up'] = 0:
			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
		else
			$sex_ev['bed_room']
		end
		if cumloc[0] > 0:
			'With <<$npc_firstname[$boy]>>''s cum still leaking from your pussy, you reach down to your purse and pull out your birth control.'
			'You give him a sly look and open your mouth wide, sticking out your tongue and placing the pill in the middle of it. You withdraw it into your mouth and gulp hard, all without breaking eye contact with <<$npc_firstname[$boy]>>.'
			*nl
			if sex_ev['risky_creampie'] = 1:
				'"You better hope this stuff kicks in soon," you grin.'
			elseif birth_control['think_safe'] = 1:
				'"My baby police pill," you grin. "So you can keep coming inside me without worry."'
			else
				'"This is what the pill is for after all," you grin.'
			end
		else
			'You reach down to your purse and pull out your birth control.'
			'Giving <<$npc_firstname[$boy]>> a sly look, you open your mouth wide, sticking out your tongue and placing the pill in the middle of it. You withdraw it into your mouth and gulp hard, all without breaking eye contact with <<$npc_firstname[$boy]>>.'
			*nl
			if pillcon2 > 20000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"Just a few more days and we''ll never have to worry about condoms again," you grin.'
			elseif pillcon2 > 10000 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"It''ll take a little while, but then we''ll never have to worry about condoms again," you grin.'
			elseif pillcon2 > 0 and birth_control['think_safe'] ! 1:
				npc_know_bc_not_effective[$boy] = 1
				'"I only just started," you grin. "But in about a few weeks, we''ll be able to go condom free."'
			else
				'"Nothing sexier than safe sex," you grin.'
			end
		end
		gs'sex_ev_after', 'after_sex2'
	end
end


if $ARGS[0] = 'smoke_ciga1':
	act'Never mind': cla & gs'sex_ev_after', 'after_sex2'

	if mc_inventory['cigarettes'] > 0 and sex_ev['angry_after'] = 0:
		act'One of yours':gt'sex_ev_after', 'smoke_ciga2'

		act'Play with your phone':
			sex_ev['phone'] = 2
			gt'sex_ev_after', 'smoke_ciga2'
		end
	end
	if sex_ev['boy_in_shower'] ! 1:
		act'Bum a cigarette':
			sex_ev['bum_cigarette'] = 1
			mc_inventory['cigarettes'] += 1
			gt 'sex_ev_after', 'smoke_ciga_bum'
		end
		
		act'Bum a cigarette and play with your phone':
			sex_ev['bum_cigarette'] = 1
			sex_ev['cigarette'] = 3
			mc_inventory['cigarettes'] += 1
			gt 'sex_ev_after', 'smoke_ciga_bum'
		end
	end
end

if $ARGS[0] = 'smoke_ciga2':
	npc_know_pc_smoker[$boy] = 1
	cla & *clr
	'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke0.jpg"></center>'
	if sex_ev['boy_in_shower'] ! 1 and npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
		'Watching <<$npc_firstname[$boy]>> inspires you to reach for your own cigarettes and light up too.'
	elseif sex_ev['annoyed'] > 0:
		'Feeling very irritated at <<$npc_firstname[$boy]>>, you grab a cigarette and light up.'
	elseif sex_ev['cigarette'] = 1:
		'Still unsatisfied, you pull another cigarette from the box and flick your lighter, '
	else
		'You pull a cigarette from your purse and place it in your mouth, sparking it with your lighter while inhaling deeply.'
	end
	
	gs'sex_ev_after', 'smoke_ciga_act'
end

if $ARGS[0] = 'smoke_ciga_bum':
	npc_know_pc_smoker[$boy] = 1
	cla & *clr
	if npc_smoker[$boy] > 0:
		'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke0.jpg"></center>'
		'"Can I get one of those?" you ask.'
		'<<$npc_firstname[$boy]>> hands over his pack to you and you accept one gratefully, lighting it and inhaling deeply.'
		gs'sex_ev_after', 'smoke_ciga_act'
	else
		'<center><img <<$set_imgh>> src="images/shared/sex/after/annoyed1.jpg"></center>'
		'"Got any smokes?" you ask but <<$npc_firstname[$boy]>> just shakes his head.'
		'"I don''t smoke. It''s bad for you y''know."'
		
		act'Damn':
			cla & *nl
			'"Damn," you sigh unhappily. "A cigarette is just what I need right now..."'
			gs'sex_ev_after', 'relax_together'
		end
		
		act'I should probably quit':
			cla & *nl
			'"I should probably quit too," you say ruefully. "It just feels so good to smoke one after sex..."'
			gs'sex_ev_after', 'relax_together'
		end
	end
end

if $ARGS[0] = 'smoke_ciga_act':
	act'Smoke':
		gs 'drugs', 'smoke'
		if sex_ev['phone'] = 2:gt'sex_ev_after', 'smoke_phone'
		cla & *clr
		if sex_ev['boy_in_shower'] ! 1:
			if npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
				sex_ev['boy_smoked'] = 1
				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
				if sex_ev['annoyed'] > 0:
					'The two of you puff away in silence, smoking up your irritation and refusing to speak to one another.'
				else
					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed. <<$npc_firstname[$boy]>> does the same beside you.'
				end
			else
				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
				if sex_ev['annoyed'] > 0:
					'You focus entirely on the cigarette in your mouth, making a point of ignoring <<$npc_firstname[$boy]>> for as long as it burns between your lips.'
				elseif sex_ev['cigarette'] = 1:
					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. The smoke trails hazily around the room as you enjoy another cigarette.'
				else
					'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed.'
				end
			end
			gs'sex_ev_after', 'smoke_ciga_react'
		else
			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
			if sex_ev['cigarette'] = 1:
				'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. The smoke trails hazily around the room as you enjoy another cigarette' + iif(sex_ev['boy_asleep'] = 0, '.', ' while <<$npc_firstname[$boy]>> snores softly beside you.')
			else
				'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, relaxing into the bed' + iif(sex_ev['boy_asleep'] = 0, '.', ' while <<$npc_firstname[$boy]>> snores softly beside you.')
			end
			gs'sex_ev_after', 'after_sex2'
		end
		sex_ev['cigarette'] = 1
	end
end

if $ARGS[0] = 'smoke_phone':
	cla & *clr
	if npc_smoker[$boy] > 0 and sex_ev['boy_smoked'] ! 1:
		sex_ev['boy_smoked'] = 1
		'<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
		'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, reaching down for your phone to start scrolling through feeds as you relax into the bed.'
	else
		'<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
		if sex_ev['cigarette'] = 1:
			'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. The smoke trails hazily around the room as you enjoy another cigarette while continuing to tap away at your phone.'
		else
			'Smoke fills your lungs and you hold it there, savouring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, reaching for your phone before relaxing into the bed.'
		end
	end
	sex_ev['cigarette'] = 1
	gs'sex_ev_after', 'smoke_phone'
end

if $ARGS[0] = 'smoke_ciga_react':
	act'"I needed this"':
		cla & *clr
		if sex_ev['phone'] > 0:
			'<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
			'"Ahhh... I needed this..." you sigh happily, tapping through your phone while exhaling a plume of smoke.'
		else
			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
			'"Ahhh... I needed this..." you sigh happily, feeling your body totally unwind as you exhale a plume of smoke.'
		end
		gs'sex_ev_after', 'relax_together'
	end
	
	if sex_ev['fuck_count'] > 0:
		act'Always smoke after sex':
			cla & *clr
			if sex_ev['phone'] > 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/after/phone_smoke.jpg"></center>'
				'"There''s just nothing like a cigarette after sex..." you sigh happily, tapping through your phone while exhaling a plume of smoke.'
			else
				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke1.jpg"></center>'
				'"There''s just nothing like a cigarette after sex..." you sigh happily, feeling your body totally unwind as you exhale a plume of smoke.'
			end
			gs'sex_ev_after', 'relax_together'
		end
	end
end

if $ARGS[0] = 'spend_night_ask':
	if (hour >= 20 or $daystage['desc'] = 'mid_night') and sex_ev['spend_night'] = 0 and sex_ev['angry_after'] = 0 and sex_ev['sleepover'] = 0 and $sex_ev['loc'] ! 'pc_home' and sex_ev['boy_in_shower'] ! 1:
		act'Ask to spend the night':
			sex_ev['spend_night'] = 1
			cla & *clr
			$sex_ev['bed_room']
			if $sex_ev['loc'] = 'npc_home':
				$sex_ev['spend_night_question'] = '"Mind if I spend the night?" you ask'
			elseif $sex_ev['loc'] = 'hotel_room':
				$sex_ev['spend_night_question'] = '"I can sleep here, right?" you ask'
			end
			'<<$sex_ev[''spend_night_question'']>>'
			act'I don''t feel like going home':
				cla & *clr
				$sex_ev['bed_room']
				'<<$sex_ev[''spend_night_question'']>>. "I don''t feel like going home tonight."'
				gs'sex_ev_after', 'spend_night'
			end

			if mid($start_type,1,2) = 'sg':
				act'I''m sick of my mom':
					cla & *clr
					$sex_ev['bed_room']
					'<<$sex_ev[''spend_night_question'']>>. "My mom has been such a bitch lately and I don''t want to see her."'
					gs'sex_ev_after', 'spend_night'
				end
			end
			
			if hour < 5:
				if mid($start_type,1,2) = 'sg':
					act'Avoid my mom':
						cla & *clr
						$sex_ev['bed_room']
						'<<$sex_ev[''spend_night_question'']>>. "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'sex_ev_after', 'spend_night'
					end
				end
			end
			
			if hour >= 22 or hour < 5:
				act'It''s late':
					cla & *clr
					$sex_ev['bed_room']
					'<<$sex_ev[''spend_night_question'']>>. "It''s late and I don''t want to go."'
					gs'sex_ev_after', 'spend_night'
				end
			end
			
			if pcs_lover - pcs_girlfriends > 0 and living_with_npc > 0:
				act'I don''t want to see my boyfriend(annoyed)':
					cla & *clr
					$sex_ev['bed_room']
					'<<$sex_ev[''spend_night_question'']>>. "My boyfriend''s been pissing me off lately and I don''t want to go home to that."'
					gs'sex_ev_after', 'spend_night'
				end

!!{				act'I don''t want to see my boyfriend(guilt)':


				end}
			end
		end
	end
end

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 < 20 and hour > 16:
			sex_ev['cant_stay'] = 1
			if $sex_ev['loc'] = 'npc_home':
				'"Sorry, can''t. My girlfriend wanted to come over tonight. In fact, you should leave soon before she catches you."'
			elseif $sex_ev['loc'] = 'hotel_room':
				'"Sorry, can''t. Booked the room for a date with my girlfriend. In fact, you should leave now before before she arrives."'
			end
			'"Ugh. <i>Bitch!</i>"'
			'"Yeah, I know. Sucks."'
			gs'sex_ev_after', 'after_sex2'
		else
			if $sex_ev['loc'] = 'npc_home':
				'"Sure, my girlfriend isn''t gonna be around for a while. You can crash here."'
			elseif $sex_ev['loc'] = 'hotel_room':
				'"Sure. The room is booked until tomorrow anyways."'
			else
				'"Of course," he smiles.'
			end
			
			gs'sex_ev_after', 'cuddle_up'
		end
	else
		!! this means he''s cheating on someone with you
		if rand(1,10) > 7 and hour < 22:
			sex_ev['cant_stay'] = 1
			'"Sorry, can''t. I have something to do in the morning."'
			'"Ugh, really?"'
			'"Yeah, I know. Sucks."'
			gs'sex_ev_after', 'after_sex2'
		elseif npc_girlfriend[$boy] = 1 and hour < 20 and hour > 16:
			sex_ev['cant_stay'] = 1
			npc_cheating_know[$boy] = 1
			'"Sorry, my girlfriend is coming over soon. Can''t let her catch you here."'
			'"Ugh, really?"'
			'"Yeah, I know. Sucks."'
			gs'sex_ev_after', 'after_sex2'
		else
			'"Sure, I''m not doing anything tomorrow. You can crash here."'
			'"Thanks," you yawn, snuggling into <<$npc_firstname[$boy]>>. "Appreciate it."'
			gs'sex_ev_after', 'cuddle_up'
		end
	end
end

if $ARGS[0] = 'cuddle_up':
	act'Cuddle up':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle1.jpg"></center>'
		'"Thanks," you yawn, snuggling into <<$npc_firstname[$boy]>>. "Appreciate it."'
		'He wraps his arms around you in return and you close your eyes, allowing yourself to drift off into sleep.'
		act'. . .':gt'sex_ev_after', 'sleep_function'
	end
	
	act'Get under the covers (separated)':
		cla & *clr
		$sex_ev['bed_room']
		if npc_cuddler[$boy] = 0:
			'"Thanks," you yawn, crawling under the covers. "Appreciate it."'
			'You snuggle into their warmth and close your eyes, allowing yourself to drift off into sleep.'
			act'. . .':gt'sex_ev_after', 'sleep_function'
		else
			'"Thanks," you yawn, crawling under the covers. "Appreciate it."'
			'You start to snuggle into their warmth and close your eyes when you feel <<$npc_firstname[$boy]>>''s arm wrap around you.'
			act'Get closer':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle2.jpg"></center>'
				'With a smile, you twist around and intertwine your legs with <<$npc_firstname[$boy]>>''s, getting even closer. Your thighs hug his. His flaccid member presses against your pelvis. Your breasts smush into his chest.'
				act'. . .':gt'sex_ev_after', 'sleep_function'
			end
			
			act'Uncomfortable':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/after/cuddle_reluctant1.mp4"></video></center>'
				'"What are you doing?" you ask stiffly.'
				'"Just getting close," he murmurs, pressing his body up against yours.'
				*nl
				'Uncomfortably, you turn away, stifling deep sighs of exasperation and try to fall asleep. <<$npc_firstname[$boy]>> pressing into your back with his flaccid member right between your ass cheeks make it a challenge, but <i>eventually</i> you manage to drift off into sleep.'
				act'. . .':gt'sex_ev_after', 'sleep_function'
			end
		end
	end
end

if $ARGS[0] = 'cuddle_up2':
	if sex_ev['boy_asleep'] = 1 and $sex_ev['loc'] ! 'house_party':
		act'Sleep with <<$npc_firstname[$boy]>>':
			cla
			act'Nevermind':gt'sex_ev_after', 'after_sex2_w_picture'
			act'Cuddle up':
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle1.jpg"></center>'
				'With your eyelids growing heavy, you snuggle up with <<$npc_firstname[$boy]>>, sharing in his warmth and close your eyes. Moments later, sleep takes you.'
				act'. . .':gt'sex_ev_after', 'sleep_function'
			end
			
			act'Get under the covers':
				cla & *clr
				$sex_ev['bed_room']
				'With your eyelids growing heavy, you decide to get under the covers, snuggling into their warmth and close your eyes. Moments later, sleep takes you.'
				act'. . .':gt'sex_ev_after', 'sleep_function'
			end
		end
	end
end

if $ARGS[0] = 'bed':
	minut += rand(1,2)
	gs'stat'
	if pcs_pubes < 4:
		'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep1.jpg"></center>'
	else
		'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep2.jpg"></center>'
	end
	'Your eyelids feel so heavy right now. You should probably get up but... you just need to rest your eyes...'
	*nl
	'just... for... a minute...'
	act'Drift off into sleep':
		cla & *clr
!!		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
		sex_ev['sleep_accident'] = 1
		if cum_loc['face'] > 0:
			!! face
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/sleep<<rand(1,3)>>.jpg"></center>'

		elseif cum_loc['stomach'] > 0:
			!! stomach
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/stomach/sleep1.jpg"></center>'
		elseif cum_loc['ass'] > 0 or cum_loc['back'] > 0:
			!! butt
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/back1.jpg"></center>'
		elseif cum_loc['vagina'] > 0:
			!! vagina
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after2.jpg"></center>'
	!!				'Tired, you curl up onto your side to face <<$npc_firstname[$boy]>>, passively aware that his cum is still leaking from your pussy, slowly dribbling down the curve of your thigh.'
		else
			'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
		end
		'<i>just... for... a minute...</i>'
		*nl
		'That''s the last thing you remember before everything fading into darkness...'
		act'. . .':gt'sex_ev_after', 'sleep_function'
	end
	gs 'willpower', 'misc', 'self'
	if will_cost <= pcs_willpwr:
		act'Force yourself to get up (<<will_cost>> Willpower)':
			cla & *clr
			sex_ev['get_up'] = 1
			$sex_ev['bed_room']
			'With tremendous effort, you force your eyes open and haul yourself out of bed. You can''t fall asleep now, not yet.'
			gs'sex_ev_after', 'after_sex2'
		end
	else
		act'Force yourself to get up (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end

if $ARGS[0] = 'sore_pussy_msg':
	if sex_ev['fuck_time_total'] > pcs_vag * 3:
		if pain['vaginal'] + (vgape * 8) > 70:
			'Your pussy throbs painfully, drawing involuntary winces every time. The way it feels, you seriously wonder if you''ll be able to walk tomorrow.'
		elseif pain['vaginal'] + (vgape * 8) > 40:
			'Your pussy throbs sorely, hot and painfully like a bruise. It''s a little hard to keep your legs together right now.'
		elseif pain['vaginal'] > 10:
			'Your pussy throbs uncomfortably between your legs, pulsing like a well-worn-out muscle. Which, you suppose, it is right now.'
		end
	end
end

if $ARGS[0] = 'sleep':
	act'Fall asleep':
		cla & *nl
		'You lay there, your eyelids slowly grow heavier until they close completely and your consciousness drifts slowly into darkness...'
		act'. . .':gt'sex_ev_after', 'sleep_function'
	end
end

if $ARGS[0] = 'sleep_function':
	gs 'sex_ev_sex', 'session_reset'
	gs 'arousal', 'end'
!!{	if $sex_ev['loc'] = 'npc_home':
		if hour < 20:
			sex_ev['lover_left'] = 1
		else
			if rand(1,10) >= 5:
				sex_ev['lover_left'] = 1
			end
		end
	end}
	
	if rand(1,10) < npc_sexdrive[$boy] - (sex_ev['cum_count']/2) + npc_sleep_sex_okay[$boy] + npc_selfish[$boy] and (stat['think_virgin'] ! 1 or sex_ev['fuck_count'] > 0) and sex_ev['sleep_fuck'] = 0 and sex_ev['lover_left'] ! 1:
		sex_ev['sleepover'] = 1
		if rand(0,1) = 1:
			sex_ev['extra_cum'] += 5
			sex_ev['sleep_time'] = rand(1,3)
			minut += 60*sex_ev['sleep_time']
			pcs_sleep += 15*sex_ev['sleep_time']
			pcs_health += 5*sex_ev['sleep_time']
			gs'stat'
			sex_ev['sleep_fuck'] = 1
		else
			if alko > 6:
				gs'sleep_simple', 'simple'
				gs'pain', 3, 'head', 'ache'
			else
				gs'sleep_simple', 'simple'
			end
			sex_ev['extra_cum'] += 5
			sex_ev['wake_fuck'] = 1
		end
	else
		sex_ev['extra_cum'] += 5
		sex_ev['sleepover'] = 1
		if alko > 6:
			sex_ev['hangover'] = 1
			gs'sleep_simple', 'simple'
			gs'pain', 3, 'head', 'ache'
		else
			gs'sleep_simple', 'simple'
		end

		if mid($start_type,1,2) = 'sg' and func('homes_properties', 'has_access', 'parents_home'): sveta_punishment['no_come_home'] = 1
		gt'sex_ev_wakeup', 'start'
	end
	
	if npc_latesleeper[$boy] = 0 and npc_caretaker[$boy] = 1 and rand(1,4) < 4 and $sex_ev['loc'] ! 'hotel_room':
		sex_ev['boy_make_breakfast'] = 1
		if sex_ev['boy_shower'] = 1: sex_ev['boy_shower'] = 0
	elseif npc_earlyriser[$boy] = 1 and sex_ev['wake_fuck'] ! 1:
		if rand(1,2) = 1:
			sex_ev['boy_in_shower'] = 1
		else
			sex_ev['boy_shower'] = 1
			sex_ev['npc_morning_shower'] = 1
		end
!!	else
!!		if sex_ev['boy_shower'] = 1: sex_ev['boy_shower'] = 0
	end
	
	if sex_ev['wake_fuck'] = 1:
		gt'sex_ev_sex', 'wakeup_sex'
	elseif sex_ev['sleep_fuck'] = 1:
		gt'sex_ev_sex', 'sleep_sex'
	elseif sex_ev['sleep_fuck'] = 0:
		gt'sex_ev_wakeup', 'start'
	else
		!! failsafe option
		gt'sex_ev_wakeup', 'start'
	end
end
--- sex_ev_after ---------------------------------