glife/locations/garfather

# garfather


fatherAge = year - (((npc_dob['A28']) - (npc_dob['A28'] mod 10000)) / 10000)
gs 'stat'
gs 'dinfather'

$metkaM = $ARGS[0]
$locM = $CURLOC
$location_type = 'event'

'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
'<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
'Your stepfather is a greying, slightly flabby man working as a truck driver. He is <<fatherAge>> years old. Your mother divorced your biological father and married Vladimir when you were only one year old. You''ve never seen your biological father since their divorce, and as such you have no real memory of him.'

dynamic $fatherRep
act 'Move away':gt $loc, $metka

act 'Chat':
	cls
	minut+=rand(10,15)
	gs 'stat'
'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
	'<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
	'Your stepfather is sitting on a chair, twirling some kind of dirty car part in his hands. You sit down next to him on a nearby chair.'

	dynamic $fatherRep
	if hour>=20 and hour<21:
		act 'Move away':gt $loc, $metka
	else
		act 'Continue':gt $locM, $metkaM
	end

	if npc_rel['A28']<20:
		dynamic $d_fathergar[1]
	elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
		dynamic $d_fathergar[2]
	elseif npc_rel['A28'] >=40:
		if pcs_apprnc<=60:
			dynamic $d_fathergar[3]
		end
		if pcs_apprnc>60:
			dynamic $d_fathergar[4]
		end
	end
end

act 'Help':
	cls
	minut += 60
	pcs_sweat += 10
	gs 'stat'
	'<center><B><font color=maroon>Stepfather Vladimir Skryabin</font></B></center>'
	'<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
	'Your stepfather is sitting on a chair, twirling some kind of dirty car part in his hands. You sit down next to him on a nearby chair.'

	dynamic $fatherRep
	if hour >= 20 and hour < 21:
		act 'Move away':gt $loc, $metka
	else
		act 'Continue':gt $locM, $metkaM
	end

	if npc_rel['A28'] < 20:
		dynamic $d_fatherhelp[1]
	elseif npc_rel['A28'] >= 20 and npc_rel['A28'] < 40:
		dynamic $d_fatherhelp[2]
	elseif npc_rel['A28'] >= 40:
		if pcs_apprnc <= 60:
			dynamic $d_fatherhelp[3]
		end
		if pcs_apprnc > 60:
			dynamic $d_fatherhelp[4]
		end
	end
end
if pcs_horny > 50 and hadsexwithfather = 1:

	act 'Seduce your stepfather':
		gs 'boyStat', 28
		cla
		*clr
		'<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.pre<<rand(0,5)>>.jpg"></center>'
		'You walk up to the Gazelle and pick up a sponge. Bending slightly forwards, you begin washing the car and simultaneously putting your ass on display for your stepfather.'
		'"- Oh..." - Stepfather did not expect this from you, but his involuntary exhalation and kindled eyes tell you he is enjoying it very much.'
		'Your stepfather walks up behind you and puts his hands on your ass. He leisurely begins to knead your butt.'
		
		gs 'arousal', 'foreplay', 3, 'sub', 'incest'
		gs 'stat'
		
		act 'Get down on your knees':
			cla
			*clr
			gs 'stat'
			'<center><img src="images/shared/sex/blowjob/bimbo.knees<<rand(1,3)>>.jpg"></center>'
			'You fall on your knees in front of your stepfather and place the palm of your hand on his crotch. You can feel his erection through the fabric of his jeans, and begin to caress him. After a while you unzip his pants and pull out his cock, taking a firm grasp on it with one hand.'
			
			gs 'arousal', 'hj', 3, 'sub', 'incest'
			gs 'stat'
			
			act 'Take his dick in your mouth':
				cla
				*clr
				gs 'stat'
				if pcs_throat < dick:pcs_throat += 1
				'<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.0,<<rand(0,4)>>.jpg"></center>'
				'Your stepfather opens the passenger side door of the Gazelle, and you sit down on the seat. He places a hand on your head and guides his dick towards your mouth.'
				'You leisurely lick your stepfather''s dick, caress his balls, and then take his cock in your mouth. Soon the cock began to throb, giving signs of an early end.'
				
				gs 'arousal', 'bj', 5, 'sub', 'incest'
				gs 'stat'
				
				act 'Suck him off and swallow his sperm':
					cls
					if npc_rel['A28']<100:npc_rel['A28']+=2
					fatherSuck+=1
					sexpartkno = 1
					spafinloc = 12
					gs 'cum_manage'
					swallow += 1
					water -= 10
					gs 'stat'
					! WD: Correct Image path ~ 'СЃ0,' to 'с0,' Cyrillic Unicode broke during translation
					'<center><img src="images/shared/sex/cum/mouth/cum1,<<rand(0,10)>>.gif"></center>'

					'You continue to suck your stepfather''s dick as it continues throbbing. Suddenly, he arches his back and you feel cum begin to pour into your mouth. Although you try your best, the amount of cum flowing from your stepfathers dick is simply too much for you, and some of it instead flows out of your mouth and down your chin. Soon your <<$boydesc>> finishes and you pull his cock out of your sperm-smelling mouth. You can feel the taste of sperm in your mouth, and your <<$liptalk3>> are wet with cum.'
					
					gs 'arousal', 'bj', 10, 'sub', 'incest'
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Move away':gt 'gargazel'
				end

				act 'Take his load on your face':
					cls
					if npc_rel['A28']<100:npc_rel['A28']+=2
					fatherSuck+=1
					sexpartkno = 1
					spafinloc = 11
					gs 'cum_manage'
					facial += 1
					gs 'stat'

					! WD: Correct Image path ~ 'С„0,' to 'ф0,' Cyrillic Unicode broke during translation
					if rand1<49:'<center><img src="images/shared/sex/cum/facial/facial0,<<rand(0,9)>>.jpg"></center>'
					if rand1=>50:'<center><img src="images/shared/sex/cum/facial/facial0,<<rand(0,9)>>.jpg"></center>'
					'You stop sucking on your stepfather''s cock just as he reaches orgasm, and a jet of sperm immediately hits you in the face. You squeeze your eyes shut for fear of getting cum in your eyes and feel another jet of hot sperm land on your face.'
					
					gs 'arousal', 'bj', 10, 'sub', 'incest'
					gs 'arousal', 'end'
					gs 'stat'
					
					act 'Move away':gt 'gargazel'
				end
			end

			act 'Bend over, leaning against the Gazelle':
				cla
				*clr
				if pcs_vag < dick:pcs_vag += 1
				'<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.1,<<rand(0,2)>>.jpg"></center>'
				'Your stepfather grabs you and pulls you up from your knees, turning you to face the Gazelle. You plant your hands on the car, and arch your back to give him easier access to your ass and pussy. Once you''re in position, he begins caressing your pussy and then slams his dick in.'
				
				gs 'arousal', 'vaginal', 10, 'sub', 'incest'
				gs 'stat'
				
				dynamic $sexstart
				dynamic $sexstart2
				act 'Continue':
					cla
					*clr
					gs 'stat'
					sexpartkno = 1
					if npc_rel['A28'] < 100:npc_rel['A28'] += 3
					if fathersex = 0:guy += 1
					FatherSex += 1
					'<center><img src="images/locations/pavlovsk/garage/father/sex/father.gar.cum1,0.jpg"></center>'
					if protect = 0:
						'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling your pussy with his sperm.'
						gs 'arousal', 'vaginal', 10, 'sub', 'incest'
						gs 'cum_manage'
						pcs_mood -= 15
						pcs_willpwr -= 15
						gs 'cuminsidereact', 'your stepfather'
					else
						'After a thorough fucking, you feel your stepfather''s cock begin to throb within you. Your stepfather''s body spasms, his cock filling the condom with his sperm.'
						gs 'arousal', 'vaginal', 10, 'sub', 'incest'
						gs 'cum_manage'
					end
					gs 'arousal', 'end'
					gs 'stat'

					act 'Move away':gt 'gargazel'
				end
			end
		end
	end
end

if fatherdrunk=1:
	cla
	cls
	minut+=60
	gs 'stat'
	'<center><B><font color=maroon>Your stepfather, Vladimir Mikhailovich Scriabin</font></B></center>'
	'<center><img src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
	'Your stepfather is a greying, slightly flabby man who works as a truck driver. He is <<fatherAge>> years old. Your mother divorced your biological father and married Vladimir when you were only one year old. You''ve never seen your biological father since their divorce, and as such you have no real memory of him.'

	dynamic $fatherRep
	act 'Move away':gt $loc, $metka

	if npc_rel['A28']<20:
		dynamic $d_fatherdrunk[1]
	elseif npc_rel['A28']>=20 and npc_rel['A28']<40:
		dynamic $d_fatherdrunk[2]
	elseif npc_rel['A28'] >=40:
		if pcs_apprnc<=60:
			dynamic $d_fatherdrunk[3]
		end
		if pcs_apprnc>60:
			dynamic $d_fatherdrunk[4]
		end
	end
end

--- garfather ---------------------------------