# father

fatherAge = age + 30
gs 'stat'
'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
'<center><img src="images/qwest/alter/father.jpg"></center>'
'Your stepfather gray and slightly flabby man working driver. He <<fatherAge>> years. Your mother divorced your father and married Vladimir Mikhailovich when you were one year. Your real father you do not remember and have never seen.'

if father < 20:'You stepfather scandal.'
if father >= 20 and father < 40:'You stepfather tensions.'
if father >= 40 and father < 60:'You have a normal relationship with his stepfather.'
if father >= 60 and father < 80:'You have a good relationship with his stepfather.'
if father >= 80:'You have a great relationship with his stepfather.'

act 'Move away':gt $locM, $metkaM

act 'Asking for money':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked the stepfather of money, he shook his head. "I bring all salary mother, so go and ask her."'

	act 'Move away':gt $loc, $metka
end

act 'Ask about his mother and':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked his stepfather as he met my mother. Stepfather scratched begin balding head and answered. "I then worked as a taxi driver. Busing like Natasha, your mother. She even then was quite soplyushkoy, but has managed to leave her husband for the class-mate and give birth to you with Anya. Your father I did not know, I saw only a couple of times. Know that his name Mikhail Kuznetsov. He left somewhere in another city. "'

	act 'Move away':gt $loc, $metka
end

act 'Ask about his work':
	cls
	minut += 5
	gs 'stat'
	'<center><b><font color="maroon">Stepfather Vladimir Mikhailovich Scriabin</font></b></center>'
	'<center><img src="images/qwest/alter/father.jpg"></center>'
	'You asked about his stepfather´s work. Stepfather reached crunching joints. "Before Takser. Tired now. And dangerous and old. Bought Gazelle and now I´m on pickup truck breed products hucksters. Know yourself, I have two garages, one worth our Volga, Gazelle else I got you."'

	act 'Move away':gt $loc, $metka
end

if motherKnowSpravka = 1:
	cla
	father = 0
	motherKnowSpravka = 2
	'Stepfather angrily walked up to you, "Oh damn, do not have time to get off the pot, and already someone has twisted pussy! Hem you bring in who will bring?"'

	act 'Move away':gt $loc, $metka
end

if alko > 0 and alkoday ! day:
	alkoday = day
	father -= 1
	'Stepfather sniffed "<<$name>> from you smell alcohol, what is this mess? You´re too young to drink that!"'
end

if TorgVokzalTimes > 0 and YouCanGar = 0:
	act 'Ask for permission to store goods in the garage':
		cls
		minut += 5
		gs 'stat'
		'<center><b><font color="maroon">Stepfather Vladimir Skryabin</font></b></center>'
		'<center><img src="images/qwest/alter/father.jpg"></center>'
		'You asked for permission to store his stepfather in the garage items.'

		if father + dom >= 80:
			YouCanGar = 1
			'Stepfather hesitated still allow you to use it for garage storage of goods for sale.'
		else
			'Stepfather shook his head "No Light. I have ."'
		end

		act 'move_away':gt $loc, $metka
	end
end

--- father ---------------------------------