# sex_ev_shower

!! anything with the 'before_' prefix happens at the start of a booty call
!! anything with the 'after_' prefix happens after the main content of a booty call


if $ARGS[0] = 'shower_alone_direct':
!!	if sex_ev['sleepover'] = 1:
		act'Shower':gt'sex_ev_shower', 'after_alone'
!!	else
		
!!	end
end

if $ARGS[0] = 'shower_finish_direct':
	
end

if $ARGS[0] = 'before_borrow_shower':
	act'"Use your shower?"':
		cla & *nl
		'"Can I borrow your shower before we get started?" you ask.'
		!! replace with an npc stat later
		if rand(0,1) = 1:
			'"I don''t mind the sweat," he answers, grinning.'
			act'I want to shower':
				gs 'sex_ev_start', 'undress_function'
				cla & *nl
				'"It''s for me," you roll your eyes. "I''ll feel better if I clean up first."'
				if rand(1,10) < npc_sexdrive[$boy]:
					'"How about I join you in there?" he says looking at you meaningfully.'
					gs'sex_ev_shower', 'borrow_shower2'
				else
					'"Okay," he snickers back.'
					gs'sex_ev_shower', 'borrow_shower3'
				end
			end
			act'If you don''t mind...':
				cla & *nl
				'"Well, if <i>you</i> don''t care then..."'
				'You give him a lewd smirk and rush inside, slamming the door behind him.'
				act'Take it to the bed':gt 'sex_ev_start', 'undress'
			end
			
			if pcs_horny >= 70:
				act'Good, I''m horny':
					cla & *nl
					'"Good, because I''m super horny right now..."'
					'You practically tackle him inside, barely managing to close the door before making your way to the bedroom.'
					act'Clothes. Off. Now.':gt 'sex_ev_start', 'undress'
				end
			end
		else
			gs 'sex_ev_start', 'undress_function'
			if rand(1,10) < npc_sexdrive[$boy]:
				'"How about I join you in there?" he says looking at you meaningfully.'
				gs'sex_ev_shower', 'borrow_shower2'
			else
				'"Sure," he says, widening the door for you to come in.'
				gs'sex_ev_shower', 'borrow_shower3'
			end
		end
	end
end

if $ARGS[0] = 'borrow_shower2':
	act'Save it for later':
		cla & *nl
		'"Save it for the bedroom," you smirk, pushing past and heading for the bathroom.'
		act'Take a shower':gt'sex_ev_shower', 'before_alone'
	end
	
	act'Sure':
		cla & *nl
		'"That sounds great," you say huskily, voice dripping with arousal.'
		'The two of you rush to the bathroom, peeling off each other''s clothes along the way.'
		act'Shower together':gt'sex_ev_shower', 'shower_together1'
	end
end

if $ARGS[0] = 'borrow_shower3':
	act'Take a shower':gt'sex_ev_shower', 'before_alone'
	act'You could join me':
		cla & *nl
		'"You know, you could always... join me?" you say huskily. "We could get <i>wet</i> together.'
		'<<$npc_firstname[$boy]>> locks eyes with you for a split second before both of you rush for the bathroom, peeling off each other''s clothes along the way.'
		act'Shower together':gt'sex_ev_shower', 'shower_together1'
	end
end

!! --------------------------------- Shower Alone ---------------------------------------


if $ARGS[0] = 'before_alone':
	minut += 5
	cla & *clr
	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
	noshampoo = 1
	dynamic $showerdin
	sex_ev['start_shower'] = 1
	gs 'stat'
	'You slip into the bathroom and turn on the faucet. Hot water comes pouring out and you gratefully step under, rinsing the sweat from your body.'
	act'Finish':
		cla & *clr
		$sex_ev['bed_room']
		'A few minutes later, you turn off the water and step out, getting practically attacked by <<$npc_firstname[$boy]>> as soon as you open the door.'
		gs 'sex_ev_foreplay', 'bed_start'
	end
end

if $ARGS[0] = 'after_alone':
	minut += 5
	cla & *clr
	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
	noshampoo = 1
	dynamic $showerdin
	sex_ev['start_shower'] = 1
	gs 'stat'
	'You slip into the bathroom and turn on the faucet. Hot water comes pouring out and you gratefully step under, rinsing the post-sex feeling from your body.'
	act'Finish':
		cla & *clr
		$sex_ev['bath_room']
		'A few minutes later, you turn off the water and step out, clean and dripping.'
		gs'sex_ev_shower', 'after_alone_towel'
	end
	
	act'Rub one out':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/mast1.mp4"></video></center>'
		if hypnoHardToCum = 1:
			gs 'arousal', 'clit_finger', 10, 'no_orgasm_msg', 'masturbate'
			'You try as hard as you can to get an orgasm, but you just can''t. Finally, you shut off the water in frustration and step out, annoyed and dripping.'
		else
			$orgasm_or = 'yes'
			gs 'arousal', 'clit_finger', 10, 'no_orgasm_msg', 'masturbate'
			if sex_ev['orgasm_count'] = 0:
				'You masturbate to finally get at least one orgasm.'
			else
				'You masturbate to get one more orgasm.'
			end
		end
		gs 'sex_ev_shower', 'after_alone_towel'
	end
end

if $ARGS[0] = 'after_alone_towel':
	act'Put on a towel':
		cla & *clr
		sex_ev['towel'] = 1
		'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/towel.jpg"></center>'
		'You quickly wrap yourself in a spare towel from the cupboard. <<$npc_firstname[$boy]>> is still laying in bed, only covered by a sheet.'
		*nl
		'"Thanks," you smile at him.'
		gs'sex_ev_after', 'after_sex2'
	end
	act'Wrap it around your head':
		cla & *clr
		sex_ev['towel'] = 1
		sex_ev['towel_head'] = 1
		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/towel_head1.jpg"></center>'
		'You pull a towel from the cupboard and dry your body with it, only pausing to wrapping it around your hair before opening the door. Upon stepping out of the bathroom, <<$npc_firstname[$boy]>> eyes light up at the sight of your body, completely naked except for the towel turban atop your head.'
		*nl
		'"Thanks," you smile at him.'
		gs'sex_ev_after', 'after_sex2'
	end
	act'Skip the towel':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/no_towel.jpg"></center>'
		'You give your hair a quick wipe with <<$npc_firstname[$boy]>>''s towel to leave it merely damp instead of soaked and exit the bathroom.'
		'His eyes light up as you step into his bedroom, naked, and still wet from the shower.'
		gs'sex_ev_after', 'after_sex2'
	end
	
	act'Stay to use the mirror':gt'sex_ev_after', 'boy_bathroom'
end

if $ARGS[0] = 'morning_alone':
	cla & *clr
	$sex_ev['bath_room']
	if sex_ev['boy_asleep'] = 1:
		'You leave <<$npc_firstname[$boy]>> snoring on the bed and sleepily pad your way into the bathroom, yawning along the way.'
	else
		'You leave <<$npc_firstname[$boy]>> in the bed and pad your way into the bathroom, yawning along the way..'
	end
	
	act'Shower':
		minut += 5
		cla & *clr
		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
		noshampoo = 1
		dynamic $showerdin
		gs 'stat'
		if sex_ev['morning_fuck'] = 0:
			'You turn the knob on the faucet and hot water comes pouring out, rinsing the sleep from your eyes.'
		else
			'You turn the knob on the faucet and hot water comes pouring out, washing away the sweat of the sex you decided to start the day with.'
		end
		
		if sex_ev['boy_asleep'] = 1 and rand(1,10) < npc_sexdrive[$boy] and sex_ev['morning_fuck'] = 0:
			sex_ev['boy_asleep'] = 0
			'A few minutes later, you hear the door open and <<$npc_firstname[$boy]>> comes clambering into the shower after you.'
			act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'shower_together1'
		else
			'After a few minutes spent soaking, you decide you''ve had enough and turn off the tap, exiting the shower feeling awake and refreshed.'
			act'Finish':gt'sex_ev_after', 'boy_bathroom'
		end
	end
end

if $ARGS[0] = 'morning_look1':
	cla & *clr
	'<center><video autoplay loop src="images/shared/romance/misc/nude_walk1.mp4"></video></center>'
	'Curious to know where <<$npc_firstname[$boy]>> is, you climb out of bed, wandering his apartment looking for him. A few doors down the hall, you realize you hear water running in the bathroom. He must be taking a shower.'
	act'Head back to the bedroom':gt'sex_ev_morning', 'morning_menu2'
	act'Wait your turn':
		minut += rand(1,5)
		gs 'stat'
		cla & *clr
		$sex_ev['hall_way']
		'You wait a few minutes waiting outside the door for <<$npc_firstname[$boy]>> before you hear the water shuts off and he opens the door, his hair wet and a towel wrapped around his waist.'
		'"Hey," you say. "Can I use it now?"'
		'"Sure," <<$npc_firstname[$boy]>> replies, smirking as he shamelessly ogles your nude body.'
		'"Thanks," you smile, casually walking past him and closing the door behind you.'
		act'Take a shower':gt'sex_ev_morning', 'shower2'
	end
	act'Join <<$npc_firstname[$boy]>> in the shower':gt'sex_ev_shower', 'shower_join1'
end

!! --------------------------------- Shower Together ---------------------------------------


if $ARGS[0] = 'shower_join1':
	cla & *clr
	sex_ev['join_shower'] = 1
	sex_ev['boy_shower'] = 1
	sex_ev['orgasm'] = orgasm
	'<center><video autoplay loop src="images/shared/sex/shower/join1.mp4"></video></center>'
	'A blast of steam hits you in the face as you open the bathroom door. You pad your way inside and open the shower to find <<$npc_firstname[$boy]>> under the faucet.'
	gs 'sex_ev_shower', 'shower_join2'
end

if $ARGS[0] = 'shower_join2':
	act'Get under the water with him':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
		'You slip in tight, under the water right beside <<$npc_firstname[$boy]>>.'
		if sex_ev['join_shower_offer'] = 1:
			sex_ev['join_shower_offer'] = 0
			'"Couldn''t resist after all, huh?" he smirks as his hands immediately start roaming your body .'
		else
			'He doesn''t miss a beat and his hands start roaming your body before your hair is even properly wet.'
		end
		
		act'Didn''t want to wait':
			cla & *nl
			'"Didn''t want to wait my turn," you smirk over your shoulder.'
			act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'shower_together1'
		end
		
		act'Couldn''t resist':
			cla & *nl
			if sex_ev['join_shower_offer'] = 1:
				'"Yeah," you smile over your shoulder.'
			else
				'"I couldn''t resist joining you after all," you smirk over your shoulder.'
			end
			act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'shower_together1'
		end
		
		act'Save the planet':
			cla & *nl
			'"Showering together saves water, doesn''t it?" you grin over your shoulder. "Just doing my part to protect the planet."'
			act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'shower_together1'
		end
	end
	
	act'Grab his cock':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/jerkoff2.mp4"></video></center>'
		'Coming up right behind him, you wrap one arm around his chest and snake the other one down his waist to wrap his cock in your fingers.'
		if sex_ev['join_shower_offer'] = 1:
			sex_ev['join_shower_offer'] = 0
			'"Couldn''t resist after all, huh?" <<$npc_firstname[$boy]>> smirks as his soft shaft twitches in your grip.'
		else
			'<<$npc_firstname[$boy]>> doesn''t say anything but you hear his breathing grow heavy and his soft shaft twitches in your grip.'
		end
		act'Shower with <<$npc_firstname[$boy]>>':gs'sex_ev_shower', 'shower_together1'
		gs'sex_ev_shower', 'shower_together_jerkoff1'
		gs'sex_ev_shower', 'together_bj1'
		gs'sex_ev_shower', 'together_fuck_menu'
	end
end

if $ARGS[0] = 'boy_shower_join1':
	
end

if $ARGS[0] = 'shower_together1':
	sex_ev['orgasm'] = orgasm
	noshampoo = 1
	dynamic $showerdin
	gs'arousal', 'massage',5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
	gs'stat'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
	'Time passes indeterminately as you shower with <<$npc_firstname[$boy]>>, letting the hot water rain down on you. <<$npc_firstname[$boy]>> fills his hands with soap and runs them up and down your body, sudsing you up and grabbing big handfuls of your breasts and ass in the process.'
	
	act'Moan':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
		'"<i>Aahhh~!</i>"'
		*nl
		'Your soft moans encourage him even more and he gropes your tits with both hands, giving them a hard squeeze, producing a gasp from your lips.'
		gs'sex_ev_shower', 'shower_sex_menu'
	end
	
	act'Giggle':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
		'You giggle uncontrollably at his rabid pawing, only serving to encourage him even more and he gropes your tits with both hands, giving them a hard squeeze, producing a gasp from your lips.'
		gs'sex_ev_shower', 'shower_sex_menu'
	end
	
	act'"Just like that!"':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/grope2.mp4"></video></center>'
		'"<i>Aahhh~!</i> Just like that!"'
		*nl
		'You moan loudly, energizing his groping and making him grab your tits with both hands, giving them a mighty squeeze, producing a gasp to go along with your moans.'
		gs'sex_ev_shower', 'shower_sex_menu'
	end
	
	gs'sex_ev_shower', 'wash_boy1'
	gs'sex_ev_shower', 'shower_together_makeout1'
end

if $ARGS[0] = 'wash_boy1':
	act'Wash him':
		gs'arousal', 'massage_give', 5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		gs'arousal', 'foreplay_give', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/wash_boy1.mp4"></video></center>'
		'"Let me get you now," you smile, taking the soap from him.'
		*nl
		'After sudsing up your hands, you gently run them down his back, massaging his muscles as you do.'
		'"Let me get the front too," you whisper in his ears and wrap your arms around his shoulders. As you slide your hands down his chest, press yourself all the way up against him, smooshing the softness of your breasts into his back, feeling them slide around across the soap covering his skin.'
		if sex_ev['sex_over'] = 0:
			act'Finish showering':
				cla & *nl
				'"You want to finish this in the bedroom?" you whisper in his ear.'
				'"Yeah," he pants back, voice hoarse.'
				act'Take it to the bed':gt 'sex_ev_shower', 'before_to_the_bed'
			end
		else
			gs 'sex_ev_shower', 'shower_together_end'
		end
		
		gs 'sex_ev_shower', 'shower_reach_cock'
	end
end

!! --------------------------------- Shower Sex ---------------------------------------

if $ARGS[0] = 'shower_sex_menu':
	if sex_ev['cum_count'] >= 5 + sex_ev['extra_cum'] and rand(1,10) < npc_sexdrive[$boy]:
		*nl
		if sex_ev['sex_over'] = 0:
			'<<$npc_firstname[$boy]>> grins back at you but doesn''t push for something more, seeming just be revving you up for the main event.'
			*nl
			'"Bedroom now?" you gasp.'
			'"Bedroom," he agrees and shuts off the water.'
			act'Take it to the bed':gt 'sex_ev_shower', 'before_to_the_bed'
		elseif $sex_ev['position'] = 'makeout':
			'But eventually, you have to call it quits. As much as you and him are enjoying this, the soft state of his cock doesn''t seem like it''s going to change.'
			gs 'sex_ev_shower', 'shower_together_end'
		else
			'<<$npc_firstname[$boy]>> grins back at you but doesn''t push for something more, seeming content to just cop a feel for now.'
			gs 'sex_ev_shower', 'shower_together_end'
		end
	else
		gs'sex_ev_shower', 'shower_together_jerkoff1'
		gs'sex_ev_shower', 'together_bj1'
		gs'sex_ev_shower', 'together_fuck_menu'
	end
end

if $ARGS[0] = 'shower_reach_cock':
	act'Reach for his cock':
		$sex_ev['position'] = 'handjob'
		gs'arousal', 'hj',rand(2,5)
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/jerkoff2.mp4"></video></center>'
		'You allow the soap to slip from your fingers, instead snaking your hand down to wrap them around <<$npc_firstname[$boy]>>''s cock.'
		*nl
		if sex_ev['cum_count'] >= 5 + sex_ev['extra_cum'] or rand(1,10) > npc_sexdrive[$boy]:
			'Unfortunately, if you wanted something more, it seems like you already took it out of him. No matter how you work it, his cock stays soft and squishy, though not for lack of enjoyment on his part judging by the groans your fingers elicit.'
			gs 'sex_ev_shower', 'shower_together_end'
		else
			'He groans under your touch, growing in stiffness beneath the gentle jerking of your hand.'
			gs'sex_ev_shower', 'shower_together_jerkoff1'
			gs'sex_ev_shower', 'together_bj1'
			gs'sex_ev_shower', 'together_fuck_menu'
		end
	end
end

if $ARGS[0] = 'shower_together_makeout1':
	act'Makeout with <<$npc_firstname[$boy]>>':
		$sex_ev['position'] = 'makeout'
		gs'arousal', 'foreplay_give', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		gs'arousal', 'foreplay', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		gs'arousal', 'kiss', rand(2,5), 'no_orgasm_msg', $sex_ev['prostitution_flag']
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/kiss1.mp4"></video></center>'
		'Things start getting hot and heavy under the shower. <<$npc_firstname[$boy]>>''s lips find yours and you kiss him back, enjoying the moment. Moans are released into each other''s mouths as hands roam bodies with unrestricted access.'
		gs'sex_ev_shower', 'shower_sex_menu'
	end
end

if $ARGS[0] = 'shower_together_jerkoff1':
	act'Jerk his cock':
		$sex_ev['position'] = 'handjob'
		gs'arousal', 'clit_finger', -5, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		gs'arousal', 'hj', rand(2,5), 'no_orgasm_msg', $sex_ev['prostitution_flag']
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/fun3.mp4"></video></center>'
		'You and <<$npc_firstname[$boy]>> face each other, staring into one another''s eyes as you fondle your most intimate parts. His cock is alive in your hand, twitching, stiffening, and pulsing as you work it with fervor. His fingers are on your clit, flicking your bean with intensity, occasionally slipping past to worm their way into your dripping snatch.'
		*nl
		'It feels as though the steam should be coming from your heavy breaths instead of the water.'
		act'Make him cum':gs'sex_ev_shower', 'shower_together_jerkoff_cum'
		gs'sex_ev_shower', 'together_bj1'
		gs'sex_ev_shower', 'together_fuck_menu'
	end
end


if $ARGS[0] = 'together_bj1':
	act'Blow him':
		$sex_ev['position'] = 'blowjob'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/bj0.mp4"></video></center>'
		'Without a word, you kneel down, taking <<$npc_firstname[$boy]>>''s wet member in your mouth and noisily lick, suck, and slurp it as water rains down on your head.'
		*nl
		if $npc_fav_pos[$boy] = 'blowjob':
			'"You''re fucking incredible," <<$npc_firstname[$boy]>> groans beneath the ministrations of your lips and tongue. He''s rock hard between your lips, somehow seeming to grow even harder by the second.'
		else
			'<<$npc_firstname[$boy]>> groans softly beneath the ministrations of your lips and tongue, occasionally letting his hand rest on your hair as a gentle guide to let you know you''re doing well.'
		end
		*nl
		if stat['bj'] = 0 and sex_ev['bj_count'] = 0:
			'You think you''re doing pretty well for your first blowjob, but the most surprising part of it for you is the taste of cock. You run your tongue up the length of his shaft and... it doesn''t taste like anything. The flavor that stands out most to you is the mineral taste of tap water. Like rinsing your mouth out in sink. But with the texture of skin. Weird.'
		else
			'It tastes clean, you can''t help but notice, as you run your tongue up the length of his shaft. Not the usual flavors of salt and sweat you normally associate with sucking cock. Just the mineral taste of tap water. Advantages of shower head.'
		end
		
		act'Make him come':gt 'sex_ev_shower', 'shower_cum_mouth1'
		
		gs'sex_ev_shower', 'together_fuck_menu'
		
		if sex_ev['sex_over'] = 0:
			act'Take it to the bedroom':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/shower/bj5.mp4"></video></center>'
				'"Mmm mmrm mmm mmph mm mm mmph?"'
				'"What?" <<$npc_firstname[$boy]>> moans breathlessly. You let his cock slip from your mouth with a <i>pop</i>.'
				'"You wanna take this to the bed?" you ask, running your tongue up the length of his shaft before slipping the head back into your mouth.'
				'"Yeah," he says nodding, just as breathless as before.'
				act'Continue':gt 'sex_ev_shower', 'before_to_the_bed'
			end
		end
	end
end

if $ARGS[0] = 'together_fuck_menu':
	if stat['think_virgin'] = 0 or sex_ev['fuck_count'] > 0:
		act'Fuck him':
			cla
			sex_ev['fuck_count'] += 1
			sex_ev['shower_sex'] += 1
			sex_ev['orgasm'] = orgasm
			act'Put your leg up':gs 'sex_ev_shower', 'together_fuck_miss1'
			
			act'Bend over':gs 'sex_ev_shower', 'together_fuck_doggy1'
		end
	end
end

if $ARGS[0] = 'fuck_condom_check':
	if npc_free_creampies[$boy] < 2 and sex_ev['condom_setup'] ! 1:
		if npc_free_creampies[$boy] = 1 and sex_ev['safe_day'] = 0 and sex_ev['probably_safe_day'] = 0 and sex_ev['danger_day'] = 0:
			'"Is it safe?" <<$npc_firstname[$boy]>> whispers, asking if he can come inside you.'
			if stat['safe_day'] = 1:
				act'It''s safe':
					cla & *nl
					sex_ev['safe_day'] = 1
					sex_ev['no_condom'] = 1
					sex_ev['creampie_allowance'] = 1
					'"It''s safe," you gasp as he pushes his cock into the folds of your pussy. "You can come inside..."'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
			elseif stat['probably_safe_day'] = 1:
				act'Probably safe':
					cla & *nl
					sex_ev['probably_safe_day'] = 1
					sex_ev['no_condom'] = 1
					sex_ev['creampie_allowance'] = 1
					'"<i>Probably-!</i>" you squeak, gasping as he pushes his cock into the folds of your pussy. "You can come inside..."'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
			elseif stat['dangerous_day'] = 1:
				act'Not safe (pullout)':
					sex_ev['danger_day'] = 1
					sex_ev['no_condom'] = 1
					sex_ev['promise_no_creampie'] = 1
					cla & *nl
					'"It probably isn''t safe today," you admit. "But-"'
					'Your reply is interrupted by a small squeak when <<$npc_firstname[$boy]>> pushes his cock between your folds.'
					'"Don''t forget to pull out~!" you gasp as he starts to fuck your pussy.'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
				
				act'Not safe (condom after)':
					sex_ev['danger_day'] = 1
					sex_ev['promise_no_creampie'] = 1
					cla & *nl
					'"It probably isn''t safe today," you admit. "But-"'
					'Your reply is interrupted by a small squeak when <<$npc_firstname[$boy]>> pushes his cock between your folds.'
					'"You can''t come inside~!" you gasp as he starts to fuck your pussy. "We need to use condoms after this~!'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
			end
		else
			act'Don''t say anything':
				cla & *nl
				'"<i>Nngh~!</i>"'
				'A small squeak escapes your lips as he pushes his cock into the folds of your pussy.'
				act'Continue':gt 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
			end
			
			act'Remember to pullout':
				sex_ev['no_condom'] = 1
				sex_ev['promise_no_creampie'] = 1
				cla & *nl
				'"Don''t forget to pull- <i>Nngh~!</i>" Your warning is interrupted by a sharp breath when <<$npc_firstname[$boy]>> pushes his cock balls deep into your pussy.'
				'"... out," you finish with a sigh.'
				gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
			end
			
			act'Condom after (pullout)':
				sex_ev['promise_no_creampie'] = 1
				cla & *nl
				'"We''ll need to use a condom after this. But for now just don''t forget to pull- <i>Nngh~!</i>" Your warning is interrupted by a sharp breath when <<$npc_firstname[$boy]>> pushes his cock balls deep into your pussy.'
				'"... out," you finish with a sigh.'
				gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
			end
			
			if stat['safe_day'] = 1:
				act'It''s safe':
					cla & *nl
					sex_ev['safe_day'] = 1
					'"It''s a safe d-<i>aaaayyyy</i>," you gasp as he pushes his cock into the folds of your pussy.'
					gs 'sex_ev_shower', 'together_fuck_bareback'
				end
			elseif stat['probably_safe_day'] = 1:
				act'Probably safe':
					cla & *nl
					sex_ev['probably_safe_day'] = 1
					'"It should be safe tod-<i>aaaayyyy</i>," you gasp as he pushes his cock into the folds of your pussy.'
					gs 'sex_ev_shower', 'together_fuck_bareback'
				end
			elseif stat['dangerous_day'] = 1:
				act'Not safe (pullout)':
					sex_ev['danger_day'] = 1
					sex_ev['no_condom'] = 1
					sex_ev['promise_no_creampie'] = 1
					cla & *nl
					'"It probably isn''t safe today," you admit. "But-"'
					'Your reply is interrupted by a small squeak when <<$npc_firstname[$boy]>> pushes his cock between your folds.'
					'"Don''t forget to pull out~!" you gasp as he starts to fuck your pussy.'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
				
				act'Not safe (condom after)':
					sex_ev['danger_day'] = 1
					sex_ev['promise_no_creampie'] = 1
					cla & *nl
					'"It probably isn''t safe today," you admit. "But-"'
					'Your reply is interrupted by a small squeak when <<$npc_firstname[$boy]>> pushes his cock between your folds.'
					'"You can''t come inside~!" you gasp as he starts to fuck your pussy. "We need to use condoms after this~!'
					gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
				end
			end
		end
	else
		'"<i>Nngh~!</i>"'
		'A small squeak escapes your lips as he pushes his cock into the folds of your pussy.'
		act'Continue':gt 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
	end
end

if $ARGS[0] = 'together_fuck_bareback':
	act'Bareback is fine':
		cla & *nl
		sex_ev['no_condom'] = 1
		'"We''re fine without a condom," you finish, voice husky as he starts to ramp into a real fuck.'
		gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
	end
	
	act'Creampies are fine':
		cla & *nl
		sex_ev['no_condom'] = 1
		sex_ev['creampie_allowance'] = 1
		'"You can come inside me," you finish, voice husky as he starts to ramp into a real fuck.'
		gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
	end
	gs 'sex_ev_shower', 'together_fuck_<<$sex_ev[''position'']>>2'
end

if $ARGS[0] = 'together_fuck_miss1':
	$sex_ev['position'] = 'miss'
	sex_ev['cock_inserted'] = 1
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
	if $sex_ev['position'] = 'handjob':
		'Without a word, you raise your leg, wrapping it around <<$npc_firstname[$boy]>>''s waist and he grabs your thigh to hold you in place. '
	elseif $sex_ev['position'] = 'blowjob':
		'You pull your lips off <<$npc_firstname[$boy]>>''s cock with a pop and stand to face him. Without a word, you raise your leg, wrapping it around <<$npc_firstname[$boy]>>''s waist and he grabs your thigh to hold you in place.'
	end
	gs 'sex_ev_shower', 'fuck_condom_check'
end

if $ARGS[0] = 'together_fuck_miss2':
	gs'arousal', 'vaginal',rand(10,15), 'no_orgasm_msg', $sex_ev['prostitution_flag']
	gs'stat'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
	'Water streams down your bodies as <<$npc_firstname[$boy]>> eagerly fucks your pussy, getting hot and steamy in every sense of the phrase. It interferes with the lubrication of your pussy if you''re being honest, but the pleasure is far more than the irritation.'
	if rand(1,20) > 1:
		*nl
		'After what seems like an eternity of pleasure, <<$npc_firstname[$boy]>> moans into your ear.'
		gs'sex_ev_shower', 'shower_cum_ask'
	else
		*nl
		'Then, without warning, <<$npc_firstname[$boy]>> stiffens and you feel something hot pour into your pussy.'
		gs'sex_ev_shower', 'shower_creampie_surprise'
	end
end

if $ARGS[0] = 'together_fuck_doggy1':
	$sex_ev['position'] = 'doggy'
	sex_ev['cock_inserted'] = 1
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/doggy_enter1.mp4"></video></center>'
	if $sex_ev['position'] = 'handjob':
		'Without a word, you turn around and bend over, placing your hands against the tile and invitingly pointing your ass in his direction. '
	elseif $sex_ev['position'] = 'blowjob':
		'You pull your lips off <<$npc_firstname[$boy]>>''s cock with a pop and stand to face him. Without a word, you turn around and bend over, placing your hands against the tile and invitingly pointing your ass in his direction.'
	end
	gs 'sex_ev_shower', 'fuck_condom_check'
end

if $ARGS[0] = 'together_fuck_doggy2':
	gs'arousal', 'vaginal',rand(10,15), 'no_orgasm_msg', $sex_ev['prostitution_flag']
	gs'stat'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/doggy<<rand(1,5)>>.mp4"></video></center>'
	'<<$npc_firstname[$boy]>>''s hips slap against your ass as he eagerly fucks your pussy, helping you get hot and steamy in every sense of the phrase. Which is a good thing because it''s pretty chilly, bent over like this so far outside the range of the shower. But the sex is more than making up for it.'
	if rand(1,20) > 1:
		*nl
		'After what seems like an eternity of pleasure, <<$npc_firstname[$boy]>> moans into your ear.'
		gs'sex_ev_shower', 'shower_cum_ask'
	else
		act'Continue':gs'sex_ev_shower', 'shower_creampie_surprise'
	end
end

!! --------------------------------- Shower Sex Cum ---------------------------------------


if $ARGS[0] = 'shower_cum_ask':
	'"<<$pcs_nickname>>-! I''m almost there!"'
	iif(sex_ev['orgasm'] < orgasm, '"Me too-!" you gasp.', '"Mmmm-!" you hum back.')

	act'Jerk him off':gt'sex_ev_shower', 'shower_together_jerkoff_cum'
	
	act'Suck him dry':gt'sex_ev_shower', 'shower_cum_mouth1'
	
	act'Cum on your face':gt'sex_ev_shower', 'shower_cum_facial'
	
	if sex_ev['cock_inserted'] = 1:
		act'Let him come inside you':gt'sex_ev_shower', 'shower_creampie1'
		
		if sex_ev['creampie_allowance'] ! 1 or (npc_free_creampies[$boy] < 2 and sex_ev['danger_day'] ! 1):
			act'Not inside!':
				sex_ev['not_inside'] = 1
				gs'sex_ev_shower', 'shower_together_jerkoff_cum'
			end
		end
	end
	if sex_ev['orgasm'] < orgasm: act'Come together':gt'sex_ev_shower', 'shower_cum_together1'
end

if $ARGS[0] = 'shower_together_jerkoff_cum':
	$sex_ev['last_cum'] = 'jerkoff'
	gs'cum_call', 'stomach', $boy, 1
	sex_ev['cum_count'] += 1
	sex_ev['orgasm_count'] += 1
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/cum_jerkoff1.mp4"></video></center>'
	if sex_ev['not_inside'] = 1:
		'"Not inside me!" you yelp.'
		*nl
		'You practically jump off of his cock and begin furiously working it with your hand. Not even a second later, cum explodes from the tip, spattering across your stomach.'
	elseif sex_ev['orgasm'] < orgasm:
		gs'arousal', 'hj',-1
		'Tension builds up inside you to bursting. You feel <<$npc_firstname[$boy]>>''s cock throb in your hand and you know he''s about to burst too.'
		*nl
		'You work him even harder, trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. The feel of his cum spattering across your stomach is the last thing you need and you come as well, moaning loudly even as you continue to finish him off.'
	else
		gs'arousal', 'hj',-1
		'Tension builds up inside you to bursting. You feel <<$npc_firstname[$boy]>>''s cock throb in your hand and you can tell he''s about to burst.'
		*nl
		'You work him even harder, trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. It spatters across your belly, his cock pulsing in your hand, and you milk him for every last drop.'
	end
	gs 'sex_ev_shower', 'shower_together_end'
end

if $ARGS[0] = 'shower_cum_mouth1':
	gs 'cum_call', 'mouth_swallow', $boy, 1
	sex_ev['cum_count'] += 1
	gs 'stat'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/shower/deepthroat1.mp4"></video></center>'
	if $sex_ev['position'] ! 'blowjob':'With extreme urgency, you hop off of <<$npc_firstname[$boy]>>''s cock and kneel down on the porcelain floor of the shower, wrapping his cock in your mouth.'
	'"That''s it-!" <<$npc_firstname[$boy]>> grunts when you swallow it whole, lips kissing the base of his shaft. "I''m gonna-!"'
	'He doesn''t even manage to finish his warning before he groans loudly and his cock pulses on your tongue. <<$npc_firstname[$boy]>> pulls you further down with his hand and hot salty liquid pours into the back of your throat, your only choice to swallow or choke.'
	*nl
	'Eventually his dick stops throbbing and you gently release him from your lips, looking up at him with seductive eyes.'
	gs'sex_ev_shower', 'shower_cum_mouth2'
end

if $ARGS[0] = 'shower_cum_mouth2':
	sex_ev['cum_mouth'] += 1
	$sex_ev['last_cum'] = 'mouth'
	act'Spit it out':
		gs'cum_call', 'mouth',$boy,1
		sex_ev['spit_count'] += 1
		cla & *clr
		$sex_ev['bath_room']
		'You spit it out.'
		gs'sex_ev_shower', 'shower_together_end'
	end
	
	act'Swallow':
		gs 'cum_call', 'mouth_swallow', $boy, 1
		sex_ev['swallow'] = 1
		sex_ev['swallow_count'] += 1
		cla & *clr
		$sex_ev['bath_room']
		'You gulp down <<$npc_firstname[$boy]>>''s load.'
		gs'sex_ev_shower', 'shower_together_end'
	end
end

if $ARGS[0] = 'shower_cum_facial':
	$sex_ev['last_cum'] = 'facial'
	cla & *clr
	'<center><img <<$set_imgh>> src="images/shared/sex/shower/facial1.jpg"></center>'
	if $sex_ev['position'] = 'blowjob':
		'<<$npc_firstname[$boy]>> pulls his cock from your lips and grabs hold of himself. His hand pumps his shaft twice '
	else
		'You kneel down and <<$npc_firstname[$boy]>> plasters your face with hot, sticky cum.'
	end
	gs'sex_ev_shower', 'shower_cum_facial_after'
end

if $ARGS[0] = 'shower_cum_facial_after':
	act'Rinse off':
		cla & *clr
		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
		'You put your face to the faucet and clean the cum from your face.'
		gs'sex_ev_shower', 'shower_together_end'
	end
end

if $ARGS[0] = 'shower_creampie1':
	gs 'cum_call', '', $boy, 1
	sex_ev['shower_creampie'] += 1
	sex_ev['creampie_count'] += 1
	$sex_ev['last_cum'] = 'creampie'
	cla & *clr
	if $sex_ev['position'] = 'miss':
		'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
	elseif $sex_ev['position'] = 'doggy':
		'<center><video autoplay loop src="images/shared/sex/shower/doggy4.mp4"></video></center>'
	end
	'<<$npc_firstname[$boy]>> presses you up against the wall, forcing loud squelching from between your legs as he continues fervently fucking your pussy. He pulses inside you and you feel something warm shoot into your womb.'
	gs'sex_ev_shower', 'shower_creampie2'
end

if $ARGS[0] = 'shower_creampie2':
	act'Ride it out':
		cla & *nl
		if sex_ev['orgasm'] < orgasm:
			'You''re already shuddering from your own orgasm before your brain even registers that he''s coming inside you. Muscles spasm. Your leg tightens around his hip. The other nearly cramps from supporting your weight mid-orgasm. And <<$npc_firstname[$boy]>> empties his balls into you, pumping load after load into your cunt.'
		else
			'<<$npc_firstname[$boy]>> pours load after load into your cunt. You sit patiently for him to finish emptying his balls, waiting until you no longer feel the pulse, quiver, and twitch inside you.'
		end
		gs'sex_ev_shower', 'shower_creampie_after'
	end
	
	act'Creampie induced orgasm':
		if sex_ev['orgasm'] = orgasm:
			$orgasm_or = 'yes'
			gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		end
		sex_ev['creampie_orgasm_count'] += 1
		cla & *clr
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
			'The first spurt of <<$npc_firstname[$boy]>>''s cum into you flips your switch and you''re immediately shuddering, muscles clenching, one leg tightening around his hip while the other wobbles beneath you, both on the verge of cramping in the throes of orgasm while he empties his balls into your cunt.'
		elseif $sex_ev['position'] = 'doggy':
			'<center><video autoplay loop src="images/shared/sex/shower/doggy_orgasm1.mp4"></video></center>'
			'The first spurt of <<$npc_firstname[$boy]>>''s cum into you flips your switch and you''re immediately shuddering in orgasm. Your legs go weak and you nearly slip off his cock even as he pumps load after load into your cunt, emptying his balls inside you.'
		end
		gs'sex_ev_shower', 'shower_creampie_after'
	end
	
	act'Tolerate it (disgust)':
		cla & *nl
		sex_ev['creampie_gross'] = 1
		if sex_ev['orgasm'] < orgasm:
			'<<$npc_firstname[$boy]>>''s cum in your cunt immediately makes you go stiff, ruining your orgasm and cutting it short right after it started. Disgust and revulsion overwhelm you as he pours load after load into you, but it''s too late now. You give a silent sigh, grimacing internally as you wait for him to finish emptying his balls.'
		else
			'<<$npc_firstname[$boy]>>''s cum in your cunt immediately makes you stiffen up. Disgust and revulsion overwhelm you as he pours load after load into you, but it''s too late to do anything more about it. You give a silent sigh, grimacing internally as you wait for him to finish emptying his balls.'
		end
		gs'sex_ev_shower', 'shower_creampie_after'
	end
end

if $ARGS[0] = 'shower_cum_together1':
	if sex_ev['orgasm'] = orgasm:
		$orgasm_or = 'yes'
		gs'arousal', 'vaginal', -1
	end
	gs 'cum_call', '', $boy, 1
	sex_ev['shower_creampie'] += 1
	sex_ev['creampie_count'] += 1
	cla & *clr
	if $sex_ev['position'] = 'miss':
		'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
		'You seem to crest the wave of climax right as you feel <<$npc_firstname[$boy]>> pulse inside you, a sudden warmth filling up your womb. Your eyes roll back and you shudder in orgasm, all muscles clenching, your left leg around his waist tightening and your right one threatening to give out beneath you with unsteady wobbles. Each new load pumped into you fuels your orgasm and it''s not until <<$npc_firstname[$boy]>> stops twitching inside you that it finally subsides.'
	elseif $sex_ev['position'] = 'doggy':
		'<center><video autoplay loop src="images/shared/sex/shower/doggy4.mp4"></video></center>'
		'You seem to crest the wave of climax right as you feel <<$npc_firstname[$boy]>> pulse inside you, a sudden warmth filling up your womb. Your eyes roll back and you shudder in orgasm, legs going weak and nearly falling off his cock even as he empties his balls into you. Each new load pumped into you fuels your orgasm and it''s not until <<$npc_firstname[$boy]>> stops twitching inside you that it finally subsides.'
	end
	gs'sex_ev_shower', 'shower_creampie_after'
end

if $ARGS[0] = 'shower_creampie_after':
	act'Pull apart':
		cla & *clr
		iif($sex_ev['position'] = 'miss','<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>','<center><img <<$set_imgh>> src="images/shared/sex/shower/creampie_after1.jpg"></center>')
		if sex_ev['orgasm'] < orgasm:
			'<<$npc_firstname[$boy]>> slips his cock from your pussy and you shiver as a hot glob of cum immediately seeps out and dribbles down your leg.'
		else
			'<<$npc_firstname[$boy]>> slips his cock from your pussy and a hot glob of cum immediately seeps out and dribbles down your leg.'
		end
		gs'sex_ev_shower', 'shower_together_end'
	end
end

if $ARGS[0] = 'shower_creampie_surprise':
	gs 'cum_call', '', $boy, 1
	sex_ev['shower_creampie'] += 1
	sex_ev['creampie_count'] += 1
	cla & *clr
	if $sex_ev['position'] = 'miss':
		'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
	elseif $sex_ev['position'] = 'doggy':
		'<center><video autoplay loop src="images/shared/sex/shower/doggy4.mp4"></video></center>'
	end
	'Suddenly, without warning, <<$npc_firstname[$boy]>> stiffens and you feel something hot pour into your pussy.'
	act'Take it in stride':
		cla & *clr
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
		elseif $sex_ev['position'] = 'doggy':
			'<center><video autoplay loop src="images/shared/sex/shower/doggy4.mp4"></video></center>'
		end
		'You gasp in surprise, but hold on to <<$npc_firstname[$boy]>>, allowing him to empty his balls into your cunt.'
		gs'sex_ev_shower', 'shower_creampie_surprise_reaction'
	end
	
	act'Creampie induced orgasm':
		if sex_ev['orgasm'] = orgasm:
			$orgasm_or = 'yes'
			gs'arousal', 'vaginal',1, 'no_orgasm_msg', $sex_ev['prostitution_flag']
		end
		sex_ev['creampie_orgasm_count'] += 1
		cla & *clr
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/shower/leg_up2.mp4"></video></center>'
		elseif $sex_ev['position'] = 'doggy':
			'<center><video autoplay loop src="images/shared/sex/shower/doggy_orgasm1.mp4"></video></center>'
		end
		'You gasp in surprise, feeling <<$npc_firstname[$boy]>> pulse inside you. You were already close yourself and his orgasm sends you over the edge. He holds you tight and you clench on to him with all your might, both of you riding out your orgasms completely intertwined.'
		
		gs'sex_ev_shower', 'shower_creampie_surprise_reaction'
	end
	
	if sex_ev['creampie_allowance'] = 0 and npc_free_creampies[$boy] < 2:
		act'Asshole!':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>'
			'"Asshole!" you shout, pushing <<$npc_firstname[$boy]>> away from you. But it''s too late and you feel a hot liquid that isn''t water running down your leg.'
			'"I told you not to come inside!"'
			act'Storm out':
				cla & *clr
				$sex_ev['bath_room']
				minut += 2
				gs 'stat'
				'"Fucking moron!!" you shout again, storming out of the shower, not caring that you''re dripping wet. You make your way over to his bedroom and pick up your clothes, throwing them on.'
				'"Wait!" <<$npc_firstname[$boy]>> protests, clumsily wrapping a towel around his waist and following you.'
				'"I''m not waiting for shit!" you sneer. The moment the last item of clothing is over your wet skin, you stomp out the door, slamming it behind you.'
				act'Leave':gt 'sex_ev_leave', 'exit'
			end
			
			act'Forgive him (my fault)':
				cla & *clr
				minut += 2
				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
				'After a few more moments of anger, you deflate. You pull <<$npc_firstname[$boy]>> close, pressing your naked skin against his.'
				'"I''m sorry," you say. "I was just... acting out. It''s my fault. I should''ve known better. I can''t blame you."'
				'You stand there holding each other in silence for several more minutes before <<$npc_firstname[$boy]>> breaks it.'
				'"So... what should we do now?"'
				gs'sex_ev_shower', 'shower_what_now'
			end
			
			act'Forgive him (both our faults)':
				cla & *clr
				minut += 2
				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
				'After a few more moments of anger, you deflate. You pull <<$npc_firstname[$boy]>> close, pressing your naked skin against his.'
				'"I''m sorry," you say. "I was just... acting out. You should''ve held it, but... it takes two to fuck," you smile ruefully. "So it''s my fault too."'
				'You stand there holding each other in silence for several more minutes before <<$npc_firstname[$boy]>> breaks it.'
				'"So... what should we do now?"'
				gs'sex_ev_shower', 'shower_what_now'
			end
		end
	end
end

if $ARGS[0] = 'shower_creampie_surprise_reaction':
	act'Pull away':
		cla & *clr
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
		elseif $sex_ev['position'] = 'doggy':
			'<center><img <<$set_imgh>> src="images/shared/sex/shower/creampie_after1.jpg"></center>'
		end
		if sex_ev['orgasm'] < orgasm:
			'When your orgasms finally subside, <<$npc_firstname[$boy]>> pulls away, eliciting shudders from you as his cum gushes from your pussy.'
		else
			'Once <<$npc_firstname[$boy]>>''s orgasm finally subsides, he pulls out of your pussy with a pop, releasing a gush of cum that dribbles down your leg.'
		end
		gs'sex_ev_shower', 'shower_together_end'
	end
	
	act'That was nice':
		cla & *clr
		if $sex_ev['position'] = 'miss':
			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
		elseif $sex_ev['position'] = 'doggy':
			'<center><img <<$set_imgh>> src="images/shared/sex/shower/creampie_after1.jpg"></center>'
		end
		'"That was nice," you smile as he pulls away, feeling something hot dribble down your leg.'
		'"Yeah..." <<$npc_firstname[$boy]>> smiles back at you.'
		gs'sex_ev_shower', 'shower_together_end'
	end
	
	if sex_ev['promise_no_creampie'] > 0:
		act'So much for pulling out (tease)':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
			'"So much for pulling out," you say, a smirk twitching at your lips as he pulls away, feeling something hot dribble down your leg.'
			'"Sorry... I, uhh... So... what now?"'
			gs'sex_ev_shower', 'shower_what_now'
		end
		
		act'So much for pulling out (annoyed)':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
			'"So much for pulling out," you scowl as he pulls away, feeling his spunk dribble out of your pussy.'
			'"Sorry... I, uhh... So... what now?"'
			gs'sex_ev_shower', 'shower_what_now'
		end
	end
end

if $ARGS[0] = 'shower_what_now':
	act'We should stop':
		cla & *nl
		'"We should probably stop," you sigh regretfully, turning off the faucet. "We really shouldn''t have skipped the condom..."'
		act'Finish showering':gt 'sex_ev_shower', 'shower_together_towel'
	end
	
	if sex_ev['sex_over'] = 0:
		act'Fuck, obviously':
			cla & *nl
			'"What now?" you ask, looking at him with a humorous expression. "Isn''t it obvious? We should fuck again. But in a bed this time."'
			act'Leave the shower':gt 'sex_ev_shower', 'before_to_the_bed'
		end
	end
end

!! --------------------------------- Shower Ending ---------------------------------------


if $ARGS[0] = 'shower_together_end':
	sex_ev['boy_shower'] = 1
	sex_ev['cock_cleanup'] = 1
	if sex_ev['sex_over'] = 0:
		if $sex_ev['last_cum'] = 'jerkoff':
			act'Catch your breath':
				noshampoo = 1
				dynamic $showerdin
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/shower/after2.mp4"></video></center>'
				'You and <<$npc_firstname[$boy]>> stand there under the hot water together, breathing hard.'
				*nl
				'"Bedroom?" he asks.'
				'"After a quick rinse," you pant.'
				act'Take it to the bed':gt 'sex_ev_shower', 'before_to_the_bed'
			end
		else
			act'Bedroom?':
				cla & *nl
				'"You wanna take this to the bed?"'
				'"Yeah," he says nodding, just as breathless as before.'
				act'Take it to the bed':gt 'sex_ev_shower', 'before_to_the_bed'
			end
		end
	elseif rand(1,10) < npc_sexdrive[$boy] and sex_ev['cum_count'] <= 5 + sex_ev['extra_cum']:
		'"Want to go another round?" <<$npc_firstname[$boy]>> pants, grinning at you.'
		act'No thanks':
			cla & *nl
			'"Sorry soldier," you smile back ruefully. "I''m all tapped out."'
			act'Finish showering':gt 'sex_ev_shower', 'shower_together_towel'
		end
		
		act'Another round':
			cla & *nl
			'"Yeah," you reply huskily and you quickly stumble from the bathroom together.'
			act'Take it to the bed':gt 'sex_ev_shower', 'before_to_the_bed'
		end
	else
		act'Finish showering':gt 'sex_ev_shower', 'shower_together_towel'
		
		gs 'sex_ev_shower', 'shower_together_ending_kiss'
	end
end

if $ARGS[0] = 'shower_together_ending_kiss':
	act'Kiss him':
		gs 'npc_relationship', 'modify', $boy, 'like'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/shower/kiss2.mp4"></video></center>'
		if sex_ev['orgasm'] < orgasm:
			'Still panting as you wind down from your orgasm, you give <<$npc_firstname[$boy]>> one final parting kiss, pouring all of your enjoyment and satisfaction into the brief smack of your lips together.'
		elseif $sex_ev['position'] = 'makeout':
			'All good things must come to an end. <<$npc_firstname[$boy]>> shuts off the water and you give him one final parting kiss before stepping out of the shower together.'
		elseif $sex_ev['position'] = 'blowjob' and $sex_ev['last_cum'] ! 'facial':
			'You smile at <<$npc_firstname[$boy]>> as you get off your knees and stand, giving him a small kiss just before he turns off the faucet and you step out of the shower together.'
		elseif $sex_ev['last_cum'] = 'facial':
			'As the last of the cum is cleaned from your face, you turn and give <<$npc_firstname[$boy]>> a small kiss of satisfaction before he turns off the faucet and you step out of the shower together.'
		else
			'With a smile, you give <<$npc_firstname[$boy]>> a small kiss of satisfaction just before he turns off the faucet and you step out of the shower together.'
		end
		act'Finish showering':gt 'sex_ev_shower', 'shower_together_towel'
	end
end

if $ARGS[0] = 'shower_together_towel':
	noshampoo = 1
	dynamic $showerdin
	cla & *clr
	$sex_ev['bath_room']
	if npc_finance[$boy] = 0 and $sex_ev['loc'] = 'npc_home':
		'<<$npc_firstname[$boy]>> pulls his towel off the rack, wiping himself down with it.'
		act'Towel for me?':
			cla & *nl
			'"Uhh..." you say, looking around. "Can I borrow a towel to dry off?"'
			if npc_caretaker[$boy] = 1:
				'He stop suddenly.'
				'"Er... I only have one towel," he says apologetically.'
			else
				'"Sorry, only got one towel," he shrugs.'
			end
			
			act'Annoyed':
				cla & *nl
				'Your forehead creases in irritation.'
				'<i>Seriously? He couldn''t have told me that</i> before <i>I showered?</i> you think as you pad back to the bedroom sopping wet.'
				gs'sex_ev_after', 'after_sex2'
			end
			
			act'Fair':
				cla & *nl
				'"Fair," you grin, watching him leer at your naked wet body as you leave the bathroom.'
				gs'sex_ev_after', 'after_sex2'
			end
		end
		
		act'Leave naked':
			cla & *nl
			'You give your hair a quick wringe and exit the bathroom naked, <<$npc_firstname[$boy]>> following behind you with his towel around his waist.'
			gs'sex_ev_after', 'after_sex2'
		end
	else
		'<<$npc_firstname[$boy]>> pulls a towel out of a cupboard, offering it to you.'
		
		act'Borrow a towel':
			cla & *nl
			sex_ev['towel'] = 1
			'You accept gratefully it and towel off before wrapping it around your chest, exiting the bathroom with him.'
			gs'sex_ev_after', 'after_sex2'
		end
		
		act'Leave naked':
			cla & *nl
			'Your eyes sparkle mischievously and ignore the towel, leaving the bathroom still naked and dripping, and giving him a great view of your wet ass in the process.'
			gs'sex_ev_after', 'after_sex2'
		end
	end
end

if $ARGS[0] = 'before_to_the_bed':
	gs'sex_ev_sex', 'session_reset'
	cla & *clr
	$sex_ev['bed_room']
	'The two of you stumble out of the shower to the bed with hands all over each other. You hit the mattress uncaring of the excess moisture on your bodies and you''re soaking wet, in every sense of the word.'
	gs 'sex_ev_foreplay', 'bed_start'
end

if $ARGS[0] = 'boy_shower_finish':
	cla & *clr
	$sex_ev['bed_room']
	'<<$npc_firstname[$boy]>> returns to the bedroom with wet hair and a towel wrapped around his waist.'
	gs'sex_ev_shower', 'boy_shower_finish_acts'
end


if $ARGS[0] = 'boy_shower_finish_acts':
	sex_ev['boy_in_shower'] = 0
	sex_ev['boy_shower'] = 1
	act'"Good shower?"':
		cla & *nl
		'"Did you have a good shower?" you ask' + iif(sex_ev['drawer_rummage'] = 1, ' innocently putting your hands behind your back as if you hadn''t just been snooping through his things.', '.')
		if sex_ev['join_shower_offer'] = 1:
			'"Could have used some company in there," he smiles back wistfully.'
			act'Sorry':
				cla & *nl
				'"Sorry," you reply.'
				act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
			end
		else
			'"Yeah, I feel much better now," he says.'
			act'Glad to hear it':
				cla & *nl
				'"Glad to hear it," you reply.'
				act'Continue':gs'sex_ev_after', 'after_sex2_w_picture'
			end
		end
		if sex_ev['shower'] = 0:
			act'My turn':
				cla & *nl
				'"I think it''s my turn now," you say, hauling yourself out of bed and passing him by into the steamy just-used bathroom.'
				act'Shower':gt'sex_ev_shower', 'after_alone'
			end
		end
	end
end

--- sex_ev_shower ---------------------------------