Browse Source

[Fixed] & [changed] alot at the shared apartment in Pavlovsk

Awesome 6 months ago
parent
commit
dea200695c

+ 3 - 3
glife.qproj

@@ -661,9 +661,9 @@
 	</Folder>
 	<Folder name="Home-Shared_appartment">
 		<Location name="pav_shared_apt"/>
-		<Location name="pav_shared_gp"/>
-		<Location name="pav_shared_nd"/>
-		<Location name="pav_shared_sp"/>
+		<Location name="pav_shared_nestor"/>
+		<Location name="pav_shared_oleg"/>
+		<Location name="pav_shared_yakov"/>
 	</Folder>
 	<Folder name="Community center">
 		<Location name="pav_commcenter"/>

+ 59 - 0
locations/npcstatic6.qsrc

@@ -343,6 +343,65 @@ npc_haircol['A<<npctemp>>'] = 0
 $npc_occupation['A<<npctemp>>'] = 'Exhibitionist Store Owner'
 
 
+
+
+npctemp = 264
+$npc_dna['A<<npctemp>>'] = '1290130369 1043654233 5049908515 3153411713 0721993774 2486220839 0288719745'
+$npc_firstname['A<<npctemp>>'] = 'Yakov'
+$npc_nickname['A<<npctemp>>'] = 'Yakov'
+$npc_lastname['A<<npctemp>>'] = ''
+$npc_usedname['A<<npctemp>>'] = 'Yakov'
+npc_dob['A<<npctemp>>'] = 19961215
+$npc_notes['A<<npctemp>>'] = 'Yakov is a fitness-focused sports enthusiast with blond hair and a tanned complexion.'
+npc_gender['A<<npctemp>>'] = 0
+
+gs 'npcstaticdefaults', 'defaults'
+
+$npc_thdick['A<<npctemp>>'] = 'well proportioned'
+npc_dick['A<<npctemp>>'] = 14
+npc_sexskill['A<<npctemp>>'] = 1
+$npc_occupation['A<<npctemp>>'] = 'personal_trainer'
+npc_style['A<<npctemp>>'] = 5
+
+
+npctemp = 265
+$npc_dna['A<<npctemp>>'] = '1085950303 4348731991 6618084127 9067996922 8669859044 9431283301 0673267503'
+$npc_firstname['A<<npctemp>>'] = 'Nestor'
+$npc_nickname['A<<npctemp>>'] = 'Nestor'
+$npc_lastname['A<<npctemp>>'] = ''
+$npc_usedname['A<<npctemp>>'] = 'Nestor'
+npc_dob['A<<npctemp>>'] = 19930127
+$npc_notes['A<<npctemp>>'] = 'Nestor is a gopnik with a reputation for being rude and aggressive. His motto seems to be "the younger, the better," which can be concerning. He has a tough demeanor, with dark hair and dark skin, giving off an intimidating presence.'
+npc_gender['A<<npctemp>>'] = 0
+
+gs 'npcstaticdefaults', 'defaults'
+
+$npc_thdick['A<<npctemp>>'] = 'massive'
+npc_dick['A<<npctemp>>'] = 22
+npc_sexskill['A<<npctemp>>'] = 1
+npc_style['A<<npctemp>>'] = 2
+
+
+
+npctemp = 266
+$npc_dna['A<<npctemp>>'] = '5654106058 6395942483 3363408422 7113656738 1111862818 8859290040 7960339191'
+$npc_firstname['A<<npctemp>>'] = 'Oleg'
+$npc_nickname['A<<npctemp>>'] = 'Oleg'
+$npc_lastname['A<<npctemp>>'] = ''
+$npc_usedname['A<<npctemp>>'] = 'Oleg'
+npc_dob['A<<npctemp>>'] = 19950712
+$npc_notes['A<<npctemp>>'] = 'Oleg is a shy, young-looking guy with thick glasses, a slim frame, and very pale skin.'
+npc_gender['A<<npctemp>>'] = 0
+
+gs 'npcstaticdefaults', 'defaults'
+
+$npc_thdick['A<<npctemp>>'] = 'thick'
+npc_dick['A<<npctemp>>'] = 17
+npc_sexskill['A<<npctemp>>'] = 1
+$npc_occupation['A<<npctemp>>'] = 'programmer'
+npc_style['A<<npctemp>>'] = 3
+
+
 !! {Keep this at the end of file of the npcstatics.}
 aarraynumber = npctemp
 

+ 198 - 264
locations/pav_shared_apt.qsrc

@@ -28,98 +28,37 @@ if $ARGS[0] = 'update':
 	! servitudeLvl = 1 - nonsexual service
 	! servitudeLvl = 2 - sexual and nonsexual service
 
-	! nerd guy
-	! shy, polite, but latent kink (giving golden shower, etc.)
-	! brown hair, hairy, pale skin
-	! average dick, hairy balls
-	! not paying attention to his own image and looks, wears glasses
-	$nd_name = 'Oleg'
-	$nd_font = '0096FF'
+
+	$oleg_font = '0096FF'
 		!blue
-	nd_leaves = 9
-	nd_comes = 18
-	nd_sleeps = 23
-	nd_wakes = 8
-	if nd_rel > 100: nd_rel = 100
-	if nd_rel < 0: nd_rel = 0
-	ndDick = 17
-	nd_cumMax = 80
-	nd_cumMin = 15
-	if nd_cumVol > nd_cumMax:nd_cumVol = nd_cumMax
-	if nd_cumVol < nd_cumMin:nd_cumVol = nd_cumMin
-	nd_horny = (nd_cumVol * 10000 / nd_cumMax) / 100
-
-	if nd_served = 1:nd_hadSex = 1
-		!flag if there was already a sex between him and Sveta
-		!sex flags: nd_bj ; nd_bjDeep ; nd_swall ; nd_vag ; nd_vagCumInside ; nd_vagCumInsideUnwanted ; nd_anal ; nd_analCumInside ; nd_analCumInsideUnwanted
-		!unlocked sex: nd_doAnal ; nd_doPornpos
-		!nd_cleaned = 1 - if was cleaned this day already
-
-	! gopnik guy
-	! rude, the younger the better, aggresive, hard
-	! dark hair, dark skin
-	! above average dick, somehow maintained hairs; event: he will take some enlarging pills testing his monster cock on Sveta
-	$gp_name = 'Nestor'
-	$gp_font = 'CC0000'
+	oleg_leaves = 9
+	oleg_comes = 18
+	oleg_sleeps = 23
+	oleg_wakes = 8
+
+
+	$nestor_font = 'CC0000'
 		!red
-	gp_leaves = 11
-	gp_comes = 19
-	gp_sleeps = 23
-	gp_wakes = 9
-	if gp_rel > 100: gp_rel = 100
-	if gp_rel < 0: gp_rel = 0
-	gpDick = 22
-	gp_cumMax = 100
-	gp_cumMin = 30
-	if gp_cumVol > gp_cumMax:gp_cumVol = gp_cumMax
-	if gp_cumVol < gp_cumMin:gp_cumVol = gp_cumMin
-	gp_horny = (gp_cumVol * 10000 / gp_cumMax) / 100
-	if gp_served = 1:gp_hadSex = 1
-		!flag if there was already a sex between him and Sveta
-		!gp_bj ; gp_bjDeep ; gp_swall ; gp_vag ; gp_vagCumInside ; gp_vagCumInsideUnwanted ; gp_anal ; gp_analCumInside ; gp_analCumInsideUnwanted
-		!unlocked sex: gp_doAnal ; gp_doPornpos ; gp_doVacuum
-
-	! sportsman guy
-	! blond hair, tanned
-	! latent gay, muscular and athletic, secret fantasies of being used by femboy (or at least a girl with strapon)
-	! bellow average dick, shaved
-	$sp_name = 'Yakov'
-	$sp_font = '009900'
+	nestor_leaves = 11
+	nestor_comes = 19
+	nestor_sleeps = 23
+	nestor_wakes = 9
+
+
+	$yakov_font = '009900'
 		!green
-	sp_leaves = 7
-	sp_comes = 16
-	sp_sleeps = 22
-	sp_wakes = 5
-	if sp_rel > 100: sp_rel = 100
-	if sp_rel < 0: sp_rel = 0
-	spDick = 14
-	sp_cumMax = 60
-	sp_cumMin = 10
-	sp_horny = (sp_cumVol * 10000 / sp_cumMax) / 100
-	if sp_cumVol > sp_cumMax:sp_cumVol = sp_cumMax
-	if sp_cumVol < sp_cumMin:sp_cumVol = sp_cumMin
-	if sp_served = 1:sp_hadSex = 1
+	yakov_leaves = 7
+	yakov_comes = 16
+	yakov_sleeps = 22
+	yakov_wakes = 5
 		!flag if there was already a sex between him and Sveta
-		!sp_bj ; sp_bjDeep ; sp_swall ; sp_vag ; sp_vagCumInside ; sp_vagCumInsideUnwanted ; sp_anal ; sp_analCumInside ; sp_analCumInsideUnwanted
+		!yakov_bj ; yakov_bjDeep ; yakov_swall ; yakov_vag ; yakov_vagCumInside ; yakov_vagCumInsideUnwanted ; yakov_anal ; yakov_analCumInside ; yakov_analCumInsideUnwanted
 
 	!mood setup
-	if nd_mood = 1:$nd_mood = 'great'
-	if nd_mood = 2:$nd_mood = 'good'
-	if nd_mood = 3:$nd_mood = 'normal'
-	if nd_mood = 4:$nd_mood = 'bad'
-	if nd_mood = 5:$nd_mood = 'terrible'
-
-	if gp_mood = 1:$gp_mood = 'great'
-	if gp_mood = 2:$gp_mood = 'good'
-	if gp_mood = 3:$gp_mood = 'normal'
-	if gp_mood = 4:$gp_mood = 'bad'
-	if gp_mood = 5:$gp_mood = 'terrible'
-
-	if sp_mood = 1:$sp_mood = 'great'
-	if sp_mood = 2:$sp_mood = 'good'
-	if sp_mood = 3:$sp_mood = 'normal'
-	if sp_mood = 4:$sp_mood = 'bad'
-	if sp_mood = 5:$sp_mood = 'terrible'
+	$oleg_mood = iif(oleg_mood = 1, 'great', '') + iif(oleg_mood = 2, 'good', '') + iif(oleg_mood = 3, 'nice', '') + iif(oleg_mood = 4, 'fine', '') + iif(oleg_mood = 5, 'neutral', '') + iif(oleg_mood = 6, 'okay', '') + iif(oleg_mood = 7, 'bad', '') + iif(oleg_mood = 8, 'terrible', '') + iif(oleg_mood = 9, 'awful', '') + iif(oleg_mood = 10, 'horrible', '')
+	$nestor_mood = iif(nestor_mood = 1, 'great', '') + iif(nestor_mood = 2, 'good', '') + iif(nestor_mood = 3, 'nice', '') + iif(nestor_mood = 4, 'fine', '') + iif(nestor_mood = 5, 'neutral', '') + iif(nestor_mood = 6, 'okay', '') + iif(nestor_mood = 7, 'bad', '') + iif(nestor_mood = 8, 'terrible', '') + iif(nestor_mood = 9, 'awful', '') + iif(nestor_mood = 10, 'horrible', '')
+	$yakov_mood = iif(yakov_mood = 1, 'great', '') + iif(yakov_mood = 2, 'good', '') + iif(yakov_mood = 3, 'nice', '') + iif(yakov_mood = 4, 'fine', '') + iif(yakov_mood = 5, 'neutral', '') + iif(yakov_mood = 6, 'okay', '') + iif(yakov_mood = 7, 'bad', '') + iif(yakov_mood = 8, 'terrible', '') + iif(yakov_mood = 9, 'awful', '') + iif(yakov_mood = 10, 'horrible', '')
+	
 
 	gs 'stat'
 
@@ -129,9 +68,9 @@ if $ARGS[0] = 'update':
 	elseif pavSharedAptDebug = 2:
 		'<a href="exec:pavSharedAptDebug=1">Debug Close</a>'
 		'<a href="exec:pavSharedAptDebug=0">Debug Disable</a>'
-		$nd_name+' relation: '+nd_rel
-		$gp_name+' relation: '+gp_rel
-		$sp_name+' relation: '+sp_rel
+		$npc_firstname['A266']+' relation: '+npc_rel['A266']
+		$npc_firstname['A265']+' relation: '+npc_rel['A265']
+		$npc_firstname['A264']+' relation: '+npc_rel['A264']
 		'rentLeft: '+rentLeft
 		'weekNum: '+weekNum
 		'rentWeekNum: '+rentWeekNum
@@ -140,23 +79,20 @@ if $ARGS[0] = 'update':
 		'cashPaid: '+cashPaid
 		'step: '+step
 		'subStep: '+subStep
-		'gp_mood: '+gp_mood
-		'gp_cumVol: '+gp_cumVol
-		'gp_cumVag: '+gp_cumVag
-		'gp_cumAnal: '+gp_cumAnal
-		'gp_cumSwall: '+gp_cumSwall
-		'nd_cumVol: '+nd_cumVol
-		'nd_cumMax: '+nd_cumMax
-		'nd_horny: '+nd_horny
-		'gp_horny: '+gp_horny
-		'sp_horny: '+sp_horny
+		'nestor_mood: '+nestor_mood
+		'oleg_mood: '+oleg_mood
+		'yakov_mood: '+yakov_mood
+		'nestor_cumVag: '+nestor_cumVag
+		'nestor_cumAnal: '+nestor_cumAnal
+		'nestor_cumSwall: '+nestor_cumSwall
+
 		''
-		nd_served = 0
-		nd_mood = 2
-		gp_served = 0
-		gp_mood = 2
-		sp_mood = 2
-		sp_served = 0
+		oleg_served = daystart
+		oleg_mood = 2
+		nestor_served = daystart
+		nestor_mood = 2
+		yakov_mood = 2
+		yakov_served = daystart
 	end
 end
 
@@ -169,7 +105,7 @@ if $ARGS[0] = 'advertNo30':
 	seenAd = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/pod_ob'+rand(1,2)+'.jpg"></center>'
-	'<br>As you pass by the advertisments, you notice a sign - "сдаeтся в аренду комната" (Room for rent!). Some guys are looking for a roommate. They live in an apartment in of the other buildings in the apartment complex.'
+	'<br>As you pass by the advertisements, you notice a sign - "сдаeтся в аренду комната" (Room for rent!). Some guys are looking for a roommate. They live in an apartment in one of the other buildings in the apartment complex.'
 	act 'Continue':gt 'pod_ezd','etaj_1'
 end
 
@@ -215,20 +151,14 @@ if $ARGS[0] = 'start':
 	if daystart >= tomorrow:
 		tomorrow = daystart + 1
 
-		nd_mood = rand (1, 5)
-		nd_served = 0
-		nd_cleaned = 0
-		nd_cumVol += rand(15, 30)
+		oleg_mood = rand(1, 10)
+		oleg_cleaned = 0
 
-		gp_mood = rand (1, 5)
-		gp_served = 0
-		gp_cleaned = 0
-		gp_cumVol = rand(20, 40)
+		nestor_mood = rand(1, 10)
+		nestor_cleaned = 0
 
-		sp_mood = rand (1, 5)
-		sp_served = 0
-		sp_cleaned = 0
-		sp_cumVol += rand(5, 20)
+		yakov_mood = rand(1, 10)
+		yakov_cleaned = 0
 	end
 
 	! do this every time
@@ -287,24 +217,24 @@ if $ARGS[0] = 'start':
 	end
 	
 	if rentPaid = 1:
-		'A large apartment currently serves as shared living. As well as the normal living spaces, there are four bedrooms, one rented by you and three occupied by <a href="exec: gt ''pav_shared_nd'', ''ndDick''"><font color=#<<$nd_font>>><<$nd_name>></font></a>, <a href="exec: gt ''pav_shared_gp'', ''gpDick''"><font color=#<<$gp_font>>><<$gp_name>></font></a>, <a href="exec: gt ''pav_shared_sp'', ''spDick''"><font color=#<<$sp_font>>><<$sp_name>></font></a>.'
-		'You stand in the hallway. '
+		'A large apartment currently serves as shared living. As well as the normal living spaces, there are four bedrooms, one rented by you and three occupied by <a href="exec: gt ''pav_shared_oleg'', ''oleg_dick''"><font color=#<<$oleg_font>>><<$npc_firstname[''A266'']>></font></a>, <a href="exec: gt ''pav_shared_nestor'', ''nestor_Dick''"><font color=#<<$nestor_font>>><<$npc_firstname[''A265'']>></font></a>, <a href="exec: gt ''pav_shared_yakov'', ''yakov_Dick''"><font color=#<<$yakov_font>>><<$npc_firstname[''A264'']>></font></a>.'
+		'You stand in the hallway.'
 		*nl
-		'From the hallway several doors lead to <a href="exec:gt ''pav_shared_apt'', ''ndRoom''"><<$nd_name>>''s</a>, <a href="exec:gt ''pav_shared_apt'', ''gpRoom''"><<$gp_name>>''s</a> and <a href="exec:gt ''pav_shared_apt'', ''spRoom''"><<$sp_name>>''s</a> rooms.'
+		'From the hallway, several doors lead to <a href="exec:gt ''pav_shared_apt'', ''oleg_Room''"><<$npc_firstname[''A266'']>>''s</a>, <a href="exec:gt ''pav_shared_apt'', ''nestor_Room''"><<$npc_firstname[''A265'']>>''s</a>, and <a href="exec:gt ''pav_shared_apt'', ''yakov_Room''"><<$npc_firstname[''A264'']>>''s</a> rooms.'
 		'The last doors lead to the <a href="exec:gt ''pav_shared_apt'', ''pcsRoom''">room</a> you have rented.'
 		*nl
-		!! Wardrobe is here, because Sveta''s bedroom is actually the unused living room, with no wardrobe, so she is using the hall cupboard.
-		'There are no cupboards in your livingroom cum bedroom, but there are several hall <a href="exec:gt ''wardrobe'', ''start''">closets</a>, that you can use to store your clothes</a>, with a large tall <a href="exec:gt ''mirror'', ''start''">mirror</a> attached.'
+		!! Wardrobe is here because Sveta''s bedroom is actually the unused living room, with no wardrobe, so she is using the hall cupboard.
+		'There are no cupboards in your living room cum bedroom, but there are several hall <a href="exec:gt ''wardrobe'', ''start''">closets</a> that you can use to store your clothes</a>, with a large tall <a href="exec:gt ''mirror'', ''start''">mirror</a> attached.'
 		*nl
-		if servitudeLvl >= 1:'A computer printed <a href="exec:gt ''pav_shared_apt'', ''list''">list</a> hangs on the exit door.' & *nl
+		if servitudeLvl >= 1:'A computer-printed <a href="exec:gt ''pav_shared_apt'', ''list''">list</a> hangs on the exit door.' & *nl
 		act 'Go to your room':gt 'pav_shared_apt', 'pcsRoom'
 		act 'Go to the bathroom':gt 'pav_shared_apt', 'bathroom'
 		act 'Go to the kitchen':gt 'pav_shared_apt', 'kitchen'
-		act '<font color=#<<$nd_font>>><<$nd_name>>''s room</font>':gt 'pav_shared_apt', 'ndRoom'
-		act '<font color=#<<$gp_font>>><<$gp_name>>''s room</font>':gt 'pav_shared_apt', 'gpRoom'
-		act '<font color=#<<$sp_font>>><<$sp_name>>''s room</font>':gt 'pav_shared_apt', 'spRoom'
+		act '<font color=#<<$oleg_font>>><<$npc_firstname[''A264'']>>''s room</font>':gt 'pav_shared_apt', 'oleg_Room'
+		act '<font color=#<<$nestor_font>>><<$npc_firstname[''A265'']>>''s room</font>':gt 'pav_shared_apt', 'nestor_Room'
+		act '<font color=#<<$yakov_font>>><<$npc_firstname[''A264'']>>''s room</font>':gt 'pav_shared_apt', 'yakov_Room'
 		if rentLeft = 0:
-			act '<font color=red>End your rental agreement and move out</font>':gt 'pav_shared_apt', 'end_agreement'
+			act '<font color=red>End your rental agreement and move out</font>':gt 'pav_shared_apt', 'eoleg_agreement'
 		end
 
 		if func('homes_properties', 'is_current_home'):
@@ -366,7 +296,7 @@ if $ARGS[0] = 'intro':
 	menu_off = 1
 	gs 'pav_shared_apt', 'update'
 	if step > 0:
-		'<center><img border="5" bordercolor="<<$sp_font>>" height="150" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		'<center><img border="5" bordercolor="<<$yakov_font>>" height="150" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
 		''
 	end
 
@@ -375,47 +305,48 @@ if $ARGS[0] = 'intro':
 		pavIntroStep = 1
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
 		''
-		'The door are opened by a young, nice looking athletic man.'
-		'<font color=#<<$sp_font>>>"Hi sweetie! What do you need?"</font>'
+		'The door is opened by a young, nice-looking athletic man.'
+		'<font color=#<<$yakov_font>>>"Hi sweetie! What do you need?"</font>'
 		'<font color=#<<$pcs_font>>>"Hello, my name is <<$pcs_firstname>> <<$pcs_lastname>>. I''ve seen the advert that someone here have a spare room for rent?"</font>'
-		'<font color=#<<$sp_font>>>"Yeah, that''s true. Come in, I''ll call the guys and we can talk about it. I''m <<$sp_name>> by the way."</font>'
+		'<font color=#<<$yakov_font>>>"Yeah, that''s true. Come in, I''ll call the guys and we can talk about it. I''m <<$npc_firstname[''A264'']>> by the way."</font>'
 		act 'Go in':gt 'pav_shared_apt', 'intro'
 	elseif pavIntroStep = 1:
 		minut += 3
 		pavIntroStep = 2
-		'You go through the door in a hallway. By the amount of coats and shoes you guess there are about 3 or 4 people living here.'
-		'The guy disappears in one of the doors and you can hear talking him to someone.'
-		'They seem to be trying to talk quietly, but you can hear a sentence or two...:'
+		'You enter a hallway filled with coats and shoes, indicating that 3 or 4 people live here.'
+		'The guy disappears into one of the rooms, and you overhear him talking to someone.'
+		'They attempt to speak quietly, but you catch a sentence or two...:'
 		''
-		'"...a girl I tell you..." "...nice one, really, with nice round tits man..." "...better than another dick, idiot..." "...ok ok just be done with it..."'
+		'"...a girl, I tell you..." "...nice one, really, with nice round features, man..." "...better than another guy, idiot..." "...ok, ok, just be done with it..."'
 		''
-		'In a while three young guys appear in the hallway.'
-		'<font color=#<<$sp_font>>>"So that''s her guys. <<$pcs_firstname>>, could you introduce yourself to guys?"</font>'
-		'<font color=#<<$pcs_font>>>"Hello, my name is <<$pcs_firstname>> <<$pcs_lastname>>. I would like to rent the empty room in your apartment."</font>'
-		'<font color=#<<$gp_font>>>"Well now that''s what I like! Finally this won''t be such a gay party!"</font>'
-		'<font color=#<<$nd_font>>>"<<$pcs_firstname>> please excuse my friend <<$gp_name>>, he is such a rude prick to everyone. My name is <<$nd_name>>."</font>'
-		'<font color=#<<$gp_font>>>"Yup, I''m <<$gp_name>>."</font>'
-		'<font color=#<<$nd_font>>>"So you would like to live here with us?"</font>'
-		'<font color=#<<$pcs_font>>>"Yes. I need a new place to stay."</font>'
-		'<font color=#<<$gp_font>>>"How old are you girl?"</font>'
-		'<font color=#<<$nd_font>>>"<<$gp_name>>! Not this again!"</font>'
-		'<font color=#<<$pcs_font>>>"It''s OK. I am actually <<age>> years old. Why do you ask?"</font>'
-		'<font color=#<<$nd_font>>>"He''s just idiot, don''t listen to him."</font>'
+		'After a while, three young men emerge in the hallway.'
+		'<font color=#<<$yakov_font>>>"So, that''s her, guys. <<$pcs_firstname>>, could you introduce yourself to these guys?"</font>'
+		'<font color=#<<$pcs_font>>>"Hello, I''m <<$pcs_firstname>> <<$pcs_lastname>>. I''d like to rent the empty room in your apartment."</font>'
+		'<font color=#<<$nestor_font>>>"Well, now that''s what I like! Finally, this won''t be such a dull party!"</font>'
+		'<font color=#<<$oleg_font>>>"<<$pcs_firstname>>, please excuse my friend, <<$npc_firstname[''A265'']>>. He can be quite rude. I''m <<$npc_firstname[''A266'']>>."</font>'
+		'<font color=#<<$nestor_font>>>"Yup, I''m <<$npc_firstname[''A265'']>>."</font>'
+		'<font color=#<<$oleg_font>>>"So, you want to live here with us?"</font>'
+		'<font color=#<<$pcs_font>>>"Yes, I need a new place to stay."</font>'
+		'<font color=#<<$nestor_font>>>"How old are you, girl?"</font>'
+		'<font color=#<<$oleg_font>>>"<<$npc_firstname[''A265'']>>, not this again!"</font>'
+		'<font color=#<<$pcs_font>>>"It''s okay. I''m actually <<age>> years old. Why do you ask?"</font>'
+		'<font color=#<<$oleg_font>>>"He''s just an idiot; don''t listen to him."</font>'
+			
 		if age < 18:
-			'(You can see <<$gp_name>> rub his crotch just a brief moment after you told him your age. What''s he up to?)'
+			'(You can see <<$npc_firstname[''A265'']>> rub his crotch just a brief moment after you told him your age. What''s he up to?)'
 		end
 		if knowpreg = 1:
 			act 'Ask about children':
 				cla
 				pavIntroStep = 50
-				'<font color=#<<$pcs_font>>>"I thought I should tell you, I''m currently pregnant. How you feel about having children in the apartment, will this be a problem?"</font>'
+				'<font color=#<<$pcs_font>>>"I thought I should tell you, I''m currently pregnant. How do you feel about having children in the apartment, will this be a problem?"</font>'
 				act 'continue':gt 'pav_shared_apt', 'intro'
 			end
 		elseif kid > 0:
 			act 'Ask about children':
 				cla
 				pavIntroStep = 50
-				'<font color=#<<$pcs_font>>>"I thought I should tell, I''m mother. How you feel about having children in the apartment, will this be a problem?"</font>'
+				'<font color=#<<$pcs_font>>>"I thought I should tell, I''m a mother. How do you feel about having children in the apartment, will this be a problem?"</font>'
 				act 'continue':gt 'pav_shared_apt', 'intro'
 			end
 		else
@@ -425,105 +356,106 @@ if $ARGS[0] = 'intro':
 		minut += 3
 		pavIntroStep = 3
 		'<font color=#<<$pcs_font>>>"So what do you guys say, will you take me in?"</font>'
-		'<font color=#<<$nd_font>>>"We may. But first, do you have the money to pay the rent?"</font>'
+		'<font color=#<<$oleg_font>>>"We may. But first, do you have the money to pay the rent?"</font>'
 		'<font color=#<<$pcs_font>>>"Well, of course I don''t expect to let me live here for free. But I hope the rent is reasonable..."</font>'
-		'<font color=#<<$nd_font>>>"It is indeed."</font>'
-		'<font color=#<<$sp_font>>>"<<rentWeekly>> rubles. Per week."</font>'
+		'<font color=#<<$oleg_font>>>"It is indeed."</font>'
+		'<font color=#<<$yakov_font>>>"<<rentWeekly>> rubles. Per week."</font>'
 		'<font color=#<<$pcs_font>>>"Uhm. That''s quite a lot. I''m not sure if I''ll be able to afford this..."</font>'
-		'<font color=#<<$gp_font>>>"You can pay other ways if you''d like!"</font>'
-		'<font color=#<<$nd_font>>>"<<$gp_name>>!"</font>'
+		'<font color=#<<$nestor_font>>>"You can pay other ways if you''d like!"</font>'
+		'<font color=#<<$oleg_font>>>"<<$npc_firstname[''A265'']>>!"</font>'
 		'<font color=#<<$pcs_font>>>"What do you mean by other ways?"</font>'
-		'<font color=#<<$sp_font>>>"Well <<$pcs_firstname>>, since we are just guys here, and since we suck at these things, we could use someone as you, a girl I mean, to be something like our, let''s say, handmaiden. If you know what I mean."</font>'
+		'<font color=#<<$yakov_font>>>"Well <<$pcs_firstname>>, since we are just guys here, and since we suck at these things, we could use someone as you, a girl I mean, to be something like our, let''s say, handmaiden. If you know what I mean."</font>'
 		'<font color=#<<$pcs_font>>>"Like cooking and cleaning?"</font>'
-		'<font color=#<<$sp_font>>>"Yes, exactly."</font>'
-		'<font color=#<<$gp_font>>>"And more."</font>'
-		'<font color=#<<$nd_font>>>"Oh my... I give up."</font>'
+		'<font color=#<<$yakov_font>>>"Yes, exactly."</font>'
+		'<font color=#<<$nestor_font>>>"And more."</font>'
+		'<font color=#<<$oleg_font>>>"Oh my... I give up."</font>'
 		act 'More what?':gt 'pav_shared_apt', 'intro'
 	elseif pavIntroStep = 3:
 		minut += 3
-		'<font color=#<<$gp_font>>>"More services."</font>'
-		'<font color=#<<$pcs_font>>>"What kind of ''more services''?"</font>'
-		'<font color=#<<$sp_font>>>"Girl to guys kind of services."</font>'
+		'<font color=#<<$nestor_font>>>"More services."</font>'
+		'<font color=#<<$pcs_font>>>"What kind of "services"?"</font>'
+		'<font color=#<<$yakov_font>>>"the adult kind of services."</font>'
 		'<font color=#<<$pcs_font>>>"You mean to be a whore for you? Instead of paying the rent???"</font>'
-		'<font color=#<<$nd_font>>>"Please <<$pcs_firstname>>, don''t get mad. <<$gp_name>> is not just idiot, he is a rude idiot. We are definitely not asking you to be our whore or something like that."</font>'
-		'<font color=#<<$nd_font>>>"As <<$sp_name>> told you, we could decrease your rent if you would do some homekeeping stuff we really suck at. But only if you want, of course."</font>'
-		'<font color=#<<$sp_font>>>"So what do you say <<$pcs_firstname>>?"</font>'
+		'<font color=#<<$oleg_font>>>"Please <<$pcs_firstname>>, don''t get mad. <<$npc_firstname[''A265'']>> is not just an idiot, he is a rude idiot. We are definitely not asking you to be our whore or something like that."</font>'
+		'<font color=#<<$oleg_font>>>" As <<$npc_firstname[''A264'']>> told you, we could decrease your rent if you would do some housekeeping stuff we really suck at. But only if you want, of course."</font>'
+		'<font color=#<<$yakov_font>>>"So what do you say <<$pcs_firstname>>?"</font>'
 		act 'Say that you changed your mind about this':pavIntroStep = 40 & gt 'pav_shared_apt', 'intro'
 		act 'Say you will pay the rent the normal way':pavSharedAptEnabled = 1 & gs 'homes_properties', 'give_access' & pavIntroStep = 10 & gt 'pav_shared_apt', 'intro'
 		act 'Say you don''t mind doing the homekeeping stuff':pavSharedAptEnabled = 1 & gs 'homes_properties', 'give_access' & pavIntroStep = 20 & gt 'pav_shared_apt', 'intro'
 		act 'Say you don''t mind anything':pavSharedAptEnabled = 1 & gs 'homes_properties', 'give_access' & pavIntroStep = 30 & gt 'pav_shared_apt', 'intro'
 	elseif pavIntroStep = 10:
 		minut += 2
-		'<font color=#<<$sp_font>>>"Fine. So the rest of this week you have for free, but you need to prepay the next week. OK?"</font>'
+		'<font color=#<<$yakov_font>>>"Fine. So the rest of this week you have free, but you need to prepay the next week. OK?"</font>'
 		'<font color=#<<$pcs_font>>>"Yes, OK, I understand."</font>'
-		'<font color=#<<$sp_font>>>"So the room is over there.</font>'
+		'<font color=#<<$yakov_font>>>"So the room is over there.</font>'
 		'<font color=#<<$pcs_font>>>"Wait, Isn''t that the living room?"</font>'
-		'<font color=#<<$sp_font>>>"Yes it is, but we don''t use it, so we are renting it out. There is all you need, a bed, a table with chair, all this stuff, we even put a curtain over the doorway. Just move in when you want. See you later <<$pcs_firstname>>!"</font>'
-		'<font color=#<<$nd_font>>>"Have a nice day <<$pcs_firstname>>."</font>'
-		'<font color=#<<$gp_font>>>"See ya later girlie..."</font>'
+		'<font color=#<<$yakov_font>>>""Yes, it''s available, but we''re not using it, so we''re renting it out. It''s fully furnished with a bed, a table, and a chair. We''ve even added a curtain to separate the space. Feel free to move in whenever you''d like. See you later, <<$pcs_firstname>>!"'
+		'<font color=#<<$oleg_font>>>"Have a nice day <<$pcs_firstname>>."</font>'
+		'<font color=#<<$nestor_font>>>"See ya later girlie..."</font>'
 		'<font color=#<<$pcs_font>>>"Later guys!"</font>'
 		servitudeLvl = 0
 		act 'Continue':pavIntroStep = 0 & gt 'pav_shared_apt', 'rentSetup'
 	elseif pavIntroStep = 20:
 		minut += 2
-		'<font color=#<<$sp_font>>>"Fine. So the rest of this week you have for free, but you need to prepay the next week. OK?"</font>'
+		'<font color=#<<$yakov_font>>>"Fine. So the rest of this week you have free, but you need to prepay the next week. OK?"</font>'
 		'<font color=#<<$pcs_font>>>"Yes, OK, I understand."</font>'
-		'<font color=#<<$nd_font>>>"We will pepare a list of the charges for the homekeeping services you may want to do, so it''s clear how much will be deducted form your rent."</font>'
+		'<font color=#<<$oleg_font>>>"We will prepare a list of the charges for the housekeeping services you may want to do, so it''s clear how much will be deducted from your rent."</font>'
 		'<font color=#<<$pcs_font>>>"Cool!"</font>'
-		'<font color=#<<$sp_font>>>"So the room is over there.</font>'
+		'<font color=#<<$yakov_font>>>"So the room is over there."</font>'
 		'<font color=#<<$pcs_font>>>"Wait, Isn''t that the living room?"</font>'
-		'<font color=#<<$sp_font>>>"Yes it is, but we don''t use it, so we are renting it out. There is all you need, a bed, a table with chair, all this stuff, we even put a curtain over the doorway. Just move in when you want. See you later <<$pcs_firstname>>!"</font>'
-		'<font color=#<<$nd_font>>>"Have a nice day <<$pcs_firstname>>."</font>'
-		'<font color=#<<$gp_font>>>"See ya later girlie..."</font>'
-		'<font color=#<<$pcs_font>>>"Later guys!"</font>'
+		'<font color=#<<$yakov_font>>>"Yes, it''s available, but we''re not using it, so we''re renting it out. It''s fully furnished with a bed, a table, and a chair. We''ve even added a curtain to separate the space. Feel free to move in whenever you''d like. See you later, <<$pcs_firstname>>!"</font>'
+		'<font color=#<<$oleg_font>>>"Have a nice day, <<$pcs_firstname>>."</font>'
+		'<font color=#<<$nestor_font>>>"See ya later, girlie..."</font>'
+		'<font color=#<<$pcs_font>>>"Later, guys!"</font>'
+			
 		servitudeLvl = 1
 		act 'Continue':pavIntroStep = 0 & gt 'pav_shared_apt', 'rentSetup'
 	elseif pavIntroStep = 30:
 		minut += 2
-		'<font color=#<<$sp_font>>>"Fine. So the rest of this week you have for free, but you need to prepay the next week. OK?"</font>'
+		'<font color=#<<$yakov_font>>>"Fine. So, the rest of this week you have free, but you need to prepay the next week. OK?"</font>'
 		'<font color=#<<$pcs_font>>>"Yes, OK, I understand."</font>'
-		'<font color=#<<$nd_font>>>"We will prepare a list of the charges for the homekeeping services you may want to do, so it''s clear how much will be deducted form your rent."</font>'
-		'<font color=#<<$gp_font>>>"The extra stuff services will be there too, girl."</font>'
+		'<font color=#<<$oleg_font>>>"We will prepare a list of the charges for the housekeeping services you may want to do, so it''s clear how much will be deducted from your rent."</font>'
+		'<font color=#<<$nestor_font>>>"The extra stuff services will be there too, girl."</font>'
 		'<font color=#<<$pcs_font>>>"OK..."</font>'
-		'<font color=#<<$sp_font>>>"So the room is over there.</font>'
-		'<font color=#<<$pcs_font>>>"Wait, Isn''t that the living room?"</font>'
-		'<font color=#<<$sp_font>>>"Yes it is, but we don''t use it, so we are renting it out. There is all you need, a bed, a table with chair, all this stuff. Just move in when you want, we even put a curtain over the doorway. See you later <<$pcs_firstname>>!"</font>'
-		'<font color=#<<$nd_font>>>"Have a nice day <<$pcs_firstname>>."</font>'
-		'<font color=#<<$gp_font>>>"See ya later girlie..."</font>'
-		'<font color=#<<$pcs_font>>>"Later guys!"</font>'
+		'<font color=#<<$yakov_font>>>"So, the room is over there."</font>'
+		'<font color=#<<$pcs_font>>>"Wait, isn''t that the living room?"</font>'
+		'<font color=#<<$yakov_font>>>"Yes, it is, but we don''t use it, so we are renting it out. There is all you need, a bed, a table with a chair, all this stuff. Just move in when you want, we even put a curtain over the doorway. See you later, <<$pcs_firstname>>!"</font>'
+		'<font color=#<<$oleg_font>>>"Have a nice day, <<$pcs_firstname>>."</font>'
+		'<font color=#<<$nestor_font>>>"See ya later, girlie..."</font>'
+		'<font color=#<<$pcs_font>>>"Later, guys!"</font>'
 		servitudeLvl = 2
 		act 'Continue':pavIntroStep = 0 & gt 'pav_shared_apt', 'rentSetup'
 	elseif pavIntroStep = 40:
 		minut += 2
-		'<font color=#<<$nd_font>>>"I told you idiot not to scare her away!"</font>'
-		'<font color=#<<$gp_font>>>"Sorry man! We can still lock her to the radiator like I suggested in the first place..."</font>'
-		'<font color=#<<$nd_font>>>"Just shut up already!"</font>'
+		'<font color=#<<$oleg_font>>>"I told you idiot not to scare her away!"</font>'
+		'<font color=#<<$nestor_font>>>"Sorry man! We can still lock her to the radiator like I suggested in the first place..."</font>'
+		'<font color=#<<$oleg_font>>>"Just shut up already!"</font>'
 		''
-		'<font color=#<<$sp_font>>>"Sorry <<$pcs_firstname>>. We respect your decision. If you change your mind and room is still empty, let us know and we can talk again. Goodbye!"</font>'
+		'<font color=#<<$yakov_font>>>"Sorry <<$pcs_firstname>>. We respect your decision. If you change your mind and the room is still empty, let us know and we can talk again. Goodbye!"</font>'
 		act 'Tell them goodbye and leave':pavIntroStep = 0 & gt 'pav_complex', 'start'
 	elseif pavIntroStep = 50:
 		minut += 2
 		!add dialogue for returning after being previously expelled from apartment
-		'<font color=#<<$nd_font>>>"I''m sorry <<$pcs_firstname>>, but we don''t want children or pets in the apartment!"</font>'
-		'<font color=#<<$gp_font>>>"If you get rid of the kid, come back and see us."</font>'
-		'<font color=#<<$sp_font>>>"Don''t mind him. There''s simply not enough room for 4 people, plus kids or pets. I hope you understand"</font>'
+		'<font color=#<<$oleg_font>>>"I''m sorry <<$pcs_firstname>>, but we don''t want children or pets in the apartment!"</font>'
+		'<font color=#<<$nestor_font>>>"If you get rid of the kid, come back and see us."</font>'
+		'<font color=#<<$yakov_font>>>"Don''t mind him. There''s simply not enough room for 4 people, plus kids or pets. I hope you understand"</font>'
 		if func('homes_properties', 'has_access', 'parents_home'):
 			act 'Suggest a compromise':
 				cla
 				pavIntroStep = 2
 				'<font color=#<<$pcs_font>>>"I can leave them with my parents for the time being, and keep them away from the apartment, how does this sound?'
-				'<font color=#<<$sp_font>>>"Are you certain you want to do this?"</font>'
-				'<font color=#<<$gp_font>>>"Sounds good to me!"</font>'
-				'<font color=#<<$nd_font>>>"hmmmm"</font>'
+				'<font color=#<<$yakov_font>>>"Are you certain you want to do this?"</font>'
+				'<font color=#<<$nestor_font>>>"Sounds good to me!"</font>'
+				'<font color=#<<$oleg_font>>>"hmmmm"</font>'
 				act 'Continue':gt 'pav_shared_apt', 'intro'
 			end
 			act 'I won''t leave my children':
 				cla
 				pavIntroStep = 0
-				'<font color=#<<$pcs_font>>>"OK, I will make do with my current accomodation.'
-				'<font color=#<<$sp_font>>>"We understand"</font>'
-				'<font color=#<<$gp_font>>>"Damn"</font>'
-				'<font color=#<<$nd_font>>>"No problem <<$pcs_firstname>>"</font>'
+				'<font color=#<<$pcs_font>>>"OK, I will make do with my current accommodation.'
+				'<font color=#<<$yakov_font>>>"We understand"</font>'
+				'<font color=#<<$nestor_font>>>"Damn"</font>'
+				'<font color=#<<$oleg_font>>>"No problem <<$pcs_firstname>>"</font>'
 				act 'Continue':gt 'pav_shared_apt', 'intro'
 			end
 		else
@@ -543,7 +475,7 @@ if $ARGS[0] = 'list':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/list.jpg"></center>'
 	''
 	'The basic weekly rent is <<rentWeekly>> rubles.'
-	'It is possible to pay it in cash, or offer services instead. The prices are folllowing:'
+	'It is possible to pay it in cash or offer services instead. The prices are following:'
 	''
 	'---------------'
 	''
@@ -567,7 +499,7 @@ if $ARGS[0] = 'list':
 	'---------------'
 	''
 	'Not having paid the full weekly rent at the beginning of a new week will lead to termination of the accommodation services.'
-	'Signed: <a href="exec: gt ''pav_shared_nd'', ''ndDick''"><font color=#<<$nd_font>>><<$nd_name>></font></a>, <a href="exec: gt ''pav_shared_gp'', ''gpDick''"><font color=#<<$gp_font>>><<$gp_name>></font></a>, <a href="exec: gt ''pav_shared_sp'', ''spDick''"><font color=#<<$sp_font>>><<$sp_name>></font></a>, <<$pcs_firstname>>.'
+	'Signed: <a href="exec: gt ''pav_shared_oleg'', ''oleg_Dick''"><font color=#<<$oleg_font>>><<$npc_firstname[''A266'']>></font></a>, <a href="exec: gt ''pav_shared_nestor'', ''nestor_Dick''"><font color=#<<$nestor_font>>><<$npc_firstname[''A265'']>></font></a>, <a href="exec: gt ''pav_shared_yakov'', ''yakov_Dick''"><font color=#<<$yakov_font>>><<$npc_firstname[''A264'']>></font></a>, <<$pcs_firstname>>.'
 	''
 	'---------------'
 	act 'Continue':gt 'pav_shared_apt', 'start'
@@ -599,7 +531,7 @@ if $ARGS[0] = 'bathroom':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
 	*nl
 	'This is a modest bathroom, containing everything that young people need for their daily life, such as:'
-	'A shower, toilet, <a href="exec:gt ''mirror'',''start''">mirror</a>, where you can ' + iif(pcs_hairbsh < 1,'<a href="exec:gt ''mirror'',''brush''">brush</a>','brush') + ' your hair, a sink and even a bath tub.'
+	'A shower, toilet, <a href="exec:gt ''mirror'',''start''">mirror</a>, where you can ' + iif(pcs_hairbsh < 1, '<a href="exec:gt ''mirror'',''brush''">brush</a>', 'brush') + ' your hair, a sink and even a bath tub.'
 	*nl
 	gs 'din_van', 'private'
 	gs 'stat'
@@ -692,7 +624,7 @@ if $ARGS[0] = 'cleanForGuys':
 	price = price_clean
 	*nl
 	'You collect piles of dirty clothes around the room, carry them into the bathroom, put them in a basin and then pour washing powder on them. You wash them until they are finally clean.'
-	cumStainCh =  rand (0, 100)
+	cumStainCh =  rand(0, 100)
 	if servitudeLvl = 2 and cumStainCh <= 50:'<i>You notice bedsheets with what seems as dried out cum. Probably remainder of one of your "servings". Maybe it really is better to swallow every time...</i>'
 
 	act 'Hang them to dry out and leave':gt 'pav_shared_apt', 'payService'
@@ -762,7 +694,7 @@ if $ARGS[0] = 'pcsRoom':
 			gs 'drugs', 'cocaine'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/drugs/dur.jpg"></center>'
-			'You snort some Pale Lady, feeling dizzy for just a moment. After that you feel fantastic, and incredibly horny.'
+			'You snort some Pale Lady, feeling dizzy for just a moment. After that, you feel fantastic and incredibly horny.'
 
 			act 'Continue':gt 'pav_shared_apt', 'pcsRoom'
 		end
@@ -869,33 +801,35 @@ if $ARGS[0] = 'sofabed':
 	act 'Get up':gt 'pav_shared_apt', 'pcsRoom'
 end
 
-if $ARGS[0] = 'ndRoom':
+if $ARGS[0] = 'oleg_Room':
 	$menu_loc = 'pav_shared_apt'
-	$menu_arg = 'ndRoom'
+	$menu_arg = 'oleg_Room'
 	menu_off = 0
 	$loc = 'pav_shared_apt'
-	$loc_arg = 'ndRoom'
+	$loc_arg = 'oleg_Room'
 	minut += 2
-	'<center><h3><font color=#<<$nd_font>>><<$nd_name>>''s room</font></h3></center>'
+	'<center><h3><font color=#<<$oleg_font>>><<$npc_firstname[''A266'']>>''s room</font></h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/room.jpg"></center>'
 	''
-	'The room is surprisingly not as messy as one would expect, given that <<$nd_name>> is an IT guy.'
-	'There is one large window with bed bellow it, but the whole room is dominated by a large table with several computers and monitors.'
-	'Looking at it one would say that this must be a den of a hacker.'
-	if hour >= nd_sleeps and hour < nd_wakes:
-		'<<$nd_name>> is sleeping in his bed.'
-	elseif hour >= nd_wakes and hour < nd_leaves:
-		'<<$nd_name>> is already awake, getting ready to leave.'
-		act 'Approach him': gt 'pav_shared_nd', 'nd'
-	elseif hour >= nd_leaves and hour < nd_comes:
-		'<<$nd_name>> is not here.'
-	elseif hour >= nd_comes and hour < nd_sleeps:
-		'<<$nd_name>> is currently behind his desk, programming in an esoteric language.'
-		act 'Approach him': gt 'pav_shared_nd', 'nd'
+	'The room isn''t as messy as one might expect, given that <<$npc_firstname[''A266'']>> is an IT guy.'
+	'There is one large window with a bed below it, but the entire room is dominated by a large table with several computers and monitors.'
+	'At first glance, one might mistake this room for a hacker''s den.'
+	
+	if hour >= oleg_sleeps and hour < oleg_wakes:
+		'<<$npc_firstname[''A266'']>> is sound asleep in his bed.'
+	elseif hour >= oleg_wakes and hour < oleg_leaves:
+		'<<$npc_firstname[''A266'']>> is already awake and getting ready to leave.'
+		act 'Approach him': gt 'pav_shared_oleg', 'oleg'
+	elseif hour >= oleg_leaves and hour < oleg_comes:
+		'<<$npc_firstname[''A266'']>> is currently not here.'
+	elseif hour >= oleg_comes and hour < oleg_sleeps:
+		'<<$npc_firstname[''A266'']>> is behind his desk, engrossed in programming using an esoteric language.'
+		act 'Approach him': gt 'pav_shared_oleg', 'oleg'
 	end
-	if servitudeLvl >= 1 and nd_cleaned = 0:
+	
+	if servitudeLvl >= 1 and oleg_cleaned = 0:
 		if mc_inventory['laundry_soap'] >= 1:
-			act 'Clean the room':nd_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
+			act 'Clean the room':oleg_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
 		else
 			'You don''t have enough laundry detergent to clean the room'
 		end
@@ -903,32 +837,32 @@ if $ARGS[0] = 'ndRoom':
 	act 'Leave':gt 'pav_shared_apt', 'start'
 end
 
-if $ARGS[0] = 'gpRoom':
+if $ARGS[0] = 'nestor_Room':
 	$menu_loc = 'pav_shared_apt'
-	$menu_arg = 'gpRoom'
+	$menu_arg = 'nestor_Room'
 	menu_off = 0
 	$loc = 'pav_shared_apt'
-	$loc_arg = 'gpRoom'
+	$loc_arg = 'nestor_Room'
 	minut += 2
-	'<center><h3><font color=#<<$gp_font>>><<$gp_name>>''s room</font></h3></center>'
+	'<center><h3><font color=#<<$nestor_font>>><<$npc_firstname[''A265'']>>''s room</font></h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/room.jpg"></center>'
 	''
 	'This room is a messy disaster, with clothes scattered all over the floor.'
 
-	if hour >= gp_wakes and hour < gp_leaves:
-		'<<$gp_name>> is already awake, getting ready to leave.'
-		act 'Approach him': gt 'pav_shared_gp', 'gp'
-	elseif hour >= gp_leaves and hour < gp_comes:
-		'<<$gp_name>> is not here.'
-	elseif hour >= gp_comes and hour < gp_sleeps:
-		'<<$gp_name>> is currently on his bed, listing through some magazines.'
-		act 'Approach him': gt 'pav_shared_gp', 'gp'
-	elseif hour >= gp_sleeps or hour < gp_wakes:
-		'<<$gp_name>> is sleeping in his bed.'
+	if hour >= nestor_wakes and hour < nestor_leaves:
+		'<<$npc_firstname[''A265'']>> is already awake, getting ready to leave.'
+		act 'Approach him': gt 'pav_shared_nestor', 'nestor'
+	elseif hour >= nestor_leaves and hour < nestor_comes:
+		'<<$npc_firstname[''A265'']>> is not here.'
+	elseif hour >= nestor_comes and hour < nestor_sleeps:
+		'<<$npc_firstname[''A265'']>> is currently on his bed, listing through some magazines.'
+		act 'Approach him': gt 'pav_shared_nestor', 'nestor'
+	elseif hour >= nestor_sleeps or hour < nestor_wakes:
+		'<<$npc_firstname[''A265'']>> is sleeping in his bed.'
 	end
-	if servitudeLvl >= 1 and gp_cleaned = 0:
+	if servitudeLvl >= 1 and nestor_cleaned = 0:
 		if mc_inventory['laundry_soap'] >= 1:
-			act 'Clean the room':gp_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
+			act 'Clean the room':nestor_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
 		else
 			'You don''t have enough laundry detergent to clean the room'
 		end
@@ -936,34 +870,34 @@ if $ARGS[0] = 'gpRoom':
 	act 'Leave':gt 'pav_shared_apt', 'start'
 end
 
-if $ARGS[0] = 'spRoom':
+if $ARGS[0] = 'yakov_Room':
 	$menu_loc = 'pav_shared_apt'
-	$menu_arg = 'spRoom'
+	$menu_arg = 'yakov_Room'
 	menu_off = 0
 	$loc = 'pav_shared_apt'
-	$loc_arg = 'spRoom'
+	$loc_arg = 'yakov_Room'
 	minut += 2
-	'<center><h3><font color=#<<$sp_font>>><<$sp_name>>''s room</font></h3></center>'
+	'<center><h3><font color=#<<$yakov_font>>><<$npc_firstname[''A264'']>>''s room</font></h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/room.jpg"></center>'
 	''
-	'This room is very neat and organized, with sporting stuff like dresses, equipment and trophys. On the walls hang several posters of famous athletes and sports teams.'
-
-	if hour >= sp_wakes and hour < sp_leaves:
-		'<<$sp_name>> is already awake, packing his gym bags to leave.'
-		act 'Approach him': gt 'pav_shared_sp', 'sp'
-	elseif hour >= sp_leaves and hour < sp_comes:
-		'<<$sp_name>> is not here.'
-	elseif hour >= sp_comes and hour < sp_sleeps:
-		doesStuff = rand (0, 100)
-		if doesStuff < 50:'<<$sp_name>> is currently on his bed, listing through football magazines.'
-		if doesStuff >= 50:'<<$sp_name>> is working out on the floor.'
-		act 'Approach him': gt 'pav_shared_sp', 'sp'
-	elseif hour >= sp_sleeps or hour < sp_wakes:
-		'<<$sp_name>> is sleeping in his bed.'
+	'This room is very neat and organized, filled with sporting gear such as dresses, equipment, and trophies. The walls are adorned with several posters of famous athletes and sports teams.'
+
+	if hour >= yakov_wakes and hour < yakov_leaves:
+		'<<$npc_firstname[''A264'']>> is already awake, packing his gym bags to leave.'
+		act 'Approach him': gt 'pav_shared_yakov', 'yakov'
+	elseif hour >= yakov_leaves and hour < yakov_comes:
+		'<<$npc_firstname[''A264'']>> is not here.'
+	elseif hour >= yakov_comes and hour < yakov_sleeps:
+		doesStuff = rand(0, 100)
+		if doesStuff < 50:'<<$npc_firstname[''A264'']>> is currently on his bed, listing through football magazines.'
+		if doesStuff >= 50:'<<$npc_firstname[''A264'']>> is working out on the floor.'
+		act 'Approach him': gt 'pav_shared_yakov', 'yakov'
+	elseif hour >= yakov_sleeps or hour < yakov_wakes:
+		'<<$npc_firstname[''A264'']>> is sleeping in his bed.'
 	end
-	if servitudeLvl >= 1 and sp_cleaned = 0:
+	if servitudeLvl >= 1 and yakov_cleaned = 0:
 		if mc_inventory['laundry_soap'] >= 1:
-			act 'Clean the room':sp_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
+			act 'Clean the room':yakov_cleaned = 1 & gt 'pav_shared_apt', 'cleanForGuys'
 		else
 			'You don''t have enough laundry detergent to clean the room'
 		end
@@ -971,13 +905,13 @@ if $ARGS[0] = 'spRoom':
 	act 'Leave':gt 'pav_shared_apt', 'start'
 end
 
-if $ARGS[0] = 'end_agreement':
+if $ARGS[0] = 'eoleg_agreement':
 	menu_off = 1
-	'<center><img border="5" bordercolor="<<$sp_font>>" height="150" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+	'<center><img border="5" bordercolor="<<$yakov_font>>" height="150" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="150" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
 	''
 
 	'You gather the guys around and explain to them that you wish to move out.'
-	'<font color=#<<$pcs_font>>><<$sp_name>> Looks disappointed as he addresses you. "That is a shame <<$pcs_firstname>> we''ve very much enjoyed having you stay here we us. Are you sure this is what you want?"</font>'
+	'<font color=#<<$pcs_font>>><<$npc_firstname[''A264'']>> Looks disappointed as he addresses you. "That is a shame <<$pcs_firstname>> we''ve very much enjoyed having you stay here we us. Are you sure this is what you want?"</font>'
 	act '"Yes." End agreement':
 		pavSharedAptEnabled = 0
 		gs 'homes_properties', 'block_access', 'shared_apartment', 0

+ 0 - 1439
locations/pav_shared_gp.qsrc

@@ -1,1439 +0,0 @@
-# pav_shared_gp
-
-if $ARGS[0] = 'gp':
-	menu_off = 1
-	$loc_arg = 'gp'
-	minut += 2
-	'<h3><center><font color=#<<$gp_font>>><<$gp_name>></font></h3></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-	''
-	'He is a gopnik, showing violent and aggressive behavior. You feel something like a bad aura coming from him.'
-	if gp_hadSex = 1:'As you know very well, <<$gp_name>> has <<gpDick>> cm long <a href="exec:gt ''pav_shared_gp'', ''gpDick''">dick</a> with somehow maintained pubic hair.'
-	''
-	'<b>Today he looks to be in a <<$gp_mood>> mood.</b>'
-	if gp_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=#<<$gp_font>>>"Hey <<$pcs_firstname>>, is that my cum? Go better wash, I don''t want you near me like that!"</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	! cum on clothes
-	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
-		'<font color=#<<$gp_font>>>"Hey <<$pcs_firstname>>, is that my cum on your clothes? Go better change, I don''t want you near me like that!"</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	! cum on belly, breasts, ass, pussy; visible only when nude
-	elseif (cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0) and $clothingworntype = 'nude':
-		'<font color=#<<$gp_font>>>"Hey <<$pcs_firstname>>, you dirty slut, you forgot to wash the cum! Get out!"</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	else
-		'<font color=#<<$gp_font>>>"Hey chick, here for fun?"</font>'
-		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
-		act 'Chat with him':gt 'pav_shared_gp', 'gpChat'
-		if servitudeLvl = 2 and gp_served = 0:act 'Offer him to serve':gt 'pav_shared_gp', 'gpServe'
-	end
-end
-
-if $ARGS[0] = 'gpDick':
-	menu_off = 1
-	minut += 2
-	'<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
-	if set_imgh < 250:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	else
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	end
-	''
-	'Your relation with him is <<gp_rel>> / 100.'
-	'His dick is <<gpDick>> cm long with somehow maintained pubic hair.'
-	milkPause = daystart - gp_lastCum
-	if milkPause >= 1:'You have not milked him for <<milkPause>> day(s), he most likely has <<gp_cumVol>> ml semen accumulated in his balls' & if gp_cumVol > 80:', which are starting to turn blue' + '.'
-	'Today he looks to be at about <<gp_horny>> % of his maximum horniness.'
-	''
-	'So far you have:'
-		if gp_hj = 1:'- jerked him'	
-			if gp_hj > 1:'- jerked him <<gp_hj>> times' & if gp_hjFail > 1:' and failed to make him cum with your hands <<gp_hjFail>> times'
-		if gp_bj = 1:'- given him a blowjob'
-			if gp_bj > 1:'- given him <<gp_bj>> blowjobs' & if gp_bjFail > 1:' and failed to make him cum with your mouth <<gp_bjFail>> times'
-		if gp_bjDeep = 1:'- given him a blowjob with deepthroat'
-			if gp_bjDeep > 1:'- given him <<gp_bjDeep>> blowjobs with deepthroat' & if gp_bjFailPuke > 1:' but failed and puked in his crotch <<gp_bjFailPuke>> times' & if gp_bjFailPuke > 1:' but failed and fainted impaled on his cock <<gp_bjFailFaint>> times'
-		if gp_swall = 1:'- swallowed his semen, making it <<gp_cumSwall>> ml swallowed total'
-			if gp_swall > 1:'- swallowed his semen <<gp_swall>> times, making it <<gp_cumSwall>> ml swallowed total'
-		if gp_vag = 1:'- took it in your pussy' & if gp_vagCumInside = 1:' and let him cum inside you' & if gp_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
-			if gp_vag > 1:'- took it in your pussy <<gp_vag>> times' & if gp_vagCumInside >= 1:' and let him cum inside you <<gp_vagCumInside>> times' & if gp_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<gp_vagCumInsideUnwanted>> times'
-		if gp_cumVag > 0:'- he pumped in total <<gp_cumVag>> ml of cum into your pussy'
-		if gp_anal = 1:'- took it in your ass' & if gp_analCumInside = 1:' and let him cum inside you' & if gp_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
-			if gp_anal > 1:'- took it in your ass <<gp_anal>> times' & if gp_analCumInside >= 1:' and let him cum inside you <<gp_analCumInside>> times' & if gp_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<gp_analCumInsideUnwanted>> times'
-		if gp_analVag > 0:'- he pumped in total <<gp_cumAnal>> ml of into your anus'
-	if $loc_arg = 'gp':
-		act 'Continue':gt 'pav_shared_gp', 'gp'
-	else
-		act 'Continue':gt 'pav_shared_apt', $goBack
-	end
-end
-
-if $ARGS[0] = 'gpChat':
-	menu_off = 1
-	$loc_arg = 'gpChat'
-	'<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-	''
-	! basic chat
-	if chatLvl = 0:
-		!clothing and bodyshape reactions
-		say = rand(1, 2)
-		if say = 1:
-			if $clothingworntype = 'nude':
-				'<<$gp_name>> is scanning your nude body with his eyes.'
-				if salocatnow <= 2:
-					'He obviously enjoys the sight: <font color=#<<$gp_font>>>"Nice body <<$pcs_firstname>>. Are you here to offer it?"</font>'
-				elseif salocatnow > 2 and salocatnow <= 4:
-					'He is not very content with the sight: <font color=#<<$gp_font>>>"You should lose some weight, <<$pcs_firstname>>, you are getting fat."</font>'
-				else
-					'He seems almost disgusted by the sight: <font color=#<<$gp_font>>>"Jeezus <<$pcs_firstname>>, stop eating you are beginning to look like an elefant!"</font>'
-				end
-				!panties on
-				if salocatnow <= 4 and $pantyworntype ! 'none':
-					'<font color=#<<$gp_font>>>"Why did you leave those panties on <<$pcs_firstname>>? Such a shame."</font>'
-				!panties off, anal plug
-				elseif salocatnow <= 4 and $pantyworntype = 'none' and analplugIN = 1:
-					'As you accidentaly turn around, he gazes between your asscheeks on the plug stuck in your ass.'
-					'<font color=#<<$gp_font>>>"Wow, you just can''t be a second without something filling your holes, do you?"</font>'
-					if rand(0, 100) < 30:
-						'As he watches you, he gets up and goes near you, his hand reaching for your plugged ass.'
-						act 'What are you doing?':chatLvl = 10 & gt 'pav_shared_gp', 'gpChat'
-					end
-				end
-			elseif CloBimbo = 1:
-				'<<$gp_name>> is scanning your outfit with his eyes.'
-				if salocatnow <= 4:
-					'<font color=#<<$gp_font>>>"You know I like when you dress like a mindless bimbo. Not that you aren''t, but anyway, good job!"</font>'
-				else
-					'<font color=#<<$gp_font>>>"I like girls dressed like bimbos, but they should have the body shape for it. Waste of good cloth on you."</font>'
-				end
-			elseif CloStyle = 4:
-				'<<$gp_name>> is scanning your outfit with his eyes.'
-				if salocatnow <= 4:
-					'<font color=#<<$gp_font>>>"Only thing that I like more than stupid bimbos are whores. I won''t pay you anyway, but good job!"</font>'
-				else
-					'<font color=#<<$gp_font>>>"I literally love whores, but with your bodyshape you won''t be earning much money, darling."</font>'
-				end
-			end
-		elseif say = 2:
-			! age reactions
-			if age < 18:
-				'<font color=#<<$gp_font>>>"I like that you are only <<age>> years old<<$pcs_firstname>>."</font>'
-				if rand(0, 100)< 30:'<font color=#<<$gp_font>>>"By the way, don''t you have even younger sister or girlfriend that would like, you know, to meet me?"</font>'
-			else
-				'<font color=#<<$gp_font>>>"<<$pcs_firstname>> you are becoming too old for my taste. <<age>> years is too much."</font>'
-			end
-		end
-
-		if step = 0:
-			minut += 1
-			act 'Chat about everyday stuff': step = 10 & gt 'pav_shared_gp', 'gpChat'
-			act 'Leave':gt 'pav_shared_apt', 'start'
-		elseif step = 10:
-			minut += 15
-			sayN = rand (1, 10)
-			if sayN = 1:'<i><font color=#<<$gp_font>>>"Once I have kicked a guy to his nose... he bled like a pig!"</font></i>'
-			if sayN = 2:'<i><font color=#<<$gp_font>>>"Only morons have a job. I know how to make money without one, that''s a skill!"</font></i>'
-			if sayN = 3:'<i><font color=#<<$gp_font>>>"I know some cool guys of your age. They often hang around in the park."</font></i>'
-			if sayN = 4:'<i><font color=#<<$gp_font>>>"No one likes the authorities. Especially the cops. Yes. Fuck the cops!"</font></i>'
-			if sayN = 5:'<i><font color=#<<$gp_font>>>"Don''t hang around the train station too much. Shady people, you know."</font></i>'
-			'<i>You spent some time chatting with him about his ventures and mischiefs, slightly improving your relation with him.</i>'
-			gp_rel += 1
-			gs 'stat'
-			intimateTalkCh = rand (0, 100)
-			if gp_mood <= 2 and intimateTalkCh <= 80:
-				step = 20
-			else
-				step = 0
-			end
-			act 'Continue':gt 'pav_shared_gp', 'gpChat'
-		elseif step = 20:
-			minut += 3
-			if servitudeLvl = 0:
-				'<font color=#<<$gp_font>>>"<<$pcs_firstname>>, have you finally decided to be our maid?"</font>'
-				'<font color=#<<$pcs_font>>>"Jeez..."</font>'
-				'<font color=#<<$gp_font>>>"Come on girl, don''t you see I need to tidy this shit-of-a-room?"</font>'
-				act 'Say you are still not iterested':step = 0 & gt 'pav_shared_gp', 'gpChat'
-				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_gp', 'gpChat'
-			elseif servitudeLvl = 1:
-				'<font color=#<<$gp_font>>>"<<$pcs_firstname>>, have you finally decided to be our fucktoy?"</font>'
-				'<font color=#<<$pcs_font>>>"What? I already clean up and cook for you."</font>'
-				'<font color=#<<$gp_font>>>"Hey, you have to earn the rent money somewhere anyway. This way you don''t need to whore yourself on the streets you know?"</font>'
-				act 'Say you are no whore and you are not interested':step = 0 & gt 'pav_shared_gp', 'gpChat'
-				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_gp', 'gpChat'				
-			elseif servitudeLvl = 2:
-				act 'Talk about sex':step = 30 & gt 'pav_shared_gp', 'gpChat'
-				act 'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
-			end
-		elseif step = 30:
-			minut += 5
-			'You get into rather wild discussion about sex, porn and all that stuff. <<$gp_name>> is obviously thinking about sex most of his time.'
-			resCh = rand (0, 6)
-			if resCh <= 3:
-				topicR = rand (1, 5)
-				if topicR = 1:'<<$gp_name>> tells you he loves rough sex.'
-				if topicR = 2:'<<$gp_name>> tells you he loves when girl is submissive.'
-				if topicR = 3:'<<$gp_name>> tells you he kinda likes when it is a bit painful for the girl.'
-				if topicR = 4:'<<$gp_name>> tells you his <<gpDick>> cm long dick is big enough, but he would like to have even bigger.'
-				if topicR = 5:'<<$gp_name>> tells you he loves when the girl is young and thin.'
-				act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
-			elseif resCh = 4:
-				if gp_doPornpos = 0:
-					'<<$gp_name>> tells you he loves to fuck girls the Full Nelson position. He saw it in porn.'
-					act'Continue':gp_doPornpos = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
-				elseif gp_doPornpos = 1:
-					'<<$gp_name>> tells you he loves to fuck girls the Pile Driver position. He also saw it in porn.'
-					act'Continue':gp_doPornpos = 2 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
-				end
-			elseif resCh = 5: 
-				if gp_doAnal = 0:
-					'<<$gp_name>> tells you that he loves rough anal sex.'
-					act'Continue':gp_doAnal = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
-				end
-			elseif resCh = 6:
-				if gp_doAnal = 1 and gp_doPornpos = 2:
-					'<<$gp_name>> tells you that he recently bought a vacuum dick enlarger and cannot wait to test it.'
-					act'Continue':gp_doVacuum = 1 & gp_rel += 1 & step = 0 & gt 'pav_shared_gp', 'gpChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_gp', 'gpChat'
-				end
-			end
-		end
-	
-	!anal plug
-	elseif chatLvl = 10:
-		'<font color=#<<$gp_font>>>"Helping you out!"</font>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugpullout.mp4"></video></center>'
-		''
-		'Suddenly he grabs the plug and pulls it out without a warning!'
-		'PLOPPP... your ass makes a sound as the plug leaves it gaping.'
-		'<font color=#<<$pcs_font>>>"Ouuuch!"</font>'
-		'<font color=#<<$gp_font>>>"You''re welcome <<$pcs_firstname>>, come again!"</font>'
-		analplugIN = 0
-		act 'Continue':chatLvl = 0 & gt 'pav_shared_gp', 'gpChat'
-	end
-end
-
-if $ARGS[0] = 'gpServe':
-	menu_off = 1
-	$boy = $gp_name
-	gs 'npcgeneratec', 0, $boy, 23
-	gs 'boyStat', $npclastgenerated
-	minut += 2
-	$loc_arg = 'gpServe'
-	'<h3><font color=#<<$gp_font>>><<$gp_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-	''
-	step = 0
-	subStep = 0
-
-	sexCh = rand (0, 30) + gp_horny
-
-	! very bad mood, does not want anything
-	if gp_mood >= 5:
-		'<font color=#<<$gp_font>>>"Not now <<$pcs_firstname>>, get lost."</font>'
-		act 'Leave':gt 'pav_shared_apt', 'start'
-	
-	! random chance to sex, but increasing with horniness level; nd min horny = 30/100*100 = 30
-	elseif sexCh < 40:
-		'<font color=#<<$gp_font>>>"Not now <<$pcs_firstname>>, can''t you see I am busy?"</font>'
-		act 'Leave':gt 'pav_shared_apt', 'start'
-	
-	! wants sex
-	else
-		actionR = rand (2, 6)
-		if actionR = 2:
-			'<font color=#<<$gp_font>>>"You can do me with your little hands."</font>'
-			act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpHandjob'
-		elseif actionR = 3:
-			'<font color=#<<$gp_font>>>"Sure <<$pcs_firstname>>, blow me right now."</font>'
-			act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSuck'
-		elseif actionR = 4:
-			'<font color=#<<$gp_font>>>"Present your pussy, <<$pcs_firstname>>."</font>'
-			act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif actionR = 5:
-			if gp_anal = 0:
-				if gp_doAnal = 1:
-					'<font color=#<<$gp_font>>>"Hmmm... what would I like to do to you?"</font>'
-					act 'It''s your choice':gt 'pav_shared_gp', 'gpServe'
-					act 'You told me you like anal, do you?': gp_rel += 3 & gt 'pav_shared_gp', 'gpSexAnal'
-				else
-					gt 'pav_shared_gp', 'gpServe'
-				end
-			elseif gp_anal >= 1:
-				'<font color=#<<$gp_font>>>"Sure <<$pcs_firstname>>, I would like to take your ass this time."</font>'
-				act 'Agree': gp_rel += 1 & gt 'pav_shared_gp', 'gpSexAnal'
-			end
-		elseif actionR = 6:
-			if gp_doVacuum >= 1:
-				'<font color=#<<$gp_font>>>"Hmmm... what would I like to do to you?"</font>'
-				act 'It''s your choice':gt 'pav_shared_gp', 'gpServe'
-				act 'You told me you bought some vacuum enlarger, did you?':step = 6 & gp_rel += 2 & gt 'pav_shared_gp', 'gpSexVaginal'
-			else
-				gt 'pav_shared_gp', 'gpServe'
-			end
-		end
-		if actionR > 1:act 'Say you changed your mind and leave': gp_rel -= 1 & gt 'pav_shared_apt', 'start'
-	end
-end
-
-if $ARGS[0] = 'gpHandjob':
-	'<b><font color=#<<$gp_font>>><<$gp_name>> - handjob</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'gpHandjob'
-	price = price_handjob
-	if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
-
-	if step = 0:
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2.mp4"></video></center>'
-		''
-		'<<$gp_name>> sits on his bed, spreading his legs, showing you where to go.'
-		'You drop on your knees, crawl to him and unzip his pants.'
-		'His dick falls out of them, already half hard. <font color=#<<$gp_font>>>"Get to work, little girl."</font>'
-		'Looking at the cock, you decide to:'
-		cockHard = 0
-		act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-	
-	!slow strokes
-	elseif step = 1:
-		if gp_mood = 0:
-			orgB += rand(0, 10)
-		else
-			orgB += rand(0, 10) / gp_mood
-		end
-		'<center><video autoplay loop src="images/shared/sex/handjob/handjob2.mp4"></video></center>'
-		''
-		'You grab <<$gp_name>>''s cock in your hand, jerking it slowly, changing the pressure from time to time.'
-		if cockHard = 0:cockHard = 1 & 'Your moves are slowly making the cock to get harder and harder, finally reaching his full <<gpDick>> cm length.'
-		gs 'arousal', 'hj', 3
-		gs 'stat'
-		
-		act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'	
-	
-	!fast strokes
-	elseif step = 2:
-		'<center><video autoplay loop src="images/shared/sex/handjob/hj0.mp4"></video></center>'
-		''
-		orgB += rand(10, 20)
-		'You jerk his hard cock with quite a fast pace, making him moan from pleasure.'
-		gs 'arousal', 'hj', 3
-		gs 'stat'
-		act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'	
-		if orgB >= 100:
-			act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
-		end
-
-	!lube massage
-	elseif step = 3:
-		'<center><video autoplay loop src="images/shared/sex/handjob/handjob1.mp4"></video></center>'
-		''
-		orgB += rand(15, 30)
-		'You put some lube on your hands and massage his cock with it.'
-		'The slimy lube enables you to increase the sensation, making him moan even more inensively.'
-		'<font color=#<<$gp_font>>>"Oh yeah <<$pcs_firstname>>, this is what girls should learn as young as possible!"</font>'
-		gs 'arousal', 'hj', 3
-		gs 'stat'
-		act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'	
-		if orgB >= 100:
-			act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
-		end
-	
-	!tip lube massage
-	elseif step = 4:
-		'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
-		''
-		minut += 3
-		orgB += rand(15, 30)
-		'You put some lube on your hands and massage the tip of his cock with it.'
-		'The slimy lube enables you to play with the violet head of his cock, stroking also the hole time to time.'
-		act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
-		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'	
-		if orgB >= 100:
-			act 'Try to make him cum':step = 5 & gt 'pav_shared_gp', 'gpHandjob'
-		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', 'hj', 5
-		cumCh = rand(0, 100)
-		if cumCh <= 70:
-			''
-			'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,0.mp4"></video></center>'
-			''
-			'Your attempt is successful, as <<$gp_name>> cums right onto your hands and squirts all around them.'
-			gp_lastCum = daystart
-			gp_served = 1
-			gs 'cum_call', 'hands', $boy, 1, 0, gp_cumVol
-			act 'Get up':step = 9 & gp_cumVol = 0 & gt 'pav_shared_gp', 'gpHandjob'
-		else
-			failC += 1
-			if failC >= 3:
-				''
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
-				''
-				'<font color=#<<$gp_font>>>"Come on <<$pcs_firstname>>, if you can''t suck a cock stop wasting my time. Get out!"</font>'
-				act 'Get up':step = 6 & gt 'pav_shared_gp', 'gpHandjob'
-			else
-				''
-				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/kotovhj.jpg"></center>'
-				''
-				'<font color=#<<$gp_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
-				act 'Jerk it slowly':step = 1 & gt 'pav_shared_gp', 'gpHandjob'
-				act 'Jerk it fast':step = 2 & gt 'pav_shared_gp', 'gpHandjob'
-				act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_gp', 'gpHandjob'
-				act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_gp', 'gpHandjob'
-			end
-		end
-
-	!END cum fail
-	elseif step = 6:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-		''
-		'You get up from your knees, looking at <<$gp_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
-		'He looks really pissed:<font color=#<<$gp_font>>>"Get out you lousy slut!"</font>'
-		gp_rel -= 3
-		step = 0
-		gp_hjFail += 1
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	!END cum success
-	elseif step = 9:
-		gp_hj += 1
-		if gp_mood <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<font color=#<<$gp_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
-			'Cleaning your hands off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
-			gp_rel += 1
-			step = 0
-		else
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<<$gp_name>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
-			'You just pack your things and quietly leave through the door.'
-			step = 0
-		end
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Leave': gt 'pav_shared_apt', 'payService'
-	end
-end
-
-if $ARGS[0] = 'gpSuck':
-	'<b><font color=#<<$gp_font>>><<$gp_name>> - blowjob</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'gpSuck'
-	price = price_blowjob
-	if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
-
-	! crawl to him
-	if step = 0:
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
-		''
-		'<<$gp_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 'pav_shared_gp', 'gpSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-
-	!lick balls
-	elseif step = 1:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj74.mp4"></video></center>'
-		''
-		'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 'pav_shared_gp', 'gpSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-
-	!Lick the tip
-	elseif step = 2:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj50.mp4"></video></center>'
-		''
-		'You take <<$gp_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 <<gpDick>> cm length.'
-		gs 'arousal', 'bj', 3
-		gs 'stat'
-		orgB += rand(2, 7)
-		cockHard = 1
-		act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-
-	!suck the tip
-	elseif step = 3:
-		'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip3.mp4"></video></center>'
-		''
-		if cockHard = 0:
-			orgB += rand(5, 15)
-			'<<$gp_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)
-			'<<$gp_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 'pav_shared_gp', 'gpSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
-		end
-
-	!sucking dick
-	elseif step = 4:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj122.mp4"></video></center>'
-		''
-		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)
-			'<<$gp_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 'pav_shared_gp', 'gpSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
-		end
-	
-	!deepthroat
-	elseif step = 5:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroat.mp4"></video></center>'
-		''
-		orgB += rand(40, 60)
-		'You decide to take <<$gp_name>>''s hard, <<gpDick>> 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.'
-		gp_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 <<$gp_name>>''s crotch!</b>'
-			act 'Continue':step = 8 & gt 'pav_shared_gp', 'gpSuck'
-		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 'pav_shared_gp', 'gpSuck'
-		else
-			act 'Lick his balls':step = 1 & gt 'pav_shared_gp', 'gpSuck'
-			act 'Lick the tip':step = 2 & gt 'pav_shared_gp', 'gpSuck'
-			act 'Suck the tip':step = 3 & gt 'pav_shared_gp', 'gpSuck'
-			act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'
-			act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
-			if orgB >= 100:
-				act 'Try to make him cum':step = 6 & gt 'pav_shared_gp', 'gpSuck'
-			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:
-			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,5.mp4"></video></center>'
-			''
-			'Your attempt is successful, as <<$gp_name>> cums right into your mouth and on your face.'
-			gp_lastCum = daystart
-			gp_served = 1
-			gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol / 2
-			gs 'cum_call', 'face', $boy, 1, 0, gp_cumVol / 2
-			act 'Get up':step = 10 & gp_cumVol = 0 & gt 'pav_shared_gp', 'gpSuck'
-		else
-			failC += 1
-			if failC >= 3:
-				''
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
-				''
-				'<font color=#<<$gp_font>>>"You are such a lousy sucker <<$pcs_firstname>>. Get out!"</font>'
-				act 'Get up':step = 7 & gt 'pav_shared_gp', 'gpSuck'
-			else
-				''
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
-				''
-				'<font color=#<<$gp_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 'pav_shared_gp', 'gpSuck'
-				act 'Suck the cock':step = 4 & gt 'pav_shared_gp', 'gpSuck'	
-				act 'Deepthroat':step = 5 & gt 'pav_shared_gp', 'gpSuck'
-			end
-		end
-		gs 'stat'
-
-	!END cum fail
-	elseif step = 7:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-		''
-		'You get up from your knees, looking at <<$gp_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
-		'He looks really pissed:<font color=#<<$gp_font>>>"Get out you lousy slut!"</font>'
-		gp_rel -= 3
-		step = 0
-		gp_bjFail += 1
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	!END deepthroat fail
-	elseif step = 8:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
-		''
-		'<font color=#<<$gp_font>>>"Oh my god <<$pcs_firstname>>, have you just puked your shit onto me??!!"</font>'
-		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
-		'<font color=#<<$gp_font>>>"Get out you stupid cunt!"</font>'
-		gp_rel -= 5
-		step = 0
-		gp_bjFail += 1
-		gp_bjFailPuke += 1
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	!END deepthroat faint out
-	elseif step = 9:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
-		''
-		'You wake up being slapped in your face: <font color=#<<$gp_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=#<<$gp_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>!"</font> He is obviously entertained by this, even though you were unable to finish him.'
-		gp_rel += 1
-		step = 0
-		gp_bjFail += 1
-		gp_bjFailFaint += 1
-		act 'Get up and leave':gt 'pav_shared_apt', 'start'
-
-	!END cum success
-	elseif step = 10:
-		gp_bj += 1
-		if gp_mood <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<font color=#<<$gp_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
-			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
-			gp_rel += 1
-			step = 0
-		else
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<<$gp_name>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
-			'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 'pav_shared_apt', 'payService'
-	end
-end
-
-if $ARGS[0] = 'gpSexVaginal':
-	'<b><font color=#<<$gp_font>>><<$gp_name>> - vaginal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-		if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-		if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
-	end
-	''
-	$loc_arg = 'gpSexVaginal'
-	price = price_vaginal
-	if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
-
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$gp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
-		'His somewhat thin but muscular body has the rather pale skin. He moves towards you, lubing his <<gpDick>> cm long cock and stroking it on the way.'
-		if $pantyworntype ! 'none':
-			gs 'panties', 'remove'
-			gs 'stat'
-			'<font color=#<<$gp_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</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
-		'<<$gp_name>> takes you by the ass, instantly poking his fingers into your pussy.'
-		'<font color=#<<$gp_font>>>"Do you want to have your pussy fucked a certain way, or should I choose?"</font>'
-		if gp_pornPos = 0:hisPos = rand(1, 3)
-		if gp_pornPos = 1:hisPos = rand(1, 4)
-		if gp_pornPos = 2:hisPos = rand(1, 5)
-		if gp_vacuum = 1:hisPos = rand(1, 6)
-
-		act 'Let him choose':step = hisPos & gt 'pav_shared_gp', 'gpSexVaginal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_doPornpos = 1 and gp_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':gp_rel += 3 & step = 4 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_doPornpos = 2 and gp_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':gp_rel += 2 & step = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_doVacuum = 1 and gp_vacuum < 1:act 'You told me you want to test some kind dick enlarger device...':gp_rel += 2 & step = 6 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
-		if gp_vacuum = 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_gp', 'gpSexVaginal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary1.mp4"></video></center>'
-			''
-			'You lie on the bed, spreading your legs for easy access.'
-			'<<$gp_name>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
-			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
-			'He points the tip of his <<gpDick>> to your pussy and looks up to your face: <font color=#<<$gp_font>>>"Look at me while I penetrate your slit!"</font>'
-			'Slightly shaking you do as he says...'
-			'In that moment he pushes his dick inside you as far as your somewhat dry pussy let''s him.'
-			'<<$gp_name>> bangs you wildly right from the start.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(10, 25) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as fast as he can, all his <<gpDick>> cm are inside you.'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(30, 50) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-
-	!doggy
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagdoggy1.mp4"></video></center>'
-			''
-			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
-			'<<$gp_name>> kneels behind you, probing your vagina with several of his fingers.'
-			'<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the entry!"</font>'
-			'After his words, he grabs your hips and thrusts all of his <<gpDick>> centimeters inside your pussy, making you scream from discomfort.'
-			'The first pain fades away and you can feel building warmth and a good feeling of being fucked from behind like a mare in heat.'
-			'He fucks you furiously right from the start.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20)
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckroughvaginal4.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as deep and as fast he can, the every one of his <<gpDick>> 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 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
-			'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
-			'<<$gp_name>> takes his rod, pointing the tip right to the entry of your vagina.'
-			'<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
-			'Then he pushes as far as his <<gpDick>> cm long dick can reach.' 
-			'<<$gp_name>> bangs you wildly right from the start.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(10, 25) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as deep as he can and giving the position and the whole (<<gpDick>> cm) size of his dick, most of the strokes hurt.'
-			gs 'pain', 1, 'vaginal', 'stretch'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(30, 50) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-
-	!full nelson
-	elseif step = 4:
-		if gp_pornPos < 1:gp_pornPos = 1
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson1.jpg"></center>'
-			''
-			'You let him sit on the edge of the bed, having his large dick prepared for your vagina.'
-			'Facing him with your back, you climb on top of him and burry his <<gpDick>> cm long dick in your pussy. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$gp_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
-			'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
-			'In this position you literally see every stroke of his <<gpDick>> cm long penis into your pussy... And there is nothing else you can do.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(30, 50) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> rams you as deep as he can.'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(40, 60) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-
-	!pile driver
-	elseif step = 5:
-		if gp_pornPos < 2:gp_pornPos = 2
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver1.jpg"></center>'
-			''
-			'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.'
-			'<<$gp_name>> now has the very best access to your pussy: <font color=#<<$gp_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
- 			'He goes to you, probing your pussy with several of his fingers.'
-			'After while he takes his phallus, somehow bending it downwards and pushes it inside you.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(30, 50) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> rams you as deep as he can, making big effort to hammer you down as much as he can.'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(40, 60) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-
-	!vacuum enlarged fuck
-	elseif step = 6:
-		if gp_vacuum < 1:gp_vacuum = 1
-		if subStep = 0:
-			minut += 5
-			gpDick_enlarged = gpDick + (gpDick * rand(20, 40) / 100)
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
-			''
-			'<<$gp_name>> takes a vacuum dick enlarger device from his closet, putting it on his already <<gpDick>> cm long dick.'
-			'As he is pushing the pump, you can see the cock getting larger with each push.'
-			'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<gpDick_enlarged>> cm!'
-			act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep1.mp4"></video></center>'
-			''
-			'<font color=#<<$gp_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Pussy Destroyer!"</font>'
-			'As he reaches for your pussy you close eyes and brace for the expected pain.'
-			'He starts pushing it into, and even that it is quite lubed, it goes hard.'
-			'Finally he slips through the inner barrier and thrusts large part of his enlarged, <<gpDick_enlarged>> cm long and very thick dick into you.'
-			orgB += rand(20, 30)
-			gs 'pain', 1, 'vaginal', 'tear'
-			act 'Endure it':subStep = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep2.mp4"></video></center>'
-			''
-			'<<$gp_name>> uses his newly gained centimeters and fucks you harder than usual, making you scream and moan and beg for relief... in vain.'
-			'Today he obviously enjoys his dominance and fucks you relentlessly.'
-			'You have no strength to fight him and just try to endure it till the end.'
-			orgB += rand(40, 60)
-			gs 'pain', 1, 'vaginal', 'stretch'
-			if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexVaginal'			
-		end
-
-	!where to cum
-	elseif step = 10:
-		if subStep = 0:
-			minut += 2
-			'<<$gp_name>> is groaning wildly, you can say that he is reaching his orgasm.'
-			'You decide to tell him:'
-			gp_served = 1
-			gp_vag += 1
-			act 'Cum inside me':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_gp', 'gpSexVaginal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm, pumping his load <<gpDick>> cm deep inside your pussy.'
-			gp_vagCumInside += 1
-			gp_cumVag += gp_cumVol
-			gp_lastCum = daystart
-			gs 'cum_call', '', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'vaginal', 2
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
-			'A large pool of cum lands on your abdomen, feeling warm but sticky.'
-			minut += 2
-			gp_lastCum = daystart
-			gs 'cum_call', 'stomach', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm 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
-			gp_lastCum = daystart
-			gs 'cum_call', 'butt', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees 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...'
-			'<font color=#<<$gp_font>>>"Oh yes, now that''s the right makeup for a girl!"</font>'
-			minut += 2
-			gp_lastCum = daystart
-			gs 'cum_call', 'face', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'You expect <<$gp_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=#<<$gp_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</font>'
-			if tabletkishot = 0 and pillcon < 0:
-				'<font color=#<<$pcs_font>>>"I am not on the pill <<$gp_name>>!"</font>'
-				'<font color=#<<$gp_font>>>"And? Your problem. Piss off."</font>'
-				'He is obvously annoyed by your reaction.'
-				gp_rel -= 5
-			else
-				gp_rel -= 3
-			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.'
-			gp_lastCum = daystart
-			gp_cumVag += gp_cumVol
-			gp_vagCumInside += 1
-			gp_vagCumInsideUnwanted += 1
-			gs 'cum_call', '', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'vaginal', 5, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-
-		!will you swallow?
-		elseif subStep = 6:
-			'<font color=#<<$gp_font>>>"I will cum in your pussy or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
-			act 'Swallow':subStep = 20 & gt 'pav_shared_gp', 'gpSexVaginal'
-			act 'Pussy':subStep = 1 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if gp_mood <= 2:act 'Neither!':subStep = 30 & gt 'pav_shared_gp', 'gpSexVaginal'
-			if gp_mood > 2:act 'Neither!':subStep = 5 & gt 'pav_shared_gp', 'gpSexVaginal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
-			''
-			'<<$gp_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.'
-			'<<$gp_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...'
-			'<font color=#<<$gp_font>>>"Good girl, better than any food, is it?"</font>'
-			gp_lastCum = daystart
-			gp_cumSwall += gp_cumVol
-			gp_swall += 1
-			gp_rel += 1
-			minut += 5
-			gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!swallow NO
-		elseif subStep = 30:
-			'<font color=#<<$gp_font>>>"Allright I''ll cum elsewhere, but only because I have a <<$nd_mood>> mood today!"</font>'
-			gp_rel -= 3
-			cumOutL2 = rand(2, 4)
-			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_gp', 'gpSexVaginal'
-		end
-	end
-end
-
-if $ARGS[0] = 'gpSexAnal':
-	'<b><font color=#<<$gp_font>>><<$gp_name>> - anal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-		if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
-		if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
-		if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
-	end
-	''
-	$loc_arg = 'gpSexAnal'
-	price = price_anal
-	if step > 0:'<<$gp_name>> orgasm build-up: '+orgB+'/100'
-
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$gp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
-		'His somewhat thin but muscular body has the rather pale skin. He moves towards you, lubing his <<gpDick>> cm long cock and stroking it on the way.'
-		if $pantyworntype ! 'none':
-			gs 'panties', 'remove'
-			gs 'stat'
-			'<font color=#<<$gp_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</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
-		'<<$gp_name>> takes you by the ass, instantly poking his fingers into your anus.'
-		'<font color=#<<$gp_font>>>"Do you want to have your ass fucked a certain way, or should I choose?"</font>'
-		if gp_pornPos = 0:hisPos = rand(1, 3)
-		if gp_pornPos = 1:hisPos = rand(1, 4)
-		if gp_pornPos = 2:hisPos = rand(1, 5)
-		if gp_vacuum = 1:hisPos = rand(1, 6)
-
-		act 'Let him choose':step = hisPos & gt 'pav_shared_gp', 'gpSexAnal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_gp', 'gpSexAnal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_doPornpos = 1 and gp_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':gp_rel += 3 & step = 4 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_doPornpos = 2 and gp_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':gp_rel += 2 & step = 5 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_doVacuum = 1 and gp_vacuum < 1:act 'You told me you want to test some kind dick enlarger device...':gp_rel += 2 & step = 6 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_gp', 'gpSexAnal'
-		if gp_vacuum >= 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_gp', 'gpSexAnal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analmissionary1.mp4"></video></center>'
-			''
-			'You lie on the bed, spreading your legs for easy access.'
-			'<<$gp_name>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
-			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
-			'He points the tip of his <<gpDick>> to your pussy and looks up to your face: <font color=#<<$gp_font>>>"Look at me while I penetrate your sphincter!"</font>'
-			! normal/or-better mood OR likes Sveta
-			if gp_mood <= 3 or gp_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
-				'Slightly shaking you do as he says...'
-				'In that moment he pushes his dick inside your ass as far as he can!'
-				'<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
-				'<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
-				gs 'pain', 1, 'asshole', 'tear'
-			end
-			'<<$gp_name>> bangs you wildly right from the start.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="/images/locations/shared/abduction/sex/slavewhorefuckanal5.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as deep as he can, all his <<gpDick>> centimeters are inside you.'
-			gs 'arousal', 'anal', 10
-			gs 'stat'
-			orgB += rand(20, 40) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-
-	!behind
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal3.mp4"></video></center>'
-			''
-			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
-			'<<$gp_name>> kneels behind you, poking your anus with several of his fingers.'
-			! normal/or-better mood OR likes Sveta
-			if gp_mood <= 3 or gp_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
-				'In a few moments he pushes his dick inside your ass as far as he can!'
-				'<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
-				'<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
-				gs 'pain', 1, 'asshole', 'tear'
-			end
-			'<<$gp_name>> bangs you wildly right from the start.'	
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20)
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			minut += 10
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as deep and as fast he can, the every one of his <<gpDick>> 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 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
-			'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
-			'<<$gp_name>> takes his rod, pointing the tip right to your anus.'
-			'<font color=#<<$gp_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
-			! normal/or-better mood OR likes Sveta
-			if gp_mood <= 3 or gp_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
-				'In a few moments he pushes his dick inside your ass as far as he can!'
-				'<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
-				'<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
-				gs 'pain', 1, 'asshole', 'tear'
-			end
-			'<<$gp_name>> bangs you wildly right from the start.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal1.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_name>> now rams you as deep and he can and giving the position and the entire (<<gpDick>> cm) size of his dick, the continuous banging hurts.'
-			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 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-
-	!full nelson
-	elseif step = 4:
-		if gp_pornPos < 1:gp_pornPos = 1
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analfullnelson1.jpg"></center>'
-			''
-			'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 <<gpDick>> cm long dick in your anus. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$gp_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
-			'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
-			'In this position you literally see every stroke of his <<gpDick>> cm long penis into your pussy... And there is nothing else you can do.'
-			'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.'
-			'You feel like being continuously impaled.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(20, 40) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal3.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_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 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-
-	!pile driver
-	elseif step = 5:
-		if gp_pornPos < 2:gp_pornPos = 2
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver1.jpg"></center>'
-			''
-			'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.'
-			'<<$gp_name>> now has the very best access to your pussy: <font color=#<<$gp_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
- 			'He goes to you, probing your pussy with several of his fingers.'
-			! normal/or-better mood OR likes Sveta
-			if gp_mood <= 3 or gp_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 rams his <<gpDick>> cm long thick dick into your anus.'
-				'<font color=#<<$pcs_font>>>"Ouuuch! <<$gp_name>>, that hurt!"</font>'
-				'<font color=#<<$gp_font>>>"Shut up <<$pcs_firstname>> and take it like a good anal slut!"</font>'
-				gs 'pain', 1, 'asshole', 'tear'
-			end
-			'You feel like being continuously impaled.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(20, 40) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver2.mp4"></video></center>'
-			''
-			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
-			'<<$gp_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 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-	
-	!vacuum enlarged fuck
-	elseif step = 6:
-		if gp_vacuum < 1:gp_vacuum = 1
-		if subStep = 0:
-			minut += 5
-			gpDick_enlarged = gpDick + (gpDick * rand(20, 40) / 100)
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
-			''
-			'<<$gp_name>> takes a vacuum dick enlarger device from his closet, putting it on his already <<gpDick>> cm long dick.'
-			'As he is pushing the pump, you can see the cock getting larger with each push.'
-			'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<gpDick_enlarged>> cm!'
-			act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analvacuumenlargerpen.mp4"></video></center>'
-			''
-			'<font color=#<<$gp_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Anus Destroyer!"</font>'
-			'As he reaches for your ass you close eyes and brace for the expected pain.'
-			'He starts pushing it into you, and even that it is quite lubed, it goes hard.'
-			'Finally he slips through the sphincter and thrusts large part of his enlarged, <<gpDick_enlarged>> cm long and very thick dick into your ass.'
-			orgB += rand(20, 30)
-			gs 'pain', 1, 'asshole', 'tear'
-			act 'Endure it':subStep = 2 & gt 'pav_shared_gp', 'gpSexAnal'
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanaldeep1.mp4"></video></center>'
-			''
-			'<<$gp_name>> uses his newly gained centimeters and fucks your ass harder than usual, making you scream and moan and beg for relief... in vain.'
-			'Today he obviously enjoys his dominance and fucks you relentlessly.'
-			'You have no strength to fight him and just try to endure it till the end.'
-			gs 'pain', 1, 'asshole', 'stretch'
-			orgB += rand(40, 60) 
-			if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_gp', 'gpSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_gp', 'gpSexAnal'			
-		end
-
-	!where to cum
-	elseif step = 10:
-		if subStep = 0:
-			minut += 2
-			'<<$gp_name>> is groaning loudly, you can say that he is reaching his orgasm.'
-			'You decide to tell him:'
-			gp_served = 1
-			gp_anal += 1
-			act 'Cum inside me':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_gp', 'gpSexAnal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumanal4.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm, pumping his load <<gpDick>> cm deep inside your anus.'
-			gp_analCumInside = 1
-			gp_lastCum = daystart
-			gp_cumAnal += gp_cumVol
-			gs 'cum_call', 'anus', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'anal', 2
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
-			'A large pool of cum lands on your abdomen, feeling warm but sticky.'
-			minut += 2
-			gp_lastCum = daystart
-			gs 'cum_call', 'stomach', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm 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
-			gp_lastCum = daystart
-			gs 'cum_call', 'butt', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
-			''
-			'<<$gp_name>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees 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...'
-			'<font color=#<<$gp_font>>>"Oh yes, now that''s the right makeup for an anal whore like you!"</font>'
-			minut += 2
-			gp_lastCum = daystart
-			gs 'cum_call', 'face', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'You expect <<$gp_name>> to take his cock out of your ass 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=#<<$gp_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</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=#<<$gp_font>>>"Every girl deserves having her ass cumpumped, so piss off!"</font>'
-			'He is obvously annoyed by your reaction.'
-			'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.'
-			gp_lastCum = daystart
-			gp_cumAnal += gp_cumVol
-			gp_analCumInside += 1
-			gp_analCumInsideUnwanted += 1
-			gp_rel -= 3
-			gs 'cum_call', '', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'anal', 5, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!will you swallow?
-		elseif subStep = 6:
-			'<font color=#<<$gp_font>>>"I will cum in your ass or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
-			act 'Swallow':subStep = 20 & gt 'pav_shared_gp', 'gpSexAnal'
-			act 'Ass':subStep = 1 & gt 'pav_shared_gp', 'gpSexAnal'
-			if gp_mood <= 2:act 'Neither!':subStep = 30 & gt 'pav_shared_gp', 'gpSexAnal'
-			if gp_mood > 2:act 'Neither!':subStep = 5 & gt 'pav_shared_gp', 'gpSexAnal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth3.mp4"></video></center>'
-			''
-			'<<$gp_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.'
-			'<<$gp_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...' 		
-			'<font color=#<<$gp_font>>>"Good girl, better than any food, is it?"</font>'
-			gp_swall += 1	
-			gp_rel += 1
-			minut += 5
-			gp_lastCum = daystart
-			gp_cumSwall += gp_cumVol
-			gs 'cum_call', 'mouth', $boy, 1, 0, gp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':gp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!swallow NO
-		elseif subStep = 30:
-			'<font color=#<<$gp_font>>>"Allright I''ll cum elsewhere, but only because I have a <<$nd_mood>> mood today!"</font>'
-			gp_rel -= 3
-			cumOutL2 = rand(2, 4)
-			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_gp', 'gpSexAnal'
-		end
-	end
-end
-
---- pav_shared_gp ---------------------------------
-

+ 0 - 1644
locations/pav_shared_nd.qsrc

@@ -1,1644 +0,0 @@
-# pav_shared_nd
-
-if $ARGS[0] = 'nd':
-	menu_off = 1
-	$loc_arg = 'nd'
-	minut += 2
-	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-	''
-	'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 ''pav_shared_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 'pav_shared_apt', '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 'pav_shared_apt', 'start'	
-	! cum on belly, breasts, ass, pussy; visible only when nude
-	elseif cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0 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 'pav_shared_apt', 'start'
-	else
-		'<font color=#<<$nd_font>>>"Hello <<$pcs_firstname>>, what do you need?"</a>'
-		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
-		act 'Chat with him':gt 'pav_shared_nd', 'ndChat'
-		if servitudeLvl = 2 and nd_served = 0:act 'Offer him to serve':gt 'pav_shared_nd', 'ndServe'
-	end
-end
-
-if $ARGS[0] = 'ndChat':
-	menu_off = 1
-	$loc_arg = 'ndChat'
-	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-	''
-	! 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 'pav_shared_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 'pav_shared_nd', 'ndChat'
-			act 'Leave':gt 'pav_shared_apt', '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 'pav_shared_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 'pav_shared_nd', 'ndChat'
-				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_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 'pav_shared_nd', 'ndChat'
-				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_nd', 'ndChat'
-
-			elseif servitudeLvl = 2:
-				act 'Talk about sex':step = 30 & gt 'pav_shared_nd', 'ndChat'
-				act 'Continue':step = 0 & gt 'pav_shared_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 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_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 'pav_shared_nd', 'ndChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_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 'pav_shared_nd', 'ndChat'
-					act'Let it be':step = 0 & gt 'pav_shared_nd', 'ndChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_nd', 'ndChat'
-				end
-			end
-		end
-
-	! anal plug
-	elseif chatLvl = 10:
-		'<font color=#<<$nd_font>>>"O-OK... <<$pcs_firstname>>, I''ll help you."</font>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugpullout.mp4"></video></center>'
-		''
-		'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 'pav_shared_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 'pav_shared_nd', 'ndChat'
-		act 'It''s fine if you like it, but I find it repugnant':nd_rel -= 5 & nd_doPiss = -1 & gt 'pav_shared_nd', 'ndChat'
-		act 'It''s just a kink like any other':nd_rel += 10 & nd_doPiss = 1 & gt 'pav_shared_nd', 'ndChat'
-	end
-end
-
-if $ARGS[0] = 'ndDick':
-	menu_off = 1
-	minut += 2
-	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
-	if set_imgh < 250:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	'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 $loc_arg = 'nd':
-		act 'Continue':gt 'pav_shared_nd', 'nd'
-	else
-		act 'Continue':gt 'pav_shared_apt', $goBack
-	end
-end
-
-if $ARGS[0] = 'ndServe':
-	menu_off = 1
-	$boy = $nd_name
-	gs 'npcgeneratec', 0, $boy, 21
-	gs 'boyStat', $npclastgenerated
-	minut += 2
-	$loc_arg = 'ndServe'
-	'<h3><font color=#<<$nd_font>>><<$nd_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-	''
-	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 'pav_shared_apt', '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 'pav_shared_apt', '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 'pav_shared_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 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndServe'
-					act 'You told me you wanted to try anal, didn''t you?': nd_rel += 2 & gt 'pav_shared_nd', 'ndSexAnal'
-				else
-					gt 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndServe'
-					act 'You told me you have this secret dream about pissing, do you?':nd_rel += 2 & gt 'pav_shared_nd', 'ndSexPiss'
-				else
-					gt 'pav_shared_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 'pav_shared_nd', 'ndSexPiss'
-			else
-				gt 'pav_shared_nd', 'ndServe'		
-			end
-		end
-		if actionR > 1:act 'Say you changed your mind and leave': nd_rel -= 1 & gt 'pav_shared_apt', 'start'
-	end
-end
-
-if $ARGS[0] = 'ndSuckBellowTable':
-	'<b><font color=#<<$nd_font>>><<$nd_name>> - blowjob under table</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'ndSuckBellowTable'
-	price = price_blowjob
-	if step > 0:'<<$nd_name>> orgasm build-up: '+orgB+'/100'
-
-	if step = 0:
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjtablestart.jpg"></center>'
-		'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 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck just the tip':step = 2 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-	
-	!kissing tip
-	elseif step = 1:
-		orgB += rand(0, 10) / nd_mood
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjtablekisstip.mp4"></video></center>'
-		'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 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'	
-	
-	!sucking tip
-	elseif step = 2:
-		'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable3.mp4"></video></center>'
-		''
-		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 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck just the tip':step = 2 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'	
-		act 'Deepthroat':step = 4 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 5 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		end
-
-	!sucking dick
-	elseif step = 3:
-		'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable4.mp4"></video></center>'
-		''
-		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 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck just the tip':step = 2 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'	
-		act 'Deepthroat':step = 4 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 5 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-		end
-	
-	!deepthroat
-	elseif step = 4:
-		orgB += rand(40, 60)
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjtabledeepthroat.mp4"></video></center>'
-		''
-		'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 'pav_shared_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 'pav_shared_nd', 'ndSuckBellowTable'
-		else
-			act 'Lick the tip':step = 1 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-			act 'Suck just the tip':step = 2 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-			act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'	
-			act 'Deepthroat':step = 4 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-			if orgB >= 100:
-				act 'Try to make him cum':step = 5 & gt 'pav_shared_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:
-			''
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth4.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSuckBellowTable'
-		else
-			failC += 1
-			if failC >= 3:
-				''
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
-				''
-				'<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 'pav_shared_nd', 'ndSuckBellowTable'
-			else
-				''
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
-				''
-				'<font color=#<<$nd_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
-				act 'Lick the tip':step = 1 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-				act 'Suck just the tip':step = 2 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-				act 'Suck the cock':step = 3 & gt 'pav_shared_nd', 'ndSuckBellowTable'	
-				act 'Deepthroat':step = 4 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-				if orgB >= 100:
-					act 'Try to make him cum':step = 5 & gt 'pav_shared_nd', 'ndSuckBellowTable'
-				end
-			end
-		end
-		gs 'stat'
-
-	!END cum fail
-	elseif step = 6:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-		'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 'pav_shared_apt', 'start'
-
-	!END deepthroat fail
-	elseif step = 7:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
-		''
-		'<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 'pav_shared_apt', 'start'
-
-	!END deepthroat fade out
-	elseif step = 8:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
-		''
-		'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 'pav_shared_apt', 'start'
-
-	!END cum success
-	elseif step = 9:
-		nd_bj += 1
-		if nd_mood <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<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
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-	end
-end
-
-if $ARGS[0] = 'ndSuck':
-	'<b><font color=#<<$nd_font>>><<$nd_name>> - blowjob</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = '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
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		''
-		'<<$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 'pav_shared_nd', 'ndSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-
-	!lick balls
-	elseif step = 1:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj70.mp4"></video></center>'
-		''
-		'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 'pav_shared_nd', 'ndSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-
-	!Lick the tip
-	elseif step = 2:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus1.mp4"></video></center>'
-		''
-		'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 'pav_shared_nd', 'ndSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-
-	!suck the tip
-	elseif step = 3:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj110.mp4"></video></center>'
-		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 'pav_shared_nd', 'ndSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_nd', 'ndSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_nd', 'ndSuck'
-		end
-
-	!sucking dick
-	elseif step = 4:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj23.mp4"></video></center>'
-		''
-		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 'pav_shared_nd', 'ndSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_nd', 'ndSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_nd', 'ndSuck'
-		end
-	
-	!deepthroat
-	elseif step = 5:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/bj1.mp4"></video></center>'
-		''
-		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 'pav_shared_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 'pav_shared_nd', 'ndSuck'
-		else
-			act 'Lick his balls':step = 1 & gt 'pav_shared_nd', 'ndSuck'
-			act 'Lick the tip':step = 2 & gt 'pav_shared_nd', 'ndSuck'
-			act 'Suck the tip':step = 3 & gt 'pav_shared_nd', 'ndSuck'
-			act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'
-			act 'Deepthroat':step = 5 & gt 'pav_shared_nd', 'ndSuck'
-			if orgB >= 100:
-				act 'Try to make him cum':step = 6 & gt 'pav_shared_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:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth1.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSuck'
-		else
-			failC += 1
-			if failC >= 3:
-				''
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
-				''
-				'<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 'pav_shared_nd', 'ndSuck'
-			else
-				''
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
-				''
-				'<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 'pav_shared_nd', 'ndSuck'
-				act 'Suck the cock':step = 4 & gt 'pav_shared_nd', 'ndSuck'	
-				act 'Deepthroat':step = 5 & gt 'pav_shared_nd', 'ndSuck'
-			end
-		end
-		gs 'stat'
-
-	!END cum fail
-	elseif step = 7:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-		''
-		'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 'pav_shared_apt', 'start'
-
-	!END deepthroat fail
-	elseif step = 8:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
-		''
-		'<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 'pav_shared_apt', 'start'
-
-	!END deepthroat fade out
-	elseif step = 9:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
-		''
-		'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 'pav_shared_apt', 'start'
-
-	!END cum success
-	elseif step = 10:
-		nd_bj += 1
-		if nd_mood <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<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
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-	end
-end
-
-if $ARGS[0] = 'ndSexVaginal':
-	'<b><font color=#<<$nd_font>>><<$nd_name>> - vaginal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = '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'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$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 'pav_shared_nd', 'ndSexVaginal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_nd', 'ndSexVaginal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_nd', 'ndSexVaginal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndSexVaginal'
-		if nd_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_nd', 'ndSexVaginal'
-		if nd_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_nd', 'ndSexVaginal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagmissionary1.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagmissionary2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexVaginal'
-		end
-
-	!doggy
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagdoggy1.mp4"></video></center>'
-			''
-			'You kneel on the bed, bending your back as much as you can, putting your nice round 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 'pav_shared_nd', 'ndSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagdoggy2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexVaginal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
-			'He takes this as an 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 'pav_shared_nd', 'ndSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexVaginal'
-		end
-
-	!full nelson
-	elseif step = 4:
-		if nd_pornPos < 1:nd_pornPos = 1
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson1.jpg"></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexVaginal'
-		end
-
-	!pile driver
-	elseif step = 5:
-		if nd_pornPos < 2:nd_pornPos = 2
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver1.jpg"></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_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 'pav_shared_nd', 'ndSexVaginal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_nd', 'ndSexVaginal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
-			''
-			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'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 'pav_shared_apt', '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 'pav_shared_nd', 'ndSexVaginal'
-			act 'No':subStep = 30 & gt 'pav_shared_nd', 'ndSexVaginal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', '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 'pav_shared_nd', 'ndSexVaginal'
-		end
-	end
-end
-
-if $ARGS[0] = 'ndSexAnal':
-	'<b><font color=#<<$nd_font>>><<$nd_name>> - anal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = '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'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$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 'pav_shared_nd', 'ndSexAnal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_nd', 'ndSexAnal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_nd', 'ndSexAnal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndSexAnal'
-		if nd_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_nd', 'ndSexAnal'
-		if nd_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_nd', 'ndSexAnal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal5.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexAnal'
-		end
-
-	!behind
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analdoggy1.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analdoggy2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexAnal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
-			'He takes this as an 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 'pav_shared_nd', 'ndSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexAnal'
-		end
-
-	!full nelson
-	elseif step = 4:
-		if nd_pornPos < 1:nd_pornPos = 1
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analfullnelson1.jpg"></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal3.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nd', 'ndSexAnal'
-		end
-
-	!pile driver
-	elseif step = 5:
-		if nd_pornPos < 2:nd_pornPos = 2
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver1.jpg"></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver2.mp4"></video></center>'
-			''
-			'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 'pav_shared_nd', 'ndSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_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 'pav_shared_nd', 'ndSexAnal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_nd', 'ndSexAnal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumanal4.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
-			''
-			'<<$nd_name>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'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 'pav_shared_apt', '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 'pav_shared_nd', 'ndSexAnal'
-			act 'No':subStep = 30 & gt 'pav_shared_nd', 'ndSexAnal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cummouth3.mp4"></video></center>'
-			''
-			'<<$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 'pav_shared_apt', '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 'pav_shared_nd', 'ndSexAnal'
-		end
-	end
-end
-
-if $ARGS[0] = 'ndSexPiss':
-	'<b><font color=#<<$nd_font>>><<$nd_name>> - Golden Shower</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'ndSexPiss'
-	price = price_special
-
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/shared/sex/undress/kotovpre11.mp4"></video></center>'
-		''
-		'<<$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 'pav_shared_nd', 'ndSexPiss'
-	
-	! foreplay
-	elseif step = 10:
-		gs 'arousal', 'foreplay', 5
-		'<center><video autoplay loop src="images/shared/sex/kiss/kotovpre10.mp4"></video></center>'
-		''
-		'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 'pav_shared_nd', 'ndSexPiss'
-
-	! suck
-	elseif step = 20:
-		gs 'arousal', 'bj', 3
-		cockHard = 1
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj120.mp4"></video></center>'
-		''
-		'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 'pav_shared_nd', 'ndSexPiss'
-
-	! vaginal
-	elseif step = 30:
-		gs 'arousal', 'vaginal', 5
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsexbonus17.mp4"></video></center>'
-		''
-		'<<$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 'pav_shared_nd', 'ndSexPiss'
-
-	! anal
-	elseif step = 40:
-		gs 'arousal', 'anal', 5
-		'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal30.mp4"></video></center>'
-		''
-		'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 'pav_shared_nd', 'ndSexPiss'
-
-	! piss mouth
-	elseif step = 50:
-		pcs_hydra += 15
-		gs 'arousal', 'bj', 2, 'humiliation'
-		gs 'arousal', 'pee', -2, 'sub', 'humiliation'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pissmouth.mp4"></video></center>'
-		''
-		'<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 'pav_shared_nd', 'ndSexPiss'
-
-	! piss vaginal
-	elseif step = 60:
-		gs 'arousal', 'vaginal', 2, 'humiliation'
-		gs 'arousal', 'pee', -2, 'sub', 'humiliation'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pisspussy.mp4"></video></center>'
-		''
-		'<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 'pav_shared_nd', 'ndSexPiss'
-
-	! piss anal
-	elseif step = 70:
-		gs 'arousal', 'anal', 3, 'humiliation'
-		gs 'arousal', 'pee', -3, 'sub', 'humiliation'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pissanus.mp4"></video></center>'
-		''
-		'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 'pav_shared_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
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/analcum.jpg"></center>'
-		''
-		'<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 ass-cheeks 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 'pav_shared_nd', 'ndSexPiss'
-
-	! end
-	elseif step = 90:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pisssoaked.jpg"></center>'
-		''
-		'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 alright <<$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 'pav_shared_nd', 'ndSexPiss'
-			act 'I feel humiliated, please never make me do it again':pissLike = 0 & step = 100 & gt 'pav_shared_nd', 'ndSexPiss'
-			act 'It wasn''t so bad, but it doesn''t really arouse me though':pissLike = 1 & step = 100 & gt 'pav_shared_nd', 'ndSexPiss'
-			act 'I didn''t think I would, but I loved it':pissLike = 2 & step = 100 & gt 'pav_shared_nd', 'ndSexPiss'
-		else
-			'<font color=#<<$nd_font>>>"Are you alright <<$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 'pav_shared_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 'pav_shared_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 'pav_shared_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 'pav_shared_nd', 'ndSexPiss'
-			act 'Rather not':nd_piss = -1 & step = 110 & gt 'pav_shared_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 'pav_shared_nd', 'ndSexPiss'
-		end
-	
-	! paygate
-	elseif step = 110:
-		gs 'arousal', 'end'
-		gs 'stat'
-		nd_piss += 1
-		step = 0
-		gt 'pav_shared_apt', 'payService'
-	end
-end
-
---- pav_shared_nd ---------------------------------
-

+ 1474 - 0
locations/pav_shared_nestor.qsrc

@@ -0,0 +1,1474 @@
+# pav_shared_nestor
+
+if $ARGS[0] = 'nestor':
+	menu_off = 1
+	$loc_arg = 'nestor'
+	minut += 2
+	gs 'boyStat', 'A265'
+	'<h3><center><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>></font></h3></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+	''
+	'<<$npc_notes[$boy]>>'
+	if nestor_hadSex = 1:'As you know very well, <<$npc_firstname[$boy]>> has a <<$npc_thdick[$boy]>> npc_dick[$boy] cm long <a href="exec:gt ''pav_shared_nestor'', ''nestor_Dick''">dick</a> with somehow maintained pubic hair.'
+	''
+	'<b>Today he looks to be in a <<$nestor_mood>> mood.</b>'
+	if (totminut - nestor_served) >= rand(120, 180):
+		serve_nestor = 0
+		'It''s not even been 3 hours since you last served <<$npc_firstname[$boy]>>'
+	else
+		if servitudeLvl = 2: 
+			serve_nestor = 1
+		end
+	end
+	''
+
+	! 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=#<<$nestor_font>>>"Hey <<$pcs_firstname>>, is that cum? Go wash yourself, I don''t want you near me like that!"</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	! cum on clothes
+	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
+		'<font color=#<<$nestor_font>>>"Hey <<$pcs_firstname>>, is that cum on your clothes? Go change, I don''t want you near me like that!"</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	! cum on belly, breasts, ass, pussy; visible only when nude
+	elseif (cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0) and $clothingworntype = 'nude':
+		'<font color=#<<$nestor_font>>>"Hey <<$pcs_firstname>>, you dirty slut, you forgot to wash the cum off! Get out!"</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	else
+		'<font color=#<<$nestor_font>>>"Hey chick, here for fun?"</font>'
+		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
+		act 'Chat with him':gt 'pav_shared_nestor', 'nestor_Chat'
+		if serve_nestor = 1:act 'Offer him to serve':nestor_served = totminut & gt 'pav_shared_nestor', 'nestor_Serve'
+	end
+end
+
+if $ARGS[0] = 'nestor_Dick':
+	gs 'boyStat', 'A265'
+	menu_off = 1
+	minut += 2
+	'<h3><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>></font></h3>'
+	if set_imgh < 250:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	else
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	end
+	''
+	if npc_rel[$boy] < -80:
+		$rel_word[$boy] = 'terrible'
+		$color_rel = 'ff0000'
+	elseif npc_rel[$boy] < -60:
+		$rel_word[$boy] = 'very bad'
+		$color_rel = 'ff7824'
+	elseif npc_rel[$boy] < -40:
+		$rel_word[$boy] = 'bad'
+		$color_rel = 'fcb503'
+	elseif npc_rel[$boy] < -20:
+		$rel_word[$boy] = 'strained'
+		$color_rel = 'f0cc00'
+	elseif npc_rel[$boy] < 0:
+		$rel_word[$boy] = 'neutral'
+		$color_rel = 'fcfc0f'
+	elseif npc_rel[$boy] < 20:
+		$rel_word[$boy] = 'good'
+		$color_rel = 'abf246'
+	elseif npc_rel[$boy] < 40:
+		$rel_word[$boy] = 'great'
+		$color_rel = '84fc03'
+	elseif npc_rel[$boy] < 60:
+		$rel_word[$boy] = 'excellent'
+		$color_rel = '5eff00'
+	elseif npc_rel[$boy] >= 60:
+		$rel_word[$boy] = 'fantastic'
+		$color_rel = '03ff39'
+	end
+	
+	'Your relationship with ' + $npc_firstname[$boy] + ' is <font color=#' + $color_rel + '>' + $rel_word[$boy] + '</font>.'	
+	'His dick is npc_dick[$boy] cm long with somehow maintained pubic hair.'
+	''
+	'So far you have:'
+		if nestor_hj = 1:'- jerked him'	
+			if nestor_hj > 1:'- jerked him <<nestor_hj>> times' & if nestor_hjFail > 1:' and failed to make him cum with your hands <<nestor_hjFail>> times'
+		if nestor_bj = 1:'- given him a blowjob'
+			if nestor_bj > 1:'- given him <<nestor_bj>> blowjobs' & if nestor_bjFail > 1:' and failed to make him cum with your mouth <<nestor_bjFail>> times'
+		if nestor_bjDeep = 1:'- given him a blowjob with deepthroat'
+			if nestor_bjDeep > 1:'- given him <<nestor_bjDeep>> blowjobs with deepthroat' & if nestor_bjFailPuke > 1:' but failed and puked in his crotch <<nestor_bjFailPuke>> times' & if nestor_bjFailPuke > 1:' but failed and fainted impaled on his cock <<nestor_bjFailFaint>> times'
+		if nestor_swall = 1:'- swallowed <<nestor_cumSwall>> load of his cum'
+			if nestor_swall > 1:'- swallowed <<nestor_cumSwall>> loads of his cum'
+		if nestor_vag = 1:'- took it in your pussy' & if nestor_vagCumInside >= 1:' and let him cum inside you' & if nestor_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will'
+			if nestor_vag > 1:'- took it in your pussy <<nestor_vag>> times' & if nestor_vagCumInside >= 1:' and let him cum inside you <<nestor_vagCumInside>> times' & if nestor_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<nestor_vagCumInsideUnwanted>> times'
+		if nestor_cumVag > 0:'- he pumped a total of <<nestor_cumVag>> loads of cum into your pussy'
+		if nestor_anal = 1:'- took it in your ass' & if nestor_analCumInside >= 1:' and let him cum inside you' & if nestor_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will'
+			if nestor_anal > 1:'- took it in your ass <<nestor_anal>> times' & if nestor_analCumInside >= 1:' and let him cum inside you <<nestor_analCumInside>> times' & if nestor_analCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<nestor_analCumInsideUnwanted>> times'
+		if nestor_cumAnal > 1:'- he pumped  <<nestor_cumAnal>> loads of cum into your anus'
+	if $loc_arg = 'nestor':
+		act 'Continue':gt 'pav_shared_nestor', 'nestor'
+	else
+		act 'Continue':gt 'pav_shared_apt', $goBack
+	end
+end
+
+if $ARGS[0] = 'nestor_Chat':
+	gs 'boyStat', 'A265'
+	menu_off = 1
+	$loc_arg = 'nestor_Chat'
+	'<h3><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+	''
+	! basic chat
+	if chatLvl = 0:
+		!clothing and bodyshape reactions
+		say = rand(1, 2)
+		if say = 1:
+			if $clothingworntype = 'nude':
+				'<<$npc_firstname[$boy]>> is scanning your nude body with his eyes.'
+				if salocatnow <= 2:
+					'He obviously enjoys the sight: <font color=#<<$nestor_font>>>"Nice body <<$pcs_firstname>>. Are you here to offer it?"</font>'
+				elseif salocatnow > 2 and salocatnow <= 4:
+					'He is not very content with the sight: <font color=#<<$nestor_font>>>"You should lose some weight, <<$pcs_firstname>>, you are getting fat."</font>'
+				else
+					'He seems almost disgusted by the sight: <font color=#<<$nestor_font>>>"Jeezus <<$pcs_firstname>>, stop eating you are beginning to look like an elefant!"</font>'
+				end
+				!panties on
+				if salocatnow <= 4 and $pantyworntype ! 'none':
+					'<font color=#<<$nestor_font>>>"Why did you leave those panties on <<$pcs_firstname>>? Such a shame."</font>'
+				!panties off, anal plug
+				elseif salocatnow <= 4 and $pantyworntype = 'none' and analplugIN = 1:
+					'As you accidentally turn around, he gazes between your asscheeks on the plug stuck in your ass.'
+					'<font color=#<<$nestor_font>>>"Wow, you just can''t be a second without something filling your holes, do you?"</font>'
+					if rand(0, 100) < 30:
+						'As he watches you, he gets up and goes near you, his hand reaching for your plugged ass.'
+						act 'What are you doing?':chatLvl = 10 & gt 'pav_shared_nestor', 'nestor_Chat'
+					end
+				end
+			elseif CloBimbo = 1:
+				'<<$npc_firstname[$boy]>> is scanning your outfit with his eyes.'
+				if salocatnow <= 4:
+					'<font color=#<<$nestor_font>>>"You know I like when you dress like a mindless bimbo. Not that you aren''t, but anyway, good job!"</font>'
+				else
+					'<font color=#<<$nestor_font>>>"I like girls dressed like bimbos, but they should have the body shape for it. Waste of good cloth on you."</font>'
+				end
+			elseif CloStyle = 4:
+				'<<$npc_firstname[$boy]>> is scanning your outfit with his eyes.'
+				if salocatnow <= 4:
+					'<font color=#<<$nestor_font>>>"Only thing that I like more than stupid bimbos are whores. I won''t pay you anyway, but good job!"</font>'
+				else
+					'<font color=#<<$nestor_font>>>"I literally love whores, but with your body shape you won''t be earning much money, darling."</font>'
+				end
+			end
+		elseif say = 2:
+			! age reactions
+			if age < 18:
+				'<font color=#<<$nestor_font>>>"I like that you are only <<age>> years old<<$pcs_firstname>>."</font>'
+				if rand(0, 100)< 30:'<font color=#<<$nestor_font>>>"By the way, don''t you have even younger sister or girlfriend that would like, you know, to meet me?"</font>'
+			else
+				'<font color=#<<$nestor_font>>>"<<$pcs_firstname>> you are becoming too old for my taste. <<age>> years is too much."</font>'
+			end
+		end
+
+		if step = 0:
+			minut += 1
+			act 'Chat about everyday stuff': step = 10 & gt 'pav_shared_nestor', 'nestor_Chat'
+			act 'Leave':gt 'pav_shared_apt', 'start'
+		elseif step = 10:
+			minut += 15
+			sayN = rand(1, 10)
+			if sayN = 1:'<i><font color=#<<$nestor_font>>>"Once I have kicked a guy to his nose... he bled like a pig!"</font></i>'
+			if sayN = 2:'<i><font color=#<<$nestor_font>>>"Only morons have a job. I know how to make money without one, that''s a skill!"</font></i>'
+			if sayN = 3:'<i><font color=#<<$nestor_font>>>"I know some cool guys of your age. They often hang around in the park."</font></i>'
+			if sayN = 4:'<i><font color=#<<$nestor_font>>>"No one likes the authorities. Especially the cops. Yes. Fuck the cops!"</font></i>'
+			if sayN = 5:'<i><font color=#<<$nestor_font>>>"Don''t hang around the train station too much. Shady people, you know."</font></i>'
+			'<i>You spent some time chatting with him about his ventures and mischiefs, slightly improving your relation with him.</i>'
+			npc_rel['A265'] += 1
+			gs 'stat'
+			intimateTalkCh = rand(0, 100)
+			if nestor_mood <= 5 and intimateTalkCh <= 80:
+				step = 20
+			else
+				step = 0
+			end
+			act 'Continue':gt 'pav_shared_nestor', 'nestor_Chat'
+		elseif step = 20:
+			minut += 3
+			if servitudeLvl = 0:
+				'<font color=#<<$nestor_font>>>"<<$pcs_firstname>>, have you finally decided to be our maid?"</font>'
+				'<font color=#<<$pcs_font>>>"Jeez..."</font>'
+				'<font color=#<<$nestor_font>>>"Come on girl, don''t you see I need to tidy this shit-of-a-room?"</font>'
+				act 'Say you are still not iterested':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_nestor', 'nestor_Chat'
+			elseif servitudeLvl = 1:
+				'<font color=#<<$nestor_font>>>"<<$pcs_firstname>>, have you finally decided to be our fucktoy?"</font>'
+				'<font color=#<<$pcs_font>>>"What? I already clean and cook for you."</font>'
+				'<font color=#<<$nestor_font>>>"Hey, you have to earn the rent money somewhere anyway. This way you don''t need to whore yourself on the streets you know?"</font>'
+				act 'Say you are no whore and you are not interested':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_nestor', 'nestor_Chat'				
+			elseif servitudeLvl = 2:
+				act 'Talk about sex':step = 30 & gt 'pav_shared_nestor', 'nestor_Chat'
+				act 'Continue':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+			end
+		elseif step = 30:
+			minut += 5
+			'You get into rather wild discussion about sex, porn and all that stuff. <<$npc_firstname[$boy]>> is obviously thinking about sex most of his time.'
+			resCh = rand(0, 6)
+			if resCh <= 3:
+				topicR = rand(1, 5)
+				if topicR = 1:'<<$npc_firstname[$boy]>> tells you he loves rough sex.'
+				if topicR = 2:'<<$npc_firstname[$boy]>> tells you he loves when the girl is submissive.'
+				if topicR = 3:'<<$npc_firstname[$boy]>> tells you he kinda likes when it is a bit painful for the girl.'
+				if topicR = 4:'<<$npc_firstname[$boy]>> tells you his npc_dick[$boy] cm long dick is big enough, but he would like it to be even bigger.'
+				if topicR = 5:'<<$npc_firstname[$boy]>> tells you he loves when the girl is young and thin.'
+				act'Continue':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+			elseif resCh = 4:
+				if nestor_doPornpos = 0:
+					'<<$npc_firstname[$boy]>> tells you he loves to fuck girls in the Full Nelson position. He saw it in porn.'
+					act'Continue':nestor_doPornpos = 1 & npc_rel['A265'] += 1 & step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				elseif nestor_doPornpos = 1:
+					'<<$npc_firstname[$boy]>> tells you he loves to fuck girls in the Pile Driver position. He also saw it in porn.'
+					act'Continue':nestor_doPornpos = 2 & npc_rel['A265'] += 1 & step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				end
+			elseif resCh = 5: 
+				if nestor_doAnal = 0:
+					'<<$npc_firstname[$boy]>> tells you that he loves rough anal sex.'
+					act'Continue':nestor_doAnal = 1 & npc_rel['A265'] += 1 & step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				end
+			elseif resCh = 6:
+				if nestor_doAnal = 1 and nestor_doPornpos = 2:
+					'<<$npc_firstname[$boy]>> tells you that he recently bought a vacuum dick enlarger and cannot wait to test it.'
+					act'Continue':nestor_doVacuum = 1 & npc_rel['A265'] += 1 & step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+				end
+			end
+		end
+	
+	!anal plug
+	elseif chatLvl = 10:
+		'<font color=#<<$nestor_font>>>"Helping you out!"</font>'
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugpullout.mp4"></video></center>'
+		''
+		'Suddenly he grabs the plug and pulls it out without a warning!'
+		'PLOPPP... your ass makes a sound as the plug leaves it gaping.'
+		'<font color=#<<$pcs_font>>>"Ouuuch!"</font>'
+		'<font color=#<<$nestor_font>>>"You''re welcome <<$pcs_firstname>>, come again!"</font>'
+		analplugIN = 0
+		act 'Continue':chatLvl = 0 & gt 'pav_shared_nestor', 'nestor_Chat'
+	end
+end
+
+if $ARGS[0] = 'nestor_Serve':
+	gs 'boyStat', 'A265'
+	menu_off = 1
+
+	minut += 2
+	$loc_arg = 'nestor_Serve'
+	'<h3><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+	''
+	step = 0
+	subStep = 0
+
+	sexCh = rand(0, 100)
+
+	! very bad mood, does not want anything
+	if nestor_mood >= 7:
+		'<font color=#<<$nestor_font>>>"Not now <<$pcs_firstname>>, get lost."</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! random chance to sex
+	elseif sexCh < 40:
+		'<font color=#<<$nestor_font>>>"Not now <<$pcs_firstname>>, can''t you see I am busy?"</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! wants sex
+	else
+		actionR = rand(2, 6)
+		if actionR = 2:
+			'<font color=#<<$nestor_font>>>"You can do me with your little hands."</font>'
+			act 'Agree': npc_rel['A265'] += 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		elseif actionR = 3:
+			'<font color=#<<$nestor_font>>>"Sure <<$pcs_firstname>>, blow me right now."</font>'
+			act 'Agree': npc_rel['A265'] += 1 & gt 'pav_shared_nestor', 'nestor_Suck'
+		elseif actionR = 4:
+			'<font color=#<<$nestor_font>>>"Present your pussy, <<$pcs_firstname>>."</font>'
+			act 'Agree': npc_rel['A265'] += 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif actionR = 5:
+			if nestor_anal = 0:
+				if nestor_doAnal = 1:
+					'<font color=#<<$nestor_font>>>"Hmmm... what would I like to do to you?"</font>'
+					act 'It''s your choice':gt 'pav_shared_nestor', 'nestor_Serve'
+					act 'You told me you like anal, do you?': npc_rel['A265'] += 3 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+				else
+					gt 'pav_shared_nestor', 'nestor_Serve'
+				end
+			elseif nestor_anal >= 1:
+				'<font color=#<<$nestor_font>>>"Sure <<$pcs_firstname>>, I would like to take your ass this time."</font>'
+				act 'Agree': npc_rel['A265'] += 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			end
+		elseif actionR = 6:
+			if nestor_doVacuum >= 1:
+				'<font color=#<<$nestor_font>>>"Hmmm... what would I like to do to you?"</font>'
+				act 'It''s your choice':gt 'pav_shared_nestor', 'nestor_Serve'
+				act 'You told me you bought some vacuum enlarger, did you?':step = 6 & npc_rel['A265'] += 2 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			else
+				gt 'pav_shared_nestor', 'nestor_Serve'
+			end
+		end
+		if actionR > 1:act 'Say you changed your mind and leave': npc_rel['A265'] -= 1 & gt 'pav_shared_apt', 'start'
+	end
+end
+
+if $ARGS[0] = 'nestor_Handjob':
+	gs 'boyStat', 'A265'
+	'<b><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>> - handjob</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'nestor_Handjob'
+	price = price_handjob
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	if step = 0:
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> sits on his bed, spreading his legs, showing you where to go.'
+		'You drop on your knees, crawl to him and unzip his pants.'
+		'His dick falls out of them, already half hard. <font color=#<<$nestor_font>>>"Get to work, little girl."</font>'
+		'Looking at the cock, you decide to:'
+		cockHard = 0
+		act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+	
+	!slow strokes
+	elseif step = 1:
+		if nestor_mood = 0:
+			orgB += rand(0, 20)
+		else
+			orgB += rand(0, 20) / nestor_mood
+		end
+		'<center><video autoplay loop src="images/shared/sex/handjob/handjob2.mp4"></video></center>'
+		''
+		'You grab <<$npc_firstname[$boy]>>''s cock in your hand, jerking it slowly, changing the pressure from time to time.'
+		if cockHard = 0:cockHard = 1 & 'Your moves are slowly making the cock to get harder and harder, finally reaching his full npc_dick[$boy] cm length.'
+		gs 'arousal', 'hj', 3
+		gs 'stat'
+		
+		act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Jerk it fast':step = 2 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_nestor', 'nestor_Handjob'	
+	
+	!fast strokes
+	elseif step = 2:
+		'<center><video autoplay loop src="images/shared/sex/handjob/hj0.mp4"></video></center>'
+		''
+		orgB += rand(10, 20)
+		'You jerk his hard cock with quite a fast pace, making him moan from pleasure.'
+		gs 'arousal', 'hj', 3
+		gs 'stat'
+		act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Jerk it fast':step = 2 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_nestor', 'nestor_Handjob'	
+		if orgB >= 100:
+			act 'Try to make him cum':step = 5 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		end
+
+	!lube massage
+	elseif step = 3:
+		'<center><video autoplay loop src="images/shared/sex/handjob/handjob1.mp4"></video></center>'
+		''
+		orgB += rand(15, 30)
+		'You put some lube on your hands and massage his cock with it.'
+		'The slimy lube enables you to increase the sensation, making him moan even more inensively.'
+		'<font color=#<<$nestor_font>>>"Oh yeah <<$pcs_firstname>>, this is what girls should learn as young as possible!"</font>'
+		gs 'arousal', 'hj', 3
+		gs 'stat'
+		act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Jerk it fast':step = 2 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_nestor', 'nestor_Handjob'	
+		if orgB >= 100:
+			act 'Try to make him cum':step = 5 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		end
+	
+	!tip lube massage
+	elseif step = 4:
+		'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
+		''
+		minut += 3
+		orgB += rand(15, 30)
+		'You put some lube on your hands and massage the tip of his cock with it.'
+		'The slimy lube enables you to play with the violet head of his cock, stroking also the hole time to time.'
+		act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Jerk it fast':step = 2 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_nestor', 'nestor_Handjob'	
+		if orgB >= 100:
+			act 'Try to make him cum':step = 5 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		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', 'hj', 5
+		cumCh = rand(0, 100)
+		if cumCh <= 70:
+			''
+			'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,0.mp4"></video></center>'
+			''
+			'Your attempt is successful, as <<$npc_firstname[$boy]>> cums right onto your hands and squirts all around them.'
+			nestor_lastCum = daystart
+			gs 'cum_call', 'hands', $boy, 1
+			act 'Get up':step = 9 & gt 'pav_shared_nestor', 'nestor_Handjob'
+		else
+			failC += 1
+			if failC >= 3:
+				''
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
+				''
+				'<font color=#<<$nestor_font>>>"Come on <<$pcs_firstname>>, if you can''t suck a cock stop wasting my time. Get out!"</font>'
+				act 'Get up':step = 6 & gt 'pav_shared_nestor', 'nestor_Handjob'
+			else
+				''
+				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/kotovhj.jpg"></center>'
+				''
+				'<font color=#<<$nestor_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
+				act 'Jerk it slowly':step = 1 & gt 'pav_shared_nestor', 'nestor_Handjob'
+				act 'Jerk it fast':step = 2 & gt 'pav_shared_nestor', 'nestor_Handjob'
+				act 'Put on lube and massage the cock':step = 3 & gt 'pav_shared_nestor', 'nestor_Handjob'
+				act 'Put on lube and massage the tip':step = 4 & gt 'pav_shared_nestor', 'nestor_Handjob'
+			end
+		end
+
+	!END cum fail
+	elseif step = 6:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+		''
+		'You get up from your knees, looking at <<$npc_firstname[$boy]>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
+		'He looks really pissed:<font color=#<<$nestor_font>>>"Get out you lousy slut!"</font>'
+		npc_rel['A265'] -= 3
+		step = 0
+		nestor_hjFail += 1
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END cum success
+	elseif step = 9:
+		nestor_hj += 1
+		if nestor_mood <= 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<font color=#<<$nestor_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
+			'Cleaning your hands off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
+			npc_rel['A265'] += 1
+			step = 0
+		else
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
+			'You just pack your things and quietly leave through the door.'
+			step = 0
+		end
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave': gt 'pav_shared_apt', 'payService'
+	end
+end
+
+if $ARGS[0] = 'nestor_Suck':
+	gs 'boyStat', 'A265'
+	'<b><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>> - blowjob</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'nestor_Suck'
+	price = price_blowjob
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	! crawl to him
+	if step = 0:
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockflaccid.jpg"></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_nestor', 'nestor_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+
+	!lick balls
+	elseif step = 1:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj74.mp4"></video></center>'
+		''
+		'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 'pav_shared_nestor', 'nestor_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+
+	!Lick the tip
+	elseif step = 2:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj50.mp4"></video></center>'
+		''
+		'You take <<$npc_firstname[$boy]>> 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 npc_dick[$boy] cm length.'
+		gs 'arousal', 'bj', 3
+		gs 'stat'
+		orgB += rand(2, 7)
+		cockHard = 1
+		act 'Lick his balls':step = 1 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+
+	!suck the tip
+	elseif step = 3:
+		'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip3.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(5, 15)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_nestor', 'nestor_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_nestor', 'nestor_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_nestor', 'nestor_Suck'
+		end
+
+	!sucking dick
+	elseif step = 4:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj122.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(15, 35)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_nestor', 'nestor_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_nestor', 'nestor_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_nestor', 'nestor_Suck'
+		end
+	
+	!deepthroat
+	elseif step = 5:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroat.mp4"></video></center>'
+		''
+		orgB += rand(40, 60)
+		'You decide to take <<$npc_firstname[$boy]>>''s hard, npc_dick[$boy] 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.'
+		nestor_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 <<$npc_firstname[$boy]>>''s crotch!</b>'
+			act 'Continue':step = 8 & gt 'pav_shared_nestor', 'nestor_Suck'
+		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 'pav_shared_nestor', 'nestor_Suck'
+		else
+			act 'Lick his balls':step = 1 & gt 'pav_shared_nestor', 'nestor_Suck'
+			act 'Lick the tip':step = 2 & gt 'pav_shared_nestor', 'nestor_Suck'
+			act 'Suck the tip':step = 3 & gt 'pav_shared_nestor', 'nestor_Suck'
+			act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'
+			act 'Deepthroat':step = 5 & gt 'pav_shared_nestor', 'nestor_Suck'
+			if orgB >= 100:
+				act 'Try to make him cum':step = 6 & gt 'pav_shared_nestor', 'nestor_Suck'
+			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:
+			'<center><video autoplay loop src="images/shared/sex/cum/mouth/cum1,5.mp4"></video></center>'
+			''
+			'Your attempt is successful, as <<$npc_firstname[$boy]>> cums right into your mouth and on your face.'
+			nestor_lastCum = daystart
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'cum_call', 'face', $boy, 1
+			act 'Get up':step = 10 & gt 'pav_shared_nestor', 'nestor_Suck'
+		else
+			failC += 1
+			if failC >= 3:
+				''
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
+				''
+				'<font color=#<<$nestor_font>>>"You are such a lousy sucker <<$pcs_firstname>>. Get out!"</font>'
+				act 'Get up':step = 7 & gt 'pav_shared_nestor', 'nestor_Suck'
+			else
+				''
+				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
+				''
+				'<font color=#<<$nestor_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 'pav_shared_nestor', 'nestor_Suck'
+				act 'Suck the cock':step = 4 & gt 'pav_shared_nestor', 'nestor_Suck'	
+				act 'Deepthroat':step = 5 & gt 'pav_shared_nestor', 'nestor_Suck'
+			end
+		end
+		gs 'stat'
+
+	!END cum fail
+	elseif step = 7:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+		''
+		'You get up from your knees, looking at <<$npc_firstname[$boy]>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
+		'He looks really pissed:<font color=#<<$nestor_font>>>"Get out you lousy slut!"</font>'
+		npc_rel['A265'] -= 3
+		step = 0
+		nestor_bjFail += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fail
+	elseif step = 8:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
+		''
+		'<font color=#<<$nestor_font>>>"Oh my god <<$pcs_firstname>>, have you just puked your shit onto me??!!"</font>'
+		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
+		'<font color=#<<$nestor_font>>>"Get out you stupid cunt!"</font>'
+		npc_rel['A265'] -= 5
+		step = 0
+		nestor_bjFail += 1
+		nestor_bjFailPuke += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat faint out
+	elseif step = 9:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
+		''
+		'You wake up being slapped in your face: <font color=#<<$nestor_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=#<<$nestor_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>!"</font> He is obviously entertained by this, even though you were unable to finish him.'
+		npc_rel['A265'] += 1
+		step = 0
+		nestor_bjFail += 1
+		nestor_bjFailFaint += 1
+		act 'Get up and leave':gt 'pav_shared_apt', 'start'
+
+	!END cum success
+	elseif step = 10:
+		nestor_bj += 1
+		if nestor_mood <= 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<font color=#<<$nestor_font>>>"Good job, <<$pcs_firstname>>. Now get out."</font>'
+			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"OK, see you later."</font>.'
+			npc_rel['A265'] += 1
+			step = 0
+		else
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> doesn''t pay anymore attention to you, dressing up his pants he takes another magazine and starts reading it.'
+			'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 'pav_shared_apt', 'payService'
+	end
+end
+
+if $ARGS[0] = 'nestor_SexVaginal':
+	gs 'boyStat', 'A265'
+	'<b><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>> - vaginal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+		if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+		if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
+	end
+	''
+	$loc_arg = 'nestor_SexVaginal'
+	price = price_vaginal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
+		'His somewhat thin but muscular body has the rather pale skin. He moves towards you, lubing his npc_dick[$boy] cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$nestor_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</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
+		'<<$npc_firstname[$boy]>> takes you by the ass, instantly poking his fingers into your pussy.'
+		'<font color=#<<$nestor_font>>>"Do you want to have your pussy fucked a certain way, or should I choose?"</font>'
+		if nestor_pornPos = 0:hisPos = rand(1, 3)
+		if nestor_pornPos = 1:hisPos = rand(1, 4)
+		if nestor_pornPos = 2:hisPos = rand(1, 5)
+		if nestor_vacuum = 1:hisPos = rand(1, 6)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		act 'Take me from side':step = 3 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_doPornpos = 1 and nestor_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':npc_rel['A265'] += 3 & step = 4 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_doPornpos = 2 and nestor_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':npc_rel['A265'] += 2 & step = 5 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_doVacuum = 1 and nestor_vacuum < 1:act 'You told me you want to test some kind dick enlarger device...':npc_rel['A265'] += 2 & step = 6 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		if nestor_vacuum = 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary1.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
+			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
+			'He points the tip of his npc_dick[$boy] to your pussy and looks up to your face: <font color=#<<$nestor_font>>>"Look at me while I penetrate your slit!"</font>'
+			'Slightly shaking you do as he says...'
+			'In that moment he pushes his dick inside you as far as your somewhat dry pussy let''s him.'
+			'<<$npc_firstname[$boy]>> bangs you wildly right from the start.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(10, 25) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagmissionary2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as fast as he can, all his npc_dick[$boy] cm are inside you.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(30, 50) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+
+	!doggy
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vagdoggy1.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
+			'<<$npc_firstname[$boy]>> kneels behind you, probing your vagina with several of his fingers.'
+			'<font color=#<<$nestor_font>>>"<<$pcs_firstname>>, prepare for the entry!"</font>'
+			'After his words, he grabs your hips and thrusts all of his npc_dick[$boy] centimeters inside your pussy, making you scream from discomfort.'
+			'The first pain fades away and you can feel building warmth and a good feeling of being fucked from behind like a mare in heat.'
+			'He fucks you furiously right from the start.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20)
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckroughvaginal4.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as deep and as fast he can, all of his npc_dick[$boy] cm is 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 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
+			'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
+			'<<$npc_firstname[$boy]>> takes his rod, pointing the tip right to the entry of your vagina.'
+			'<font color=#<<$nestor_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
+			'Then he pushes as far as his npc_dick[$boy] cm long dick can reach.' 
+			'<<$npc_firstname[$boy]>> bangs you wildly right from the start.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(10, 25) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as deep as he can and giving the position and the whole (npc_dick[$boy] cm) size of his dick, most of the strokes hurt.'
+			gs 'pain', 1, 'vaginal', 'stretch'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(30, 50) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+
+	!full nelson
+	elseif step = 4:
+		if nestor_pornPos < 1:nestor_pornPos = 1
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson1.jpg"></center>'
+			''
+			'You let him sit on the edge of the bed, having his large dick prepared for your vagina.'
+			'Facing him with your back, you climb on top of him and bury his npc_dick[$boy] cm long dick in your pussy. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$nestor_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
+			'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
+			'In this position, you literally see every stroke of his npc_dick[$boy] cm long penis into your pussy... And there is nothing else you can do.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(30, 50) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> rams you as deep as he can.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(40, 60) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+
+	!pile driver
+	elseif step = 5:
+		if nestor_pornPos < 2:nestor_pornPos = 2
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver1.jpg"></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> now has the very best access to your pussy: <font color=#<<$nestor_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
+ 			'He goes to you, probing your pussy with several of his fingers.'
+			'After while he takes his phallus, somehow bending it downwards and pushes it inside you.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(30, 50) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your pussy, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> rams you as deep as he can, making big effort to hammer you down as much as he can.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(40, 60) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+
+	!vacuum enlarged fuck
+	elseif step = 6:
+		if nestor_vacuum < 1:nestor_vacuum = 1
+		if subStep = 0:
+			minut += 5
+			nestor_Dick_enlarged = npc_dick[$boy] + (npc_dick[$boy] * rand(2, 4) / 10)
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> takes a vacuum dick enlarger device from his closet, putting it on his already npc_dick[$boy] cm long dick.'
+			'As he is pushing the pump, you can see the cock getting larger with each push.'
+			'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<nestor_Dick_enlarged>> cm!'
+			act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep1.mp4"></video></center>'
+			''
+			'<font color=#<<$nestor_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Pussy Destroyer!"</font>'
+			'As he reaches for your pussy you close your eyes and brace for the expected pain.'
+			'He starts pushing it into, and even that it is quite lubed, it goes hard.'
+			'Finally, he slips through the inner barrier and thrusts a big part of his <<$npc_thdick[$boy]>> enlarged, <<nestor_Dick_enlarged>> cm long dick into you.'
+			orgB += rand(20, 30)
+			gs 'pain', 1, 'vaginal', 'tear'
+			act 'Endure it':subStep = 2 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> uses his newly gained centimeters and fucks you harder than usual, making you scream and moan and beg for relief... in vain.'
+			'Today he obviously enjoys his dominance and fucks you relentlessly.'
+			'You have no strength to fight him and just try to endure it till the end.'
+			orgB += rand(40, 60)
+			gs 'pain', 1, 'vaginal', 'stretch'
+			if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexVaginal'			
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning wildly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			nestor_vag += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm, pumping his load npc_dick[$boy] cm deep inside your pussy.'
+			nestor_vagCumInside += 1
+			nestor_cumVag += 1
+			nestor_lastCum = daystart
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
+			'A large pool of cum lands on your abdomen, feeling warm but sticky.'
+			minut += 2
+			nestor_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm 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
+			nestor_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees 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...'
+			'<font color=#<<$nestor_font>>>"Oh yes, now that''s the right makeup for a girl!"</font>'
+			minut += 2
+			nestor_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> 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=#<<$nestor_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</font>'
+			if tabletkishot = 0 and pillcon < 0:
+				'<font color=#<<$pcs_font>>>"I am not on the pill <<$npc_firstname[$boy]>>!"</font>'
+				'<font color=#<<$nestor_font>>>"And? Your problem. Piss off."</font>'
+				'He is obvously annoyed by your reaction.'
+				npc_rel['A265'] -= 5
+			else
+				npc_rel['A265'] -= 3
+			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.'
+			nestor_lastCum = daystart
+			nestor_cumVag += 1
+			nestor_vagCumInside += 1
+			nestor_vagCumInsideUnwanted += 1
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$nestor_font>>>"I will cum in your pussy or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
+			act 'Swallow':subStep = 20 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			act 'Pussy':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if nestor_mood <= 4:act 'Neither!':subStep = 30 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+			if nestor_mood > 4:act 'Neither!':subStep = 5 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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...'
+			'<font color=#<<$nestor_font>>>"Good girl, better than any food, is it?"</font>'
+			nestor_lastCum = daystart
+			nestor_cumSwall += 1
+			nestor_swall += 1
+			npc_rel['A265'] += 1
+			minut += 5
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$nestor_font>>>"Allright I''ll cum elsewhere, but only because I have a <<$nestor_mood>> mood today!"</font>'
+			npc_rel['A265'] -= 3
+			cumOutL2 = rand(2, 4)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_nestor', 'nestor_SexVaginal'
+		end
+	end
+end
+
+if $ARGS[0] = 'nestor_SexAnal':
+	gs 'boyStat', 'A265'
+	'<b><font color=#<<$nestor_font>>><<$npc_firstname[$boy]>> - anal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and step < 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+		if step = 6:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"></center>'
+		if step > 0 and step < 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerect.jpg"></center>'
+		if step = 6:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/gp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/gp/cockerectvacuum.jpg"></center>'
+	end
+	''
+	$loc_arg = 'nestor_SexAnal'
+	price = price_anal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
+		'His somewhat thin but muscular body has rather pale skin. He moves towards you, lubing his npc_dick[$boy] cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$nestor_font>>>"Hey, <<$pcs_firstname>>, you let those panties on for me to rip them off, or what?"</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
+		'<<$npc_firstname[$boy]>> takes you by the ass, instantly poking his fingers into your anus.'
+		'<font color=#<<$nestor_font>>>"Do you want to have your ass fucked a certain way, or should I choose?"</font>'
+		if nestor_pornPos = 0:hisPos = rand(1, 3)
+		if nestor_pornPos = 1:hisPos = rand(1, 4)
+		if nestor_pornPos = 2:hisPos = rand(1, 5)
+		if nestor_vacuum = 1:hisPos = rand(1, 6)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		act 'Take me from side':step = 3 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_doPornpos = 1 and nestor_pornPos < 1:act 'You told me that you like the Full Nelson position, do you?':npc_rel['A265'] += 3 & step = 4 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_doPornpos = 2 and nestor_pornPos < 2:act 'You told me that you want the Pile Driver position, do you?':npc_rel['A265'] += 2 & step = 5 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_doVacuum = 1 and nestor_vacuum < 1:act 'You told me you want to test some kind dick enlarger device...':npc_rel['A265'] += 2 & step = 6 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_pornPos >= 1:act 'Take me Full Nelson':step = 4 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_pornPos >= 2:act 'Take me Pile Driver':step = 5 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		if nestor_vacuum >= 1:act 'Take me using the vacuum enlarger on your dick':step = 6 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analmissionary1.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> kneels between those, roughly spreading them as wide as they go, making you scream a bit.'
+			'As he is content with the sight, he leans above you, moving his hips closer to your crotch.'
+			'He points the tip of his npc_dick[$boy] to your pussy and looks up to your face: <font color=#<<$nestor_font>>>"Look at me while I penetrate your sphincter!"</font>'
+			! normal/or-better mood OR likes Sveta
+			if nestor_mood <= 5 or npc_rel['A265'] > 80:
+				'Before doing so, he takes some more lube on his fingers and one by one he stretches 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
+				'Slightly shaking you do as he says...'
+				'In that moment he pushes his dick inside your ass as far as he can!'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$nestor_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
+				gs 'pain', 1, 'asshole', 'tear'
+			end
+			'<<$npc_firstname[$boy]>> bangs you wildly right from the start.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="/images/locations/shared/abduction/sex/slavewhorefuckanal5.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as deep as he can, all his npc_dick[$boy] centimeters are inside you.'
+			gs 'arousal', 'anal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+
+	!behind
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal3.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
+			'<<$npc_firstname[$boy]>> kneels behind you, poking your anus with several of his fingers.'
+			! normal/or-better mood OR likes Sveta
+			if nestor_mood <= 5 or npc_rel['A265'] > 80:
+				'He takes some more lube on his fingers and one by one he stretches 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
+				'In a few moments, he pushes his dick inside your ass as far as he can!'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$nestor_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
+				gs 'pain', 1, 'asshole', 'tear'
+			end
+			'<<$npc_firstname[$boy]>> bangs you wildly right from the start.'	
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20)
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			minut += 10
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as deep and as fast he can, the every one of his npc_dick[$boy] 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 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
+			'He doesn''t wait for anything and lies behind you, instantly preparing his large dick for the entry.'
+			'<<$npc_firstname[$boy]>> takes his rod, pointing the tip right to your anus.'
+			'<font color=#<<$nestor_font>>>"<<$pcs_firstname>>, prepare for the penetration!"</font>'
+			! normal/or-better mood OR likes Sveta
+			if nestor_mood <= 5 or npc_rel['A265'] > 80:
+				'He takes some more lube on his fingers and one by one he stretches 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
+				'In a few moments he pushes his dick inside your ass as far as he can!'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$nestor_font>>>"Shut up <<$pcs_firstname>> and take it like a good little girl!"</font>'
+				gs 'pain', 1, 'asshole', 'tear'
+			end
+			'<<$npc_firstname[$boy]>> bangs you wildly right from the start.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal1.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> now rams you as deep and he can and giving the position and the entire (npc_dick[$boy] cm) size of his dick, the continuous banging hurts.'
+			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 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+
+	!full nelson
+	elseif step = 4:
+		if nestor_pornPos < 1:nestor_pornPos = 1
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analfullnelson1.jpg"></center>'
+			''
+			'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 bury his npc_dick[$boy] cm long dick in your anus. You wanted to ride it a bit to make the fuck smoother, but he doesn''t let you:<font color=#<<$nestor_font>>>"No time for that <<$pcs_firstname>>, let''s start already!"</font>'
+			'Not waiting for your answer he grabs your legs and reaches for your head, immobilizing you entirely. Then he starts fucking you like a wild animal.'
+			'In this position, you literally see every stroke of his npc_dick[$boy] cm long penis into your pussy... And there is nothing else you can do.'
+			'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.'
+			'You feel like being continuously impaled.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(20, 40) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal3.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+
+	!pile driver
+	elseif step = 5:
+		if nestor_pornPos < 2:nestor_pornPos = 2
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver1.jpg"></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> now has the very best access to your pussy: <font color=#<<$nestor_font>>>"Now that''s a sight! Every girl should be fucked like that!"</font>'
+ 			'He goes to you, probing your pussy with several of his fingers.'
+			! normal/or-better mood OR likes Sveta
+			if nestor_mood <= 5 or npc_rel['A265'] > 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 rams his npc_dick[$boy] cm long thick dick into your anus.'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$nestor_font>>>"Shut up <<$pcs_firstname>> and take it like a good anal slut!"</font>'
+				gs 'pain', 1, 'asshole', 'tear'
+			end
+			'You feel like being continuously impaled.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(20, 40) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver2.mp4"></video></center>'
+			''
+			'As he continuously and wildly rams your anus, you have no strength to do anything but endure it and moan like an injured pig.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+	
+	!vacuum enlarged fuck
+	elseif step = 6:
+		if nestor_vacuum < 1:nestor_vacuum = 1
+		if subStep = 0:
+			minut += 5
+			nestor_Dick_enlarged = npc_dick[$boy] + (npc_dick[$boy] * rand(20, 44) / 100)
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/gp/vacuumpumppenis.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> takes a vacuum dick enlarger device from his closet, putting it on his already npc_dick[$boy] cm long dick.'
+			'As he is pushing the pump, you can see the cock getting larger with each push.'
+			'After some time he stops, putting a ring on the root of his dick. Today the device has enlarged it to <<nestor_Dick_enlarged>> cm!'
+			act 'Let him fuck you with that monster':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/gp/analvacuumenlargerpen.mp4"></video></center>'
+			''
+			'<font color=#<<$nestor_font>>>"Now <<$pcs_firstname>> prepare your pussy for the famous Anus Destroyer!"</font>'
+			'As he reaches for your ass you close your eyes and brace for the expected pain.'
+			'He starts pushing it into you, and even that it is quite lubed, it goes hard.'
+			'Finally, he slips through the sphincter and thrusts a big part of his <<$npc_thdick[$boy]>> enlarged, <<nestor_Dick_enlarged>> cm long dick into your ass.'
+			orgB += rand(20, 30)
+			gs 'pain', 1, 'asshole', 'tear'
+			act 'Endure it':subStep = 2 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanaldeep1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> uses his newly gained centimeters and fucks your ass harder than usual, making you scream and moan and beg for relief... in vain.'
+			'Today he obviously enjoys his dominance and fucks you relentlessly.'
+			'You have no strength to fight him and just try to endure it till the end.'
+			gs 'pain', 1, 'asshole', 'stretch'
+			orgB += rand(40, 60) 
+			if orgB < 100:act 'Let him continue':subStep = 2 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_nestor', 'nestor_SexAnal'			
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning loudly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			nestor_anal += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_nestor', 'nestor_SexAnal'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumanal4.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm, pumping his load npc_dick[$boy] cm deep inside your anus.'
+			nestor_analCumInside = 1
+			nestor_lastCum = daystart
+			nestor_cumAnal += 1
+			gs 'cum_call', 'anus', $boy, 1
+			gs 'arousal', 'anal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm and at the moment he starts spouting his seed, he takes his dick out and points it on your stomach.'
+			'A large pool of cum lands on your abdomen, feeling warm but sticky.'
+			minut += 2
+			nestor_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm 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
+			nestor_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches his violent orgasm and in the moment he starts spouting his seed, he pushes you on your knees 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...'
+			'<font color=#<<$nestor_font>>>"Oh yes, now that''s the right makeup for an anal whore like you!"</font>'
+			minut += 2
+			nestor_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> to take his cock out of your ass 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=#<<$nestor_font>>>"Shut up <<$pcs_firstname>>, I cum where I want to."</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=#<<$nestor_font>>>"Every girl deserves having her ass pumped with cum, so piss off!"</font>'
+			'He is obviously annoyed by your reaction.'
+			'You furiously get up from the bed, putting your clothes between your legs to catch the remainder of the cum, so it doesn''t land on your legs and carpet.'
+			nestor_lastCum = daystart
+			nestor_cumAnal += 1
+			nestor_analCumInside += 1
+			nestor_analCumInsideUnwanted += 1
+			npc_rel['A265'] -= 3
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'anal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$nestor_font>>>"I will cum in your ass or you will swallow it. Make your choice before it''s too late, <<$pcs_firstname>>!"</font>'
+			act 'Swallow':subStep = 20 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			act 'Ass':subStep = 1 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			if nestor_mood <= 4:act 'Neither!':subStep = 30 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+			if nestor_mood > 4:act 'Neither!':subStep = 5 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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 proof that not a drop was left unconsumed...' 		
+			'<font color=#<<$nestor_font>>>"Good girl, better than any food, is it?"</font>'
+			nestor_swall += 1	
+			npc_rel['A265'] += 1
+			minut += 5
+			nestor_lastCum = daystart
+			nestor_cumSwall += 1
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$nestor_font>>>"Alright I''ll cum elsewhere, but only because I have a <<$nestor_mood>> mood today!"</font>'
+			npc_rel['A265'] -= 3
+			cumOutL2 = rand(2, 4)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_nestor', 'nestor_SexAnal'
+		end
+	end
+end
+
+--- pav_shared_nestor ---------------------------------
+

+ 1685 - 0
locations/pav_shared_oleg.qsrc

@@ -0,0 +1,1685 @@
+# pav_shared_oleg
+
+if $ARGS[0] = 'oleg':
+	menu_off = 1
+	$loc_arg = 'oleg'
+	minut += 2
+	gs 'boyStat', 'A266'
+
+	'<h3><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+	''
+	'<<$npc_notes[$boy]>>'
+	if oleg_hadSex = 1:'As you know very well, <<$npc_firstname[$boy]>> has a <<$npc_thdick[$boy]>> <<npc_dick[$boy]>> cm long <a href="exec:gt ''pav_shared_oleg'', ''oleg_dick''">dick</a> with wildly growing pubic hair.'
+	''
+	'<b>Today he looks to be in a <<$oleg_mood>> mood.</b>'
+	if (totminut - oleg_served) >= rand(120, 180):
+		serve_oleg = 0
+		'It''s not even been 3 hours since you last served <<$npc_firstname[$boy]>>'
+	else
+		if servitudeLvl = 2: 
+			serve_oleg = 1
+		end
+	end
+	''
+	! 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=#<<$oleg_font>>>"Hello <<$pcs_firstname>>, I think you have sperm on you. Please go wash it off."</a>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	! cum on clothes
+	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
+		'<font color=#<<$oleg_font>>>"Hello <<$pcs_firstname>>, I think you have sperm on your clothes. Please go change."</a>'
+		act 'Leave': gt 'pav_shared_apt', 'start'	
+	! cum on belly, breasts, ass, pussy; visible only when nude
+	elseif cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0 and $clothingworntype = 'nude':
+		'<font color=#<<$oleg_font>>>"Hello <<$pcs_firstname>>, why are you naked? And is that sperm on you? It''s gross, please go wash yourself and put on some clothes."</a>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	else
+		'<font color=#<<$oleg_font>>>"Hello <<$pcs_firstname>>, what do you need?"</a>'
+		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
+		act 'Chat with him':gt 'pav_shared_oleg', 'oleg_Chat'
+		if serve_oleg = 1:act 'Offer him to serve':oleg_served = totminut & gt 'pav_shared_oleg', 'oleg_Serve'
+	end
+end
+
+if $ARGS[0] = 'oleg_Chat':
+	gs 'boyStat', 'A266'
+	menu_off = 1
+	$loc_arg = 'oleg_Chat'
+	'<h3><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+	''
+	! basic chat
+	if chatLvl = 0:
+		say = rand(1, 2)
+		if say = 1:
+			!clothing and bodyshape reactions
+			if $clothingworntype = 'nude':
+				'<<$npc_firstname[$boy]>> is looking at your nude body with obvious shame, blurring.'
+				if salocatnow <= 1:
+					'He is not very content with the sight: <font color=#<<$oleg_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=#<<$oleg_font>>>"<<$pcs_firstname>>, you have a beautiful body you know... But please, put on some clothes!"</font>'
+				else
+					'He is not very content with the sight: <font color=#<<$oleg_font>>>"<<$pcs_firstname>>, you should eat less, it is unhealthy to be too fat."</font>'
+				end
+				!panties on
+				if $pantyworntype ! 'none':
+					'<font color=#<<$oleg_font>>>"At least you are wearing panties."</font>'
+				end
+				!panties off, anal plug
+				if $pantyworntype = 'none' and analplugIN = 1:
+					'As you accidentally turn around, he gazes between your asscheeks on the plug stuck in your ass.'
+					'<font color=#<<$oleg_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 <<$npc_firstname[$boy]>>, it is a buttplug. Will you help me with it? It seems to be stuck."</font>'
+						'<font color=#<<$oleg_font>>>"Wh... what do you mean?"</font>'
+						act 'Pull it out for me':chatLvl = 10 & gt 'pav_shared_oleg', 'oleg_Chat'
+					end
+				end
+			elseif CloBimbo = 1:
+				'<<$npc_firstname[$boy]>> is looking at your outfit with suspicion.'
+				if salocatnow >= 1 and salocatnow <= 4:
+					'<font color=#<<$oleg_font>>>"You know nice girls like you should not wear so skimpy dresses. Some people can''t hold themselves, you know?"</font>'
+				else
+					'<font color=#<<$oleg_font>>>"Girls should not wear so skimpy dresses, it may be offending to other people, you know?"</font>'
+				end
+			elseif CloBimbo = 4:
+				'<<$npc_firstname[$boy]>> is looking at your outfit with suspicion.'
+				if salocatnow <= 4:
+					'<font color=#<<$oleg_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=#<<$oleg_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=#<<$oleg_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 'pav_shared_oleg', 'oleg_Chat'
+			act 'Leave':gt 'pav_shared_apt', 'start'
+		elseif step = 10:
+			minut += 15
+			sayN = rand(1, 10)
+			if sayN = 1:'<i><font color=#<<$oleg_font>>>"Once I have hacked into FSB network... the stuff there, you should see."</font></i>'
+			if sayN = 2:'<i><font color=#<<$oleg_font>>>"I really like playing MMO games!"</font></i>'
+			if sayN = 3:'<i><font color=#<<$oleg_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=#<<$oleg_font>>>"You should tape your inbuilt camera and mic on your PC if you have one."</font></i>'
+			if sayN = 5:'<i><font color=#<<$oleg_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>'
+			npc_rel['A266'] += 1
+			gs 'stat'
+			intimateTalkCh = rand(0, 100)
+			if oleg_mood <= 4 and intimateTalkCh <= 50:
+				step = 20
+			else
+				step = 0
+			end
+			act 'Continue':gt 'pav_shared_oleg', 'oleg_Chat'
+		elseif step = 20:
+			minut += 3
+			if servitudeLvl = 0:
+				'<font color=#<<$oleg_font>>>"<<$pcs_firstname>>, didn''t you change your mind about easing off some of the rent?"</font>'
+				'<font color=#<<$pcs_font>>>"What do you mean?"</font>'
+				'<font color=#<<$oleg_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 interested in being their maid':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_oleg', 'oleg_Chat'
+			elseif servitudeLvl = 1:
+				'<font color=#<<$oleg_font>>>"<<$pcs_firstname>>, didn''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 and cook for you."</font>'
+				'<font color=#<<$oleg_font>>>"Well we also talked about this before, you know... to help us ease a bit of stress if you know what I mean"</font>'
+				act 'Say you are still not interested in being their cumbucket':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_oleg', 'oleg_Chat'
+
+			elseif servitudeLvl = 2:
+				act 'Talk about sex':step = 30 & gt 'pav_shared_oleg', 'oleg_Chat'
+				act 'Continue':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+			end
+		elseif step = 30:
+			minut += 5
+			'You get into rather intimate discussion about sex, porn and all that stuff. <<$npc_firstname[$boy]>> 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:'<<$npc_firstname[$boy]>> hesitantly tells you he loves looking when the girl orgasms, but not too loudly.'
+				if topicR = 2:'<<$npc_firstname[$boy]>> hesitantly tells you he loves when a girl is caressing his cock.'
+				if topicR = 3:'<<$npc_firstname[$boy]>> hesitantly tells you he kinda likes when the girl is enjoying the sex.'
+				if topicR = 4:'<<$npc_firstname[$boy]>> hesitantly tells you his <<npc_dick[$boy]>> cm long dick is too big, sometimes making it a bit painful for the girl.'
+				if topicR = 5:'<<$npc_firstname[$boy]>> hesitantly tells you he loves when the girl is in a healthy shape, not too thin or too fat.'
+				act'Continue':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+			elseif resCh = 4:
+				if oleg_doPornpos = 0:
+					'<<$npc_firstname[$boy]>> tells you about his favorite porn videos and sex position he would like to try.'
+					act'Continue':oleg_doPornpos = 1 & npc_rel['A266'] += 2 & step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				elseif oleg_doPornpos = 1:
+					'<<$npc_firstname[$boy]>> tells you about another of his favorite porn videos and another sex position he would like to try.'
+					act'Continue':oleg_doPornpos = 2 & npc_rel['A266'] += 2 & step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				end
+			elseif resCh = 5:
+				if oleg_doAnal = 0:
+					'<<$npc_firstname[$boy]>> tells you that he always wanted to try anal sex.'
+					act'Continue':oleg_doAnal = 1 & npc_rel['A266'] += 2 & step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				end
+			elseif resCh = 6:
+				if oleg_doPiss = 0:
+					'In the rather intimate discussion, <<$npc_firstname[$boy]>> seemed to want to say something, but in the end, he withheld it. He looks very nervous...'
+					if npc_rel['A266'] >= 50:act'Try to get him talk':chatLvl = 20 & step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+					act'Let it be':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+				end
+			end
+		end
+
+	! anal plug
+	elseif chatLvl = 10:
+		'<font color=#<<$oleg_font>>>"O-OK... <<$pcs_firstname>>, I''ll help you."</font>'
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugpullout.mp4"></video></center>'
+		''
+		'Hesitantly he grabs the plug and slowly pulls it out.'
+		'It leaves your ass gaping.'
+		'<font color=#<<$pcs_font>>>"Thank you <<$npc_firstname[$boy]>>!"</font>'
+		'<font color=#<<$oleg_font>>>"You''re welcome <<$pcs_firstname>>, but please be careful next time..."</font>'
+		analplugIN = 0
+		act 'Continue':chatLvl = 0 & gt 'pav_shared_oleg', 'oleg_Chat'
+	
+	! pissing kink
+	elseif chatLvl = 20:
+		'<font color=#<<$pcs_font>>>"Come on <<$npc_firstname[$boy]>>, you can tell it to me. After all we have done together, you don''t need to be ashamed."</font>'
+		'<font color=#<<$oleg_font>>>"I don''t know <<$pcs_firstname>>... I''ve never 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, and finally decides to speak out.</i>'
+		'<font color=#<<$oleg_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=#<<$oleg_font>>>"Yes. But it''s not just that."</font>'
+		'<font color=#<<$pcs_font>>>"Huh?"</font>'
+		'<font color=#<<$oleg_font>>>"He relieves himself onto the girl. And into."</font>'
+		'<font color=#<<$pcs_font>>>"WHAT?"</font>'
+		'<i>You shout in surprise. Who would thought such a shy, decent man would have this kind of kink?</i>'		
+		'<font color=#<<$oleg_font>>>"Please don''t get mad <<$pcs_firstname>>! I shouldn''t have told you, I knew it!"</font>'
+		'<font color=#<<$pcs_font>>>"I am not mad at you <<$npc_firstname[$boy]>>. I am just surprised."</font>'
+		'<font color=#<<$oleg_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=#<<$oleg_font>>>"No, actually they first have sex, usually both vaginal 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=#<<$oleg_font>>>"So what do you think about it? About me?"</font>'
+		step = 0
+		chatLvl = 0
+		act 'It''s gross and you are a pervert':npc_rel['A266'] -= 20 & oleg_doPiss = -1 & gt 'pav_shared_oleg', 'oleg_Chat'
+		act 'It''s fine if you like it, but I find it repugnant':npc_rel['A266'] -= 5 & oleg_doPiss = -1 & gt 'pav_shared_oleg', 'oleg_Chat'
+		act 'It''s just a kink like any other':npc_rel['A266'] += 10 & oleg_doPiss = 1 & gt 'pav_shared_oleg', 'oleg_Chat'
+	end
+end
+
+if $ARGS[0] = 'oleg_dick':
+	gs 'boyStat', 'A266'
+	menu_off = 1
+	minut += 2
+	'<h3><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>></font></h3>'
+	if set_imgh < 250:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	
+	if npc_rel[$boy] < -80:
+		$rel_word[$boy] = 'terrible'
+		$color_rel = 'ff0000'
+	elseif npc_rel[$boy] < -60:
+		$rel_word[$boy] = 'very bad'
+		$color_rel = 'ff7824'
+	elseif npc_rel[$boy] < -40:
+		$rel_word[$boy] = 'bad'
+		$color_rel = 'fcb503'
+	elseif npc_rel[$boy] < -20:
+		$rel_word[$boy] = 'strained'
+		$color_rel = 'f0cc00'
+	elseif npc_rel[$boy] < 0:
+		$rel_word[$boy] = 'neutral'
+		$color_rel = 'fcfc0f'
+	elseif npc_rel[$boy] < 20:
+		$rel_word[$boy] = 'good'
+		$color_rel = 'abf246'
+	elseif npc_rel[$boy] < 40:
+		$rel_word[$boy] = 'great'
+		$color_rel = '84fc03'
+	elseif npc_rel[$boy] < 60:
+		$rel_word[$boy] = 'excellent'
+		$color_rel = '5eff00'
+	elseif npc_rel[$boy] >= 60:
+		$rel_word[$boy] = 'fantastic'
+		$color_rel = '03ff39'
+	end
+	
+	'Your relationship with ' + $npc_firstname[$boy] + ' is <font color=#' + $color_rel + '>' + $rel_word[$boy] + '</font>.'
+	
+
+
+	
+		'His dick is <<npc_dick[$boy]>> cm long with wildly growing pubic hair.'
+	''
+	'So far you have:'
+		if oleg_bj = 1:'- given him a blowjob'
+			if oleg_bj > 1:'- given him <<oleg_bj>> blowjobs' & if oleg_bjFail > 1:' and failed to make him cum with your mouth <<oleg_bjFail>> times'
+		if oleg_bjDeep = 1:'- given him a blowjob with deepthroat'
+			if oleg_bjDeep > 1:'- given him <<oleg_bjDeep>> blowjobs with deepthroat' & if oleg_bjFailPuke > 1:' but failed and puked in his crotch <<oleg_bjFailPuke>> times' & if oleg_bjFailPuke > 1:' but failed and fainted impaled on his cock <<oleg_bjFailFaint>> times'
+		if oleg_swall = 1:'- swallowed his semen, making it <<oleg_cumSwall>> loads, that you swallowed in total'
+			if oleg_swall > 1:'- swallowed his semen <<oleg_swall>> times, making it <<oleg_cumSwall>> loads, that you swallowed in total'
+		if oleg_vag = 1:'- took it in your pussy' & if oleg_vagCumInside = 1:' and let him cum inside you' & if oleg_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
+			if oleg_vag > 1:'- took it in your pussy <<oleg_vag>> times' & if oleg_vagCumInside >= 1:' and let him cum inside you <<oleg_vagCumInside>> times' & if oleg_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<oleg_vagCumInsideUnwanted>> times'
+		if oleg_cumVag > 0:'- he pumped  <<oleg_cumVag>> loads of cum into your pussy'
+		if oleg_anal = 1:'- took it in your ass' & if oleg_analCumInside = 1:' and let him cum inside you' & if oleg_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
+			if oleg_anal > 1:'- took it in your ass <<oleg_anal>> times' & if oleg_analCumInside >= 1:' and let him cum inside you <<oleg_analCumInside>> times' & if oleg_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<oleg_analCumInsideUnwanted>> times'
+		if oleg_analVag > 0:'- he pumped  <<oleg_cumAnal>> loads of cum into your anus'
+		
+		if oleg_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 oleg_piss = -2:'- once let him give you a Golden Shower, but felt very humiliated and he knows you will not do it again'
+		if oleg_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 oleg_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 oleg_piss > 1 and pissLike = 1:'- let him give you a Golden Shower <<oleg_piss>> times, you do not find it arousing but he knows you are willing to do it repeatedly'
+		if oleg_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 oleg_piss > 1 and pissLike = 2:'- let him give you a Golden Shower <<oleg_piss>> times, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
+
+	''
+	if oleg_doPornpos = 1 and oleg_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 oleg_doPornpos = 1 and oleg_pornPos = 1:'You''ve let him fuck you in the "Full Nelson" sex position.'
+	if oleg_doPornpos = 2 and oleg_pornPos = 1:'You''ve let him fuck you in the "Full Nelson" sex position, but you know that there is another porn position he would like to try.'
+	if oleg_doPornpos = 2 and oleg_pornPos = 2:'You''ve let him fuck you in the "Full Nelson" and "Pile Driver" sex positions.'
+	
+	if $loc_arg = 'oleg':
+		act 'Continue':gt 'pav_shared_oleg', 'oleg'
+	else
+		act 'Continue':gt 'pav_shared_apt', $goBack
+	end
+end
+
+if $ARGS[0] = 'oleg_Serve':
+	gs 'boyStat', 'A266'
+	menu_off = 1
+	minut += 2
+	$loc_arg = 'oleg_Serve'
+	'<h3><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+	''
+	step = 0
+	subStep = 0
+
+	sexCh = rand(0, 100)
+	
+	! very bad mood
+	if oleg_mood >= 6:
+		'<font color=#<<$oleg_font>>>"Not now <<$pcs_firstname>>, I don''t have the mood for it."</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! random chance to sex, but increasing with horniness level; oleg min horny = 15/80*100 = 18,75
+	elseif sexCh < 40:
+
+		'<font color=#<<$oleg_font>>>"Not now <<$pcs_firstname>>, I am busy."</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! wants sex
+	else
+		actionR = rand(2, 6)
+		if actionR = 2:
+			'<font color=#<<$oleg_font>>>"I am busy <<$pcs_firstname>>, but you can suck my dick while I am working."</font>'
+			act 'Agree': npc_rel['A266'] += 1 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		elseif actionR = 3:
+			'<font color=#<<$oleg_font>>>"Sure <<$pcs_firstname>>, I could use a blowjob right now."</font>'
+			act 'Agree': npc_rel['A266'] += 1 & gt 'pav_shared_oleg', 'oleg_Suck'
+		elseif actionR = 4:
+			'<font color=#<<$oleg_font>>>"Allright, let''s have a sex. I would like to fuck your pussy <<$pcs_firstname>>."</font>'
+			act 'Agree': npc_rel['A266'] += 1 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif actionR = 5:
+			if oleg_anal = 0:
+				if oleg_doAnal = 1:
+					'<font color=#<<$oleg_font>>>"I''m not sure <<$pcs_firstname>>..."</font>'
+					act 'It''s your choice':gt 'pav_shared_oleg', 'oleg_Serve'
+					act 'You told me you wanted to try anal, didn''t you?': npc_rel['A266'] += 2 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+				else
+					gt 'pav_shared_oleg', 'oleg_Serve'
+				end
+			elseif oleg_anal >= 1:
+				'<font color=#<<$oleg_font>>>"Sure <<$pcs_firstname>>, I would like to take your ass this time."</font>'
+				act 'Agree': npc_rel['A266'] += 1 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+			end
+		elseif actionR = 6:
+			if oleg_piss = 0:
+				if oleg_doPiss = 1:
+					'<font color=#<<$oleg_font>>>"I''m not sure <<$pcs_firstname>>..."</font>'
+					act 'It''s your choice':gt 'pav_shared_oleg', 'oleg_Serve'
+					act 'You told me you have this secret dream about pissing, do you?':npc_rel['A266'] += 2 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+				else
+					gt 'pav_shared_oleg', 'oleg_Serve'
+				end
+			elseif oleg_piss >= 1:
+				'<font color=#<<$oleg_font>>>"<<$pcs_firstname>>, I have a full bladder. Do something about it, will you?"</font>'
+				act 'Agree': npc_rel['A266'] += 1 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+			else
+				gt 'pav_shared_oleg', 'oleg_Serve'		
+			end
+		end
+		if actionR > 1:act 'Say you changed your mind and leave': npc_rel['A266'] -= 1 & gt 'pav_shared_apt', 'start'
+	end
+end
+
+if $ARGS[0] = 'oleg_SuckBellowTable':
+	gs 'boyStat', 'A266'
+	'<b><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>> - blowjob under table</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'oleg_SuckBellowTable'
+	price = price_blowjob
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	if step = 0:
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjtablestart.jpg"></center>'
+		'You drop on your knees, crawling under his large table.'
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+	
+	!kissing tip
+	elseif step = 1:
+		orgB += rand(0, 10) / oleg_mood
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjtablekisstip.mp4"></video></center>'
+		'You take <<$npc_firstname[$boy]>> 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 <<npc_dick[$boy]>> cm length.'
+		gs 'arousal', 'bj', 3
+		gs 'stat'
+		cockHard = 1
+		act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'	
+	
+	!sucking tip
+	elseif step = 2:
+		'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable3.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(5, 15)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'	
+		act 'Deepthroat':step = 4 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 5 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		end
+
+	!sucking dick
+	elseif step = 3:
+		'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/suckundertable4.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(15, 35)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'	
+		act 'Deepthroat':step = 4 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 5 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		end
+	
+	!deepthroat
+	elseif step = 4:
+		orgB += rand(40, 60)
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjtabledeepthroat.mp4"></video></center>'
+		''
+		'You decide to take <<$npc_firstname[$boy]>>''s hard, <<npc_dick[$boy]>> 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.'
+		oleg_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 <<$npc_firstname[$boy]>>''s crotch!</b>'
+			act 'Crawl out from the table':step = 7 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		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 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		else
+			act 'Lick the tip':step = 1 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+			act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+			act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'	
+			act 'Deepthroat':step = 4 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+			if orgB >= 100:
+				act 'Try to make him cum':step = 5 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+			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:
+			''
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth4.mp4"></video></center>'
+			''
+			'Your attempt is successful, as <<$npc_firstname[$boy]>> cums right into your mouth and on your face.'
+			oleg_lastCum = daystart
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'cum_call', 'face', $boy, 1
+			act 'Crawl out from the table':step = 9 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+		else
+			failC += 1
+			if failC >= 3:
+				''
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
+				''
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_SuckBellowTable'
+			else
+				''
+				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
+				''
+				'<font color=#<<$oleg_font>>>"Come on <<$pcs_firstname>>, what are you doing down there?"</font>'
+				act 'Lick the tip':step = 1 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+				act 'Suck just the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+				act 'Suck the cock':step = 3 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'	
+				act 'Deepthroat':step = 4 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+				if orgB >= 100:
+					act 'Try to make him cum':step = 5 & gt 'pav_shared_oleg', 'oleg_SuckBellowTable'
+				end
+			end
+		end
+		gs 'stat'
+
+	!END cum fail
+	elseif step = 6:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+		'You get up from your knees, looking at <<$npc_firstname[$boy]>>:<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=#<<$oleg_font>>>"Yea yea. Bye."</font>'
+		npc_rel['A266'] -= 3
+		step = 0
+		oleg_bjFail += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fail
+	elseif step = 7:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
+		''
+		'<font color=#<<$oleg_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=#<<$oleg_font>>>"Please <<$pcs_firstname>> do something and clean it, it''s gross!"</font>'
+		npc_rel['A266'] -= 5
+		step = 0
+		oleg_bjFail += 1
+		oleg_bjFailPuke += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fade out
+	elseif step = 8:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
+		''
+		'You wake up being slapped in your face: <font color=#<<$oleg_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=#<<$oleg_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>."</font> He is obviously worried about you.'
+		npc_rel['A266'] += 1
+		step = 0
+		oleg_bjFail += 1
+		oleg_bjFailFaint += 1
+		act 'Get up and leave':gt 'pav_shared_apt', 'start'
+
+	!END cum success
+	elseif step = 9:
+		oleg_bj += 1
+		if oleg_mood <= 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<font color=#<<$oleg_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
+			npc_rel['A266'] += 1
+		else
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_apt', 'payService'
+	end
+end
+
+if $ARGS[0] = 'oleg_Suck':
+	gs 'boyStat', 'A266'
+	'<b><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>> - blowjob</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'oleg_Suck'
+	price = price_blowjob
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	! crawl to him
+	if step = 0:
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+
+	!lick balls
+	elseif step = 1:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj70.mp4"></video></center>'
+		''
+		'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 'pav_shared_oleg', 'oleg_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+
+	!Lick the tip
+	elseif step = 2:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus1.mp4"></video></center>'
+		''
+		'You take <<$npc_firstname[$boy]>> 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 <<npc_dick[$boy]>> cm length.'
+		gs 'arousal', 'bj', 2
+		gs 'stat'
+		orgB += rand(2, 7)
+		cockHard = 1
+		act 'Lick his balls':step = 1 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+
+	!suck the tip
+	elseif step = 3:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj110.mp4"></video></center>'
+		if cockHard = 0:
+			orgB += rand(5, 15)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_oleg', 'oleg_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_oleg', 'oleg_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_oleg', 'oleg_Suck'
+		end
+
+	!sucking dick
+	elseif step = 4:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj23.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(15, 35)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_oleg', 'oleg_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_oleg', 'oleg_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_oleg', 'oleg_Suck'
+		end
+	
+	!deepthroat
+	elseif step = 5:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/bj1.mp4"></video></center>'
+		''
+		orgB += rand(40, 60)
+		'You decide to take <<$npc_firstname[$boy]>>''s hard, <<npc_dick[$boy]>> 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.'
+		oleg_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 <<$npc_firstname[$boy]>>''s crotch!</b>'
+			act 'Continue':step = 8 & gt 'pav_shared_oleg', 'oleg_Suck'
+		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 'pav_shared_oleg', 'oleg_Suck'
+		else
+			act 'Lick his balls':step = 1 & gt 'pav_shared_oleg', 'oleg_Suck'
+			act 'Lick the tip':step = 2 & gt 'pav_shared_oleg', 'oleg_Suck'
+			act 'Suck the tip':step = 3 & gt 'pav_shared_oleg', 'oleg_Suck'
+			act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'
+			act 'Deepthroat':step = 5 & gt 'pav_shared_oleg', 'oleg_Suck'
+			if orgB >= 100:
+				act 'Try to make him cum':step = 6 & gt 'pav_shared_oleg', 'oleg_Suck'
+			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:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth1.mp4"></video></center>'
+			''
+			'Your attempt is successful, as <<$npc_firstname[$boy]>> cums right into your mouth and on your face.'
+			oleg_lastCum = daystart
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'cum_call', 'face', $boy, 1
+			act 'Get up':step = 10 & gt 'pav_shared_oleg', 'oleg_Suck'
+		else
+			failC += 1
+			if failC >= 3:
+				''
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
+				''
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Suck'
+			else
+				''
+				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
+				''
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Suck'
+				act 'Suck the cock':step = 4 & gt 'pav_shared_oleg', 'oleg_Suck'	
+				act 'Deepthroat':step = 5 & gt 'pav_shared_oleg', 'oleg_Suck'
+			end
+		end
+		gs 'stat'
+
+	!END cum fail
+	elseif step = 7:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+		''
+		'You get up from your knees, looking at <<$npc_firstname[$boy]>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
+		'He looks annoyed:<font color=#<<$oleg_font>>>"I see. Bye."</font>'
+		npc_rel['A266'] -= 3
+		step = 0
+		oleg_bjFail += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fail
+	elseif step = 8:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
+		''
+		'<font color=#<<$oleg_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=#<<$oleg_font>>>"Please <<$pcs_firstname>> do something and clean it, it''s gross!"</font>'
+		npc_rel['A266'] -= 5
+		step = 0
+		oleg_bjFail += 1
+		oleg_bjFailPuke += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fade out
+	elseif step = 9:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
+		''
+		'You wake up being slapped in your face: <font color=#<<$oleg_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=#<<$oleg_font>>>"I guess you took somehow bigger portion than you can stand, <<$pcs_firstname>>."</font> He is obviously worried about you.'
+		npc_rel['A266'] += 1
+		step = 0
+		oleg_bjFail += 1
+		oleg_bjFailFaint += 1
+		act 'Get up and leave':gt 'pav_shared_apt', 'start'
+
+	!END cum success
+	elseif step = 10:
+		oleg_bj += 1
+		if oleg_mood <= 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<font color=#<<$oleg_font>>>"Thank you <<$pcs_firstname>>."</font>'
+			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"You are welcome. Bye."</font>.'
+			npc_rel['A266'] += 1
+			step = 0
+		else
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_apt', 'payService'
+	end
+end
+
+if $ARGS[0] = 'oleg_Sex_Vag':
+	gs 'boyStat', 'A266'
+	'<b><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>> - vaginal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'oleg_Sex_Vag'
+	price = price_vaginal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 <<npc_dick[$boy]>> cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$oleg_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
+		'<<$npc_firstname[$boy]>> takes you by the waist, kissing you.'
+		'<font color=#<<$oleg_font>>>"Do you want to go for certain position, or should I choose?"</font>'
+		if oleg_pornPos = 0:hisPos = rand(1, 3)
+		if oleg_pornPos = 1:hisPos = rand(1, 4)
+		if oleg_pornPos = 2:hisPos = rand(1, 5)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		act 'Take me from side':step = 3 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		if oleg_doPornpos = 1 and oleg_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':npc_rel['A266'] += 3 & step = 4 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		if oleg_doPornpos = 2 and oleg_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':npc_rel['A266'] += 2 & step = 5 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		if oleg_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		if oleg_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagmissionary1.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagmissionary2.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you rub his hairy ass, making him even hornier.'
+			'<<$npc_firstname[$boy]>> now rams you as deep as he can, all his <<npc_dick[$boy]>> cm are inside you.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+
+	!doggy
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagdoggy1.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass high as possible.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/vagdoggy2.mp4"></video></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> now rams you as deep and as fast he can, the every one of his <<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
+			'He takes this as an invitation, lying behind you.'
+			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
+			'Finally <<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> uses this to his advantage and pushes as far as his <<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you reach for his hairy balls between your legs, rubbing it and making him groan even more...'
+			'<<$npc_firstname[$boy]>> now rams you as deep and he can and giving the position and the whole (<<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+
+	!full nelson
+	elseif step = 4:
+		if oleg_pornPos < 1:oleg_pornPos = 1
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson1.jpg"></center>'
+			''
+			'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 <<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagfullnelson2.mp4"></video></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+
+	!pile driver
+	elseif step = 5:
+		if oleg_pornPos < 2:oleg_pornPos = 2
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver1.jpg"></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagpiledriver2.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you can do nothing but watch his penis and hairy crotch bang you down like a hammer.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Vag'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning loudly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			oleg_vag += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end, pumping his load <<npc_dick[$boy]>> cm deep inside your pussy.'
+			oleg_vagCumInside += 1
+			oleg_cumVag += 1
+			oleg_lastCum = daystart
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> 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=#<<$oleg_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 <<$npc_firstname[$boy]>>!"</font>'
+				'<font color=#<<$oleg_font>>>"Than you better do something about it. We''re done here."</font>'
+				'He is obvously annoyed by this.'
+				npc_rel['A266'] -= 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.'
+			oleg_lastCum = daystart
+			oleg_cumVag += 1
+			oleg_vagCumInside += 1
+			oleg_vagCumInsideUnwanted += 1
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$oleg_font>>>"If I won''t cum inside you, will you swallow?"</font>'
+			act 'Yes':subStep = 20 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+			act 'No':subStep = 30 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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...'
+			oleg_lastCum = daystart
+			oleg_cumSwall += 1
+			oleg_swall += 1
+			npc_rel['A266'] += 1
+			minut += 5
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$oleg_font>>>"Allright I''ll cum elsewhere..."</font>'
+			npc_rel['A266'] -= 3
+			cumOutL2 = rand(2, 5)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_oleg', 'oleg_Sex_Vag'
+		end
+	end
+end
+
+if $ARGS[0] = 'oleg_Sex_Anal':
+	gs 'boyStat', 'A266'
+	'<b><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>> - anal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'oleg_Sex_Anal'
+	price = price_anal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 <<npc_dick[$boy]>> cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$oleg_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
+		'<<$npc_firstname[$boy]>> takes you by the waist, kissing you.'
+		'<font color=#<<$oleg_font>>>"Do you want to go for certain position, or should I choose?"</font>'
+		if oleg_pornPos = 0:hisPos = rand(1, 3)
+		if oleg_pornPos = 1:hisPos = rand(1, 4)
+		if oleg_pornPos = 2:hisPos = rand(1, 5)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		act 'Take me from side':step = 3 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		if oleg_doPornpos = 1 and oleg_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':npc_rel['A266'] += 3 & step = 4 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		if oleg_doPornpos = 2 and oleg_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':npc_rel['A266'] += 2 & step = 5 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		if oleg_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		if oleg_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal2.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> 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 oleg_mood <= 5 or npc_rel['A266'] > 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 <<npc_dick[$boy]>> cm long thick dick through your sphincter.'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$oleg_font>>>"Come on <<$pcs_firstname>>, don''t be like a small child, you can take it."</font>'
+				gs 'pain', 1, 'asshole', 'tear'
+			end
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/fuckanal5.mp4"></video></center>'
+			''
+			'As he continuously fucks your anus, you reach to rub his hairy ass, making him even hornier.'
+			'<<$npc_firstname[$boy]>> now rams you as deep as he can, all his <<npc_dick[$boy]>> centimeters are inside you.'
+			gs 'arousal', 'anal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+
+	!behind
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analdoggy1.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
+			'<<$npc_firstname[$boy]>> 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 oleg_mood <= 5 or npc_rel['A266'] > 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 <<npc_dick[$boy]>> cm long thick dick through your sphincter.'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Sex_Anal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analdoggy2.mp4"></video></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> now rams you as deep and as fast he can, the every one of his <<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
+			'He takes this as an 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 oleg_mood <= 5 or npc_rel['A266'] > 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 <<npc_dick[$boy]>> cm long thick dick through your sphincter.'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Sex_Anal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck2.mp4"></video></center>'
+			''
+			'As he continuously fucks your anus, you reach for his hairy balls between your legs, rubbing it and making him groan even more...'
+			'<<$npc_firstname[$boy]>> now rams you as deep and he can and giving the position and the entire (<<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+
+	!full nelson
+	elseif step = 4:
+		if oleg_pornPos < 1:oleg_pornPos = 1
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analfullnelson1.jpg"></center>'
+			''
+			'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 <<npc_dick[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal3.mp4"></video></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+
+	!pile driver
+	elseif step = 5:
+		if oleg_pornPos < 2:oleg_pornPos = 2
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver1.jpg"></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> now has the very best access to your anus.'
+			! normal/or-better mood OR likes Sveta
+			if oleg_mood <= 5 or npc_rel['A266'] > 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 <<npc_dick[$boy]>> cm long thick dick through your sphincter.'
+				'<font color=#<<$pcs_font>>>"Ouuuch! <<$npc_firstname[$boy]>>, that hurt!"</font>'
+				'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Sex_Anal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analpiledriver2.mp4"></video></center>'
+			''
+			'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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_Anal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning loudly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			oleg_anal += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumanal4.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end, pumping his load <<npc_dick[$boy]>> cm deep inside your anus.'
+			oleg_analCumInside += 1
+			oleg_lastCum = daystart
+			oleg_cumAnal += 1
+			gs 'cum_call', 'anus', $boy, 1
+			gs 'arousal', 'anal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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
+			oleg_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> 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=#<<$oleg_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=#<<$oleg_font>>>"Oh jeez you are a girl, get used to it! We''re done here."</font>'
+			'He is obvously annoyed by your reaction.'
+			oleg_analCumInsideUnwanted += 1
+			oleg_lastCum = daystart
+			oleg_cumAnal += 1
+			npc_rel['A266'] -= 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
+			gs 'arousal', 'anal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$oleg_font>>>"If I won''t cum inside you, will you swallow?"</font>'
+			act 'Yes':subStep = 20 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+			act 'No':subStep = 30 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cummouth3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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...' 		
+			oleg_swall += 1	
+			npc_rel['A266'] += 1
+			minut += 5
+			oleg_lastCum = daystart
+			oleg_cumSwall += 1
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$oleg_font>>>"Allright I''ll cum elsewhere..."</font>'
+			npc_rel['A266'] -= 3
+			cumOutL2 = rand(2, 5)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_oleg', 'oleg_Sex_Anal'
+		end
+	end
+end
+
+if $ARGS[0] = 'oleg_Sex_piss':
+	gs 'boyStat', 'A266'
+	'<b><font color=#<<$oleg_font>>><<$npc_firstname[$boy]>> - Golden Shower</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/nd.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/nd/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'oleg_Sex_piss'
+	price = price_special
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/shared/sex/undress/kotovpre11.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 <<npc_dick[$boy]>> cm long cock and on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$oleg_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
+		'<<$npc_firstname[$boy]>> takes you by the waist, kissing you.'
+		
+		! first time ?
+		if oleg_piss = 0:
+			'<font color=#<<$oleg_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 'pav_shared_oleg', 'oleg_Sex_piss'
+	
+	! foreplay
+	elseif step = 10:
+		gs 'arousal', 'foreplay', 5
+		'<center><video autoplay loop src="images/shared/sex/kiss/kotovpre10.mp4"></video></center>'
+		''
+		'You feel somehow awkward as <<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! suck
+	elseif step = 20:
+		gs 'arousal', 'bj', 3
+		cockHard = 1
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj120.mp4"></video></center>'
+		''
+		'You take over the initiative and move to suck his <<npc_dick[$boy]>> cm long, now fully hard dick.'
+		'<<$npc_firstname[$boy]>> is getting unusually aroused, probably by imagining that his secret dream is to come true.'
+		act 'Continue':step = 30 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! vaginal
+	elseif step = 30:
+		gs 'arousal', 'vaginal', 5
+		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsexbonus17.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! anal
+	elseif step = 40:
+		gs 'arousal', 'anal', 5
+		'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal30.mp4"></video></center>'
+		''
+		'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 <<$npc_firstname[$boy]>> as usually - he seems to suffer a bit because of his full bladder!'
+		act 'Continue':step = 50 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! piss mouth
+	elseif step = 50:
+		pcs_hydra += 15
+		gs 'arousal', 'bj', 2, 'humiliation'
+		gs 'arousal', 'pee', -2, 'sub', 'humiliation'
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pissmouth.mp4"></video></center>'
+		''
+		'<font color=#<<$oleg_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=#<<$oleg_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=#<<$oleg_font>>>"Aaaaaahh!"</font>'
+		'<<$npc_firstname[$boy]>> 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=#<<$oleg_font>>>"Now drink it!"</font>'
+		'It doesn''t even sound as if the shy <<$npc_firstname[$boy]>> 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=#<<$oleg_font>>>"Good girl! There is still enough for your other holes, move around!"</font>'
+		act 'Present your pussy':step = 60 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! piss vaginal
+	elseif step = 60:
+		gs 'arousal', 'vaginal', 2, 'humiliation'
+		gs 'arousal', 'pee', -2, 'sub', 'humiliation'
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pisspussy.mp4"></video></center>'
+		''
+		'<font color=#<<$oleg_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=#<<$oleg_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.'
+		'<<$npc_firstname[$boy]>> uses this gape and starts pissing into it, filling you with very warm liquid.'
+		'<font color=#<<$oleg_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=#<<$oleg_font>>>"Now it''s time for the last delivery! Show me your assgape!"</font>'
+		act 'Present your ass':step = 70 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! piss anal
+	elseif step = 70:
+		gs 'arousal', 'anal', 3, 'humiliation'
+		gs 'arousal', 'pee', -3, 'sub', 'humiliation'
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pissanus.mp4"></video></center>'
+		''
+		'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=#<<$oleg_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.'
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! cum
+	elseif step = 80:
+		npc_rel['A266'] += 3
+		oleg_lastCum = daystart
+		oleg_cumSwall += 1
+		
+		gs 'arousal', 'anal', 2, 'humiliation'
+		gs 'cum_call', 'anus', $boy, 1
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/analcum.jpg"></center>'
+		''
+		'<font color=#<<$oleg_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 ass-cheeks before he thrust the tip into your piss-filled anus with loud sigh.'
+		'<font color=#<<$oleg_font>>>"AAAHHHHH!"</font>'
+		act 'Continue': step = 90 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+
+	! end
+	elseif step = 90:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/nd/pisssoaked.jpg"></center>'
+		''
+		'You lie on the plastic covered bed, hair wet from <<$npc_firstname[$boy]>>''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.'
+		'<<$npc_firstname[$boy]>> get''s up, cleaning his hands with a towel, looking down at you lying there, breathing.'
+
+		! first time ?
+		if oleg_piss = 0:
+			'<font color=#<<$oleg_font>>>"Are you alright <<$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=#<<$oleg_font>>>"So how was it <<$pcs_firstname>>?"</font>'
+			act 'The worst experience ever! Never speak of it again':pissLike = -1 & step = 100 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+			act 'I feel humiliated, please never make me do it again':pissLike = 0 & step = 100 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+			act 'It wasn''t so bad, but it doesn''t really arouse me though':pissLike = 1 & step = 100 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+			act 'I didn''t think I would, but I loved it':pissLike = 2 & step = 100 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+		else
+			'<font color=#<<$oleg_font>>>"Are you alright <<$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 'pav_shared_oleg', 'oleg_Sex_piss'
+		end
+
+	! like or not; only first time dialogue
+	elseif step = 100:
+		if pissLike = -1:
+			'<font color=#<<$oleg_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=#<<$oleg_font>>><i>(gulp)</i></font>'
+			act 'Leave':oleg_piss = -3 & step = 110 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+		elseif pissLike = 0:
+			'<font color=#<<$oleg_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!':oleg_piss = -2 & step = 110 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+		elseif pissLike = 1:
+			'<font color=#<<$oleg_font>>>"Does that mean that you will be willing to do it sometime again?"</font>'
+			act 'Yes':oleg_piss = 1 & step = 110 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+			act 'Rather not':oleg_piss = -1 & step = 110 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+		elseif pissLike = 2:
+			'<font color=#<<$oleg_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=#<<$oleg_font>>>"You are such a cool girl <<$pcs_firstname>>!"</font>'
+			act 'Yes':oleg_piss = 1 & step = 110 & gt 'pav_shared_oleg', 'oleg_Sex_piss'
+		end
+	
+	! paygate
+	elseif step = 110:
+		gs 'arousal', 'end'
+		gs 'stat'
+		oleg_piss += 1
+		step = 0
+		gt 'pav_shared_apt', 'payService'
+	end
+end
+
+--- pav_shared_oleg ---------------------------------
+

+ 0 - 1200
locations/pav_shared_sp.qsrc

@@ -1,1200 +0,0 @@
-# pav_shared_sp
-
-if $ARGS[0] = 'sp':
-	menu_off = 1
-	$loc_arg = 'sp'
-	minut += 2
-	'<h3><font color=#<<$sp_font>>><<$sp_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-	''
-	'He is a sportsman, with fine toned abs and arms, big shoulders...'
-	if sp_hadSex = 1:'As you know very well, <<$sp_name>> has <<spDick>> cm long <a href="exec:gt ''pav_shared_sp'', ''spDick''">dick</a> with always smoothly shaved pubic hair.'
-	''
-	'<b>Today he looks to be in a <<$sp_mood>> mood.</b>'
-	if sp_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=#<<$sp_font>>>"<<$pcs_firstname>> is that a cum? Please go wash yourself."</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	! cum on clothes
-	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
-		'<font color=#<<$sp_font>>>"<<$pcs_firstname>> is that a cum on your clothes? Please go change or at least strip it down."</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	! cum on belly, breasts, ass, pussy; visible only when nude
-	elseif (cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0) and $clothingworntype = 'nude':
-		'<font color=#<<$sp_font>>>"<<$pcs_firstname>> did you just have sex with the other guys? Because you forgot to wash out the cum!"</font>'
-		act 'Leave': gt 'pav_shared_apt', 'start'
-	else
-		'<font color=#<<$sp_font>>>"Hey sweetie, how are you?"</font>'
-		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
-		act 'Chat with him':gt 'pav_shared_sp', 'spChat'
-		if servitudeLvl = 2 and sp_served = 0:act 'Offer him to serve':gt 'pav_shared_sp', 'spServe'
-	end
-end
-
-if $ARGS[0] = 'spChat':
-	menu_off = 1
-	$loc_arg = 'spChat'
-	'<h3><font color=#<<$sp_font>>><<$sp_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-	
-	! basic chat
-	if chatLvl = 0:
-		say = rand(1, 2)
-		if say = 1:
-			!clothing and bodyshape reactions
-			if $clothingworntype = 'nude':
-				'<<$sp_name>> is looking at your nude body wondering...'
-				if salocatnow <= 1:
-					'He is not very content with the sight: <font color=#<<$sp_font>>>"<<$pcs_firstname>>, are you not anorexic? Better not, it is a terrible thing."</font>'
-				elseif salocatnow > 1 and salocatnow <= 3:
-					'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, you have nice bodyshape you know. Do you exercise or are you mp4ten from nature?"</font>'
-				else
-					'He is not very content with the sight: <font color=#<<$sp_font>>>"<<$pcs_firstname>>, you should eat less, too much bodyfat is bad for your sport performance."</font>'
-				end
-				!panties on
-				if $pantyworntype ! 'none':
-					'<font color=#<<$sp_font>>>"Adorable panties sweetie, where did you buy those?"</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=#<<$sp_font>>>"<<$pcs_firstname>>, is that a buttplug??"</font> (his eyes spark with weird shine).'
-					if rand(0, 100) < 30:
-						'<font color=#<<$pcs_font>>>"Yes <<$sp_name>>, it is. Do you like it? Will you help me with it? It seems stuck."</font>'
-						'<font color=#<<$sp_font>>>"Yes! How it feels walking around with that inside you?"</font>'
-						'<font color=#<<$pcs_font>>>"It is... arousing. And also fullfilling. If you know what I mean."</font>'
-						'<font color=#<<$sp_font>>>"Yea... I guess!"</font>'
-						'<font color=#<<$pcs_font>>>"So will you help with it?"</font>'
-						'<font color=#<<$sp_font>>>"You mean take it out? No! It would be shame to relieve you of the pleasure. But I think it needs a little adjustment here and there... Let me see!"</font>'
-						act 'Let him play with it':chatLvl = 10 & gt 'pav_shared_sp', 'spChat'
-					end
-				end
-			elseif CloBimbo = 1:
-				'<<$sp_name>> is looking at your outfit with suspicion.'
-				if salocatnow >= 1 and salocatnow <= 4:
-					'<font color=#<<$sp_font>>>"What a sexy dress are you wearing! Aren''t you afraid it is too sexy for some people in the town, though?"</font>'
-				else
-					'<font color=#<<$sp_font>>>"Nice dress sweetie, but it would look better if you lost some fat, you know..."</font>'
-				end
-			elseif CloStyle = 4:
-				'<<$sp_name>> is looking at your outfit with suspicion.'
-				if salocatnow <= 4:
-					'<font color=#<<$sp_font>>>"I love sexy dresses on you sweetie, but this one makes you look like a... paygirl, if you know what I mean."</font>'
-				else
-					'<font color=#<<$sp_font>>>"Sweetie this dress one makes you look like a... paygirl, if you know what I mean."</font>'
-				end
-			end
-		elseif say = 2:
-			! age reactions
-			if age < 18:
-				'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, you said you are <<age>> years old. Are you doing some sports? You should."</font>'
-			end
-		end
-
-		if step = 0:
-			minut += 1
-			act 'Chat about everyday stuff': step = 10 & gt 'pav_shared_sp', 'spChat'
-			act 'Leave':gt 'pav_shared_apt', 'start'
-		elseif step = 10:
-			minut += 15
-			sayN = rand (1, 10)
-			if sayN = 1:'<i><font color=#<<$sp_font>>>"Doing sports is the way of my life. I cannot imagine not doing any."</font></i>'
-			if sayN = 2:'<i><font color=#<<$sp_font>>>"I need to work harder on my abs."</font></i>'
-			if sayN = 3:'<i><font color=#<<$sp_font>>>"A good soccer player has two main skills - the game itself and... his haircut."</font></i>'
-			if sayN = 4:'<i><font color=#<<$sp_font>>>"I hate staying sweaty a game. I shower after every one of them."</font></i>'
-			if sayN = 5:'<i><font color=#<<$sp_font>>>"Using drugs to improve one''s sporting abillities is wrong."</font></i>'
-			'<i>You spent some time chatting with him about sport, his trophies and achievements, slightly improving your relation with him.</i>'
-			sp_rel += 1
-			gs 'stat'
-			intimateTalkCh = rand (0, 100)
-			if sp_mood <= 2 and intimateTalkCh <= 50:
-				step = 20
-			else
-				step = 0
-			end
-			act 'Continue':gt 'pav_shared_sp', 'spChat'
-		elseif step = 20:
-			minut += 3
-			if servitudeLvl = 0:
-				'<font color=#<<$sp_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=#<<$sp_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 'pav_shared_sp', 'spChat'
-				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_sp', 'spChat'
-			elseif servitudeLvl = 1:
-				'<font color=#<<$sp_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=#<<$sp_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 'pav_shared_sp', 'spChat'
-				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_sp', 'spChat'			
-			elseif servitudeLvl = 2:
-				act 'Talk about sex':step = 30 & gt 'pav_shared_sp', 'spChat'
-				act 'Continue':step = 0 & gt 'pav_shared_sp', 'spChat'
-			end
-		elseif step = 30:
-			minut += 5
-			'You get into rather passionate discussion about sex and all that stuff. <<$sp_name>> seems to love to talk about such topics.'
-			resCh = rand (0, 5)
-			if resCh <= 3:
-				topicR = rand (1, 5)
-				if topicR = 1:'<<$sp_name>> passionately tells you he loves looking at the girls face when she orgasms.'
-				if topicR = 2:'<<$sp_name>> passionately tells you he loves when girl is touching with his asscheeks.'
-				if topicR = 3:'<<$sp_name>> passionately tells you he adores blond girls the most.'
-				if topicR = 4:'<<$sp_name>> passionately tells you his <<spDick>> cm long dick is just enough to make love and not pain.'
-				if topicR = 5:'<<$sp_name>> passionately tells you he loves when the girl is a sporting type.'
-				act'Continue':step = 0 & gt 'pav_shared_sp', 'spChat'
-			
-			elseif resCh = 4:
-				if sp_anal = 0:
-					'<<$sp_name>> admits that he no girl has yet allowed him to fuck her ass.'
-					sp_doAnal = 1
-					act'Continue':step = 0 & sp_rel += 1 & gt 'pav_shared_sp', 'spChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_sp', 'spChat'
-				end
-
-			elseif resCh = 5:
-				if sp_anal = 0:
-					'<<$sp_name>> almost secretely tells you he owns a dildo so big that no girl can insert it into her entirely.'
-					sp_doDildo = 1
-					act'Continue':step = 0 & sp_rel += 1 & gt 'pav_shared_sp', 'spChat'
-				else
-					act'Continue':step = 0 & gt 'pav_shared_sp', 'spChat'
-				end
-
-			end
-		end
-
-	! anal plug
-	elseif chatLvl = 10:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugplay.mp4"></video></center>'
-		''
-		'<font color=#<<$sp_font>>>"Let''s see what you have in there..."</font>'
-		'<<$sp_name>> takes the plug and slowly pulls it halfway out, gazing and how big it is.'
-		'Then he twists it around, still in your ass and pushes it back in there, repeating this few times.'
-		'<font color=#<<$sp_font>>>"I think it fits better now."</font>'
-		'<font color=#<<$pcs_font>>>"Thank you <<$sp_name>>!"</font>'
-		act 'Continue':chatLvl = 0 & gt 'pav_shared_sp', 'spChat'
-	
-	! strapon kink
-	!elseif chatLvl = 20:
-	end
-end
-
-if $ARGS[0] = 'spDick':
-	menu_off = 1
-	minut += 2
-	'<h3><font color=#<<$sp_font>>><<$sp_name>></font></h3>'
-	if set_imgh < 250:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	else
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	end
-	''
-	'Your relation with him is <<sp_rel>> / 100.'
-	'His dick is <<spDick>> cm long with always smoothly shaved pubic hair.'
-	milkPause = daystart - sp_lastCum
-	if milkPause >= 1:'You have not milked him for <<milkPause>> day(s), he most likely has <<sp_cumVol>> ml semen accumulated in his balls' & if sp_cumVol > 60:', which are starting to turn blue' + '.'
-	'Today he looks to be at about <<sp_horny>> % of his maximum horniness.'
-	''
-	'So far you have:'
-		if sp_hj = 1:'- jerked him'	
-			if sp_hj > 1:'- jerked him <<sp_hj>> times' & if sp_hjFail > 1:' and failed to make him cum with your hands <<sp_hjFail>> times'
-		if sp_bj = 1:'- given him a blowjob'
-			if sp_bj > 1:'- given him <<sp_bj>> blowjobs' & if sp_bjFail > 1:' and failed to make him cum with your mouth <<sp_bjFail>> times'
-		if sp_bjDeep = 1:'- given him a blowjob with deepthroat'
-			if sp_bjDeep > 1:'- given him <<sp_bjDeep>> blowjobs with deepthroat' & if sp_bjFailPuke > 1:' but failed and puked in his crotch <<sp_bjFailPuke>> times' & if sp_bjFailPuke > 1:' but failed and fainted impaled on his cock <<sp_bjFailFaint>> times'
-		if sp_swall = 1:'- swallowed his semen, making it <<sp_cumSwall>> ml swallowed total'
-			if sp_swall > 1:'- swallowed his semen <<sp_swall>> times, making it <<sp_cumSwall>> ml swallowed total'
-		if sp_vag = 1:'- took it in your pussy' & if sp_vagCumInside = 1:' and let him cum inside you' & if sp_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
-			if sp_vag > 1:'- took it in your pussy <<sp_vag>> times' & if sp_vagCumInside >= 1:' and let him cum inside you <<sp_vagCumInside>> times' & if sp_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<sp_vagCumInsideUnwanted>> times'
-		if sp_cumVag > 0:'- he pumped in total <<sp_cumVag>> ml of cum into your pussy'
-		if sp_anal = 1:'- took it in your ass' & if sp_analCumInside = 1:' and let him cum inside you' & if sp_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
-			if sp_anal > 1:'- took it in your ass <<sp_anal>> times' & if sp_analCumInside >= 1:' and let him cum inside you <<sp_analCumInside>> times' & if sp_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<sp_analCumInsideUnwanted>> times'
-		if sp_analVag > 0:'- he pumped in total <<sp_cumAnal>> ml of into your anus'
-
-		if sp_dildo = -4:'- wanted to make him a show with giant dildo, but you were afraid of its size just from seeing it'
-		if sp_dildo = -3:'- once made him a show with giant dildo, but it was horrible experience and you''ll never do it again'
-		if sp_dildo = -2:'- once made him a show with giant dildo, but it felt very humiliating and he knows you will not do it again'
-		if sp_dildo = -1:'- once made him a show with giant dildo, you do not mind but also do not find it arousing and he knows you will not do it again'
-		if sp_dildo = 1 and dildoLike = 1:'- once made him a show with giant dildo, you do not mind but also do not find it arousing, but he knows you are willing to do it repeatedly'
-			if sp_dildo > 1 and dildoLike = 1:'- made him a show with giant dildo <<sp_dildo>> times, you do not mind but also do not find it arousing, but he knows you are willing to do it repeatedly'
-		if sp_dildo = 1 and dildoLike = 2:'- once made him a show with giant dildo, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
-			if sp_dildo > 1 and dildoLike = 2:'- made him a show with giant dildo <<sp_dildo>> times, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
-
-	if $loc_arg = 'sp':
-		act 'Continue':gt 'pav_shared_sp', 'sp'
-	else
-		act 'Continue':gt 'pav_shared_apt', $goBack
-	end
-end
-
-if $ARGS[0] = 'spServe':
-	menu_off = 1
-	$boy = $sp_name
-	gs 'npcgeneratec', 0, $boy, 19
-	gs 'boyStat', $npclastgenerated
-	minut += 2
-	$loc_arg = 'spServe'
-	'<h3><font color=#<<$sp_font>>><<$sp_name>></font></h3>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-	step = 0
-	subStep = 0
-	sexCh = rand (0, 30) + sp_horny
-	! very bad mood
-	if sp_mood >= 5:
-		'<font color=#<<$sp_font>>>"Not now <<$pcs_firstname>>, I am exhausted."</font>'
-		act 'Leave':gt 'pav_shared_apt', 'start'
-	
-	! random chance to sex, but increasing with horniness level; nd min horny = 10/60*100 = 16,67
-	elseif sexCh < 40:
-		'<font color=#<<$sp_font>>>"Not now <<$pcs_firstname>>, I have to excersice in a while."</font>'
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	! wants sex
-	else
-		actionR = rand (2, 5)
-		if actionR = 2:
-			'<font color=#<<$sp_font>>>"Sure <<$pcs_firstname>>, I could use a nice blowjob."</font>'
-			act 'Agree': sp_rel += 1 & gt 'pav_shared_sp', 'spSuck'
-		elseif actionR = 3:
-			'<font color=#<<$sp_font>>>"Good idea, I would like to have a sex."</font>'
-			act 'Agree': sp_rel += 1 & gt 'pav_shared_sp', 'spSexVaginal'
-		elseif actionR = 4:
-			if sp_anal = 0:
-				if sp_doAnal = 1:
-					'<font color=#<<$sp_font>>>"I am not sure what I enjoy more with you <<$pcs_firstname>>..."</font>'
-					act 'It''s your choice':gt 'pav_shared_sp', 'spServe'
-					act 'You told me you have never tried anal, did you?': sp_rel += 2 & gt 'pav_shared_sp', 'spSexAnal'
-				else
-					gt 'pav_shared_sp', 'spServe'
-				end
-			elseif sp_anal >= 1:
-				'<font color=#<<$sp_font>>>"Sure <<$pcs_firstname>>, I would like to take enjoy your beautyful ass this time."</font>'
-				act 'Agree': sp_rel += 1 & gt 'pav_shared_sp', 'spSexAnal'
-			end
-		elseif actionR = 5:
-			if sp_dildo = 0:
-				if sp_doDildo = 1:
-					'<font color=#<<$sp_font>>>"I am not sure what I enjoy more with you <<$pcs_firstname>>..."</font>'
-					act 'It''s your choice':gt 'pav_shared_sp', 'spServe'
-					act 'You told me you own some kind of giant dildo, do you?': & sp_rel += 2 & gt 'pav_shared_sp', 'spSexGiantdildo'
-				else
-					gt 'pav_shared_sp', 'spServe'
-				end
-			elseif sp_dildo >= 1:
-				'<font color=#<<$sp_font>>>"Great <<$pcs_firstname>>, I want to see you ride the Big boy once again!"</font>'
-				act 'Agree': sp_rel += 1 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			end
-		end
-		if actionR > 1:act 'Say you changed your mind and leave': sp_rel -= 1 & gt 'pav_shared_apt', 'start'
-	end
-end
-
-if $ARGS[0] = 'spSuck':
-	'<b><font color=#<<$sp_font>>><<$sp_name>> - blowjob</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
-		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	end
-	$loc_arg = 'spSuck'
-	price = price_blowjob
-	if step > 0:'<<$sp_name>> orgasm build-up: '+orgB+'/100'
-
-	! crawl to him
-	if step = 0:
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
-		''
-		'<<$sp_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 'pav_shared_sp', 'spSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-
-	!lick balls
-	elseif step = 1:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus7.mp4"></video></center>'
-		''
-		'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 'pav_shared_sp', 'spSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-
-	!Lick the tip
-	elseif step = 2:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus3.mp4"></video></center>'
-		''
-		'You take <<$sp_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 <<spDick>> cm length.'
-		gs 'arousal', 'bj', 3
-		gs 'stat'
-		orgB += rand(2, 7)
-		cockHard = 1
-		act 'Lick his balls':step = 1 & gt 'pav_shared_sp', 'spSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-
-	!suck the tip
-	elseif step = 3:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj114.mp4"></video></center>'
-		if cockHard = 0:
-			orgB += rand(5, 15)
-			'<<$sp_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)
-			'<<$sp_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 'pav_shared_sp', 'spSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_sp', 'spSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_sp', 'spSuck'
-		end
-
-	!sucking dick
-	elseif step = 4:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj111.mp4"></video></center>'
-		''
-		if cockHard = 0:
-			orgB += rand(15, 35)
-			'<<$sp_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)
-			'<<$sp_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 'pav_shared_sp', 'spSuck'
-		act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-		act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-		act 'Deepthroat':step = 5 & gt 'pav_shared_sp', 'spSuck'
-		if orgB >= 100:
-			act 'Try to make him cum':step = 6 & gt 'pav_shared_sp', 'spSuck'
-		end
-	
-	!deepthroat
-	elseif step = 5:
-		'<center><video autoplay loop src="images/shared/sex/blowjob/shower7.mp4"></video></center>'
-		''
-		orgB += rand(40, 60)
-		'You decide to take <<$sp_name>>''s hard, <<spDick>> 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.'
-		'Even though his cock is not the largest one, it is long enough to make you gag.'
-		'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 <<$sp_name>>''s crotch!</b>'
-			act 'Continue':step = 8 & gt 'pav_shared_sp', 'spSuck'
-		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 'pav_shared_sp', 'spSuck'
-		else
-			act 'Lick his balls':step = 1 & gt 'pav_shared_sp', 'spSuck'
-			act 'Lick the tip':step = 2 & gt 'pav_shared_sp', 'spSuck'
-			act 'Suck the tip':step = 3 & gt 'pav_shared_sp', 'spSuck'
-			act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'
-			act 'Deepthroat':step = 5 & gt 'pav_shared_sp', 'spSuck'
-			if orgB >= 100:
-				act 'Try to make him cum':step = 6 & gt 'pav_shared_sp', 'spSuck'
-			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:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth1.mp4"></video></center>'
-			''
-			'Your attempt is successful, as <<$sp_name>> cums right into your mouth and on your face.'
-			sp_lastCum = daystart
-			sp_served = 1
-			gs 'cum_call', 'mouth', $boy, 1, 0, sp_cumVol / 2
-			gs 'cum_call', 'face', $boy, 1, 0, sp_cumVol / 2
-			act 'Get up':step = 10 & sp_cumVol = 0 & gt 'pav_shared_sp', 'spSuck'
-		else
-			failC += 1
-			if failC >= 3:
-				''
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
-				''
-				'<font color=#<<$sp_font>>>"Sweetie if you can''t suck a cock don''t do it. Leave me be!"</font>'
-				act 'Get up':step = 7 & gt 'pav_shared_sp', 'spSuck'
-			else
-				''
-				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
-				''
-				'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, sweetie, 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 'pav_shared_sp', 'spSuck'
-				act 'Suck the cock':step = 4 & gt 'pav_shared_sp', 'spSuck'	
-				act 'Deepthroat':step = 5 & gt 'pav_shared_sp', 'spSuck'
-			end
-		end
-		gs 'stat'
-
-	!END cum fail
-	elseif step = 7:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-		''
-		'You get up from your knees, looking at <<$sp_name>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
-		'He looks annoyed:<font color=#<<$sp_font>>>"Try better next time."</font>'
-		sp_rel -= 3
-		step = 0
-		sp_bjFail += 1
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	!END deepthroat fail
-	elseif step = 8:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
-		''
-		'<font color=#<<$sp_font>>>"Oh my god <<$pcs_firstname>>, have you just puked into my crotch??!!"</font>'
-		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
-		'<font color=#<<$sp_font>>>"Oh gosh <<$pcs_firstname>>, I think I''m gonna puke too! Do something!"</font>'
-		sp_rel -= 5
-		step = 0
-		sp_bjFail += 1
-		sp_bjFailPuke += 1
-		act 'Leave':gt 'pav_shared_apt', 'start'
-
-	!END deepthroat fade out
-	elseif step = 9:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
-		''
-		'You wake up being slapped in your face: <font color=#<<$sp_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=#<<$sp_font>>>"I think you have hold your breath for too long and fainted, <<$pcs_firstname>>."</font> He is feeling compassionate to you.'
-		sp_rel += 1
-		step = 0
-		sp_bjFail += 1
-		sp_bjFailFaint += 1
-		act 'Get up and leave':gt 'pav_shared_apt', 'start'
-
-	!END cum success
-	elseif step = 10:
-		nd_bj += 1
-		if sp_mood <= 3:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<font color=#<<$sp_font>>>"Thank you my sweetie."</font>'
-			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"You are always welcome. Seeya!"</font>.'
-			sp_rel += 1
-			step = 0
-		else
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
-			''
-			'<<$sp_name>> doesn''t pay anymore attention to you, getting back to reading his sports magazine.'
-			'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 'pav_shared_apt', 'payService'
-	end
-end
-
-if $ARGS[0] = 'spSexVaginal':
-	'<b><font color=#<<$sp_font>>><<$sp_name>> - vaginal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'spSexVaginal'
-	price = price_vaginal
-	if step > 0:'<<$sp_name>> orgasm build-up: '+orgB+'/100'
-
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$sp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
-		'His hairless, muscular body has a bronze tan. He moves towards you, lubing his <<spDick>> cm long cock and stroking it on the way.'
-		if $pantyworntype ! 'none':
-			gs 'panties', 'remove'
-			gs 'stat'
-			'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
-			'You entirely forgot to take them off!'
-			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
-		end
-		'<<$sp_name>> takes you by the waist, delicately kissing you.'
-		'<font color=#<<$sp_font>>>"Do you want to make love in a certain position, or should I choose?"</font>'
-		if sp_pornPos = 0:hisPos = rand(1, 3)
-		!if sp_pornPos = 1:hisPos = rand(1, 4)
-		!if sp_pornPos = 2:hisPos = rand(1, 5)
-
-		act 'Let him choose':step = hisPos & gt 'pav_shared_sp', 'spSexVaginal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_sp', 'spSexVaginal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_sp', 'spSexVaginal'
-		!if sp_doPornpos = 1 and sp_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':sp_rel += 3 & step = 4 & gt 'pav_shared_sp', 'spSexVaginal'
-		!if sp_doPornpos = 2 and sp_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':sp_rel += 2 & step = 5 & gt 'pav_shared_sp', 'spSexVaginal'
-		!if sp_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_sp', 'spSexVaginal'
-		!if sp_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_sp', 'spSexVaginal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
-			''
-			'You lie on the bed, spreading your legs for easy access.'
-			'<<$sp_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.'
-			'<<$sp_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 'pav_shared_sp', 'spSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsexbonus3.mp4"></video></center>'
-			''
-			'As he continuously fucks your pussy, you rub his hairless ass, making him even hornier.'
-			'As you move your hands around his smooth asscheeks, it seems to arouse him even more.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(20, 40) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexVaginal'
-		end
-
-	!doggy
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/shared/sex/vag/doggy/kotovsex10.mp4"></video></center>'
-			''
-			'You kneel on the bed, bending your back as much as you can, putting your nice round ass high as possible.'
-			'<<$sp_name>> kneels behind you, rubbing your asscheeks. He starts probing your pussy with his lubed fingers, sensitively stimulating your labia and clitoris.'
-			'Then he takes his dick and slowly enters your moist hole, pushing in until you he feels it''s starting to feel enough for you.'
-			'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.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20)
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/shared/sex/vag/facedown/kotovsexbonus20.mp4"></video></center>'
-			''
-			'As he continuously fucks your pussy, you reach for his smooth balls bashing your clitoris from behind and rub it, making his slow movements even more passionate.'
-			'He often plays with your anus with his fingers during the sex, using the doggystyle position to his advantage.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			gs 'arousal', 'vaginal', 10
-			gs 'stat'
-			orgB += rand(20, 40) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexVaginal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></video></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
-			'He takes this as an invitation, lying behind you.'
-			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
-			'Finally <<$sp_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.'
-			gs 'arousal', 'vaginal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
-			''
-			'As he continuously fucks your pussy, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			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 'pav_shared_sp', 'spSexVaginal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexVaginal'
-		end
-
-	!where to cum
-	elseif step = 10:
-		if subStep = 0:
-			minut += 2
-			'<<$sp_name>> is groaning loudly, you can say that he is reaching his orgasm.'
-			'You decide to tell him:'
-			sp_served = 1
-			sp_vag += 1
-			act 'Cum inside me':subStep = 1 & gt 'pav_shared_sp', 'spSexVaginal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_sp', 'spSexVaginal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
-			''
-			'<<$sp_name>> finally reaches the happy end, pumping his load <<spDick>> cm deep inside your pussy.'
-			sp_vagCumInside += 1
-			sp_cumVag += sp_cumVol
-			sp_lastCum = daystart
-			gs 'cum_call', '', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'vaginal', 2
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
-			''
-			'<<$sp_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
-			sp_lastCum = daystart
-			gs 'cum_call', 'stomach', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
-			''
-			'<<$sp_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
-			sp_lastCum = daystart
-			gs 'cum_call', 'butt', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
-			''
-			'<<$sp_name>> finally reaches the happy end and in the moment he starts spouting his seed, he gently pushes you on your knees 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
-			sp_lastCum = daystart
-			gs 'cum_call', 'face', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'You expect <<$sp_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=#<<$sp_font>>>"Sorry <<$pcs_firstname>>, it was just too intensive."</font>'
-			if tabletkishot = 0 and pillcon < 0:
-				'<font color=#<<$pcs_font>>>"I am not on the pill <<$sp_name>>!"</font>'
-				'<font color=#<<$sp_font>>>"Uh... Don''t worry, it will be allright. You can take the after pill, anyway!"</font>'
-				'He is obvously displeased by this.'
-				sp_rel -= 5
-			end
-			'Annoyed you 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.'
-			sp_lastCum = daystart
-			sp_cumVag += sp_cumVol
-			sp_vagCumInside += 1
-			sp_vagCumInsideUnwanted += 1
-			gs 'cum_call', '', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'vaginal', 5, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-
-		!will you swallow?
-		elseif subStep = 6:
-			'<font color=#<<$sp_font>>>"I won''t cum inside you, but please can you swallow?"</font>'
-			act 'Yes':subStep = 20 & gt 'pav_shared_sp', 'spSexVaginal'
-			act 'No':subStep = 30 & gt 'pav_shared_sp', 'spSexVaginal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
-			''
-			'<<$sp_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.'
-			'<<$sp_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...'
-			sp_lastCum = daystart
-			sp_cumSwall += sp_cumVol
-			sp_swall += 1
-			sp_rel += 1
-			minut += 5
-			gs 'cum_call', 'mouth', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!swallow NO
-		elseif subStep = 30:
-			'<font color=#<<$sp_font>>>"Allright I''ll cum elsewhere..."</font>'
-			sp_rel -= 3
-			cumOutL2 = rand(2, 5)
-			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_sp', 'spSexVaginal'
-		end
-	end
-end
-
-if $ARGS[0] = 'spSexAnal':
-	'<b><font color=#<<$sp_font>>><<$sp_name>> - anal sex</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'spSexAnal'
-	price = price_anal
-	if step > 0:'<<$sp_name>> orgasm build-up: '+orgB+'/100'
-
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$sp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
-		'His hairless, muscular body has a bronze tan. He moves towards you, lubing his <<spDick>> cm long cock and stroking it on the way.'
-		if $pantyworntype ! 'none':
-			gs 'panties', 'remove'
-			gs 'stat'
-			'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
-			'You entirely forgot to take them off!'
-			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
-		end
-		'<<$sp_name>> takes you by the waist, delicately kissing you.'
-		'<font color=#<<$sp_font>>>"Do you want to make love in a certain position, or should I choose?"</font>'
-		if sp_pornPos = 0:hisPos = rand(1, 3)
-		!if sp_pornPos = 1:hisPos = rand(1, 4)
-		!if sp_pornPos = 2:hisPos = rand(1, 5)
-
-		act 'Let him choose':step = hisPos & gt 'pav_shared_sp', 'spSexAnal'
-		act 'Take me like a missionary':step = 1 & gt 'pav_shared_sp', 'spSexAnal'
-		act 'Take me from behind':step = 2 & gt 'pav_shared_sp', 'spSexAnal'
-		act 'Take me from side':step = 3 & gt 'pav_shared_sp', 'spSexAnal'
-		!if sp_doPornpos = 1 and sp_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':sp_rel += 3 & step = 4 & gt 'pav_shared_sp', 'spSexAnal'
-		!if sp_doPornpos = 2 and sp_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':sp_rel += 2 & step = 5 & gt 'pav_shared_sp', 'spSexAnal'
-		!if sp_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_sp', 'spSexAnal'
-		!if sp_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_sp', 'spSexAnal'
-
-	!missionary
-	elseif step = 1:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/shared/sex/anal/mis/analenter.mp4"></video></center>'
-			''
-			'You lie on the bed, spreading your legs for easy access.'
-			'<<$sp_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.'		
-			'Before doing so, he takes some more lube on his fingers and one by one he stretches your anus with them. Making it easier for you to be penetrated.'
-			'He gently starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/shared/sex/anal/mis/kotovsexanal0.mp4"></video></center>'
-			''
-			'As he continuously fucks your anus, you rub his hairless ass, making him even hornier.'
-			'As you move your hands around his smooth asscheeks, it seems to arouse him even more.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			gs 'arousal', 'anal', 10
-			gs 'stat'
-			orgB += rand(20, 40) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexAnal'
-		end
-
-	!behind
-	elseif step = 2:
-		if subStep = 0:
-			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal4.mp4"></video></center>'
-			''
-			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
-			'<<$sp_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...'
-			'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.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20)
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/shared/sex/anal/doggy/kotovsexanal11.mp4"></video></center>'
-			''
-			'As he continuously fucks your anus, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			gs 'arousal', 'anal', 10
-			gs 'stat'
-			orgB += rand(20, 40) 
-			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexAnal'
-		end
-
-	!sidefuck
-	elseif step = 3:
-		if subStep = 0:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
-			''
-			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
-			'He takes this as an invitation, lying behind you.'
-			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
-			'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.'
-			gs 'arousal', 'anal', 10, 'lube'
-			gs 'stat'
-			orgB += rand(5, 20) 
-			act 'Let him continue':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck2.mp4"></video></center>'
-			''
-			'As he continuously fucks your anus, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
-			'<<$sp_name>> fucks you slowly and sensitively.'
-			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 'pav_shared_sp', 'spSexAnal'
-			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_sp', 'spSexAnal'
-		end
-
-	!where to cum
-	elseif step = 10:
-		if subStep = 0:
-			minut += 2
-			'<<$sp_name>> is groaning loudly, you can say that he is reaching his orgasm.'
-			'You decide to tell him:'
-			sp_served = 1
-			sp_anal += 1
-			act 'Cum inside me':subStep = 1 & gt 'pav_shared_sp', 'spSexAnal'
-			cumOutL = rand(2, 6)
-			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_sp', 'spSexAnal'
-
-		!inside
-		elseif subStep = 1:
-			'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal2.mp4"></video></center>'
-			''
-			'<<$sp_name>> finally reaches the happy end, pumping his load <<ndDick>> cm deep inside your anus.'
-			sp_analCumInside += 1
-			sp_lastCum = daystart
-			sp_cumAnal += sp_cumVol
-			gs 'cum_call', 'anus', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'anal', 2
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!stomach
-		elseif subStep = 2:
-			'<center><video autoplay loop src="images/shared/sex/cum/stomach/cumbelly2.mp4"></video></center>'
-			''
-			'<<$sp_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.'
-			'A small pool of cum lands on your abdomen, feeling warm but sticky.'
-			minut += 2
-			sp_lastCum = daystart
-			gs 'cum_call', 'stomach', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!ass
-		elseif subStep = 3:
-			'<center><video autoplay loop src="images/shared/sex/cum/cum3.mp4"></video></center>'
-			''
-			'<<$sp_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
-			sp_lastCum = daystart
-			gs 'cum_call', 'butt', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!face
-		elseif subStep = 4:
-			'<center><video autoplay loop src="images/shared/sex/cum/cumf10.mp4"></video></center>'
-			''
-			'<<$sp_name>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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
-			sp_lastCum = daystart
-			gs 'cum_call', 'face', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!takeout fail
-		elseif subStep = 5:
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
-			''
-			'You expect <<$sp_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=#<<$sp_font>>>"Sorry <<$pcs_firstname>>, it was just too intensive."</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=#<<$sp_font>>>"I am sorry sweetie, you are just too good a lover."</font>'
-			'He is obvously displeased by your reaction.'
-			sp_analCumInsideUnwanted += 1
-			sp_lastCum = daystart
-			sp_cumAnal += sp_cumVol
-			sp_rel -= 5
-			'You angrily 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, sp_cumVol
-			gs 'arousal', 'anal', 5, 'sub'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!will you swallow?
-		elseif subStep = 6:
-			'<font color=#<<$sp_font>>>"I won''t cum inside you, but please can you swallow?"</font>'
-			act 'Yes':subStep = 20 & gt 'pav_shared_sp', 'spSexAnal'
-			act 'No':subStep = 30 & gt 'pav_shared_sp', 'spSexAnal'
-
-		!swallow YES
-		elseif subStep = 20:
-			'<center><video autoplay loop src="images/shared/sex/cum/mouth/yum.mp4"></video></center>'
-			''
-			'<<$sp_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.'
-			'<<$sp_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...' 		
-			sp_swall += 1	
-			sp_rel += 1
-			minut += 5
-			sp_lastCum = daystart
-			sp_cumSwall += sp_cumVol
-			gs 'cum_call', 'mouth', $boy, 1, 0, sp_cumVol
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave':sp_cumVol = 0 & gt 'pav_shared_apt', 'payService'
-
-		!swallow NO
-		elseif subStep = 30:
-			'<font color=#<<$sp_font>>>"Allright I''ll cum elsewhere..."</font>'
-			sp_rel -= 3
-			cumOutL2 = rand(2, 5)
-			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_sp', 'spSexAnal'
-		end
-	end
-end
-
-if $ARGS[0] = 'spSexGiantdildo':
-	'<b><font color=#<<$sp_font>>><<$sp_name>> - giant dildo</font></b>'
-	if set_imgh < 250:
-		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	else
-		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
-		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
-	end
-	''
-	$loc_arg = 'spSexGiantdildo'
-	price = price_special
-	
-	!strip down
-	if step = 0:
-		minut += 5
-		orgB = 0
-		cockHard = 0
-		failC = 0
-		$clothingworntype = 'nude'
-		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
-		''
-		'<<$sp_name>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
-		'His hairless, muscular body has a bronze tan. He sits on a bed next to you, caressing his own <<spDick>> cm long cock.'
-		if $pantyworntype ! 'none':
-			gs 'panties', 'remove'
-			gs 'stat'
-			'<font color=#<<$sp_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
-			'You entirely forgot to take them off!'
-			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
-		end
-		
-		'As you continue to undress, <<$sp_name>> takes something large from a box beneath his bed.'
-		! first time
-		if sp_dildo = 0:
-			'<font color=#<<$sp_font>>>"I hope you really thought it through <<$pcs_firstname>>... This Big boy did not get his name just like that!"</font>'
-			'<<$pcs_firstname>>, meet Big boy.'
-			'<font color=#<<$pcs_font>>>"Oh my g... It''s really huge!"</font>'
-			'<font color=#<<$sp_font>>>"Yes, I told you it is! Are you backing up on me or what?"</font>'
-			act 'It is too big, I can''t do it': step = 100 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			act 'It is big but I will do it': step = 10 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		else
-			act 'Continue':step = 10 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		end
-
-	! make it wet	
-	elseif step = 10:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo1.jpg"></center>'
-		''
-		act 'Continue':step = 20 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! insert tip	
-	elseif step = 20:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo2.jpg"></center>'
-		''
-		act 'Continue':step = 30 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! insert half	
-	elseif step = 30:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo3.jpg"></center>'
-		''
-		act 'Continue':step = 40 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! impale on it	
-	elseif step = 40:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo4.jpg"></center>'
-		''
-		act 'Continue':step = 50 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! suck while impaled
-	elseif step = 50:
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo5.mp4"></video></center>'
-		''
-		'The whole mass of the Big boy is now inside of you, not just stretching the entry to your sweet litte pussy, but also oppressing your intestines from the other side and pusing on your cervix.'
-		'Your struggle and the idea of this makes <<$sp_name>> very aroused. He gets up from the bed where he watched you from until now.'
-		'<font color=#<<$sp_font>>>"Suck me you impaled dildo pouch."</font>'
-		'Even in case you wanted to object, there is no chance given. He pushes his aroused cock to your mouth, making it penetrate inside and shutting you up.'
-		'He fucks your mouth, and even that his <<dick>> cm long dick is not the largest one, it makes you gag.'
-		'As you choke and cough, struggling not to throw up, you move around with the giant dildo inside you, causing you pain and even more struggle.'
-		'This seems to arouse him even more...'
-		act 'Continue':step = 70 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! he ejaculates on you
-	elseif step = 70:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo6.jpg"> <video autoplay loop src="images/shared/sex/cum/chest/cumbreats.mp4"></video></center>'
-		''
-		'Being helplessly impaled on the thick rubber rod, <<$sp_name>> seems to be at his maximum arousal.'
-		'He is now standing in front of you, masturbating himself furiously while holding your head by the hair next to the tip of his cock.'
-		'<font color=#<<$sp_font>>>"This is for you Big boy! Now I will shower this pouch of yours with my cum!"</font>'	
-		'His extraordinary arousel finishes in explosion of cum, right into your face and all over your chest, slowly leaking all the way down to your belly and crotch.'
-		act 'Continue':step = 80 & gt 'pav_shared_sp', 'spSexGiantdildo'
-
-	! end
-	elseif step = 80:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo7.jpg"></center>'
-		''
-		'You sit there, impaled to the edge of this giant, thick dildo, covered in <<$sp_name>>''s sperm from your head all the way down the belly.'
-		'The experience has exhausted you so much that you cannot even lift yourself up the take out the monster.'
-		'Finally you manage to push yourself with your legs up, leaving your pussy with a gape easily interchangeable with a freshly given birth, lacking just the blood.'
-		
-		! first time ?
-		if sp_dildo = 0:
-			'<font color=#<<$sp_font>>>"Are you allright <<$pcs_firstname>>? I hope Big boy did not do any lasting damage."</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':dildoLike = -1 & step = 90 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			act 'I feel humiliated, please never make me do it again':dildoLike = 0 & step = 90 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			act 'It wasn''t so bad, but it doesn''t really arouse me though':dildoLike = 1 & step = 90 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			act 'I didn''t think I would, but I liked it':dildoLike = 2 & step = 90 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		else
-			'<font color=#<<$sp_font>>>"Are you allright <<$pcs_firstname>>? I hope Big boy did not do any lasting damage this time."</font>'		
-			act 'I''m fine':step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		end
-
-	! like or not; only first time dialogue
-	elseif step = 90:
-		if dildoLike = -1:
-			'<font color=#<<$sp_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 shove it up your ass!"</font>'
-			'<font color=#<<$sp_font>>><i>(gulp)</i></font>'
-			act 'Leave':sp_dildo = -3 & step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		elseif dildoLike = 0:
-			'<font color=#<<$sp_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!':sp_dildo = -2 & step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		elseif dildoLike = 1:
-			'<font color=#<<$sp_font>>>"Does that mean that you will be willing to do it sometime again?"</font>'
-			act 'Yes':sp_dildo = 1 & step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-			act 'Rather not':sp_dildo = -1 & step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		elseif dildoLike = 2:
-			'<font color=#<<$nd_font>>>"You are such a cool girl <<$pcs_firstname>>!"</font>'
-			act 'Continue':sp_dildo = 1 & step = 200 & gt 'pav_shared_sp', 'spSexGiantdildo'
-		end
-	
-	! afraid - back off
-	elseif step = 100:
-		'<font color=#<<$sp_font>>>"I am really disappointed <<$pcs_firstname>>. First you entice me on this, then you tell me you are afraid to do it. I know it is huge, but I told you so."</font>'
-		'<font color=#<<$pcs_font>>>"I... I''m sorry <<$sp_name>>, I guess I wasn''t really sure about it until I saw the monster..."</font>'
-		'<font color=#<<$sp_font>>>"I know, he is quite big one. Is there any chance you''ll change your mind, or no?"</font>'
-		act 'No, this is just impossible for me': sp_rel -= 20 & step = 110 & gt 'pav_shared_apt', 'start'
-		act 'I don''t know, maybe...': sp_rel -= 10 & step = 120 & gt 'pav_shared_apt', 'start'
-	
-	! forever gone
-	elseif step = 110:
-		'<font color=#<<$sp_font>>>"I see. That''s bad. I think you should leave now, <<$pcs_firstname>>, I am really sad now."</font>'
-		sp_dildo = -4
-		sp_mood = 5
-		step = 0
-		act 'Leave':gt 'pav_shared_apt', 'start'
-	
-	! may attempt again
-	elseif step = 120:
-		step = 0
-		'<font color=#<<$sp_font>>>"I see. At least some hope is left. See you later <<$pcs_firstname>>."</font>'
-		sp_mood = 4
-		act 'Leave':gt 'pav_shared_apt', 'start'
-	
-	! paygate
-	elseif step = 200:
-		sp_dildo += 1
-		step = 0
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt 'pav_shared_apt', 'payService'
-	end
-end
-
---- pav_shared_sp ---------------------------------

+ 1238 - 0
locations/pav_shared_yakov.qsrc

@@ -0,0 +1,1238 @@
+# pav_shared_yakov
+
+if $ARGS[0] = 'yakov':
+	gs 'boyStat', 'A264'
+	menu_off = 1
+	$loc_arg = 'yakov'
+	minut += 2
+	'<h3><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+	''
+	'<<$npc_notes[$boy]>>'
+	if yakov_hadSex = 1:'As you know very well, <<$npc_firstname[$boy]>> has <<npc_dick[$boy]>> cm long <a href="exec:gt ''pav_shared_yakov'', ''yakov_Dick''">dick</a> with always smoothly shaved pubic hair.'
+	''
+	'<b>Today he looks to be in a <<$yakov_mood>> mood.</b>'
+	if (totminut - yakov_served) >= rand(120, 180):
+		serve_yakov = 0
+		'It''s not even been 3 hours since you last served <<$npc_firstname[$boy]>>'
+	else
+		if servitudeLvl = 2: 
+			serve_yakov = 1
+		end
+	end
+	''
+
+	! 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=#<<$yakov_font>>>"<<$pcs_firstname>> is that a cum? Please go wash yourself."</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	! cum on clothes
+	elseif cumloc[2] > 0 or cumloc[5] > 0 or cumloc[6] > 0 or cumloc[7] > 0:
+		'<font color=#<<$yakov_font>>>"<<$pcs_firstname>> is that a cum on your clothes? Please go change or at least strip it down."</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	! cum on belly, breasts, ass, pussy; visible only when nude
+	elseif (cumloc[14] > 0 or cumloc[15] > 0 or cumloc[1] > 0 or cumloc[4] > 0) and $clothingworntype = 'nude':
+		'<font color=#<<$yakov_font>>>"<<$pcs_firstname>> did you just have sex with the other guys? Because you forgot to wash out the cum!"</font>'
+		act 'Leave': gt 'pav_shared_apt', 'start'
+	else
+		'<font color=#<<$yakov_font>>>"Hey sweetie, how are you?"</font>'
+		act 'Just say hello and leave': gt 'pav_shared_apt', 'start'
+		act 'Chat with him':gt 'pav_shared_yakov', 'yakov_Chat'
+		if serve_yakov = 1:act 'Offer him to serve':yakov_served = totminut & gt 'pav_shared_yakov', 'yakov_Serve'
+	end
+end
+
+if $ARGS[0] = 'yakov_Chat':
+	gs 'boyStat', 'A264'
+	menu_off = 1
+	$loc_arg = 'yakov_Chat'
+	'<h3><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+	
+	! basic chat
+	if chatLvl = 0:
+		say = rand(1, 2)
+		if say = 1:
+			!clothing and bodyshape reactions
+			if $clothingworntype = 'nude':
+				'<<$npc_firstname[$boy]>> is looking at your nude body wondering...'
+				if salocatnow <= 1:
+					'He is not very content with the sight: <font color=#<<$yakov_font>>>"<<$pcs_firstname>>, are you not anorexic? Better not, it is a terrible thing."</font>'
+				elseif salocatnow > 1 and salocatnow <= 3:
+					'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, you have nice bodyshape you know. Do you exercise or are you mp4ten from nature?"</font>'
+				else
+					'He is not very content with the sight: <font color=#<<$yakov_font>>>"<<$pcs_firstname>>, you should eat less, too much body fat is bad for your sports performance."</font>'
+				end
+				!panties on
+				if $pantyworntype ! 'none':
+					'<font color=#<<$yakov_font>>>"Adorable panties sweetie, where did you buy those?"</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=#<<$yakov_font>>>"<<$pcs_firstname>>, is that a buttplug??"</font> (his eyes spark with weird shine).'
+					if rand(0, 100) < 30:
+						'<font color=#<<$pcs_font>>>"Yes <<$npc_firstname[$boy]>>, it is. Do you like it? Will you help me with it? It seems stuck."</font>'
+						'<font color=#<<$yakov_font>>>"Yes! How does it feel walking around with that inside you?"</font>'
+						'<font color=#<<$pcs_font>>>"It is... arousing. And also fullfilling. If you know what I mean."</font>'
+						'<font color=#<<$yakov_font>>>"Yea... I guess!"</font>'
+						'<font color=#<<$pcs_font>>>"So will you help with it?"</font>'
+						'<font color=#<<$yakov_font>>>"You mean take it out? No! It would be a shame to relieve you of the pleasure. But I think it needs a little adjustment here and there... Let me see!"</font>'
+						act 'Let him play with it':chatLvl = 10 & gt 'pav_shared_yakov', 'yakov_Chat'
+					end
+				end
+			elseif CloBimbo = 1:
+				'<<$npc_firstname[$boy]>> is looking at your outfit with suspicion.'
+				if salocatnow >= 1 and salocatnow <= 4:
+					'<font color=#<<$yakov_font>>>"What a sexy dress are you wearing! Aren''t you afraid it is too sexy for some people in the town, though?"</font>'
+				else
+					'<font color=#<<$yakov_font>>>"Nice dress sweetie, but it would look better if you lost some fat, you know..."</font>'
+				end
+			elseif CloStyle = 4:
+				'<<$npc_firstname[$boy]>> is looking at your outfit with suspicion.'
+				if salocatnow <= 4:
+					'<font color=#<<$yakov_font>>>"I love sexy dresses on you sweetie, but this one makes you look like a... playgirl if you know what I mean."</font>'
+				else
+					'<font color=#<<$yakov_font>>>"Sweetie this dress one makes you look like a... playgirl if you know what I mean."</font>'
+				end
+			end
+		elseif say = 2:
+			! age reactions
+			if age < 18:
+				'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, you said you are <<age>> years old. Are you doing some sports? You should."</font>'
+			end
+		end
+
+		if step = 0:
+			minut += 1
+			act 'Chat about everyday stuff': step = 10 & gt 'pav_shared_yakov', 'yakov_Chat'
+			act 'Leave':gt 'pav_shared_apt', 'start'
+		elseif step = 10:
+			minut += 15
+			sayN = rand(1, 10)
+			if sayN = 1:'<i><font color=#<<$yakov_font>>>"Doing sports is the way of my life. I cannot imagine not doing any."</font></i>'
+			if sayN = 2:'<i><font color=#<<$yakov_font>>>"I need to work harder on my abs."</font></i>'
+			if sayN = 3:'<i><font color=#<<$yakov_font>>>"A good soccer player has two main skills - the game itself and... his haircut."</font></i>'
+			if sayN = 4:'<i><font color=#<<$yakov_font>>>"I hate staying sweaty a game. I shower after every one of them."</font></i>'
+			if sayN = 5:'<i><font color=#<<$yakov_font>>>"Using drugs to improve one''s sporting abilities is wrong."</font></i>'
+			'<i>You spent some time chatting with him about sport, his trophies and achievements, slightly improving your relation with him.</i>'
+			npc_rel['A264'] += 1
+			gs 'stat'
+			intimateTalkCh = rand(0, 100)
+			if yakov_mood <= 4 and intimateTalkCh <= 50:
+				step = 20
+			else
+				step = 0
+			end
+			act 'Continue':gt 'pav_shared_yakov', 'yakov_Chat'
+		elseif step = 20:
+			minut += 3
+			if servitudeLvl = 0:
+				'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, didn''t you change your mind about easing off some of the rent?"</font>'
+				'<font color=#<<$pcs_font>>>"What do you mean?"</font>'
+				'<font color=#<<$yakov_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 interested in being their maid':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+				act 'Say you are willing to do some work afterall':step = 0 & servitudeLvl = 1 & gt 'pav_shared_yakov', 'yakov_Chat'
+			elseif servitudeLvl = 1:
+				'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, didn''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 and cook for you."</font>'
+				'<font color=#<<$yakov_font>>>"Well we also talked about this before, you know... to help us ease a bit of stress if you know what I mean"</font>'
+				act 'Say you are still not interested in being their cumbucket':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+				act 'Say you are willing to spread your legs a bit afterall':step = 0 & servitudeLvl = 2 & gt 'pav_shared_yakov', 'yakov_Chat'			
+			elseif servitudeLvl = 2:
+				act 'Talk about sex':step = 30 & gt 'pav_shared_yakov', 'yakov_Chat'
+				act 'Continue':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+			end
+		elseif step = 30:
+			minut += 5
+			'You get into rather passionate discussion about sex and all that stuff. <<$npc_firstname[$boy]>> seems to love to talk about such topics.'
+			resCh = rand(0, 5)
+			if resCh <= 3:
+				topicR = rand(1, 5)
+				if topicR = 1:'<<$npc_firstname[$boy]>> passionately tells you he loves looking at the girls face when she orgasms.'
+				if topicR = 2:'<<$npc_firstname[$boy]>> passionately tells you he loves when a girl is touching with his asscheeks.'
+				if topicR = 3:'<<$npc_firstname[$boy]>> passionately tells you he adores blond girls the most.'
+				if topicR = 4:'<<$npc_firstname[$boy]>> passionately tells you his <<npc_dick[$boy]>> cm long dick is just enough to make love and not pain.'
+				if topicR = 5:'<<$npc_firstname[$boy]>> passionately tells you he loves when the girl is a sporting type.'
+				act'Continue':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+			
+			elseif resCh = 4:
+				if yakov_anal = 0:
+					'<<$npc_firstname[$boy]>> admits that no girl has yet allowed him to fuck her ass.'
+					yakov_doAnal = 1
+					act'Continue':step = 0 & npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+				end
+
+			elseif resCh = 5:
+				if yakov_anal = 0:
+					'<<$npc_firstname[$boy]>> almost secretly tells you he owns a dildo so big that no girl can insert it into her entirely.'
+					yakov_doDildo = 1
+					act'Continue':step = 0 & npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_Chat'
+				else
+					act'Continue':step = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+				end
+
+			end
+		end
+
+	! anal plug
+	elseif chatLvl = 10:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/buttplugplay.mp4"></video></center>'
+		''
+		'<font color=#<<$yakov_font>>>"Let''s see what you have in there..."</font>'
+		'<<$npc_firstname[$boy]>> takes the plug and slowly pulls it halfway out, gazing and how big it is.'
+		'Then he twists it around, still in your ass and pushes it back in there, repeating this few times.'
+		'<font color=#<<$yakov_font>>>"I think it fits better now."</font>'
+		'<font color=#<<$pcs_font>>>"Thank you <<$npc_firstname[$boy]>>!"</font>'
+		act 'Continue':chatLvl = 0 & gt 'pav_shared_yakov', 'yakov_Chat'
+	
+	! strapon kink
+	!elseif chatLvl = 20:
+	end
+end
+
+if $ARGS[0] = 'yakov_Dick':
+	gs 'boyStat', 'A264'
+	menu_off = 1
+	minut += 2
+	'<h3><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>></font></h3>'
+	if set_imgh < 250:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	else
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	end
+	''
+	if npc_rel[$boy] < -80:
+		$rel_word[$boy] = 'terrible'
+		$color_rel = 'ff0000'
+	elseif npc_rel[$boy] < -60:
+		$rel_word[$boy] = 'very bad'
+		$color_rel = 'ff7824'
+	elseif npc_rel[$boy] < -40:
+		$rel_word[$boy] = 'bad'
+		$color_rel = 'fcb503'
+	elseif npc_rel[$boy] < -20:
+		$rel_word[$boy] = 'strained'
+		$color_rel = 'f0cc00'
+	elseif npc_rel[$boy] < 0:
+		$rel_word[$boy] = 'neutral'
+		$color_rel = 'fcfc0f'
+	elseif npc_rel[$boy] < 20:
+		$rel_word[$boy] = 'good'
+		$color_rel = 'abf246'
+	elseif npc_rel[$boy] < 40:
+		$rel_word[$boy] = 'great'
+		$color_rel = '84fc03'
+	elseif npc_rel[$boy] < 60:
+		$rel_word[$boy] = 'excellent'
+		$color_rel = '5eff00'
+	elseif npc_rel[$boy] >= 60:
+		$rel_word[$boy] = 'fantastic'
+		$color_rel = '03ff39'
+	end
+	
+	'Your relationship with ' + $npc_firstname[$boy] + ' is <font color=#' + $color_rel + '>' + $rel_word[$boy] + '</font>.'
+	'His dick is <<npc_dick[$boy]>> cm long with always smoothly shaved pubic hair.'
+	''
+	'So far you have:'
+		if yakov_hj = 1:'- jerked him'	
+			if yakov_hj > 1:'- jerked him <<yakov_hj>> times' & if yakov_hjFail > 1:' and failed to make him cum with your hands <<yakov_hjFail>> times'
+		if yakov_bj = 1:'- given him a blowjob'
+			if yakov_bj > 1:'- given him <<yakov_bj>> blowjobs' & if yakov_bjFail > 1:' and failed to make him cum with your mouth <<yakov_bjFail>> times'
+		if yakov_bjDeep = 1:'- given him a blowjob with deepthroat'
+			if yakov_bjDeep > 1:'- given him <<yakov_bjDeep>> blowjobs with deepthroat' & if yakov_bjFailPuke > 1:' but failed and puked in his crotch <<yakov_bjFailPuke>> times' & if yakov_bjFailPuke > 1:' but failed and fainted impaled on his cock <<yakov_bjFailFaint>> times'
+		if yakov_swall = 1:'- swallowed his semen, making it <<yakov_cumSwall>> loads, that you swallowed in total'
+			if yakov_swall > 1:'- swallowed his semen <<yakov_swall>> times, making it <<yakov_cumSwall>> loads, that you swallowed in total'
+		if yakov_vag = 1:'- taken it in your pussy' & if yakov_vagCumInside = 1:' and let him cum inside you' & if yakov_vagCumInsideUnwanted = 1:' and he also came inside your pussy against your will'
+			if yakov_vag > 1:'- taken it in your pussy <<yakov_vag>> times' & if yakov_vagCumInside >= 1:' and let him cum inside you <<yakov_vagCumInside>> times' & if yakov_vagCumInsideUnwanted >= 1:' and he also came inside your pussy against your will <<yakov_vagCumInsideUnwanted>> times'
+		if yakov_cumVag > 1:'- he pumped  <<yakov_cumVag>> loads of cum into your pussy'
+			elseif yakov_cumVag = 1:'- he pumped  <<yakov_cumVag>> load of cum into your pussy'
+		end
+		if yakov_anal = 1:'- taken it in your ass' & if yakov_analCumInside = 1:' and let him cum inside you' & if yakov_vagCumInsideUnwanted = 1:' and he also came inside your anus against your will'
+			if yakov_anal > 1:'- taken it in your ass <<yakov_anal>> times' & if yakov_analCumInside >= 1:' and let him cum inside you <<yakov_analCumInside>> times' & if yakov_vagCumInsideUnwanted >= 1:' and he also came inside your anus against your will <<yakov_analCumInsideUnwanted>> times'
+		if yakov_analVag > 1:'- he pumped <<yakov_cumAnal>> loads of cum into your anus'
+			elseif yakov_analVag = 1: '- he pumped <<yakov_cumAnal>> load of cum into your anus'
+		end
+		if yakov_dildo = -4:'- wanted to make him a show with giant dildo, but you were afraid of its size just from seeing it'
+		if yakov_dildo = -3:'- once made him a show with giant dildo, but it was a horrible experience and you''ll never do it again'
+		if yakov_dildo = -2:'- once made him a show with giant dildo, but it felt very humiliating and he knows you will not do it again'
+		if yakov_dildo = -1:'- once made him a show with giant dildo, you do not mind but also do not find it arousing and he knows you will not do it again'
+		if yakov_dildo = 1 and dildoLike = 1:'- once made him a show with giant dildo, you do not mind but also do not find it arousing, but he knows you are willing to do it repeatedly'
+			if yakov_dildo > 1 and dildoLike = 1:'- made him a show with giant dildo <<yakov_dildo>> times, you do not mind but also do not find it arousing, but he knows you are willing to do it repeatedly'
+		if yakov_dildo = 1 and dildoLike = 2:'- once made him a show with giant dildo, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
+			if yakov_dildo > 1 and dildoLike = 2:'- made him a show with giant dildo <<yakov_dildo>> times, you do find it somewhat arousing and he knows you are willing to do it repeatedly'
+
+	if $loc_arg = 'yakov':
+		act 'Continue':gt 'pav_shared_yakov', 'yakov'
+	else
+		act 'Continue':gt 'pav_shared_apt', $goBack
+	end
+end
+
+if $ARGS[0] = 'yakov_Serve':
+	gs 'boyStat', 'A264'
+	menu_off = 1
+	minut += 2
+	$loc_arg = 'yakov_Serve'
+	'<h3><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>></font></h3>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+	step = 0
+	subStep = 0
+	sexCh = rand(0, 100)
+	! very bad mood
+	if yakov_mood >= 7:
+		'<font color=#<<$yakov_font>>>"Not now <<$pcs_firstname>>, I am exhausted."</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! random chance to sex
+	elseif sexCh < 40:
+		'<font color=#<<$yakov_font>>>"Not now <<$pcs_firstname>>, I have to excersice in a while."</font>'
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	! wants sex
+	else
+		actionR = rand(2, 5)
+		if actionR = 2:
+			'<font color=#<<$yakov_font>>>"Sure <<$pcs_firstname>>, I could use a nice blowjob."</font>'
+			act 'Agree': npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_Suck'
+		elseif actionR = 3:
+			'<font color=#<<$yakov_font>>>"Good idea, I would like to have sex."</font>'
+			act 'Agree': npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		elseif actionR = 4:
+			if yakov_anal = 0:
+				if yakov_doAnal = 1:
+					'<font color=#<<$yakov_font>>>"I am not sure what I enjoy more with you <<$pcs_firstname>>..."</font>'
+					act 'It''s your choice':gt 'pav_shared_yakov', 'yakov_Serve'
+					act 'You told me you have never tried anal, didn''t you?': npc_rel['A264'] += 2 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+				else
+					gt 'pav_shared_yakov', 'yakov_Serve'
+				end
+			elseif yakov_anal >= 1:
+				'<font color=#<<$yakov_font>>>"Sure <<$pcs_firstname>>, I would like to take enjoy your beautiful ass this time."</font>'
+				act 'Agree': npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+			end
+		elseif actionR = 5:
+			if yakov_dildo = 0:
+				if yakov_doDildo = 1:
+					'<font color=#<<$yakov_font>>>"I am not sure what I enjoy more with you <<$pcs_firstname>>..."</font>'
+					act 'It''s your choice':gt 'pav_shared_yakov', 'yakov_Serve'
+					act 'You told me you own some kind of giant dildo, do you?': & npc_rel['A264'] += 2 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+				else
+					gt 'pav_shared_yakov', 'yakov_Serve'
+				end
+			elseif yakov_dildo >= 1:
+				'<font color=#<<$yakov_font>>>"Great <<$pcs_firstname>>, I want to see you ride the Big boy once again!"</font>'
+				act 'Agree': npc_rel['A264'] += 1 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			end
+		end
+		if actionR > 1:act 'Say you changed your mind and leave': npc_rel['A264'] -= 1 & gt 'pav_shared_apt', 'start'
+	end
+end
+
+if $ARGS[0] = 'yakov_Suck':
+	gs 'boyStat', 'A264'
+	'<b><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>> - blowjob</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0 and cockHard = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
+		if step > 0 and cockHard = 1:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	end
+	$loc_arg = 'yakov_Suck'
+	price = price_blowjob
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	! crawl to him
+	if step = 0:
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockflaccid.jpg"></center>'
+		''
+		'<<$npc_firstname[$boy]>> 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 'pav_shared_yakov', 'yakov_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+
+	!lick balls
+	elseif step = 1:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus7.mp4"></video></center>'
+		''
+		'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 'pav_shared_yakov', 'yakov_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+
+	!Lick the tip
+	elseif step = 2:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus3.mp4"></video></center>'
+		''
+		'You take <<$npc_firstname[$boy]>> cock in your hand, pointing the tip in front of your mouth.'
+		'As it was your favorite puppy, you start to gently lick the tip all around, slowly making the cock to get harder and harder, finally reaching his full <<npc_dick[$boy]>> cm length.'
+		gs 'arousal', 'bj', 3
+		gs 'stat'
+		orgB += rand(2, 7)
+		cockHard = 1
+		act 'Lick his balls':step = 1 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+
+	!suck the tip
+	elseif step = 3:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj114.mp4"></video></center>'
+		if cockHard = 0:
+			orgB += rand(5, 15)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_yakov', 'yakov_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_yakov', 'yakov_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_yakov', 'yakov_Suck'
+		end
+
+	!sucking dick
+	elseif step = 4:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj111.mp4"></video></center>'
+		''
+		if cockHard = 0:
+			orgB += rand(15, 35)
+			'<<$npc_firstname[$boy]>>''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)
+			'<<$npc_firstname[$boy]>>''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 'pav_shared_yakov', 'yakov_Suck'
+		act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+		act 'Deepthroat':step = 5 & gt 'pav_shared_yakov', 'yakov_Suck'
+		if orgB >= 100:
+			act 'Try to make him cum':step = 6 & gt 'pav_shared_yakov', 'yakov_Suck'
+		end
+	
+	!deepthroat
+	elseif step = 5:
+		'<center><video autoplay loop src="images/shared/sex/blowjob/shower7.mp4"></video></center>'
+		''
+		orgB += rand(40, 60)
+		'You decide to take <<$npc_firstname[$boy]>>''s hard, <<npc_dick[$boy]>> 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.'
+		'Even though his cock is not the largest one, it is long enough to make you gag.'
+		'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.'
+		oleg_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 <<$npc_firstname[$boy]>>''s crotch!</b>'
+			act 'Continue':step = 8 & gt 'pav_shared_yakov', 'yakov_Suck'
+		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 'pav_shared_yakov', 'yakov_Suck'
+		else
+			act 'Lick his balls':step = 1 & gt 'pav_shared_yakov', 'yakov_Suck'
+			act 'Lick the tip':step = 2 & gt 'pav_shared_yakov', 'yakov_Suck'
+			act 'Suck the tip':step = 3 & gt 'pav_shared_yakov', 'yakov_Suck'
+			act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'
+			act 'Deepthroat':step = 5 & gt 'pav_shared_yakov', 'yakov_Suck'
+			if orgB >= 100:
+				act 'Try to make him cum':step = 6 & gt 'pav_shared_yakov', 'yakov_Suck'
+			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:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cummouth1.mp4"></video></center>'
+			''
+			'Your attempt is successful, as <<$npc_firstname[$boy]>> cums right into your mouth and on your face.'
+			yakov_lastCum = daystart
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'cum_call', 'face', $boy, 1
+			act 'Get up':step = 10 & gt 'pav_shared_yakov', 'yakov_Suck'
+		else
+			failC += 1
+			if failC >= 3:
+				''
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/bjfail.jpg"></center>'
+				''
+				'<font color=#<<$yakov_font>>>"Sweetie if you can''t suck a cock don''t do it. Leave me be!"</font>'
+				act 'Get up':step = 7 & gt 'pav_shared_yakov', 'yakov_Suck'
+			else
+				''
+				'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjfailtryagain.mp4"></video></center>'
+				''
+				'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, sweetie, 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 'pav_shared_yakov', 'yakov_Suck'
+				act 'Suck the cock':step = 4 & gt 'pav_shared_yakov', 'yakov_Suck'	
+				act 'Deepthroat':step = 5 & gt 'pav_shared_yakov', 'yakov_Suck'
+			end
+		end
+		gs 'stat'
+
+	!END cum fail
+	elseif step = 7:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+		''
+		'You get up from your knees, looking at <<$npc_firstname[$boy]>>:<font color=#<<$pcs_font>>>"I''m sorry I was unable to satisfy you."</font>.'
+		'He looks annoyed:<font color=#<<$yakov_font>>>"Try better next time."</font>'
+		npc_rel['A264'] -= 3
+		step = 0
+		yakov_bjFail += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fail
+	elseif step = 8:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/bjdeepthroatpuke.mp4"></video></center>'
+		''
+		'<font color=#<<$yakov_font>>>"Oh my god <<$pcs_firstname>>, have you just puked into my crotch??!!"</font>'
+		'Cleaning your face and mouth with your clothes, all you can say is <font color=#<<$pcs_font>>>"I''m sorry..."</font>.'
+		'<font color=#<<$yakov_font>>>"Oh gosh <<$pcs_firstname>>, I think I''m gonna puke too! Do something!"</font>'
+		npc_rel['A264'] -= 5
+		step = 0
+		yakov_bjFail += 1
+		yakov_bjFailPuke += 1
+		act 'Leave':gt 'pav_shared_apt', 'start'
+
+	!END deepthroat fade out
+	elseif step = 9:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/faint.jpg"></center>'
+		''
+		'You wake up being slapped in your face: <font color=#<<$yakov_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=#<<$yakov_font>>>"I think you have hold your breath for too long and fainted, <<$pcs_firstname>>."</font> He is feeling compassionate to you.'
+		npc_rel['A264'] += 1
+		step = 0
+		yakov_bjFail += 1
+		yakov_bjFailFaint += 1
+		act 'Get up and leave':gt 'pav_shared_apt', 'start'
+
+	!END cum success
+	elseif step = 10:
+		oleg_bj += 1
+		if yakov_mood <= 7:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<font color=#<<$yakov_font>>>"Thank you my sweetie."</font>'
+			'Cleaning your face and mouth off the cum: <font color=#<<$pcs_font>>>"You are always welcome. Seeya!"</font>.'
+			npc_rel['A264'] += 1
+			step = 0
+		else
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/leave.jpg"></center>'
+			''
+			'<<$npc_firstname[$boy]>> doesn''t pay anymore attention to you, getting back to reading his sports magazine.'
+			'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 'pav_shared_apt', 'payService'
+	end
+end
+
+if $ARGS[0] = 'yakov_SexVaginal':
+	gs 'boyStat', 'A264'
+	'<b><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>> - vaginal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'yakov_SexVaginal'
+	price = price_vaginal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
+		'His hairless, muscular body has a bronze tan. He moves towards you, lubing his <<npc_dick[$boy]>> cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
+			'You entirely forgot to take them off!'
+			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
+		end
+		'<<$npc_firstname[$boy]>> takes you by the waist, delicately kissing you.'
+		'<font color=#<<$yakov_font>>>"Do you want to make love in a certain position, or should I choose?"</font>'
+		if yakov_pornPos = 0:hisPos = rand(1, 3)
+		!if yakov_pornPos = 1:hisPos = rand(1, 4)
+		!if yakov_pornPos = 2:hisPos = rand(1, 5)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		act 'Take me from side':step = 3 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		!if yakov_doPornpos = 1 and yakov_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':npc_rel['A264'] += 3 & step = 4 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		!if yakov_doPornpos = 2 and yakov_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':npc_rel['A264'] += 2 & step = 5 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		!if yakov_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		!if yakov_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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 'pav_shared_yakov', 'yakov_SexVaginal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsexbonus3.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you rub his hairless ass, making him even hornier.'
+			'As you move your hands around his smooth asscheeks, it seems to arouse him even more.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		end
+
+	!doggy
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/shared/sex/vag/doggy/kotovsex10.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass high as possible.'
+			'<<$npc_firstname[$boy]>> kneels behind you, rubbing your asscheeks. He starts probing your pussy with his lubed fingers, sensitively stimulating your labia and clitoris.'
+			'Then he takes his dick and slowly enters your moist hole, pushing in until you he feels it''s starting to feel enough for you.'
+			'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.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20)
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/shared/sex/vag/facedown/kotovsexbonus20.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you reach for his smooth balls bashing your clitoris from behind and rub it, making his slow movements even more passionate.'
+			'He often plays with your anus with his fingers during the sex, using the doggystyle position to his advantage.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			gs 'arousal', 'vaginal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck1.jpg"></video></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your tender pussy.'
+			'He takes this as an invitation, lying behind you.'
+			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
+			'Finally <<$npc_firstname[$boy]>> 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.'
+			gs 'arousal', 'vaginal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/vagsidefuck2.mp4"></video></center>'
+			''
+			'As he continuously fucks your pussy, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			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 'pav_shared_yakov', 'yakov_SexVaginal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning loudly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			yakov_vag += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end, pumping his load <<npc_dick[$boy]>> cm deep inside your pussy.'
+			yakov_vagCumInside += 1
+			yakov_cumVag += 1
+			yakov_lastCum = daystart
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			yakov_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/cumonass.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			yakov_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/leonid/sex/cumface1.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end and in the moment he starts spouting his seed, he gently pushes you on your knees 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
+			yakov_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> 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=#<<$yakov_font>>>"Sorry <<$pcs_firstname>>, it was just too intensive."</font>'
+			if tabletkishot = 0 and pillcon < 0:
+				'<font color=#<<$pcs_font>>>"I am not on the pill <<$npc_firstname[$boy]>>!"</font>'
+				'<font color=#<<$yakov_font>>>"Uh... Don''t worry, it will be allright. You can take the after pill, anyway!"</font>'
+				'He is obvously displeased by this.'
+				npc_rel['A264'] -= 5
+			end
+			'Annoyed you 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.'
+			yakov_lastCum = daystart
+			yakov_cumVag += 1
+			yakov_vagCumInside += 1
+			yakov_vagCumInsideUnwanted += 1
+			gs 'cum_call', '', $boy, 1
+			gs 'arousal', 'vaginal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$yakov_font>>>"I won''t cum inside you, but please can you swallow?"</font>'
+			act 'Yes':subStep = 20 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+			act 'No':subStep = 30 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth5.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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...'
+			yakov_lastCum = daystart
+			yakov_cumSwall += 1
+			yakov_swall += 1
+			npc_rel['A264'] += 1
+			minut += 5
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$yakov_font>>>"Allright I''ll cum elsewhere..."</font>'
+			npc_rel['A264'] -= 3
+			cumOutL2 = rand(2, 5)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_yakov', 'yakov_SexVaginal'
+		end
+	end
+end
+
+if $ARGS[0] = 'yakov_SexAnal':
+	gs 'boyStat', 'A264'
+	'<b><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>> - anal sex</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'yakov_SexAnal'
+	price = price_anal
+	if step > 0:'<<$npc_firstname[$boy]>> orgasm build-up: '+orgB+'/100'
+
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
+		'His hairless, muscular body has a bronze tan. He moves towards you, lubing his <<npc_dick[$boy]>> cm long cock and stroking it on the way.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
+			'You entirely forgot to take them off!'
+			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
+		end
+		'<<$npc_firstname[$boy]>> takes you by the waist, delicately kissing you.'
+		'<font color=#<<$yakov_font>>>"Do you want to make love in a certain position, or should I choose?"</font>'
+		if yakov_pornPos = 0:hisPos = rand(1, 3)
+		!if yakov_pornPos = 1:hisPos = rand(1, 4)
+		!if yakov_pornPos = 2:hisPos = rand(1, 5)
+
+		act 'Let him choose':step = hisPos & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		act 'Take me like a missionary':step = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		act 'Take me from behind':step = 2 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		act 'Take me from side':step = 3 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		!if yakov_doPornpos = 1 and yakov_pornPos < 1:act 'You told me that you want to try one position from porn, didn''t you?':npc_rel['A264'] += 3 & step = 4 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		!if yakov_doPornpos = 2 and yakov_pornPos < 2:act 'You told me that you want to try another position from porn, didn''t you?':npc_rel['A264'] += 2 & step = 5 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		!if yakov_pornPos >= 1:act 'Take me full nelson':step = 4 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		!if yakov_pornPos >= 2:act 'Take me pile driver':step = 5 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+
+	!missionary
+	elseif step = 1:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/shared/sex/anal/mis/analenter.mp4"></video></center>'
+			''
+			'You lie on the bed, spreading your legs for easy access.'
+			'<<$npc_firstname[$boy]>> 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.'		
+			'Before doing so, he takes some more lube on his fingers and one by one he stretches your anus with them. Making it easier for you to be penetrated.'
+			'He gently starts pushing his dick inside, and as it is lubed, it goes in quite easily.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/shared/sex/anal/mis/kotovsexanal0.mp4"></video></center>'
+			''
+			'As he continuously fucks your anus, you rub his hairless ass, making him even hornier.'
+			'As you move your hands around his smooth asscheeks, it seems to arouse him even more.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			gs 'arousal', 'anal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		end
+
+	!behind
+	elseif step = 2:
+		if subStep = 0:
+			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal4.mp4"></video></center>'
+			''
+			'You kneel on the bed, bending your back as much as you can, putting your nice round ass as high as possible.'
+			'<<$npc_firstname[$boy]>> 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...'
+			'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.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20)
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/shared/sex/anal/doggy/kotovsexanal11.mp4"></video></center>'
+			''
+			'As he continuously fucks your anus, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			gs 'arousal', 'anal', 10
+			gs 'stat'
+			orgB += rand(20, 40) 
+			if orgB < 100:act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		end
+
+	!sidefuck
+	elseif step = 3:
+		if subStep = 0:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck1.jpg"></center>'
+			''
+			'You lie on the bed, raising the upper leg in the air, exposing your lustful anus.'
+			'He takes this as an invitation, lying behind you.'
+			'He rubs your ass, slowly making his way to your hole, playing with it for a while.'
+			'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.'
+			gs 'arousal', 'anal', 10, 'lube'
+			gs 'stat'
+			orgB += rand(5, 20) 
+			act 'Let him continue':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/analsidefuck2.mp4"></video></center>'
+			''
+			'As he continuously fucks your anus, you reach for his smooth balls and rub them, making his slow movements even more passionate.'
+			'<<$npc_firstname[$boy]>> fucks you slowly and sensitively.'
+			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 'pav_shared_yakov', 'yakov_SexAnal'
+			if orgB >= 100:act 'He is about to cum':step = 10 & subStep = 0 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		end
+
+	!where to cum
+	elseif step = 10:
+		if subStep = 0:
+			minut += 2
+			'<<$npc_firstname[$boy]>> is groaning loudly, you can say that he is reaching his orgasm.'
+			'You decide to tell him:'
+			yakov_anal += 1
+			act 'Cum inside me':subStep = 1 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+			cumOutL = rand(2, 6)
+			act 'Don''t cum inside me':subStep = cumOutL & gt 'pav_shared_yakov', 'yakov_SexAnal'
+
+		!inside
+		elseif subStep = 1:
+			'<center><video autoplay loop src="images/shared/sex/cum/analcreampie/cumanal2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end, pumping his load <<npc_dick[$boy]>> cm deep inside your anus.'
+			yakov_analCumInside += 1
+			yakov_lastCum = daystart
+			yakov_cumAnal += 1
+			gs 'cum_call', 'anus', $boy, 1
+			gs 'arousal', 'anal', 2
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!stomach
+		elseif subStep = 2:
+			'<center><video autoplay loop src="images/shared/sex/cum/stomach/cumbelly2.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'A small pool of cum lands on your abdomen, feeling warm but sticky.'
+			minut += 2
+			yakov_lastCum = daystart
+			gs 'cum_call', 'stomach', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!ass
+		elseif subStep = 3:
+			'<center><video autoplay loop src="images/shared/sex/cum/cum3.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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
+			yakov_lastCum = daystart
+			gs 'cum_call', 'butt', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!face
+		elseif subStep = 4:
+			'<center><video autoplay loop src="images/shared/sex/cum/cumf10.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> finally reaches the happy end and in the moment he starts spouting his seed, he pushes you on your knees 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
+			yakov_lastCum = daystart
+			gs 'cum_call', 'face', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!takeout fail
+		elseif subStep = 5:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/vagcumtakoutfail.jpg"></center>'
+			''
+			'You expect <<$npc_firstname[$boy]>> 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=#<<$yakov_font>>>"Sorry <<$pcs_firstname>>, it was just too intensive."</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=#<<$yakov_font>>>"I am sorry sweetie, you are just too good a lover."</font>'
+			'He is obvously displeased by your reaction.'
+			yakov_analCumInsideUnwanted += 1
+			yakov_lastCum = daystart
+			yakov_cumAnal += 1
+			npc_rel['A264'] -= 5
+			'You angrily 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
+			gs 'arousal', 'anal', 5, 'sub'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!will you swallow?
+		elseif subStep = 6:
+			'<font color=#<<$yakov_font>>>"I won''t cum inside you, but please can you swallow?"</font>'
+			act 'Yes':subStep = 20 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+			act 'No':subStep = 30 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+
+		!swallow YES
+		elseif subStep = 20:
+			'<center><video autoplay loop src="images/shared/sex/cum/mouth/yum.mp4"></video></center>'
+			''
+			'<<$npc_firstname[$boy]>> 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.'
+			'<<$npc_firstname[$boy]>> 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...' 		
+			yakov_swall += 1	
+			npc_rel['A264'] += 1
+			minut += 5
+			yakov_lastCum = daystart
+			yakov_cumSwall += 1
+			gs 'cum_call', 'mouth', $boy, 1
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave':gt 'pav_shared_apt', 'payService'
+
+		!swallow NO
+		elseif subStep = 30:
+			'<font color=#<<$yakov_font>>>"Allright I''ll cum elsewhere..."</font>'
+			npc_rel['A264'] -= 3
+			cumOutL2 = rand(2, 5)
+			act 'Continue':subStep = cumOutL2 & gt 'pav_shared_yakov', 'yakov_SexAnal'
+		end
+	end
+end
+
+if $ARGS[0] = 'yakov_SexGiantdildo':
+	gs 'boyStat', 'A264'
+	'<b><font color=#<<$yakov_font>>><<$npc_firstname[$boy]>> - giant dildo</font></b>'
+	if set_imgh < 250:
+		if step = 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	else
+		if step = 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"></center>'
+		if step > 0:'<center><img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/sp.jpg"> <img height="250" src="images/locations/pavlovsk/resident/sharedapt/sp/cockerect.jpg"></center>'
+	end
+	''
+	$loc_arg = 'yakov_SexGiantdildo'
+	price = price_special
+	
+	!strip down
+	if step = 0:
+		minut += 5
+		orgB = 0
+		cockHard = 0
+		failC = 0
+		$clothingworntype = 'nude'
+		'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/simplystrip1.mp4"></video></center>'
+		''
+		'<<$npc_firstname[$boy]>> begins to undress and you follow his example, stripping the few clothes you are currently wearing.'
+		'His hairless, muscular body has a bronze tan. He sits on a bed next to you, caressing his own <<npc_dick[$boy]>> cm long cock.'
+		if $pantyworntype ! 'none':
+			gs 'panties', 'remove'
+			gs 'stat'
+			'<font color=#<<$yakov_font>>>"<<$pcs_firstname>>, those panties are adorable, but they will get in the way you know?"</font>'
+			'You entirely forgot to take them off!'
+			'You reach for the ribbon of the panties, slowly slipping them off, down your legs. You blush a little.'
+		end
+		
+		'As you continue to undress, <<$npc_firstname[$boy]>> takes something large from a box beneath his bed.'
+		! first time
+		if yakov_dildo = 0:
+			'<font color=#<<$yakov_font>>>"I hope you really thought it through <<$pcs_firstname>>... This Big boy did not get his name just like that!"</font>'
+			'<<$pcs_firstname>>, meet Big boy.'
+			'<font color=#<<$pcs_font>>>"Oh my g... It''s really huge!"</font>'
+			'<font color=#<<$yakov_font>>>"Yes, I told you it is! Are you backing up on me or what?"</font>'
+			act 'It is too big, I can''t do it': step = 100 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			act 'It is big but I will do it': step = 10 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		else
+			act 'Continue':step = 10 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		end
+
+	! make it wet	
+	elseif step = 10:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo1.jpg"></center>'
+		''
+		act 'Continue':step = 20 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! insert tip	
+	elseif step = 20:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo2.jpg"></center>'
+		''
+		act 'Continue':step = 30 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! insert half	
+	elseif step = 30:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo3.jpg"></center>'
+		''
+		act 'Continue':step = 40 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! impale on it	
+	elseif step = 40:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo4.jpg"></center>'
+		''
+		act 'Continue':step = 50 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! suck while impaled
+	elseif step = 50:
+		'<center><video autoplay loop src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo5.mp4"></video></center>'
+		''
+		'The whole mass of the Big boy is now inside of you, not just stretching the entry to your sweet litte pussy, but also oppressing your intestines from the other side and pusing on your cervix.'
+		'Your struggle and the idea of this makes <<$npc_firstname[$boy]>> very aroused. He gets up from the bed where he watched you from until now.'
+		'<font color=#<<$yakov_font>>>"Suck me you impaled dildo pouch."</font>'
+		'Even in case you wanted to object, there is no chance given. He pushes his aroused cock to your mouth, making it penetrate inside and shutting you up.'
+		'He fucks your mouth, and even that his <<dick>> cm long dick is not the largest one, it makes you gag.'
+		'As you choke and cough, struggling not to throw up, you move around with the giant dildo inside you, causing you pain and even more struggle.'
+		'This seems to arouse him even more...'
+		act 'Continue':step = 70 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! he ejaculates on you
+	elseif step = 70:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo6.jpg"> <video autoplay loop src="images/shared/sex/cum/chest/cumbreats.mp4"></video></center>'
+		''
+		'Being helplessly impaled on the thick rubber rod, <<$npc_firstname[$boy]>> seems to be at his maximum arousal.'
+		'He is now standing in front of you, masturbating himself furiously while holding your head by the hair next to the tip of his cock.'
+		'<font color=#<<$yakov_font>>>"This is for you Big boy! Now I will shower this pouch of yours with my cum!"</font>'	
+		'His extraordinary arousel finishes in explosion of cum, right into your face and all over your chest, slowly leaking all the way down to your belly and crotch.'
+		act 'Continue':step = 80 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+
+	! end
+	elseif step = 80:
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/sharedapt/sex/sp/dildo7.jpg"></center>'
+		''
+		'You sit there, impaled to the edge of this giant, thick dildo, covered in <<$npc_firstname[$boy]>>''s sperm from your head all the way down the belly.'
+		'The experience has exhausted you so much that you cannot even lift yourself up the take out the monster.'
+		'Finally you manage to push yourself with your legs up, leaving your pussy with a gape easily interchangeable with a freshly given birth, lacking just the blood.'
+		
+		! first time ?
+		if yakov_dildo = 0:
+			'<font color=#<<$yakov_font>>>"Are you allright <<$pcs_firstname>>? I hope Big boy did not do any lasting damage."</font>'		
+			'<font color=#<<$pcs_font>>>"I... I''m OK. I think."</font>'
+			'<font color=#<<$oleg_font>>>"So how was it <<$pcs_firstname>>?"</font>'
+			act 'The worst experience ever! Never speak of it again':dildoLike = -1 & step = 90 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			act 'I feel humiliated, please never make me do it again':dildoLike = 0 & step = 90 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			act 'It wasn''t so bad, but it doesn''t really arouse me though':dildoLike = 1 & step = 90 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			act 'I didn''t think I would, but I liked it':dildoLike = 2 & step = 90 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		else
+			'<font color=#<<$yakov_font>>>"Are you allright <<$pcs_firstname>>? I hope Big boy did not do any lasting damage this time."</font>'		
+			act 'I''m fine':step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		end
+
+	! like or not; only first time dialogue
+	elseif step = 90:
+		if dildoLike = -1:
+			'<font color=#<<$yakov_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 shove it up your ass!"</font>'
+			'<font color=#<<$yakov_font>>><i>(gulp)</i></font>'
+			act 'Leave':yakov_dildo = -3 & step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		elseif dildoLike = 0:
+			'<font color=#<<$yakov_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!':yakov_dildo = -2 & step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		elseif dildoLike = 1:
+			'<font color=#<<$yakov_font>>>"Does that mean that you will be willing to do it sometime again?"</font>'
+			act 'Yes':yakov_dildo = 1 & step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+			act 'Rather not':yakov_dildo = -1 & step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		elseif dildoLike = 2:
+			'<font color=#<<$oleg_font>>>"You are such a cool girl <<$pcs_firstname>>!"</font>'
+			act 'Continue':yakov_dildo = 1 & step = 200 & gt 'pav_shared_yakov', 'yakov_SexGiantdildo'
+		end
+	
+	! afraid - back off
+	elseif step = 100:
+		'<font color=#<<$yakov_font>>>"I am really disappointed <<$pcs_firstname>>. First you entice me on this, then you tell me you are afraid to do it. I know it is huge, but I told you so."</font>'
+		'<font color=#<<$pcs_font>>>"I... I''m sorry <<$npc_firstname[$boy]>>, I guess I wasn''t really sure about it until I saw the monster..."</font>'
+		'<font color=#<<$yakov_font>>>"I know, he is quite big one. Is there any chance you''ll change your mind, or no?"</font>'
+		act 'No, this is just impossible for me': npc_rel['A264'] -= 20 & step = 110 & gt 'pav_shared_apt', 'start'
+		act 'I don''t know, maybe...': npc_rel['A264'] -= 10 & step = 120 & gt 'pav_shared_apt', 'start'
+	
+	! forever gone
+	elseif step = 110:
+		'<font color=#<<$yakov_font>>>"I see. That''s bad. I think you should leave now, <<$pcs_firstname>>, I am really sad now."</font>'
+		yakov_dildo = -4
+		yakov_mood = 10
+		step = 0
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! may attempt again
+	elseif step = 120:
+		step = 0
+		'<font color=#<<$yakov_font>>>"I see. At least some hope is left. See you later <<$pcs_firstname>>."</font>'
+		yakov_mood = 8
+		act 'Leave':gt 'pav_shared_apt', 'start'
+	
+	! paygate
+	elseif step = 200:
+		yakov_dildo += 1
+		step = 0
+		gs 'arousal', 'end'
+		gs 'stat'
+		gt 'pav_shared_apt', 'payService'
+	end
+end
+
+--- pav_shared_yakov ---------------------------------

+ 138 - 0
locations/saveupdater.qsrc

@@ -2169,6 +2169,144 @@ if temp_current_save_version < 00090003:
 	if alarm_holiday	> 0: alarmVars['alarm_holiday']	= alarm_holiday	& killvar 'alarm_holiday'
 end
 
+! Pav shared apartment update
+	if updated_pav_shared_apt = 0:
+		
+		npctemp = 264
+		$npc_dna['A<<npctemp>>'] = '1290130369 1043654233 5049908515 3153411713 0721993774 2486220839 0288719745'
+		$npc_firstname['A<<npctemp>>'] = 'Yakov'
+		$npc_nickname['A<<npctemp>>'] = 'Yakov'
+		$npc_lastname['A<<npctemp>>'] = ''
+		$npc_usedname['A<<npctemp>>'] = 'Yakov'
+		npc_dob['A<<npctemp>>'] = 19961215
+		$npc_notes['A<<npctemp>>'] = 'Yakov is a fitness-focused sports enthusiast with blond hair and a tanned complexion.'
+		npc_gender['A<<npctemp>>'] = 0
+		
+		gs 'npcstaticdefaults', 'defaults'
+		
+		$npc_thdick['A<<npctemp>>'] = 'well proportioned'
+		npc_dick['A<<npctemp>>'] = 14
+		npc_sexskill['A<<npctemp>>'] = 1
+		$npc_occupation['A<<npctemp>>'] = 'personal_trainer'
+		npc_style['A<<npctemp>>'] = 5
+		
+		
+		npctemp = 265
+		$npc_dna['A<<npctemp>>'] = '1085950303 4348731991 6618084127 9067996922 8669859044 9431283301 0673267503'
+		$npc_firstname['A<<npctemp>>'] = 'Nestor'
+		$npc_nickname['A<<npctemp>>'] = 'Nestor'
+		$npc_lastname['A<<npctemp>>'] = ''
+		$npc_usedname['A<<npctemp>>'] = 'Nestor'
+		npc_dob['A<<npctemp>>'] = 19930127
+		$npc_notes['A<<npctemp>>'] = 'Nestor is a gopnik with a reputation for being rude and aggressive. His motto seems to be "the younger, the better," which can be concerning. He has a tough demeanor, with dark hair and dark skin, giving off an intimidating presence.'
+		npc_gender['A<<npctemp>>'] = 0
+		
+		gs 'npcstaticdefaults', 'defaults'
+		
+		$npc_thdick['A<<npctemp>>'] = 'massive'
+		npc_dick['A<<npctemp>>'] = 22
+		npc_sexskill['A<<npctemp>>'] = 1
+		npc_style['A<<npctemp>>'] = 2
+		
+		
+		
+		npctemp = 266
+		$npc_dna['A<<npctemp>>'] = '5654106058 6395942483 3363408422 7113656738 1111862818 8859290040 7960339191'
+		$npc_firstname['A<<npctemp>>'] = 'Oleg'
+		$npc_nickname['A<<npctemp>>'] = 'Oleg'
+		$npc_lastname['A<<npctemp>>'] = ''
+		$npc_usedname['A<<npctemp>>'] = 'Oleg'
+		npc_dob['A<<npctemp>>'] = 19950712
+		$npc_notes['A<<npctemp>>'] = 'Oleg is a shy, young-looking guy with thick glasses, a slim frame, and very pale skin.'
+		npc_gender['A<<npctemp>>'] = 0
+		
+		gs 'npcstaticdefaults', 'defaults'
+		
+		$npc_thdick['A<<npctemp>>'] = 'thick'
+		npc_dick['A<<npctemp>>'] = 17
+		npc_sexskill['A<<npctemp>>'] = 1
+		$npc_occupation['A<<npctemp>>'] = 'programmer'
+		npc_style['A<<npctemp>>'] = 3
+
+	if nd_rel                  > 0:npc_rel[A266]           	  =nd_rel                  &killvar 'nd_rel'
+	if sp_rel                  > 0:npc_rel[A264]              =sp_rel                  &killvar 'sp_rel'
+	if gp_rel                  > 0:npc_rel[A265]              =gp_rel                  &killvar 'gp_rel'
+	if nd_hj                   > 0:oleg_hj                    =nd_hj                   &killvar 'nd_hj'
+	if nd_bj                   > 0:oleg_bj                    =nd_bj                   &killvar 'nd_bj'
+	if nd_bjFail               > 0:oleg_bjFail                =nd_bjFail               &killvar 'nd_bjFail'
+	if nd_bjDeep               > 0:oleg_bjDeep                =nd_bjDeep               &killvar 'nd_bjDeep'
+	if nd_bjFailPuke           > 0:oleg_bjFailPuke            =nd_bjFailPuke           &killvar 'nd_bjFailPuke'
+	if nd_bjFailFaint          > 0:oleg_bjFailFaint           =nd_bjFailFaint          &killvar 'nd_bjFailFaint'
+	if nd_swall                > 0:oleg_swall                 =nd_swall                &killvar 'nd_swall'
+	if nd_vagCumInsideUnwanted > 0:oleg_vagCumInsideUnwanted  =nd_vagCumInsideUnwanted &killvar 'nd_vagCumInsideUnwanted'
+	if nd_vag                  > 0:oleg_vag                   =nd_vag                  &killvar 'nd_vag'
+	if nd_vagCumInside         > 0:oleg_vagCumInside          =nd_vagCumInside         &killvar 'nd_vagCumInside'
+	if nd_anal                 > 0:oleg_anal                  =nd_anal                 &killvar 'nd_anal'
+	if nd_analCumInside        > 0:oleg_analCumInside         =nd_analCumInside        &killvar 'nd_analCumInside'
+	if nd_vagCumInsideUnwanted > 0:oleg_vagCumInsideUnwanted  =nd_vagCumInsideUnwanted &killvar 'nd_vagCumInsideUnwanted'
+	if nd_piss                 > 0:oleg_piss                  =nd_piss                 &killvar 'nd_piss'
+	if nd_doPornpos            > 0:oleg_doPornpos             =nd_doPornpos            &killvar 'nd_doPornpos'
+	if nd_pornPos              > 0:oleg_pornPos               =nd_pornPos              &killvar 'nd_pornPos'
+	if gp_bj                   > 0:nestor_bj                  =gp_bj                   &killvar 'gp_bj'
+	if gp_bjFail               > 0:nestor_bjFail              =gp_bjFail               &killvar 'gp_bjFail'
+	if gp_bjDeep               > 0:nestor_bjDeep              =gp_bjDeep               &killvar 'gp_bjDeep'
+	if gp_bjFailPuke           > 0:nestor_bjFailPuke          =gp_bjFailPuke           &killvar 'gp_bjFailPuke'
+	if gp_bjFailFaint          > 0:nestor_bjFailFaint         =gp_bjFailFaint          &killvar 'gp_bjFailFaint'
+	if gp_swall                > 0:nestor_swall               =gp_swall                &killvar 'gp_swall'
+	if gp_vagCumInsideUnwanted > 0:nestor_vagCumInsideUnwanted=gp_vagCumInsideUnwanted &killvar 'gp_vagCumInsideUnwanted'
+	if gp_vag                  > 0:nestor_vag                 =gp_vag                  &killvar 'gp_vag'
+	if gp_vagCumInside         > 0:nestor_vagCumInside        =gp_vagCumInside         &killvar 'gp_vagCumInside'
+	if gp_anal                 > 0:nestor_anal                =gp_anal                 &killvar 'gp_anal'
+	if gp_analCumInside        > 0:nestor_analCumInside       =gp_analCumInside        &killvar 'gp_analCumInside'
+	if gp_vagCumInsideUnwanted > 0:nestor_vagCumInsideUnwanted=gp_vagCumInsideUnwanted &killvar 'gp_vagCumInsideUnwanted'
+	if gp_doPornpos            > 0:nestor_doPornpos           =gp_doPornpos            &killvar 'gp_doPornpos'
+	if gp_pornPos              > 0:nestor_pornPos             =gp_pornPos              &killvar 'gp_pornPos'
+	if sp_bj                   > 0:yakov_bj                   =sp_bj                   &killvar 'sp_bj'
+	if sp_bjFail               > 0:yakov_bjFail               =sp_bjFail               &killvar 'sp_bjFail'
+	if sp_bjDeep               > 0:yakov_bjDeep               =sp_bjDeep               &killvar 'sp_bjDeep'
+	if sp_bjFailPuke           > 0:yakov_bjFailPuke           =sp_bjFailPuke           &killvar 'sp_bjFailPuke'
+	if sp_bjFailFaint          > 0:yakov_bjFailFaint          =sp_bjFailFaint          &killvar 'sp_bjFailFaint'
+	if sp_swall                > 0:yakov_swall                =sp_swall                &killvar 'sp_swall'
+	if sp_vagCumInsideUnwanted > 0:yakov_vagCumInsideUnwanted =sp_vagCumInsideUnwanted &killvar 'sp_vagCumInsideUnwanted'
+	if sp_vag                  > 0:yakov_vag                  =sp_vag                  &killvar 'sp_vag'
+	if sp_vagCumInside         > 0:yakov_vagCumInside         =sp_vagCumInside         &killvar 'sp_vagCumInside'
+	if sp_anal                 > 0:yakov_anal                 =sp_anal                 &killvar 'sp_anal'
+	if sp_analCumInside        > 0:yakov_analCumInside        =sp_analCumInside        &killvar 'sp_analCumInside'
+	if sp_vagCumInsideUnwanted > 0:yakov_vagCumInsideUnwanted =sp_vagCumInsideUnwanted &killvar 'sp_vagCumInsideUnwanted'
+	if sp_doPornpos            > 0:yakov_doPornpos            =sp_doPornpos            &killvar 'sp_doPornpos'
+	if sp_pornPos              > 0:yakov_pornPos              =sp_pornPos              &killvar 'sp_pornPos'
+	if sp_hj                   > 0:yakov_hj                   =sp_hj                   &killvar 'sp_hj'
+	if sp_dildo                > 0:yakov_dildo                =sp_dildo                &killvar'sp_dildo'
+		
+	if oleg_analCumInside           > 0: oleg_cumAnal                  = oleg_analCumInside
+	if oleg_analCumInside           > 0: oleg_analCumInside           -= oleg_analCumInsideUnwanted
+	if oleg_analCumInsideUnwanted   > 0: oleg_analCumInsideUnwanted   -= oleg_analCumInside
+	if nestor_analCumInside         > 0: nestor_cumAnal                = nestor_analCumInside
+	if nestor_analCumInside         > 0: nestor_analCumInside         -= nestor_analCumInsideUnwanted
+	if nestor_analCumInsideUnwanted > 0: nestor_analCumInsideUnwanted -= nestor_analCumInside
+	if yakov_analCumInside          > 0: yakov_cumAnal                 = yakov_analCumInside
+	if yakov_analCumInside          > 0: yakov_analCumInside          -= yakov_analCumInsideUnwanted
+	if yakov_analCumInsideUnwanted  > 0: yakov_analCumInsideUnwanted  -= yakov_analCumInside
+	if oleg_vagCumInside            > 0: oleg_cumVag                   = oleg_vagCumInside
+	if oleg_vagCumInside            > 0: oleg_vagCumInside            -= oleg_vagCumInsideUnwanted
+	if oleg_vagCumInsideUnwanted    > 0: oleg_vagCumInsideUnwanted    -= oleg_vagCumInside
+	if nestor_vagCumInside          > 0: nestor_cumVag                 = nestor_vagCumInside
+	if nestor_vagCumInside          > 0: nestor_vagCumInside          -= nestor_vagCumInsideUnwanted
+	if nestor_vagCumInsideUnwanted  > 0: nestor_vagCumInsideUnwanted  -= nestor_vagCumInside
+	if yakov_vagCumInside           > 0: yakov_cumVag                  = yakov_vagCumInside
+	if yakov_vagCumInside           > 0: yakov_vagCumInside           -= yakov_vagCumInsideUnwanted
+	if yakov_vagCumInsideUnwanted   > 0: yakov_vagCumInsideUnwanted   -= yakov_vagCumInside
+	updated_pav_shared_apt = 1
+	end
+killvar 'gp_horny'
+killvar 'sp_horny'
+killvar 'nd_horny'
+killvar 'milkPause'
+killvar 'gp_cumVol'
+killvar 'sp_cumVol'
+killvar 'nd_cumVol'
+
+
 killvar 'temp_current_save_version'
 gs 'saveg'