glife/locations/pavShared_nd

# pavShared_nd


if $ARGS[0] = 'nd':
	$metka = 'nd'
	minut += 2
	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
	'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	'He is a young looking, shy guy with glasses as thick as a magnifying glass. His body is slim, almost rachitic with very pale skin.'
	if nd_hadSex = 1:'As you know very well, <<$nd_name>> has <<ndDick>> cm long <a href="exec:gt ''pavShared_nd'', ''ndDick''">dick</a> with wildly growing pubic hair.'
	''
	'<b>Today he looks to be in a <<$nd_mood>> mood.</b>'
	if nd_served = 1:'You have already served him today.'
	''
	! cum on hands, face, arms, legs; visible even when clothed
	if cumloc[13] > 0 or cumloc[11] > 0 or cumloc[16] > 0 or cumloc[10] >0 or cumloc[9] >0:
		'<font color=#<<$nd_font>>>"Hello <<$pcs_firstname>>, I think you have sperm on you. Please go wash it."</a>'
		act 'Leave': gt 'pavSharedApt', 'start'
	! cum on clothes
	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
		'<font color=#<<$nd_font>>>"Hello <<$pcs_firstname>>, I think you have sperm on your clothes. Please go change."</a>'
		act 'Leave': gt 'pavSharedApt', 'start'	
	! cum on belly, breasts, ass, pussy; visible only when nude
	elseif cumloc[14] or cumloc[15] or cumloc[1] or cumloc[4] and $clothingworntype = 'nude':
		'<font color=#<<$nd_font>>>"Hello <<$pcs_firstname>>, why are you naked? And is that a sperm on you? It''s gross, please go wash yourself and put on some clothes."</a>'
		act 'Leave': gt 'pavSharedApt', 'start'
	else
		'<font color=#<<$nd_font>>>"Hello <<$pcs_firstname>>, what do you need?"</a>'
		act 'Just say hello and leave': gt 'pavSharedApt', 'start'
		act 'Chat with him':gt 'pavShared_nd', 'ndChat'
		if servitudeLvl = 2 and nd_served = 0:act 'Offer him to serve':gt 'pavShared_nd', 'ndServe'
	end
end

if $ARGS[0] = 'ndChat':
	$metka = 'ndChat'
	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
	'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	
	! basic chat
	if chatLvl = 0:
		say = rand(1, 2)
		if say = 1:
			!clothing and bodyshape reactions
			if $clothingworntype = 'nude':
				'<<$nd_name>> is looking at your nude body with obvious shame, blurring.'
				if salocatnow <= 1:
					'He is not very content with the sight: <font color=#<<$nd_font>>>"<<$pcs_firstname>>, you should eat more, it is unhealthy to be too thin."</font>'
				elseif salocatnow > 1 and salocatnow <= 4:
					'Even though he is ashamed, he is obviously pleased with the sight: <font color=#<<$nd_font>>>"<<$pcs_firstname>>, you have beautyful body you know.. But please, put on some clothes!"</font>'
				else
					'He is not very content with the sight: <font color=#<<$nd_font>>>"<<$pcs_firstname>>, you should eat less, it is unhealthy to be too fat."</font>'
				end
				!panties on
				if $pantyworntype ! 'none':
					'<font color=#<<$nd_font>>>"At least you are wearing panties."</font>'
				end
				!panties off, anal plug
				if $pantyworntype = 'none' and analplugIN = 1:
					'As you accidentaly turn around, he gazes between your asscheeks on the plug stuck in your ass.'
					'<font color=#<<$nd_font>>>"<<$pcs_firstname>>, are you wearing a sex toy in your anus?"</font> (his blush turns dark red).'
					if rand(0, 100) < 30:
						'<font color=#<<$pcs_font>>>"Yes <<$nd_name>>, it is a buttplug. Will you help me with it? It seems stuck."</font>'
						'<font color=#<<$nd_font>>>"Wh..what do you mean?"</font>'
						act 'Pull it out for me':chatLvl = 10 & gt 'pavShared_nd', 'ndChat'
					end
				end
			elseif CloBimbo = 1:
				'<<$nd_name>> is looking at your outfit with suspicion.'
				if salocatnow >= 1 and salocatnow <= 4:
					'<font color=#<<$nd_font>>>"You know nice girls like you should not wear so skimpy dresses. Some people can''t hold themselfs, you know?"</font>'
				else
					'<font color=#<<$nd_font>>>"Girls should not wear so skimpy dresses, it may be offending to other people, you know?"</font>'
				end
			elseif CloBimbo = 4:
				'<<$nd_name>> is looking at your outfit with suspicion.'
				if salocatnow <= 4:
					'<font color=#<<$nd_font>>>"You know nice girls like you should not dress like whores. Some people can''t know that they actually are not, you know?"</font>'
				else
					'<font color=#<<$nd_font>>>"Girls should not dress like a whores when they aren''t."</font>'
				end
			end
		elseif say = 2:
			! age reactions
			if age < 18:
				'<font color=#<<$nd_font>>>"<<$pcs_firstname>>, you said you are <<age>> years old. Aren''t you too young to live without parents?"</font>'
			end
		end

		if step = 0:
			minut += 1
			act 'Chat about everyday stuff': step = 10 & gt 'pavShared_nd', 'ndChat'
			act 'Leave':gt 'pavSharedApt', 'start'
		elseif step = 10:
			minut += 15
			sayN = rand (1, 10)
			if sayN = 1:'<i><font color=#<<$nd_font>>>"Once I have hacked into FSB network... the stuff there, you should see."</font></i>'
			if sayN = 2:'<i><font color=#<<$nd_font>>>"I really like playing MMO games!"</font></i>'
			if sayN = 3:'<i><font color=#<<$nd_font>>>"I really hate when someone wants me to fix his computer. Like you ask him: what computer do you have? And he tells you: Windows."</font></i>'
			if sayN = 4:'<i><font color=#<<$nd_font>>>"You should tape your inbuilt camera and mic on your PC, if you have one."</font></i>'
			if sayN = 5:'<i><font color=#<<$nd_font>>>"I work in a local bank as an IT tech. Boring, but I can do stuff around."</font></i>'
			'<I>You spent some time chatting with him about his hobbies and work, slightly improving your relation with him.</i>'
			nd_rel += 1
			gs 'stat'
			intimateTalkCh = rand (0, 100)
			if nd_mood <= 2 and intimateTalkCh <= 50:
				step = 20
			else
				step = 0
			end
			act 'Continue':gt 'pavShared_nd', 'ndChat'
		elseif step = 20:
			minut += 3
			if servitudeLvl = 0:
				'<font color=#<<$nd_font>>>"<<$pcs_firstname>>, din''t you change your mind about easing off some of the rent?"</font>'
				'<font color=#<<$pcs_font>>>"What do you mean?"</font>'
				'<font color=#<<$nd_font>>>"Well as we talked about it before..you know..to cook for us or clean up a bit.."</font>'
				act 'Say you are still not iterested to be their maid':step = 0 & gt 'pavShared_nd', 'ndChat'
				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pavShared_nd', 'ndChat'
			elseif servitudeLvl = 1:
				'<font color=#<<$nd_font>>>"<<$pcs_firstname>>, din''t you change your mind about easing off some more of the rent?"</font>'
				'<font color=#<<$pcs_font>>>"What do you mean? I already clean up and cook for you."</font>'
				'<font color=#<<$nd_font>>>"Well we also talked about this before..you know..to help us easy a bit of stress, if you know what I mean"</font>'
				act 'Say you are still not iterested to be their cumbucket':step = 0 & gt 'pavShared_nd', 'ndChat'
				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pavShared_nd', 'ndChat'			
			elseif servitudeLvl = 2:
				act 'Talk about sex':step = 30 & gt 'pavShared_nd', 'ndChat'
				act 'Continue':step = 0 & gt 'pavShared_nd', 'ndChat'
			end
		elseif step = 30:
			minut += 5
			'You get into rather intimate discussion about sex, porn and all that stuff. <<$nd_name>> turns red, as he does not feel comfortable to talk about such topics.'
			resCh = rand (0, 6)
			if resCh <= 3:
				topicR = rand (1, 5)
				if topicR = 1:'<<$nd_name>> hesitantly tells you he loves looking when the girl orgasms, but not too loudly.'
				if topicR = 2:'<<$nd_name>> hesitantly tells you he loves when girl is caressing his cock.'
				if topicR = 3:'<<$nd_name>> hesitantly tells you he kinda likes when the girl is enjoying the sex.'
				if topicR = 4:'<<$nd_name>> hesitantly tells you his <<ndDick>> cm long dick is too big, sometimes making it a bit painful for the girl.'
				if topicR = 5:'<<$nd_name>> hesitantly tells you he loves when the girl is in a healthy shape, not too thin or too fat.'
				act'Continue':step = 0 & gt 'pavShared_nd', 'ndChat'
			elseif resCh = 4:
				if nd_doPornpos = 0:
					'<<$nd_name>> tells you about his favourite porn videos and sex position he would like to try.'
					act'Continue':nd_doPornpos = 1 & nd_rel += 2 & step = 0 & gt 'pavShared_nd', 'ndChat'
				elseif nd_doPornpos = 1:
					'<<$nd_name>> tells you about another of his favourite porn videos and another sex position he would like to try.'
					act'Continue':nd_doPornpos = 2 & nd_rel += 2 & step = 0 & gt 'pavShared_nd', 'ndChat'
				else
					act'Continue':step = 0 & gt 'pavShared_nd', 'ndChat'
				end
			elseif resCh = 5:
				if nd_doAnal = 0:
					'<<$nd_name>> tells you that he always wanted to try anal sex.'
					act'Continue':nd_doAnal = 1 & nd_rel += 2 & step = 0 & gt 'pavShared_nd', 'ndChat'
				else
					act'Continue':step = 0 & gt 'pavShared_nd', 'ndChat'
				end
			elseif resCh = 6:
				if nd_doPiss = 0:
					'In the rather intimate discussion, <<$nd_name>> seemed to want to say something, but in the end he withold it. He looks very nervous..'
					if nd_rel >= 50:act'Try to get him talk':chatLvl = 20 & step = 0 & gt 'pavShared_nd', 'ndChat'
					act'Let it be':step = 0 & gt 'pavShared_nd', 'ndChat'
				else
					act'Continue':step = 0 & gt 'pavShared_nd', 'ndChat'
				end
			end
		end

	! anal plug
	elseif chatLvl = 10:
		'<font color=#<<$nd_font>>>"O..OK <<$pcs_firstname>>, I''ll help you."</font>'
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedApt/sex/buttPlugPullout.mp4"></video></left>'
		''
		'Hesitantly he grabs the plug and slowly pulls it out.'
		'It leaves your ass gaping.'
		'<font color=#<<$pcs_font>>>"Thank you <<$nd_name>>!"</font>'
		'<font color=#<<$nd_font>>>"You''re welcome <<$pcs_firstname>>, but please be careful next time.."</font>'
		analplugIN = 0
		act 'Continue':chatLvl = 0 & gt 'pavShared_nd', 'ndChat'
	
	! pissing kink
	elseif chatLvl = 20:
		'<font color=#<<$pcs_font>>>"Come on <<$nd_name>>, you can tell it to me. After all we have done together, you don''t need to be ashamed."</font>'
		'<font color=#<<$nd_font>>>"I don''t know <<$pcs_firstname>>.. I''ve told anyone about it."</font>'
		'<font color=#<<$pcs_font>>>"Let it out, it will help you."</font>'
		'<i>He lingers for a while, but then he opens his mouth, finally decided to speak out.</i>'
		'<font color=#<<$nd_font>>>"Well, I have this really dirty desire. I often watch this porn where the guy... you know... relieves himself."</font>'
		'<font color=#<<$pcs_font>>>"Uhm.. you mean like he takes a pee?"</font>'
		'<font color=#<<$nd_font>>>"Yes. But it''s not just that."</font>'
		'<font color=#<<$pcs_font>>>"Huh?"</font>'
		'<font color=#<<$nd_font>>>"He relieves himself onto the girl. And into."</font>'
		'<font color=#<<$pcs_font>>>"WHAT?"</font>'
		'<i>You shout in surprise. Who would tought such a shy, decent man would have this kind of kink.</i>'		
		'<font color=#<<$nd_font>>>"Please don''t get mad <<$pcs_firstname>>! I shouldn''t have tell it to you, I knew it!"</font>'
		'<font color=#<<$pcs_font>>>"I am not mad at you <<$nd_name>>. I am just surprised."</font>'
		'<font color=#<<$nd_font>>>"OK.."</font>'
		'<font color=#<<$pcs_font>>>"So you''ve seen in a porn? And the guy just comes, pissses himself on the girl and leaves or what?"</font>'
		'<font color=#<<$nd_font>>>"No, actually they first have a sex, usually both normal and anal, then he relieves himself on her and into some of her.. holes."</font>'
		'<font color=#<<$pcs_font>>>"Aha.."</font>'
		'<i>You are still somehow shocked by all of this, not knowing what to say next.</i>'
		'<font color=#<<$nd_font>>>"So what do you think about it? About me?"</font>'
		step = 0
		chatLvl = 0
		act 'It''s gross and you are a pervert':nd_rel -= 20 & nd_doPiss = -1 & gt 'pavShared_nd', 'ndChat'
		act 'It''s fine if you like it, but I find it repugnant':nd_rel -= 5 & nd_doPiss = -1 & gt 'pavShared_nd', 'ndChat'
		act 'It''s just a kink like any other':nd_rel += 10 & nd_doPiss = 1 & gt 'pavShared_nd', 'ndChat'
	end
end

if $ARGS[0] = 'ndDick':
	minut += 2
	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
	'<left><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	''
	'<left><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockFlaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	''
	'Your relation with him is <<nd_rel>> / 100.'
	'His dick is <<ndDick>> cm long with wildly growing pubic hair.'
	milkPause = daystart - nd_lastCum
	if milkPause >= 1:'You have not milked him for <<milkPause>> day(s), he most likely has <<nd_cumVol>> ml semen accumulated in his balls' & if nd_cumVol > 60:', which are starting to turn blue' + '.'
	'Today he looks to be at about <<nd_horny>> % of his maximum horniness.'
	''
	'So far you have:'
		if nd_bj = 1:'- given him a blowjob'
			if nd_bj > 1:'- given him <<nd_bj>> blowjobs' & if nd_bjFail > 1:' and failed to make him cum with your mouth <<nd_bjFail>> times'
		if nd_bjDeep = 1:'- given him a blowjob with deepthroat'
			if nd_bjDeep > 1:'- given him <<nd_bjDeep>> blowjobs with deepthroat' & if nd_bjFailPuke > 1:' but failed and puked in his crotch <<nd_bjFailPuke>> times' & if nd_bjFailPuke > 1:' but failed and fainted impaled on his cock <<nd_bjFailFaint>> times'
		if nd_swall = 1:'- swallowed his semen, making it <<nd_cumSwall>> ml swallowed total'
			if nd_swall > 1:'- swallowed his semen <<nd_swall>> times, making it <<nd_cumSwall>> ml swallowed total'
		if nd_vag = 1:'- took it in your pussy' & if nd_vagCumInside = 1:' and let him cum inside you' & if nd_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
			if nd_vag > 1:'- took it in your pussy <<nd_vag>> times' & if nd_vagCumInside >= 1:' and let him cum inside you <<nd_vagCumInside>> times' & if nd_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<nd_vagCumInsideUnwanted>> times'
		if nd_cumVag > 0:'- he pumped in total <<nd_cumVag>> ml of cum into your pussy'
		if nd_anal = 1:'- took it in your ass' & if nd_analCumInside = 1:' and let him cum inside you' & if nd_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
			if nd_anal > 1:'- took it in your ass <<nd_anal>> times' & if nd_analCumInside >= 1:' and let him cum inside you <<nd_analCumInside>> times' & if nd_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<nd_analCumInsideUnwanted>> times'
		if nd_analVag > 0:'- he pumped in total <<nd_cumAnal>> ml of into your anus'
		
		if nd_piss = -3:'- once let him give you a Golden Shower, but found it very terrible experience and he knows you will not do it again, like ever'
		if nd_piss = -2:'- once let him give you a Golden Shower, but felt very humiliated and he knows you will not do it again'
		if nd_piss = -1:'- let him give you a Golden Shower, you do not find it arousing and he knows you will not do it again'
		if nd_piss = 1 and pissLike = 1:'- let him give you a Golden Shower, you do not find it arousing but he knows you are willing to do it repeatedly'
			if nd_piss > 1 and pissLike = 1:'- let him give you a Golden Shower <<nd_piss>> times, you do not find it arousing but he knows you are willing to do it repeatedly'
		if nd_piss = 1 and pissLike = 2:'- let him give you a Golden Shower, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
			if nd_piss > 1 and pissLike = 2:'- let him give you a Golden Shower <<nd_piss>> times, you do find it somewhat arousing and he knows you are willing to do it repeatedly'

	''
	if nd_doPornpos = 1 and nd_pornPos = 0:'You know that he would like to try some special pornographic sex positions, but you didn''t let him do it yet.'
	if nd_doPornpos = 1 and nd_pornPos = 1:'You''ve let him fuck you the "Full Nelson" sex position.'
	if nd_doPornpos = 2 and nd_pornPos = 1:'You''ve let him fuck you the "Full Nelson" sex position, but you know that there is another porn position he would like to try.'
	if nd_doPornpos = 2 and nd_pornPos = 2:'You''ve let him fuck you the "Full Nelson" and "Pile Driver" sex positions.'
	
	if $metka = 'nd':
		act 'Continue':gt 'pavShared_nd', 'nd'
	else
		act 'Continue':gt 'pavSharedApt', $goBack
	end
end

if $ARGS[0] = 'ndServe':
	$boy = $nd_name
	gs 'npcgeneratec', 0, $boy, 21
	gs 'boyStat', $npclastgenerated
	minut += 2
	$metka = 'ndServe'
	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
	'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	step = 0
	subStep = 0

	sexCh = rand (0, 30) + nd_horny
	
	! very bad mood
	if nd_mood >= 5:
		'<font color=#<<$nd_font>>>"Not now <<$pcs_firstname>>, I don''t have the mood for it."</font>'
		act 'Leave':gt 'pavSharedApt', 'start'
	
	! random chance to sex, but increasing with horniness level; nd min horny = 15/80*100 = 18,75
	elseif sexCh < 40:

		'<font color=#<<$nd_font>>>"Not now <<$pcs_firstname>>, I am busy."</font>'
		act 'Leave':gt 'pavSharedApt', 'start'
	
	! wants sex
	else
		actionR = rand (2, 6)
		if actionR = 2:
			'<font color=#<<$nd_font>>>"I am busy <<$pcs_firstname>>, but you can suck my dick while I am working."</font>'
			act 'Agree': nd_rel += 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
		elseif actionR = 3:
			'<font color=#<<$nd_font>>>"Sure <<$pcs_firstname>>, I could use a blowjob right now."</font>'
			act 'Agree': nd_rel += 1 & gt 'pavShared_nd', 'ndSuck'
		elseif actionR = 4:
			'<font color=#<<$nd_font>>>"Allright, let''s have a sex. I would like to fuck your pussy <<$pcs_firstname>>."</font>'
			act 'Agree': nd_rel += 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif actionR = 5:
			if nd_anal = 0:
				if nd_doAnal = 1:
					'<font color=#<<$nd_font>>>"I''m not sure <<$pcs_firstname>>.."</font>'
					act 'It''s your choice':gt 'pavShared_nd', 'ndServe'
					act 'You told me you wanted to try anal, didn''t you?': nd_rel += 2 & gt 'pavShared_nd', 'ndSexAnal'
				else
					gt 'pavShared_nd', 'ndServe'
				end
			elseif nd_anal >= 1:
				'<font color=#<<$nd_font>>>"Sure <<$pcs_firstname>>, I would like to take your ass this time."</font>'
				act 'Agree': nd_rel += 1 & gt 'pavShared_nd', 'ndSexAnal'
			end
		elseif actionR = 6:
			if nd_piss = 0:
				if nd_doPiss = 1:
					'<font color=#<<$nd_font>>>"I''m not sure <<$pcs_firstname>>.."</font>'
					act 'It''s your choice':gt 'pavShared_nd', 'ndServe'
					act 'You told me you have this secret dream about pissing, do you?':nd_rel += 2 & gt 'pavShared_nd', 'ndSexPiss'
				else
					gt 'pavShared_nd', 'ndServe'
				end
			elseif nd_piss >= 1:
				'<font color=#<<$nd_font>>>"<<$pcs_firstname>>, I have a full bladder. Do something about it, will you?"</font>'
				act 'Agree': nd_rel += 1 & gt 'pavShared_nd', 'ndSexPiss'
			else
				gt 'pavShared_nd', 'ndServe'		
			end
		end
		if actionR > 1:act 'Say you changed your mind and leave': nd_rel -= 1 & gt 'pavSharedApt', 'start'
	end
end

if $ARGS[0] = 'ndSuckBellowTable':
	'<b><font color=#<<$nd_font>>><<$nd_name>> - blowjob under table</font></b>'
	if step = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	if step > 0 and cockHard = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockFlaccid.jpg"></left>'
	if step > 0 and cockHard = 1:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	''
	$metka = 'ndSuckBellowTable'
	price = price_blowjob
	if step > 0:'<<$nd_name>> orgasm build-up: '+orgB+'/100'

	if step = 0:
		orgB = 0
		cockHard = 0
		failC = 0
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjTableStart.jpg"></left>'
		'You drop on your knees, crawling under his large table.'
		'<<$nd_name>> unzips his pants, easing you the access to his warm dick, but then he instantly gets back to typing some stuff on his keyboard.'
		'His semi-hard phallus now hangs down from the chair, right in front of your face.'
		'Looking at the tip, you decide to:'
		cockHard = 0
		act 'Lick the tip':step = 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'
	
	!kissing tip
	elseif step = 1:
		orgB += rand(0, 10) / nd_mood
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjTableKissTip.mp4"></video></left>'
		'You take <<$nd_name>> cock in your hand, pointing the tip in fron of your mouth.'
		'As it was your favourity puppy, you start to gently Lick the tip all around, slowly making the cock to get harder and harder, finally reaching his full <<ndDick>> cm length.'
		gs 'arousal', 'bj', 3
		gs 'stat'
		cockHard = 1
		act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'	
	
	!sucking tip
	elseif step = 2:
		'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable3.mp4"></video></left>'
		''
		if cockHard = 0:
			orgB += rand(5, 15)
			'<<$nd_name>>''s cock is not hard yet, but you start to suck the yet soft tip as if it was, slurping aloud.'
			'You can feel that slowly his member becomes hard right in your mouth.'
			cockHard = 1
		else
			orgB += rand(10, 20)
			'<<$nd_name>>''s already hard cock points toward you and you suck the dark pink tip as a lolipop.'
		end
		gs 'arousal', 'bj', 3
		gs 'stat'
		act 'Lick the tip':step = 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'	
		act 'Deepthroat':step = 4 & gt 'pavShared_nd', 'ndSuckBellowTable'
		if orgB >= 100:
			act 'Try to make him cum':step = 5 & gt 'pavShared_nd', 'ndSuckBellowTable'
		end

	!sucking dick
	elseif step = 3:
		'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable4.mp4"></video></left>'
		''
		if cockHard = 0:
			orgB += rand(15, 35)
			'<<$nd_name>>''s cock is not hard yet, but you start to suck the member as if it was, making almost half of it disappear in your throat every time you move on.'
			'You can slowly feel his member becoming hard right in your mouth, making you choke and gag on it more and more with every second.'
			cockHard = 1
		else
			orgB += rand(20, 40)
			'<<$nd_name>>''s already hard cock points toward you and you suck almost half of it, sucking and slurping it as best as you can.'
		end
		gs 'arousal', 'bj', 8
		gs 'stat'
		act 'Lick the tip':step = 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
		act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'	
		act 'Deepthroat':step = 4 & gt 'pavShared_nd', 'ndSuckBellowTable'
		if orgB >= 100:
			act 'Try to make him cum':step = 5 & gt 'pavShared_nd', 'ndSuckBellowTable'
		end
	
	!deepthroat
	elseif step = 4:
		orgB += rand(40, 60)
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjTableDeepthroat.mp4"></video></left>'
		''
		'You decide to take <<$nd_name>>''s hard, <<ndDick>> cm long cock all the way your throat.'
		'You force yourself on to it, overcoming the gag reflex in your throat, saliva and tears almost squirting out of you.'
		'Doing this several times in a row, you try to hold on as long as you can with dick all the way down in your throat.'
		nd_bjDeep = 1
		gs 'arousal', 'bj', 6
		gs 'stat'
		deepthroatFailCh = rand(0, 100)
		fadeOutCh = rand(0, 100)
		if deepthroatFailCh <= 10:
			'<b>You try too hard to put it as far as possible, unable to hold the gag reflex anymore, still with his dick inside you vomit right in <<$nd_name>>''s crotch!</b>'
			act 'Crawl out from the table':step = 7 & gt 'pavShared_nd', 'ndSuckBellowTable'
		elseif fadeOutCh <= 10:
			'<b>You try too hard to keep the cock inside you as long as possible, not being able to catch enough breath. Suddenly all goes dark and you fade away...</b>'
			act 'Continue':step = 8 & gt 'pavShared_nd', 'ndSuckBellowTable'
		else
			act 'Lick the tip':step = 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
			act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
			act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'	
			act 'Deepthroat':step = 4 & gt 'pavShared_nd', 'ndSuckBellowTable'
			if orgB >= 100:
				act 'Try to make him cum':step = 5 & gt 'pavShared_nd', 'ndSuckBellowTable'
			end
		end

	!cum attempt
	elseif step = 5:
		'You decided that now it''s time to try and make him finally cum.'
		'Intensifying the pressure and pace, you expect him every moment to moan and be done with it.'
		gs 'arousal', 'bj', 5
		cumCh = rand(0, 100)
		if cumCh <= 70:
			''
			'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth4.mp4"></video></left>'
			''
			'Your attempt is successful, as <<$nd_name>> cums right into your mouth and on your face.'
			nd_lastCum = daystart
			nd_served = 1
			gs 'cum_call', 'mouth', $boy, 1, 0, nd_cumVol / 2
			gs 'cum_call', 'face', $boy, 1, 0, nd_cumVol / 2
			act 'Crawl out from the table':step = 9 & nd_cumVol = 0 & gt 'pavShared_nd', 'ndSuckBellowTable'
		else
			failC += 1
			if failC >= 3:
				''
				'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjFail.jpg"></left>'
				''
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, if you can''t suck a cock stop wasting my time. Get out!"</font>'
				act 'Crawl out from the table':step = 6 & gt 'pavShared_nd', 'ndSuckBellowTable'
			else
				''
				'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjFailTryAgain.mp4"></video></left>'
				''
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
				act 'Lick the tip':step = 1 & gt 'pavShared_nd', 'ndSuckBellowTable'
				act 'Suck just the tip':step = 2 & gt 'pavShared_nd', 'ndSuckBellowTable'
				act 'Suck the cock':step = 3 & gt 'pavShared_nd', 'ndSuckBellowTable'	
				act 'Deepthroat':step = 4 & gt 'pavShared_nd', 'ndSuckBellowTable'
				if orgB >= 100:
					act 'Try to make him cum':step = 5 & gt 'pavShared_nd', 'ndSuckBellowTable'
				end
			end
		end
		gs 'stat'

	!END cum fail
	elseif step = 6:
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
		'You get up from your knees, looking at <<$nd_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
		'He doesn''t even look at you, again being deep in his thoughts and typing something on his keyboard. <font color=#<<$nd_font>>>"Yea yea. Bye."</font>'
		nd_rel -= 3
		step = 0
		nd_bjFail += 1
		act 'Leave':gt 'pavSharedApt', 'start'

	!END deepthroat fail
	elseif step = 7:
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjDeepthroatPuke.mp4"></video></left>'
		''
		'<font color=#<<$nd_font>>>"Oh my god <<$pcs_firstname>>, what have you done??!!"</font>'
		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
		'<font color=#<<$nd_font>>>"Please <<$pcs_firstname>> do something and clean it, it''s gross!"</font>'
		nd_rel -= 5
		step = 0
		nd_bjFail += 1
		nd_bjFailPuke += 1
		act 'Leave':gt 'pavSharedApt', 'start'

	!END deepthroat fade out
	elseif step = 8:
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></left>'
		''
		'You wake up being slapped in your face: <font color=#<<$nd_font>>>"<<$pcs_firstname>>! <<$pcs_firstname>>! Wake up!"</font>'
		'Slowly normal sight goes back to you, but still you are very confused.  <font color=#<<$pcs_font>>>"Wh..what happened?</font>'
		'<font color=#<<$nd_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>."</font> He is obviously worried about you.'
		nd_rel += 1
		step = 0
		nd_bjFail += 1
		nd_bjFailFaint += 1
		act 'Get up and leave':gt 'pavSharedApt', 'start'

	!END cum success
	elseif step = 9:
		nd_bj += 1
		if nd_mood <= 3:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
			''
			'<font color=#<<$nd_font>>>"Thank you <<$pcs_firstname>>."</font>'
			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"You are welcome. Bye."</font>.'
			step = 0
			nd_rel += 1
		else
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
			''
			'<<$nd_name>> doesn''t pay anymore attention to you, working again on his computer as if nothing happend.'
			'You just pack your things and quietly leave through the door.'
			step = 0
		end
		gs 'arousal', 'end'
		gs 'stat'
		act 'Leave':gt 'pavSharedApt', 'payService'
	end
end

if $ARGS[0] = 'ndSuck':
	'<b><font color=#<<$nd_font>>><<$nd_name>> - blowjob</font></b>'
	if step = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	if step > 0 and cockHard = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockFlaccid.jpg"></left>'
	if step > 0 and cockHard = 1:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	$metka = 'ndSuck'
	price = price_blowjob
	if step > 0:'<<$nd_name>> orgasm build-up: '+orgB+'/100'

	! crawl to him
	if step = 0:
		orgB = 0
		cockHard = 0
		failC = 0
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockFlaccid.jpg"></left>'
		''
		'<<$nd_name>> takes down his pants, revealing his flaccid cock. He relaxes on his bed, expecting you to do the service.'
		'You drop on your knees and crawl to him, trying to move as sexy as possible.'
		act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
		act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'

	!lick balls
	elseif step = 1:
		'<left><video autoplay loop src="images/shared/sex/blowjob/kotovbj70.mp4"></video></left>'
		''
		'You decide that the best approach is to arouse him first.'
		'Kneeling between his legs, you show him the whole length of your tongue, looking as lusty as you can.'
		'Slowly you move your head down in his crotch and bellow his phallus. The moment you start using your tongue on his device, you can feel the increased pulsation in his veins, making the cock larger and thicker every second.'
		orgB += rand(0, 5)
		cockHard = 1
		gs 'arousal', 'bj', 3
		gs 'stat'
		act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
		act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'

	!Lick the tip
	elseif step = 2:
		'<left><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus1.mp4"></video></left>'
		''
		'You take <<$nd_name>> cock in your hand, pointing the tip in front of your mouth.'
		'As it was your favourity puppy, you start to gently Lick the tip all around, slowly making the cock to get harder and harder, finally reaching his full <<ndDick>> cm length.'
		gs 'arousal', 'bj', 2
		gs 'stat'
		orgB += rand(2, 7)
		cockHard = 1
		act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
		act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'

	!suck the tip
	elseif step = 3:
		'<left><video autoplay loop src="images/shared/sex/blowjob/kotovbj110.mp4"></video></left>'
		if cockHard = 0:
			orgB += rand(5, 15)
			'<<$nd_name>>''s cock is not hard yet, but you start to suck the yet soft tip as if it was, slurping aloud.'
			'You can feel that slowly his member becomes hard right in your mouth.'
			cockHard = 1
		else
			orgB += rand(10, 20)
			'<<$nd_name>>''s already hard cock points toward you and you suck the dark pink tip as a lolipop.'
		end
		gs 'arousal', 'bj', 3
		gs 'stat'
		act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
		act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'
		act 'Deepthroat':step = 5 & gt 'pavShared_nd', 'ndSuck'
		if orgB >= 100:
			act 'Try to make him cum':step = 6 & gt 'pavShared_nd', 'ndSuck'
		end

	!sucking dick
	elseif step = 4:
		'<left><video autoplay loop src="images/shared/sex/blowjob/kotovbj23.mp4"></video></left>'
		''
		if cockHard = 0:
			orgB += rand(15, 35)
			'<<$nd_name>>''s cock is not hard yet, but you start to suck the member as if it was, making almost half of it disappear in your throat every time you move on.'
			'You can slowly feel his member becoming hard right in your mouth, making you choke and gag on it more and more with every second.'
			cockHard = 1
		else
			orgB += rand(20, 40)
			'<<$nd_name>>''s already hard cock points toward you and you suck almost half of it, sucking and slurping it as best as you can.'
		end
		gs 'arousal', 'bj', 8
		gs 'stat'
		act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
		act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
		act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'
		act 'Deepthroat':step = 5 & gt 'pavShared_nd', 'ndSuck'
		if orgB >= 100:
			act 'Try to make him cum':step = 6 & gt 'pavShared_nd', 'ndSuck'
		end
	
	!deepthroat
	elseif step = 5:
		'<left><video autoplay loop src="images/shared/sex/blowjob/bj1.mp4"></video></left>'
		''
		orgB += rand(40, 60)
		'You decide to take <<$nd_name>>''s hard, <<ndDick>> cm long cock all the way your throat.'
		'You force yourself on to it, overcoming the gag reflex in your throat, saliva and tears almost squirting out of you.'
		'Doing this several times in a row, you try to hold on as long as you can with dick all the way down in your throat.'
		nd_bjDeep = 1
		gs 'arousal', 'bj', 6
		gs 'stat'
		deepthroatFailCh = rand(0, 100)
		fadeOutCh = rand(0, 100)
		if deepthroatFailCh <= 10:
			'<b>You try too hard to put it as far as possible, unable to hold the gag reflex anymore, still with his dick inside you vomit right in <<$nd_name>>''s crotch!</b>'
			act 'Continue':step = 8 & gt 'pavShared_nd', 'ndSuck'
		elseif fadeOutCh <= 10:
			'<b>You try too hard to keep the cock inside you as long as possible, not being able to catch enough breath. Suddenly all goes dark and you fade away...</b>'
			act 'Continue':step = 9 & gt 'pavShared_nd', 'ndSuck'
		else
			act 'Lick his balls':step = 1 & gt 'pavShared_nd', 'ndSuck'
			act 'Lick the tip':step = 2 & gt 'pavShared_nd', 'ndSuck'
			act 'Suck the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
			act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'
			act 'Deepthroat':step = 5 & gt 'pavShared_nd', 'ndSuck'
			if orgB >= 100:
				act 'Try to make him cum':step = 6 & gt 'pavShared_nd', 'ndSuck'
			end
		end

	!cum attempt
	elseif step = 6:
		'You decided that now it''s time to try and make him finally cum.'
		'Intensifying the pressure and pace, you expect him every moment to moan and be done with it.'
		gs 'arousal', 'bj', 5
		cumCh = rand(0, 100)
		if cumCh <= 70:
			'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth1.mp4"></video></left>'
			''
			'Your attempt is successful, as <<$nd_name>> cums right into your mouth and on your face.'
			nd_lastCum = daystart
			nd_served = 1
			gs 'cum_call', 'mouth', $boy, 1, 0, nd_cumVol / 2
			gs 'cum_call', 'face', $boy, 1, 0, nd_cumVol / 2
			act 'Get up':step = 10 & nd_cumVol = 0 & gt 'pavShared_nd', 'ndSuck'
		else
			failC += 1
			if failC >= 3:
				''
				'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjFail.jpg"></left>'
				''
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, if you can''t suck a cock stop wasting my time. Get out!"</font>'
				act 'Get up':step = 7 & gt 'pavShared_nd', 'ndSuck'
			else
				''
				'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjFailTryAgain.mp4"></video></left>'
				''
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
				if failC = 1:'He is getting nervous..'
				if failC = 2:'He is obviously annoyed, you better try to finish him now!'
				act 'Suck just the tip':step = 3 & gt 'pavShared_nd', 'ndSuck'
				act 'Suck the cock':step = 4 & gt 'pavShared_nd', 'ndSuck'	
				act 'Deepthroat':step = 5 & gt 'pavShared_nd', 'ndSuck'
			end
		end
		gs 'stat'

	!END cum fail
	elseif step = 7:
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
		''
		'You get up from your knees, looking at <<$nd_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
		'He looks annoyed:<font color=#<<$nd_font>>>"I see. Bye."</font>'
		nd_rel -= 3
		step = 0
		nd_bjFail += 1
		act 'Leave':gt 'pavSharedApt', 'start'

	!END deepthroat fail
	elseif step = 8:
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjDeepthroatPuke.mp4"></video></left>'
		''
		'<font color=#<<$nd_font>>>"Oh my god <<$pcs_firstname>>, what have you done??!!"</font>'
		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
		'<font color=#<<$nd_font>>>"Please <<$pcs_firstname>> do something and clean it, it''s gross!"</font>'
		nd_rel -= 5
		step = 0
		nd_bjFail += 1
		nd_bjFailPuke += 1
		act 'Leave':gt 'pavSharedApt', 'start'

	!END deepthroat fade out
	elseif step = 9:
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></left>'
		''
		'You wake up being slapped in your face: <font color=#<<$nd_font>>>"<<$pcs_firstname>>! <<$pcs_firstname>>! Wake up!"</font>'
		'Slowly normal sight goes back to you, but still you are very confused.  <font color=#<<$pcs_font>>>"Wh..what happened?</font>'
		'<font color=#<<$nd_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>."</font> He is obviously worried about you.'
		nd_rel += 1
		step = 0
		nd_bjFail += 1
		nd_bjFailFaint += 1
		act 'Get up and leave':gt 'pavSharedApt', 'start'

	!END cum success
	elseif step = 10:
		nd_bj += 1
		if nd_mood <= 3:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
			''
			'<font color=#<<$nd_font>>>"Thank you <<$pcs_firstname>>."</font>'
			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"You are welcome. Bye."</font>.'
			nd_rel += 1
			step = 0
		else
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></left>'
			''
			'<<$nd_name>> doesn''t pay anymore attention to you, working again on his computer as if nothing happend.'
			'You just pack your things and quietly leave through the door.'
			step = 0
		end
		gs 'arousal', 'end'
		gs 'stat'
		act 'Get up and leave':gt 'pavSharedApt', 'payService'
	end
end

if $ARGS[0] = 'ndSexVaginal':
	'<b><font color=#<<$nd_font>>><<$nd_name>> - vaginal sex</font></b>'
	if step = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	if step > 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	''
	$metka = 'ndSexVaginal'
	price = price_vaginal
	if step > 0:'<<$nd_name>> orgasm build-up: '+orgB+'/100'

	!strip down
	if step = 0:
		minut += 5
		orgB = 0
		cockHard = 0
		failC = 0
		$clothingworntype = 'nude'
		'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></left>'
		''
		'<<$nd_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
		'His hairy, rickety body shines with the very pale skin. He moves towards you, lubing his <<ndDick>> cm long cock and stroking it on the way.'
		if $pantyworntype ! 'none':
			gs 'panties', 'remove'
			gs 'stat'
			'<font color=#<<$nd_font>>>"Hey, <<$pcs_firstname>>, what about the panties?"</font>'
			'You entirely forgot to take them off! Or maybe you didn''t want to actually?'
			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
		end
		'<<$nd_name>> takes you by the waist, kissing you.'
		'<font color=#<<$nd_font>>>"Do you want to go for certain position, or should I choose?"</font>'
		if nd_pornPos = 0:hisPos = rand(1, 3)
		if nd_pornPos = 1:hisPos = rand(1, 4)
		if nd_pornPos = 2:hisPos = rand(1, 5)

		act 'Let him choose':step = hisPos & gt 'pavShared_nd', 'ndSexVaginal'
		act 'Take me like a missionary':step = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		act 'Take me from behind':step = 2 & gt 'pavShared_nd', 'ndSexVaginal'
		act 'Take me from side':step = 3 & gt 'pavShared_nd', 'ndSexVaginal'
		if nd_doPornpos = 1 and nd_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':nd_rel += 3 & step = 4 & gt 'pavShared_nd', 'ndSexVaginal'
		if nd_doPornpos = 2 and nd_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':nd_rel += 2 & step = 5 & gt 'pavShared_nd', 'ndSexVaginal'
		if nd_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pavShared_nd', 'ndSexVaginal'
		if nd_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pavShared_nd', 'ndSexVaginal'

	!missionary
	elseif step = 1:
		if subStep = 0:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagMissionary1.mp4"></video></left>'
			''
			'You lie on the bed, spreading your legs for easy access.'
			'<<$nd_name>> kneels between those, gently spreading them a bit wider with his hands.'
			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
			'You can feel warm sensation between your legs, replaced by pressure and suddenly even a mild pain. That''s when he enters your tender pussy.'
			'<<$nd_name>> begins to move inside you, ever increasing the pace.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'vaginal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagMissionary2.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you rub his hairy ass, making him even hornier.'
			'<<$nd_name>> now rams you as deep as he can, all his <<ndDick>> cm are inside you.'
			gs 'arousal', 'vaginal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexVaginal'
		end

	!doggy
	elseif step = 2:
		if subStep = 0:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagDoggy1.mp4"></video></left>'
			''
			'You kneel on the bed, bending your back as much as you can, putting your nice round ass ass high as possible.'
			'<<$nd_name>> kneels behind you, rubbing your asscheeks. He starts probing your pussy with his lubed fingers, penetrating in and out, playing with the lips..'
			'He doesn''t last long and finally moves with his phallus next to you.'
			'He slowly enters your moist hole, pushing as far as your still somewhat dry pussy let''s him.'
			'The first mild pain fades away and you can feel building warmth and a good feeling of being fucked from behind like a mare in heat.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'vaginal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20)
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagDoggy2.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you reach for his hairy balls bashing your clitoris from behind and rub it, making his fuck fury even more intensive.'
			'<<$nd_name>> now rams you as deep and as fast he can, the every one of his <<ndDick>> cm are inside you with each stroke.'
			gs 'arousal', 'vaginal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexVaginal'
		end

	!sidefuck
	elseif step = 3:
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagSidefuck1.jpg"></left>'
			''
			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
			'He takes this as a invitation, lying behind you.'
			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
			'Finally <<$nd_name>> takes his rod, pointing the tip right to the entry of your vagina.'
			'He starts pushing it inside, and as it is lubed, it goes in quite easily.'
			'<<$nd_name>> uses this to his advantage and pushes as far as his <<ndDick>> cm long dick can reach.' 
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'vaginal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagSidefuck2.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you reach for his hairy balls between your legs, rubbing it and making him groan even more..'
			'<<$nd_name>> now rams you as deep and he can and giving the position and the whole (<<ndDick>> cm) size of his dick, some of the strokes hurt a little.'
			gs 'pain', 1, 'vaginal', 'stretch'
			gs 'arousal', 'vaginal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexVaginal'
		end

	!full nelson
	elseif step = 4:
		if nd_pornPos < 1:nd_pornPos = 1
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagFullnelson1.jpg"></left>'
			''
			'You let him sit on the edge of the bed, having his dick prepared for your vagina.'
			'Facing him with your back, you climb on top of him and burry his <<ndDick>> cm long dick in your pussy few times, making it as comfortable as possible.'
			'When you feel it is good enough, you tell him he can begin.'
			'With his somehow weak, but for this purpose strong enough hands he lifts both your knees in the air, making you impale on his cock even deeper.'
			'Then he grabs your head with both hands, pushing it forwards almost down to your stomach.'
			'In this position you literally see every stroke of his penis into your pussy.. But there is nothing else you can do.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'vaginal', 10, 'lube'
			gs 'stat'
			orgB += rand(20, 40) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedApt/sex/vagFullnelson2.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you can do nothing but watch the penis moving in and out of you and his balls banging your labia and clitoris.'
			'<<$nd_name>> rams you as deep as he can.'
			gs 'arousal', 'vaginal', 10
			gs 'stat'
			orgB += rand(30, 50) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexVaginal'
		end

	!pile driver
	elseif step = 5:
		if nd_pornPos < 2:nd_pornPos = 2
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagPiledriver1.jpg"></left>'
			''
			'You take a pillow from his bed, putting on the floor and lying on it with your back.'
			'As if you were doing yoga, you put your ass in the hands and lift it above your head, letting the feet fall down aside your head.'
			'<<$nd_name>> now has the very best access to your pussy.'
			'He goes to you, rubbing your ass and penetrating your pussy with his wet fingers.'
			'After while he takes his phallus, somehow bending it downwards and pushes it inside you.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'vaginal', 10, 'lube'
			gs 'stat'
			orgB += rand(20, 40) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagPiledriver2.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you can do nothing but watch his penis and hairy crotch bang you down like a hammer.'
			'<<$nd_name>> rams you as deep as he can.'
			gs 'arousal', 'vaginal', 10
			gs 'stat'
			orgB += rand(30, 50) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexVaginal'
		end

	!where to cum
	elseif step = 10:
		if subStep = 0:
			minut += 2
			'<<$nd_name>> is groaning loudly, you can say that he is reaching his orgasm.'
			'You decide to tell him:'
			nd_served = 1
			nd_vag += 1
			act 'Cum inside me':subStep = 1 & gt 'pavShared_nd', 'ndSexVaginal'
			cumOutL = rand(2, 6)
			act 'Don''t cum inside me':subStep = cumOutL & gt 'pavShared_nd', 'ndSexVaginal'

		!inside
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreCumPussy3.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end, pumping his load <<ndDick>> cm deep inside your pussy.'
			nd_vagCumInside += 1
			nd_cumVag += nd_cumVol
			nd_lastCum = daystart
			gs 'cum_call', '', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'vaginal', 2
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!stomach
		elseif subStep = 2:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/cumBelly2.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
			'An extensive pool of cum lands on your abdomen, feeling warm but sticky.'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'stomach', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!ass
		elseif subStep = 3:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumOnAss.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he takes his dick out and points it on your ass.'
			'Both your asscheeks are covered in sticky, warm seed.'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'butt', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!face
		elseif subStep = 4:
			'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees and and points his tip in front of your face.'
			'The seed starts squirting, splashing your face with surprisingly strong force, leaking to your nose and eyes and hair..'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'face', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!takeout fail
		elseif subStep = 5:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagCumTakoutFail.jpg"></left>'
			''
			'You expect <<$nd_name>> to take his cock out of you any moment, but instead you hear his groans becoming louder.'
			'<font color=#<<$pcs_font>>>"What are you doing? You aren''t coming inside me, are you?"</font>'
			'<font color=#<<$nd_font>>>"Sorry <<$pcs_firstname>>, I could''nt help myself."</font>'
			if tabletkishot = 0 and pillcon < 0:
				'<font color=#<<$pcs_font>>>"I am not on the pill <<$nd_name>>!"</font>'
				'<font color=#<<$nd_font>>>"Than you better do something about it. We''re done here."</font>'
				'He is obvously annoyed by this.'
				nd_rel -= 5
			end
			'You furiously get up from the bed, putting your clothes between your legs to catch the remainder of the cum, so it doesn''t spur on your legs and carpet.'
			nd_lastCum = daystart
			nd_cumVag += nd_cumVol
			nd_vagCumInside += 1
			nd_vagCumInsideUnwanted += 1
			gs 'cum_call', '', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'vaginal', 5, 'sub'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'


		!will you swallow?
		elseif subStep = 6:
			'<font color=#<<$nd_font>>>"If I won''t cum inside you, will you swallow?"</font>'
			act 'Yes':subStep = 20 & gt 'pavShared_nd', 'ndSexVaginal'
			act 'No':subStep = 30 & gt 'pavShared_nd', 'ndSexVaginal'

		!swallow YES
		elseif subStep = 20:
			'<left><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreCumMouth5.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the end and in the moment he is about the come, you get on your knees and open your mouth for his delivery.'
			'The seed starts squirting, landing in your mouth and some even around it.'
			'<<$nd_name>> spins the last of his cum dry from his cock, you close your mouth, swallowing the mouthful in one gulp.'
			'Afterwards you show him your tongue as a proof that not a drop was left unconsumed..'
			nd_lastCum = daystart
			nd_cumSwall += nd_cumVol
			nd_swall += 1
			nd_rel += 1
			minut += 5
			gs 'cum_call', 'mouth', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!swallow NO
		elseif subStep = 30:
			'<font color=#<<$nd_font>>>"Allright I''ll cum elsewhere.."</font>'
			nd_rel -= 3
			cumOutL2 = rand(2, 5)
			act 'Continue':subStep = cumOutL2 & gt 'pavShared_nd', 'ndSexVaginal'
		end
	end
end

if $ARGS[0] = 'ndSexAnal':
	'<b><font color=#<<$nd_font>>><<$nd_name>> - anal sex</font></b>'
	if step = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	if step > 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	''
	$metka = 'ndSexAnal'
	price = price_anal
	if step > 0:'<<$nd_name>> orgasm build-up: '+orgB+'/100'

	!strip down
	if step = 0:
		minut += 5
		orgB = 0
		cockHard = 0
		failC = 0
		$clothingworntype = 'nude'
		'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></left>'
		''
		'<<$nd_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
		'His hairy, rickety body shines with the very pale skin. He moves towards you, lubing his <<ndDick>> cm long cock and stroking it on the way.'
		if $pantyworntype ! 'none':
			gs 'panties', 'remove'
			gs 'stat'
			'<font color=#<<$nd_font>>>"Hey, <<$pcs_firstname>>, what about the panties?"</font>'
			'You entirely forgot to take them off! Or maybe you didn''t want to actually?'
			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
		end
		'<<$nd_name>> takes you by the waist, kissing you.'
		'<font color=#<<$nd_font>>>"Do you want to go for certain position, or should I choose?"</font>'
		if nd_pornPos = 0:hisPos = rand(1, 3)
		if nd_pornPos = 1:hisPos = rand(1, 4)
		if nd_pornPos = 2:hisPos = rand(1, 5)

		act 'Let him choose':step = hisPos & gt 'pavShared_nd', 'ndSexAnal'
		act 'Take me like a missionary':step = 1 & gt 'pavShared_nd', 'ndSexAnal'
		act 'Take me from behind':step = 2 & gt 'pavShared_nd', 'ndSexAnal'
		act 'Take me from side':step = 3 & gt 'pavShared_nd', 'ndSexAnal'
		if nd_doPornpos = 1 and nd_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':nd_rel += 3 & step = 4 & gt 'pavShared_nd', 'ndSexAnal'
		if nd_doPornpos = 2 and nd_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':nd_rel += 2 & step = 5 & gt 'pavShared_nd', 'ndSexAnal'
		if nd_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pavShared_nd', 'ndSexAnal'
		if nd_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pavShared_nd', 'ndSexAnal'

	!missionary
	elseif step = 1:
		if subStep = 0:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckAnal2.mp4"></video></left>'
			''
			'You lie on the bed, spreading your legs for easy access.'
			'<<$nd_name>> kneels between those, gently spreading them a bit wider with his hands.'
			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
			'He rubs the tip of his phallus around your sphincter, making it wet and preparing to penetrate it.'
			
			! normal/or-better mood OR likes Sveta
			if nd_mood <= 3 or nd_rel > 80:
				'Before doing so, he takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated.'
				'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
			else
				'Without much care about your feelings he thrusts his <<ndDick>> cm long thick dick through your sphincter.'
				'<font color=#<<$pcs_font>>>"Ouuuch! <<$nd_name>>, that hurt!"</font>'
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, don''t be like a small child, you can take it."</font>'
				gs 'pain', 1, 'asshole', 'tear'
			end
			'<<$nd_name>> begins to move inside you, ever increasing the pace.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'anal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckAnal5.mp4"></video></left>'
			''
			'As he continuously fucks your anus, you reach to rub his hairy ass, making him even hornier.'
			'<<$nd_name>> now rams you as deep as he can, all his <<ndDick>> centimeters are inside you.'
			gs 'arousal', 'anal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexAnal'
		end

	!behind
	elseif step = 2:
		if subStep = 0:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/analDoggy1.mp4"></video></left>'
			''
			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
			'<<$nd_name>> kneels behind you, rubbing your asscheeks. He starts probing your anus with his lubed fingers, penetrating in and out, playing with the nice round sphincter..'
			! normal/or-better mood OR likes Sveta
			if nd_mood <= 3 or nd_rel > 80:
				'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated.'
				'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
			else
				'Without much care about your feelings he thrusts his <<ndDick>> cm long thick dick through your sphincter.'
				'<font color=#<<$pcs_font>>>"Ouuuch! <<$nd_name>>, that hurt!"</font>'
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, don''t be like a small child, you can take it."</font>'
				gs 'pain', 1, 'asshole', 'tear'
			end
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'anal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20)
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analDoggy2.mp4"></video></left>'
			''
			'As he continuously fucks your anus, you reach for his hairy balls bashing your empty pussy from behind and rub it, making his fuck fury even more intensive.'
			'<<$nd_name>> now rams you as deep and as fast he can, the every one of his <<ndDick>> centimeters are inside you with every stroke.'
			gs 'arousal', 'anal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexAnal'
		end

	!sidefuck
	elseif step = 3:
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analSidefuck1.jpg"></left>'
			''
			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
			'He takes this as a invitation, lying behind you.'
			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
			! normal/or-better mood OR likes Sveta
			if nd_mood <= 3 or nd_rel > 80:
				'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated later.'
				'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
			else
				'Without much care about your feelings he thrusts his <<ndDick>> cm long thick dick through your sphincter.'
				'<font color=#<<$pcs_font>>>"Ouuuch! <<$nd_name>>, that hurt!"</font>'
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, don''t be like a small child, you can take it."</font>'
				gs 'pain', 1, 'asshole', 'tear'
			end
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'anal', 10, 'lube'
			gs 'stat'
			orgB += rand(5, 20) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analSidefuck2.mp4"></video></left>'
			''
			'As he continuously fucks your anus, you reach for his hairy balls between your legs, rubbing it and making him groan even more..'
			'<<$nd_name>> now rams you as deep and he can and giving the position and the entire (<<ndDick>> cm) size of his dick, the continuous banging hurts a little.'
			gs 'pain', 1, 'anal', 'stretch'
			gs 'arousal', 'anal', 10
			gs 'stat'
			orgB += rand(20, 40) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexAnal'
		end

	!full nelson
	elseif step = 4:
		if nd_pornPos < 1:nd_pornPos = 1
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analFullnelson1.jpg"></left>'
			''
			'You let him sit on the edge of the bed, having his dick prepared for your anus.'
			'Facing him with your back, you climb on top of him and slowly burry his <<ndDick>> cm long dick in your anus, making it as comfortable as possible.'
			'When you feel it is good enough, you tell him he can begin.'
			'With his somehow weak, but for this purpose strong enough hands he lifts both your knees in the air, making you impale on his cock even deeper.'
			'Then he grabs your head with both hands, pushing it forwards almost down to your stomach.'
			'In this position you literally see every stroke of his penis into your anus, hidden bellow your empty pussy.. But there is nothing else you can do.'
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'anal', 10, 'lube'
			gs 'stat'
			orgB += rand(20, 40) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreFuckAnal3.mp4"></video></left>'
			''
			'As he continuously fucks your pussy, you can do nothing but watch the penis moving in and out of you and his balls banging your empty pussy.'
			'<<$nd_name>> rams you as deep as he can.'
			gs 'arousal', 'anal', 10
			gs 'stat'
			orgB += rand(30, 50) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexAnal'
		end

	!pile driver
	elseif step = 5:
		if nd_pornPos < 2:nd_pornPos = 2
		if subStep = 0:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analPiledriver1.jpg"></left>'
			''
			'You take a pillow from his bed, putting on the floor and lying on it with your back.'
			'As if you were doing yoga, you put your ass in the hands and lift it above your head, letting the feet fall down aside your head.'
			'<<$nd_name>> now has the very best access to your anus.'
			! normal/or-better mood OR likes Sveta
			if nd_mood <= 3 or nd_rel > 80:
				'He takes some more lube on his fingers and one by one he sretches your anus with them. Making it easier for you to be penetrated later.'
				'He starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
			else
				'Without much care about your feelings he thrusts his <<ndDick>> cm long thick dick through your sphincter.'
				'<font color=#<<$pcs_font>>>"Ouuuch! <<$nd_name>>, that hurt!"</font>'
				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, don''t be like a small child, you can take it."</font>'
				gs 'pain', 1, 'asshole', 'tear'
			end
			'In a few moments he starts groaning, obviously enjoying the fuck.'
			gs 'arousal', 'anal', 10, 'lube'
			gs 'stat'
			orgB += rand(20, 40) 
			act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analPiledriver2.mp4"></video></left>'
			''
			'As he continuously fucks your anus, you can do nothing but watch his penis and hairy crotch bang you down like a hammer.'
			'He uses the position and the fact that your pussy is empty in his advantage and while fucking your anus he sticks some of his fingers inside your pussy.'
			'<<$nd_name>> rams you as deep as he can.'
			gs 'arousal', 'anal', 10
			gs 'stat'
			orgB += rand(30, 50) 
			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pavShared_nd', 'ndSexAnal'
		end

	!where to cum
	elseif step = 10:
		if subStep = 0:
			minut += 2
			'<<$nd_name>> is groaning loudly, you can say that he is reaching his orgasm.'
			'You decide to tell him:'
			nd_served = 1
			nd_anal += 1
			act 'Cum inside me':subStep = 1 & gt 'pavShared_nd', 'ndSexAnal'
			cumOutL = rand(2, 6)
			act 'Don''t cum inside me':subStep = cumOutL & gt 'pavShared_nd', 'ndSexAnal'

		!inside
		elseif subStep = 1:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/cumAnal4.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end, pumping his load <<ndDick>> cm deep inside your anus.'
			nd_analCumInside += 1
			nd_lastCum = daystart
			nd_cumAnal += nd_cumVol
			gs 'cum_call', 'anus', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'anal', 2
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!stomach
		elseif subStep = 2:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/cumBelly2.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
			'An extensive pool of cum lands on your abdomen, feeling warm but sticky.'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'stomach', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!ass
		elseif subStep = 3:
			'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumOnAss.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he takes his dick out and points it on your ass.'
			'Both your asscheeks are covered in sticky, warm seed.'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'butt', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!face
		elseif subStep = 4:
			'<left><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees and and points his tip in front of your face.'
			'The seed starts squirting, splashing your face with surprisingly strong force, leaking to your nose and eyes and hair..'
			minut += 2
			nd_lastCum = daystart
			gs 'cum_call', 'face', $nd_name, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!takeout fail
		elseif subStep = 5:
			'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagCumTakoutFail.jpg"></left>'
			''
			'You expect <<$nd_name>> to take his cock out of you any moment, but instead you hear his groans becoming louder.'
			'<font color=#<<$pcs_font>>>"What are you doing? You aren''t coming inside me, are you?"</font>'
			'<font color=#<<$nd_font>>>"Sorry <<$pcs_firstname>>, I could''nt help myself."</font>'
			'<font color=#<<$pcs_font>>>"I told you not to! I hate it when it slowly leaks out of my anus for hours!"</font>'
			'<font color=#<<$nd_font>>>"Oh jeez you are a girl, get used to it! We''re done here."</font>'
			'He is obvously annoyed by your reaction.'
			nd_analCumInsideUnwanted += 1
			nd_lastCum = daystart
			nd_cumAnal += nd_cumVol
			nd_rel -= 5
			'You furiously get up from the bed, putting your clothes between your legs to catch the remainder of the cum, so it doesn''t spur on your legs and carpet.'
			gs 'cum_call', 'anus', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'anal', 5, 'sub'
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'


		!will you swallow?
		elseif subStep = 6:
			'<font color=#<<$nd_font>>>"If I won''t cum inside you, will you swallow?"</font>'
			act 'Yes':subStep = 20 & gt 'pavShared_nd', 'ndSexAnal'
			act 'No':subStep = 30 & gt 'pavShared_nd', 'ndSexAnal'

		!swallow YES
		elseif subStep = 20:
			'<left><video autoplay loop src="images/locations/city/residential/sauna/sex/cumMouth3.mp4"></video></left>'
			''
			'<<$nd_name>> finally reaches the end and in the moment he is about the come, you get on your knees and open your mouth for his delivery.'
			'The seed starts squirting, landing in your mouth and some even around it.'
			'<<$nd_name>> spins the last of his cum dry from his cock, you close your mouth, swallowing the mouthful in one gulp.'
			'Afterwards you show him your tongue as a proof that not a drop was left unconsumed..' 		
			nd_swall += 1	
			nd_rel += 1
			minut += 5
			nd_lastCum = daystart
			nd_cumSwall += nd_cumVol
			gs 'cum_call', 'mouth', $boy, 1, 0, nd_cumVol
			gs 'arousal', 'end'
			gs 'stat'
			act 'Leave':nd_cumVol = 0 & gt 'pavSharedApt', 'payService'

		!swallow NO
		elseif subStep = 30:
			'<font color=#<<$nd_font>>>"Allright I''ll cum elsewhere.."</font>'
			nd_rel -= 3
			cumOutL2 = rand(2, 5)
			act 'Continue':subStep = cumOutL2 & gt 'pavShared_nd', 'ndSexAnal'
		end
	end
end

if $ARGS[0] = 'ndSexPiss':
	'<b><font color=#<<$nd_font>>><<$nd_name>> - Golden Shower</font></b>'
	if step = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></left>'
	if step > 0 and cockHard = 0:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockFlaccid.jpg"></left>'
	if step > 0 and cockHard = 1:'<left><img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/cockErect.jpg"></left>'
	''
	$metka = 'ndSexPiss'
	price = price_special

	!strip down
	if step = 0:
		minut += 5
		orgB = 0
		cockHard = 0
		failC = 0
		$clothingworntype = 'nude'
		'<left><video autoplay loop src="images/shared/sex/undress/kotovpre11.mp4"></video></left>'
		''
		'<<$nd_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
		'His hairy, rickety body shines with the very pale skin. He moves towards you, stroking his <<ndDick>> cm long cock and on the way.'
		if $pantyworntype ! 'none':
			gs 'panties', 'remove'
			gs 'stat'
			'<font color=#<<$nd_font>>>"Hey, <<$pcs_firstname>>, what about the panties?"</font>'
			'You entirely forgot to take them off! Or maybe you didn''t want to actually?'
			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
		end
		'<<$nd_name>> takes you by the waist, kissing you.'
		
		! first time ?
		if nd_piss = 0:
			'<font color=#<<$nd_font>>>"Are you sure about this <<$pcs_firstname>>?"</font>'
			'<font color=#<<$pcs_font>>>"Yes. I''ll do it for you."</font>'
		end
		act 'Continue':step = 10 & gt 'pavShared_nd', 'ndSexPiss'
	
	! foreplay
	elseif step = 10:
		gs 'arousal', 'foreplay', 5
		'<left><video autoplay loop src="images/shared/sex/kiss/kotovpre10.mp4"></video></left>'
		''
		'You feel somehow awkward as <<$nd_name>> starts spreading a plastic sheet on the bed and around it.'
		'When he''s done, he signals you to join him on his newly decorated bedsheets.'
		'You start kissing and caressing, his cock is slowly getting hard as you stroke it.'
		act 'Continue':step = 20 & gt 'pavShared_nd', 'ndSexPiss'

	! suck
	elseif step = 20:
		gs 'arousal', 'bj', 3
		cockHard = 1
		'<left><video autoplay loop src="images/shared/sex/blowjob/kotovbj120.mp4"></video></left>'
		''
		'You take over the initiative and move to suck his <<ndDick>> cm long, now fully hard dick.'
		'<<$nd_name>> is getting unusually aroused, probably by imagining that his secret dream is to come true.'
		act 'Continue':step = 30 & gt 'pavShared_nd', 'ndSexPiss'

	! vaginal
	elseif step = 30:
		gs 'arousal', 'vaginal', 5
		'<left><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsexbonus17.mp4"></video></left>'
		''
		'<<$nd_name>> signals you that he wants to move to a next step and starts stroking his fingers into your already moist pussy.'
		'He enters you quite easily and enjoys the fuck for some time.'
		act 'Continue':step = 40 & gt 'pavShared_nd', 'ndSexPiss'

	! anal
	elseif step = 40:
		gs 'arousal', 'anal', 5
		'<left><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal30.mp4"></video></left>'
		''
		'As you move to a doggy position, he starts caressing your anus.'
		'You expect that he will want to fuck it soon, and your hunch proves true shortly.'
		'He uses a bit of lube, probing your sphincter with his tip for a while before slowly penetrating it.'
		'The anal fuck does not seem as pleaseruble to <<$nd_name>> as usually - he seems to suffer a bit because of his full bladder!'
		act 'Continue':step = 50 & gt 'pavShared_nd', 'ndSexPiss'

	! piss mouth
	elseif step = 50:
		gs 'arousal', 'bj', 2, 'humiliation'
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedApt/sex/nd/pissMouth.mp4"></video></left>'
		''
		'<font color=#<<$nd_font>>>"It''s time <<$pcs_firstname>>!"</font>'
		'With these words he takes his cock out of your ass and pushes you onto your knees beside the plastic covered bed.'
		'<font color=#<<$nd_font>>>"Oh my god <<$pcs_firstname>>, it''s coming! Brace for impact Mr Spock!"</font>'
		'As instructed you open your mouth, eyeing the tip of his cock, expecting the flow to start.'
		'<font color=#<<$nd_font>>>"Aaaaaahh!"</font>'
		'<<$nd_name>> let''s out a heavy sigh as the piss starts flowing. A warm, slightly smelly stream of golden piss lands first on your face as his aim is not entirely accurate.'
		'You close your eyes in a reflex, but as your mouth is still open, he moves his aim and fills your wide open mouth to the edge of it.'
		'<font color=#<<$nd_font>>>"Now drink it!"</font>'
		'It doesn''t even sound as if the shy <<$nd_name>> told it, as the order is very strict and uncompromising.'
		'You open your eyes, still covered in piss, and gulp the contents in your mouth.'
		'<font color=#<<$nd_font>>>"Good girl! There is still enough for your other holes, move around!"</font>'
		act 'Present your pussy':step = 60 & gt 'pavShared_nd', 'ndSexPiss'

	! piss vaginal
	elseif step = 60:
		gs 'arousal', 'vaginal', 2, 'humiliation'
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedApt/sex/nd/pissPussy.mp4"></video></left>'
		''
		'<font color=#<<$nd_font>>>"You thought your pussy is just for cum, did you <<$pcs_firstname>>?!"</font>'
		'<font color=#<<$pcs_font>>>"Something like that, yes.."</font>'
		'<font color=#<<$nd_font>>>"well, today it isn''t! Spread those lips for me!"</font>'
		'His tone is again very strict and you feel as if you even don''t have choice anymore, spreading your pussy lips with hands, making the pussy gape a bit.'
		'<<$nd_name>> uses this gape and starts pissing into it, filling you with very warm liquid.'
		'<font color=#<<$nd_font>>>"Oh yeah! Take it like a good piss slut!"</font>'
		'<font color=#<<$pcs_font>>>"Not too much, please!"</font>'
		'He hesitantly stops the stream, but still leaving your pussy filled to the egdge of it.'
		'<font color=#<<$nd_font>>>"Now it''s time for the last delivery! Show me your assgape!"</font>'
		act 'Present your ass':step = 70 & gt 'pavShared_nd', 'ndSexPiss'

	! piss anal
	elseif step = 70:
		gs 'arousal', 'anal', 3, 'humiliation'
		'<left><video autoplay loop src="images/locations/pavlovsk/resident/sharedApt/sex/nd/pissAnus.mp4"></video></left>'
		''
		'You arch your back, pointing your anss high as possible, spreading your asscheeks with hands and giving him the best access to your gaping anus.'
		'<font color=#<<$nd_font>>>"There is still at least a liter in there <<$pcs_firstname>> and it''s all going into your backdoor!"</font>'
		'<font color=#<<$pcs_font>>>"<i>Oh no..</i>"</font>'
		'He thrusts his cock into your anus and shortly a warm feeling starts filling your belly, slowly expanding upwards to your stomach.'
		'<<$nd_name>> doesn''t stop pissing as he removes his cock out of your anus and penetrates it again, several times around.'
		'He finishes pissing into your filled anus from afar, showering the whole of your asscheeks and back.'
		act 'Present your ass':step = 80 & gt 'pavShared_nd', 'ndSexPiss'

	! cum
	elseif step = 80:
		nd_rel += 3
		nd_lastCum = daystart
		nd_cumSwall += nd_cumVol
		
		gs 'arousal', 'anal', 2, 'humiliation'
		gs 'cum_call', 'anus', $boy, 1, 0, nd_cumVol
		'<left><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/analcum.jpg"></left>'
		''
		'<font color=#<<$nd_font>>>"The first delivery was made, now to the second one! Engage!"</font>'
		'In your attempt to get up from the wet, plastic sheets he pushes you back, making you stay in the same doggystyle position as he furiously masturbates his cock.'
		'it doesn''t take long before he finally ejaculates, cumming on your asscheeks before he thrust the tip into your piss-filled anus with loud sigh.'
		'<font color=#<<$nd_font>>>"AAAHHHHH!"</font>'
		act 'Continue':nd_cumVol = 0 & step = 90 & gt 'pavShared_nd', 'ndSexPiss'

	! end
	elseif step = 90:
		'<left><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pissSoaked.jpg"></left>'
		''
		'You lie on the plastic covered bed, hair wet from <<$nd_name>>''s piss, your face sticky with the same. Your pussy still leaking some of the yellow liquid and your anus leaking a mixture of piss and cum.'
		'<<$nd_name>> get''s up, cleaning his hands with a towel, looking down at you lying there, breathing.'

		! first time ?
		if nd_piss = 0:
			'<font color=#<<$nd_font>>>"Are you allright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'		
			'<font color=#<<$pcs_font>>>"I..I''m OK. I think."</font>'
			'<font color=#<<$nd_font>>>"So how was it <<$pcs_firstname>>?"</font>'
			act 'The worst experience ever! Never speak of it again!':pissLike = -1 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
			act 'I feel humiliated, please never make me do it again.':pissLike = 0 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
			act 'It wasn''t so bad, but it doesn''t really arouse me though.!':pissLike = 1 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
			act 'I didn''t tought I will, but I liked it!':pissLike = 2 & step = 100 & gt 'pavShared_nd', 'ndSexPiss'
		else
			'<font color=#<<$nd_font>>>"Are you allright <<$pcs_firstname>>? I hope I wasn''t too harsh on you. I was so aroused and drawn into it that I almost lost control over myself."</font>'
			act 'I''m fine':step = 110 & gt 'pavShared_nd', 'ndSexPiss'
		end

	! like or not; only first time dialogue
	elseif step = 100:
		if pissLike = -1:
			'<font color=#<<$nd_font>>>"Please don''t be mad at me <<$pcs_firstname>>, you were the one who initiated this, I just told you about it. I didn''t force you or anything."</font>'
			'<font color=#<<$pcs_font>>>"One more word and I will not just piss, but also shit on you!"</font>'
			'<font color=#<<$nd_font>>><i>(gulp)</i></font>'
			act 'Leave':nd_piss = -3 & step = 110 & gt 'pavShared_nd', 'ndSexPiss'
		elseif pissLike = 0:
			'<font color=#<<$nd_font>>>"I am sorry <<$pcs_firstname>>, I never meant to humiliate you or anything. I guess this was both first time and last time, was it?"</font>'
			act 'Definitely!':nd_piss = -2 & step = 110 & gt 'pavShared_nd', 'ndSexPiss'
		elseif pissLike = 1:
			'<font color=#<<$nd_font>>>"Does that mean that you will be willing to do it sometime again?"</font>'
			act 'Yes':nd_piss = 1 & step = 110 & gt 'pavSharedApt', 'payService'
			act 'Rather not':nd_piss = -1 & step = 110 & gt 'pavShared_nd', 'ndSexPiss'
		elseif pissLike = 2:
			'<font color=#<<$nd_font>>>"Awesome! And I thought I am the only one who likes this kinda stuff!"</font>'
			'<font color=#<<$pcs_font>>>"Yup, who would say that."</font>'
			'<font color=#<<$nd_font>>>"You are such a cool girl <<$pcs_firstname>>!"</font>'
			act 'Yes':nd_piss = 1 & step = 110 & gt 'pavShared_nd', 'ndSexPiss'
		end
	
	! paygate
	elseif step = 110:
		gs 'arousal', 'end'
		gs 'stat'
		nd_piss += 1
		step = 0
		gt 'pavSharedApt', 'payService'
	end
end

--- pavShared_nd ---------------------------------