# arturSex
frost = 0

if arturSex = 0:arturSex = 1 & guy += 1

arturDay = daystart
gs 'stat'
'Arthur put his arm around you, and his hands began to take off your clothes and caress your body.'

act 'Kneel down':
	cls
	'<center><img src="images/characters/pavlovsk/resident/arthur/sex/bj.jpg"></center>'
	'You sat down on your knees before Arthur and began stroking his long, thick cock. Arthur impatiently strokes your head with his sinewy hand.'
	gs 'arousal', 'bj', 5
	gs 'stat'
	
	act 'Suck':
		cls
		artbj += 1
		'<center><img src="images/characters/pavlovsk/resident/arthur/sex/bj2.jpg"></center>'
		'You have opened you mouth and wrapped your lips around a hefty cock and begun to suck.'
		gs 'arousal', 'bj', 5
		gs 'stat'
		
		act 'Continue':
			cls
			$artbef = 'You suck dick and Arthur grabs you by the hair.'
			gs 'arousal', 'bj', 5, 'rough', 'sub'
			gs 'stat'
			act 'Continue': gt 'arturdin', 'facefuck'
		end
	end

	act 'Masturbate him':
		cls
		$artbef = 'You began to masturbate his member and Arthur immediately lost patience.'
		gs 'arousal', 'hj', 5
		gs 'stat'
		act 'Continue': gt 'arturdin', 'facefuck'
	end
end

act 'Enjoy his touch':
	cls
	pcs_horny += 10
	'Arthur caresses you and undresses.'
	temp = rand(0, 2)
	gs 'arousal', 'foreplay', 5
	gs 'stat'

	if temp = 0:act 'Continue': gt 'arturdin', 'bed'
	if temp = 1:act 'Continue': gt 'arturdin', 'bedmiss'
	if temp = 2:act 'Continue': gt 'arturdin', 'facefuck'
end

--- arturSex ---------------------------------