# vanrPar

if $ARGS[0] = '':
	CLOSE ALL
	$locM = 'vanrPar'
	$locM_arg = ''
	$loc = 'vanrPar'
	$loc_arg = ''
	$menu_loc = 'vanrPar'
	$menu_arg = ''
	menu_off = 0
	$location_type = 'bathroom'
	$bathtype = 'bathtub shower'
	*clr & cla
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">Bathroom</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
	'The bathroom is very small and unimpressive. Nevertheless, it has everything you need:'
	*nl
	'A shower, toilet, sink, <a href="exec:gt ''mirror'',''start''">mirror</a>, where you can ' + iif(pcs_hairbsh = 0,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, and even a bath tub.'
	
	gs'selfplay','suction_dildo'
	
	if vanr_lock = 0:
		if fullmorrout = 1:
			act 'Finish and go to the kitchen':gt 'kuhrPar'
		else
			act 'Return to the hallway': gt 'korrPar'
		end
		act '<b>Close the latch on the door</b>': vanr_lock = 1 & gt 'vanrPar'
	elseif vanr_lock = 1:
		act '<b>Open the latch on the door</b>': vanr_lock = 0 & gt 'vanrPar'
	end

	gs 'din_van', 'private'
end

if $ARGS[0] = 'peek':
	menu_off = 1

	if ((week < 6 and hour >= 16 and hour < 18) or (week >= 6 and hour >= 7 and hour < 18)) and indorf = 0 and father_go = 0 and stepdadqw_day ! daystart and iif(stepdadqw>0,1,rand(0,1)) = 1:
		*clr & cla
		stepdadqw_day = daystart
		if npc_rel['A28'] < 60 or stepdadqw < 3:
			'<center><video autoplay loop src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_0.mp4"></video></center>'
			'As luck would have it, he hear footsteps at the door. Turning around, you barely have time to see the figure of your stepfather as he disappears muttering something about the door, leaving you alone, confused and with a rapidly beating heart.'
			stepdadqw += 1
			act 'Finish': gt 'vanrPar'
		else
			if stepdadqw < 5 or pcs_vag = 0 or mesec > 0 or mother_go = 0 or hour < 16:
				gs 'vanrPar', 'stepdad_nosex'
			else
				if npc_sex['A28'] = 0 and stepdadqw < 5:
					gs 'vanrPar', 'stepdad_nosex'
				else
					*clr & cla
					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_3.jpg"></center>'
					'Suddenly you hear the sound of the shower door as it creaks open. Turning around, you see your stepfather. He is standing in the hallway, devouring your naked body with his eyes. In your mind''s eye you see a flash of all the little moments the two of you have shared and then it dawns on you, your <<$npc_nickname[''A29'']>> is at work. You smirk, and you feel your core tighten with desire:'
					'"Daddy, do you want to join me?"'
					act 'Daddy wants to join?': gs 'vanrPar', 'stepdad_sex'
				end
			end
		end
	elseif ((hour >= 18 and hour < 23 and week < 6) or (hour >= 20 and hour < 23 and week >= 6)) and brother_ev1 ! daystart and rand(0,4) < 2 and indorf = 0:
		*clr & cla
		brother_ev1 = daystart
		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/shower/spotkolka.jpg"></center>'
		'Despite the clattering noise of water, you hear the bathroom door creaking open slightly. Through a small opening in the doorway, you notice your brother Kolka watching you.'
		gs 'willpower', 'exhib', 'resist', 'easy'
		if will_cost <= pcs_willpwr:
			act 'Scream (<<will_cost>> Willpower)': gs 'willpower', 'exhib', 'resist', 'easy' & gs 'willpower', 'pay', 'resist' & gt 'brother', 'brother_go_away'
		else
			act 'Scream (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
		
		if brothershowertalk < 1: act 'Tell him off':gt 'brother','brother_go_away2'
		
		act 'Let him look':gt 'brother', 'brother_voyeur_ev1'
		
		if (pcs_inhib >= 30 and npc_rel['A34'] > 60) or npc_rel['A34'] > 90:
			gs 'willpower', 'exhib', 'self', 'easy'
			if will_cost <= pcs_willpwr:
				act 'Invite him in for a chat (<<will_cost>> Willpower)': gs 'willpower', 'exhib', 'self', 'easy' & gs 'willpower', 'pay', 'self' & gt 'brother_voyeur','showertalk1'
			else
				act 'Invite him in for a chat (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
		
		if brother_shower_times > 0:
			gs 'willpower', 'exhib', 'self'
			if will_cost <= pcs_willpwr:
				act 'Invite him into the shower with you (<<will_cost>> Willpower)': gs 'willpower', 'exhib', 'self' & gs 'willpower', 'pay', 'self' & gt 'brother_voyeur','brother_shower_together'
			else
				act 'Invite him into the shower with you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end

		if brothershowertalk > 0: act 'Tell him you''re too busy to talk': gt 'brother_voyeur','showertalkbusy'
		exit
	end
end

if $ARGS[0] = 'stepdad_nosex':
	menu_off = 1
	'<center><video autoplay loop src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_2.mp4"></video></center>'
	'You hear movement at the door and turn around. It''s your stepfather, it looks like he passed by and accidentally peeked in. Catching his glance, you feel mischievous and excited, so you blow him a kiss. Without a word, he disappears, yet you can''t help smiling and giggling as you continue wiping your hair clean.'
	stepdadqw += 1
	act 'Finish': gt 'vanrPar'
end

if $ARGS[0] = 'stepdad_sex':
	menu_off = 1
	*clr & cla
	gs 'boyStat', 'A28'
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_5.jpg"></center>'
	'You turn around just in time to see your stepfather as he opens the door, he nervously licks his lips before he makes the decision and quickly jumps inside locking the door behind him. Because he is a large man and the bathroom is so small, it suddenly feels crowded in here, yet you can''t help but feel a little excited at the size difference between the two of you.'
	'"You drive me crazy." he says, with a manic look in his eyes as he frantically undresses. You decide to tease him even more by giggling and thrusting forward with you hips, while leaning against the cold tile wall for support. You know you look like a horny little imp, wet and willing, but to hell with it! You like it and how it makes you feel.'
	'Your step-father climbs in the shower with you, as soon as he is undressed. He is roughly groping at your body. Suddenly he spins you around and you find yourself pressed up against the cold tiled wall. You spread your feet a little wider as you feel his fingers grope at the inside of your thighs, searching, teasing your asshole on their way down. You are already treacherously wet, and bite your lips to stop yourself from moaning when his fingers find your dripping pussy. You expect more teasing but his fingers are immediately replaced by his hard throbbing member.'
	stepdadqw += 1

	gs 'arousal', 'foreplay', 5
	gs 'arousal', 'vaginal_finger', 5
	minut -= 5
	gs 'stat'
	gs 'willpower', 'cum_inside', 'resist'
	if will_cost <= pcs_willpwr:
		act 'Hey, what about a condom? (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'cum_inside', 'resist'
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'vaginal', 15, 'rough'
			gs 'cum_call', 'butt', 'A28', 1
			gs 'stat'
			'<center><video autoplay loop src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_6.mp4"></video></center>'
			'You don''t know how but apparently your head still works and you don''t forget about protection. After all it''s you that will end up pregnant if he doesn''t wear a condom, not him. So, it''s your responsibility to remind him about it.'
			'"Hey, what about a condom?" you ask anxiously.'
			'Your Stepfather pauses for a moment, clearly he too does''t want to impregnate his teenage stepdaughter, but he''s too exited to stop now, so he whispers soothingly:'
			'"Shhhh sunshine, everything will be fine. I''ll pull out in time."'
			'You bite your lips to keep quiet and not voice more concerns, like pulling out doesn''t work all the time or at all. Still you really want to have him inside of you despite the risk. So you just moan in agreement as you feel his strong hard member finally make its way into your vagina. He enters you slowly at first, with very gentle thrusts, but after a few moments with a sharp powerful move you feel him go in balls deep, causing your eyes to roll back into your head from the pleasure. Looks like your constant teasing is finally paying off, you think giggling hysterically. Soon your giggles turn into more moans as you are being fucked into the cold tiled wall, squashed by your stepfather''s powerful thrusts and heavy body. You feel his hot breath on the back of your neck as his thrusts increase in speed and power, he''s clearly intending to show you who''s the boss. And it turns out you don''t mind at all, soon you turn into a little moaning bitch, groaning under him and moving your hips as much as you can, searching, wanting more. You don''t think you will last much longer. After all, the pounding the stepfather has been giving you is very fast paced. You finally climax, you feel warmth spread all over your body, and your fingers and toes curl in satisfaction. Your sweet moans help your stepfather cum too, he pulls out and spills his seed all over your ass.'
			'He exhales wearily, wiping sweat from his forehead, "Thanks, <<$pcs_nickname>>." he says.'
			'And then gives you a good hard slap on the ass before exiting the shower, getting dressed and leaving you alone in the bathroom. Oh well, it looks like you have to shower again.'

			gs 'vanrPar', 'stepdad_sex_end'
		end
	else
		act 'Hey, what about a condom? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	gs 'willpower', 'cum_inside', 'resist', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Just don''t come inside me! (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'cum_inside', 'resist', 'easy'
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'vaginal', 15, 'rough'
			gs 'cum_call', '', 'A28', 1
			gs 'stat'
			'<center><video autoplay loop src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_7.mp4"></video></center>'
			'At this point you are too horny, so your head doesn''t work in time and you forget about protection. Your stepfather also seems like he is not up to it, he''s mind is only set to fucking you without a care about the consequences. You realize this as you feel his bare hard member enter you, slowly almost gently, you moan involuntary, but your mind protests at the lack of a condom.'
			'"Oh... Just don''t cum inside me... accidentally." you moan anxiously.'
			'Your Stepfather pauses for a moment and then, with unexpected speed and power he drives his hard penis balls deep into your vagina, causing your eyes to roll back into your head from pleasure. It''s not very typical of him to enter you with such force, he''s usually more gentle with you, but you feel so good, that you don''t resist or protest the change of pace. You can''t help but moan as he keeps fucking you harder and harder into the cold tiled wall, squashed by your stepfather''s powerful thrusts and heavy body. You feel his hot breath on the back of your neck as his thrusts increase in speed and power, he''s clearly intending to show you who''s the boss. And it turns out you don''t mind at all, soon you turn into a little moaning bitch, groaning under him and moving your hips as much as you can, searching, wanting more. You don''t think you will last much longer. After all, the pounding the stepfather has been giving you is very fast paced. You finally climax, you feel warmth spread all over your body, and your fingers and toes curl in satisfaction. In your head the thought, that his unprotected penis is still throbbing in you as he is nearing his orgasm, flashes warningly again before your eyes. Will he even have time to pull out at this rate? You try to warn him again:"Don''t forget... to... pull...out" you moan each word as he keeps thrusting even harder at every word that comes out of your mouth, it''s as if he is trying to fuck you into submission. Your suspicion that he is not going to pull out at all, turns out to be true, when instead of even attempting to pull out when the first gush of sperm hits your vagina walls, he thrusts even deeper and keeps his hips tightly against yours to stop even the tiniest bit of sperm from escaping. You start wiggling in protest and trying to get out from under him, hoping he''d get it and pull out already, so at least some of his sperm will spill outside, but instead he is shamelessly holding your hips in place until every bit of his never ending fertile seed ends up deep into your unprotected pussy. You''ve never been filled up like that, you didn''t even know it was possible for a man to cum so much. The feeling of pleasure you get from being so full nearly makes you cum again, but you are too angry for that.'
			'"Hey! I told you to pull out!" you spat angrily at him.'
			'Removing the member at last, the stepfather scratched his head sheepishly and started making excuses:'
			'"I''m sorry, dear, the devil made me do it. I completely forgot. Don''t worry, nothing will come of it, everything will be fine!"'
			'The bastard had the audacity to smirk at you with a cocky cat-who-ate-the-canary grin. Old fart! Frowning and mad, you pushed him with his clothes out of the bathroom. Now you have to wash once more because you have cum dripping down your legs.'

			gs 'vanrPar', 'stepdad_sex_end'
		end
	else
		act 'Just don''t come inside me! (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Fuck me!':
		*clr & cla
		gs 'arousal', 'vaginal', 15, 'rough'
		gs 'cum_call', 'butt', 'A28', 1
		gs 'stat'
		'<center><video autoplay loop src="images/characters/pavlovsk/resident/vladimir/sex/bath_voyer_8.mp4"></video></center>'
		'At this point you are so horny for his strong hard dick that you can''t think straight, all your thoughts are consumed by the need to have it inside of you. It looks like Stepfather is thinking along the same lines, gone is the careful family man that you know. Right now he is just a man, a man who wants to fuck you like a bitch. Your ass is wagging invitingly, almost involuntarily and almost immediately you wish is granted as your pussy is slowly and gently filled by his hard member. You moan involuntary, satisfied, and just ask for what you really want:'
		'"Oh... Just fuck me!"'
		'But he is in no hurry. He takes his time, thrusting confidently and slowly, savouring every inch of your narrow little slit, making you moan and beg for more. Gradually the thrust become faster and faster, harder and harder until it starts to feel like he is literally tearing you apart. Looks like your constant teasing is finally paying off, you think giggling hysterically. Soon your giggles turn into more moans as you are being fucked into the cold tiled wall, squashed by your stepfather''s powerful thrusts and heavy body. You feel his hot breath on the back of your neck as his thrusts increase in speed and power, he''s clearly intending to show you who''s the boss. And it turns out you don''t mind at all, soon you turn into a little moaning bitch, groaning under him and moving your hips as much as you can, searching, wanting more. You don''t think you will last much longer. After all, the pounding the stepfather has been giving you is very fast paced. You finally climax, you feel warmth spread all over your body, and your fingers and toes curl in satisfaction. Your sweet moans help your stepfather cum too, he suddenly pulls out and spills his seed in your asshole.'
		'"Ffuh" he exhales wearily, wiping the sweat from his forehead, "Oh and I''d fuck you any time".'
		'He says this sweetly, and you can''t help but smile, still basking in the glow of your powerful orgasm and almost sliding down the wall. After a couple of minutes your stepdad leaves the shower and begins to get dressed. It looks like you have to wash yet again.'

		gs 'vanrPar', 'stepdad_sex_end'
	end
end

if $ARGS[0] = 'stepdad_sex_end':
	menu_off = 1
	npc_sex['A28'] += 1

	$orgasm_or = 'yes'
	gs 'arousal', 'end'
	gs 'stat'

	act 'Wash again':
		minut += 15
		noShampoo = 1
		dynamic $showerdin
		gs 'stat'
		gt 'vanrPar'
	end
end

--- vanrPar ---------------------------------

