Explorar o código

[added] seeded the locclass for living rooms and kitchens and added the telephone options to take selfies in those locations (lots of files)

KevinSmarts %!s(int64=5) %!d(string=hai) anos
pai
achega
13ad027882
Modificáronse 45 ficheiros con 257 adicións e 110 borrados
  1. 5 0
      locations/FedorEv4.qsrc
  2. 1 0
      locations/Gaddvor.qsrc
  3. 1 1
      locations/Gadhouse.qsrc
  4. 1 0
      locations/IrinaRoom.qsrc
  5. 1 0
      locations/MHall.qsrc
  6. 2 0
      locations/MKitchen.qsrc
  7. 1 0
      locations/MLanding.qsrc
  8. 1 0
      locations/MLiving.qsrc
  9. 1 0
      locations/Serge_kuh.qsrc
  10. 3 0
      locations/SoniaHome.qsrc
  11. 28 23
      locations/VoltrenerSexShower.qsrc
  12. 2 0
      locations/alexgang.qsrc
  13. 2 0
      locations/anushapt.qsrc
  14. 4 2
      locations/buklinik_event.qsrc
  15. 3 3
      locations/dachain.qsrc
  16. 3 0
      locations/dimaHome.qsrc
  17. 1 0
      locations/dorm.qsrc
  18. 1 1
      locations/grigory.qsrc
  19. 2 0
      locations/igorhome.qsrc
  20. 9 7
      locations/koncepod1.qsrc
  21. 1 0
      locations/kuhr.qsrc
  22. 1 0
      locations/kuhr2x.qsrc
  23. 1 0
      locations/kuhrPar.qsrc
  24. 6 4
      locations/leonid.qsrc
  25. 5 3
      locations/lesbidomhouse.qsrc
  26. 3 0
      locations/mey_home.qsrc
  27. 1 0
      locations/mey_tamara_events.qsrc
  28. 1 0
      locations/obkitchen.qsrc
  29. 1 0
      locations/pavResidential.qsrc
  30. 2 0
      locations/pavSharedApt.qsrc
  31. 2 0
      locations/rolanapt.qsrc
  32. 4 0
      locations/sbReksHome.qsrc
  33. 1 0
      locations/shulga_room.qsrc
  34. 1 0
      locations/shulgakuh.qsrc
  35. 1 0
      locations/sisterQW.qsrc
  36. 1 1
      locations/sitr.qsrc
  37. 1 1
      locations/sitr2x.qsrc
  38. 1 1
      locations/sitrPar.qsrc
  39. 7 7
      locations/subkid.qsrc
  40. 1 1
      locations/tanhousezal.qsrc
  41. 1 1
      locations/tankitchen.qsrc
  42. 82 5
      locations/telefon.qsrc
  43. 56 46
      locations/webcam_site.qsrc
  44. 3 2
      locations/ykuh.qsrc
  45. 1 1
      locations/yzal.qsrc

+ 5 - 0
locations/FedorEv4.qsrc

@@ -593,6 +593,7 @@ end
 if $ARGS[0] =  'Home 2':
 	cls
 	minut += 5
+	$locclass = 'livingr'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/home/sitting.jpg"></center>'
 	'You walk into the living room then take a seat on the couch. Fedor walks into the kitchen and returns with a bowl of <a href="exec:gt ''FedorEv4'', ''Popcorn''">popcorn</a>, some <a href="exec:gt ''FedorEv4'', ''Snacks''">snacks</a> and a few cans of soda then lays them down on the table. Fedor grabs the remote then sits down next to you as he begins flipping through channels.'
@@ -772,6 +773,7 @@ if $ARGS[0] =  'Home 3':
 		end
 
 		act 'I have a treat for you in the kitchen':
+			$locclass = 'kitr'
 			VK = rand(1,2)
 			if VK <= 1:
 				gt 'FedorEv4', 'Kitchen 1'
@@ -2367,6 +2369,7 @@ if $ARGS[0] = 'Bathroom':
 	$loc = 'FedorEv4'
 	$metkaM = 'Bathroom'
 	$locM = 'FedorEv4'
+	killvar '$locclass'
 	$location_type = 'bathroom'
 	minut += 5
 	gs'stat'
@@ -2501,6 +2504,7 @@ end
 if $ARGS[0] =  'Kitchen':
 	$loc = 'FedorEv4'
 	$metka = 'Kitchen'
+	$locclass = 'kitr'
 	cls
 	if hour >= 20 and hour <= 22 and ReginaIntro = 0:gt 'FedorEv4', 'Regina Intro'
 	minut += 5
@@ -2531,6 +2535,7 @@ end
 if $ARGS[0] =  'Livingroom':
 	cls
 	minut += 5
+	$locclass = 'livingr'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/fedorhome/livingroom.jpg"></center>'
 	'The living room looks very neat and has a couch, a blu-ray player and a <a href="exec:gt ''FedorEv4'', ''TV''">TV</a>.'

+ 1 - 0
locations/Gaddvor.qsrc

@@ -5,6 +5,7 @@ if $ARGS[0]='':
 	$metka = ''
 	$loc = 'Gaddvor'
 	$location_type = 'public_outdoors'
+	killvar '$locclass'
 	gs 'stat'
 	CLOSE ALL
 	gs 'gadukino_event', 'sound'

+ 1 - 1
locations/Gadhouse.qsrc

@@ -122,7 +122,7 @@ end
 if $ARGS[0] = 'Main':
 	$metkaM = 'Main'
 	$locM = 'Gadhouse'
-
+	$locclass = 'livingr'
 	*clr
 	cla
 	gs 'stat'

+ 1 - 0
locations/IrinaRoom.qsrc

@@ -67,6 +67,7 @@ if $ARGS[0] = 'first1':
 	else
 		pcs_hydra -= 10
 	end
+	$locclass = 'kitr'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/ira/irinaqw.jpg"></center>'
 	'You and Ira settle in the kitchen with a bottle of wine and some fruits, you talk and chat merrily.'

+ 1 - 0
locations/MHall.qsrc

@@ -43,6 +43,7 @@ end
 
 if $ARGS[0] = 'east':
     $location_type = 'private'
+	killvar '$locclass'
 	cls
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/hall.jpg"></center>'

+ 2 - 0
locations/MKitchen.qsrc

@@ -2,6 +2,8 @@
 $location_type = 'private'
 
 if $ARGS[0] = 'kitchen':
+	$locclass = 'kitr'
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/kitchen.jpg"></center>'
 	act 'Go to the east hall': gt 'MHall', 'east'
 	act 'look in the pantry': gt 'MKitchen', 'pantry'

+ 1 - 0
locations/MLanding.qsrc

@@ -28,6 +28,7 @@ end
 
 if $ARGS[0] = 'east':
 	cls
+	killvar '$locclass'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/elanding.jpg"></center>'
 	act 'Go to the west wing landing':gt 'MLanding', 'west'

+ 1 - 0
locations/MLiving.qsrc

@@ -1,6 +1,7 @@
 # MLiving
 
 $location_type = 'private'
+$locclass = 'livingr'
 '<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/living.jpg"></center>'
 'Living room'
 act 'Go to the east wing landing':gt 'MLanding', 'east'

+ 1 - 0
locations/Serge_kuh.qsrc

@@ -1,6 +1,7 @@
 # Serge_kuh
 
 if $ARGS[0] = '':
+	$locclass = 'kitr'
 	*P ' '
 	!Chat with Sergey in the kitchen (5 times per day)
 	if sergebazarkuh_day ! daystart: sergebazarkuh_count = 5

+ 3 - 0
locations/SoniaHome.qsrc

@@ -105,6 +105,7 @@ if $ARGS[0] = 'Hallway':
 	act 'Bedroom':gt 'SoniaHome', 'Bedroom'
 
 	act 'Kitchen':
+		$locclass = 'kitr'
 		if SoniaCupcake = 0 and NikoAftermath = 1:
 			gt 'SoniaHome', 'Sonia Cooking'
 		elseif SoniaCupcake = 1 and NikoAftermath = 1:
@@ -173,6 +174,7 @@ if $ARGS[0] = 'Cupcake Time':
 	pcs_hydra += 40
 	fat += 2
 	cumspclnt = 2
+	$locclass = 'kitr'
 	gs'stat'
 	'<center><b><h4><font color=#FF00FF><<"Sonia Ivanko">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/soniahome/kitchen/soniacupcake2.jpg"></center>'
@@ -207,6 +209,7 @@ end
 
 if $ARGS[0] = 'Livingroom':
 	cls
+	$locclass = 'livingr'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/soniahome/livingroom/livingroom.jpg"></center>'
 	'Sonia''s living room look quite elegant, and refined. It almost looks like it had an interior decorator design it.'

+ 28 - 23
locations/VoltrenerSexShower.qsrc

@@ -95,41 +95,46 @@ end
 if $ARGS[0] = '3':
 	cls
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower10.jpg"></center>'
-	'Openevsys on the glass and sticking out his ass, you moaning from pecking your ass member. And here you see what-stir the glass...'
+	'Leaning against the glass and sticking out your ass, you moan from the pounding your ass is receiving. What the fuck is that moving the other side of the glass?'
 	act 'To get a better look':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
-		'You notice the coach sitting in the dark, and watching as Ivan Fucks you in the ass,  when he came here and what I saw before, you don''t know, but it looks like this view out of the darkness spawned you in a wave of shame and arousal. You literally threw it in the paint, you tried to jump off Waninoko member. But the shaky legs wasn''t allowed to do. Whether from Vanya''s actions, whether the fact that the coach is watching you, and maybe from that and the other you began to cum violently sahotas shouting and rhythmically squeezing the cock of their classmate anus. Then he too broke down and became, pours out in your ass, that only made the orgasm.  Feeling, being watched, was new, acute, gave wild excitement. Dropping to the floor of the shower you helplessly lay there for some time.'
+		'You wipe the steam off a patch of the glass in front of you and see coach sitting in the dark, watching as Ivan Fucks you in the ass. when he got here and how much he''s seen, you don''t know, but your eyes meet and you are hit by a wave of shame and arousal. You literally throw yourself forward trying to jump off Ivan''s member, but your shaky legs betray you.'
+		'Whether from Ivan''s actions, the fact that the coach is watching you, or the combination of both you begin to cum violently shouting and rhythmically squeezing your classmates cock with your anus. This is more than enough to send Ivan over the edge, his cum filling your ass.'
 		analorgasm += 1
 		pcs_mood = 100
-		$orgasm_or = 'yes'
+		$orgasm_txt = 'The sudden feeling of being watched, was new, acute, the orgasm intense. You drop to the floor of the shower and lay there helplessly for some time.'
+		$orgasm_or = 'custom'
 		gs 'arousal', 'anal', 10
+		gs 'cum_call', 'anus', 'A3'
 		gs 'stat'
 		act 'Recover':
 		 	cls
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower20.mp4"></video></center>'
-			'Opening his eyes, you saw standing next coach.  He quite unceremoniously said: "Spread your bread"'
-        	act 'Push ass':
+			'Opening your eyes, you see coach standing above you. He quite unceremoniously says: "Spread your bread."'
+        	act 'Comply':
   				VoltrenerVoyeur+=1
   				trenerlust += 2
   				cls
   				'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower11.mp4"></video></center>'
-  				'You willingly grab handles for the ass and stretch her, opening a coach views your holes. The coach walks up to you, and you loosed a sigh of disappointment, only a few times twitching target, Michael came to you in the ass, adding to Vanina his semen. '
+  				'You have no idea what he means but a simple gesture makes it clear what he wants. You willingly grab your but cheeks stretch them apart giving coach full view of your holes. The coach walks up to you his cock in his hand and with just a few quick jerk sprays his seed over your ass his cum mixing with Ivan''s as it dribbles out of your butt.'
 				gs 'arousal', 'flash', 10
 				gs 'stat'
-				act 'Wash your ass':gt 'gdksport', 'start'
+				act 'Wash your ass':dynamic $showerdin & gt 'gdksport', 'start'
        		end
-       		act 'Augutsa':
+       		act 'Cover up':
        			cls
   				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower12.jpg"></center>'
-  				'You scared cover ass hands and eyes "frightened DOE", look at Mikhail Nikolaevich. He throws evil: "As Prokhorov the ass to substitute so she already whines with joy, a native trainer to alleviate the tension, so scared Oh".  To the fright in the eyes of wine added, but hands off the ass that you and is not removed. Trainer evil and spat out.'
+  				'Scared, you cover you ass with your hands and look at him like a deer caught in the headlights.'
+				'Mikhail Nikolaevich gives you an evil look, "Prokhorov fucks your ass and you scream with joy, but your coach just wants to alleviate some tension and you curl up all scared?"'
+				'You can see from the look in his eyes that he''s been at the wine and his slurring and unsteady legs confirm this. "Your ass isn''t that special." He spits on you and stumbles out of the showers.'
   				gs 'arousal', 'end'
 				gs 'stat'
-				act 'Wash your ass':gt 'gdksport', 'start'
+				act 'Wash your ass':dynamic $showerdin & gt 'gdksport', 'start'
         	end
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Wash your ass':gt 'gdksport', 'start'
+		act 'Wash your ass':dynamic $showerdin & gt 'gdksport', 'start'
 
 		end
 	end
@@ -138,26 +143,26 @@ end
 if $ARGS[0] = '4':
 	cls
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower10.jpg"></center>'
-	'Openevsys on the glass and sticking out his ass, you moaning from pecking your ass member. And here you see what-stir the glass...'
+	'Leaning against the glass and sticking out your ass, you moan from the pounding your ass is receiving. You can see movement through the glass...'
 	act 'To get a better look':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
 		'It seems, Mikhail again decided to admire how your classmate fuck your anus, Vanya seems so busy your ass that nothing. You decide to tease a little coach...'
 		gs 'arousal', 'anal', 5, 'sub'
 		gs 'stat'
-		act 'Opustitsa on her knees':
+		act 'Drop to your knees':
 			cls
 			'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower14.mp4"></video></center>'
 			'You let go on my knees and began to carefully suck Vanin member, which has just been in your ass. Surprised-a satisfied snort from two sides showed, that the participant and the viewer, It seems, like the fact, what''s happening. Accidentally nudging the door open into the shower, you open it, the coach didn''t miss anything from your planned next.'
 			gs 'arousal', 'bj', 5, 'sub'
 			gs 'stat'
-			act 'Lick eggs':
+			act 'Lick his balls':
 				cls
 				'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower15.mp4"></video></center>'
 				'Pulling the cock from his mouth and swung, you became furiously explicable only excitation from occurring licking balls classmate. Starting one, another in my mouth, kissing them sucking and stroking hands. You nose dived under them and gently licked between buttocks.'
 				gs 'arousal', 'cuni_give', 5, 'sub'
 				gs 'stat'
-				act 'Substitute person':
+				act 'That did it':
 					cls
 					facial += 1
 					'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower16.mp4"></video></center>'
@@ -172,7 +177,7 @@ if $ARGS[0] = '4':
 						minut += 15
 						trenerlust += 2
 						gs 'stat'
-						act 'To masturbate':
+						act 'Masturbate':
 							cls
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower18.jpg"></center>'
 							$orgasm_or = 'custom'
@@ -193,8 +198,8 @@ end
 if $ARGS[0] = '5':
 	cls
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower10.jpg"></center>'
-	'Openevsys on the glass and sticking out his ass, you moaning from pecking your ass member. And here you see what-stir the glass...'
-	act 'To get a better look':
+	'Leaning against the glass and sticking out your ass, you moan from the pounding your ass is receiving. You can see movement through the glass...'
+	act 'Get a better look':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower19.jpg"></center>'
 		'Through the glass you see, as Michael strong views approaching the booth, and Vanya nothing, not seeing, pulls your ass, you frantically try to close the booth door on the lock, that Ivan looks like and not closed. But the cock in her ass and pushes Ivan not let you do it, the door abruptly opens, coach growled: "Again fuck. Prokhorov will tell your coach, you honouring mode, and the competitions are preparing". From these words Ivan shrank his penis opal and easily fell out of your ass: "Don''t need Michael to say anything to anyone, please. I will help with the hall, well, there is a grid to hang, girls to hold after departure", - and he, sideways covering his dignity, grabbing your stuff, got out of the shower.'
@@ -207,20 +212,20 @@ if $ARGS[0] = '5':
 				act 'Leave':gt 'gdksport', 'start'
 			end
 		else
-			act 'To seduce coach':
+			act 'Seduce coach':
 				cls
 				npc_rel['A69'] += 3
 				VoltrenerVoyeur += 1
 				ShowerIvan = 3 & ! close sex with the coach in the shower
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/event/voltrenersexshower22.jpg"></center>'
 				'Not having those things actually did not close the shower door. And terribly unhappy about it before you become a coach in that position... any fool will understand what you would like. It seems the coach has thought about what you said earlier, so he undressed and climbed to you in the shower.'
-				act 'On knees':
+				act 'On your knees':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower23.jpg"></center>'
 					'You let go on your knees, front of your face rocked pretty impressive coach bolt, after admiring this picture, and delighted thoughts, that basic structure is getting closer, you set resolutely to work tongue, carefully first licking the head of your penis then the member entirely.'
 					gs 'arousal', 'foreplay', 5, 'sub'
 					gs 'stat'
-					act 'Take in the mouth':
+					act 'Take it in your mouth':
 						cls
 						pcs_throat += 1
 						gs 'stat'
@@ -228,7 +233,7 @@ if $ARGS[0] = '5':
 						'Kissing his head, you took it in her mouth and began to caress the tongue, lightly sucking, then you tried to take him deep in her mouth, but the coach, stopping you, he began to move a member, fucking your mouth, while acting quite cautiously, not shoving cock for all length, how does this Vanya.'
 						gs 'arousal', 'bj', 10, 'sub'
 						gs 'stat'
-						act 'And put my feet up':
+						act 'Lift your legs':
 							cls
 							gs 'boyStat', 'A69'
 							pose = 0
@@ -259,7 +264,7 @@ if $ARGS[0] = '5':
 									act 'Leave':gt 'gdksport', 'start'
 								end
 							end
-							act 'Substitute the ass':
+							act 'Offer your ass':
 								cls
 								pcs_ass += 1
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower28.jpg"></center>'

+ 2 - 0
locations/alexgang.qsrc

@@ -1,4 +1,6 @@
 # alexgang
+
+$locclass = 'livingr'
 frost = 0
 minut += 30
 gs 'stat'

+ 2 - 0
locations/anushapt.qsrc

@@ -1222,6 +1222,7 @@ end
 if $ARGS[0] = 'livingroom':
 	CLOSE ALL
 	*clr & cla
+	$locclass = 'livingr'
 	minut += 1
 	gs 'stat'
 	'<center><b><font color = maroon>Living room</font></b></center>'
@@ -1381,6 +1382,7 @@ if $ARGS[0] = 'kitchen':
 	CLOSE ALL
     *clr & cla
     minut += 1
+	$locclass = 'kitr'
     gs 'stat'
     '<center><b><font color = maroon>Kitchen</font></b></center>'
     '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/kitchen.jpg"></center>'

+ 4 - 2
locations/buklinik_event.qsrc

@@ -192,6 +192,7 @@ if $ARGS[0] = 'hall':
 	$metka = $ARGS[0]
 	$loc = $CURLOC
     $location_type = 'public_indoors'
+	killvar '$locclass'
 	minut += 5
 	gs 'stat'
 	'<center><b><font color = maroon>Entrance hall</font></b></center>'
@@ -234,8 +235,9 @@ end
 
 if $ARGS[0] = 'kitchen':
 	cls
-	$metka = $ARGS[0]
-	$loc = $CURLOC
+	$metka = 'kitchen'
+	$loc = 'buklinik_event'
+	$locclass = 'kitr'
 	minut += 5
 	gs 'stat'
 	'<center><b><font color = maroon>Kitchen</font></b></center>'

+ 3 - 3
locations/dachain.qsrc

@@ -19,8 +19,8 @@ if $args[0] = '':
 	$location_type = 'private'
 	$metka = ''
 	$metkaM = ''
+	killvar '$locclass'
 	cls
-	clr
 	gs 'stat'
 	'<center><b><font color="maroon">Cottage</font></b></center>'
 	if home_owned[3] = 2:
@@ -57,8 +57,8 @@ if $args[0] = 'dachakit':
 	$location_type = 'private'
 	$metka = 'dachakit'
 	$metkaM = 'dachakit'
+	$locclass = 'kitr'
 	cls
-	clr
 	gs 'stat'
 	'<center><b><font color="maroon">Cottage Kitchen</font></b></center>'
 	if home_owned[3] = 2:
@@ -116,8 +116,8 @@ if $args[0] = 'dachavann':
 	$metka = 'dachavann'
 	$metkaM = 'dachavann'
 	$location_type = 'bathroom'
+	killvar '$locclass'
 	cls
-	clr
 	gs 'stat'
 	'<center><b><font color="maroon">Cottage Bathroom</font></b></center>'
 	if home_owned[3] = 2:

+ 3 - 0
locations/dimaHome.qsrc

@@ -34,6 +34,7 @@ end
 
 if $ARGS[0] = 'hallway':
 	$location_type = 'indoors'
+	killvar '$locclass'
 	cls
 	minut += 1
 	gs 'stat'
@@ -68,6 +69,7 @@ end
 
 if $ARGS[0] = 'livingroom':
 	*clr & cla
+	$locclass = 'livingr'
 	minut += 1
 	gs 'stat'
 	'<center><b><font color = maroon>Living room</font></b></center>'
@@ -79,6 +81,7 @@ end
 if $ARGS[0] = 'kitchen':
     *clr & cla
     minut += 1
+	$locclass = 'kitr'
     gs 'stat'
     '<center><b><font color = maroon>Kitchen</font></b></center>'
     '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/dimkahome/kitchen.jpg"></center>'

+ 1 - 0
locations/dorm.qsrc

@@ -85,6 +85,7 @@ if $ARGS[0] = 'korr':
 	$metka = 'korr'
 	$loc = 'dorm'
     $location_type = 'public_indoors'
+	killvar '$locclass'
 	cla
 	clr
 	*clr

+ 1 - 1
locations/grigory.qsrc

@@ -823,7 +823,7 @@ if $ARGS[0] = 'field3':
 		'That dissappointment is short lived however as he sweeps you up in his arms suddenly, pressing his lips against yours in a rough but affectionate kiss before sitting you back down.'
 		'The two of you say your goodbyes and finally part ways.  You can''t help but think about how good it felt to be so close to him.'
 
-!!		act 'Continue':
+!!		act 'Continue':gt 'grigory','dummy'
 !!	end
 
 	act 'Be Friendly':

+ 2 - 0
locations/igorhome.qsrc

@@ -442,6 +442,7 @@ end
 if $ARGS[0] = 'livingroom':
 	*clr & cla
 	minut += 1
+	$locclass = 'livingr'
 	gs 'stat'
 	'<center><b><font color = maroon>Living room</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/igorhome/livingroom.jpg"></center>'
@@ -728,6 +729,7 @@ end
 if $ARGS[0] = 'kitchen':
     *clr & cla
     minut += 1
+	$locclass = 'kitr'
     gs 'stat'
     '<center><b><font color = maroon>Kitchen</font></b></center>'
     '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/igorhome/kitchen.jpg"></center>'

+ 9 - 7
locations/koncepod1.qsrc

@@ -45,7 +45,7 @@ if $ARGS[0]='krr2x':
     if psiho = 3 and psi1day = 0:dynamic $pavser7
     if psi1day = 1:'Continue'
 
-    act 'Go to the Hall':gt'koncepod1','str2x'
+    act 'Go to the living room':gt'koncepod1','str2x'
     act 'Go to the kitchen':gt'koncepod1','khr2x'
     act 'Go to the bathroom':gt'koncepod1','vnr2x'
     
@@ -67,9 +67,10 @@ if $ARGS[0]='str2x':
     cla
     *clr
     minut += 5
+	$locclass = 'livingr'
     gs'stat'
 
-    '<center><B><font color=maroon>Hall</font></B></center>'
+    '<center><B><font color=maroon>Living Room</font></B></center>'
     '<center><img <<$set_imgh>> src="images/locations/oldtown/vacanthouse/hall.jpg" ></center>'
 
     if psiho = 0 and psi1day = 0:dynamic $pavser
@@ -77,7 +78,7 @@ if $ARGS[0]='str2x':
     if psiho >= 1:
         act 'Go to the kitchen':gt'koncepod1','khr2x'
         act 'Go to the bedroom':gt'koncepod1','bdr2x'
-        act 'Corridor':gt'koncepod1','krr2x'
+        act 'Go to the hall':gt'koncepod1','krr2x'
     end
 
 end
@@ -86,6 +87,7 @@ if $ARGS[0]='khr2x':
     cla
     *clr
     minut += 5
+	$locclass = 'kitr'
     gs'stat'
     '<center><B><font color=maroon>Kitchen</font></B></center>'
     '<center><img <<$set_imgh>> src="images/locations/oldtown/vacanthouse/kitchen.jpg" ></center>'
@@ -93,8 +95,8 @@ if $ARGS[0]='khr2x':
     if psiho = 2 and psihb = 1 and psihc = 1 and psi1day = 0:dynamic $pavser6
 
 
-    act 'Go to the Hall':gt'koncepod1','str2x'
-    act 'Corridor':gt'koncepod1','krr2x'
+    act 'Go to the living room':gt'koncepod1','str2x'
+    act 'Go to the hall':gt'koncepod1','krr2x'
 end
 
 
@@ -111,7 +113,7 @@ if $ARGS[0] = 'vnr2x':
     'Above the washbasin hangs an <a href="exec:GT ''mirror'',''start''">oval mirror</a>.'
     if psiho = 2 and psihb = 1 and psihc = 0 and psi1day = 0:dynamic $pavser4
 
-	act 'Corridor':gt'koncepod1','krr2x'
+	act 'Go to the hall':gt'koncepod1','krr2x'
 	
 	dynamic $tampon
 	dynamic $quickwash
@@ -128,7 +130,7 @@ if $ARGS[0]='bdr2x':
     '<center><B><font color=maroon>Bedroom</font></B></center>'
     '<center><img <<$set_imgh>> src="images/locations/oldtown/vacanthouse/bedroom.jpg" ></center>'
     if psiho = 1 and psi1day = 0:dynamic $pavser3
-    act 'Corridor':gt'koncepod1','krr2x'
+    act 'Go to the hall':gt'koncepod1','krr2x'
 end
 
 --- koncepod1 ---------------------------------

+ 1 - 0
locations/kuhr.qsrc

@@ -3,6 +3,7 @@ CLOSE ALL
 
 $metka = ''
 $loc = 'kuhr'
+$locclass = 'kitr'
 clr
 minut += 1
 elektro += 1

+ 1 - 0
locations/kuhr2x.qsrc

@@ -2,6 +2,7 @@
 CLOSE ALL
 $metka = ''
 $loc = 'kuhr2x'
+$locclass = 'kitr'
 
 clr
 minut = minut + 1

+ 1 - 0
locations/kuhrPar.qsrc

@@ -20,6 +20,7 @@ end
 
 $metka = $ARGS[0]
 $loc = $CURLOC
+$locclass = 'kitr'
 clr
 minut += 1
 gs 'stat'

+ 6 - 4
locations/leonid.qsrc

@@ -86,10 +86,7 @@ end
 
 if $ARGS[0] = 'office':
 	minut += 1
-	if $clothingworntype = 'nude':
-		'<b>You are naked.</b>'
-		mult = 3
-	end
+	killvar '$locclass'
 	if (hour >= 9 and hour < 10) and leonidSecretary = 1 and week <= 5:
 		if $clothingworntype = 'office':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/office.jpg"></center>'
@@ -121,6 +118,10 @@ if $ARGS[0] = 'office':
 		'The office is locked, you cannot enter. The <a href="exec:gt ''leonid'', ''toilet''">toilet</a> is still open.'
 	end 
 
+	if $clothingworntype = 'nude':
+		'<b>You are naked.</b>'
+		mult = 3
+	end
 	gs 'stat'
 
 	if $clothingworntype = 'nude':
@@ -259,6 +260,7 @@ end
 
 if $ARGS[0] = 'officeKitchen':
 	minut += 2
+	$locclass = 'kitr'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/kitchen.jpg"></center>'
 	'Small office kitchen, equipped with all that is needed for a regular working day.'
 	if taskCoffee = 1 or leonidSecretary = 1:

+ 5 - 3
locations/lesbidomhouse.qsrc

@@ -198,13 +198,15 @@ if $ARGS[0] = 'QW2':
 		gs 'arousal', 'end'
 		gs 'stat'
 		
-		if analplugin = 1:'Seeing your ass plug, she suddenly starts laughing and gives it a little poke and twist. While she plays with it, she tells you: "Looks like you are on the right track, girl..."'
+		if analplugin = 1:
+			'Seeing your ass plug, she suddenly starts laughing and gives it a little poke and twist. While she plays with it, she tells you: "Looks like you are on the right track, girl..."'
+			gs 'arousal', 'anal_dildo', 30, 'sub', 'lesbian'
+			gs 'arousal', 'end'
+		end
 		'During her lecture, Mistress feels you up from time to time, idly running her hands over your thighs, boobs and butt. She also spends some time on telling you how you should behave in the presence of a domme. Immediate obedience is very important.'
 		'Suddenly she gives you a hard slap on the ass, and tells you: "Time''s up. You need to go."'
 		'You barely have any time to put your clothes back on, but Mistress waits impatiently by the door until you are dressed. When you gather your things and get ready to leave, you try to think back of what you have learned from her demeanour and lessons today. Not much, to be honest... but it was fascinating to see her work with you.'
 		
-		gs 'arousal', 'anal_dildo', 30, 'sub', 'lesbian'
-		gs 'arousal', 'end'
 		gs 'stat'
 		
 		act 'Leave her apartment':gt'street'

+ 3 - 0
locations/mey_home.qsrc

@@ -64,6 +64,7 @@ end
 if $ARGS[0] = 'start':
 	$metka = 'start'
 	$loc = 'mey_home'
+	killvar '$locclass'
 	cls
 	gs'stat'
 	'<center><h4><font color="maroon">Hall</font></h4></center>'
@@ -138,6 +139,7 @@ if $ARGS[0] = '1':
 	cls
 	$loc = 'mey_home'
 	$metka = '1'
+	$locclass = 'kitr'
 	gs 'stat'
 	'<center><h4><font color="maroon">Kitchen</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/meynolds/kitchen.jpg"></center>'
@@ -398,6 +400,7 @@ if $ARGS[0] = '5':
 	$loc = 'mey_home'
 	$metka = '5'
 	minut += 1
+	$locclass = 'livingr'
 	gs 'stat'
 	'<center><h4><font color="maroon">Katja''s room</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/meynolds/katya_room.jpg"></center>'

+ 1 - 0
locations/mey_tamara_events.qsrc

@@ -42,6 +42,7 @@ if $args[0] = 'first_meet':
 		cls
 		minut += 60
 		mey_vika['mey_vika_qw'] = 25
+		$locclass = 'kitr'
 		gs 'stat'
 		'<center><h4><font color="maroon">Tamara Mikhailovna</font></h4></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/meynolds/tamara_first_meet_tea.jpg"></center>'

+ 1 - 0
locations/obkitchen.qsrc

@@ -4,6 +4,7 @@ if $args[0] = '':
 	$metka = ''
 	$loc = 'obkitchen'
     $location_type = 'private'
+	$locclass = 'kitr'
 	gs 'stat'
 	'<center><b>in the dorm kitchen</b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/obkitchen.jpg"></center>'

+ 1 - 0
locations/pavResidential.qsrc

@@ -7,6 +7,7 @@ $loc = 'pavResidential'
 $metkaStreet = ''
 $locStreet = 'pavResidential'
 $location_type = 'public_outdoors'
+killvar '$locclass'
 
 if sound = 0:
 	if month >=11 and month <= 12 or month >=1 and month <=3:

+ 2 - 0
locations/pavSharedApt.qsrc

@@ -582,6 +582,8 @@ if $ARGS[0] = 'kitchen':
 	minut += 2
 	$loc = 'pavSharedApt'
 	$metka = 'kitchen'
+	$locclass = 'kitr'
+	gs 'stat'
 	gs 'kit_din'
 	'<center><h3>Kitchen</h3></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/kuhrpar.jpg"></center>'

+ 2 - 0
locations/rolanapt.qsrc

@@ -154,6 +154,7 @@ if $ARGS[0] = 'livingroom':
 	cla
 	*clr
 	minut += 1
+	$locclass = 'livingr'
 	gs 'stat'
 	'<center><b><font color = maroon>Living Room</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/livingroom.jpg"></center>'
@@ -185,6 +186,7 @@ if $ARGS[0] = 'kitchen':
 	cla
 	*clr
 	minut += 1
+	$locclass = 'kitr'
 	gs 'stat'
     '<center><b><font color = maroon>Kitchen</font></b></center>'
     '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/aptrolan/kitchen.jpg"></center>'

+ 4 - 0
locations/sbReksHome.qsrc

@@ -81,6 +81,7 @@ end
 if $ARGS[0] = 'party_home':
 	$metka = 'party_home'
 	$loc = 'sbReksHome'
+	killvar '$locclass'
 	cls
 	minut += 5
 	gs'stat'
@@ -129,6 +130,7 @@ end
 if $ARGS[0] = 'party_gost':
 	$metka = 'party_gost'
 	$loc = 'sbReksHome'
+	$locclass = 'livingr'
 	cls
 	minut += 5
 	gs'stat'
@@ -154,6 +156,7 @@ end
 if $ARGS[0] = 'party_kuh':
 	$metka = 'party_kuh'
 	$loc = 'sbReksHome'
+	$locclass = 'kitr'
 	cls
 	minut += 5
 	gs'stat'
@@ -171,6 +174,7 @@ if $ARGS[0] = 'party_toilet':
 	$loc = 'sbReksHome'
 	$metkaM = 'party_toilet'
 	$locM = 'sbReksHome'
+	killvar '$locclass'
 	cls
 	minut += 5
 	gs'stat'

+ 1 - 0
locations/shulga_room.qsrc

@@ -14,6 +14,7 @@ if $ARGS[0] = '': gt 'shulga_room', 'start'
 if $ARGS[0] = 'start':
 	$metka = 'start'
 	$loc = 'shulga_room'
+	$locclass = 'livingr'
 	!Daily discussions:
 	!Vasily
 	if bazar_day ! daystart: bazar_count = 10

+ 1 - 0
locations/shulgakuh.qsrc

@@ -3,6 +3,7 @@ CLOSE ALL
 $metka = ''
 $loc = 'shulgakuh'
 $location_type = 'private'
+$locclass = 'kitr'
 
 if $ARGS[0] = '':
 	minut += 1

+ 1 - 0
locations/sisterQW.qsrc

@@ -825,6 +825,7 @@ end
 if $ARGS[0] = 'anna_kit':
 	cls
 	minut += 5
+	$locclass = 'kitr'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_24.jpg"></center>'
 	*nl

+ 1 - 1
locations/sitr.qsrc

@@ -4,7 +4,7 @@ CLOSE ALL
 $metka = ''
 $loc = 'sitr'
 $location_type = 'private'
-$locclass = 'sitroom'
+$locclass = 'livingr'
 act 'Go to the corridor':gt 'korr'
 
 clr

+ 1 - 1
locations/sitr2x.qsrc

@@ -2,7 +2,7 @@
 
 CLOSE ALL
 $location_type = 'private'
-$locclass = 'sitroom'
+$locclass = 'livingr'
 act 'Go to the corridor':
 	gt'korr2x'
 end

+ 1 - 1
locations/sitrPar.qsrc

@@ -5,7 +5,7 @@ act 'Leave the room':gt 'korrPar'
 $metka = ''
 $loc = 'sitrPar'
 $location_type = 'private'
-$locclass = 'sitroom'
+$locclass = 'livingr'
 clr
 minut += 1
 gs 'stat'

+ 7 - 7
locations/subkid.qsrc

@@ -8,21 +8,21 @@ if kid > 0:
 	kidSelected[kidLoops] = kidI
 		if kidage[kidI] < 1 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 12 or hour > 18 ):
 			'<a href="exec:gt ''kid'',''start'' ">In the crib lies <<$kidname[kidI]>>.</a>'
-		elseif kidage[kidI] < 1 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 12 and hour <= 18 ):
+		elseif kidage[kidI] < 1 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 12 and hour <= 18 ):
 			'<a href="exec:gt ''kid'',''start'' ">On a blanket lies <<$kidname[kidI]>>.</a>'
 		elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 7 or hour > 21):
 			'<a href="exec:gt ''kid'',''start'' ">Asleep in bed lies <<$kidname[kidI]>>.</a>'
-		elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc < 8:
+		elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc < 8:
 			'<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is playing with toys on the floor.</a>'
-		elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc >= 8:
+		elseif kidage[kidI] >= 1 and kidage[kidI] < 7 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 21) and rkidloc >= 8:
 			'<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is watching TV.</a>'	
-		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 9):
+		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 7 and hour <= 9):
 			'<a href="exec:gt ''kid'',''start'' "><<$kidname[kidI]>> is getting ready for school.</a>'
-		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass =  'singleroom' or $locclass = 'bedr') and ( hour >= 9 and hour <= 16):
+		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'livingr' or $locclass =  'singleroom' or $locclass = 'bedr') and ( hour >= 9 and hour <= 16):
 			'<<$kidname[kidI]>> is at school'
-		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 16 and hour <= 18):
+		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 16 and hour <= 18):
 			'<a href="exec:gt ''kid'', ''start''"><<$kidname[kidi]>> is working on homework.</a>'
-		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'sitroom' or $locclass = 'singleroom') and ( hour >= 18 and hour <= 21):
+		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'livingr' or $locclass = 'singleroom') and ( hour >= 18 and hour <= 21):
 			'<a href="exec:gt ''kid'',''start'' "><<$kidname[kidi]>> is watching TV.</a>'
 		elseif kidage[kidI] >= 7 and kidage[kidI] < 18 and ($locclass = 'bedr' or $locclass = 'singleroom') and ( hour < 7 or hour > 21):
 			'<a href="exec:gt ''kid'',''start'' ">Asleep in bed lies <<$kidname[kidI]>>.</a>'

+ 1 - 1
locations/tanhousezal.qsrc

@@ -3,7 +3,7 @@ CLOSE ALL
 
 $metka = ''
 $loc = 'tanhousezal'
-
+$locclass = 'livingr'
 minut += 5
 gs 'stat'
 sexpartkno = 1

+ 1 - 1
locations/tankitchen.qsrc

@@ -3,7 +3,7 @@ CLOSE ALL
 
 $metka = ''
 $loc = 'tankitchen'
-
+$locclass = 'kitr'
 minut += 5
 gs 'stat'
 gs 'kit_din'

+ 82 - 5
locations/telefon.qsrc

@@ -779,6 +779,12 @@ if $ARGS[0] = 'Phone_selfie_totals':
 	bedroom_clotot = 27
 	bedroom_undtot = 20
 	bedroom_nudtot = 20
+	kitchen_clotot = 16
+	kitchen_undtot = 11
+	kitchen_nudtot = 20
+	livingr_clotot = 17
+	livingr_undtot = 21
+	livingr_nudtot = 21
 end
 
 
@@ -828,6 +834,42 @@ if $ARGS[0] = 'Phone_pictures':
 		bedroom_nudcnt += 1
 	if bedroom_nudcnt <= bedroom_nudtot: jump'bedroom_nudloop'
 
+	kitchen_clocnt = 1
+	:kitchen_cloloop
+		if kitchen_closelfie[kitchen_clocnt] = 1:pl'<a href="exec:view''images/pc/selfies/kitchen/clothed/<<kitchen_clocnt>>.jpg''"><b>Clothed kitchen selfie #<<kitchen_clocnt>></b></a>'
+		kitchen_clocnt += 1
+	if kitchen_clocnt <= kitchen_clotot: jump'kitchen_cloloop'
+
+	kitchen_undcnt = 1
+	:kitchen_undloop
+		if kitchen_undselfie[kitchen_undcnt] = 1:pl'<a href="exec:view''images/pc/selfies/kitchen/underwear/<<kitchen_undcnt>>.jpg''"><b>Underwear kitchen selfie #<<kitchen_undcnt>></b></a>'
+		kitchen_undcnt += 1
+	if kitchen_undcnt <= kitchen_undtot: jump'kitchen_undloop'
+
+	kitchen_nudcnt = 1
+	:kitchen_nudloop
+		if kitchen_nudselfie[kitchen_nudcnt] = 1:pl'<a href="exec:view''images/pc/selfies/kitchen/nude/<<kitchen_nudcnt>>.jpg''"><b>Nude kitchen selfie #<<kitchen_nudcnt>></b></a>'
+		kitchen_nudcnt += 1
+	if kitchen_nudcnt <= kitchen_nudtot: jump'kitchen_nudloop'
+
+	livingr_clocnt = 1
+	:livingr_cloloop
+		if livingr_closelfie[livingr_clocnt] = 1:pl'<a href="exec:view''images/pc/selfies/livingroom/clothed/<<livingr_clocnt>>.jpg''"><b>Clothed livingroom selfie #<<livingr_clocnt>></b></a>'
+		livingr_clocnt += 1
+	if livingr_clocnt <= livingr_clotot: jump'livingr_cloloop'
+
+	livingr_undcnt = 1
+	:livingr_undloop
+		if livingr_undselfie[livingr_undcnt] = 1:pl'<a href="exec:view''images/pc/selfies/livingroom/underwear/<<livingr_undcnt>>.jpg''"><b>Underwear livingroom selfie #<<livingr_undcnt>></b></a>'
+		livingr_undcnt += 1
+	if livingr_undcnt <= livingr_undtot: jump'livingr_undloop'
+
+	livingr_nudcnt = 1
+	:livingr_nudloop
+		if livingr_nudselfie[livingr_nudcnt] = 1:pl'<a href="exec:view''images/pc/selfies/livingroom/nude/<<livingr_nudcnt>>.jpg''"><b>Nude livingroom selfie #<<livingr_nudcnt>></b></a>'
+		livingr_nudcnt += 1
+	if livingr_nudcnt <= livingr_nudtot: jump'livingr_nudloop'
+
 	*nl
 	pl'<center><a href="exec:gs ''telefon'', ''Phone_menu'' "><img src="images/system/icon/back.png"></a></center>'
 end
@@ -840,39 +882,74 @@ if $ARGS[0] = 'Phone_camera_selfie':
 		if $clothingworntype ! 'nude':
 			phone_rand = rand(1,bathroom_clotot)
 			bathroom_closelfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bathroom/clothed/<<phone_rand>>.jpg'
 		elseif $pantyworntype ! 'none':
 			phone_rand = rand(1,bathroom_undtot)
 			bathroom_undselfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bathroom/underwear/<<phone_rand>>.jpg'
 		else
 			phone_rand = rand(1,bathroom_nudtot)
 			bathroom_nudselfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bathroom/nude/<<phone_rand>>.jpg'
 		end
-		gs 'stat'
-		gs 'telefon', 'Phone_pictures'
 	elseif $locclass = 'bedr':
 		if $clothingworntype ! 'nude':
 			phone_rand = rand(1,bedroom_clotot)
 			bedroom_closelfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bedroom/clothed/<<phone_rand>>.jpg'
 		elseif $pantyworntype ! 'none':
 			phone_rand = rand(1,bedroom_undtot)
 			bedroom_undselfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bedroom/underwear/<<phone_rand>>.jpg'
 		else
 			phone_rand = rand(1,bedroom_nudtot)
 			bedroom_nudselfie[phone_rand] = 1
+			gs 'stat'
 			view 'images/pc/selfies/bedroom/nude/<<phone_rand>>.jpg'
 		end
-		gs 'stat'
-		gs 'telefon', 'Phone_pictures'
+	elseif $locclass = 'kitr':
+		if $clothingworntype ! 'nude':
+			phone_rand = rand(1,kitchen_clotot)
+			kitchen_closelfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/kitchen/clothed/<<phone_rand>>.jpg'
+		elseif $pantyworntype ! 'none':
+			phone_rand = rand(1,kitchen_undtot)
+			kitchen_undselfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/kitchen/underwear/<<phone_rand>>.jpg'
+		else
+			phone_rand = rand(1,kitchen_nudtot)
+			kitchen_nudselfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/kitchen/nude/<<phone_rand>>.jpg'
+		end
+	elseif $locclass = 'livingr':
+		if $clothingworntype ! 'nude':
+			phone_rand = rand(1,livingr_clotot)
+			livingr_closelfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/livingroom/clothed/<<phone_rand>>.jpg'
+		elseif $pantyworntype ! 'none':
+			phone_rand = rand(1,livingr_undtot)
+			livingr_undselfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/livingroom/underwear/<<phone_rand>>.jpg'
+		else
+			phone_rand = rand(1,livingr_nudtot)
+			livingr_nudselfie[phone_rand] = 1
+			gs 'stat'
+			view 'images/pc/selfies/livingroom/nude/<<phone_rand>>.jpg'
+		end
 	else
 		phone_rand = RAND(1,2)
 		phone_selfie[phone_rand] = 1
 		gs 'stat'
-		gs 'telefon', 'Phone_pictures'
 		view 'images/system/phone/selfie/phone_selfie<<phone_rand>>.jpg'
 	end
 	!if spdirtyf > 0: phone_rand = RAND (m,n) - for SELF in the semen

+ 56 - 46
locations/webcam_site.qsrc

@@ -1,6 +1,30 @@
 # webcam_site
-!count-in the show day:
-if webcam_show_day ! daystart: webcam_show_count = 2
+
+if $args[0] = 'start':
+	!count-in the show day:
+	if webcam_show_day ! daystart: webcam_show_count = 2
+	cls
+	minut += 1
+	gs'stat'
+	'<center>Video chat with the best girls online!</center>'
+	'<center><img <<$set_imgh>> src="images/shared/accessories/computer/webcam/webcam.jpg"></center>'
+	act 'Logout': gt 'Komp', 'start'
+	if $webcam_name = 0:
+		'<center>If you are beautiful and you want to earn a little revealing itself, you need to have a webcam and go through a simple registration.</center>'
+		act 'Register': dynamic $webcam_rega
+	else
+		if $webcam_name > 0: '<center>Your username: <<$webcam_name>></center>' 
+		if $webcam_name > 0: '<center><a href="exec: dynamic $webcam_stat">View your statistics</a></center>'
+		if webcam_show_count <= 0:
+			'You have already done a show today.'
+		else
+			act 'Post Show': dynamic $webcam_index
+		end
+		act 'Help': dynamic $webcam_help
+		act 'Change username': dynamic $webcam_rega
+	end
+end
+
 !-----------------------------------------------!
 !------Registration page online chat---------!
 !-----------------------------------------------!
@@ -9,11 +33,11 @@ $webcam_rega = {
 	minut = minut + 5
 	gs 'stat'
 	*nl
-	'Register online chat, Come up with a nickname...'
+	'Registering online, please choose a username...'
 	!$web_gg_name = '<<$pcs_nickname>>'
-	$webcam_name = input ('Your nickname...')
+	$webcam_name = input ('Your username')
 	cla
-	'Your nickname: <<$webcam_name>>'
+	'Your username: <<$webcam_name>>'
 	act 'Further': gt 'webcam_site'
 	!if $webcam_name = 0: $webcam_name = $web_gg_name
 }
@@ -25,25 +49,25 @@ $webcam_stat = {
 	cls
 	minut = minut + 5
 	gs'stat'
-	'Your stats webcam chat under a pseudonym: <<$webcam_name>>
-	You put on a show: <<webcam_show_counter>>
-	doing stretching: <<webcam_show_flex>>
-	striptease: <<webcam_show_strip>>
-	played with the breast: <<webcam_show_tits>>
-	masturbated: <<webcam_show_mast>>
-	thrust the dildo in her mouth: <<webcam_show_throat>>
-	thrust the dildo in pussy: <<webcam_show_pussy>> 
-	thrust the dildo in the ass: <<webcam_show_anus>>
-	thrust dildo right in the ass and pussy: <<webcam_show_dp>>
+	'Your webcam username: <<$webcam_name>>
+	Number of shows performed: <<webcam_show_counter>>
+	Times stretching: <<webcam_show_flex>>
+	Times stripping: <<webcam_show_strip>>
+	Played with breasts: <<webcam_show_tits>>
+	Masturbated: <<webcam_show_mast>>
+	Dildo in mouth: <<webcam_show_throat>>
+	Dildo in pussy: <<webcam_show_pussy>> 
+	Dildo in ass: <<webcam_show_anus>>
+	Dildo ass and pussy: <<webcam_show_dp>>
+	Fisting: <<webcam_show_vfisting>>
 	Anal Fisting: <<webcam_show_afisting>>
-	Fisting vaginal: <<webcam_show_vfisting>>
-	squirts: <<webcam_show_squirt>>
-	get an orgasm: <<webcam_show_orgazm>>
+	Orgasmed: <<webcam_show_orgazm>>
+	Squirted: <<webcam_show_squirt>>
 	<hz>
-	Total time of your online chats: <<webcam_show_time>> minutes.
-	On a tip you have earned: <<webcam_show_money>> <b>₽</b>.
+	Total time on cam: <<webcam_show_time>> minutes.
+	Total tips earned: <<webcam_show_money>> <b>₽</b>.
 	'
-	act 'To main': gt 'webcam_site'
+	act 'Return': gt 'webcam_site'
 }
 !-----------------------------------------------!
 !-------Help page online chat-------------!
@@ -54,13 +78,14 @@ $webcam_help = {
 	gs'stat'
 	'
 	Description of service:
-	Video conference - this software, allowing users to conduct videogolosovoe chat in real-time chat via the Web-Camera
-	After registering, you will be able to put on a show broadcast, receiving a tip. In order to receive more tips you need to understand, you have to want users.
-	Small tips for increasing the tip: 
-	Buy dildo sex shop (need: small faloimitator, average 15See faloimitator, big 25See faloimitator, 40 See faloimitator)
-	The dildo More, the more you get a tip.
-	As for fisting give a lot of tips, but for this you need to be well designed holes, desirable to have a lubricant, otherwise everything will get sick and not be able to put on a show.
-	During orgasm you get a bonus tip.
+	Video conference - this software, allowing users to conduct real-time video chat via the Web-Camera
+	After registering, you will be able to broadcast shows, receiving tips from customers.
+	In order to receive more tips you need attract more users.
+	One show per day only.
+	Things that will increasing your tips: 
+	Use dildos, available from your local sex shop (The larger the better)
+	Self-fisting earns lots of tips, but for this you need lubricant and the ability to take it, otherwise you will cause yourself a lot of pain and you will not be able to put on a show when in pain.
+	Orgasming during a show will earn you a bonus tip.
 	'
 	act 'To main': gt 'webcam_site'
 }
@@ -68,21 +93,6 @@ $webcam_help = {
 !-----------------------------------------------!
 !--------Home online chat-----------!
 !-----------------------------------------------!
-!if $args[0] = 'webcam_site':
-cls
-minut = minut + 1
-gs'stat'
-'<center>Online video chat with the best girls online!</center>'
-'<center><img <<$set_imgh>> src="images/shared/accessories/computer/webcam/webcam.jpg"></center>'
-if $webcam_name = 0: '<center>If you are beautiful and you want to earn a little revealing itself, you need to have a webcam and go through a simple registration.</center>'	
-if $webcam_name > 0: '<center>Your nickname: <<$webcam_name>></center>' 
-if $webcam_name > 0: '<center><a href="exec: dynamic $webcam_stat">View your statistics</a></center>'
-if webcam_show_count <= 0: 'Today you have to make a show. We need to give yourself a break and viewers.'
-act 'Logout': gt 'Komp', 'start'
-if $webcam_name = 0: act 'Register': dynamic $webcam_rega	
-if $webcam_name > 0 and webcam_show_count > 0: act 'Post Show': dynamic $webcam_index
-if $webcam_name > 0: act 'Help': dynamic $webcam_help
-if $webcam_name > 0: act 'Change nickname': dynamic $webcam_rega
 
 $webcam_index = {
 	!act 'Exit': gt 'Komp', 'start'	
@@ -135,7 +145,7 @@ $webcam_show = {
 		webcam_show_money += my_show_tip_all 
 		webcam_show_time += 60 
 		webcam_show_counter += 1
-		elektro = elektro + 3
+		elektro += 3
 		internet -= 1
 		minut += 60
 		
@@ -621,11 +631,11 @@ $webcam_show = {
 				gs'stat'
 				*clr
 				'<center><video autoplay loop src="images/shared/accessories/computer/webcam/strip'+rand(1,7)+'.mp4" ></video></center>'
-				'You slowly undress to the music, gently pulling one garment after another.'
+				'You slowly undress to the music, gently removing one garment after another.'
 				
 				!health check
 				if agape > 2 or vgape > 2 or pcs_sleep < 8:
-					'You like that do not feel good. Lucky, if you are able to dance at least half as good, as usual.'
+					'You do not feel good. You only manage to dance half as well, as usual.'
 					
 					my_show_tip_mod = 2
 				else

+ 3 - 2
locations/ykuh.qsrc

@@ -1,7 +1,8 @@
 # ykuh
 
-$metka = $ARGS[0]
-$loc = $CURLOC
+$metka = ''
+$loc = 'ykuh'
+$locclass = 'kitr'
 clr
 gs 'stat'
 '<center><b><font color="maroon">Kitchen</font></b></center>'

+ 1 - 1
locations/yzal.qsrc

@@ -2,7 +2,7 @@
 $metka = $ARGS[0]
 $loc = $CURLOC
 $location_type = 'private'
-$locclass = 'sitroom'
+$locclass = 'livingr'
 clr
 gs 'stat'
 '<center><b><font color="maroon">House</font></b></center>'