glife/locations/oral

# oral
if $ARGS[0] = 'start':
	tmpl = iif(ARGS[1] = 0,10, ARGS[1])
	frost = 0
	'Your little fingers caress his <<dick>> cm dick, then cupping his balls you begin to suck it.'

	if harakBoy = 0:
		'<<$boydesc>> closes his eyes in pleasure and enjoys the caress of your lips.'
		gs 'arousal', 'bj', tmpl,$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],'sub'
	elseif harakBoy = 1:
		'<<$boydesc>> stares you in the face while your lips glide over his hard dick.'
		gs 'arousal', 'bj', tmpl,$ARGS[2],$ARGS[3],$ARGS[4],$ARGS[5],'sub'
	elseif harakBoy = 2:
		if pcs_makeup > 1:pcs_makeup = 0
		pcs_hairbsh = 0
		pcs_throat += 1
		'<<$boydesc>> grabs you by the hair and begins to fuck you in the mouth, the beating your throat takes causes tears to flow from your eyes.'
		gs 'arousal', 'bj', tmpl,$ARGS[2],$ARGS[3],$ARGS[4], $ARGS[5],'sub','deepthroat', 'rough'
	end

	'Finally <<$boydesc>> groans and you realize that now he is ready to finish.'
	killvar 'tmpl'
end

if $ARGS[0] = '0':
	$orgasm_or = 'yes'
	gs 'arousal', 'bj', 10, 'sub'
end
--- oral ---------------------------------