glife/locations/dinfather.qsrc

# dinfather

!!!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 $ARGS[0] =  'father act 1':
	menu_off = 1
    if pcs_horny >= 40 or TouchedByFather=1:
        act 'You feel like teasing him':
            cls
            gs 'arousal', 'flashlite', 5
            gs 'arousal', 'end'
            gs 'stat'
            
            '<center><img <<$set_imgh>> src="images/shared/sex/exhibitionism/fatherim30.jpg"></center>'
            '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 <<$titsize>> breasts.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                '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.'
            end
            if 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.'
            end
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'father act 2':
	menu_off = 1
    if pcs_horny >= 60 or TouchedByFather=1:
        act 'Stare at his groin as you talk':
            cls
            gs 'arousal', 'voyeur', 5, 'incest'
            gs 'arousal', 'end'
            gs 'stat'
            
            '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
            '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.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                '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.'
            end
            if 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.'
            end
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'father act 3':
	menu_off = 1
    if pcs_horny >= 80 or TouchedByFather=1:
        act 'Spread your legs':
            cls
            gs 'arousal', 'flash', 5
            gs 'arousal', 'end'
            gs 'stat'
            
            'You, while pretending to not notice, slowly spread your legs as you talk.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. You look down and notice your skimpy underwear did a very poor job of hiding your pussy. Your stepfather is clearly embarrassed and surprised. He loudly clears his throat and says "<<$pcs_nickname>> don''t do that, that''s no way for a lady to behave. And go put some normal underwear on."'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. "What''s wrong?" you ask him innocently, knowing full well you''re not wearing underwear and that he has a great view of your bare pussy. You''re not fooling him though, and he doesn''t appreciate your teasing in the slightest. "<<$pcs_nickname>>, stop that at once and go put some pants on."'
            end
            if fatherLust=1:
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response.'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg"></center>' & 'Your stepfather gets a glimpse of your bare pussy and realizes what you''re up to. "<<$pcs_nickname>>... are you not wearing panties? Get down on the couch and spread your legs for me, Daddy has to know now." You do as he says, lean back on the couch and spread wide. He kneels in front of you, pulls your clothes to the side and rubs your pussy and thighs with his rough hands. "Just as I thought, you little minx!" he says with a grin on his face. After he had his fun he helps you get back up and even helps you straighten your clothes, his hands lingering on your hips and ass a few seconds longer than is needed.'
            end
            act 'Move away':gt $loc, $metka
        end
    end
end

!!! These events can trigger when you 'Chat' with your stepfather in the living room.

if $ARGS[0] =  'father 1':
    !He hates you
	menu_off = 1
    '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.'
    if sorryday!daystart:
        act 'Apologize':
            cla
            sorryday=daystart
            npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
            gs 'stat'
            'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'father 2':
    !He doesn''t like you very much
	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!daystart:
        act 'Try to get on his good side':
            cla
            sorryday=daystart
            npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
            gs 'stat'
            '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.'
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'father 3':
    !Good relationship, but you''re not pretty enough
    fatherTalk = rand (1,5)
    if fatherTalk = 1:
        'You enjoy a short talk with your stepfather.'
    elseif 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 fatherTalk = 3:
        '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."'
    elseif fatherTalk = 4:
        'Your stepfather tells you a funny story.'
    elseif fatherTalk = 5:
        'Your stepfather tells you a funny joke.'
    end
end

if $ARGS[0] =  'father 4':
    !Good relationship, you''re attractive
    talkrand=rand(1,100)
    if talkrand >= 20:
        gs 'dinfather', 'father 3'
    elseif talkrand < 20:
        'You relax and share funny stories with your stepfather.'
        if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = rand(1,8)
        if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = rand(1,4)
        if npc_rel['A28']>=80:FatherMolest = rand(1,2)
        if FatherMolest=1:
            gs 'dinfather', 'father act 1'
            gs 'dinfather', 'father act 2'
            gs 'dinfather', 'father act 3'
        else
            gs 'dinfather', 'father 3'
        end
    end
end

!_____________________Button "Chat" garage _____________________________

if $ARGS[0] =  'gar_act1':
	menu_off = 1
    if pcs_horny >= 50 or TouchedByFather=1:
        act 'You feel like teasing him':
            cls
            gs 'arousal', 'flashlite', 5
            gs 'arousal', 'end'
            gs 'stat'
            '<center><img <<$set_imgh>> src="images/shared/sex/exhibitionism/fatherim30.jpg"></center>'
            '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 <<$titsize>> breasts.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                '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.'
            end
            if 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.'
            end
            act 'Move away':gt $loc, $metka
        end
    else
        gs 'dinfather', 'garchat'
    end
end

if $ARGS[0] =  'gar_act2':
	menu_off = 1
    if pcs_horny >= 90 or TouchedByFather=1:
        act 'Stare at his groin as you talk':
            cls
            gs 'arousal', 'voyeur', 5, 'incest'
            gs 'arousal', 'end'
            gs 'stat'
            '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
            '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.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                '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.'
            end
            if 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.'
            end
            act 'Move away':gt $loc, $metka
        end
    else
        gs 'dinfather', 'garchat'
    end
end

if $ARGS[0] =  'gar_act3':
	menu_off = 1
    if pcs_horny >= 100 or TouchedByFather=1:
        act 'Spread your legs':
            cls
            gs 'arousal', 'flash', 5
            gs 'arousal', 'end'
            gs 'stat'
            'You, while pretending to not notice, slowly spread your legs as you talk.'

            if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. You look down and notice your skimpy underwear did a very poor job of hiding your pussy. Your stepfather is clearly embarrassed and surprised. He loudly clears his throat and says "<<$pcs_nickname>> don''t do that, that''s no way for a lady to behave. And go put some normal underwear on."'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim24.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. "What''s wrong?" you ask him innocently, knowing full well you''re not wearing underwear and that he has a great view of your bare pussy. You''re not fooling him though, and he doesn''t appreciate your teasing in the slightest. "<<$pcs_nickname>>, stop that at once and go put some pants on."'
            end
            if fatherLust=1:
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response.'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim26.jpg"></center>' & 'Your stepfather gets a glimpse of your bare pussy and realizes what you''re up to. "<<$pcs_nickname>>... are you not wearing panties? Get down on the ground and spread your legs for me, Daddy has to know now." You do as he says, lie down on the ground and spread your legs wide. He kneels in front of you, pulls your clothes to the side and rubs your pussy and thighs with his rough hands. "Just as I thought, you little minx!" he says with a grin on his face. After he had his fun he helps you get back up and even helps you straighten your clothes, his hands lingering on your hips and ass a few seconds longer than is needed.'
            end
            act 'Move away':gt $loc, $metka
        end
    else
        gs 'dinfather', 'garchat'
    end
end

!_____________________Button "VIEW WITH TV" in the apartment _____________________________

if $ARGS[0] =  'watchtv_act1':
	menu_off = 1
    if pcs_horny >= 0 or TouchedByFather=1:
        act 'Lean your head against his chest':
            cls
            gs 'arousal', 'flashlite', 5
            gs 'arousal', 'end'
            gs 'stat'
            
            '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 pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
            if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
            if pcs_apprnc + (npc_rel['A28']/10) >= 80 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
            if pcs_apprnc + (npc_rel['A28']/10) >= 120 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                'Your stepfather does not like you getting so close to him, and pushes you away.'
            elseif fatherLust=1:
                '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim22.jpg"></center>'
                '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.'
            end

            fatherWantsToTouch=Rand(1,2)
            if fatherWantsToTouch=1:
                '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 <<$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.'
                act 'Stay still and see if he goes any further':
                    cls
                    pcs_horny = rand(90,95)
                    gs 'stat'
                    TouchedByFather = 1
                    '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim18.jpg"></center>'
                    '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 "<<$pcs_nickname>>, I know you''re not sleeping."'
                    if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
                        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg"></center>'
                        '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.'
                        act 'Get down on your knees':gs 'fathersex',  'fatherblow4'
                    end
                    act 'Move away':gt $loc, $metka
                end
            elseif fatherWantsToTouch=2:
                'You slowly feel his hand work its way down to your ass, kneading it firmly.'
                act 'Stay still and see if he goes any further':
                    cls
                    gs 'arousal', 'foreplay', 15, 'incest'
                    gs 'arousal', 'anal_finger', 15, 'incest'
                    gs 'arousal', 'end'
                    minut -= 30
                    gs 'stat'
                    TouchedByFather=1
                    pcs_ass+=1
                    if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim17.jpg"></center>' & 'Not noticing any reluctance from you, your stepfather continues his kneading and then slides his hands underneath your clothes. His sexual preference is abundantly clear: he immediately searches out your tight asshole, and gently rubs his finger against it. Unable to help yourself you begin to gyrate your hips to mimic his movements, trying to stifle your moans. He notices anyway: the pressure of his finger against your sphincter grows, and his decisive actions make you realize he has no intentions of stopping there. When his finger penetrates you, you can''t hold back your moans any longer. He chuckles and whispers: "I knew you were awake all along <<$pcs_nickname>>, just relax and enjoy."'
                    if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim16.jpg"></center>' & 'When his hand slips under your clothes, you feel his fingers feeling around for a second, grasping for something that isn''t there. He was clearly expecting panties, and is confused by the lack of them. When he realizes you''re not wearing any his actions grow bolder, and soon feel two fingers rubbing up against your asshole with the intention of going in. You adjust your hips slightly to grant him easier access, which he recognizes as a sign of consent and increases the pressure on your sphincter, pushing his two fingers in slowly but surely.'
                    if npc_sex['A28']!0 and mother_go = 1 and hour = 16:
                        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim21.jpg"></center>'
                        '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.'
                        act 'Get down on your knees': gs 'fathersex',  'fatherblow4'
                    end
                    act 'Move away':gt $loc, $metka
                end
            end
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'watchtv_act2':
    act 'Stare at his groin':
        cls
        gs 'arousal', 'voyeur', 5, 'incest'
        gs 'arousal', 'end'
        gs 'stat'
        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim28.jpg"></center>'
        '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.'

        if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
        if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
        if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
        if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
        if fatherLust>=2:
            pcs_horny -= RAND(1,5)
            gs 'stat'
            '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 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.'
        end
        act 'Move away':gt $loc, $metka
    end
end

if $ARGS[0] =  'watchtv_act3':
	menu_off = 1
    act 'Spread your legs':
        cls
        gs 'arousal', 'flash', 5
        gs 'arousal', 'end'
        gs 'stat'
        'You, while pretending to not notice, slowly spread your legs as you talk.'
        if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
        if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
        if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
        if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
        if fatherLust>=2:
            pcs_horny -= RAND(1,5)
            gs 'stat'
            if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim19.jpg"></center>' & 'Your stepfather is clearly embarrassed, and surprised you would do such a thing. He reaches over to your clothes and adjusts them so they cover your panties, and sends you off.'
            if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim32.jpg"></center>' & 'You notice your stepfather''s eyes darting down while you talk, and suddenly his face turns beet red. "What''s wrong?" you ask him innocently, knowing full well you''re not wearing underwear and that he has a great view of your bare pussy. You''re not fooling him though, and he doesn''t appreciate your teasing in the slightest. "<<$pcs_nickname>>, stop that at once and go put some pants on."'
        elseif fatherLust=1:
            if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response.'
            if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg"></center>' & 'Judging from your stepfather''s reddening face, you think your actions are definitely having an effect on him. Your stepfather grabs you around your hips without another word, pulls you down over his lap and sticks a finger deep in your soaking wet pussy. You let out a needy moan, and feel a tinge of regret when he pulls out and pretends as if nothing happened with a smug grin on his face. Realising he''s not going to go any further you straighten your clothes and try to pretend it''s okay, even though your throbbing pussy begs to differ.'
        end
    act 'Move away':gt $loc, $metka
    end
end

if $ARGS[0] =  'watchtv1':
    !scandal stepfather
	menu_off = 1
    '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: "<<$pcs_nickname>>, 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.'
    if sorryday!daystart:
        act 'Apologize':
            cls
            sorryday=daystart
            npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
            gs 'stat'
            '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim36.jpg"></center>'
            'You profusely apologize to your stepfather, and after a while you can tell his attitude towards you is slightly milder.'
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'watchtv2':
    !strained relations
	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!daystart:
        act 'Try to get on his good side':
            cla
            sorryday=daystart
            npc_rel['A28']+=(pcs_intel/10)+(pcs_apprnc/20)
            gs 'stat'
            '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.'
            act 'Move away':gt $loc, $metka
        end
    end
end

if $ARGS[0] =  'watchtv3':
    !gg good relations but not beautiful
    fatherTV = rand (1,5)
    if 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 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 fatherTV = 3:
        'You spend an hour watching a TV show with your stepfather, learning all about how a platypus behaves in the wild.'
    elseif fatherTV = 4:
        '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.'
    elseif 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.'
    end
end

if $ARGS[0] =  'watchtv4':
    !good relations and Messrs attractive
    talkrand=rand(1,100)
    if talkrand>=80:
        gs 'dinfather', 'watchtv3'
    else
        'You relax and talk about the show you''re watching with your stepfather, cuddling up snugly against him.'
        if npc_rel['A28']>=40 and npc_rel['A28']<60:FatherMolest = RAND (1,8)
        if npc_rel['A28']>=60 and npc_rel['A28']<80:FatherMolest = RAND (1,4)
        if npc_rel['A28']>=80:FatherMolest = RAND (1,2)
        if FatherMolest=1:
            gs 'dinfather', 'watchtv_act1'
            if pcs_horny >= 60 or TouchedByFather=1: gs 'dinfather', 'watchtv_act2'
            if pcs_horny >= 80 or TouchedByFather=1: gs 'dinfather', 'watchtv_act3'
        else
            gs 'dinfather', 'watchtv3'
        end
    end
end

!_____________________FOR booze in the garage _____________________________

$d_fatherdrunk_act[1]={
	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 pcs_horny >= 50 and sosedknow=1:
        act 'Show him your breasts':
        cls
        minut+=5
        gs 'stat'
        pcs_horny += RAND(1,5)
        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim33.jpg"></center>'
        '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 <<$titsize>> breasts.'

        if pcs_apprnc + (npc_rel['A28']/10) < 60:mishalust = 2
        if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:mishalust = Rand (1,4)
        if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:mishalust = Rand (1,2)
        if pcs_apprnc + (npc_rel['A28']/10) >= 200:mishaLust = 1
            if mishaLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                '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.'
            end
            if 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.'
            end
        act 'Move away':gt $loc, $metka
        end
     end
}

$d_fatherdrunk_act[2]={
	menu_off = 1
    if pcs_horny >= 90 or TouchedByFather=1:
        act 'Get their attention by dropping your bottle':
        cls
        minut+=5
        gs 'stat'
        pcs_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 pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
        if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
        if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
        if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim35.jpg"></center>'&'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. Uncle Misha just has a smug grin on his face.'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/pc/fatherim34.jpg"></center>'&'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. Neither of them seem to have noticed you''re not wearing panties.'
            end
            if fatherLust=1:
                if $pantyworntype ! 'none':
                    '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim37.jpg"></center>'
                    '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.'
                    act 'Tease them some more':
                        cls
                        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim38.jpg"></center>'
                        '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."'
                        act 'Show them your pussy when they ask':
                            cls
                            '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim39.jpg"></center>'
                            'Uncle Misha is onto your act, and decides to push you to your limits. He smiles and says: "Oh really, <<$pcs_nickname>>? 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.'
                            act 'Move away':gt $loc, $metka
                        end
                    end
                end
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim40.jpg"></center>'&'Slightly disappointed, you move away from the table. Lost in your own thoughts, you don''t notice your uncle Misha''s legs and trip over them. Since you''re not wearing any underwear, you''re giving your uncle one hell of a show as you fall down onto your hands and knees. He immediately reaches out and runs his fingers over your wet pussy lips. He fingers you briefly, then returning his fingers to his nose to take a deep whiff. "You have nice holes, <<$pcs_nickname>>, young and juicy..." Realizing he won''t do anything more with your stepfather right there in the room, you get up and fix your clothes before sitting back down at the table.'
            end
        act 'Continue':gt $loc, $metka
        end
    end
}

$d_fatherdrunk_act[3]={
	menu_off = 1
    if pcs_horny >= 100 or TouchedByFather=1:
        act 'Spread your legs':
        cls
        minut+=5
        pcs_horny += RAND(1,5)
        'You, pretending to not notice, slowly spread your legs while you talk with the guys.'

        if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
        if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
        if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
        if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
            if fatherLust>=2:
                pcs_horny -= RAND(1,5)
                gs 'stat'
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim31.jpg"></center>' & 'Trying to direct Uncle Misha''s attention to something across the room, your stepfather signals you to cover yourself up with agitated hand movements.'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim52.jpg"></center>' & 'Your stepfather notices what you''re trying to do. After he distracts uncle Misha for long enough, he turns to you and whispers: "<<$pcs_nickname>>, don''t... just don''t. You have no idea what you''re getting yourself into." Intimidated by the gravity of his voice, you do as he says and cover up.'
            end
            if fatherLust=1:
                if $pantyworntype ! 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim20.jpg"></center>' & 'Your stepfather realizes what you''re up to and pulls you closer to him, desire burning in his eyes. He runs his hands over your ass cheeks and thighs, petting and kneading them, and then pushes your panties to the side. Two of his fingers are exploring your sphincter, rubbing and teasing you. "Is there something you want, <<$pcs_nickname>>?" he asks with a smug grin on his face, knowing he turned the tables on you. All you can do is whimper in response. He pulls away his hand just in time, before uncle Misha notices what''s going on.'
                if $pantyworntype = 'none':'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/fatherim25.jpg"></center>' & 'Noticing your stepfather''s blush, you realize at least one person at the table noticed you''re not wearing any underwear. When your uncle Misha looks away, he quickly reaches for you and fingers your wet pussy. A needy moan escapes your lips as he pulls his hand way, and he quickly starts a conversation about wind shield wipers. Your uncle Misha has no idea what just went down.'
            end
        act 'Continue':gt $loc, $metka
        end
    end
}

if $ARGS[0] = 'garchat':
	menu_off = 1
    npc_rel['A28'] += 1
    fatherTalk = rand (1,5)
    if fatherTalk = 1:
        'You enjoy a short talk with your stepfather.'
    elseif 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 fatherTalk = 3:
        '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."'
    elseif fatherTalk = 4:
        'Your stepfather tells you a funny story.'
    elseif fatherTalk = 5:
        'Your stepfather tells you a funny joke.'
    end
    act 'Move away':gt $loc, $metka
end

if $ARGS[0] = 'garhelpchat':
	menu_off = 1
    npc_rel['A28'] += 1
    fatherTalk = rand (1,5)
    if 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 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 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 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 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.'
    end
    act 'Move away':gt $loc, $metka
end

if $ARGS[0] = 'gardrunkchat':
	cla
	menu_off = 1
    'Before you can even ask, your stepfather waves you over: "Oh, <<$pcs_nickname>>! Come join me and Misha, maybe you''ll learn something from your elders!"'
    fatherTalk = rand (1,3)
    if 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 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 fatherTalk = 3:
        'You sit down and join the older men for a drink. You can tell your stepfather and your uncle are good friends.'
    end
    if pav_slut >= 75 and dyadyamishaevent = 1 and dmishaday ! daystart and fatherandmisha!1:
        *clr & cla
        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
        'Uncle Misha kept staring at you. Suddenly he turns to your stepfather.'
        '"So, Vladimir, did you know your <<$pcs_nickname>> is a <<$gnikname>>?"'
        'Your stepfather is clearly confused. "What are you talking about, Misha?"'
        '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_sex['A28']=0:
            'Your stepfather looks you in the eyes and asks: "Is that really true, <<$pcs_nickname>>?"'
            '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..."'
            '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?"'
        elseif npc_sex['A28']!0:
            'Your stepfather already knows you''re not a prude, but pretends to be a good father anyway: "<<$pcs_nickname>>, you really shouldn''t, that could be dangerous..."'
        end
        '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 <<$pcs_nickname>> needs to be punished!"'
        '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, <<$pcs_nickname>> does deserve to be punished."'
        act 'Accept whatever punishment they have in mind':gt 'misha','2'
    elseif dyadyamishaevent = 1 and dmishaday ! daystart and fatherandmisha = 1:
        '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."'
        'Your stepfather simply nods and reaches for his zipper: "Absolutely."'
        act 'Accept whatever punishment they have in mind': gt 'misha', '2'
    else
        act 'Move away':gt 'gargazel'
    end
end


--- dinfather ---------------------------------