glife/locations/booty_call_start.qsrc

# booty_call_start
!! ------------------------- Booty Call Content Start -----------------------

if $ARGS[0] = 'draw':
	! this routine should invoke a the booty call sms from random friend in $lover list
	! but I cannnot randomize the time because the probability is 100 % now
	! I suppose that the routine will be modified later to take in account the lovers preferences
	if booty_call['A0'] ! daystart :
		$lover_drawn = $fuckbuddy[rand(0,arrsize('$fuckbuddy')-1)]
		gs 'booty_call_sms', 'start',$lover_drawn
		gs 'booty_call_sms', 'Add SMS', $lover_drawn
		booty_call['A0'] = daystart
	end
end

if $ARGS[0] = 'start':
	!! boy code?
	if minut > 45:
		booty_call['start_hour'] = hour + 1
	else
		booty_call['start_hour'] = hour
	end
	gs 'boystat', $ARGS[1]
	booty_call['starting_makeup'] = pcs_makeup
	booty_call['orgasm'] = orgasm
	booty_call['orgasm_limit'] = orgasm + 6
	$npc_apt_hall[$boy]
	'You knock on the door and <<$npc_firstname[$boy]>> opens up.'
	if npc_selfish[$boy] > 0 and rand(0,1) = 1:
		'"About fucking time," he says.'
	else
		'"Hey," he grins at you.'
	end
	act'Hey':
		cla & *nl
		'"Hey," you smile back. "So..."'
		if npc_selfish[$boy] > 0 and rand(0,1) = 1:
			'"Let''s get you naked," <<$npc_firstname[$boy]>> says, pulling you inside and immediately tugging at your clothes.'
		else
			'"Come on in," he says, and leads you inside.'
		end
		act'Take it to the bed':gt 'booty_call_start', 'bed_start'
	end

	act'Shut up and let''s fuck':
		cla & *nl
		if npc_apt_type[$boy] < 3:
			'"Shut up," you say, putting your hands on his chest and pushing him inside towards the bed. "I''m here to fuck. So let''s fuck."'
		else
			'"Shut up," you say, putting your hands on his chest and pushing him inside towards the bedroom. "I''m here to fuck. So let''s fuck."'
		end
		act'Undress':gt 'booty_call_start', 'bed_start'
	end
!!	act'Stumble over to the couch':gt 'booty_call_start', 'couch_start'
end


if $ARGS[0] = 'bed_start':
	!! $npc_apt_bedroom[$boy]
	cla & *clr
	if CloDress = 1:booty_call['CloDress'] = 1
	gs 'shortgs', 'undress'
	gs 'clothing', 'strip'
	gs 'underwear', 'remove'
	gs 'arousal', 'foreplay', 2
	gs 'arousal', 'foreplay_give', -2
	gs'stat'
	'<center><video autoplay loop src="images/shared/sex/misc/undress1.mp4"></video></center>'
	!! initiative call
	'You tear each other''s clothes off, leaving a trail of discarded fabrics leading to the bed.'
	if rand(0,1) = 1:
		!! he wins initiative
		if npc_generous[$boy] = 1 or npc_pussyeater[$boy] = 1:
			gs 'booty_call_start', 'generous_initiative'
		elseif npc_selfish[$boy] = 1:
			gs 'booty_call_start', 'selfish_initiative'
		else
			if rand(0,1) = 1:
				gs 'booty_call_start', 'generous_initiative'
			else
				gs 'booty_call_start', 'selfish_initiative'
			end
		end
	else
		!! player wins initiative
!!		'You both tear your clothes off, getting naked as fast as possible, you finishing just before he does. You take the extra moment to decide what you want to do...'
		gs 'booty_call_start', 'foreplay_choose'
	end
end

!! --------------------- Boy''s choices ----------------------------------------------------------------------

if $ARGS[0] = 'generous_initiative':
	*nl
	!! cunnilingus or nipple play
	if rand(0,1) = 1 or npc_pussyeater[$boy] = 1:
		!! cunnilingus
		'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and kneels between your legs.'
		gs 'booty_call_start', 'kuni_start'
	else
		!! nipple play
		'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and begins leaving a new trail of kisses up your stomach, towards your breasts.'
		act'Continue':gs 'booty_call_start', 'nipple_play'
	end
end

if $ARGS[0] = 'selfish_initiative':
	'<<$npc_firstname[$boy]>> pulls you towards him and pushes you to your knees in the same motion, dangling his cock in front of your face. It''s pretty obvious what he wants right now...'
	act'Don''t wanna suck cock':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'"I don''t really want to suck your dick right now," you complain. "Can we do something else?"'
		if npc_selfish[$boy] = 1 or rand(0,1) = 1:
			if rand(0,1) = 1:
				'"Come on <<$pcs_nickname>>." He prods forward relentlessly with his cock, poking you in the cheek with it, trying to push it past your lips. "Just do it."'

			else
				'"Come on, please?" he asks. "I''d really appreciate it."'
			end

			act'Blow him reluctantly':
				cla & *nl
				booty_call['reluctant_bj'] = 1
				'"<i>Ugh!</i> Fiiiine," you grumble, leaning forward to take his dick in your mouth.'
				act'Suck':gt 'booty_call_start', 'bj_sub1'
			end

			act'Blow him':gt 'booty_call_start', 'bj_sub1'

			gs 'willpower', 'bj', 'resist'
			if will_cost <= pcs_willpwr:
				act'How about a handy instead? (<<will_cost>> Willpower)':
					gs 'willpower', 'bj', 'resist'
					gs 'willpower', 'pay', 'self'
					gs 'stat'
					cla & *nl
					'"Seriously <<$npc_firstname[$boy]>>, I don''t feel like it today. Can I give you a handy instead?" you ask looking up at him, gently tugging on his cock already. "Please?"'
					'"Oh alright," he sighs. "That''s fine I guess."'
					act'Jerk him off':cla & gs 'booty_call_start', 'handjob_dom1'
				end
			else
				act'How about a handy instead? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
			gs 'willpower', 'bj', 'resist', 'easy'

	!!{		if will_cost <= pcs_willpwr:
				act'Can we 69?  (<<will_cost>> Willpower)':
					cla & *nl
					gs 'willpower', 'pay', 'self'
					gs 'stat'
					'"How about we sixty-nine instead?" you ask. "I could use some loving down there myself right now..."'
					'"I can get behind that," he grins, laying back.'
					act'Climb over him':gs 'booty_call_start', '69_sub'
				end
			else
				act'Can we 69? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end}
		else
			'"Okay, like what then?" he asks.'
			gs 'booty_call_start', 'foreplay_choose'
			if booty_call['fuck_count'] > 0:
				act'Back to sex':cla & gs'booty_call_sex','position_change' & gs 'booty_call_sex', 'condoms'
			else
				act'Skip the foreplay':gs'booty_call_sex','sex_start'
			end
		end
	end
	
	act'Blow him':gt 'booty_call_start', 'bj_sub1'
end

!! --------------------- generous stuff ---------------------------------------------------

if $ARGS[0] = 'kuni_start':
	act'Spread them for him':
		cla & *nl
		!! IMAGE HERE
		if kuni_no[$boy] = 1:
			kuni_yes[$boy] = 1 & kuni_no[$boy] = 0
			'Realizing what he wants, you realize that you want it too and spread your legs, inviting him in. Despite initiating it, he seems surprised that you''re actually letting him.'
			'"You finally trust me enough to let me eat you out?"'
			'"Yeah," you smile. "Come and get it."'
			'He settles down between your legs and dives in.'
			act'Get eaten out':gs 'booty_call_start', 'pussy_lick'
		elseif mesec > 0 and npc_pussyeater_know[$boy] = 1:
			'"Just warning you, I''m on my period," you say, spreading your legs and showing him your bleeding snatch.'
			'"I don''t mind."'
			'"I know, just wanted to let you get ready for the taste," you grin.'
			act'Get eaten out':gs 'booty_call_start', 'period_lick'
		elseif mesec > 0:
			'"I''m on my period. You may not want to go down on me right now," you say, spreading your legs and showing him your bleeding snatch.'
			if npc_pussyeater[$boy] = 1:
				npc_pussyeater_know[$boy] = 1
				'"I don''t mind," he says and you gasp when you feel his tongue on your clit.'
				act'Get eaten out':gs 'booty_call_start', 'period_lick'
			else
				'"Oh. Maybe not then. How about this insted?"'
				'<<$npc_firstname[$boy]>> climbs up in front of you, bending his head towards your breasts.'
				act'Continue':gs 'booty_call_start', 'nipple_play'
			end
		else
			'Moments later, you feel his tongue on your clit.'
			act'Get eaten out':gs 'booty_call_start', 'pussy_lick'
		end
	end

	if kuni_yes[$boy] < 1:
		act'Close your legs ':
			cla & *clr
			$npc_apt_bedroom[$boy]
			if kuni_no[$boy] = 0:
				kuni_no[$boy] = 1
				booty_call['kuni_no'] = 1
				'"Woah!" you say with wide eyes, snapping your legs closed.'
				'"What?" <<$npc_firstname[$boy]>> looks up at you confused.'
				'"That''s... I..." you stammer. "I don''t let guys go down on me unless I''m really comfortable with them. It''s just... a personal thing..."'
				'"Oh. Well..."'
				act'We could just make out?':
					cla & *nl
					'"Can we just... make out?" you ask.'
					'"That sounds good," he smiles back.'
					gs 'booty_call_start', 'makeout_dom1'
				end
				act'You could play with my tits?':
					cla & *nl
					'"You could play with my tits instead?" you say.'
					'"That sounds like fun," he smiles back.'
					act'Continue':gt 'booty_call_start', 'nipple_play'
				end
				act'I could suck your cock?':
					cla & *nl
					'"Maybe... I could suck your cock instead?" you say, a mischievous smile on your face.'
					'"That could be nice," he smiles, leaning back.'
					gs 'booty_call_start', 'bj_dom1'
				end
				if stat['think_virgin'] = 1:
					act'You can take my virginity':gt'booty_call_virgin','start2'
				else
					act'We could just skip to fucking?':
						cla & *nl
						'"We could just get right to fucking?"'
						'"That sounds good."'
						booty_call['position_choose'] = 1
						gs 'booty_call_sex', 'sex_start'
					end
				end
			elseif kuni_no[$boy] = 1:
				'"Nuh uh," you say, snapping your legs closed. "I''m still not ready for that."'
				act'We could just make out?':
					cla & *nl
					'"Can we just... make out?" you ask.'
					'"That sounds good," he smiles back.'
					gs 'booty_call_start', 'makeout_dom1'
				end
				act'You could play with my tits?':
					cla & *nl
					'"You could play with my tits instead?" you say.'
					'"That sounds like fun," he smiles back.'
					act'Continue':gt 'booty_call_start', 'nipple_play'
				end
				act'I could suck your cock?':
					cla & *nl
					'"Maybe... I could suck your cock instead?" you say, a mischievous smile on your face.'
					'"That could be nice," he smiles, leaning back.'
					gs 'booty_call_start', 'bj_dom1'
				end
				if stat['think_virgin'] = 1:
					act'You can take my virginity':gt'booty_call_virgin','start2'
				else
					act'We could just skip to fucking?':
						cla & *nl
						'"We could just get right to fucking?"'
						'"That sounds good."'
						booty_call['position_choose'] = 1
						gs 'booty_call_sex', 'sex_start'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'period_lick':
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/kuni/pussylick4.mp4"></video></center>'
	gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
	gs 'arousal', 'cuni',-10,'no_orgasm_msg'
	gs 'stat'
	$booty_call['position'] = 'kuni'
	'You lay back on the bed, letting your eyes roll back in your skull. Blood and pussy juice flow like water from your cunt and <<$npc_firstname[$boy]>> laps it up like it''s the nectar of the gods. It feels <i>so</i> good and you relax while he goes to work on you down there.'
	if booty_call['orgasm'] < orgasm:
		act'Orgasm':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
			booty_call['orgasm_count'] += 1
			booty_call['orgasm'] = orgasm
			'It doesn''t take long before you''re buckling under <<$npc_firstname[$boy]>>''s tongue, squirming in orgasm as he continues teasing, sucking, playing with your clit. You groan a loud ragged breath as you come hard beneath his touch.'
			*nl
			if npc_pussyeater[$boy] = 1:
				gs 'booty_call_start', 'pussy_lick_loop'
			else
				if rand(0,1) = 1:
					gs'booty_call_start','transition1'
!!				elseif booty_call['cum_count'] = 0:
!!					gs'booty_call_start','transition2'
				else
					gs 'booty_call_sex', 'sex_end'
				end
			end
		end
	else
		act'Don''t stop!':
			$orgasm_or = 'yes'
			gs 'arousal', 'cuni',rand(1,2),'no_orgasm_msg'
			gs'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
			'"Don''t stop!" you cry.'
			'You''re so close! You''re right there! Any second now you-!'
			'"Don''t stop! Don''t stop! Don''t stop! Don''t stop! Don''t-!"'
			'<i>There!</i>'
			*nl
			'You let out an explosive groan as your orgasm smashes through you. Your body is so tight, you can''t even find the strength in you to fill your lungs, clenching your teeth and forced to hold your breath until your climax has finished its crescendo.'
			*nl
			if npc_pussyeater[$boy] = 1:
				gs 'booty_call_start', 'pussy_lick_loop'
			else
				if rand(0,1) = 1:
					gs'booty_call_start','transition1'
!!				elseif booty_call['cum_count'] = 0:
!!					gs'booty_call_start','transition2'
				else
					gs 'booty_call_sex', 'sex_end'
				end
			end
		end
		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'pussy_lick':
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/kuni/pussylick4.mp4"></video></center>'
	gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
	gs 'stat'
	$booty_call['position'] = 'kuni'
	'You lay back on the bed, closing your eyes, letting them roll back in your skull, and focus on the sensation of <<$npc_firstname[$boy]>>''s tongue exploring your pussy. It playfully flicks across your clit, making you squirm. It runs up the lips of your snatch, sending shivers through your spine. Every once in a while, he licks the side of your thigh, tickling you and eliciting a giggle. It feels <i>so</i> good and you relax while he goes to work on you down there.'
	if booty_call['orgasm'] < orgasm:
		act'Orgasm':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
			booty_call['orgasm_count'] += 1
			booty_call['orgasm'] = orgasm
			'It doesn''t take long before you''re buckling under <<$npc_firstname[$boy]>>''s tongue, squirming in orgasm as he continues teasing, sucking, playing with your clit. You groan a loud ragged breath as you come hard beneath his touch.'

			if npc_pussyeater[$boy] = 1:
				gs 'booty_call_start', 'pussy_lick_loop'
			else
				if rand(0,1) = 1:
					gs'booty_call_start','transition1'
!!				elseif booty_call['cum_count'] = 0:
!!					gs'booty_call_start','transition2'
				else
					gs 'booty_call_sex', 'sex_end'
				end
			end
		end
	else
		act'Don''t stop!':
			$orgasm_or = 'yes'
			gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
			gs'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
			'"Don''t stop!" you cry.'
			'You''re so close! You''re right there! Any second now you-!'
			'"Don''t stop! Don''t stop! Don''t stop! Don''t stop! Don''t-!"'
			'<i>There!</i>'
			*nl
			'You let out an explosive moan as your orgasm smashes through you. Your body is so tight, you can''t even find the strength in you to fill your lungs, clenching your teeth and forced to hold your breath until your climax has finished its crescendo.'
			*nl
			if npc_pussyeater[$boy] = 1:
				gs 'booty_call_start', 'pussy_lick_loop'
			else
				if rand(0,1) = 1:
					gs'booty_call_start','transition1'
!!				elseif booty_call['cum_count'] = 0:
!!					gs'booty_call_start','transition2'
				else
					gs 'booty_call_sex', 'sex_end'
				end
			end
		end
		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'pussy_lick_loop':
	if booty_call['pussy_lick_loop'] = 0:
		'But <<$npc_firstname[$boy]>> is relentless. Even as your climax winds down, he doesn''t stop, continuing to eat you out.'
	end
	if booty_call['orgasm_count'] < 5:
		act'Come again':
			cla & *clr
			pcs_horny = 90
			$orgasm_or = 'yes'
			gs 'arousal', 'cuni',rand(5,10),'no_orgasm_msg'
			gs'stat'
			booty_call['orgasm_count'] += 1
			booty_call['pussy_lick_loop'] += 1
			'<center><video autoplay loop src="images/shared/sex/kuni/pussylickorgasm2.mp4"></video></center>'
			if booty_call['pussy_lick_loop'] = 1:
				'"OH FUCK!" you cry, exploding in climax again off the back of your previous orgasm. But apparently two in a row still isn''t enough for him as he continues on, still eating you out.'
			elseif booty_call['pussy_lick_loop'] = 2:
				'The third orgasm happens before you even finish spasming from the second.'
			elseif booty_call['pussy_lick_loop'] = 3:
				'The fourth orgasm reduces you to a quivering mess.'
			elseif booty_call['pussy_lick_loop'] = 4:
				'The fifth leaves you hyperventilating, raggedly gasping for breath and as his tongue touches your pussy again, it''s so sensitive that it <i>hurts</i>.'
			end
			gs 'booty_call_start', 'pussy_lick_loop'
		end

		act'Stop him (let''s fuck)':
			pcs_horny = 60
			$orgasm_or = ''
			booty_call['pussy_lick_loop'] = 0
			cla & *clr
			!! IMAGE HERE
			'He tries to dive right back in but you put your hand on his head and push him away from your pussy.'
			'"Wait, stop!" He looks up at you with curiousity.'
			'"This isn''t the only thing I want to do today," you say.'
			gs 'booty_call_sex', 'sex_start'
		end
	end

	act'Stop him (too sensitive)':
		cla & *clr
		!! IMAGE HERE
		$npc_apt_bedroom[$boy]
		'"Stop! Stop! Stop!" you cry desperately, pushing his head back. "I can''t take it anymore! I''m too sensitive!"'
		'<<$npc_firstname[$boy]>> looks up at you, wet lips pulled back in a grin. You collapse backwards, breathing hard as he stands up. You can see he''s still as hard as a rock, but something about his expression says to you that he got off on this anyways.'
		act'I''m done':
			cla & *clr
			$npc_apt_bedroom[$boy]
			'"I''m done," you say, taking ragged breaths. "I can''t do anything else after that."'
			gs 'booty_call_after', 'after_sex1'
		end

		act'Give me a minute':
			cla & *clr
			$npc_apt_bedroom[$boy]
			'"Gi- gimme a minute," you pant. "And we can do something else."'
			'<<$npc_firstname[$boy]>> waits patiently for you, a satisfied looking smirk on his face.'
			'"Oh fuck you," you say.'
			'"Waiting for just that," he says back, still smirking.'
			gs 'booty_call_start', 'foreplay_choose'
			gs 'booty_call_sex', 'position_change'
		end
	end
end

if $ARGS[0] = 'nipple_play':
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/foreplay/nipple_play1.mp4"></video></center>'
	gs 'arousal', 'foreplay',rand(5,10),'no_orgasm_msg'
	gs'stat'
	$booty_call['position'] = 'nipple_play'
	'<<$npc_firstname[$boy]>> leans forward, grabbing ahold of your breasts with his hands and uses his mouth on your nipples. He sucks them up, flicks at the tips with his tongue, sending electricity flying through them. Heat spreads through your hips and you can feel wetness pooling between your thighs.'
	act'Continue':
		cla & *nl
		if rand(0,1) = 1 and kuni_no[$boy] ! 1:
			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, beginning to move between your legs to eat you out.'
			gs 'booty_call_start', 'kuni_start'
		else
			booty_call['position_choose'] = 1
			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, climbing on top of you with his rock hard cock between your legs.'
			if stat['think_virgin'] = 1:
				act'Stop him':gt'booty_call_virgin','wait'
				act'Let him take your virginity':gs'booty_call_virgin','start3'
			else
				gs 'booty_call_sex', 'missionary_start'
			end
		end
	end
end

!! --------------------- selfish stuff ---------------------------------------------------

if $ARGS[0] = 'bj_sub1':
	booty_call['bj_count'] += 1
	gs'arousal','bj',rand(2,7),'no_orgasm_msg'
	gs'stat'
	if booty_call['reluctant_bj'] = 1:
		'<center><video autoplay loop src="images/shared/sex/blowjob/bj46.mp4"></video></center>'
		'You sigh internally but get to work anyways, spending a few minutes bobbing your head up and down on his cock. You weren''t really in the mood to begin with, so you get bored quickly, but hopefully he''ll want to do something else soon.'
	else
		'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
		'You lean forward and obediently take him in your mouth, gently sucking his cock and bobbing your head up and down on it. You take pride in your work, doing your best to make <<$npc_firstname[$boy]>> feel good.'
	end
	*nl
	booty_call['bj_cum_choice'] = rand(1,20)
	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
		gs 'booty_call_start', 'bj_sub_lets_fuck'
	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
		gs 'booty_call_start', 'bj_sub_cum_warn'
	elseif booty_call['bj_cum_choice'] > 8:
		gs 'booty_call_start', 'bj_sub_cum_mouth1'
	elseif booty_call['bj_cum_choice'] > 6:
		gs 'booty_call_start', 'bj_sub_cum_face1'
	elseif booty_call['bj_cum_choice'] > 4:
		gs 'booty_call_start', 'bj_sub_cum_tits1'
	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
		gs 'booty_call_start', 'bj_sub_cum_wait'
	elseif booty_call['fuck_count'] > 0:
		gs 'booty_call_start', 'bj_sub_cum_surprise'
	else
		gs 'booty_call_start', 'bj_sub_cum_warn'
	end
end

if $ARGS[0] = 'bj_sub2':
	booty_call['bj_count'] += 1
	gs'arousal','bj',rand(2,7),'no_orgasm_msg'
	gs'stat'
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj52.mp4"></video></center>'
	'<<$npc_firstname[$boy]>> slowly pumps his cock in and out of your mouth, plunging it all the way down your throat where you can feel it bulge against your windpipe. You keep it loose while he does occasionally letting your tongue snake out for a cheekly lick, but otherwise just let <<$npc_firstname[$boy]>> keep fucking your face.'
	*nl
	booty_call['bj_cum_choice'] = rand(1,20)
	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
		gs 'booty_call_start', 'bj_sub_lets_fuck'
	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
		gs 'booty_call_start', 'bj_sub_cum_warn'
	elseif booty_call['bj_cum_choice'] > 8:
		gs 'booty_call_start', 'bj_sub_cum_mouth1'
	elseif booty_call['bj_cum_choice'] > 6:
		gs 'booty_call_start', 'bj_sub_cum_face1'
	elseif booty_call['bj_cum_choice'] > 4:
		gs 'booty_call_start', 'bj_sub_cum_tits1'
	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
		gs 'booty_call_start', 'bj_sub_cum_wait'
	elseif booty_call['fuck_count'] > 0:
		gs 'booty_call_start', 'bj_sub_cum_surprise'
	else
		gs 'booty_call_start', 'bj_sub_cum_warn'
	end
end


if $ARGS[0] = 'bj_sub_cum_surprise':
	act'Continue':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
		$booty_call['last_cum']
		booty_call['cum_mouth_surprise'] = 1
		if pcs_throat <= 10:
			'Without any warning <<$npc_firstname[$boy]>> grabs your head and shoves it down to the base of his cock. It stretches your jaw wide, making you gag reflexively, and just as you''re about to protest, something spurts out into your throat.'
		else
			'Without any warning <<$npc_firstname[$boy]>> grabs your head and shoves it down to the base of his cock. You''ve sucked enough dick that it doesn''t cause any real problems for you, though a little warning would have been nice. And then something spurts directly into the back of your throat.'
		end
		act'Take it in stride (swallow)':
			booty_call['bj_cum'] = 1
			gs 'cum_call', 'mouth_swallow', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
			'You hum in surprise, but take it in stride anyways, continuing to suck as <<$npc_firstname[$boy]>> comes right down your throat. You swallow it all as best you can until his hips stop bucking beneath you and you slowly pull away, gulping one last time to get the last drops.'
			gs 'booty_call_start', 'bj_warning_next_time'
			gs 'booty_call_start', 'bj_tasty'
			gs 'booty_call_start', 'bj_already'
		end

		act'Take it in stride (spit)':
			booty_call['bj_cum'] = 2
			booty_call['spit'] = 1
			gs 'cum_call', 'mouth', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
			'You hum in surprise, but take it in stride anyways, continuing to suck as <<$npc_firstname[$boy]>> straight into the back of your throat. You carefully let it pool there, waiting until his hips stop bucking beneath you. When he finally stops, you gather it to the front of your mouth and spit it out, letting it spill past your lips and all over <<$npc_firstname[$boy]>>''s dick.'
			gs 'booty_call_start', 'bj_warning_next_time'
			gs 'booty_call_start', 'bj_already'
		end

		act'Gag':
			cla & *clr
			booty_call['bj_cum'] = 4
			booty_call['gag'] = 1
			gs 'cum_call', 'mouth', $boy, 1
			gs 'stat'
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit3.mp4"></video></center>'
			'The moment the cum touches your throat, you gag. Your eyes water and you cough involuntarily, mouth explosively erputing with cum and spilling all over <<$npc_firstname[$boy]>>''s cock and the floor.'
			act'Sorry':
				cla & *clr
				!!'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum52.jpg"></center>'
				$npc_apt_bedroom[$boy]
				'"I''m sorry," you wheeze, eyes stinging with tears as you try to clear your throat. "It was... I''ll do better next time."'
				if npc_generous[$boy] = 1:
					npc_bj_cum_warn[$boy] = 1
					'"No, no!" <<$npc_firstname[$boy]>> says hurriedly. "It''s my fault. I should have warned you. You were just so good, I couldn''t hold back. I''ll be more careful next time."'
					gs 'booty_call_sex', 'sex_end'
				elseif npc_selfish[$boy] = 1:
					'<<$npc_firstname[$boy]>> raises you by the chin, tilting your head back to look into your eyes.'
					'"So that means you''ll swallow it all next time, right?"'
					act'I''ll try':
						cla & *nl
						'"I''ll do my best," you say.'
					end
					act'Nod':
						cla & *nl
						'Holding his gaze, you simply nod once.'
						'"You promise?"'
						'"Yes."'
						'"Say it."'
						'"I promise, I''ll swallow it all next time."'
						'"Good girl."'
						gs 'booty_call_sex', 'sex_end'
!!						act'React':
!!							cla & *clr
!!							'He called you a "good girl" just now. It makes you think...'
!!						end
					end
				else
					'"I''m looking forward to it," he grins.'
					gs 'booty_call_sex', 'sex_end'
				end
			end

			gs 'booty_call_start', 'bj_warning_next_time'
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_mouth1':
	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
	'"I''m gonna- <i>nngh-!</i> Can I cum in your mouth?"'
	act'Why?':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
		'You let his cock pop out of your mouth for a moment, giving him a quizzical look.'
		'"And, why would I let you do that?" you ask, continuing to play with his cock with a smattering of kisses, licks, and gentle sucks.'
		if npc_selfish[$boy] = 1:
			'"Because I want you to," he responds simply, like that''s the only reason you should ever need.'
			act'No thanks':
				if npc_abusive > 0:
					gs 'booty_call_start', 'bj_force_cum_mouth'
				else
					cla & *nl
					'"No thanks," you smile, deciding to finish him in your own way instead...'
					gs 'booty_call_start', 'bj_sub_cum_hand'
					gs 'booty_call_start', 'bj_sub_cum_face3'
					gs 'booty_call_start', 'bj_sub_cum_tits2'
				end
			end

			act'Ugh, fine':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
				'"Ugh, fine," you roll your eyes. "Just because you asked, okay?"'
				'With that, you lower your lips back down to his cock and keep going til he blows.'
				gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
				gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
			end

		else
			if rand(0,1) = 1:
				'"Oh. Well I just... I thought... uhh... Sorry. It''s a dumb idea isn''t it?"'
			else
				'"Because it''s hot?" he says, looking at you expectantly.'
			end
		end

		act'Couldn''t hurt':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
			'"Well, it couldn''t hurt I suppose..." you smile, lowering your lips back down to his cock and giving a mighty suck. He blows his load moments later.'
			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
		end

		act'Just wondered (let him)':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
			'"Just wondered if you actually had a reason," you smile. With that, you give him a few sudden and furious jerks before plunging your head all the way to the base of his cock. Not even a second later, you feel him explode inside your mouth.'
			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
		end

		gs 'booty_call_start', 'bj_sub_cum_face3'
		act'How about my tits intstead?':
			cla & *nl
			'"How about I let you cum on my tits instead?" you smile enticingly.'
			'"That sounds like it it would be pretty hot," he says and you scooch forward, presenting your chest for him.'
			gs 'booty_call_start', 'bj_sub_cum_tits2'
		end
		gs 'booty_call_start', 'bj_sub_cum_hand'
	end

	act'Reluctantly let him':
		cla & *nl
!!		'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
		'"Mmmrrrm mmm mmmmph~!" You grumble unintelligibly around his cock but keep sucking anyways. Not exactly your ideal way to finish, but if it''s what he wants...'
		gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
		gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
	end

	act'Let him':
		cla & *nl
!!		'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
		'"Mmhmmm~!" You hum a vague noise of approval around his cock and keep sucking.'
		gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
		gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
	end

	gs 'booty_call_start', 'bj_sub_cum_mouth_gag'

	gs 'booty_call_start', 'bj_sub_cum_face3'

	act'How about my tits instead?':
		cla & *nl
		'"How about I let you cum on my tits instead?" you smile enticingly.'
		'"That sounds like it it would be pretty hot," he says and you scooch forward, presenting your chest for him.'
		gs 'booty_call_start', 'bj_sub_cum_tits2'
	end
end

if $ARGS[0] = 'bj_sub_cum_mouth2':
	!! player choosing/forcing it
	act'Make him come in your mouth':
		booty_call['cum_mouth'] = 1
		booty_call['swallow'] = 1
		gs 'cum_call', 'mouth_swallow', $boy, 1
		$booty_call['cum_choice'] = 'swallow'
		$booty_call['last_cum'] = 'mouth'
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
		'With a mischievous grin, you work his cock with your hand, building up his climax right to the brink. You can tell just by the expression on his face and the swelling of flesh in your hand that he''s about to blow. At that moment, you plunge your lips straight down to the base of his cock, right as he explodes inside your mouth.'
		gs 'booty_call_start', 'bj_warning_thanks'
		gs 'booty_call_start', 'bj_tasty'
		gs 'booty_call_start', 'bj_swallow_gross'
		gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
!!		gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
!!		gs 'booty_call_start', 'bj_sub_cum_mouth_yuck1'
	end
end

if $ARGS[0] = 'bj_sub_cum_mouth_spit':
	act'Spit':
		booty_call['cum_mouth'] = 1
		booty_call['spit'] = 1
		booty_call['swallow'] = 0
		$booty_call['cum_choice'] = 'mouth'
		$booty_call['last_cum'] = 'mouth'
		gs 'cum_call', 'mouth', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
		'After a few moments, you let the cum pool to the front of your mouth and you draw yourself back up his shaft and release it from your lips, cum immediately spilling over the edge and down his cock.'
		act'Continue':cla & gs 'booty_call_sex','sex_end'
		if booty_call['bj_cum_choice'] > 2:
			gs 'booty_call_start', 'bj_warning_thanks'
		end
		if booty_call['cum_mouth_surprise'] = 1:
			gs 'booty_call_sex', 'bj_already'
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_mouth_gag':
	act'Let him (and gag)':
		booty_call['cum_mouth'] = 1
		booty_call['gag'] = 1
		$booty_call['cum_choice'] = 'mouth'
		$booty_call['last_cum'] = 'mouth'
		gs 'cum_call', 'mouth', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/yuck2.mp4"></video></center>'
		'"Okay," you smile and stick out your tongue. The first spurt of cum lands on your tongue and you are immediately hit with a wave of primal, uncontrollable <i>revulsion</i>. You immediately spit it out, letting it dribble down your tongue and over your lips and open your mouth back up again, trying to power through. But even as you stick your tongue back out for the next spurt, the nausea overwhelms you and you pull back and gag, retching semen and saliva all over the floor.'
		*nl
		'"Oh <i>fuck!</i>" you grimace, tears in your eyes, hand to your mouth, desperately trying to avoid throwing up. "That was... Ugh! Don''t ever ask me to do that again!"'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_sub_cum_mouth_swallow':
	act'Swallow':
		booty_call['cum_swallow'] += 1
		$booty_call['last_cum'] = 'mouth'
		booty_call['swallow'] = 1
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow4.mp4"></video></center>'
		'Cum spurts into your throat and you carefully push your lips down <<$npc_firstname[$boy]>>''s shaft and pull back up, forcing a loud groan from his lips as you try to draw every last bit of sperm from inside him.'
		*nl
		'You struggle to keep the salty liquid from spilling past your lips but manage to all the way back up to his tip losing only a single drop along the way. And then, without removing your lips, you swallow the entire load in one gulp with a satisfied, "<i>Ahhh,</i>" smiling up at <<$npc_firstname[$boy]>>.'
		gs 'booty_call_sex', 'sex_end'
	end

	act'Swallow (gross)':
		booty_call['cum_swallow'] += 1
		$booty_call['last_cum'] = 'mouth'
		booty_call['swallow'] = 1
		booty_call['react'] = 1
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/yuck1.mp4"></video></center>'
		'Thick, salty sperm sprays into your mouth and you can''t help but feel just a little bit nauseous even as you continue to suck out more cum from <<$npc_firstname[$boy]>>''s cock. But you power through regardless, and with a grimace of deep disgust, you force it down, swallowing the entire load.'
		*nl
		if booty_call['cum_swallow'] > 1:
			'"Yeech!" you wince. "I''m never going to get used to that!"'
			'"But you still keep doing it anyways," <<$npc_firstname[$boy]>> smirks.'
			'"Yeah, yeah, shut up," you say, rolling your eyes and sticking out your tongue, trying to air it out.'
			gs 'booty_call_sex', 'sex_end'
		else
			'"Blech!" you shudder. "That''s awful!"'
			if booty_call['bj_cum_choice'] > 6 and booty_call['bj_cum_choice'] <= 8:
				'"If you hate swallowing so much, then why didn''t you just let me cum on your face like I wanted to?" <<$npc_firstname[$boy]>> asks quizzically.'
				gs 'booty_call_start', 'cum_mouth_swallow_why'
			elseif booty_call['bj_cum_choice'] > 4 and booty_call['bj_cum_choice'] <= 8:
				'"If you hate swallowing so much, then why didn''t you just let me cum on your tits?" <<$npc_firstname[$boy]>> asks quizzically.'
				gs 'booty_call_start', 'cum_mouth_swallow_why'
			else
				'"Then why''d you do it?" <<$npc_firstname[$boy]>> asks, a dumbfounded look on his face.'
				gs 'booty_call_start', 'cum_mouth_swallow_why'

				act'Cause boys like it':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Cause boys seem to like it," you wince, airing out your tongue, trying to dissipate the taste. "I don''t want to be a shitty lay. Sometimes that means doing stuff you don''t like."'
					'"Well it <i>was</i> pretty hot," <<$npc_firstname[$boy]>> grins at you.'
					'"Why?!" you ask. "Why do you idiots with dicks want girls to swallow this vile stuff?"'
					'He chuckles at you while you continue to gag for a little while longer, trying to get past your disgust.'
					gs 'booty_call_sex', 'sex_end'
				end
				if booty_call['bj_cum_choice'] > 8:
					act'Cause I like you':
						cla & *clr
						$npc_apt_bedroom[$boy]
						'"Because I like you," you say, a look of betrayal on your face. "And I wanted to do something nice for you. I''m severely regretting it now. I don''t want to like you anymore, this was a mistake."'
						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
						gs 'booty_call_sex', 'sex_end'
					end

					act'Because you asked':
						cla & *clr
						$npc_apt_bedroom[$boy]
						'"Because you asked me to," you say, giving him an accusatory look. "That makes this your fault. <i>Bleeechhh...</i>"'
						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
						gs 'booty_call_sex', 'sex_end'
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'cum_mouth_swallow_why':
	act'Trying to acquire the taste':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'"I heard you have to get used to the taste," you say, airing out your tongue in disgust.'
		'"Well you don''t seem to be doing a very good job of it."'
		'"Shut up," you glare.'
		gs 'booty_call_sex', 'sex_end'
	end
	if booty_call['bj_cum_choice'] > 6 and booty_call['bj_cum_choice'] <= 8:
		act'Too much mess':
			cla & *clr
			$npc_apt_bedroom[$boy]
			'"Too messy," you grimace. "Then I have to clean this vile shit off <i>my face</i>. At least if I swallow it gets rid of all the gross at once."'
			gs 'booty_call_sex', 'sex_end'
		end
	else
		act'Too much mess':
			cla & *clr
			$npc_apt_bedroom[$boy]
			'"Too messy," you wince. "It''s just cleaner if I swallow it."'
			gs 'booty_call_sex', 'sex_end'
		end
	end
	if booty_call['bj_cum_choice'] > 4:
		act'That''s even <i>more</i> gross':
			cla & *clr
			$npc_apt_bedroom[$boy]
			'"That''s even <i>more</i> gross," you grimace. "I''d rather swallow it than get it on me."'
			gs 'booty_call_sex', 'sex_end'
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_face1':
	!! asks to come on face
	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
	'"<i>nngh-!</i> <<$pcs_nickname>>-! Can I come on your face? You''d look so hot."'
	act'No way':
		cla & *nl
		'"Nuh uh," you pop off his cock, giving him a disgusted look. "There''s no <i>way</i> I''m letting your spray that all over my face."'

		gs 'booty_call_start', 'bj_sub_cum_hand'

		gs 'booty_call_start', 'bj_sub_cum_tits2'

		act'How about my mouth instead?':
			cla & *nl
			'"How about my mouth instead?" you smile. "Don''t you want to just pump it straight down my throat instead?"'
			'<<$npc_firstname[$boy]>>''s face turns to a hungry expression. "Well, when you put it like that..."'
			gs 'booty_call_start', 'bj_sub_cum_mouth2'
		end
	end

	act'Let him (gross)':
		booty_call['cum_face'] = 1
		$booty_call['last_cum'] = 'facial'
		gs 'cum_call', 'face', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
		'"Alright," you sigh. <<$npc_firstname[$boy]>> eagerly sits up positioninig himself over you.'
		'You close your eyes right before something warm, wet, and slimy spatters across your face. You flinch at the impact and your expression turns into a grimace as it piles up, slowly dripping down your cheeks.'
		*nl
		'"Ugh! That''s fucking disgusting!" you whine. "I can''t believe I let you talk me into this."'
		'"You look great though." You can''t see him with the cum gluing your eyelids shut, but you''re pretty sure he''s wearing a grin you would slap him for.'
		!! add reactions later?
		gs 'booty_call_after', 'wipe_face'
		gs 'booty_call_sex', 'sex_end'
	end

	act'Let him (passive)':
		booty_call['cum_face'] = 1
		$booty_call['last_cum'] = 'facial'
		gs 'cum_call', 'face', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
		'"Hmmm?" you hum around his cock before letting it pop from your mouth. "Sure. If you like."'
		*nl
		'You let him position himself over you and close your eyes. Moments later warm fluid spatters across your face and within seconds, your face is covered in <<$npc_firstname[$boy]>>''s cum. After a little bit to make sure <<$npc_firstname[$boy]>>''s finished, you crack an eye and look up at him.'
		*nl
		'"Happy?" you ask.'
		'"You have no idea how fucking hot you look right now."'
		!! add reactions later?
		gs 'booty_call_after', 'wipe_face'
		gs 'booty_call_sex', 'sex_end'
	end

	act'Stick our your tongue (swallow)':
		booty_call['cum_face'] = 1
		booty_call['cum_swallow'] += 1
		$booty_call['last_cum'] = 'face_mouth'
		booty_call['swallow'] = 1
		gs 'cum_call', 'face', $boy, 1
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial25.mp4"></video></center>'
		'"Hmmm?" you hum around his cock before letting it slip from your mouth. Without saying anything else, you kneel down and close your eyes, sticking out your tongue.'
		*nl
		'"Ahhhhh~!"'
		*nl
		'"You''re the fucking best."'
		'You can hear the wet squelching sound of his hand working his cock and after a couple seconds, you feel a shot of cum land directly on your tongue. <<$npc_firstname[$boy]>> makes sure to spread his shots around, approximately half of them spattering across your face and the other half landing in your mouth, keeping it open the entire time until you feel him shaking the last drips of his load onto the tip of your tongue.'
		act'Gulp':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial26.mp4"></video></center>'
			'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
			'"You''re so fucking hot."'
			'"Yeah, I know," you grin back.'
			gs 'booty_call_after', 'wipe_face'
			gs 'booty_call_sex', 'sex_end'
		end
	end

	act'Stick our your tongue (spit)':
		booty_call['cum_face'] = 1
		$booty_call['last_cum'] = 'face_mouth'
		booty_call['spit'] = 1
		gs 'cum_call', 'face', $boy, 1
		gs 'cum_call', 'hair', $boy, 1
		gs 'cum_call', 'mouth', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/facial/facial29.mp4"></video></center>'
		'"Hmmm?" you hum around his cock before letting it pop from your mouth. "Alright. Sure."'
		*nl
		'You stick out your tongue and <<$npc_firstname[$boy]>> takes this as an invitation, grabbing you by the hair with one hand and working his shaft with the other. A huge blast of cum sprays directly across your face, most of it landing on your cheeks and some even getting in your hair. A little falls inside your mouth and you spit it out as it comes, as <<$npc_firstname[$boy]>> finishes finishing himself over your face. When the cum stops flying, you crack an eye and look up at him.'
		*nl
		'"Happy?" you ask.'
		'"You have no idea how fucking hot you look right now."'
		!! add reactions later?
		gs 'booty_call_after', 'wipe_face'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_sub_cum_face2':
	!! comes on face without warning

end

if $ARGS[0] = 'bj_sub_cum_face3':
	!! player choosing to do it
	act'How about my face instead?':
		cla & *clr
		$npc_apt_bedroom[$boy]
		
		'"How about you just cum on my face instead?" you ask pulling back. '
		'In response, <<$npc_firstname[$boy]>> scooches forwards and grabs hold of his member, pointing at your face. You''ll take that as a yes.'
		act'Close your eyes':
			booty_call['cum_face'] = 1
			$booty_call['last_cum'] = 'facial'
			gs 'cum_call', 'face', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
			'You let him position himself over you and close your eyes. Moments later warm fluid spatters across your face and within seconds, your face is covered in <<$npc_firstname[$boy]>>''s cum. After a little bit to make sure <<$npc_firstname[$boy]>>''s finished, you crack an eye and look up at him.'
			*nl
			'"How do I look?" you grin.'
			'"Fucking hot."'
			'"I thought so." You give him a wink.'
			!! add reactions later?
			gs 'booty_call_after', 'wipe_face'
			gs 'booty_call_sex', 'sex_end'
		end

		act'Stick our your tongue (swallow)':
			booty_call['cum_face'] = 1
			booty_call['cum_swallow'] += 1
			$booty_call['last_cum'] = 'face_mouth'
			gs 'cum_call', 'face', $boy, 1
			gs 'cum_call', 'mouth_swallow', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial25.mp4"></video></center>'
			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue.'
			*nl
			'"Ahhhhh~!"'
			*nl
			'The first shot goes directly into your mouth and the next spatters across your cheek. <<$npc_firstname[$boy]>> aims carefully, trying to get just as much cum on your face as he can in your mouth, but soon he runs out of steam, shaking the last drips of his load onto the tip of your tongue.'
			act'Gulp':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/cum/facial/facial26.mp4"></video></center>'
				'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
				gs 'booty_call_after', 'wipe_face'
				gs 'booty_call_sex', 'sex_end'
				gs 'booty_call_talk', 'swallow_react1'

			end
		end

		act'Stick our your tongue (spit)':
			booty_call['cum_face'] = 1
			$booty_call['last_cum'] = 'face_mouth'
			gs 'cum_call', 'face', $boy, 1
			gs 'cum_call', 'hair', $boy, 1
			gs 'cum_call', 'mouth', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial29.mp4"></video></center>'
			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue. In return, he grabs you by the hair with one hand and works his cock right in front of your face with the other.'
			*nl
			'The first shot sprays directly across your face, spattering across your cheeks and even in your hair. A little falls inside your mouth and you spit it out as it comes, as <<$npc_firstname[$boy]>> finishes finishing himself over your face. When the cum stops flying, you crack an eye and look up at him.'
			!! add reactions later?
			gs 'booty_call_after', 'wipe_face'
			gs 'booty_call_sex', 'sex_end'
		end
	end
end


if $ARGS[0] = 'bj_sub_cum_tits1':
	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
	'"I''m gonna- <i>nngh-!</i> You''d look super hot with my cum on your tits. Can I?"'
	act'No way':
		cla & *nl
		'"Ew." You wrinkle your nose in disgust as you pop your mouth off his cock.'
		gs 'booty_call_start', 'bj_sub_cum_hand'
		gs 'booty_call_start', 'bj_sub_cum_face3'
		gs 'booty_call_start', 'bj_sub_cum_mouth2'
	end

	act'Jerk him over your tits':
		booty_call['cum_tits'] = 1
		$booty_call['last_cum'] = 'tits'
		gs 'cum_call', 'breasts', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
		'You don''t say a word, removing your mouth and start working his shaft with your hand instead. Within moments, his cock erupts and warm cum sprays across your chest, leaving long strands dripping down your breasts.'
		!! reactions?
		gs 'booty_call_after', 'wipe_tits'
		gs 'booty_call_sex', 'sex_end'
	end
	if tits > 1:
		act'Finish him with your tits':
			booty_call['cum_tits'] = 1
			$booty_call['last_cum'] = 'tits'
			gs 'cum_call', 'breasts', $boy, 1
			gs 'cum_call', 'hands', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
			'"I''ve got an even better idea," you grin, leaning forward and smushing your breasts together around his cock. You squeeze them together with your hands and start working his shaft. Within seconds, cum erupts from the tip of his cock, smearing it all across your still moving tits and sending it dripping down your hands.'
			!! reactions?
			gs 'booty_call_after', 'wipe_tits'
			gs 'booty_call_sex', 'sex_end'
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_tits2':
	!! player choosing to do it
	act'Jerk him over your tits':
		booty_call['cum_tits'] = 1
		$booty_call['last_cum'] = 'tits'
		gs 'cum_call', 'breasts', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
		'"How about my tits instead?"'
		'With a dirty grin, you kneel beneath him grab hold of his cock and jerking it until he comes with a groan. Cum coats your tits in thick strands, warm against your skin.'
		!! reactions?
		gs 'booty_call_after', 'wipe_tits'
		gs 'booty_call_sex', 'sex_end'
	end
	if tits > 1:
		act'Finish him with your tits':
			booty_call['cum_tits'] = 1
			$booty_call['last_cum'] = 'tits'
			gs 'cum_call', 'breasts', $boy, 1
			gs 'cum_call', 'hands', $boy, 1
			gs 'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
			'"How about my tits instead?"'
			'With a dirty grin, you kneel beneath him and smush his cock between your breasts. You squeeze them together as tightly as possible and work his shaft until a few moment later, he comes, spraying cum all over your tits and hands.'
			!! reactions?
			gs 'booty_call_after', 'wipe_tits'
			gs 'booty_call_sex', 'sex_end'
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_hand':
	act'Finish him with your hand':
		$booty_call['last_cum'] = 'hand'
		booty_call['cum_hand'] = 1
		gs 'cum_call', 'hands', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,1.mp4"></video></center>'
		'Removing his cock from your mouth, you instead kneel in front of him and work his cock with your hand until moments later, cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
		gs 'booty_call_after', 'wipe_hands'
		gs 'booty_call_sex', 'sex_end'
	end
end


if $ARGS[0] = 'bj_force_cum_mouth':
	booty_call['cum_mouth'] = 1
	booty_call['cum_mouth_force'] = 1
	$booty_call['last_cum'] = 'mouth'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
	'"No than-" You start trying to tell him you won''t do it when he violently grabs your head and forces you back onto his cock.'
	'"I wasn''t asking."'
	if pcs_makeup > 1:
		pcs_makeup = 0
		'Semen spills into your mouth and you struggle against him, trying to pull away but he holds you firmly onto his manhood. Tears stream from your eyes, running down your face and ruining your makeup in black rivers. All you can do is briefly cough as cum continues to fill your mouth.'
	else
		'Semen spills into your mouth and you struggle against him, trying to pull away but he holds you firmly onto his manhood. Tears stream from your eyes, running down your face. All you can do is briefly cough as cum continues to fill your mouth.'
	end
	act'Gag':
		gs 'cum_call', 'mouth', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit3.mp4"></video></center>'
		'Finally, your body can''t take it anymore and you begin to choke. You cough hard, cum exploding out from your lips and with the strength of a drowning woman, you force yourself off of <<$npc_firstname[$boy]>>''s cock. You retch, violently spewing the rest of his cum from your mouth, taking ragged breaths as you continue to cough.'
		'"Why would the fuck would you do that?" you ask, looking up at <<$npc_firstname[$boy]>> with teary eyes.'
		'"I told you I wanted to come in your mouth." He takes you by the chin and lifts your head with his finger. "It''s not a request. If I want it, you do it."'
		gs 'booty_call_after', 'quit'
		gs 'booty_call_start', 'bj_force_cum_grumble'
	end
	act'Swallow!':
		booty_call['cum_swallow'] += 1
		$booty_call['last_cum'] = 'swallow'
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/forced1.mp4"></video></center>'
		'You gag but he keeps your face held all the way down to his balls. His cum overflows from your mouth and in a desperate attempt to avoid drowning, you swallow. It seems to be exactly what he was waiting for and continues to unload himself directly down your throat.'
		*nl
		'After what seems like an eternity, his orgasm fades and fluid stops filling the back of your mouth and with that, <<$npc_firstname[$boy]>> finally releases you.'
		gs 'booty_call_start', 'bj_force_cum_wtf'
		gs 'booty_call_start', 'be_nice'
		gs 'booty_call_start', 'lucky_like'
	end

	act'Swallow (take it in stride)':
		booty_call['cum_swallow'] += 1
		$booty_call['last_cum'] = 'swallow'
		gs 'cum_call', 'mouth_swallow', $boy, 1
		gs 'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
		'You''re surprised by his force but you take it in stride, swallowing as <<$npc_firstname[$boy]>> pumps his member and his cum straight into the back of your throat. You continually swallow it as it comes until there is nothing left to suck up but your own saliva and <<$npc_firstname[$boy]>>''s cock.'
		gs 'booty_call_start', 'bj_force_cum_wtf'
		gs 'booty_call_start', 'be_nice'
		gs 'booty_call_start', 'lucky_like'
!!		gs 'booty_call_start', 'sub_option'
	end

	act'Spit (take it in stride)':
		cla & *clr
		$booty_call['last_cum'] = 'mouth'
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
		'You''re surprised by his force but you take it in stride, swallowing as <<$npc_firstname[$boy]>> pumps his member and his cum straight into the back of your throat. You let it pool there until you stop feeling him pulse between your lips and he finally releases you, allowing you to slip off his cock and take a breath as the semen spills from your lips.'
		gs 'booty_call_start', 'bj_force_cum_wtf'
		gs 'booty_call_start', 'be_nice'
		gs 'booty_call_start', 'lucky_like'
!!		gs 'booty_call_start', 'sub_option'
	end
end

if $ARGS[0] = 'bj_force_cum_wtf':
	act'What the fuck':
		cla & *clr
		$npc_apt_bedroom[$boy]
		booty_call['mad'] = 1
		'"What the fuck," you cough, dislodging a few stray globules at the back of your throat. "Why would you do that?"'
		'"I told you I wanted to come in your mouth." <<$npc_firstname[$boy]>> takes you by the chin and lifts your head with his finger. "It''s not a request. If I want it, you do it."'
		gs 'booty_call_after', 'quit'
		gs 'booty_call_start', 'bj_force_cum_grumble'
	end
end

if $ARGS[0] = 'be_nice':
	act'Be nicer next time?':
		cla & *nl
		'"If you really want it that badly, maybe be a little nicer about it next time?" You give him a gentle smile, eyes still glistening. "I don''t mind <i>that</i> much, but if you ask nicely..."'
		'"We''ll see," he says.'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'lucky_like':
	act'You''re lucky I like you':
		cla & *nl
		'Pulling back, you wipe your lips and give <<$npc_firstname[$boy]>> a dry stare.'
		'"You''re lucky I like you," you say. "Otherwise I might get really mad about that."'
		'"Oh yeah?" he says. "What does that look like? Maybe I''d like to see that."'
		gs 'booty_call_sex', 'sex_end'
	end
end

!!if $ARGS[0] = 'sub_option':
!!	act'sub_option':
!!		cla & *nl
!!		'You look up at him'
!!		gs 'booty_call_sex', 'sex_end'
!!	end
!!end

if $ARGS[0] = 'bj_force_cum_submit':
	act'Submit':
		pcs_horny += 50
		$booty_call['last_cum'] = 'swallow'
		cla & *clr
		$npc_apt_bedroom
		'Your eyes go wide and you reflexively gulp. The way he said that was so demeaning and rude and...'
		*nl
		'<i>hot...</i>'
		*nl
		'Heat spreads through your hips and you can feel your pussy begin to practically <i>drool</i> with moisture.'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_force_cum_grumble':
	act'Grumble':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'"Hmph!" you tug your chin out of his grasp, internally grumbling to yourself, but you don''t press the issue any further.'
		gs'booty_call_sex','sex_end'
		if pcs_vag ! 0 or (booty_call['virgin'] < 1 and know_virgin[$boy] < 1):
			act'Can we have sex now?':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
				'"Can we have sex now?" you ask, maybe letting a little more exhasperation into your voice than you meant to.'
				if rand(1,10) <= npc_sexdrive[$boy]:
					'"Yeah," he smiles. "I think I can go again. Just gimme a minute to get hard."'
					act'Wait':
						cla & *clr
						minut += rand(1,2)
						booty_call['position_choose'] = 1
						booty_call['get_hard'] = 1
						'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
						'You lay back on the bed and stare at the ceiling, waiting impatiently while you hear him furiously flapping his flacid dick around, forcing it to get hard again.'
						gs 'booty_call_sex', 'sex_start'
					end

					act'Help him out (hand)':
						cla & *clr
						gs'arousal','hj',1,'no_orgasm_msg'
						gs'stat'
						'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
						'"Let me help you out with that," you smile, rolling over and taking <<$npc_firstname[$boy]>>''s dick in your hand. Even soft, you feel it twitch in response to your touch and you can''t help but smile wider at the reaction. You begin working the shaft up and down and in no time at all, you''ve got nice stiff cock ready for fucking.'
						$booty_call['position'] = ''
						gs 'booty_call_sex', 'sex_start'
					end

					act'Help him out (mouth)':
						cla & *clr
						gs'arousal','bj',1,'no_orgasm_msg'
						gs'stat'
						'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
						'"Let me help you out with that," you smile, rolling over and taking <<$npc_firstname[$boy]>>''s dick in your hand. Leaning down, you take the soft tip of his dick and place it between your lips, sucking gently. You instantly feel it twitch and you can''t help but smirk, even with a cock in your mouth.'
						*nl
						'Through a variation of kissing, licking, and sucking, <<$npc_firstname[$boy]>> rapidly stiffens up and in no time at all, you have a nice hard cock ready for fucking.'
						$booty_call['position'] = ''
						gs 'booty_call_sex', 'sex_start'
					end
				else
					'"Nah, I think I''m tapped out.'
					act'Try to get him hard again (hand)':
						gs'arousal','hj',rand(1,2),'no_orgasm_msg'
						gs'stat'
						cla & *clr
						if booty_call['cum_count'] >= npc_sexdrive[$boy]:
							cla & *clr
							!! IMAGE HERE
							$npc_apt_bedroom[$boy]
							'"Not if I have anything to say about it..."'
							'Or so you thought. You grab his soft, spongey cock in your hand and work it with all you''ve got. But you can''t even manage to get a twitch out of it, let alone get him fully hard again.'
							*nl
							'"Fuck!" you growl and throw yourself back onto the bed in frustration.'
							gs 'booty_call_after', 'after_sex'
						else
							'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
							'"Not if I have anything to say about it," you grin.'
							'You forcibly grab <<$npc_firstname[$boy]>>''s dick in your hand and begin kneading it with your fingers. You work the shaft up and down and within minutes, despite his initial protests, you have a fully erect cock in your hands. Ready and waiting to be fucked.'
							$booty_call['position'] = ''
							gs 'booty_call_start', 'handjob_dom1'
							gs 'booty_call_start', 'foreplay_choose'
							gs 'booty_call_sex', 'sex_start'
						end
					end

					act'Try to get him hard again (mouth)':
						gs'arousal','bj',rand(1,2),'no_orgasm_msg'
						gs'stat'
						if booty_call['cum_count'] >= npc_sexdrive[$boy]:
							cla & *clr
							!! IMAGE HERE
							$npc_apt_bedroom[$boy]
							'"Not if I have anything to say about it..."'
							'Or so you thought. You grab his soft, spongey cock in your hand and work it with all you''ve got. You put it in your mouth and suck on it, trying to reverse inflate it like a meat balloon. But you can''t even manage to get a twitch out of it, let alone get him fully hard again. It''s like trying to play billiards with a rope.'
							*nl
							'"Fuck!" you growl and throw yourself back onto the bed in frustration.'
							gs 'booty_call_after', 'after_sex'
						else
							'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
							'"Not if I have anything to say about it," you grin.'
							'You forcibly grab <<$npc_firstname[$boy]>>''s dick in your hand and begin kneading it with your fingers. You lean down, sucking on the tip and immediately feel life within, feel it expand and twitch inside your mouth. Continuing to kiss, lick, and suck on it, within minutes, despite his initial protests, you have a fully erect cock in your possession. Ready and waiting to be fucked.'
							$booty_call['position'] = ''
							gs 'booty_call_start', 'bj_dom1'
							gs 'booty_call_start', 'foreplay_choose'
							gs 'booty_call_sex', 'sex_start'
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'bj_sub_cum_warn':
	booty_call['bj_cum'] = 3
	'After a couple minutes, he taps you on the head.'
	'"I''m-! Almost there-!" he groans loudly.'
	gs 'booty_call_start', 'bj_sub_cum_hand'
	gs 'booty_call_start', 'bj_sub_cum_mouth2'
	gs 'booty_call_start', 'bj_sub_cum_face3'
	gs 'booty_call_start', 'bj_sub_cum_tits2'
	act'Not yet (sex)':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
		booty_call['position_choose'] = 1
		'You pull your mouth off his cock with a pop, giving him a lusty stare.'
		if booty_call['fuck_count'] > 0:
			'"Not yet big boy," you grin, jerking him gently. "I want you to fuck me again."'
		else
			'"Not yet big boy," you grin, jerking him gently. "I want you inside me first."'
		end
		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'bj_sub_lets_fuck':
	'After a couple minutes <<$npc_firstname[$boy]>> pushes your head away, your saliva trailing from his cock.'
	if stat['think_virgin'] = 1:
		if know_virgin[$boy] = 1:
			'"That was great," he smiles. "That was exactly what I wanted. But I want more now."'
			act'I''m saving my virginity':gt'booty_call_virgin','wait'
			act'Okay (lose your virginity)':gt'booty_call_virgin','start4'
		else
			'"That was great," he smiles. "That was exactly what I wanted. But <i>now</i> I want your pussy."'
			act'I''m saving my virginity':gt'booty_call_virgin','wait'
			act'Okay (lose your virginity)':gt'booty_call_virgin','start3'
		end
	else
		'"That was great," he smiles. "That was exactly what I wanted. But <i>now</i> I want your pussy."'
		act'It''s about time':booty_call['about_time'] = 1 & gs'booty_call_sex','sex_start'

		act'Can we keep doing this?':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
			'"Can I keep doing this?" you ask, continuing to play with his cock, trailing it up and down with kisses and small licks. "I want to finish you off."'
			if npc_selfish[$boy] = 1:
				'"Fuck that, I want to fuck <i>you!</i>"'
				act'Then I don''t want to do anything':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Then I don''t want to do anything," you say, pulling away with a harumph.'
					'"What the fuck! You''re just gonna blue ball me like this?"'
					'"I''m not getting off here either," you say back with irritation. "But I don''t want to fuck today and you won''t settle for a blowjob, so I guess we''re just not gonna do anything today."'
					'"Ugh! You''re impossible!"'
					gs'booty_call_after','quit2'
				end

				act'<i>Fiiiine</i>':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"<i>Fiiiiine,</i>" you roll your eyes, letting out a deep breath. "Let''s get this over with then."'
					booty_call['position_choose'] = 1
					gs'booty_call_sex','sex_start'
				end
			else
				booty_call['not_today'] = 1
				if rand(0,1) = 1:
					'"Really?" <<$npc_firstname[$boy]>> asks quizzically. "You want to <i>keep</i> blowing me?"'
				else
					'"What?" <<$npc_firstname[$boy]>> asks quizzically. "Why?"'
				end
				act'Don''t feel like it today':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
					'"I don''t know," you shrug, continuing to play with his cock. "I''m just not in the mood. Would rather just do this."'
					'"Well... if that''s what you want I guess," <<$npc_firstname[$boy]>> shrugs back.'
					act'Get back to it':gt'booty_call_start','bj_resume'
				end

				act'I like giving head':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
					'"I like blowjobs," you shrug. "I think they''re fun. I just want to keep sucking you today," you say, giving his cock another lick. "I''m not really in the mood to fuck."'
					'"Well... if that''s what you want I guess," <<$npc_firstname[$boy]>> shrugs back.'
					act'Get back to it':gt'booty_call_start','bj_resume'
				end
			end
		end
	end
end

if $ARGS[0] = 'bj_resume':
	gs 'arousal', 'bj',rand(5,10),'no_orgasm_msg'
	gs'stat'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
	'You go back to blowing <<$npc_firstname[$boy]>>, humming to yourself as you relax while bobbing your head up and down the length of his cock.'
	booty_call['bj_cum_choice'] = rand(1,20)
	if booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
		gs 'booty_call_start', 'bj_sub_cum_warn'
	elseif booty_call['bj_cum_choice'] > 8:
		gs 'booty_call_start', 'bj_sub_cum_mouth1'
	elseif booty_call['bj_cum_choice'] > 6:
		gs 'booty_call_start', 'bj_sub_cum_face1'
	elseif booty_call['bj_cum_choice'] > 4:
		gs 'booty_call_start', 'bj_sub_cum_tits1'
	elseif booty_call['fuck_count'] > 0:
		gs 'booty_call_start', 'bj_sub_cum_surprise'
	else
		gs 'booty_call_start', 'bj_sub_cum_warn'
	end
end

if $ARGS[0] = 'bj_sub_cum_wait':
	'After a couple minutes, he taps you on the head.'
	'"Wait-! I''m gonna come if you keep that up!" he groans loudly. "I wanna fuck you first."'
	act'Pull back (sex)':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'You pull your mouth off his cock with a pop and a grin on your lips.'
		'"Me too," you say, climbing back onto the bed.'
		gs 'booty_call_sex', 'sex_start'
	end
	gs 'booty_call_start', 'bj_sub_cum_hand'
	gs 'booty_call_start', 'bj_sub_cum_mouth2'
	gs 'booty_call_start', 'bj_sub_cum_face3'
	gs 'booty_call_start', 'bj_sub_cum_tits2'
end

if $ARGS[0] = 'bj_end':
	gs 'booty_call_sex', 'harden_hand'
	gs 'booty_call_sex', 'harden_mouth'
end

if $ARGS[0] = 'bj_warning_next_time':
	act'A little warning?':
		cla & *clr
			$npc_apt_bedroom[$boy]
		if booty_call['bj_cum'] = 1:
			if npc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
				'"I don''t mind if you come in my mouth," you say, licking your lips with a smile. "I know how much you love it. But could you at least warn me before you do it?"'
			else
				'"A little warning next time?" you smile, wiping a loose drop of cum from your lip. "I barely had time to swallow."'
			end
		elseif booty_call['bj_cum'] = 2:
			if npc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
				'"I don''t mind if you come in my mouth," you smile, wiping your lips. "I know how much you love it. But could you at least warn me before you do it?"'
			else
				'"A little warning next time?" you ask, with a cumglazed smile.'
			end
		elseif booty_call['bj_cum'] = 3:
			if npc_cum_pref_know[$boy] = npc_cum_pref[$boy]:
				'"I don''t mind if you come in my mouth," you smile, wiping your lips. "I know how much you love it. But could you at least warn me before you do it?"'
			else
				'"A little warning next time?" you ask, with a cumglazed smile.'
			end
		end
		if npc_cum_pref[$boy] = 2 and npc_cum_pref_know[$boy] = 0:
			if npc_generous[$boy] = 1:
				npc_bj_cum_warn[$boy] = 1
				'"Sorry," he smiles back apologetically. "I''ll try to remember next time. You''re just so good at this, it''s hard to hold back."'
				act'Thanks':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
					'"Thanks," you smile, giving him a sweet little kiss on the tip of his cock. "I really appreciate it."'
					gs 'booty_call_sex', 'sex_end'
				end
			elseif npc_selfish[$boy] = 1:
				'"I think I''ll do what I want," he smiles back shamelessly. "I love it when a girl swallows my load."'
			else
				'"Sorry. I just love the way you look with my cum in your mouth. Especially when you swallow."'
			end

			act'You still have to ask':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
				'"You. Still. Have. To. Ask!" you tease, punctuating your chastisement with a gentle kiss across his tip.'
				gs 'booty_call_sex', 'sex_end'
			end

			act'Really?':
				npc_cum_pref_know[$boy] = npc_cum_pref[$boy]
				cla & *clr
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/smile1.jpg"></center>'
				'"Really?" you ask. "You like it that much?"'
				if npc_selfish[$boy] = 1:
					'"Yeah."'
				else
					'"Yeah," he admits with a little shrug.'
				end
				act'Just warn me next time':
					cla & *nl
					'"Well I''ll keep it in mind. Just try not to drown me next time, okay?" you smile.'
					gs 'booty_call_sex', 'sex_end'
				end

				act'Maybe I''ll let you do it more often':
					cla & *nl
					'"Maybe I''ll let you do it more often going forward," you smirk.'
					gs 'booty_call_sex', 'sex_end'
				end

				act'You still have to ask':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
					'"You. Still. Have. To. Ask!" you tease, punctuating your chastisement with a gentle kiss across his tip.'
					gs 'booty_call_sex', 'sex_end'
				end
			end
		else
			if npc_generous[$boy] = 1:
				booty_call['bj_warning'] = 1
				'"Sorry," he smiles back apologetically. "I''ll try to remember next time. Your mouth just felt so good."'
				act'Thanks':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
					'"Thanks," you say, giving him a sweet little kiss on the tip of his cock.'
					gs 'booty_call_sex', 'sex_end'
				end

				act'It''s okay':
					cla & *clr
					'<center><video autoplay loop src="images/shared/sex/cum/kiss_cock.mp4"></video></center>'
					'"It''s okay," you say, giving him a sweet little kiss on the tip of his cock. "We all make mistakes."'
					gs 'booty_call_sex', 'sex_end'
				end
			else
				if npc_selfish[$boy] = 1:
					'"Nah," he smiles back shamelessly. "I think I''ll just do whatever I want."'
				else
					'"You sure? Looked like you had a lot of fun taking a surprise cumshot in the mouth."'
				end
				'You roll your eyes, but don''t otherwise say anything else.'
				!! add option to get annoyed
				gs 'booty_call_sex', 'sex_end'
			end
		end
	end
end

if $ARGS[0] = 'bj_warning_thanks':
	act'Thanks for the warning':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/smile1.jpg"></center>'
		$npc_apt_bedroom[$boy]
		if booty_call['bj_cum'] = 1:
			'"Thanks for the warning," you smile, licking your lips.'
			gs 'booty_call_start', 'bj2'
		elseif booty_call['bj_cum'] = 2:
			'"Thanks for the warning," you say, cum still dripping from your smile.'
		end
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_tasty':
	act'Tasty':
		cla & *clr
		'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
		$npc_apt_bedroom[$boy]
		'"Mmmm. Tasty," you grin at <<$npc_firstname[$boy]>>, licking your lips.'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_already':
	act'Already?':
		cla & *clr
		'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
		$npc_apt_bedroom[$boy]
		if booty_call['bj_cum'] = 1:
			'"Seriously?" you ask, gulping again as you draw back from his cock. "You came already?"'
		elseif booty_call['bj_cum'] = 2:
			'"Seriously?" you ask, wiping your mouth with your hand. "You came already?"'
		end
		'"Your mouth just felt too good!" he says. "I couldn''t hold it in!"'
		act'Finish up':
			cla & *clr
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/smile1.jpg"></center>'
			'"Well, I guess I''m fine ending it here anyways. I <i>assume</i> you''re good with that."'
			gs 'booty_call_sex', 'sex_end'
		end
		act'You better not be done yet':
			cla & *nl
			booty_call['not_done'] = 1
			'"Well, you better not be done yet, cause I still want more!"'
			gs 'booty_call_sex', 'harden_hand'
			gs 'booty_call_sex', 'harden_mouth'
		end
	end
end

if $ARGS[0] = 'bj_swallow_gross':
	act'Gross':
		cla & *clr
		'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
		$npc_apt_bedroom[$boy]
		'"Ugh, I hate swallowing," you say, shaking your head as if that would somehow get rid of the taste.'
		'"But you did it anyways," he says back, grin widening across his face.'
		if npc_cum_pref[$boy] = 2 and npc_cum_pref_know[$boy]= npc_cum_pref[$boy]:
			act'Because I know you like it':
				cla & *nl
				'"Yeah, cause I know you''re a pervert who likes watching me drink your nasty cum," you say with a glare. "I''m generous like that."'
				gs 'booty_call_sex', 'sex_end'
			end

			act'Because I like you':
				cla & *nl
				'"Only cause I happen to like you so much. Ugh, times like this, I wish I didn''t." You give him a dirty look, a smile twitching at the corner of your mouth despite yourself.'
				if npc_generous[$boy] = 1:
					'"I''ll be sure to make it up to you sometime," he smiles back.'
					'"You better! Cause this is just, <i>ick-!</i>"'
				elseif npc_selfish[$boy] = 1:
					'"Good girl," he grins.'
					'"Shut up," you roll your eyes in return.'
				else
					'He smiles at you, but neither of you say anything else.'
				end
				gs 'booty_call_sex', 'sex_end'
			end
		else
			'"Yeah, cause I know guys like you love watching girls like me drink cum," you raise an eyebrow back at him. "Still gross though."'
			if npc_selfish[$boy] = 1:
				'"Good girl," he grins.'
				'"Shut up," you roll your eyes in return.'
			end
			gs 'booty_call_sex', 'sex_end'
		end
	end
end


!! --------------------- player''s choices ----------------------------------------------------------------------


if $ARGS[0] = 'foreplay_choose':
	if $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'makeout_dom1'

	if $booty_call['position'] ! 'handjob' and $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'handjob_dom1'

	if $booty_call['position'] ! 'blowjob':gs 'booty_call_start', 'bj_dom1'

!!	if $booty_call['position'] ! '69':gs 'booty_call_start', '69_dom1'

	if $booty_call['position'] ! 'facesit':gs 'booty_call_start', 'facesit_1'

!!	act'Let him lead':
end

if $ARGS[0] = 'makeout_dom1':
	act'Make out with him':
		gs'arousal','kiss',rand(2,7),'no_orgasm_msg'
		gs'arousal','foreplay',-10,'no_orgasm_msg'
		gs'stat'
		$booty_call['position'] = 'makeout'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/foreplay/makeout1.mp4"></video></center>'
		if booty_call['foreplay_change'] >= 1:
			'You crawl over <<$npc_firstname[$boy]>> kissing him passionately while his hands roam all over your body.'
			booty_call['foreplay_change'] = 2
		else
			booty_call['foreplay_change'] += 1
			'You push <<$npc_firstname[$boy]>> onto the bed, crawling over him and plunge your tongue into his mouth, kissing him with everything you''ve got while his hands roam all over your body.'
		end
		act'Move your hand to his cock':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/foreplay/makeout2.mp4"></video></center>'
			'You snake your hand down to his cock and jerk it gently while continuing to make out with him.'
			gs 'booty_call_start', 'foreplay_choose'
			gs 'booty_call_sex', 'sex_start'
		end
		gs 'booty_call_start', 'foreplay_choose'
	end
end

if $ARGS[0] = 'handjob_dom1':
	act'Play with his cock (hand)':
		gs'arousal','hj',rand(1,4),'no_orgasm_msg'
		gs'stat'
		$booty_call['position'] = 'handjob'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/handjob/hj2.mp4"></video></center>'
		if booty_call['foreplay_change'] >= 1:
			'Pulling away, you kneel down in front of him and start working his shaft with your hands. You can feel him harden under your fingers and judging by his expression, he''s enjoying the view of your tits as much as the handjob.'
			booty_call['foreplay_change'] = 2
		else
			booty_call['foreplay_change'] += 1
			'Shifting off the bed, you kneel down in front of <<$npc_firstname[$boy]>> and start working his shaft with your hands. You can feel him harden under your fingers and judging by his expression, he''s enjoying the view of your tits as much as the handjob.'
		end

		act'Make him come in your hand':gt'booty_call_start','hj_cum1'
		gs 'booty_call_start', 'foreplay_choose'
		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'hj_cum1':
	booty_call['cum_count'] += 1
	booty_call['cum_hand'] = 1
	gs'cum_call','hands',$boy,1
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,1.mp4"></video></center>'
	if $booty_call['position'] = 'handjob':
		'You feel him tense under your touch and he tries to speak.'
		'"Hang on, wai-"'
		'But before he can finish his sentence, you finish him instead. Thick cum erupts from his cock, wads of it flying through the air, streams of it running down your fingers. A dirty grin is plastered across your face as you continue working his cock with your hand, milking him for every drop.'
	elseif $booty_call['position'] = 'blowjob':
		'<<$npc_firstname[$boy]>> groans loudly and cum erupts from the tip of his cock. The thick liquid dribbles down your fingers, mixing with your saliva, making his shaft even more slippery in your hand. A dirty grin is plastered across your face the whole time as you work his cock, determined to milk him for every drop.'
	else
		'<<$npc_firstname[$boy]>> groans loudly and cum erupts from the tip of his cock. The thick liquid dribbles down your fingers, making his shaft incredibly slippery in your hand. A dirty grin is plastered across your face the whole time as you work his cock, determined to milk him for every drop.'
	end
	gs 'booty_call_sex', 'sex_end'
end

if $ARGS[0] = 'bj_dom1':
	act'Play with his cock (mouth)':
		$booty_call['position'] = 'blowjob_tease'
		gs'arousal','bj',rand(2,3),'no_orgasm_msg'
		gs'stat'
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
		if booty_call['foreplay_change'] >= 1 and booty_call['bj_count'] >= 1:
			'You move down between <<$npc_firstname[$boy]>>''s legs, dipping your head and using your mouth to play with his cock, licking it, sucking it, kissing it, teasing it, enjoying every little twitch and reaction it elicits from him.'
			booty_call['foreplay_change'] = 2
		else
			booty_call['foreplay_change'] += 1
			'You move down between <<$npc_firstname[$boy]>>''s legs, dipping your head and using your mouth to play with his cock, licking it, sucking it, kissing it, teasing it, enjoying every little twitch and reaction it elicits from him.'
		end

		act'Keep teasing':
			cla & *clr
			gs'arousal','bj',rand(1,3),'no_orgasm_msg'
			gs'stat'
			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
			'"Hey, wait," <<$npc_firstname[$boy]>> grunts. "I''m gonna come if you keep that up."'
			act'Make him come':
				cla & *clr
				'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
				'<<$npc_firstname[$boy]>>''s warning only makes you want to force him to come even more and you begin rapidly jerking him off and he writhes under your touch. You feel a pulse run through his dick and you know he''s going to come right now.'
				act'Tease him to completion':
					gs 'booty_call_start', 'bj_dom_tease_cum'
					gs 'booty_call_sex', 'sex_end'
					*nl
					'"Sorry," you shamelessly grin. "I couldn''t resist."'
				end

				act'In your mouth (swallow)':
					booty_call['cum_swallow'] += 1
					gs 'booty_call_start', 'bj_dom_swallow1'
				end

				act'In your mouth (spit)':
					booty_call['cum_mouth'] = 1
					gs 'booty_call_start', 'bj_dom_spit1'
				end

!!{				act'On your face':
					booty_call['cum_face'] = 1
					gs 'booty_call_start', 'bj_dom_facial1'
					gs 'booty_call_sex', 'sex_end'
				end}
			end

			act'Blow him':gt 'booty_call_start', 'bj_dom2'

			gs 'booty_call_sex', 'sex_start'
		end

		act'Blow him':gt 'booty_call_start', 'bj_dom2'

		gs 'booty_call_start', 'foreplay_choose'
	end
end

if $ARGS[0] = 'bj_dom2':
	booty_call['bj_count'] += 1
	gs'arousal','bj',rand(2,7),'no_orgasm_msg'
	gs'stat'
	'<center><video autoplay loop src="images/shared/sex/blowjob/bj<<rand(46,50)>>.mp4"></video></center>'
	if $booty_call['position'] = 'blowjob_tease':
		'Deciding he''s had enough teasing, you take <<$npc_firstname[$boy]>> between your lips and begin blowing him in earnest.'
	else
		$booty_call['position'] = 'blowjob'
	end
	*nl
	'You give him your best head, taking pride in your work, bobbing up and down his shaft and doing your best to make <<$npc_firstname[$boy]>> feel good.'
	act'Make him come':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/handjob/hj3.mp4"></video></center>'
		'You keep going until you feel something change. His cock twitches in your mouth. His hips squirm beneath you. You can even feel him clenching his muscles through his balls. Unable to suppress a smile even with your lips still around his cock, you can tell he''s about to come.'
		*nl
		'You pull your mouth away and you grab hold of his manhood, jerking his cock rapidly, still slick with your saliva.'
		*nl
		if $npc_lovername[$boy] = '':
			'"I want you to come for me baby," you whisper sensually. "Come on baby! Come on, come on, come on, come on!"'
		else
			'"I want you to come for me <<$npc_lovername[$boy]>>," you whisper sensually. You feel him tense up and you know he''s going to blow any moment. "Come on <<$npc_lovername[$boy]>>! Come on, come on, come on, come on!"'
		end
		'A single pulse courses through his cock and you know he''s about to blow.'
		act'Make him come in your hand':gt'booty_call_start','hj_cum1'

		act'Tease him to completion':gt 'booty_call_start', 'bj_dom_tease_cum'

		act'In your mouth':
			booty_call['cum_swallow'] += 1
			gs 'booty_call_start', 'bj_dom_swallow1'
		end

!!		act'On your face':
!!			gs 'booty_call_start', 'bj_dom_facial1'
!!			gs 'booty_call_sex', 'sex_end'
!!		end
	end

	act'Do something else':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
		'You give it a go for a good few minutes before giving him one last mighty slurp and pull back.'
		*nl
		'"How about we do something else?" you ask.'
		'"What did you have in mind?"'
		gs 'booty_call_start', 'foreplay_choose'

		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'bj_dom_tease_cum':
	cla & *clr
	gs'cum_call','hands',$boy,1
	$booty_call['cum_choice'] = 'hand'
	booty_call['cum_count'] += 1
	'<center><video autoplay loop src="images/shared/sex/cum/tease_cum1.mp4"></video></center>'
	'Angling the tip of his cock away from your face and lick the shaft of his cock, moving your tongue in small teasing circles. Seconds later, cum erupts from the tip and he buckles beneath you. You can''t help but smirk at his expression as you feel the warm liquid dribble down his shaft and across your fingers.'
	gs 'booty_call_sex', 'sex_end'
end

if $ARGS[0] = 'bj_dom_spit1':
!!	booty_call['cum_mouth_ask'] += 1
	gs'cum_call','mouth',$boy,1
	booty_call['swallow'] = 1
	$booty_call['cum_choice'] = 'mouth'
	booty_call['cum_count'] += 1
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
	'You quickly wrap your lips around his cock and plunge down as far as you can go. Not even a second later, he explodes in your mouth, shaft pulsing between your lips, warm liquid splashing against your tonsils. You hold yourself there, humming as <<$npc_firstname[$boy]>> buckles beneath you, waiting until he''s ridden his orgasm to completion.'
	gs 'booty_call_start', 'bj_dom_spit2'
end

if $ARGS[0] = 'bj_dom_spit2':
	act'Spit':
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
		'Once you''re pretty sure he''s done, you draw your head back up <<$npc_firstname[$boy]>>''s cock, letting his cum spill from your lips along the way. You watch it run back down his shaft and look up at <<$npc_firstname[$boy]>>, giving him a cum drip smile.'
		gs 'booty_call_sex', 'sex_end'
	end
end

if $ARGS[0] = 'bj_dom_swallow1':
!!	booty_call['cum_mouth_ask'] += 1
	booty_call['cum_count'] += 1
	booty_call['swallow'] = 1
	$booty_call['cum_choice'] = 'mouth'
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
	'You quickly wrap your lips around his cock and plunge down as far as you can go. Not even a second later, he explodes in your mouth, shaft pulsing between your lips, warm liquid splashing against your tonsils. You hold yourself there, eyes tearing up as you let him ride out his orgasm halfway down your throat.'
	gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
	act'Gulp':
		gs'cum_call','mouth_swallow',$boy,1
		cla & *clr
		'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep2.mp4"></video></center>'
		'Carefully, very carefully, you slowly draw your lips back up <<$npc_firstname[$boy]>>''s cock, sucking the whole time to make sure not a single drop of his cum spills around your lips. It''s really difficult to keep sucking and not choke on the cum pooling at the back of your throat. The effort makes your eyes water, but you still manage to draw all the way back up to his tip where you finally swallow his load and get your first gasp of clean air.'
		act'Continue':gt 'booty_call_start', 'bj_dom_swallow_react'
	end
end

if $ARGS[0] = 'bj_dom_swallow_react':
	cla & *clr
	'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
	if npc_cum_pref[$boy] = 2 and npc_cum_pref_know[$boy] = 0:
		'"Holy..." <<$npc_firstname[$boy]>> lets his head fall back onto his pillow, his mind seemingly blown by your blowjob skills. Taking satisfaction in a job well done, you continue teasing his cock, running your lips up and down its shaft, peppering it with kisses. "That was incredible..."'
		'"Mmmm?" you hum pleasantly. "You liked it that much?"'
		'"Like you sucked the soul outta me," he smiles tiredly. "I love the feeling of blowing a load in a girl''s mouth like that, but that was something else."'

		act'You like oral creampies?':
			cla & *nl
			npc_cum_pref_know[$boy]= npc_cum_pref[$boy]
			'"You really like to come in my mouth that much?" you ask, giving his shaft another kiss.'
			'"Yeah," he sighs. "Even better than nutting inside a pussy."'
			act'Good to know':
				cla & *nl
				'"Good to know," you smirk, running your tongue across his tip.'
				gs 'booty_call_sex', 'sex_end'
			end

			act'I like it too':
				cla & *nl
				'"I like it too," you smirk, running your tongue across his tip. "Guess we both got what we wanted."'
				gs 'booty_call_sex', 'sex_end'
			end

			act'I''ll keep it in mind':
				cla & *nl
				'"I''ll keep that in mind then," giving <<$npc_firstname[$boy]>> a mischievous smirk and running your tongue across his tip.'
				gs 'booty_call_sex', 'sex_end'
			end
		end

		act'Lucky you':
			cla & *nl
			if booty_call['prostitution'] = 0:
				'"Lucky you," you smirk, giving his tip another gentle suck before letting it pop from your mouth. "You got a blowjob specialist, free of charge."'
			else
				'"Lucky you," you smirk, giving his tip another gentle suck before letting it pop from your mouth. "You ordered the right girl for the job then."'
			end
			gs 'booty_call_sex', 'sex_end'
		end
	else
		if npc_cum_pref[$boy] = 2 and npc_cum_pref_know[$boy] = npc_cum_pref[$boy]:
			'"Woah," <<$npc_firstname[$boy]>>''s head flops onto the pillow, while you continue to play with his cock, still twitching in the throes of post-orgasm bliss. "Your mouth is so fucking good."'
			act'I know you love oral creampies':
				cla & *nl
				'"I know how much you love coming in my mouth," you smirk, peppering his shaft with kisses. "Thought I''d give you a treat and suck you dry."'
				'"You''re the best," he pants.'
				'"I know that too," you grin, giving his tip another lick.'
				gs 'booty_call_sex', 'sex_end'
			end
		else
			'"Woah," <<$npc_firstname[$boy]>>''s head flops onto the pillow, while you continue to play with his cock, still twitching in the throes of post-orgasm bliss. "That was great."'
		end

		act'I know':
			cla & *nl
			'"Don''t need to tell me how good I am at giving head," you smirk, giving his shaft another lick. "I already know I''m the best."'
			gs 'booty_call_sex', 'sex_end'
		end

		act'Glad you enjoyed it':
			cla & *nl
			'"Glad you enjoyed the ride," you smirk, giving his shaft another lick.'
			gs 'booty_call_sex', 'sex_end'
		end

		act'Return the favor?':
			cla & *nl
			'"Well, if you really want to show you''re grateful," you smirk. "How about you return the favor?"'
			if npc_generous[$boy] = 1 or npc_pussyeater[$boy] = 1:
				'"I''d love to," he smiles and flips you over onto your back.'
				act'Spread your legs ':gt 'booty_call_start', 'pussy_lick'
				act'Mount his face instead':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Nuh uh," you grin, grabbing him with your thighs and twisting both of you around so you''re on top. "I don''t want it like that."'
					'And you scooch forward to mount his face instead.'
					act'Make him eat you out':gt 'booty_call_start', 'facesit_2'
				end
			elseif npc_selfish[$boy] = 1:
				'"Nah," he says. "I think I''m good."'
				gs 'booty_call_sex', 'sex_end'
				act'Wasn''t asking':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"I wasn''t asking," you say and push him backwards onto the bed. Before he can even protest, you throw your thighs over his head and drop your hips, mounting his face.'
					act'Make him eat you out':gt 'booty_call_start', 'facesit_2'
				end
			else
				if rand(1,10) < npc_sexdrive[$boy]:
					'"I guess I could," he says, gently rolling you onto your back. "It''s only fair after all."'
					act'Spread your legs ':gt 'booty_call_start', 'pussy_lick'
					act'Mount his face instead':
						cla & *clr
						$npc_apt_bedroom[$boy]
						'"Nuh uh," you grin, grabbing him with your thighs and twisting both of you around so you''re on top. "I don''t want it like that."'
						'And you scooch forward to mount his face instead.'
						act'Make him eat you out':gt 'booty_call_start', 'facesit_2'
					end
				else
					'"I don''t know if I can," he mumbles. "I''m feeling kind of tapped out to be honest..."'
					gs 'booty_call_sex', 'sex_end'
					act'Wasn''t asking':
						cla & *clr
						!! IMAGE HERE
						$npc_apt_bedroom[$boy]
						'"That doesn''t mean your tongue stops working," you say, shoving him down and throwing your thighs over his shoulders.'
						'"And I wasn''t asking," you say, shoving your pussy into his face.'
						act'Make him eat you out':gt 'booty_call_start', 'facesit_2'
					end
				end
			end
		end
	end
end

!!if $ARGS[0] = 'bj_dom_facial1':
!!	booty_call['cum_face_force'] += 1
!!	cla & *clr
!!
!!end

if $ARGS[0] = '69_dom1':
!!{	act'69 him':
		cla & *clr
		'<center><img <<$set_imgh>> src="images/shared/sex/69/pre1.jpg"></center>'
		$booty_call['position'] = '69'
		if booty_call['foreplay_change'] >= 1:
			'You crawl towards <<$npc_firstname[$boy]>>, throwing your legs over his head and scooching your ass over his head. Grinning, you lower your hips down to his face while simultaneously grabbing his cock and preparing it for your mouth.'
			booty_call['foreplay_change'] = 2
		else
			booty_call['foreplay_change'] += 1
			'You push <<$npc_firstname[$boy]>> back onto the bed and throw your legs over him, reversing yourself in the process, and scooch your ass back towards him. Grinning, you lower your hips down to his face while simultaneously grabbing his cock and preparing it for your mouth.'
		end

	end}
end

if $ARGS[0] = 'facesit_1':
	act'Sit on his face':
		cla & *clr
		$npc_apt_bedroom[$boy]
		$booty_call['position'] = 'facesit'
		if booty_call['foreplay_change'] >= 1:
			'You pull away from <<$npc_firstname[$boy]>>''s cock, crawling forward until your legs are over his head. You lower your pussy down onto his mouth with a dirty grin.'
			'"I think it''s time for me to get a little tender loving care."'
			booty_call['foreplay_change'] = 2
		else
			booty_call['foreplay_change'] += 1
			'You push <<$npc_firstname[$boy]>> back onto the bed and throw your legs over his head. You lower your pussy down onto his mouth with a dirty grin.'
			'"I think it''s time for me to go for a ride."'
		end
		act'Make him eat you out':gt 'booty_call_start', 'facesit_2'
	end
end

if $ARGS[0] = 'facesit_2':
	gs 'arousal', 'cuni', rand(4,8),'no_orgasm_msg'
	gs'stat'
	'<center><video autoplay loop src="images/shared/sex/facesit/1.mp4"></video></center>'
	'You press your pussy right onto <<$npc_firstname[$boy]>>''s face, forcing it between his lips. He immediately complies, sucking gently on your sex while running his tongue through the folds of your pussy to caress your clit.'
	*nl
	'It feels so good, your eyes roll back in your skull and you can''t help but grab him by the hair, trying to force his face harder into your pussy. Heat courses through your hips and somewhere in the back of your mind, you wonder if it''s possible to drown a man with girl cum.'

	if orgasm > booty_call['orgasm']:
		booty_call['orgasm'] = orgasm
		act'Continue':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/facesit/orgasm1.mp4"></video></center>'
			'Euphoric pressure builds and builds inside you until you can''t contain it anymore. All it takes is <<$npc_firstname[$boy]>>''s tongue brushing against your clit in <i>just</i> the right way, and suddenly you''re coming, body racked with spasms as you claw the bedsheets uncontrollably while you ride out your orgasm.'
			*nl
			if npc_pussyeater[$boy] > 0:
				'After a short time, you feel the waves of climax subsiding but without warning, permission, or invitation, <<$npc_firstname[$boy]>> begins working your pussy with his tongue again, diving in deep and sending goosebumps across your skin.'

				act'Let him keep going':gt 'booty_call_start', 'facesit_3'

				act'Let''s do something else':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Hold your horses cowboy," you grin. "I <i>love</i> your tongue, but how about we do something else instead?"'
					gs 'booty_call_start', 'foreplay_choose'
				end
				gs 'booty_call_sex', 'sex_start'
			else
				'After a short time, you feel the waves of climax subsiding as you breath hard and lean forward, releasing his face from between your thighs.'
				gs 'booty_call_start', 'foreplay_choose'
				gs 'booty_call_sex', 'sex_start'
			end
		end
	else
		!! 'You enjoy letting him eat you out, holding his face tight against your pussy.'
		act'Keep going until you cum':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/facesit/orgasm1.mp4"></video></center>'
			'His mouth firmly planted between your lips'
			'"Oh <i>fu-!</i>"'
			if npc_pussyeater[$boy] > 0:
				'Before you can say anything, he starts eating you out again.'

				act'Let him':gt 'booty_call_start', 'facesit_3'

				act'Let''s do something else':
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Hold your horses cowboy," you grin. "I love your tongue, but how about we do something else?"'
					gs 'booty_call_start', 'foreplay_choose'
				end
			else
				'You wind down, pulling back from his face.'
				gs 'booty_call_start', 'foreplay_choose'
			end
			gs 'booty_call_sex', 'sex_start'
		end

		gs 'booty_call_start', 'foreplay_choose'

		gs 'booty_call_sex', 'sex_start'
	end
end

if $ARGS[0] = 'facesit_3':
	'<center><video autoplay loop src="images/shared/sex/facesit/1.mp4"></video></center>'

	if orgasm > booty_call['orgasm_limit']:
		cla & *clr
		$npc_apt_bedroom[$boy]
		'<<$npc_firstname[$boy]>>''s tongue caresses your pussy again, but this time instead of pleasure, the shocks it sends through you are like needles through your clit. You cry out, caught between pain and ecstasy but much further towards pain. His tongue touches you again and you reflexively buck your hips away from his face. <<$npc_firstname[$boy]>> looks up at you from between your legs, confused.'
		*nl
		'"What''s wrong?" he asks. "I thought you were enjoying that."'
		'"I- I was..." you pant. "But my pussy is too sensitive now." You manage a smile down at him. "You made me come too many times in a row. I don''t think I can take it any more. I need a break."'
		gs 'booty_call_sex', 'sex_end'
	else
		'<<$npc_firstname[$boy]>>''s tongue keeps going like a pussy-eating machine, never stopping, and always making sure to give the little man in the boat the attention he deserves.'

		act'Cum again':
			$orgasm_or = 'yes'
			gs 'arousal', 'cuni', rand(2,5),'no_orgasm_msg'
			gs'stat'
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/facesit/orgasm1.mp4"></video></center>'
			'Within minutes, <<$npc_firstname[$boy]>> has you spasming around his mouth again.'
			*nl
			if npc_pussyeater[$boy] > 0:
				'But <<$npc_firstname[$boy]>> still doesn''t stop, and continues to lap up your juices like he''s dying of thirst.'

				act'Let him':gt 'booty_call_start', 'facesit_3'

				act'Let''s do something else':
					$orgasm_or = ''
					cla & *clr
					$npc_apt_bedroom[$boy]
					'"Hold your horses cowboy," you grin. "I love your tongue, but how about we do something else?"'
					gs 'booty_call_start', 'foreplay_choose'
				end

				if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
					act'Give him your virginity':$orgasm_or = '' & gt'booty_call_virgin','start1'
				else
					act'Have sex':$orgasm_or = '' & gs 'booty_call_sex', 'sex_start'
				end
			else
				'"How about we do something else now?" <<$npc_firstname[$boy]>>asks as your orgasm winds down.'

				gs 'booty_call_start', 'foreplay_choose'

				gs 'booty_call_sex', 'sex_start'
			end
		end

		gs 'booty_call_start', 'foreplay_choose'

		gs 'booty_call_sex', 'sex_start'
	end
end


!! --------------------- transition stuff ---------------------------------------------------

if $ARGS[0] = 'transition1':
	act'Continue':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'You breathe heavily on <<$npc_firstname[$boy]>>''s bed, as your orgasm begins to wind down. As you lay there, you see <<$npc_firstname[$boy]>>''s cock dangling above your head and he bends over you, trying to push it into your panting mouth.'
		act'Let him':
			cla & *clr
			'<center><video autoplay loop src="images/shared/sex/blowjob/bj51.mp4"></video></center>'
			'Relaxing your jaw, you let his cock part your lips and slowly slip into inside your mouth.'
			act'Blowjob':gt 'booty_call_start', 'bj_sub2'
		end
		if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
			act'Take my virginity':gt'booty_call_virgin','start1'
		else
			act'Fuck instead?':
				cla & *nl
				'"Uhh, no," you say, turning your head away with a smirk. "How about we fuck instead?"'
				'"I won''t say no to that," <<$npc_firstname[$boy]>> grins back.'
				act'Continue':gt 'booty_call_sex', 'sex_start'
			end
		end
	end
end

if $ARGS[0] = 'transition2':
	act'End it there':
		cla & *clr
		$npc_apt_bedroom[$boy]
		'"I think I''m done there," you pant.'
		'"What the hell?" <<$npc_firstname[$boy]>> protests. "How is that fair? Only you got off!"'
		act'Ugh, fine (blowjob)':
			cla & *nl
			'"Ugh," you moan irately. "<i>Fine</i>. Come here," you say rolling over and bending your head down towards his cock.'
			gs 'booty_call_start', 'bj_dom1'
		end

		act'Ugh, fine (sex)':
			cla & *nl
			'"Ugh," you moan irately. "<i>Fine</i>."'
			'You turn around, laying back on the bed and spreading your legs. "I guess I can let you fuck me before we stop."'
			act'Continue':
				booty_call['position_choose'] = 1
				gs 'booty_call_sex', 'sex_start'
			end
		end

		act'Sorry, I''m done':gs 'booty_call_after', 'finish'

		act'Blow him':
			cla & *nl
			'"You''re right," you smile apologetically. "It''s only fair that I get you off too. Here, just let me..."'
			'You kneel down, taking his cock into your mouth.'
			gs 'booty_call_start', 'bj_dom1'
		end
		if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
			act'Take my virginity':gt'booty_call_virgin','start1'
		else
			act'Let''s fuck':gt 'booty_call_sex', 'sex_start'
		end
	end
end

--- booty_call ---------------------------------