:: arturSex
<<set $here = 'arturSex'>>
<<set $ARGS = $location_var[$here]>>
<<set $menu_off = 1>>
<<set $pc.frost = 0>>
<<if getvar("$arturSex") == 0>>
	<<set $arturSex = 1>> <<setn $guy += 1>>

<</if>>
<<set $arturDay = $time.daystart>>
Arthur eyes your body as his calloused hands began to strip off your clothes and caress you, making you flush with heat.
<<actCLA 'Kneel down'>>
	<<image "characters/pavlovsk/resident/arthur/sex/bj.jpg">>
	You kneel down before Arthur and began stroking his long, thick cock, the bulbous head tantalizingly close to your soft lips. Arthur impatiently strokes your head with his sinewy hand. You can see the lust in his expression.
	<<arouse 'bj' 5 >>
	<<actCLA 'Suck'>>
		<<set $artbj += 1>>
		<<image "characters/pavlovsk/resident/arthur/sex/bj2.jpg">>
		You open your mouth and slowly wrap your lips around the hefty cock. The corners of your mouth stretch to accommodate the rod as you begun to suck at a gradual pace.
		<<arouse 'bj' 5 >>
		<<actCLA 'Continue'>>
			Arthur suddenly grabs you by the hair and tries to force his cock deep into your throat.
			<<arouse 'bj' 5 `['rough','sub']`>>
			<<act 'Continue'>>
				<<gt 'arturdin' 'facefuck'>>
			<</act>>
		<</actCLA>>
	<</actCLA>>
	<<actCLA 'Masturbate him' undefined `{willpower:['bj','resist']}`>>
			You began to slowly stroke his large member, but as you look up at Arthur, you see him roll his eyes with impatience before reaching for you.
			
			
			<<arouse 'hj' 5 >>
			<<act 'Continue'>>
				<<gt 'arturdin' 'facefuck'>>
			<</act>>
		<</actCLA>>
	
<</actCLA>>
<<actCLA 'Enjoy his touch'>>
	Arthur caresses your sensitive body as he undresses you with his manly hands. Before long you find yourself naked in his embrace.
	<<set $temp = rand(0, 2)>>
	<<arouse 'foreplay' 5 >>
	<<if getvar("$temp") == 0>>
		<<act 'Continue'>>
	<<gt 'arturdin' 'bed'>>
<</act>>

	<</if>>
	<<if getvar("$temp") == 1>>
		<<act 'Continue'>>
	<<gt 'arturdin' 'bedmiss'>>
<</act>>

	<</if>>
	<<if getvar("$temp") == 2>>
		<<act 'Continue'>>
	<<gt 'arturdin' 'facefuck'>>
<</act>>

	<</if>>
	<<set $temp to null>>
<</actCLA>>
