:: dinfather
<<set $here = 'dinfather'>>
<<set $ARGS = $location_var[$here]>>
<!-- !!!These events can trigger randomly when you 'Chat' with your stepfather in the living room, if your relationship is good and you are attractive enough-->
<<if $location_var[$here][0] == 'father act 1'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 40 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'You feel like teasing him'>>
			<<arouse 'flashlite' 5 >>
			
			<<image "shared/sex/exhibitionism/fatherim30.jpg">>
			<p>In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your $pc.titsize breasts.</p>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'father act 2'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 60 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Stare at his groin as you talk'>>
			<<arouse 'erotic' 5 `['incest']`>>
			
			<<image "characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg">>
			<p>Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead it gently, letting out a barely audible moan.</p>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Even though your body is definitely having an effect on him your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				Your acts have derailed his train of thought, and your stepfather just mumbles something unintelligible as he devours you with his eyes. You can tell from his look that he wants you.
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'father act 3'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 80 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Spread your legs'>>
			<<arouse 'flash' 5 >>
			
			You, while pretending to not notice, slowly spread your legs as you talk.
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				<<if $wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg">>
				<<else>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg">>
				<</if>>
			<<elseif getvar("$pc.fatherLust") == 1>>
				<<set $TouchedByFather = 1>>
				<<if $wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg">>
				<<else>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg">>
				<</if>>
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<!-- !!! These events can trigger when you 'Chat' with your stepfather in the living room.-->
<<if $location_var[$here][0] == 'father 1'>>
	<!-- !He hates you-->
	<<set $menu_off = 1>>
	<p>You try to have a conversation with your stepfather, but he dislikes you too much to even pretend to be interested in what you have to say.</p>
	<<if $sorryday != $time.daystart>>
		<<actCLA 'Apologize'>>
			<<set $sorryday = $time.daystart>>
			<<set $npc('A28').rel += ($pc.skillLevel("intelligence" / 10) + ($pc.pcs_apprnc / 20))>>
			You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'father 2'>>
	<!-- !He doesn''t like you very much-->
	<<set $menu_off = 1>>
	You try to have a conversation with your stepfather, but he's not really interested and barely has anything to contribute while you do all the talking.
	<<if $sorryday != $time.daystart>>
		<<actCLA 'Try to get on his good side'>>
			<<set $sorryday = $time.daystart>>
			<<set $npc('A28').rel += ($pc.skillLevel("intelligence" / 10) + ($pc.pcs_apprnc / 20))>>
			You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'father 3'>>
	<!-- !Good relationship, but you're not pretty enough-->
	<<set $pc.fatherTalk = rand(1,5)>>
	<<if getvar("$pc.fatherTalk") == 1>>
		You enjoy a short talk with your stepfather.
	<<elseif getvar("$pc.fatherTalk") == 2>>
		You ask your stepfather how he met your mother. Your stepfather scratches his slightly balding head and replies: "I used to work as a taxi driver back then, drove your mother to places from time to time and we got along very well. Natasha is a strong and independant woman, raising you and Anya all by herself after she left your father. I didn''t know him very well, I've only met him a couple of times. All I know is that his name is Mikhail Kuznetsov, and that he moved to a different city soon after he and your mother divorced."
	<<elseif getvar("$pc.fatherTalk") == 3>>
		<p>You ask your stepfather about his work. Your stepfather reaches for his aching joints, with a grimace on his face. "I used to be a taxi driver. It was hard work though, often working many hours a day, and it could be dangerous too. With some money we saved up I bought a Gazelle pickup truck, and now I drive that selling goods and making deliveries. As you know I have two garages; one for our Volga, and the other one for the Gazelle."</p>
	<<elseif getvar("$pc.fatherTalk") == 4>>
		Your stepfather tells you a funny story.
	<<elseif getvar("$pc.fatherTalk") == 5>>
		Your stepfather tells you a funny joke.
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'father 4'>>
	<!-- !Good relationship, you're attractive-->
	<<set $talkrand = rand(1,100)>>
	<<if getvar("$talkrand") >= 20>>
		<<gs 'dinfather' 'father 3'>>
	<<elseif getvar("$talkrand") < 20>>
		You relax and share funny stories with your stepfather.
		<<if $npc('A28').rel >= 40 and $npc('A28').rel < 60>>
			<<set $FatherMolest = rand(1,8)>>

		<</if>>
		<<if $npc('A28').rel >= 60 and $npc('A28').rel < 80>>
			<<set $FatherMolest = rand(1,4)>>

		<</if>>
		<<if $npc('A28').rel >= 80>>
			<<set $FatherMolest = rand(1,2)>>

		<</if>>
		<<if getvar("$FatherMolest") == 1>>
			<<gs 'dinfather' 'father act 1'>>
			<<gs 'dinfather' 'father act 2'>>
			<<gs 'dinfather' 'father act 3'>>
		<<else>>
			<<gs 'dinfather' 'father 3'>>
		<</if>>
	<</if>>
<</if>>
<!-- !_____________________Button "Chat" garage _____________________________-->
<<if $location_var[$here][0] == 'gar_act1'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 50 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'You feel like teasing him'>>
			<<arouse 'flashlite' 5 >>
			
			<<image "shared/sex/exhibitionism/fatherim30.jpg">>
			<p>In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your $pc.titsize breasts.</p>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				Even though he did not expect this from you, you can tell by the spark in his eyes and his heavier breathing that he definitely likes what he sees.
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<else>>
		<<gs 'dinfather' 'garchat'>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'gar_act2'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 90 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Stare at his groin as you talk'>>
			<<arouse 'erotic' 5 `['incest']`>>
			
			<<image "characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg">>
			<p>Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead it gently, letting out a barely audible moan.</p>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Even though your body is definitely having an effect on him your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				Your acts have derailed his train of thought, and your stepfather just mumbles something unintelligible as he devours you with his eyes. You can tell from his look that he wants you.
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<else>>
		<<gs 'dinfather' 'garchat'>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'gar_act3'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 100 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Spread your legs'>>
			<<arouse 'flash' 5 >>
			
			You, while pretending to not notice, slowly spread your legs as you talk.
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				<<if $wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg">>

				<</if>>
				<<if !$wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg">>

				<</if>>
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				<<if $wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg">>

				<</if>>
				<<if !$wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg">>

				<</if>>
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<<else>>
		<<gs 'dinfather' 'garchat'>>
	<</if>>
<</if>>
<!-- !_____________________Button "VIEW WITH TV" in the apartment _____________________________-->
<<if $location_var[$here][0] == 'watchtv_act1'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 0 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Lean your head against his chest'>>
			<<arouse 'flashlite' 5 >>
			
			Soon after you join your stepfather on the couch to watch TV, you feel a bit sleepy. You snuggle up against your stepfather''s chest and close your eyes.
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
				<<set $pc.fatherLust = 2>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
				<<set $pc.fatherLust = Rand (1,4)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 80 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
				<<set $pc.fatherLust = Rand (1,2)>>

			<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 or getvar("$TouchedByFather") == 1>>
				<<set $pc.fatherLust = 1>>

			<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Your stepfather does not like you getting so close to him, and pushes you away.
			<<elseif getvar("$pc.fatherLust") == 1>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim22.jpg">>
				The warmth of his body and his musky smell make you feel aroused, and you suddenly don't feel tired any more. Enjoying your comfy position and closeness to him, you stay put and pretend to be asleep while sexy thoughts race through your mind.
			<</if>>
			<<set $pc.fatherWantsToTouch = Rand(1,2)>>
			<<if getvar("$pc.fatherWantsToTouch") == 1>>
				<p>As you lay against him with your eyes closed, you feel his arm shifting. Seconds later you feel his hand on your hip, slowly moving its way up until he rests it on your $pc.titsize breasts. He keeps his hand there, gently kneading them as he watches TV. You do your best to stay still, but your heart is racing and you rapidly feel your pussy moisten.</p>
				<<actCLA 'Stay still and see if he goes any further'>>
					<<set $pc.horny = rand(90,95)>>
					<<set $TouchedByFather = 1>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim18.jpg">>
					<p>Biting your lip, you lie quietly on the chest of your stepfather and enjoy his caresses, restraining your moans. Slowly but surely he focuses more on your nipples, pinching them and tugging at them. You do your best to stay quiet, but it's getting more and more difficult. Then you hear him let out a chuckle, and he whispers "$pc.name_nick, I know you're not sleeping."</p>
					<<if $npc('A28').sex != 0 and getvar("$locat['Mom_athome']") == 0>>
						<<actCLA 'Take it further'>>
							<<image "characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg">>
							You open your eyes and notice the large bulge in his pants. As you turn your head and give him a sweet smile, you put your hand on the bulge and gently start to pet it. Your stepfather, without hesitation, unbuttons his pants and pulls out his dick. You, also without hesitation, lower your head and give it a lick.
							<<actCLA 'Get down on your knees'>>
								<<gs 'fathersex' 'fatherblow4'>>
							<</actCLA>>
						<</actCLA>>
					<</if>>
					<<actCLA 'Move away'>>
						<<gt $location>>
					<</actCLA>>
				<</actCLA>>
			<<elseif getvar("$pc.fatherWantsToTouch") == 2>>
				You slowly feel his hand work its way down to your ass, kneading it firmly.
				<<actCLA 'Stay still and see if he goes any further'>>
					<<arouse 'foreplay' 15 `['incest']`>>
					<<arouse 'anal_finger' 15 `['incest']`>>
					
					<<set $time.minutes -= 30>>
					<<set $TouchedByFather = 1>>
					<<set $pc.pcs_ass += 1>>
					<<if $wardrobe.isWearingPanties>>
						<<image "characters/pavlovsk/resident/vladimir/sex/fatherim17.jpg">>

					<</if>>
					<<if !$wardrobe.isWearingPanties>>
						<<image "characters/pavlovsk/resident/vladimir/sex/fatherim16.jpg">>

					<</if>>
					<<if $npc('A28').sex != 0 and getvar("$locat['Mom_athome']") == 0>>
						<<image "characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg">>
						You open your eyes and notice the large bulge in his pants. As you turn your head and give him a sweet smile, you put your hand on the bulge and gently start to pet it. Your stepfather, without hesitation, unbuttons his pants and pulls out his dick. You, also without hesitation, lower your head and give it a lick.
						<<actCLA 'Get down on your knees'>>
							<<gs 'fathersex' 'fatherblow4'>>
						<</actCLA>>
					<</if>>
					<<actCLA 'Move away'>>
						<<gt $location>>
					<</actCLA>>
				<</actCLA>>
			<</if>>
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watchtv_act2'>>
	<<actCLA 'Stare at his groin'>>
		<<arouse 'erotic' 5 `['incest']`>>
		
		<<image "characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg">>
		<p>Unable to stop yourself, you stare at his groin and notice the outline of his erect cock through the fabric. Absent-mindedly you bring a hand to your breasts and knead them gently, letting out a barely audible moan.</p>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
			<<set $pc.fatherLust = 2>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
			<<set $pc.fatherLust = Rand (1,4)>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
			<<set $pc.fatherLust = Rand (1,2)>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
			<<set $pc.fatherLust = 1>>

		<</if>>
		<<if getvar("$pc.fatherLust") >= 2>>
			<<set $pc.horny -= RAND(1,5)>>
			Even though your body is definitely having an effect on him your stepfather is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable.
		<<elseif getvar("$pc.fatherLust") == 1>>
			Your acts have derailed his train of thought, and your stepfather just mumbles something unintelligible as he devours you with his eyes. You can tell from his look that he wants you.
		<</if>>
		<<actCLA 'Move away'>>
			<<gt $location>>
		<</actCLA>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'watchtv_act3'>>
	<<set $menu_off = 1>>
	<<actCLA 'Spread your legs'>>
		<<arouse 'flash' 5 >>
		
		You, while pretending to not notice, slowly spread your legs as you talk.
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
			<<set $pc.fatherLust = 2>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
			<<set $pc.fatherLust = Rand (1,4)>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
			<<set $pc.fatherLust = Rand (1,2)>>

		<</if>>
		<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
			<<set $pc.fatherLust = 1>>

		<</if>>
		<<if getvar("$pc.fatherLust") >= 2>>
			<<set $pc.horny -= RAND(1,5)>>
			<<if $wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim19.jpg">>

			<</if>>
			<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim32.jpg">>

			<</if>>
		<<elseif getvar("$pc.fatherLust") == 1>>
			<<if $wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg">>

			<</if>>
			<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg">>

			<</if>>
		<</if>>
		<<actCLA 'Move away'>>
			<<gt $location>>
		<</actCLA>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'watchtv1'>>
	<!-- !scandal stepfather-->
	<<set $menu_off = 1>>
	<p>You try to cuddle up against him on the couch, but he roughly shoves you off the couch. As your ass hits the ground he scowls at you: "$pc.name_nick, what the hell are you doing?" He can't stand the thought of being anywhere near you. You rub your sensitive ass with a slight pout on your face and consider your next move.</p>
	<<if $sorryday != $time.daystart>>
		<<actCLA 'Apologize'>>
			<<set $sorryday = $time.daystart>>
			<<set $npc('A28').rel += ($pc.skillLevel("intelligence" / 10) + ($pc.pcs_apprnc / 20))>>
			<<image "characters/pavlovsk/resident/vladimir/sex/fatherim36.jpg">>
			You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watchtv2'>>
	<!-- !strained relations-->
	<<set $menu_off = 1>>
	As you try to cuddle up against your stepfather to watch some TV, he holds you off and makes clear that he doesn''t want you to get that close to him.
	<<if $sorryday != $time.daystart>>
		<<actCLA 'Try to get on his good side'>>
			<<set $sorryday = $time.daystart>>
			<<set $npc('A28').rel += ($pc.skillLevel("intelligence" / 10) + ($pc.pcs_apprnc / 20))>>
			You spend some time trying to get on your stepfather''s good side, and you feel like he likes you a bit more after you show interest in the things he enjoys.
			<<actCLA 'Move away'>>
				<<gt $location>>
			<</actCLA>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watchtv3'>>
	<!-- !gg good relations but not beautiful-->
	<<set $pc.fatherTV = rand(1,5)>>
	<<if getvar("$pc.fatherTV") == 1>>
		You spend an hour watching a TV show with your stepfather, in which various persons display their skill in random talents hoping to win a prize.
	<<elseif getvar("$pc.fatherTV") == 2>>
		You spend an hour watching a TV show with your stepfather, in which several girls hope to get a date with the handsome bachelor.
	<<elseif getvar("$pc.fatherTV") == 3>>
		You spend an hour watching a TV show with your stepfather, learning all about how a platypus behaves in the wild.
	<<elseif getvar("$pc.fatherTV") == 4>>
		<p>You spend an hour watching a TV show with your stepfather, in which experts try to figure out which of the girls in their line-up are most likely to get pregnant by examining them through X-ray glasses.</p>
	<<elseif getvar("$pc.fatherTV") == 5>>
		You spend an hour watching a TV show with your stepfather, in which two guys are beating the crap out of each other in a boxing ring.
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'watchtv4'>>
	<!-- !good relations and Messrs attractive-->
	<<set $talkrand = rand(1,100)>>
	<<if getvar("$talkrand") >= 80 and getvar("$locat['Kolka_athome']") == 1>>
		<<gs 'dinfather' 'watchtv3'>>
	<<else>>
		You relax and talk about the show you're watching with your stepfather, cuddling up snugly against him.
		<<if $npc('A28').rel >= 40 and $npc('A28').rel < 60>>
			<<set $FatherMolest = RAND (1,8)>>

		<</if>>
		<<if $npc('A28').rel >= 60 and $npc('A28').rel < 80>>
			<<set $FatherMolest = RAND (1,4)>>

		<</if>>
		<<if $npc('A28').rel >= 80>>
			<<set $FatherMolest = RAND (1,2)>>

		<</if>>
		<<if getvar("$FatherMolest") == 1>>
			<<gs 'dinfather' 'watchtv_act1'>>
			<<if $pc.horny >= 60 or getvar("$TouchedByFather") == 1>>
				<<gs 'dinfather' 'watchtv_act2'>>

			<</if>>
			<<if $pc.horny >= 80 or getvar("$TouchedByFather") == 1>>
				<<gs 'dinfather' 'watchtv_act3'>>

			<</if>>
		<<else>>
			<<gs 'dinfather' 'watchtv3'>>
		<</if>>
	<</if>>
<</if>>
<!-- !_____________________FOR booze in the garage _____________________________-->
<<if $location_var[$here][0] == 'garchat'>>
	<<set $menu_off = 1>>
	<<set $npc('A28').rel += 1>>
	<<set $pc.fatherTalk = rand(1,5)>>
	<<if getvar("$pc.fatherTalk") == 1>>
		You enjoy a short talk with your stepfather.
	<<elseif getvar("$pc.fatherTalk") == 2>>
		You ask your stepfather how he met your mother. Your stepfather scratches his slightly balding head and replies: "I used to work as a taxi driver back then, drove your mother to places from time to time and we got along very well. Natasha is a strong and independant woman, raising you and Anya all by herself after she left your father. I didn''t know him very well, I've only met him a couple of times. All I know is that his name is Mikhail Kuznetsov, and that he moved to a different city soon after he and your mother divorced.
	<<elseif getvar("$pc.fatherTalk") == 3>>
		<p>You ask your stepfather about his work. Your stepfather reaches for his aching joints, with a grimace on his face. "I used to be a taxi driver. It was hard work though, often working many hours a day, and it could be dangerous too. With some money we saved up I bought a Gazelle pickup truck, and now I drive that selling goods and making deliveries. As you know I have two garages; one for our Volga, and the one we're at now."</p>
	<<elseif getvar("$pc.fatherTalk") == 4>>
		Your stepfather tells you a funny story.
	<<elseif getvar("$pc.fatherTalk") == 5>>
		Your stepfather tells you a funny joke.
	<</if>>
	<<actCLA 'Move away'>>
		<<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'garhelpchat'>>
	<<set $menu_off = 1>>
	<<set $npc('A28').rel += 1>>
	<<set $pc.fatherTalk = rand(1,5)>>
	<<if getvar("$pc.fatherTalk") == 1>>
		While you help your stepfather in the garage, he talks to you about how every car has its own character, all the while not looking away from his work.
	<<elseif getvar("$pc.fatherTalk") == 2>>
		While you help your stepfather in the garage, he talks to you about how the engine of the Gazelle works, all the while not looking away from his work.
	<<elseif getvar("$pc.fatherTalk") == 3>>
		While you help your stepfather in the garage, he talks to you about how unreliable some cars are and how expensive it is to keep them on the road, all the while not looking away from his work.
	<<elseif getvar("$pc.fatherTalk") == 4>>
		While you help your stepfather in the garage, he complains about the poor condition the roads around Pavlovski, all the while not looking away from his work.
	<<elseif getvar("$pc.fatherTalk") == 5>>
		While you help your stepfather in the garage, he explains how a gear box works, all the while not looking away from his work.
	<</if>>
	<<actCLA 'Move away'>>
		<<gt $location>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'gardrunkchat'>>
	<<set $menu_off = 1>>
	<p>Before you can even ask, your stepfather waves you over: "Oh, $pc.name_nick! Come join me and Misha, maybe you'll learn something from your elders!"</p>
	<<set $pc.fatherTalk = rand(1,3)>>
	<<if getvar("$pc.fatherTalk") == 1>>
		You sit down and join the two older men for a drink. Even though they won''t give you any alcohol, you listen to their increasingly drunken tales.
	<<elseif getvar("$pc.fatherTalk") == 2>>
		You sit down and join the older men for a drink. Uncle Misha then pulls out his guitar and plays some songs, and you and your stepfather happily sing along.
	<<elseif getvar("$pc.fatherTalk") == 3>>
		You sit down and join the older men for a drink. You can tell your stepfather and your uncle are good friends.
	<</if>>
	<<if $pc.fame('pav_slut') >= 150 and getvar("$dyadyamishaevent") == 1 and $dmishaday != $time.daystart and getvar("$pc.fatherandmisha") != 1>>
		<<image "characters/pavlovsk/resident/vladimir/father.jpg">>
		Uncle Misha kept staring at you. Suddenly he turns to your stepfather.
		<p>"So, Vladimir, did you know your $pc.name_nick is a $gnikname?"</p>
		<p>Your stepfather is clearly confused. "What are you talking about, Misha?"</p>
		Your uncle Misha continues: "Oh yes, it's true, Gopniks fuck her whenever they want. All they have to do is tell her to get on all fours."
		<<if $npc('A28').sex == 0>>
			<p>Your stepfather looks you in the eyes and asks: "Is that really true, $pc.name_nick?"</p>
			You're not really sure what to say and hesitate to give an answer, shifting uncomfortably in your chair. Your blush betrays you as you try to make up an excuse: "Well wait, I can explain..."
			<p>Your face really says it all. Your stepfather is disgusted by this revelation and cuts you off: "Are you fucking kidding me!? Your mother and I did our best to raise you properly, and this is the thanks we get?"</p>
		<<elseif $npc('A28').sex != 0>>
			<p>Your stepfather already knows you're not a prude, but pretends to be a good father anyway: "$pc.name_nick, you really shouldn't, that could be dangerous..."</p>
		<</if>>
		<p>Uncle Misha realizes he's onto something here, and decides to drive his point home: "Well Vladimir, don't you think we should do something about it? I think $pc.name_nick needs to be punished!"</p>
		<p>You can see the lust in his eyes. Your stepfather understands perfectly well where he's going with this, and agrees: "I think you're right, Misha, $pc.name_nick does deserve to be punished."</p>
		<<act 'Accept whatever punishment they have in mind'>>
			<<gt 'misha' '2'>>
		<</act>>
	<<elseif getvar("$dyadyamishaevent") == 1 and $dmishaday != $time.daystart and getvar("$pc.fatherandmisha") == 1>>
		<p>Uncle Misha grins at your stepfather and runs one hand over his groin, you can already see a significant bulge forming. "So, Vladimir, how about now? I think we can teach her a thing or two."</p>
		Your stepfather simply nods and reaches for his zipper: "Absolutely."
		<<act 'Accept whatever punishment they have in mind'>>
			<<gt 'misha' '2'>>
		<</act>>
	<<else>>
		<<act 'Move away'>>
			<<gt 'gargazel'>>
		<</act>>
	<</if>>
<</if>>
:: d_fatherdrunk_act1_macro[widget]
<<widget 'd_fatherdrunk_act1'>>
	<<set $menu_off = 1>>
	You can't help but notice that your uncle Misha is staring at you the whole time. You feel like he's not just undressing you in his mind, but that he's fucking you in all sorts of positions with reckless abandon.
	<<if $pc.horny >= 50 and getvar("$sosedknow") == 1>>
		<<actCLA 'Show him your breasts'>>
			<<set $time.minutes += 5>>
			<<set $pc.horny += RAND(1,5)>>
			<<image "characters/pavlovsk/resident/vladimir/sex/fatherim33.jpg">>
			<p>In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing uncle Misha with an amazing view of your $pc.titsize breasts.</p>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
			<<set $mishalust = 2>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
			<<set $mishalust = Rand (1,4)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
			<<set $mishalust = Rand (1,2)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200>>
			<<set $mishaLust = 1>>

		<</if>>
			<<if getvar("$mishaLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				Uncle Misha is clearly embarrassed, and surprised you would do such a thing. He clears his throat loudly and looks at you disapprovingly, and the silence that follows makes you feel a bit uncomfortable. You're happy he at least had enough decency to not clue in your stepfather, who happened to have his back turned against you.
			<</if>>
			<<if getvar("$mishaLust") == 1>>
				You try to be discrete so your stepfather doesn''t notice what you just did, and uncle Misha is quite flustered by the show you just gave him. He stumbles over his words while your stepfather talks to him about bumpers, as you smile mischievously and give uncle Misha a wink when your stepfather looks away.
			<</if>>
			<<actCLA 'Move away'>>
			<<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: d_fatherdrunk_act2_macro[widget]
<<widget 'd_fatherdrunk_act2'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 90 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Get their attention by dropping your bottle'>>
			<<set $time.minutes += 5>>
			<<set $pc.horny += RAND(1,5)>>
			Even though you're horny and want the guys to notice you, they are paying more attention to their booze and their conversation. You can change that. Making sure it doesn''t break, you ''accidentally'' drop your bottle and bend over to pick it up without bending your knees, giving them a spectacular view of your ass. You make a show of trying to reduce the spillage, wiping the floor while staying in your current position.
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
			<<set $pc.fatherLust = 2>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
			<<set $pc.fatherLust = Rand (1,4)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
			<<set $pc.fatherLust = Rand (1,2)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
			<<set $pc.fatherLust = 1>>

		<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				<<if $wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim35.jpg">>

			<</if>>
				<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim34.jpg">>

			<</if>>
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				<<if $wardrobe.isWearingPanties>>
					<<image "characters/pavlovsk/resident/vladimir/sex/fatherim37.jpg">>
					You stick your ass out as much as you can, showing off your ass as much as you can. As you turn around, you notice that both your stepfather and uncle''s gazes are glued to your ass. You simply smile and return to the table as they blubber and try to find excuses.
					<<actCLA 'Tease them some more'>>
						<<image "characters/pavlovsk/resident/vladimir/sex/fatherim38.jpg">>
						You sit back down, still having their full attention. You try to excuse your behavior: "I'm sorry guys, my clothes rub my pussy raw, bending over normally makes me feel very uncomfortable."
						<<actCLA 'Show them your pussy when they ask'>>
							<<image "characters/pavlovsk/resident/vladimir/sex/fatherim39.jpg">>
							<p>Uncle Misha is onto your act, and decides to push you to your limits. He smiles and says: "Oh really, $pc.name_nick? Why don't you show us, maybe we can help you. Isn't that right, Vladimir?" Too turned on to decline, you pull your panties to the side and show them your pussy. It's really not all that sore, but your arousal has coloured it nice and red and it makes your pussy lips look a bit more puffy. The guys didn't think you would actually follow through with this, and are flabbergasted when you do.</p>
							<<actCLA 'Move away'>>
							<<gt $location>>
						<</actCLA>>
						<</actCLA>>
					<</actCLA>>
				<</if>>
				<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim40.jpg">>

			<</if>>
			<</if>>
			<<actCLA 'Continue'>>
			<<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
:: d_fatherdrunk_act3_macro[widget]
<<widget 'd_fatherdrunk_act3'>>
	<<set $menu_off = 1>>
	<<if $pc.horny >= 100 or getvar("$TouchedByFather") == 1>>
		<<actCLA 'Spread your legs'>>
			<<set $time.minutes += 5>>
			<<set $pc.horny += RAND(1,5)>>
			You, pretending to not notice, slowly spread your legs while you talk with the guys.
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) < 60>>
			<<set $pc.fatherLust = 2>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 60 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 120>>
			<<set $pc.fatherLust = Rand (1,4)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 120 and $pc.pcs_apprnc + ($npc('A28').rel / 10) < 200>>
			<<set $pc.fatherLust = Rand (1,2)>>

		<</if>>
			<<if $pc.pcs_apprnc + ($npc('A28').rel / 10) >= 200 or getvar("$TouchedByFather") == 1>>
			<<set $pc.fatherLust = 1>>

		<</if>>
			<<if getvar("$pc.fatherLust") >= 2>>
				<<set $pc.horny -= RAND(1,5)>>
				<<if $wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg">>

			<</if>>
				<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim52.jpg">>

			<</if>>
			<</if>>
			<<if getvar("$pc.fatherLust") == 1>>
				<<if $wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg">>

			<</if>>
				<<if !$wardrobe.isWearingPanties>>
				<<image "characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg">>

			<</if>>
			<</if>>
			<<actCLA 'Continue'>>
			<<gt $location>>
		<</actCLA>>
		<</actCLA>>
	<</if>>
<</widget>>
