45 Commits b0037b120a ... d8f458be0d

Author SHA1 Message Date
  sovietmercader d8f458be0d [fixed] dead end during school break found by amopen 4 years ago
  KevinSmarts 0b293a8fd2 Merge remote-tracking branch 'Sicaa/master' 4 years ago
  Sicaa 2ef46a818a [added] Flag for future skill check in sistersleep, different images for sister_char in the kitchen 4 years ago
  sovietmercader e7d7708c8f [fixed] no more custom start stuck naked and unable to put back on the default school uniform. still allow players to start with no other clothes but put warning on screen if this will happen 4 years ago
  Sicaa d94de48a12 [fixed] some images and other small bugs in artemdate and artemhome 4 years ago
  Sicaa bfd4c52276 [changed] arrays for the new piercing & tattoo images, reordered ARGS in pirsingsalon and lover_change a little bit so they're in the same order as the image folders, [fixed] a small bug in gopskver regarding piercings 4 years ago
  Sicaa ec903573c7 [fixed] some minor things in natkolEv 4 years ago
  KevinSmarts f3a63886c9 [fixed] typo 4 years ago
  KevinSmarts af6067d5d8 Merge remote-tracking branch 'Sicaa/master' 4 years ago
  Sicaa 35f9551702 [changed] removed willpower check from permanent decision in sistersleep 4 years ago
  Sicaa 9f8e00c9e1 [fixed] GoTo-s in sister_party, = to => in sister_chat, small fixes and restructuring in sistersleep 4 years ago
  KevinSmarts 27c1dc7216 Merge remote-tracking branch 'julzor/master' 4 years ago
  julzor 5ba0882088 [fixed] wrong image path in sistersleep 4 years ago
  julzor cd21f3e867 [fixed] simplified the braid action a bit and moved an action to a better position 4 years ago
  julzor f4dcb58708 [fixed] dead end in artemhome, not being able to sell car = 13 4 years ago
  julzor 9ce645cb54 [fixed] dead end in sisterQW, moved the leave option to the top 4 years ago
  Sicaa ef3cbdd2c7 [fixed] artem's flower gifting scene leading to different blowjob scene, typo & image path fixes in sisterQW 4 years ago
  julzor a2d508a4fe Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife 4 years ago
  KevinSmarts 549ea888c5 [added] Warning to game start regarding content with disclaimer 4 years ago
  julzor 682d5d8465 [fixed] no second action during a willpower check in natkolEV 4 years ago
  julzor 57861fda06 [fixed] changed hour += into minut += 4 years ago
  KevinSmarts 50557c40b2 Merge remote-tracking branch 'julzor/master' 4 years ago
  julzor bfd6f7920c [fixed] missing menu_off = 1 in gskver and wrong $location_type in placer_sex 4 years ago
  Sicaa 538736a6d2 [fixed] Unnecessary pav fame in photo modelling 4 years ago
  julzor 7c9fe14061 [fixed] small change to the new custom lube texts 4 years ago
  julzor 4d56f01819 [added] possibility to display custom text for the new lube stuff 4 years ago
  Sicaa 852ca23364 [fixed] image locations, lower case actions, action placement and an incorrect condition logic 4 years ago
  Sicaa 1a2ff1ce7f [fixed] condom text didn't make sense with a sexcontra = 7 (sabotaged) so I changed condition to else 4 years ago
  KevinSmarts 8d03281ff8 [fixed] Forgot !! 4 years ago
  julzor 7582a417af [fixed] wrong $menu_args in nordtrain 4 years ago
  KevinSmarts 43901066ea Merge remote-tracking branch 'Sicaa/master' 4 years ago
  KevinSmarts dbfa193811 [fixed] Missing punctuation 4 years ago
  KevinSmarts 57a8b8d73c [fixes] Auto-lube seeeding with a few fixes along the way pt2 4 years ago
  Sicaa 379bad3d49 [fixed] missing leave actions in artemhome, combined arousal and dinsex calls in garfather 4 years ago
  KevinSmarts b4500c7ecf Merge remote-tracking branch 'julzor/master' 4 years ago
  julzor ea19897179 [fixed] wrong willpower checks and other problems in pavtrain_market 4 years ago
  julzor 1cf67c8e25 [fixed] error from the analyzer 4 years ago
  julzor eefba356cb [fixed] empty mainscreen when no special event is triggered in pavtrain_market 4 years ago
  Sicaa 24d4e786c8 [fixed] missing ='s in gschool_lessons4 4 years ago
  KevinSmarts 86045c0289 Merge remote-tracking branch 'julzor/master' 4 years ago
  KevinSmarts 3727ec5cc0 [added] Seeding for auto lube or alternative lube options as applicable - pt1 4 years ago
  julzor b038eab8b0 [changed] balanced the final run a bit more 4 years ago
  julzor ef5b4f1271 [changed] balanced school running, city running 4 years ago
  julzor 18e78eae69 [fixed] changed old salo code into bmi, the salo value makes no sense at all 4 years ago
  KevinSmarts 3593aa70f2 [fixes] Deited the slut start text and her sex experience to make her sluttier. 4 years ago
75 changed files with 922 additions and 840 deletions
  1. 8 8
      locations/AlbStarsWhore.qsrc
  2. 2 0
      locations/AnalPR.qsrc
  3. 7 1
      locations/BDsex.qsrc
  4. 2 0
      locations/BelSex.qsrc
  5. 2 12
      locations/Gnpc2.qsrc
  6. 1 1
      locations/Nord.qsrc
  7. 2 1
      locations/Palatka.qsrc
  8. 1 0
      locations/Vnlake2.qsrc
  9. 2 1
      locations/Voltrenersex.qsrc
  10. 1 0
      locations/alex.qsrc
  11. 5 1
      locations/anushka.qsrc
  12. 2 2
      locations/anushkaev1.qsrc
  13. 22 6
      locations/arousal.qsrc
  14. 2 3
      locations/artemEv.qsrc
  15. 2 2
      locations/artemdate.qsrc
  16. 11 9
      locations/artemhome.qsrc
  17. 2 2
      locations/arturdin.qsrc
  18. 1 1
      locations/avb.qsrc
  19. 130 88
      locations/beg1.qsrc
  20. 33 0
      locations/begin.qsrc
  21. 1 1
      locations/belpicknick.qsrc
  22. 4 8
      locations/bobka.qsrc
  23. 1 0
      locations/brothel.qsrc
  24. 1 1
      locations/brother.qsrc
  25. 1 1
      locations/cafe3.qsrc
  26. 3 3
      locations/clothing.qsrc
  27. 13 18
      locations/club.qsrc
  28. 2 1
      locations/dinSex.qsrc
  29. 2 2
      locations/din_pav.qsrc
  30. 1 0
      locations/dk.qsrc
  31. 1 1
      locations/dorm.qsrc
  32. 5 7
      locations/down.qsrc
  33. 4 9
      locations/event.qsrc
  34. 12 12
      locations/events.qsrc
  35. 5 4
      locations/family_schedule.qsrc
  36. 2 2
      locations/fbDormD.qsrc
  37. 0 12
      locations/foto.qsrc
  38. 6 3
      locations/gadriver.qsrc
  39. 5 5
      locations/gadukino_event.qsrc
  40. 2 4
      locations/garfather.qsrc
  41. 1 1
      locations/gopskver.qsrc
  42. 7 9
      locations/gschool_events.qsrc
  43. 18 18
      locations/gschool_grounds.qsrc
  44. 11 11
      locations/gschool_lessons4.qsrc
  45. 1 0
      locations/gschool_socialchg.qsrc
  46. 1 0
      locations/gskver.qsrc
  47. 4 3
      locations/hotel_resep.qsrc
  48. 2 1
      locations/hunters.qsrc
  49. 39 39
      locations/huntersex.qsrc
  50. 4 5
      locations/husbSex.qsrc
  51. 4 5
      locations/kamera.qsrc
  52. 5 5
      locations/kotovSex.qsrc
  53. 20 20
      locations/lover_change.qsrc
  54. 2 2
      locations/mirafather.qsrc
  55. 14 14
      locations/mitkasex.qsrc
  56. 3 3
      locations/natkolEv.qsrc
  57. 1 1
      locations/nordtrain.qsrc
  58. 19 22
      locations/pavtrain_market.qsrc
  59. 58 58
      locations/pirsingsalon.qsrc
  60. 11 13
      locations/placer_gop_orgy.qsrc
  61. 3 2
      locations/placer_house.qsrc
  62. 2 3
      locations/placer_sex.qsrc
  63. 1 1
      locations/podval_rape.qsrc
  64. 12 6
      locations/preSYS.qsrc
  65. 4 4
      locations/preSYS2.qsrc
  66. 33 44
      locations/sisterQW.qsrc
  67. 59 41
      locations/sister_chat.qsrc
  68. 26 26
      locations/sister_party.qsrc
  69. 236 239
      locations/sistersleep.qsrc
  70. 1 1
      locations/start.qsrc
  71. 4 5
      locations/street_event.qsrc
  72. 2 2
      locations/tatiana_missions.qsrc
  73. 3 3
      locations/trashplace.qsrc
  74. 1 1
      locations/version.qsrc
  75. 1 0
      locations/zaprFWash.qsrc

+ 8 - 8
locations/AlbStarsWhore.qsrc

@@ -106,7 +106,7 @@ if $ARGS[0] = 'whore1':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/anal.jpg"></center>'
 				'Yoy present your ass to him, with a little giggle, you give it a wiggle.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				gs 'arousal', 'anal', 30, 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -168,7 +168,7 @@ if $ARGS[0] = 'whore2':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/d.jpg"></center>'
 				'You suckle at the tip of one boys cock, while the other gets ready to enter your ass. You wiggle your hips in anticipation.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				spafinloc = 3
 				gs 'arousal', 'bj', 30, 'sub', 'group'
 				gs 'arousal', 'anal', 30, 'sub', 'group'
@@ -366,7 +366,7 @@ if $ARGS[0] = 'whore3':
 				'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/shulginhome/smroom/event/dog12.mp4"></video></center>'
 				'You give it a wiggle, and he says smiling: "Ha, now that''s a good girl."' 
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				gs 'arousal', 'anal', 30, 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -427,7 +427,7 @@ if $ARGS[0] = 'whore4':
 				'<center><video autoplay loop src="images/shared/sex/group/threesomepm8.mp4"></video></center>'
 				'You let out another playful bleat as you begin to get filled.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				spafinloc = 3
 				gs 'arousal', 'anal', 30, 'group', 'sub'
 				gs 'arousal', 'bj', 30, 'group', 'sub'
@@ -565,7 +565,7 @@ if $ARGS[0] = 'whore5':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/f.jpg"></center>'
 				'You continue to languidly suck on the two remaining men, while the third man prepares to enter you from behind.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				spafinloc = 3
 				gs 'arousal', 'bj', 30, 'sub', 'gangbang'
 				gs 'arousal', 'anal', 30, 'sub', 'gangbang'
@@ -733,7 +733,7 @@ if $ARGS[0] = 'whore6':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/analn.jpg"></center>'
 				'"Please be gentle", you whisper as he prepares to enter you.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				gs 'arousal', 'anal', 30, 'sub'
 				gs 'stat'
 				act 'Call a taxi': gt 'gdksport', 'cab_home'
@@ -802,7 +802,7 @@ if $ARGS[0] = 'whore7':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/dn.jpg"></center>'
 				'You continue sucking away at the first guy, as the other prepares to enter your backdoor.'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				spafinloc = 3
 				gs 'cum_manage'
 				gs 'arousal', 'bj', 30, 'sub', 'group'
@@ -965,7 +965,7 @@ if $ARGS[0] = 'whore8':
 				'Two of the men move to get service from your mouth, while the third prepares to penetrate you.'
 				'"That''s one fine ass booty you got there, white girl", he says'
 				gs 'dinsex', 'boy_puts_condom'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				gs 'arousal', 'bj', 30, 'sub', 'gangbang'
 				gs 'arousal', 'anal', 30, 'sub', 'gangbang'
 				gs 'stat'

+ 2 - 0
locations/AnalPR.qsrc

@@ -10,6 +10,7 @@ if $ARGS[0] = '1':
 	prosti = 0
 	money += ProsMoney*100
 	gs'stat'
+	gs 'arousal', 'auto_lube', 'anal'
 
 	if pcs_ass < dick:
 		$analsex = 'Your anus stretches painfully while he fills your ass with his shaft, and you wince and beg him to take it easy for a little while. Fortunately, he listens. Once he feels he gave you enough time to adapt, he begins to move his hips. Slowly at first, but his thrusts accelerate more and more as he gets closer to his orgasm.'
@@ -47,6 +48,7 @@ if $ARGS[0] = '2':
 	*clr & cla
 	prosti = 0
 	gs'stat'
+	gs 'arousal', 'auto_lube', 'anal'
 
 	if pcs_ass < dick:
 		$analsex = 'You feel a sharp pain and wince when the man pushes the tip of his <<dick>> centimeter member past your sphincter, and continues to work most of his length inside you. Fortunately, he listens when you beg him to go slow.<br>The guy holds still for a moment so your ass can get used to how far it''s being stretched out. After a little while you don''t think it''s going to get any better, and you tell the man he can start to fuck you with a forced, fake smile on your face.<br>He''s still careful at first, but soon forgets about your suffering and accelerates more and more. The man groans loudly while he hammers his cock inside your ass, ignoring your crying and mewling underneath him.'

+ 7 - 1
locations/BDsex.qsrc

@@ -214,6 +214,7 @@ if $ARGS[0] = 'sex3':
 end
 
 if $ARGS[0] = 'anal':
+	gs 'arousal', 'auto_lube', 'anal'
 	gs 'arousal', 'anal', 10, 'sub'
 	gs 'stat'
 	gs 'bdsex', 'an'
@@ -244,6 +245,7 @@ end
 
 
 if $ARGS[0] = 'anal3':
+	gs 'arousal', 'auto_lube', 'anal'
 	gs 'arousal', 'anal', 10, 'sub'
 	gs 'stat'
 	gs 'bdsex', 'an'
@@ -803,7 +805,11 @@ if $ARGS[0] = 'an':
 	gs 'dinsex','boy_wants_anal'
 	'<<$boydesc>> lays you on your stomach on the bed, spreading your ass apart as he begins to massage and open your anus with his fingers, first one, then two.'
 	gs 'arousal', 'anal_finger', 5, 'sub'
-	if pcs_ass < 10:'You groan in pain as his third finger invades your ass.' else 'You feel your asshole stretch to accommodate his third finger.'
+	if pcs_ass < 10:
+		'You groan in pain as his third finger invades your ass.'
+	else
+		'You feel your asshole stretch to accommodate his third finger.'
+	end
 	'<<$boydesc>> abruptly pulls his fingers out of your ass and you feel his hard cock rest against your hole.'
 
 	if pcs_ass + lubonus < dick:'You scream and bite your lip at the sharp pain when the <<dick>> member centimeter enters your ass.'

+ 2 - 0
locations/BelSex.qsrc

@@ -341,6 +341,7 @@ if $ARGS[0] = 'anal2':
 	anal_temp += 1
 	picrand = rand(30,34)
 	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal<<picrand>>.mp4"></video></center>'
+	gs 'arousal', 'auto_lube', 'anal'
 	'<<$boydesc>> lies on the bed, as you climb on top of him. <<$boydesc>> grabs hold of his cock, guiding his cock inside your tight anus.'
 	'You gasp as you start moving back and forth, controlling the rhythm as you ride him. First, slowly, as you adjust yourself. Soon enough you''re speeding up: fast, deep, and hard. You feel a sharp pain that quickly turns into a pleasant ache. You keep riding him at the same pace as he begins panting more and more.'
 
@@ -364,6 +365,7 @@ if $ARGS[0] = 'analdoggy':
 	picrand = rand(0,12)
 	'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal<<picrand>>.mp4"></video></center>'
 	'<<$boydesc>> pulls his cock out of your pussy and begins to slowly rub against your asshole. "Don''t worry, <<$pcs_nickname>>. I''ll be gentle," he says grinning as he has you on all fours, wide spread.'
+	gs 'arousal', 'auto_lube', 'anal'
 	'"Enough foreplay. Your ass is ready me!" he shouts as <<$boydesc>> starts pounding himself balls deep into you immediately. You bury your face into a pillow as he pounds your asshole roughly. The pain is unbearable and you flop with your legs trying to get away, but it only encourages <<$boydesc>> on as he keep pummeling your anus.'
 
 	gs 'arousal', 'anal', 15, 'sub', 'prostitution'

+ 2 - 12
locations/Gnpc2.qsrc

@@ -723,9 +723,6 @@ $din_gboy_go_to_disco = {
 													act 'Substitute ass (<<will_cost>> Willpower)':
 														cls
 														gs 'willpower', 'pay', 'self'
-														gs 'arousal', 'anal', 15
-														spafinloc = 3
-														gs 'cum_manage'
 														anala += 1
 														gs 'boyStat', $nameBoyfrend[numnpc]
 														if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
@@ -736,7 +733,7 @@ $din_gboy_go_to_disco = {
 														gs 'stat'
 														'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal<<rand(0,12)>>.mp4"></video></center>'
 														gs 'dinsex', 'boy_puts_condom'
-														gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+														gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 														'Finally the guy finishes and you feel something warm fill your ass.'
 
 														act 'Further':
@@ -909,9 +906,6 @@ $din_gboy_tits = {
 						act 'Substitute ass (<<will_cost>> Willpower)':
 							cls
 							gs 'willpower', 'pay', 'self'
-							gs 'arousal', 'anal', 15
-							spafinloc = 3
-							gs 'cum_manage'
 							anala += 1
 							gs 'boyStat', $nameBoyfrend[numnpc]
 							if gnpcSex[numnpc] = 0:gnpcSex[numnpc] = 1 & guy += 1
@@ -922,7 +916,7 @@ $din_gboy_tits = {
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/shared/sex/anal/doggy/anal31.jpg"></center>'
 							gs 'dinsex', 'boy_puts_condom'
-							gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+							gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 							'Finally he reaches his peak and you feel something warm filling your ass.'
 
 							act 'Leave.':gt 'pavResidential'
@@ -992,10 +986,6 @@ $din_gboy_tits = {
 						act 'Substitute ass (<<will_cost>> Willpower)':
 							cls
 							gs 'willpower', 'pay', 'self'
-							gs 'arousal', 'anal', 15
-							spafinloc = 3
-							gs 'cum_manage'
-							anala += 1
 							gs 'boyStat', $nameBoyfrend[numnpc]
 							if gnpcSex[numnpc] = 0: gnpcSex[numnpc] = 1 & guy += 1
 

+ 1 - 1
locations/Nord.qsrc

@@ -52,7 +52,7 @@ if $ARGS[0] = '':
 
 	if car > 0 and cardrive = 3 or (cardrive >= 6 and cardrive <= 9):'In the parking stands your <a href="exec:GS ''carF'', ''start''"><<$car>></a>.'
 
-	'The towns <a href="exec:hour += 1 & gt ''park'', ''start''">central park</a> is an hours walk from here.'
+	'The towns <a href="exec:minut += 60 & gt ''park'', ''start''">central park</a> is an hours walk from here.'
 
 	if hour > 7 and hour < 23:
 		'You can see the <a href="exec:$locM = ''Nord'' & minut += 1 & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'

+ 2 - 1
locations/Palatka.qsrc

@@ -23,7 +23,8 @@ if $ARGS[0] = 'start':
 	act 'Leave':palMir = 0 & gt 'Military', 'start'
 
 	act 'Sleep':
-		hour += 8
+		minut += 480
+		gs 'stat'
 		pcs_sleep = 100
 		gt 'palatka', 'start'
 	end

+ 1 - 0
locations/Vnlake2.qsrc

@@ -38,6 +38,7 @@ act 'Touch member':
 			cls
 			minut -= 20
 			'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/vnlake2/vnlake4.jpg"></center>'
+			gs 'arousal', 'auto_lube', 'anal'
 			'You move forwards and sit on the cock that was in your mouth, hands on your buttocks you present your ass to the other, encouraged he accepts. They fuck you in both holes, while you moan loudly.'
 			'This continues for what feels like forever as you are lost in bliss, finally the member in your ass is removed, you are spent and happy to finish now.'
 			'"Sit your ass here" says the man on the bottom.'

+ 2 - 1
locations/Voltrenersex.qsrc

@@ -530,9 +530,10 @@ if $ARGS[0] = 'discoSex':
 						'As you bend over you pull up your skirt showing him your bare ass. Almost at once he grabs your hip with one hand, apparently no longer wanting to just watch. With his other hand he guides his dick, he rubs the head of it against your wet pussy. Then trails it up to your asshole, leaving a trail of your wetness from your pussy to your ass, then he slides it back down and rubs his head against your pussy again.'
 						'Getting the head of his dick even more soaked in your pussy juices, once more he slides it back up and starts rubbing it against your asshole. This time he doesn''t slide it back down, instead he pushes the head of his dick into your ass. You wince and cry out slightly in pain, as you feel the head of his dick force itself into your ass. He rubs your back with one hand, caressing you. "Take a breath and relax it will feel better."'
 						act 'Fuck your ass':
-							cls
+							*clr & cla
 							'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voitrensexdisco5.mp4"></video></center>'
 							gs 'dinSex','boy_wants_anal','lubri'
+							gs 'arousal', 'auto_lube', 'anal'
 							'You do your best to do as he says, taking a deep breath and trying to relax, but it is hard to relax when you have a <<dick>>cm <<$dick_girth>> cock in your ass. He begins slowly and gently fucking your ass, with each stroke he does just a tiny bit deeper. Bitting your lower lip in pain as he slowly fucks your ass.'
 							'But he was right in time it hurts less and even starts to feel kinda good, a bit of a mixture of pleasure and pain. You feel yourself starting to moan. Taking this as a sign you are ready he starts to pump in and out of your ass faster, slowly but steadily picking up the pace, until he is pounding your balls deep in your ass.'
 							'You moan in a groan as he fucks your ass, you can''t decided which sensation is stronger, the pain or the pleasure.'

+ 1 - 0
locations/alex.qsrc

@@ -38,6 +38,7 @@ act 'Get on your knees and take it in your mouth':
 		'Suddenly you feel his cock exiting your vagina. Not wanting him to stop, you push your hips against him to try and keep his dick inside you.'
 		'But instead of entering your wet pussy, his cock slides into your anus.'
 		gs 'arousal', 'anal_finger', 10, 'sub'
+		anal_slip += 4
 		gs 'arousal', 'anal', 10, 'sub'
 		minut -= 10
 		gs 'stat'

+ 5 - 1
locations/anushka.qsrc

@@ -244,7 +244,11 @@ if $ARGS[0] = 'Her turn':
 				*clr & cla
 				'<center><b><font color="maroon">Detention</font></b></center>'
 				'<center><img src="images/locations/pavlovsk/school/detention/sex/detcanal.jpg"></center>'
-				'She gets up and has you lay down in her place, straddling your face almost as soon as you''re on your back. After the enthusiasm with which she treated you, you have no reservations about giving her pussy a thorough licking as well and you go to town immediately. Meanwhile, she lifts up your legs and spreads them apart, having Valentin kneel down between your legs. You feel him rubbing the tip of his dick against your asshole for a moment before pushing the tip of his <<dick>>cm <<$dick_girth>> cock past your anus into your ass.'
+				'She gets up and has you lay down in her place, straddling your face almost as soon as you''re on your back. After the enthusiasm with which she treated you, you have no reservations about giving her pussy a thorough licking as well and you go to town immediately. Meanwhile, she lifts up your legs and spreads them apart, having Valentin kneel down between your legs.'
+				*nl
+				gs 'arousal', 'auto_lube', 'anal'
+				*nl
+				'You feel him rubbing the tip of his dick against your asshole for a moment before pushing the tip of his <<dick>>cm <<$dick_girth>> cock past your anus into your ass.'
 				*nl
 				'Not knowing how much experience you might have, he starts off slow and gentle for a moment, allowing you to get used to it. As soon as he feels you relax a bit though, he starts hammering your ass just as hard and fast as he was pounding Anushka''s. She grinds her twat against your face as he claims your ass, each of them taking turns playing with your nipples, adding another tune to the orchestra of pain and pleasure that is filling your mind. You have completely lost all sense of time by now, but you don''t really care.'
 				gs 'arousal', 'anal', 15, 'group'

+ 2 - 2
locations/anushkaev1.qsrc

@@ -472,7 +472,7 @@ if $ARGS[0] = 'rad3some':
 					'You roll over on your back and spread your legs. He gives your butt a slap as he says, "Yeah, now that is fine looking little ass." Anushka gets the cue and grabs a bottle of lube from her nightstand. Radomir growls as he sees it but grabs the bottle from her. "Fuck, you girls are obsessed with lube. If it was up to you, you would use so much you couldn''t feel anything." He complains as he grudgingly squirts just a little onto his finger tip and rubs it briefly against your asshole. There''s barely any real lubrication beyond your own pussy juices on his dick.'
 					*nl
 					'He tosses the bottle aside and lines his dick up with your asshole, until you feel the head of his cock pressing against it. The pressure builds up until the head of his cock painfully pops into your asshole, making you cry out a little. Nope, Radomir is wrong. This is not enough lube. Once inside though, he keeps shoving his <<dick>>cm <<$dick_girth>> dick deeper into your ass until he finally works it balls deep, then starts hammering away at your ass painfully. Anushka starts licking your pussy, which helps a bit, letting her spit run down from your pussy to your ass as further lubrication'
-					gs 'arousal', 'anal', 3, 'group', 'lesbian'
+					gs 'arousal', 'anal', 3, 'group', 'lesbian', 'lube'
 					gs 'arousal', 'cuni', -3, 'group', 'lesbian'
 					gs 'stat'
 					act 'It hurts not so rough':
@@ -866,7 +866,7 @@ if $ARGS[0] = 'val3some':
 													'You nod at the request to be fucked in the ass. "Sure, you can fuck my ass." You tell him. With that Anushka rolls off the top of you, as Valentin moves up behind you. He grabs you by the hips and pulls you up into a doggy position. As he does Anushka moves around in front of you and lays on her back with her legs spread. She places her hand on the back of your head and pulls your face to her crotch. As you lower your face to her crotch, you feel Valentin cock pressing against you ass, along with a squirt of the lube. He rubs the tip of his dick against your asshole, while you start to lick Anushka sopping wet pussy.'
 													*nl
 													'You groan a bit as Valentin <<dick>>cm <<$dick_girth>> cock pops into your ass. He pauses a moment to let you adjust and then he slowly starts fucking your ass, as you moan more he starts picking up speed and fucking you a bit harder and faster. The louder you moan the harder and rougher he gets, he seems to be really getting into it making you think he is close when he says. "Fuck I''m about to cum.".'
-													gs 'arousal', 'cuni_give', 5, 'group', 'lesbian'
+													gs 'arousal', 'cuni_give', 5, 'group', 'lesbian', 'lube'
 													gs 'arousal', 'anal', -5, 'group', 'lesbian'
 													gs 'stat'
 													act '100 percent chance of cum showers':

+ 22 - 6
locations/arousal.qsrc

@@ -823,25 +823,41 @@ if $ARGS[0] = 'checks':
 	end
 end
 
+!!The auto lube application
+!!to use enter gs 'arousal', 'auto_lube', 'anal' or 'vag'
+!!add 'custom' to display a custom or no text by setting $lube_txt, if $lube_txt is '' no text will be displayed
 if $ARGS[0] = 'auto_lube':
-	if $ARGS[1] = 'anal':
+	if $ARGS[1] = 'anal' and auto_anal_lube = 1:
 		if lubri > 0:
+			if $ARGS[2] ! 'custom': 
+				'You rub some lube in and around you anus.'
+			elseif $lube_txt ! '':
+				$lube_txt
+			end
+			gs 'arousal', 'anal_finger', 1
 			anal_slip = 8
 			ar_anal_lube = 1
 			lubri -= 1
-		else
-			'You do not have any lube left so cannot use it during this sex act'
+		elseif $ARGS[2] ! 'custom' or ($ARGS[2] = 'custom' and $lube_txt ! ''):
+			'You do not have any lube left so cannot use it during this sex act.'
 		end
 	end
-	if $ARGS[1] = 'vag':
+	if $ARGS[1] = 'vag' and auto_vag_lube = 1:
 		if lubri > 0:
+			if $ARGS[2] ! 'custom': 
+				'You rub some lube in and around your vagina.'
+			elseif $lube_txt ! '':
+				$lube_txt
+			end
+			gs 'arousal', 'vaginal_finger', 1
 			vagi_slip = 8
 			ar_vag_lube = 1
 			lubri -= 1
-		else
-			'You do not have any lube left so cannot use it during this sex act'
+		elseif $ARGS[2] ! 'custom' or ($ARGS[2] = 'custom' and $lube_txt ! ''):
+			'You do not have any lube left so cannot use it during this sex act.'
 		end
 	end
+	killvar '$lube_txt'
 end
 
 --- arousal ---------------------------------

+ 2 - 3
locations/artemEv.qsrc

@@ -484,7 +484,6 @@ end
 if $ARGS[0] = 'artem_bj':
 	*clr & cla
 	if artdate = 5: artdate = 6
-	artembj + 1
 	artdate += 1
 	npc_rel['A2'] += 1
 	gs 'stat'
@@ -850,7 +849,7 @@ if $ARGS[0] = 'anal':
 		'You nod and look back over your shoulder at him. "Yes, it feels great, just go slow and easy ok?"'
 	end
 	'He smiles to you. "I will, I promise." Then he slowly pushes his <<dick>>cm <<$dick_girth>> cock a little further into your ass, he takes slow shallow strokes letting you get used to him.'
-	gs 'arousal', 'anal', 5
+	gs 'arousal', 'anal', 5, 'lube'
 	gs 'stat'
 	act 'Anal bliss':
 		*clr & cla
@@ -977,7 +976,7 @@ if $ARGS[0] = 'slut_anal':
 		'Once you are on fours he grabs some lotion and rubs it on your asshole, then rubs some all along his dick. He scoots up behind you and you feel the tip of his dick pressing against your anus, the pressure keeps building up, in his haste it takes several tries as he keeps letting it slip and miss, until the head of his dick suddenly pops into your ass. You hiss in pain as he moans in pleasure. "<<$pcs_nickname>> your ass is tighter than I was expecting."'
 		'You nod and look back over your shoulder at him. "Yes, just go slow and easy ok?"'
 		'He snorts. "Like you don''t get your ass pounded every day, everyone know sluts love it or they wouldn''t do it." Then he starts fucking your ass with hard, fast strokes, he grabs ahold of your hips so you can''t pull away.'
-		gs 'arousal', 'anal', 5, 'sub'
+		gs 'arousal', 'anal', 5, 'sub', 'lube'
 		gs 'stat'
 		act 'Get butt fucked':
 			*clr & cla

+ 2 - 2
locations/artemdate.qsrc

@@ -213,7 +213,7 @@ if $ARGS[0] = 'stand_up':
 				gs 'willpower', 'pay', 'resist'
 				*clr & cla
 				npc_rel['A2'] += 1
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/walkgop_udar2.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/walkgop_udar2.jpg"></center>'
 				'Wait, what!?'
 				'You answer: "No way, you perverts! Just leave us alone!"'
 				'The Gopnik walks back over to Artem and kicks him in the face. A few seconds later, one of his friends also kicks Artem in the back, soon they all join in kicking him. You can''t take it anymore and quickly throw yourself on top of Artem, so they can''t kick him any more.'
@@ -242,7 +242,7 @@ if $ARGS[0] = 'stand_up':
 				*clr & cla
 				inhib_exp += rand(0,1)
 				gs 'fame', 'pav', 'sex', 3
-				mood - 20
+				pcs_mood -= 20
 				minut += 5
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/strip2.jpg"></center>'
 				if hotcat <= 4:

+ 11 - 9
locations/artemhome.qsrc

@@ -119,12 +119,13 @@ if $ARGS[0] = 'home':
 					if artlie = 2 or artembrokenheart = 1 or artemblok = 1:
 						'When she hears your name her demeanor changes swiftly. Frowning she says: "Oh, it''s you. I don''t know what you did to my sweet Artem but he says he never wants to see you again, so please leave." With that she closes the door in your face.'
 						act 'Leave': gt'pod_ezd','etaj_1'
+					else
+						'She keeps up her smile. "Is he going to tutor you dear?" Obviously expecting the answer to be yes.'
+						'You smile a bit. "Something like that, is he here?"'
+						'Her face tightens ever so slightly. "Yes he is in his room." Then she turns to face down the hall. "Artem dear, <<$pcs_nickname>> from your school is here." Before turning back to you. "Go on back he is in his room."'
+						act 'Leave': gt'pod_ezd','etaj_1'
+						act 'Enter': ArtemLoc = 2 & gt 'artemhome','hallway'
 					end
-					'She keeps up her smile. "Is he going to tutor you dear?" Obviously expecting the answer to be yes.'
-					'You smile a bit. "Something like that, is he here?"'
-					'Her face tightens ever so slightly. "Yes he is in his room." Then she turns to face down the hall. "Artem dear, <<$pcs_nickname>> from your school is here." Before turning back to you. "Go on back he is in his room."'
-					act 'Leave': gt'pod_ezd','etaj_1'
-					act 'Enter': ArtemLoc = 2 & gt 'artemhome','hallway'
 				else
 					if artlie = 2 or artembrokenheart = 1 or artemblok = 1:
 						'"Who should I tell him is here?"'
@@ -606,7 +607,7 @@ if $ARGS[0] = 'livingroom':
 	elseif hour > 22:
 		gt 'artemhome', 'timecheck'
 	else
-		if ArtemLoc = 5 and ArtemParentsLoc = 5 and artemmeetdad = 0 and hour < 22:
+		if ArtemLoc = 5 and ArtemParentsLoc = 5 and metArtemDad = 0 and hour < 22:
 			metArtemDad = 1
 			menu_off = 1
 			minut += 10
@@ -725,6 +726,7 @@ if $ARGS[0] = 'livingroom':
 						end
 					end
 				end
+				act 'Leave':gt 'artemhome','hallway'
 			else
 				'Artem''s dad and mom are here watching tv. You could disturb them and talk to them, maybe it would be better if you snuck back out before they see you.'
 				act 'Sneak out':
@@ -854,7 +856,7 @@ if $ARGS[0] = 'livingroom':
 			end
 		else
 			'Nobody''s here right now.'
-			!act 'Leave':gt 'artemhome','hallway'
+			act 'Leave':gt 'artemhome','hallway'
 		end
 	end
 end
@@ -1227,7 +1229,7 @@ if $ARGS[0] = 'chat':
 		'Artem looks away from you, with a blank stare in his eyes. He mutters: "You know... I watched that video you wanted me to delete from Dimka''s computer. I can''t believe it... I was willing to do anything for you. Anything!"'
 		'He continues: "Ever since I''ve seen that video... Now I can''t even look at you, how could you?" He looks away from you in disgust. "Please leave, I never want to see you again."'
 		'You don''t know what to say, you just nod your head and then get up and walk out.'
-		act 'Leave his apartment':gt 'artemhome','leave'
+		act 'Leave his apartment': gt'pod_ezd','etaj_1'
 	elseif artlie = -1 and artdimhelp ! daystart:
 		artdim = 1
 		DimaRudeBlock = 1
@@ -1381,7 +1383,7 @@ if $ARGS[0] = 'chat':
 				gs 'arousal', 'kiss', 5
 				gs 'stat'
 				act 'Give him a handjob': gt 'artemEv', 'hj'
-				act 'Give him a blowjob': gt 'artemEv', 'bj'
+				act 'Give him a blowjob': gt 'artemEv', 'artem_bj'
 				gs 'willpower', 'bj', 'resist', 'medium'
 				if will_cost <= pcs_willpwr:
 					act 'Pull away and stop (<<will_cost>> Willpower)':

+ 2 - 2
locations/arturdin.qsrc

@@ -171,7 +171,7 @@ if $ARGS[0] = 'anal':
 	gs 'arousal', 'anal', 5
 	gs 'stat'
 	
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	act 'Continue': gt 'arturdin', iif(rand(0, 1) = 0, 'bed', 'bedmiss')
 end
 
@@ -185,7 +185,7 @@ if $ARGS[0] = 'anal_cum':
 	gs 'arousal', 'anal', 5
 	gs 'stat'
 	
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	act 'Continue':
 		cls

+ 1 - 1
locations/avb.qsrc

@@ -26,7 +26,7 @@ elseif car >= 6 and car < 11:
 		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(80000, 120000)
 		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 90000)
 	end
-elseif car >= 11 and car <= 12:
+elseif car >= 11 and car <= 13:
 	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)
 
 	if wrek = 0:

+ 130 - 88
locations/beg1.qsrc

@@ -75,7 +75,12 @@ if $ARGS[0] = 'br':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -92,33 +97,30 @@ if $ARGS[0] = 'br':
 	'Go! - You''re away!'
 	wait 725
 	
-	if begresult <= 18:  
+	if begresult < 10:  
 		'Sadly, you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
-	elseif begresult <= 23:
+	elseif begresult < 15:
 		gs 'fame', 'city', 'running', 1
 		'You performed well for an amateur but still only came in last (8th place).'
-	elseif begresult < 19:
-		gs 'fame', 'city', 'running', 1
-		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 20:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 21:
+	elseif begresult < 25:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 22:
+	elseif begresult < 30:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 23:
+	elseif begresult < 35:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 24:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 3
 		bronzebeg += 1 & money += 100 & 'You fought hard and managed to take 3rd place, earning a prize: You receive a bronze bade and a prize of 100 <b>₽</b>'
-	elseif begresult < 25:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 3
 		silverbeg += 1 & money += 500 & 'You fought hard and managed to take 2nd place, earning a prize: You receive a silver badge and a prize of 500 <b>₽</b>'
-	elseif begresult >= 25:
+	else
 		gs 'fame', 'city', 'running', 4
 		razradbeg = 1 & goldbeg += 1 & money += 1000 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 1,000 <b>₽</b> and are now part of your club''s junior squad.'
 	end
@@ -133,7 +135,12 @@ if $ARGS[0] = '3':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -150,30 +157,30 @@ if $ARGS[0] = '3':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 15:
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
-	elseif begresult < 26:
+	elseif begresult < 20:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 27:
+	elseif begresult < 25:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 28:
+	elseif begresult < 30:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 29:
+	elseif begresult < 35:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 30:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 31:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 3
 		bronzebeg += 1 & money += 300 & 'You fought hard and managed to take 3rd place, earning a prize: You receive a bronze badge and a prize of 300 <b>₽</b>'
-	elseif begresult < 32:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 3
 		silverbeg += 1 & money += 750 & 'You fought hard and managed to take 2nd place, earning a prize: You receive a silver badge and a prize of 750 <b>₽</b>'
-	elseif begresult >= 32:
+	else
 		gs 'fame', 'city', 'running', 4
 		razradbeg = 2 & goldbeg += 1 & money += 1500 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 1,500 <b>₽</b> and are now part of your club''s senior squad, representing it at the next city championship!'
 	end
@@ -187,7 +194,12 @@ if $ARGS[0] = '2':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -204,31 +216,31 @@ if $ARGS[0] = '2':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 20:
 		gs 'fame', 'city', 'running', 1
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
-	elseif begresult < 33:
+	elseif begresult < 25:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 34:
+	elseif begresult < 30:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 35:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 36:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 37:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 38:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 4
 		bronzebeg += 1 & money += 750 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 750 <b>₽</b>'
-	elseif begresult < 39:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 4
 		silverbeg += 1 & money += 1500 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 1,5000 <b>₽</b>'
-	elseif begresult >= 39:
+	else
 		gs 'fame', 'city', 'running', 5
 		razradbeg = 3 & goldbeg += 1 & money += 2500 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 2,500 <b>₽</b> and became the "Track Champion of the City of Saint Petersburg", which qualifies you for the next oblast championship!'
 	end
@@ -242,7 +254,12 @@ if $ARGS[0] = '1':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -260,31 +277,31 @@ if $ARGS[0] = '1':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 25:
 		gs 'fame', 'city', 'running', 1
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
-	elseif begresult < 40:
+	elseif begresult < 30:
 		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 41:
+	elseif begresult < 35:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 42:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 43:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 44:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 45:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 5
 		bronzebeg += 1 & money += 1500 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 1,5000 <b>₽</b>'
-	elseif begresult < 46:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 5
 		silverbeg += 1 & money += 2000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 2,000 <b>₽</b>'
-	elseif begresult >= 46:
+	else
 		gs 'fame', 'city', 'running', 6
 		razradbeg = 4 & goldbeg += 1 & money += 3000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 3,000 <b>₽</b> and became the "Track Champion of the Leningrad Oblast", not only putting you on the list of the 50 best track athletes in the Russian Federation but also qualifying you for the next district championship!'
 	end
@@ -298,7 +315,12 @@ if $ARGS[0] = 'kms':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -316,31 +338,31 @@ if $ARGS[0] = 'kms':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 30:
 		gs 'fame', 'city', 'running', 2
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
-	elseif begresult < 47:
+	elseif begresult < 35:
 		gs 'fame', 'city', 'running', 3
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 48:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 4
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 49:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 51:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 5
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 52:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 6
 		bronzebeg += 1 & money += 2000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 2,000 <b>₽</b>'
-	elseif begresult < 53:
+	elseif begresult < 65:
 		gs 'fame', 'city', 'running', 8
 		silverbeg += 1 & money += 3000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 3,000 <b>₽</b>'
-	elseif begresult >= 53:
+	else
 		gs 'fame', 'city', 'running', 10
 		razradbeg = 5 & goldbeg += 1 & money += 4000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 4,000 <b>₽</b> and became the "Track Champion of the Northwest District". You are now one of the 8 best track athletes in the Russian Federation and qualified for the next national championship!'
 	end
@@ -354,7 +376,12 @@ if $ARGS[0] = 'ross':
 	gs 'sweat', 'add', 30
 	pcs_stam -= 30
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -373,31 +400,31 @@ if $ARGS[0] = 'ross':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 35:
 		gs 'fame', 'city', 'running', 4
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
-	elseif begresult < 54:
+	elseif begresult < 40:
 		gs 'fame', 'city', 'running', 6
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 55:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 56:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 57:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 58:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 59:
+	elseif begresult < 65:
 		gs 'fame', 'city', 'running', 15
 		bronzebeg += 1 & money += 3000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 3,000 <b>₽</b>'
-	elseif begresult < 60:
+	elseif begresult < 70:
 		gs 'fame', 'city', 'running', 15
 		silverbeg += 1 & money += 4000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 4,000 <b>₽</b>'
-	elseif begresult >= 60:
+	else
 		gs 'fame', 'city', 'running', 20
 		razradbeg = 6 & goldbeg += 1 & money += 5000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 5,000 <b>₽</b> and became the "Track Champion of the Russian Federation". You are the single best track athlete in Russia - maybe you should try to qualify for the European championship?'
 	end
@@ -412,7 +439,12 @@ if $ARGS[0] = 'kval':
 	pcs_stam -= 30
 	razradbeg += 1
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -429,31 +461,31 @@ if $ARGS[0] = 'kval':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 18:
+	if begresult < 40:
 		gs 'fame', 'city', 'running', 4
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself.'
-	elseif begresult < 61:
+	elseif begresult < 45:
 		gs 'fame', 'city', 'running', 6
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 62:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 63:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 64:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 65:
 		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 66:
+	elseif begresult < 70:
 		gs 'fame', 'city', 'running', 15
 		razradbegK += 1 & bronzebeg += 1 & money += 4000 & 'You fought hard and managed to take 3rd place, earning a prize. You get a bronze badge and a prize of 4,000 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
-	elseif begresult < 67:
+	elseif begresult < 75:
 		gs 'fame', 'city', 'running', 15
 		razradbegK += 1 & silverbeg += 1 & money += 6000 & 'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 7,000 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
-	elseif begresult >= 67:
+	else
 		gs 'fame', 'city', 'running', 25
 		razradbegK += 1 & goldbeg += 1 & money += 8500 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 8,500 <b>₽</b> and are one step closer to qualifying for the European championship.'
 	end
@@ -468,7 +500,12 @@ if $ARGS[0] = 'evro':
 	pcs_stam -= 30
 	razradbeg += 1
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/race/begsor.jpg"></center>'
@@ -487,25 +524,25 @@ if $ARGS[0] = 'evro':
 	'Go! - You''re away!'
 	wait 725
 
-	if begresult <= 16:
+	if begresult < 45:
 		gs 'fame', 'city', 'running', 6
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
-	elseif begresult < 68:
+	elseif begresult < 50:
 		gs 'fame', 'city', 'running', 8
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 70:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 10
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 72:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 74:
+	elseif begresult < 65:
 		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 76:
+	elseif begresult < 70:
 		gs 'fame', 'city', 'running', 15
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 78:
+	elseif begresult < 75:
 		gs 'fame', 'city', 'running', 20
 		razradbegEB += 1
 		money += 5000
@@ -515,7 +552,7 @@ if $ARGS[0] = 'evro':
 		razradbegES += 1
 		money += 10000
 		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 10,000 <b>₽</b>'
-	elseif begresult >= 80: 
+	else 
 		gs 'fame', 'city', 'running', 30
 		razradbegEG += 1
 		money += 15000
@@ -533,7 +570,12 @@ if $ARGS[0] = 'Int':
 	pcs_stam -= 30
 	razradbeg += 1
 	
-	if salo > 40: begminus = ((salo - 35)/5)
+	begminus = 0
+	if bmi_calc > 25: 
+		begminus = ((bmi_calc - 25)*4)
+	elseif bmi_calc < 18:
+		begminus = ((25 - bmi_calc)*6)
+	end
 	begresult = pcs_run - begminus
 	
 	'Your discipline: The Women''s 400 Meter Dash.' 
@@ -551,35 +593,35 @@ if $ARGS[0] = 'Int':
 	'Go! - You''re away!'
 	wait 725
 	
-	if begresult < 18:
+	if begresult < 50:
 		gs 'fame', 'city', 'running', 10
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
-	elseif begresult < 82:
+	elseif begresult < 55:
 		gs 'fame', 'city', 'running', 15
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-	elseif begresult < 85:
+	elseif begresult < 60:
 		gs 'fame', 'city', 'running', 20
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-	elseif begresult < 88:
+	elseif begresult < 65:
 		gs 'fame', 'city', 'running', 20
 		'You fought hard, but only managed to take 6th place.'
-	elseif begresult < 91:
+	elseif begresult < 70:
 		gs 'fame', 'city', 'running', 20
 		'You fought hard, but only managed to take 5th place.'
-	elseif begresult < 94:
+	elseif begresult < 80:
 		gs 'fame', 'city', 'running', 25
 		'You fought hard, but only managed to take 4th place.'
-	elseif begresult < 97:
+	elseif begresult < 90:
 		gs 'fame', 'city', 'running', 30
 		razradbegIB += 1
 		money += 10000
 		'You fought hard and managed to take 3rd place, earning a prize. You get a bronze medal and a prize of 10,000 <b>₽</b>'
-	elseif begresult < 100:
+	elseif begresult < 95:
 		gs 'fame', 'city', 'running', 35
 		razradbegIS += 1
 		money += 20000
 		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 20,000 <b>₽</b>'
-	elseif begresult >= 100:
+	else
 		gs 'fame', 'city', 'running', 50
 		razradbegIG += 1
 		money += 50000

+ 33 - 0
locations/begin.qsrc

@@ -71,6 +71,39 @@ if $ARGS[0] = 'start':
 	act '<center><b>Change game settings</b></center>': settingmode = 1 & gs '$menu_setting'
 end
 
+if $ARGS[0] = 'warning':
+	'<center><b><font color = maroon>WARNING</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/system/gl3.jpg" ></center>'
+	*nl
+	'This game contains, but is not limited to the following:'
+	'Pornographic images;'
+	'Desriptions of sexual acts;'
+	'Rape;'
+	'Incest;'
+	'Violent assaults;'
+	'Backmail for sex;'
+	'Drug use;'
+	'Extreme character weight (both very skinny and massively obese);'
+	'Urination as sexual fetish;'
+	'Underage sex 15 - 17 years old (in the text, sexual images used only contain performers 18+ years old);'
+	'Theft;'
+	'Drug use;'
+	'Prostitution;'
+	'BDSM;'
+	'Kidnap;'
+	'Death;'
+	'Alcohol abuse.'
+	*nl
+	'If any of these things upset you or you are under the age of 18 you must not continue.'
+	*nl
+	'Although many of these things are illegal in various places around the world this is a work of fiction and there are no people actually harmed in the making of this game.'
+	'Exhausted and frustrated by the code for sure but no bruises above the neck or below the elbow.'
+	'This means that with the exception of rather vague laws in Russia playing this game is not breaking any laws relating to the acts depicted.'
+	'Your local laws might be different to those we have checked and if you are worried you should not continue without checking your legal position.'
+	
+	act 'Continue': gt 'begin','real_character'
+end
+	
 if $ARGS[0] = 'real_character':
 	cls
 	'<center><b><font color = maroon>CHARACTER SELECTION</font></b></center>'

+ 1 - 1
locations/belpicknick.qsrc

@@ -347,7 +347,7 @@ if $ARGS[0] = 'doggy':
 		
 		'You find yourself being on elbows and knees as you''re fully aware he is about to penetrate your ass. <<$boydesc>> leans the tip of his cock against your anus and pushes it into you. It is a little painful, but the desire to pleasure him outweighs it. <<$boydesc>> gradually accelerates his pace, you can feel his balls slap against your wet clit. After a while your anus relaxes and stretches making his cock slide in and out easily now.'
 		
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 		
 		gs 'arousal', 'anal', 5, 'sub'
 		gs 'stat'

+ 4 - 8
locations/bobka.qsrc

@@ -75,16 +75,12 @@ if ARGS[0] = 2:
 		cls
 		gs 'boyStat', 'A49'
 		gs 'dinSex', 'std_trigger'
-		sexpartkno = 1
-		spafinloc = 3
-		gs 'cum_manage'
+		gs 'dinsex', 'boy_puts_condom'
+		gs 'dinSex','boy_wants_anal','','lubri'
+		gs 'dinsex','analsex'
+
 		'<center><img <<$set_imgh>> src="images/characters/city/bobka/sex/anal.jpg"></center>'
-		
-		gs 'arousal', 'anal', 5, 'sub'
-		gs 'stat'
 	
-		gs 'dinsex', 'boy_puts_condom'
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
 		gs 'stat'
 		'You feel <<$boydesc>>''s sperm spread inside you when he finally stops thrusting. When he pulls out of you, some of his sperm slowly trickles out of your gaping butthole.'
 		'Bobka tosses you a syringe, and tells you to get lost.'

+ 1 - 0
locations/brothel.qsrc

@@ -248,6 +248,7 @@ if $ARGS[0] = 'abducted':
 		'His dick is not the biggest one, but it is quite thick.'
 		'Your pussy is a first victim of the phallus, and after short while he moves to your anus.'
 		'Another jolt of pain runs through your bottom, but this time you fade away for sure..'
+		anal_slip += 4
 		gs 'pain', 6, 'asshole', 'stretch'
 		guy += 4
 		temp = 4

+ 1 - 1
locations/brother.qsrc

@@ -851,7 +851,7 @@ if $ARGS[0] = 'fuckanal':
 	'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/kolka/sex/anal,<<rand(0,4)>>.mp4"></video></center>'
 	'You lie back on the sofa, pulling your knees up to your chest and expose your <<$pcdesc_anus>> asshole to your sibling. "I want you to fuck my ass, Kolka," you tell him. Your brother practically pounces you, not needing more encouragement from you.'
 
-	gs 'dinSex','boy_wants_anal','Kolka' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','Kolka', 'lubri' & gs 'dinsex','analsex'
 
 	gs 'brother', 'brotherSexEnd'
 end

+ 1 - 1
locations/cafe3.qsrc

@@ -242,7 +242,7 @@ if $ARGS[0] = '0':
 			cla
 			guy += 1
 
-			if lubri > 0:lubri = lubri - 1
+			gs 'arousal', 'auto_lube', 'anal'
 
 			picrand = rand(1, 10)
 			'<center><img <<$set_imgh>> src="images/shared/sex/anal/doggy/anal2<<picrand>>.jpg"></center>'

+ 3 - 3
locations/clothing.qsrc

@@ -223,9 +223,6 @@ if $ARGS[0] = 'view_clothing_list':
 
 		if $ARGS[2] = 'gm_cheap':
 			$ward_list_store = $ARGS[2]
-
-			if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and schoolS[6] = cloc and ($clothingworntype ! 'school' or clothingwornnumber ! 6):*P dyneval($clothing_list_line, $ARGS[1], 'school', 6)
-
 			i = 1
 			:loopcheap
 				if cheap[i] = 1 and cheapS[i] = cloc and ($clothingworntype ! 'cheap' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'cheap', i)
@@ -250,6 +247,9 @@ if $ARGS[0] = 'view_clothing_list':
 
 		if $ARGS[2] = 'gm_school':
 			$ward_list_store = $ARGS[2]
+
+			if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and schoolS[6] = cloc and ($clothingworntype ! 'school' or clothingwornnumber ! 6):*P dyneval($clothing_list_line, $ARGS[1], 'school', 6)
+
 			i = 1
 			:loopschool
 				if school[i] = 1 and schoolS[i] = cloc and ($clothingworntype ! 'school' or clothingwornnumber ! i):*P dyneval($clothing_list_line, $ARGS[1], 'school', i)

+ 13 - 18
locations/club.qsrc

@@ -1213,9 +1213,8 @@ if $ARGS[0] = 'work':
 	if clubr = 0:
 		'"OK <<$pcs_nickname>>, I want you to go around the city center and find some customers, bring them to the door and give the bouncer a nod so he knows they are yours. See you in an hour."'
 		act 'Look for customers':
-			cla
-			*clr
-			hour += 1
+			*clr & cla
+			minut += 60
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/down.jpg"></center>'
 			'You spend an hour searching for customers in the city center.'
 			act 'Return to Erik':
@@ -1243,31 +1242,28 @@ if $ARGS[0] = 'work':
 		'"OK <<$pcs_nickname>>, I want you to go around the club getting people to try and hopefully switch to these spirits. You can''t go wrong here, just smile and give out free drinks."'
 		'"No need to hold back with it, the suppliers are paying and if you''re curious and want to try it, don''t its horrible. I''ll see you back here in an hour."'
 		act 'Get to work':
-			cla
-			*clr
-			hour += 1
+			*clr & cla
+			minut += 60
+			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club6.jpg"></center>'
 			'You spend an hour giving away unpleasant shots.'
 			act 'Return to Erik':
-				cla
-				*clr
+				*clr & cla 
 				money += 200
+				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 				'You hand Erik the empty bottles, he gives you 200 <b>₽</b>.'
-				if hour < 1 or hour >= 18:
-					act 'Get another job from Erik':gt 'club', 'work'
-				end
+				if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'club', 'work'
 
-			act 'Go to dancefloor':gt 'club', 'inside'
+				act 'Go to dancefloor':gt 'club', 'inside'
 			end
 		end
 	elseif clubr = 2:
 		'"OK <<$pcs_nickname>>, we''re short a dancer, get in that cage there and dance. If you put on a good show you get a bonus."'
 		act 'Get in the cage':
 			if pcs_inhib < 60:inhib_exp += rand(1,2)
-			cla
-			*clr
-			hour += 1
+			*clr & cla
+			minut += 60
 			danc_exp += rand (1,3)
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club12.jpg"></center>'
 			if pcs_danc > rand (30, 100):
@@ -1279,9 +1275,8 @@ if $ARGS[0] = 'work':
 				'You try hard, but you are mostly ignored by the customers.'
 				'Erik thanks you for helping when he was short and pays you 200 <b>₽</b>, but doesn''t even mention your dancing.'
 			end
-			if hour < 1 or hour >= 18:
-				act 'Get another job from Erik':gt 'club', 'work'
-			end
+			gs 'stat'
+			if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'club', 'work'
 
 			act 'Go to dancefloor':gt 'club', 'inside'
 		end

+ 2 - 1
locations/dinSex.qsrc

@@ -307,7 +307,8 @@ if $ARGS[0] = 'boy_wants_anal':
 		if lubri = 0:
 			'You have no lube, <<$bwa_boy>> spits on his fingers and using saliva he massages your anus.'
 			gs 'arousal', 'anal_finger', 1,'lube' 
-		elseif lubri > 0:
+		else
+			lubri -= 1
 			if rand(0,2) = 0: 
 				'You take a tube of lubricant and hand it to <<$bwa_boy>>, he squeezes a little on his palm and rubs your anus.'
 			elseif rand(0,1) = 0:

+ 2 - 2
locations/din_pav.qsrc

@@ -405,8 +405,8 @@ $pavser9 = {
 								cumprecheck = 1
 								gs 'cum_manage'
                                 '<center><img <<$set_imgh>> src="images/locations/oldtown/vacanthouse/sex/07.jpg" ></center>'
-                                'Your consciousness enables and disables in the wild dance of passion...'
-                                'He vashel in you wildly roughly furiously, I strung you on your cock like a cherry on a skewer...'
+                                'Your consciousness fades in and out in the wild passionate dance...'
+                                'He thrusts in you wildly, roughly, furiously. You feel like you are being skewered by the force and depth of his cock...'
 								
 								gs 'arousal', 'vaginal', 10, 'sub'
 								gs 'stat'

+ 1 - 0
locations/dk.qsrc

@@ -261,6 +261,7 @@ if $ARGS[0] = 'holl':
 									'At some point, you feel a sticky, lubed-up finger probing your ass, adding to the sensations from your pussy. With every thrust of your and Alexei''s hips, he pushes his finger deeper into your ass and moves it around in there.' 
 									'Then, without warning, he removes his finger, pulls his dick out of your pussy and sticks pushes it into your prepared anus.'
 									gs 'arousal', 'anal_finger', 10, 'sub'
+									anal_slip += 4
 									gs 'arousal', 'anal', 10, 'sub'
 									minut -= 10
 									gs 'stat'

+ 1 - 1
locations/dorm.qsrc

@@ -376,7 +376,7 @@ if $ARGS[0] = 'afragangfuck':
 	$location_type = 'event'
 	reccoldorm = 0
 	afraflag = 0
-	hour += 2
+	minut += 120
 	'You knock on door and are greeted by a huge black guy. He grabs you by the arm and drags you into the room, in where you see five Africans. They surround you and immediately begin grabbing your breasts and ass.'
 	'They speak a lot in their native language but there are some words you''re able to pick up, cumdump, whore, white trash, bimbo slut.'
 	afrand = rand(1, afra)

+ 5 - 7
locations/down.qsrc

@@ -59,10 +59,9 @@ gs'street_event','down', 'extras'
 if nichWork = 2:act '<b>GO HOME</b> (Nicholas'' apartment)':gt 'nichApartment'
 
 if shantpopala > 0:
-	cla
-	*clr
+	*clr & cla
 	menu_off = 0
-	hour += 8
+	minut += 480
 	spafinloc = 14
 	gs 'cum_manage'
 	gs 'cum_manage'
@@ -91,11 +90,10 @@ if shantpopala > 0:
 	'They got up and came back at you, barely a minute later you wished your were still knocked out, as these jackasses had their ways with. You tried to resist, but the tape hindered you from moving. Not long after, everything faded to black and you lost you consciousness again.'
 	'You feel groggy as you wake up, but it feels like someone is grapping you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he shouts, then kicks you into the stomach and leaves. As you collapse on the ground holding your stomach in pain, you take a glimpse at the street and see the assholes driving away in their black jeep. The mainroad is about 200m away, you crawl most of the way there, but soon you can walk again and eventually you find your way back to one of the mainstreets.'
 
-	gs 'arousal', 'bj', 60, 'sub', 'gangbang','humiliation', 'rough'
-	gs 'arousal', 'vaginal', 60, 'sub', 'gangbang', 'humiliation', 'rough'
-	gs 'arousal', 'anal', 60, 'sub', 'gangbang', 'humiliation', 'rough'
+	gs 'arousal', 'bj', -60, 'sub', 'gangbang','humiliation', 'rough'
+	gs 'arousal', 'vaginal', -60, 'sub', 'gangbang', 'humiliation', 'rough'
+	gs 'arousal', 'anal', -60, 'sub', 'gangbang', 'humiliation', 'rough'
 	gs 'arousal', 'end'
-	minut -= 60
 	gs 'stat'
 
 	act 'Leave':gt $curloc

+ 4 - 9
locations/event.qsrc

@@ -3,8 +3,6 @@ if $ARGS[0] = 'klof 2':
 	cla
 	*clr
 	minut += 5
-	cla
-	*clr
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/jora/15 1.jpg"></center>'
 	'"Well baby, come and see us if you want more entertainment, and if you behave, you can earn some cash"'
@@ -217,6 +215,7 @@ if $ARGS[0] = 'dima4':
 	gs 'arousal', 'bj', 10, 'sub', 'group', 'deepthroat', 'rough'
 	gs 'arousal', 'vaginal_finger', 10, 'sub', 'group', 'rough'
 	gs 'arousal', 'anal_finger', 10, 'sub', 'group', 'rough'
+	anal_slip += 4
 	gs 'arousal', 'anal', 10, 'sub', 'group', 'rough'
 	minut -= 30
 	gs 'stat'
@@ -478,10 +477,8 @@ if $ARGS[0] = 'dima21':
 end
 
 if $ARGS[0] = 'dima30':
-	cla
-	clr
-	*clr
-	hour += 3
+	*clr & cla
+	minut += 180
 	dimaQW = 2
 	gs 'stat'
 	'I confess, I am a sinner, a writer from me worthless, and all my dark little thoughts went to the recent arrival of women. If there are interesting ideas/scenarios to continue - fling in a personal, zabubenyu'
@@ -490,9 +487,7 @@ if $ARGS[0] = 'dima30':
 end
 
 if $ARGS[0] = 'dima31':
-	cla
-	clr
-	*clr
+	*clr & cla
 	minut += 30
 	dimaQW = 2
 	gs 'stat'

+ 12 - 12
locations/events.qsrc

@@ -215,33 +215,33 @@ if $ARGS[0] = 'snkayf':
 	snkz = RAND(1,6)
 	gs 'underwear', 'remove'
 	if snkz = 1:
-		hour += 2
+		minut += 120
 		gt'gdk'
 	end
 
 	if snkz = 2:
-		hour += 2
+		minut += 120
 		gt 'gskver', 'start'
 	end
 
 	if snkz = 3:
-		hour += 2
+		minut += 120
 		gt'bedrPar'
 	end
 
 	if snkz = 4:
-		hour += 2
+		minut += 120
 		gt'gopskver'
 	end
 
 	if snkz = 5:
-		hour += 2
+		minut += 120
 		gt 'pavtrainhall', 'female'
 	end
 
 	if snkz = 6:
 		gs 'clothing', 'strip'
-		hour += 2
+		minut += 120
 		gt'Glake'
 	end
 end
@@ -328,32 +328,32 @@ if $ARGS[0] = 'snkayf1':
 	snkz = RAND(1,6)
 	gs 'underwear', 'remove'
 	if snkz = 1:
-		hour += 2
+		minut += 120
 		gt'park','start'
 	end
 
 	if snkz = 2:
-		hour += 2
+		minut += 120
 		gt'down'
 	end
 
 	if snkz = 3:
-		hour += 2
+		minut += 120
 		gt'nord'
 	end
 
 	if snkz = 4:
-		hour += 2
+		minut += 120
 		gt'street'
 	end
 
 	if snkz = 5:
-		hour += 2
+		minut += 120
 		gt'dachi'
 	end
 
 	if snkz = 6:
-		hour += 2
+		minut += 120
 		gt'lake','start'
 	end
 end

+ 5 - 4
locations/family_schedule.qsrc

@@ -7,7 +7,7 @@ sdadloc = 0
 anyaloc = 0
 kolloc = 0
 
----ANYA-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
+!!---ANYA---------------------------------------
 
 if week <= 5:
 	if hour = 6 and minut < 45:
@@ -36,13 +36,13 @@ if week <= 5:
 		anyaloc = 8
 	elseif hour < 18:
 		!!Personal activities: Relaxing in bedroom, working out at the community center, etc (this is also the time frame Roma comes over some times)
-		anyaloc = rand(9,10,11)
+		anyaloc = rand(9,11)
 	elseif hour = 18 and minut < 30:
 		!!Family dinner
 		anyaloc = 12
 	elseif hour < 22:
 		!!Goes out to hang out with friends/Roma (this could be random so sometimes she stays home to give Sveta more time to talk to her)
-		anyaloc = rand(13,14,15)
+		anyaloc = rand(13,15)
 	else
 		!!In her room
 		anyaloc = 15
@@ -68,7 +68,7 @@ else
 		anyaloc = 4
 	elseif hour < 16:
 		!!On nice days goes to the beach, sometimes goes to the city with friends, or stays at home watching tv or reading etc
-        anyaloc = rand(17,18,19)
+        anyaloc = rand(17,19)
 	elseif hour = 16 and minut < 15:
 		!!Walk to community center
 		anyaloc = 20
@@ -88,6 +88,7 @@ else
 		else
 			!!Goes to a party
 			anyaloc = 24
+		end
 	else
 		if week = 7:
 			!!in her room 

+ 2 - 2
locations/fbDormD.qsrc

@@ -200,7 +200,7 @@ $d_fbd_anal = {
 		ppanal += 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/fbdanal.jpg"></center>'
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 		tiprand = rand(1, 100)
 		
 		gs 'arousal', 'anal', 5
@@ -404,7 +404,7 @@ $d_fbd_threesome = {
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/fbdranal.jpg"></center>'
 				'You moan around his friend''s cock, while <<$boydesc>> keeps caressing your asshole and slowly pushes two fingers in. After a minute or so he decides you''re ready, and pulls his hand away.'
-				gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+				gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 				
 				gs 'arousal', 'bj', 5, 'group', 'sub'
 				gs 'arousal', 'anal_finger', 5, 'group', 'sub'

+ 0 - 12
locations/foto.qsrc

@@ -1998,7 +1998,6 @@ if $ARGS[0] = 'model':
 					modelfoto_fashion += 1
 					mdlng_exp += rand(5,8)
 					gs 'fame', 'city', 'modelling', rand(7,12)
-					gs 'fame', 'pav', 'modelling', rand(1,city_modelling)/10
 					fashionshoot = rand(1,2)
 					gs 'stat'
 					if fashionshoot = 1:
@@ -2026,7 +2025,6 @@ if $ARGS[0] = 'model':
 						modelpayfin = 325 + (modelpay) + (15*rand(0,5)) + (pcs_apprnc) + (city_modelling/2) + (pcs_mdlng/2 * 10)
 						modelfoto_bikini += 1
 						gs 'fame', 'city', 'modelling', rand(7,12)
-						gs 'fame', 'pav', 'modelling', rand(1,city_modelling)/10
 						mdlng_exp += rand(6,10)
 						if pcs_inhib < 50:inhib_exp += 1
 						bikinishoot = rand(1,5)
@@ -2064,7 +2062,6 @@ if $ARGS[0] = 'model':
 						modelfoto_lingerie += 1
 						mdlng_exp += rand(6,10)
 						gs 'fame', 'city', 'modelling', rand(7,13)
-						gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/10
 						inhib_exp += 2
 						shoot_type = rand(1,2)
 						gs 'stat'
@@ -2122,7 +2119,6 @@ if $ARGS[0] = 'nude_shoot':
 !!			modelfoto_nip += 1
 !!			mdlng_exp += rand(6,10)
 !!			city_modelling += rand(7,13)
-!!			pav_modelling += rand(1,city_modelling)/10
 !!			inhib_exp += 2
 !!			gs 'stat'
 !!			'<center><video autoplay loop src="images/locations/city/citycenter/photo/model5.mp4"></video></center>'
@@ -2152,7 +2148,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_ero_clo += 1
 				mdlng_exp += rand(5,10)
 				gs 'fame', 'city', 'modelling', rand(7,12)
-				gs 'fame', 'pav', 'modelling', rand(1,city_modelling)/10
 				inhib_exp += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/ero<<rand(2,4)>>.jpg"></center>'
@@ -2177,7 +2172,6 @@ if $ARGS[0] = 'nude_shoot':
 			modelfoto_nip += 1
 			mdlng_exp += rand(6,10)
 			gs 'fame', 'city', 'modelling', rand(7,13)
-			gs 'fame', 'pav', 'modelling', rand(1,city_modelling)/10
 			inhib_exp += rand(1,3)
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/seethru<<rand(1,6)>>.jpg"></center>'
@@ -2208,7 +2202,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_lingerie += 1
 				mdlng_exp += rand(8,10)
 				gs 'fame', 'city', 'modelling', rand(9,14)
-				gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/10
 				inhib_exp += 4
 				gs 'stat'
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie_trans<<rand(1,3)>>.mp4"></video></center>'
@@ -2242,7 +2235,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_topless += 1
 				mdlng_exp += rand(6,10)
 				gs 'fame', 'city', 'modelling', rand(8,14)
-				gs 'fame', 'pav', 'modelling', rand(1,city_modelling)/10
 				inhib_exp += 3
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/topless<<rand(1,22)>>.jpg"></center>'
@@ -2274,7 +2266,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_nude += 1
 				mdlng_exp += rand(9,10)
 				gs 'fame', 'city', 'modelling', rand(10,20)
-				gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/4
 				inhib_exp += 5
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(1,5)>>.jpg"></center>'
 				'Already naked, you step onto the set and begin the shoot immediately.'
@@ -2305,7 +2296,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_nude += 1
 				mdlng_exp += rand(9,10)
 				gs 'fame', 'city', 'modelling', rand(10,20)
-				gs 'fame', 'pav', 'modelling', rand(0,city_modelling)/4
 				inhib_exp += 5
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(6,26)>>.jpg"></center>'
 				'Already naked, you step onto the set and begin the shoot immediately.'
@@ -2340,7 +2330,6 @@ if $ARGS[0] = 'nude_shoot':
 				modelfoto_pussy += 1
 				mdlng_exp += rand(9,10)
 				gs 'fame', 'city', 'modelling', rand(10,20)
-				gs 'fame', 'pav', 'modelling', rand(10,15)
 				inhib_exp += 5
 				if pcs_pubes <= 20:
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(27,35)>>.jpg"></center>'
@@ -2379,7 +2368,6 @@ end
 !!				modelpayfin = 825 + (modelpay * 2) + (15*rand(0,7))
 !!				mdlng_exp += 10
 !!				city_modelling += rand(10,20)
-!!				pav_modelling += rand(0,city_modelling)/10
 !!				inhib_exp += 3
 !!				modelfoto_glamour += 1
 !!				modelfoto_nip += 1

+ 6 - 3
locations/gadriver.qsrc

@@ -52,7 +52,7 @@ if $ARGS[0] = 'start':
 					gs 'dinsex','vaginal_sex',20,'sub','gangbang'
 					gs 'dinsex','sexcum'
 				else
-					gs 'dinSex','boy_wants_anal','lubri'
+					gs 'dinSex','boy_wants_anal','','lubri'
 					gs 'dinsex','analsex',20,'sub','gangbang'
 				end
 				gs 'boyStat', 'A62'
@@ -62,7 +62,7 @@ if $ARGS[0] = 'start':
 					gs 'dinsex','vaginal_sex',20,'sub','gangbang'
 					gs 'dinsex','sexcum'
 				else
-					gs 'dinSex','boy_wants_anal','lubri'
+					gs 'dinSex','boy_wants_anal','','lubri'
 					gs 'dinsex','analsex',20,'sub','gangbang'
 				end
 				gs 'stat'
@@ -82,7 +82,9 @@ if $ARGS[0] = 'start':
 				*clr & cla
 				menu_off = 1
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex18.jpg"></center>'
-				'The boys lead you to Vasyan''s house, where they spend an hour fucking you in the ass...'
+				'The boys lead you to Vasyan''s house and start undressing, following their lead you strip off too, "We''re going to fuck your ass I hope you can enjoy it but I''m not going to be upset if you don''t."'
+				gs 'arousal', 'auto_lube', 'anal'
+				'They don''t say anything more before they spend the next hour fucking you in the ass...'
 				gs 'arousal', 'anal', 20, 'gangbang', 'sub'
 				gs 'arousal', 'anal', 20, 'gangbang', 'sub'
 				gs 'arousal', 'anal', 20, 'gangbang', 'sub'
@@ -288,6 +290,7 @@ if $ARGS[0] = 'gadbitch':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaguysriversex19.jpg"></center>'
 						'As soon as you get out of the river, you meet a grinning Kolyamba. He smiles wickedly and commands you to get down on your hands and knees so he can fuck you in the ass...'
+						gs 'arousal', 'auto_lube', 'anal'
 						gs 'boyStat', 'A61'
 						npc_sex[$boy] += 1
 						pose = 1

+ 5 - 5
locations/gadukino_event.qsrc

@@ -282,7 +282,7 @@ if $ARGS[0] = 'gadriver_gang':
 								if pcs_ass <= 5:'"Well, well what a tight hole you have here..." you hear a male voice. "Let me help you stretch it out."'
 								if pcs_ass <= 10:'You could only mumble in protest as your mouth was busy.'
 
-								gs 'dinSex','boy_wants_anal','lubri'
+								gs 'dinSex','boy_wants_anal','','lubri'
 								gs 'dinsex','analsex'
 								gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 								gs 'arousal', 'vaginal', 5, 'sub', 'gangbang'
@@ -298,7 +298,7 @@ if $ARGS[0] = 'gadriver_gang':
 									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog2.jpg"></center>'
 									'The next man, not wanting to be outdone by the man before, grabbed his cock, thrust it in your anus and started pounding you relentlessly.'
 
-									gs 'dinSex','boy_wants_anal','lubri'
+									gs 'dinSex','boy_wants_anal','','lubri'
 									gs 'dinsex','analsex'
 									gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 									gs 'arousal', 'anal', 5, 'sub', 'gangbang', 'rough'
@@ -438,7 +438,7 @@ if $ARGS[0] = 'gadriver_gang':
 																	'Then someone uses your ass for his enjoyment.'
 
 																	protect = rand(0,1)
-																	gs 'dinSex','boy_wants_anal','lubri'
+																	gs 'dinSex','boy_wants_anal','','lubri'
 																	gs 'dinsex','analsex'
 																	gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 																	gs 'arousal', 'anal', 5, 'sub', 'gangbang'
@@ -453,7 +453,7 @@ if $ARGS[0] = 'gadriver_gang':
 
 																		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog8.jpg"></center>'
 																		'Next up is a drunk man barely able to stand straight, his cock is pretty limp as he''s having difficult getting an erection. He doesn''t seem to mind too much as he enters your anus.'
-																		gs 'dinSex','boy_wants_anal','lubri'
+																		gs 'dinSex','boy_wants_anal','','lubri'
 																		gs 'dinsex','analsex'
 																		gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 																		gs 'arousal', 'anal', 5, 'sub', 'gangbang'
@@ -469,7 +469,7 @@ if $ARGS[0] = 'gadriver_gang':
 																			if huntersKnow = 0:'You squint a little to see who''s next in line while sucking someone''s cock, you see an unknown village man, penetrating your ass.'
 																			if huntersKnow = 1:'When another man starts penetrating your ass, you squint a little to see who it is, and to your horror there''s Andrei thrusting away. There''s no doubt that Igor and Sergei will find out...'
 
-																			gs 'dinSex','boy_wants_anal','lubri'
+																			gs 'dinSex','boy_wants_anal','','lubri'
 																			gs 'dinsex','analsex'
 																			'Andrei cums and whipspers "You better get prepared to serve me or I''ll tell the others everything..."'
 																			gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'

+ 2 - 4
locations/garfather.qsrc

@@ -351,11 +351,9 @@ if pcs_horny > 50 and npc_sex['A28'] ! 0:
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/father/sex/father.gar.1,<<rand(0,2)>>.jpg"></center>'
 					'Your stepfather grabs you and pulls you up from your knees, turning you to face the Gazelle. You plant your hands on the car, and arch your back to give him easier access to your ass and pussy. Once you''re in position, he begins caressing your pussy and then slams his dick in.'
 
-					gs 'arousal', 'vaginal', 10, 'sub', 'incest'
-					gs 'stat'
-
 					gs 'dinSex', 'wear_condom'
-					gs 'dinsex','vaginal_sex',10
+					gs 'dinsex','vaginal_sex',10, 'sub', 'incest'
+					gs 'stat'
 					act 'Continue':
 						cla
 						*clr

+ 1 - 1
locations/gopskver.qsrc

@@ -822,7 +822,7 @@ if $ARGS[0] = 'BjBeerVag':
 	else
 		'Dan runs his hand over your bald pussy, and chuckles with satisfaction: "Very nice, <<$pcs_nickname>>. You got it all nice and smooth for us, so we can see what we''re fucking next."'
 	end
-	if pirsG = 1:
+	if pirsG > 0:
 		pcs_horny += 10
 		'The guys are intrigued by your intimate piercing, and playfully rub and tug at it, making you blush and moan with excitement.'
 	end

+ 7 - 9
locations/gschool_events.qsrc

@@ -361,17 +361,15 @@ if $ARGS[0] = 'break_events':
 	elseif break_rand =< 5 and pav_slut > 100 and gruptipe ! 4:
 		cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/urok'+rand(0,9)+'.jpg"></center>'
-		if AlbFrend >= 1 and rand(0,1) = 0:
+		if AlbFrend >= 1 and SchoolGossip > 0 and rand(0,1) = 0:
 			AlbinaBlockHumiliation = 1
 			minut += 60
-			if SchoolGossip > 0:
-				'During the break, you are approached by some of the local Gopniks in your school, "I know why you look so glum <<$pcs_nickname>>, you miss our cocks! Ain''t that right, cocksucker? Don''t worry, you can come along with us. We''ll give you all the dick you want."'
-				*nl
-				'They put their hands around your arms and begin to guide you to the restrooms. Knowing you can''t take all of them on you follow along meekly, hoping for some miracle to get you out of this mess. Just when you arrive at the restrooms, Albina suddenly blocks the doorway: She''s come to your rescue! They try to shove her out of the way and pull you into the restroom, but she stands firmly in the middle of their doorway and doesn''t budge and inch, "Pull up your pants boys, and get out of here. <<$pcs_nickname>> is my friend. If I see you pestering her one more time, I''ll tell my father on you. You know who he is you don''t want to get on his bad side, trust me!"'
-				*nl
-				'The guys look at each other for a moment, and then decide to let you go. They curse loudly as they walk away, and you give Albina a weak smile in gratitude. She gives you an encouraging nod and continues on her way to her next class."'
-				gs 'gschool_events', 'leave_break_events'
-			end
+			'During the break, you are approached by some of the local Gopniks in your school, "I know why you look so glum <<$pcs_nickname>>, you miss our cocks! Ain''t that right, cocksucker? Don''t worry, you can come along with us. We''ll give you all the dick you want."'
+			*nl
+			'They put their hands around your arms and begin to guide you to the restrooms. Knowing you can''t take all of them on you follow along meekly, hoping for some miracle to get you out of this mess. Just when you arrive at the restrooms, Albina suddenly blocks the doorway: She''s come to your rescue! They try to shove her out of the way and pull you into the restroom, but she stands firmly in the middle of their doorway and doesn''t budge and inch, "Pull up your pants boys, and get out of here. <<$pcs_nickname>> is my friend. If I see you pestering her one more time, I''ll tell my father on you. You know who he is you don''t want to get on his bad side, trust me!"'
+			*nl
+			'The guys look at each other for a moment, and then decide to let you go. They curse loudly as they walk away, and you give Albina a weak smile in gratitude. She gives you an encouraging nod and continues on her way to her next class."'
+			gs 'gschool_events', 'leave_break_events'
 		else
 			'During the break, you are approached by some of local Gopniks in your school, "<<$pcs_firstname>>, I hear you''re an amazing cocksucker. I think you should show us. Come on, let''s go to a restroom and you can show us your skills."'
 			*nl

+ 18 - 18
locations/gschool_grounds.qsrc

@@ -511,26 +511,26 @@ end
 
 if $ARGS[0] = 'SchoolRun_result':
 	cla
-	if begresult <= 15:
+	if begresult < 10:
 		grupvalue[2] -= 2
 		'You barely manage to reach the finish line at all. There''s no point in checking where you finished, you already know you were last by quite a large margin.'
-	elseif begresult < 20:
+	elseif begresult < 15:
 		grupvalue[2] -= 1
 		'You struggle to keep up with the other girls, and finish in last place.'
-	elseif begresult < 25:
+	elseif begresult < 20:
 		'You run as fast as you can, but only manage to finish second to last.'
-	elseif begresult < 30:
+	elseif begresult < 25:
 		'You run as fast as you can, but only manage to take 6th place.'
-	elseif begresult < 35:
+	elseif begresult < 30:
 		grupvalue[2] += 1
 		'You run as fast as you can, but only manage to take 5th place.'
-	elseif begresult < 40:
+	elseif begresult < 35:
 		grupvalue[2] += 1
 		'You run as fast as you can, but only manage to take 4th place.'
-	elseif begresult < 50:
+	elseif begresult < 45:
 		grupvalue[2] += 2
 		'You run as fast as you can, and manage to take 3rd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you.'
-	elseif begresult < 60:
+	elseif begresult < 50:
 		grupvalue[2] += 3
 		'You run as fast as you can, and manage to take 2nd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you on your achievement.'			
 	else
@@ -540,7 +540,7 @@ if $ARGS[0] = 'SchoolRun_result':
 	end
 
 	run_exp += 1
-	fat -= 10
+	fat -= 2
 
 	if swinbeg = 3 and LocalRun = 0:
 		LocalRun = 1
@@ -613,26 +613,26 @@ end
 
 if $ARGS[0] = 'SchoolRun2_result':
 	cla
-	if begresult <= 15:
+	if begresult < 10:
 		grupvalue[2] -= 2
 		'You barely manage to reach the finish line at all. There''s no point in checking where you finished, you already know you were last by quite a large margin.'
-	elseif begresult < 20:
+	elseif begresult < 15:
 		grupvalue[2] -= 1
 		'You struggle to keep up with the other girls, and finish in last place.'
-	elseif begresult < 25:
+	elseif begresult < 20:
 		'You run as fast as you can, but only manage to finish second to last.'
-	elseif begresult < 30:
+	elseif begresult < 25:
 		'You run as fast as you can, but only manage to take 6th place.'
-	elseif begresult < 35:
+	elseif begresult < 30:
 		grupvalue[2] += 1
 		'You run as fast as you can, but only manage to take 5th place.'
-	elseif begresult < 40:
+	elseif begresult < 35:
 		grupvalue[2] += 1
 		'You run as fast as you can, but only manage to take 4th place.'
-	elseif begresult < 50:
+	elseif begresult < 40:
 		grupvalue[2] += 2
 		'You run as fast as you can, and manage to take 3rd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you.'
-	elseif begresult < 60:
+	elseif begresult < 50:
 		grupvalue[2] += 3
 		'You run as fast as you can, and manage to take 2nd place. Mr. Pavlovich, the P.E. teacher at your school, congratulates you on your achievement.'
 	else
@@ -642,7 +642,7 @@ if $ARGS[0] = 'SchoolRun2_result':
 	end
 
 	run_exp += 1
-	fat -= 10
+	fat -= 2
 
 	if swinbeggor = 3 and LocalRun = 1:
 		LocalRun = 2

+ 11 - 11
locations/gschool_lessons4.qsrc

@@ -1210,7 +1210,7 @@ end
 if $ARGS[0] = 'shower':
 	*clr & cla
 	menu_off = 1
-	minut +15
+	minut += 15
 	shower_shave = 0
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/change.jpg"></center>'
@@ -1254,7 +1254,7 @@ end
 if $ARGS[0] = 'long_shower':
 	*clr & cla
 	menu_off = 1
-	minut +10
+	minut += 10
 	pcs_mood += 10
 	shower_shave = 0
 	gs 'stat'
@@ -1265,14 +1265,14 @@ if $ARGS[0] = 'long_shower':
 		gs 'stat'
 		longshower = rand(1,10)
 		if longshower = 1 and hotcat => 6 and pav_slut >= 75:
-			minut +5
+			minut += 5
 			pcs_mood += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/lazar/sex/school/shower/lazar1.jpg"></center>'
 			'The sensation of the hot water hitting your body and running down it, with the steam filling the room, giving it a almost sauna feel, completely relaxes you. Before long the only sounds you hear is someone walking, sounds like most of the girls have already left.'
 			act 'Continue':
 				*clr & cla
-				minut +5
+				minut += 5
 				pcs_mood += 5
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/lazar/sex/school/shower/lazar2.jpg"></center>'
@@ -1299,7 +1299,7 @@ if $ARGS[0] = 'long_shower':
 				end	
 			end
 		elseif longshower = 2 and hotcat => 5 and pav_slut >= 50 and kotovLoveQW ! 1:
-			minut +5
+			minut += 5
 			pcs_mood += 5
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/sex/vd1.jpg"></center>'
@@ -1346,7 +1346,7 @@ if $ARGS[0] = 'long_shower':
 				end	
 			end
 		elseif longshower = 3 and hotcat => 5:
-			minut +10
+			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/watch2.jpg"></center>'
 			'The sensation of the hot water hitting your body and running down it, with the steam filling the room, giving it a almost sauna feel, completely relaxes you. Before long you no longer hear any noise at all other than the shower, at first you think all the other girls have left but then you hear a locker open and close, maybe someone is still left in the locker room. After a few minutes more you notice your fingers starting to prune up and decided it is time to get out of the shower.'
@@ -1378,7 +1378,7 @@ if $ARGS[0] = 'long_shower':
 				end
 			end
 		elseif longshower = 4 and hotcat => 6 and npc_rel['A23'] => 50:
-			minut +10
+			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/watch2.jpg"></center>'
 			'The sensation of the hot water hitting your body and running down it, with the steam filling the room, giving it a almost sauna feel, completely relaxes you. Before long you no longer hear any noise at all other than the shower, at first you think all the other girls have left but then you hear a phone ring and then some one talking, likely talking on the phone, you can''t tell who it is from here.'
@@ -1479,7 +1479,7 @@ if $ARGS[0] = 'long_shower':
 				end
 			end
 		elseif longshower = 5 and hotcat => 5 and pav_slut >= 75:
-			minut +10
+			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/watch2.jpg"></center>'
 			'The sensation of the hot water hitting your body and running down it, with the steam filling the room, giving it a almost sauna feel, completely relaxes you. Before long you no longer hear any noise at all other than the shower, at first you think all the other girls have left but then you hear some lockers opening and closing, someone is in the locker room going through the lockers.'
@@ -1506,7 +1506,7 @@ if $ARGS[0] = 'long_shower':
 				end	
 			end
 		else
-			minut +10
+			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/watch2.jpg"></center>'
 			'The sensation of the hot water hitting your body and running down it, with the steam filling the room, giving it a almost sauna feel, completely relaxes you. Before long you no longer hear any noise at all other than the shower, all the other girls must have already left. After a few minutes more you notice your fingers starting to prune up and decided it is time to get out of the shower. You go to your locker, drying off and getting dressed. By the time you get to the locker room it is empty all the other girls have left.'
@@ -1521,7 +1521,7 @@ if $ARGS[0] = 'long_shower_locker':
 	$menu_loc = 'gschool_lessons4'
 	$menu_arg = 'long_shower_locker'
 	menu_off = 0
-	minut +15
+	minut += 15
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/change.jpg"></center>'
 	'You walk from the showers back into the locker room, over to your locker, grabbing your towel and diligently dry off your body. With your hair still wet,  you''re ready to put the blow dryer to use. Once you finish blow drying your hair you look around and see several other girls have left the showers and are getting dried off or dressed as well. By the time you start to get dressed, all the other girls have already left.'
@@ -1692,7 +1692,7 @@ if $ARGS[0] = 'dress':
 	menu_off = 1
 	$metka = 'dress'
 	$loc = 'gschool_lessons4'
-	minut +10
+	minut += 10
 	gs 'stat'
 	gymdress = rand(1,20)
 	if gymdress = 1:

+ 1 - 0
locations/gschool_socialchg.qsrc

@@ -1703,6 +1703,7 @@ if $ARGS[0] = 'gopnik slut':
 															cla & *clr
 															'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/gophangout/slut/13.jpg"></center>'
 															'The non-stop gangbang is interupted as Vitek''s voice cuts through. "All right back off, I am ready for round two." The other guys stop and make space for him. He moves up behind you and you find a few moments where you are not being fucked in someway by some guy. The moment doesn''t last long though, Vitek rubs his dick against your asshole, apparently he lubed himself up already, because he shoves his cock up your ass and it slides in surprisingly easy.'
+															anal_slip += 4
 															gs 'arousal', 'anal', 10, 'group', 'rough', 'sub', 'humiliation', 'exhibitionism'
 															gs 'pain', 5, 'asshole', 'tear'
 															gs 'stat'

+ 1 - 0
locations/gskver.qsrc

@@ -131,6 +131,7 @@ if $ARGS[0] = 'start':
 	if week >= 6 and hour >= 8 and hour <= 9 and StoryLine = 1: '<a href="exec:gt ''gschool_socialchg1'',''tVanya''">Vanya</a> is out on a light jog and is slowly approaching you.'
 
 	act 'Go for a walk (0:15)':
+		menu_off = 1
 		if pcs_exhib = 100 and exhibitionQW = 0: gt 'kseniyaQW', 'event1', 1
 
 		if StoryLine = 1 and SchoolAtestat = 0 and mey_vika['mey_vika_qw'] > 0 and mey_vika['mey_vika_qw'] < 27 and mey_vika['qw_day'] ! daystart and ((week > 5 and hour >= 8 and hour < 20) or (week < 6 and week mod 2 = 1 and hour > 14)):

+ 4 - 3
locations/hotel_resep.qsrc

@@ -830,11 +830,11 @@ if $ARGS[0] = 'vaginalmf':
 	if npc_rel['A217'] = 15:
 		act 'Continue':
 			*clr & cla
+			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal1.mp4"></video></center>'
 			'"Wow your pussy is great, but I really want to try out this sweet little asshole." <<$boydesc>> says.'
 			'"No way, we didn''t agree to this."'
 			'"I don''t care bitch <<$npc_nickname[''A217'']>> still owes me a favor, so you are going to lie there and take it."'
 			'You try to get away but <<$boydesc>> pins you down and guides his cock towards your ass.'
-			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal1.mp4"></video></center>'
 			'"At least use some lube..."'
 			'Before you can finish your sentence <<$boydesc>> has already penetrated your anus and is thrusting with all his might.'
 			'You aren''t ready for it and start screaming your lungs out.'
@@ -852,11 +852,11 @@ if $ARGS[0] = 'vaginalmf':
 	elseif custangry = 1:
 		act 'Continue':
 			*clr & cla
+			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal1.mp4"></video></center>'
 			'"Wow your pussy is great, but I really want to try out this sweet little asshole." <<$boydesc>> says.'
 			'"No way, we didn''t agree to this."'
 			'"I don''t care whore. You are bought and paid for. So you are going to lie there and take it."'
 			'You try to get away but <<$boydesc>> pins you down and guides his cock towards your ass.'
-			'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal1.mp4"></video></center>'
 			'"At least use some lube..."'
 			'Before you can finish your sentence <<$boydesc>> has already penetrated your anus and is thrusting with all his might.'
 			'You aren''t ready for it and start screaming your lungs out.'
@@ -911,7 +911,7 @@ end
 
 if $ARGS[0] = 'analmf':
 	'<center><video autoplay loop src="images/shared/sex/anal/doggy/anal4.mp4"></video></center>'
-	gs 'dinSex','boy_wants_anal','lubri'
+	gs 'dinSex','boy_wants_anal','','lubri'
 	gs 'dinsex','analsex'
 	gs 'arousal', 'anal', 30, 'prostitution','sub'
 	gs 'arousal', 'masturbate', 30, 'prostitution','sub'
@@ -1036,6 +1036,7 @@ if $ARGS[0] = 'sexmmf':
 			'"He wants me to ask for more." You think to yourself and you start moving again, meeting their thrusts as you start to beg him: "Please spank my ass. I love it when you... Uhhh... More..." As his hand smacking your ass from time to time just makes you hornier than ever.'
 			gs 'arousal', 'anal_finger', 20, 'prostitution', 'sub', 'group'
 			gs 'arousal', 'vaginal', 20, 'prostitution', 'sub', 'group'
+			anal_slip += 4
 			gs 'arousal', 'anal', 20, 'prostitution', 'sub', 'group'
 			minut -= 40
 			gs 'stat'

+ 2 - 1
locations/hunters.qsrc

@@ -1465,6 +1465,7 @@ if $ARGS[0]='huntersgroupVa1':
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
 	if boyCsex = 0: boyCsex = 1
 	gs 'dinsex', 'boy_puts_condom'
+	gs 'dinSex','boy_wants_anal','','lubri'
 	gs 'dinsex','vaginal_sex',10
 	gs 'dinsex','sexcum'
 	if huntersexnude = 1 or forest_huntersex = 3:'A satisfied Igor stepped aside, you continue on with Andrei...'
@@ -2036,7 +2037,7 @@ if $ARGS[0]='huntersgroupAsO':
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
 	if boyBsexa = 0: boyBsexa = 1
 	dirty_dickB += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if huntersexnude = 1 or forest_huntersex = 3:gs 'boyStat', 'A172'
 	if forest_gopsex = 3:gs 'boyStat', 'A63'

+ 39 - 39
locations/huntersex.qsrc

@@ -445,7 +445,7 @@ if $ARGS[0] = 'doubleloveDog112':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter7>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -471,7 +471,7 @@ if $ARGS[0] = 'doubleloveDogCum112_1':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter6>>'
 	lubonus += 1
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -493,7 +493,7 @@ if $ARGS[0] = 'doubleloveDogCum112_2':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174'
 	if temphunt = 2:gs 'boyStat', 'A173'
@@ -528,7 +528,7 @@ if $ARGS[0] = 'doubleloveDog212':
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61' & boyBsexa += 1
 	if temphunt = 5:gs 'boyStat', 'A62' & boyBsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter7>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -555,7 +555,7 @@ if $ARGS[0] = 'doubleloveDogCum212_1':
 	if temphunt = 2:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61'
 	if temphunt = 5:gs 'boyStat', 'A62'
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter6>>'
 	lubonus += 1
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -577,7 +577,7 @@ if $ARGS[0] = 'doubleloveDogCum212_2':
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61' & boyBsexa += 1
 	if temphunt = 5:gs 'boyStat', 'A62' & boyBsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if temphunt <= 2:gs 'boyStat', 'A172'
 	if temphunt = 3:gs 'boyStat', 'A173'
@@ -612,7 +612,7 @@ if $ARGS[0] = 'doubleloveSide12':
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61' & boyBsexa += 1
 	if temphunt = 5:gs 'boyStat', 'A62' & boyBsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter7>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -639,7 +639,7 @@ if $ARGS[0] = 'doubleloveSideCum12_1':
 	if temphunt = 2:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61'
 	if temphunt = 5:gs 'boyStat', 'A62'
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter6>>'
 	lubonus += 1
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -662,7 +662,7 @@ if $ARGS[0] = 'doubleloveSideCum12_2':
 	if temphunt = 2:gs 'boyStat', 'A173' & boyBsexa += 1
 	if temphunt = 4 or temphunt = 6:gs 'boyStat', 'A61' & boyBsexa += 1
 	if temphunt = 5:gs 'boyStat', 'A62' & boyBsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if temphunt <= 2:gs 'boyStat', 'A172'
 	if temphunt = 3:gs 'boyStat', 'A173'
@@ -697,7 +697,7 @@ if $ARGS[0] = 'doubleloveCow112':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter7>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -727,7 +727,7 @@ if $ARGS[0] = 'doubleloveCowCum112_1':
 	if temphunt = 3:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63'
 	if temphunt = 6:gs 'boyStat', 'A62'
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter6>>'
 	lubonus += 1
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -750,7 +750,7 @@ if $ARGS[0] = 'doubleloveCowCum112_2':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174'
 	if temphunt = 2:gs 'boyStat', 'A173'
@@ -784,7 +784,7 @@ if $ARGS[0] = 'doubleloveCow212':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter7>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -812,7 +812,7 @@ if $ARGS[0] = 'doubleloveCowCum212_1':
 	if temphunt = 3:gs 'boyStat', 'A173'
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter6>>'
 	lubonus += 1
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -834,7 +834,7 @@ if $ARGS[0] = 'doubleloveCowCum212_2':
 	if temphunt = 3:gs 'boyStat', 'A173' & boyAsexa += 1
 	if temphunt = 4 or temphunt = 5:gs 'boyStat', 'A63' & boyAsexa += 1
 	if temphunt = 6:gs 'boyStat', 'A62' & boyAsexa += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	if temphunt = 1 or temphunt = 3:gs 'boyStat', 'A174'
 	if temphunt = 2:gs 'boyStat', 'A173'
@@ -862,7 +862,7 @@ if $ARGS[0] = 'doubleloveSide2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doubleloveside2.'+rand(1,2)+'.jpg"></center>'
 	'You lie on your side with a member in front of your face, and the other one penetrating you from behind...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -886,7 +886,7 @@ if $ARGS[0] = 'doubleloveSideCum2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovesidecum2.jpg"></center>'
 	'You lie on your side with a member in front of your face, and the other one penetrating you from behind...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	lubonus = 0
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -907,7 +907,7 @@ if $ARGS[0] = 'doubleloveCow1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovecow1.'+rand(1,2)+'.jpg"></center>'
 	'One of the guys lays on the ground and you mount him. The second puts his cock in your mouth...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -927,7 +927,7 @@ if $ARGS[0] = 'doubleloveCowCum1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doublelovecowcum1.jpg"></center>'
 	'One of the guys lays on the ground and you mount him. The second puts his cock in your mouth...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	lubonus = 0
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -1200,7 +1200,7 @@ if $ARGS[0] = 'sluthomeAnalDog1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeanaldog1.'+rand(1,2)+'.jpg"></center>'
 	'<<$boydesc>> bends you over the couch and begins pound your ass...'
 	if boyAsexa = 0: boyAsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1215,7 +1215,7 @@ if $ARGS[0] = 'sluthomeAnalDogCum1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalDogСum1.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
 	gs 'cum_call', 'anus', $boy, 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'arousal', 'end'
@@ -1228,7 +1228,7 @@ if $ARGS[0] = 'sluthomeAnalDog2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeanaldog2.'+rand(1,2)+'.jpg"></center>'
 	'You bend over the couch as position yourself so <<$boydesc>> could go into your ass deeper...'
 	if boyAsexa = 0: boyAsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1243,7 +1243,7 @@ if $ARGS[0] = 'sluthomeAnalDogCum2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalDogСum2.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
 	gs 'cum_call', 'anus', $boy, 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub', 'rough'
 	gs 'arousal', 'end'
@@ -1257,7 +1257,7 @@ if $ARGS[0] = 'sluthomeAnalCow1':
 	'<<$boydesc>> he lies on his back, you climb on top of him...'
 
 	if boyAsexa = 0: boyAsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1272,7 +1272,7 @@ if $ARGS[0] = 'sluthomeAnalCowCum1':
 	gs 'cum_call', 'anus', $boy, 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalCowСum1.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub', 'rough'
 	gs 'arousal', 'end'
@@ -1286,7 +1286,7 @@ if $ARGS[0] = 'sluthomeAnalCow2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeanalcow2.'+rand(1,2)+'.jpg"></center>'
 	'<<$boydesc>> he lies on his back, you climb on top of him...'
 	if boyAsexa = 0: boyAsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1304,7 +1304,7 @@ if $ARGS[0] = 'sluthomeAnalCowCum2':
 	gs 'cum_call', 'anus', $boy, 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalCowСum2.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub', 'rough'
 	gs 'stat'
@@ -1318,7 +1318,7 @@ if $ARGS[0] = 'sluthomeAnalSide1':
 	pose = 0
 	if boyAsexa = 0: boyAsexa = 1
 	dirty_dickA += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1332,7 +1332,7 @@ if $ARGS[0] = 'sluthomeAnalSideCum1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalSideСum1.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
 	gs 'cum_call', 'anus', $boy, 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub', 'rough'
 	gs 'arousal', 'end'
@@ -1346,7 +1346,7 @@ if $ARGS[0] = 'sluthomeAnalSide2':
 	'<<$boydesc>> puts you on the side, and begins to penetrate your ass.'
 	pose = 0
 	if boyAsexa = 0:boyAsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
 	gs 'stat'
@@ -1363,7 +1363,7 @@ if $ARGS[0] = 'sluthomeAnalSideCum2':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/sluthomeAnalSideСum2.jpg"></center>'
 	'You feel his pace quicken and your are sure he is about to cum.'
 	gs 'cum_call', 'anus', $boy, 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	'<<$textsexhunter3>>'
 	gs 'arousal', 'anal', 5, 'sub', 'rough'
 	gs 'arousal', 'end'
@@ -1998,7 +1998,7 @@ if $ARGS[0] = 'huntersgrAiOsa':
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
 	dirty_dickC += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	*pl
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -2027,7 +2027,7 @@ if $ARGS[0] = 'huntersgrAiO':
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
 	dirty_dickC += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A172'
 	swallow += 1
@@ -2088,7 +2088,7 @@ if $ARGS[0] = 'huntersgrAOsa':
 
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	lubonus += 2
 
 	'Igor gets up and walks away.'
@@ -2320,7 +2320,7 @@ if $ARGS[0] = 'huntersgr2AiOs':
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
 	dirty_dickC += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	*pl
 	gs 'arousal', 'anal', 5, 'sub', 'group'
@@ -2344,7 +2344,7 @@ if $ARGS[0] = 'huntersgr2AOs':
 
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	'Igor had finished and passed out, you are left with Sergei.'
 	gs 'arousal', 'anal', 5, 'sub', 'group', 'rough'
@@ -2368,7 +2368,7 @@ if $ARGS[0] = 'huntersgr2AiO':
 	gs 'boyStat', 'A173'
 	if boyCsexa = 0: boyCsexa = 1
 	dirty_dickC += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A174'
 	swallow += 1
@@ -2397,7 +2397,7 @@ if $ARGS[0] = 'huntersgr2AOi':
 
 	gs 'boyStat', 'A174'
 	if boyBsexa = 0: boyBsexa = 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	'Sergei gets up and walks away, but you continue with Andrei and Igor.'
 	gs 'arousal', 'anal', 5, 'sub', 'group', 'rough'
@@ -2421,7 +2421,7 @@ if $ARGS[0] = 'huntersgr2AsO':
 	gs 'boyStat', 'A174'
 	if boyBsexa = 0: boyBsexa = 1
 	dirty_dickB += 1
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 
 	gs 'boyStat', 'A173'
 	swallow += 1

+ 4 - 5
locations/husbSex.qsrc

@@ -394,11 +394,11 @@ if $ARGS[0] = 'anal':
 	'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog2.jpg"></center>'
 
 	if lubri = 0:
-		lubonus = 2
+		anal_slip += 2
 		'You don''t have an lubricants, so <<$husName>> spits on his fingers and uses the saliva to lubricate your ass.'
 	else
 		lubri = lubri - 1
-		lubonus = 10
+		anal_slip += 8
 		'You get the lubricant out of a box and hand it to your husband. He puts a little on his palm and rubs your anus with it.'
 	end
 
@@ -421,7 +421,7 @@ if $ARGS[0] = 'anal':
 	gs 'arousal', 'anal', 10, 'sub'
 	gs 'stat'
 
-	if pcs_ass + lubonus < husDick:
+	if pcs_ass + anal_slip < husDick:
 		'You scream and bit your lip from the sharp pain when his member slides into you ass.'
 	else
 		'You groan at the feeling of fullness when his penis parts your ass as he enters.'
@@ -432,7 +432,7 @@ if $ARGS[0] = 'anal':
 	gs 'arousal', 'anal', 10, 'sub'
 	gs 'stat'
 
-	if pcs_ass + lubonus + 2 < husDick:
+	if pcs_ass + anal_slip + 2 < husDick:
 		if pcs_makeup > 1:pcs_makeup = 0
 		'You cry and sink your teeth into the pillow when his <<husDick>> inch cock begins to fuck your ass at full power.'
 	else
@@ -459,7 +459,6 @@ if $ARGS[0] = 'anal':
 
 	act 'Go to the bathroom':
 		cla
-		lubonus = 0
 		gt'vanr'
 	end
 end

+ 4 - 5
locations/kamera.qsrc

@@ -1,5 +1,6 @@
 # kamera
 
+!!This should be minut += 2880, but it''s so long that I didn''t want to touch it, maybe it breaks the event (sleep, hunger, ...), there is another hour += 20 in the file (julzor)
 hour += 48
 gs 'stat'
 '<center><b>Prison cell</b></center>'
@@ -47,10 +48,9 @@ act 'Greet her':
 			gs 'stat'
 			
 			act 'Crawl into bed and sleep':
-				cla
-				*clr
+				*clr & cla
 				pcs_vag += 1
-				hour += 4
+				minut += 240
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/police/sex/c6.jpg"></center>'
 				'A few hours later you wake up because your vagina hurts. When you open your eyes you see why: a female prison guard is trying to thrust her baton inside you! She hasn''t gotten it in yet, and is impatiently rubbing the tip of the baton against your pussy lips to try and gain access.'
@@ -150,8 +150,7 @@ act 'Greet her':
 			gs 'stat'
 			
 			act 'Wait':
-				cla
-				*clr
+				*clr & cla
 				gnewQW = 3
 				hour += 20
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/police/c1.jpg"></center>'

+ 5 - 5
locations/kotovSex.qsrc

@@ -499,7 +499,7 @@ if $ARGS[0] = 'cum11':
 			'Your guy completely relaxed, threw where-the condom and lay down contentedly on the bed.'
 		elseif sexcontra = 5:
 			'He pulls out of you, the condom is missing.'
-		elseif sexcontra = 7:
+		else
 			'After a while you give him a kiss and take the filled condom off his penis, and secretly admire the size of his load for a second before getting rid of the condom. You lie back down on the bed together with Vitek and give him a soft kiss on the cheek, happy to just relax and cuddle with him for a moment.'
 		end
 		protect = 0
@@ -550,7 +550,7 @@ if $ARGS[0] = 'cum9':
 			'Your guy completely relaxed, threw where-the condom and lay down contentedly on the bed.'
 		elseif sexcontra = 5:
 			'He pulls out of you, the condom is missing.'
-		elseif sexcontra = 7:
+		else
 			'Eventually he gets up and removes the filled condom from his dick, putting it between your ass cheeks for you to dispose of. Vitek whispers in your ear: "Soon you''re going to have loads like that inside of you every day, kitten..."'
 			'You feel a shiver run down your spine as you blush, and secretly admire the size of his load for a second before getting rid of the condom. You lie back down on the bed next to Vitek and give him a soft kiss on the cheek, happy to just relax and cuddle with him for a moment.'
 		end
@@ -587,7 +587,7 @@ if $ARGS[0] = 'cum8':
 			'Your guy completely relaxed, threw where-the condom and lay down contentedly on the bed.'
 		elseif sexcontra = 5:
 			'He pulls out of you, the condom is missing.'
-		elseif sexcontra = 7:
+		else
 			'Eventually you get up and remove the filled condom from his dick, and secretly admire the size of his load for a second before getting rid of it. You lie back down on the bed next to Vitek and give him a soft kiss on the cheek, happy to just relax and cuddle with him for a moment.'
 		end
 		protect = 0
@@ -623,7 +623,7 @@ if $ARGS[0] = 'cum7':
 			'Your guy completely relaxed, threw where-the condom and lay down contentedly on the bed.'
 		elseif sexcontra = 5:
 			'He pulls out of you, the condom is missing.'
-		elseif sexcontra = 7:
+		else
 			'Eventually he pulls out of you and gets rid of the filled condom, before crashing down on the bed and just lying there contently for a while.'
 		end
 		protect = 0
@@ -658,7 +658,7 @@ if $ARGS[0] = 'cum6':
 			'Your guy completely relaxed, threw where-the condom and lay down contentedly on the bed.'
 		elseif sexcontra = 5:
 			'He pulls out of you, the condom is missing.'
-		elseif sexcontra = 7:
+		else
 			'Eventually he pulls out of you and gets rid of the filled condom, before crashing down on the bed and just lying there contently for a while.'
 		end
 		protect = 0

+ 20 - 20
locations/lover_change.qsrc

@@ -268,7 +268,7 @@ if $ARGS[0] = 'Pier':
 						elseif randchan = 6 and pirsF = 0:
 							if pirsF = 0 and pierCount < pierPrefTmpMin:
 								'He motions for you to lift up your shirt. After you do the man grabs your breasts rather softly and carefully pierces each nipple.'
-								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/f1.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/f1.jpg"></center>'
 								pcs_horny += 5
 								pirsF = 1
 								pirsF1_owned = 1
@@ -280,7 +280,7 @@ if $ARGS[0] = 'Pier':
 							if pirsG = 0 and pierCount < pierPrefTmpMin:
 								'"Ma ''am can you take off your bottoms?", the man says. You realize that he plans to pierce your labia and you reluctantly present yourself.'
 								'You cover your mouth as you let out a quick "Eep!", as you feel a quick pain through your labia, but in a second, its over.'
-								!!'<center><img <<$set_imgh>> src="images/pc/body/piercings/g1.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/pc/body/piercings/g1.jpg"></center>'
 								pcs_horny += 7
 								pirsG = 1
 								pirsG1_owned = 1
@@ -520,7 +520,15 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your ankles.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle<<tatankle>>.jpg"></center>'
 						end
-					elseif randchan = 8 and tatleg = 0:
+					elseif randchan = 8 and tathand = 0:
+						randchan = rand(1,9)
+						if tathand = 0 and tattCount < tattPrefTmpMin:
+							tathand = randchan
+							tattCount += 1
+							'He gives you a tattoo on your hand.'
+							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
+						end
+					elseif randchan = 9 and tatleg = 0:
 						randchan = rand(1,47)
 						if tatleg = 0 and tattCount < tattPrefTmpMin:
 							tatleg = randchan
@@ -528,7 +536,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your legs.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/legs/tatleg<<tatleg>>.jpg"></center>'
 						end
-					elseif randchan = 9 and tatlip = 0:
+					elseif randchan = 10 and tatlip = 0:
 						randchan = rand(1,9)
 						if tatlip = 0 and tattCount < tattPrefTmpMin:
 							tatlip = randchan
@@ -536,7 +544,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your bottom lip.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip<<tatlip>>.jpg"></center>'
 						end
-					elseif randchan = 10 and tatneck = 0:
+					elseif randchan = 11 and tatneck = 0:
 						randchan = rand(1,30)
 						if tatneck = 0 and tattCount < tattPrefTmpMin:
 							tatneck = randchan
@@ -544,7 +552,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your neck.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/neck/tatnck<<tatneck>>.jpg"></center>'
 						end
-					elseif randchan = 11 and tatvag = 0:
+					elseif randchan = 12 and tatvag = 0:
 						randchan = rand(1,53)
 						if tatvag = 0 and tattCount < tattPrefTmpMin:
 							tatvag = randchan
@@ -552,7 +560,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo above your cunt.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag<<tatvag>>.jpg"></center>'
 						end
-					elseif randchan = 12 and tatlech = 0:
+					elseif randchan = 13 and tatlech = 0:
 						randchan = rand(1,25)
 						if tatlech = 0 and tattCount < tattPrefTmpMin:
 							tatlech = randchan
@@ -560,15 +568,15 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your shoulder.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr<<tatlech>>.jpg"></center>'
 						end
-					elseif randchan = 13 and tatside = 0:
-						randchan = rand(1,19)
+					elseif randchan = 14 and tatside = 0:
+						randchan = rand(1,23)
 						if tatside = 0 and tattCount < tattPrefTmpMin:
 							tatside = randchan
 							tattCount += 1
 							'He gives you a tattoo on your sides.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/side/tatside<<tatside>>.jpg"></center>'
 						end
-					elseif randchan = 14 and tatupb = 0:
+					elseif randchan = 15 and tatupb = 0:
 						randchan = rand(1,32)
 						if tatupb = 0 and tattCount < tattPrefTmpMin:
 							tatupb = randchan
@@ -576,7 +584,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tramp stamp.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampstamp/tatlowbck<<tatupb>>.jpg"></center>'
 						end
-					elseif randchan = 15 and tatunder = 0:
+					elseif randchan = 16 and tatunder = 0:
 						randchan = rand(1,22)
 						if tatunder = 0 and tattCount < tattPrefTmpMin:
 							tatunder = randchan
@@ -584,7 +592,7 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo under your breasts.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/underbreast/tatundbreast<<tatunder>>.jpg"></center>'
 						end
-					elseif randchan = 16 and tatwrist = 0:
+					elseif randchan = 17 and tatwrist = 0:
 						randchan = rand(1,51)
 						if tatwrist = 0 and tattCount < tattPrefTmpMin:
 							tatwrist = randchan
@@ -592,14 +600,6 @@ if $ARGS[0] = 'Tatt':
 							'He gives you a tattoo on your wrists.'
 							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/wrists/tatwrst<<tatwrist>>.jpg"></center>'
 						end
-					elseif randchan = 17 and tathand = 0:
-						randchan = rand(1,9)
-						if tathand = 0 and tattCount < tattPrefTmpMin:
-							tathand = randchan
-							tattCount += 1
-							'He gives you a tattoo on your hand.'
-							'<center><img <<$set_imgh>> src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
-						end
 					elseif tattCount = 18:
 						''
 					else

+ 2 - 2
locations/mirafather.qsrc

@@ -173,7 +173,7 @@ else
 							gs 'dinsex','sexcum'
 							gs 'arousal', 'vaginal', 10
 						else
-							gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+							gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 							gs 'arousal', 'anal', 10
 						end
 						gs 'arousal', 'end'
@@ -229,7 +229,7 @@ else
 							gs 'dinsex','sexcum'
 							gs 'arousal', 'vaginal', 10
 						else
-							gs 'dinsex','boy_wants_anal','lubri'
+							gs 'dinSex','boy_wants_anal','','lubri'
 							gs 'dinsex','analsex'
 							gs 'arousal', 'anal', 10
 						end

+ 14 - 14
locations/mitkasex.qsrc

@@ -366,7 +366,7 @@ if $ARGS[0] = 'gadDogCum2_2':
 	if temp_ms = 2:gs 'boyStat', 'A62'
 	if temp_ms = 3:gs 'boyStat', 'A61'
 	*pl
-	gs 'arousal', 'anal', 5, 'sub', 'group'
+	gs 'arousal', 'vaginal', 5, 'sub', 'group'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	minut -= 5
 	gs 'stat'
@@ -575,7 +575,7 @@ if $ARGS[0] = 'gadStanCum2_2':
 	if temp_ms = 2:gs 'boyStat', 'A62'
 	if temp_ms = 3:gs 'boyStat', 'A61'
 	*pl
-	gs 'arousal', 'anal', 5, 'sub', 'group'
+	gs 'arousal', 'vaginal', 5, 'sub', 'group'
 	gs 'arousal', 'bj', 5, 'sub', 'group'
 	$orgasm_txt = ''
 	minut -= 5
@@ -788,7 +788,7 @@ if $ARGS[0] = 'gadDogAnal1':
 	if pcs_horny >= 60:'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagadsexdoganal1.'+rand(3,4)+'.jpg"></center>'
 	'You bend over for <<$boydesc>> so he can penetrate your ass...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	*pl
 	*pl
 	'<<$textsexhunter4>>'
@@ -836,7 +836,7 @@ if $ARGS[0] = 'gadCowAnal1':
 	if pcs_horny >= 60:'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagadsexcowanal1.'+rand(3,4)+'.jpg"></center>'
 	'<<$boydesc>> lays on the ground, and you mount his cock...'
 
-	gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+	gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	*pl
 	'<<$textsexhunter4>>'
 	gs 'arousal', 'anal', 5, 'sub'
@@ -1214,7 +1214,7 @@ if $ARGS[0] = 'forestDogCum1_1':
 	gs 'dinsex','sexcum'
 	*pl
 	'<<$textsexhunter10>>'
-	gs 'arousal', 'anal', 5, 'sub', 'group'
+	gs 'arousal', 'vaginal', 5, 'sub', 'group'
 	gs 'arousal', 'end'
 	gs 'stat'
 	act 'Finish':gt $loc, $metka
@@ -1912,7 +1912,7 @@ if $ARGS[0] = 'forestAnal3_3':
 		*pl
 		if boyBsexa = 0: boyBsexa = 1
 		gs 'boyStat', 'A61' & dirty_dickB += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 2:
 		gs 'boyStat', 'A61'
 		gs 'oral','start'
@@ -1933,7 +1933,7 @@ if $ARGS[0] = 'forestAnal3_3':
 		*pl
 		if boyAsexa = 0: boyAsexa = 1
 		gs 'boyStat', 'A63' & dirty_dickA += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 3:
 		gs 'boyStat', 'A63'
 		gs 'oral','start'
@@ -1954,7 +1954,7 @@ if $ARGS[0] = 'forestAnal3_3':
 		*pl
 		if boyCsexa = 0: boyCsexa = 1
 		gs 'boyStat', 'A62' & dirty_dickC += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	end
 	*pl
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -1997,7 +1997,7 @@ if $ARGS[0] = 'forestAnal3_2':
 		*pl
 		if boyBsexa = 0: boyBsexa = 1
 		gs 'boyStat', 'A61' & dirty_dickB += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 2:
 		gs 'boyStat', 'A62'
 		gs 'oral','start'
@@ -2010,7 +2010,7 @@ if $ARGS[0] = 'forestAnal3_2':
 		*pl
 		if boyAsexa = 0: boyAsexa = 1
 		gs 'boyStat', 'A63' & dirty_dickA += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 3:
 		gs 'boyStat', 'A61'
 		gs 'oral','start'
@@ -2023,7 +2023,7 @@ if $ARGS[0] = 'forestAnal3_2':
 		*pl
 		if boyCsexa = 0: boyCsexa = 1
 		gs 'boyStat', 'A62' & dirty_dickC += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	end
 	*pl
 	gs 'arousal', 'bj', 5, 'sub', 'group'
@@ -2064,15 +2064,15 @@ if $ARGS[0] = 'forestAnal3_1':
 	if temp_ms = 1:
 		if boyAsexa = 0: boyAsexa = 1
 		gs 'boyStat', 'A63' & dirty_dickA += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 2:
 		if boyBsexa = 0: boyBsexa = 1
 		gs 'boyStat', 'A61' & dirty_dickB += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	elseif temp_ms = 3:
 		if boyCsexa = 0: boyCsexa = 1
 		gs 'boyStat', 'A62' & dirty_dickC += 1
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 	end
 	!'<<$textsexhunter8>>'
 	*pl

+ 3 - 3
locations/natkolEv.qsrc

@@ -93,7 +93,7 @@ if $ARGS[0] = 'kolkabj':
 			gs 'arousal', 'voyeur_sex', 5, 'dom'
 			gs 'arousal', 'end'
 			gs 'stat'
-			act 'Let Kolka cum': gt 'natkolEv', 'kolkacum', 0
+			act 'Let Kolka cum': gs 'natkolEv', 'kolkacum', 0
 			if NatKolkaSex > 5: act 'Continue': gs 'natkolEv', 'softsex'
 		end
 	end
@@ -586,7 +586,7 @@ if $ARGS[0] = 'kolkacum':
 	end
 	act 'Let him cum on her tits':
 		*clr & cla
-		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natfacial.mp4"></video></center>'
+		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcumtits.mp4"></video></center>'
 		'"Jerk him off on your tits Natasha."'
 		'Natasha leans over Kolka''s cock and squeezes her tits together with one hand. With the other, she rapidly strokes his cock. With a grunt, Kolka shoots a huge load of his cum onto Natasha''s tits. By the time he''s done Natasha''s chest is covered in cum.'
 		'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
@@ -820,6 +820,7 @@ if $ARGS[0] = 'showerspy':
 	'You open the bathroom door as quietly as you can and peer through the crack to see Natasha on her knees sucking Kolka off while in the shower.'
 	gs 'arousal', 'voyeur_sex', 5
  	if NatashaQW >= 5:
+		act 'Leave': gt 'natbelapt','hallway'
 		gs 'willpower', 'voyeur', 'self', 'easy'
 		if will_cost <= pcs_willpwr:
 			act 'Get a closer look (<<will_cost>> Willpower)':
@@ -861,7 +862,6 @@ if $ARGS[0] = 'showerspy':
 			end
 		else
 			act 'Get a closer look (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			act 'Leave': gt 'natbelapt','hallway'
 		end
 	else
 		'Not wanting to intrude any further you decide to leave them be and close the door again.'

+ 1 - 1
locations/nordtrain.qsrc

@@ -28,7 +28,7 @@ if $ARGS[0] = 'outside':
 	$metka = 'outside'
 	$loc = 'nordtrain'
 	$menu_loc = 'nordtrain'
-	$menu_arg = 'inside'
+	$menu_arg = 'outside'
 	menu_off = 0
 	$location_type = 'public_outdoors'
 	*clr & cla

+ 19 - 22
locations/pavtrain_market.qsrc

@@ -219,16 +219,18 @@ if $ARGS[0] = 'start':
 end
 
 if $ARGS[0] = 'events':
-	if rand(0,3) = 0: gt 'pavtrain_market', rand(1,19)
-	'<center><h2>Market</h2></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/brodit'+rand(1,8)+'.jpg"></center>'
-	'You wander around the market taking in the sounds and colours but nothing catches your eye.'
 	*clr & cla
 	minut += 10
 	menu_off = 1
 	gs 'stat'
+	'<center><h2>Market</h2></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/brodit'+rand(1,8)+'.jpg"></center>'
+	'You wander around the market taking in the sounds and colours but nothing catches your eye.'
+	
 	act 'Stop wandering': gt 'pavtrain_market', 'start'
 	act 'Wander around the market': gt 'pavtrain_market','events'
+	
+	if rand(0,3) = 0: gt 'pavtrain_market', rand(1,19)
 end
 
 if ARGS[0] = 1:
@@ -743,23 +745,23 @@ if ARGS[0] = 13:
 	act 'Look through the purse':
 		*clr & cla
 		minut += 5
-		gs 'stat'
 		i = rand(40,200)
-		gs 'willpower', 'resist'
+		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/zaglanut.jpg"></center>'
 		'You open the wallet and you see that there''s <<i>> <b>₽</b>'
 
+		gs 'willpower', 'misc', 'self', 'easy'
 		if will_cost <= pcs_willpwr:
 			act 'Take the money and throw away the wallet (<<will_cost>> Willpower)':
-				gs 'willpower', 'pay', 'resist'
 				*clr & cla
-				gs 'stat'
-				'You just need the money.':
 				money += i
 				pcs_mood += 10
-				gs stat
 				killvar 'i'
-				gt 'pavtrain_market','start'
+				gs 'willpower', 'pay', 'resist'
+				gs 'stat'
+				'You just need the money.'
+				
+				act 'Continue': gt 'pavtrain_market','start'
 			end
 		else
 			act 'Take the money and throw away the wallet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -829,24 +831,19 @@ if ARGS[0] = 18:
 	'As you walk past a stall you notice a small hole torn in the canvas.'
 	act 'Stop wandering': gt 'pavtrain_market', 'start'
 	act 'Wander around the market': gt 'pavtrain_market','events'
-	act 'Look through the hole (<<will_cost>> Willpower)':
-		gs 'stat'
-		gs 'willpower', 'resist'
-		if will_cost <= pcs_willpwr:
+	gs 'willpower', 'voyeur', 'self', 'easy'
+	if will_cost <= pcs_willpwr:
+		act 'Look through the hole (<<will_cost>> Willpower)':
 			*clr & cla
-			if girl > 1: pcs_horny += 5
+			gs 'arousal', 'voyeur', 2
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
-			'Oh...'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/market/pereodev'+rand(1,15)+'.jpg"></center>'
 			'You look inside the tent and see ' + $pavtrain_marketrandtext[rand(3,7)]
 			act 'Leave': gt 'pavtrain_market', 'start'
-		else
-			cla
-			'You cannot bring yourself to look through the whole (Not enough willpower)'
-			act 'Stop wandering': gt 'pavtrain_market', 'start'
-			act 'Wander around the market': gt 'pavtrain_market','events'
 		end
+	else
+		act 'Look through the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 end
 

+ 58 - 58
locations/pirsingsalon.qsrc

@@ -702,7 +702,7 @@ if $ARGS[0] = 'pirsvla':
 	:looppubic_pir
 		*p '<a href="exec:gt ''pirsingsalon'', ''pubic_pir'', <<i>>"><img src="images/pc/body/piercings/g<<i>>.jpg" 	height="250" /></a>'
 		i += 1
-	if i <= 7:jump 'looppubic_pir'
+	if i <= 10:jump 'looppubic_pir'
 
 	act 'Return':gt 'pirsingsalon', 'start'
 end
@@ -1133,7 +1133,7 @@ end
 if $ARGS[0] = 'face_get':
 	*clr
 	cla
-'<center><img src="images/pc/body/tattoos/face/tatfce<<n>>.jpg"></center>'
+	'<center><img src="images/pc/body/tattoos/face/tatfce<<n>>.jpg"></center>'
 
 	if (money < 10000) and (karta + bankDebtLimit < 10000):
 		'You cannot afford this tattoo.'
@@ -1220,6 +1220,61 @@ if $ARGS[0] = 'foot_get':
 	act 'Return': gt 'pirsingsalon', 'start'
 end
 
+if $ARGS[0] = 'hand':
+	*clr
+	cla
+	if tathand = 0:
+
+		n = 1
+		:looptathand
+		*p '<a href="exec:n = <<n>> & gt ''pirsingsalon'', ''hand_get''"><img src="images/pc/body/tattoos/hand/tathnd<<n>>.jpg" height="250" /></a>'
+		n += 1
+		if n <= 9:jump 'looptathand'
+		*nl
+
+	else
+		'<center><img src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
+		'You already have this tattoo here.'
+	end
+
+	act 'Return': gt 'pirsingsalon', 'start'
+end
+
+if $ARGS[0] = 'hand_get':
+	*clr
+	cla
+	'<center><img src="images/pc/body/tattoos/hand/tathnd<<n>>.jpg"></center>'
+
+	if (money < 7000) and (karta + bankDebtLimit < 7000):
+		'You cannot afford this tattoo.'
+	else
+		if money >= 7000:
+			act 'Get this tattoo 7,000 <b>₽</b> (cash)':
+				cla
+				tathand = n
+				money -= 7000
+				minut += 60
+				gs 'stat'
+
+				act 'Return': gt 'pirsingsalon', 'start'
+			end
+		end
+		if karta + bankDebtLimit >= 7000:
+			act 'Get this tattoo 7,000 <b>₽</b> (card)':
+				cla
+				tathand = n
+				karta -= 7000
+				minut += 60
+				gs 'stat'
+
+				act 'Return': gt 'pirsingsalon', 'start'
+			end
+		end
+	end
+
+	act 'Return': gt 'pirsingsalon', 'start'
+end
+
 if $ARGS[0] = 'leg':
 	*clr
 	cla
@@ -1504,7 +1559,7 @@ if $ARGS[0] = 'side':
 		:looptatside
 		*p '<a href="exec:n = <<n>> & gt ''pirsingsalon'', ''side_get''"><img src="images/pc/body/tattoos/side/tatside<<n>>.jpg" height="250" /></a>'
 		n += 1
-		if n <= 19:jump 'looptatside'
+		if n <= 23:jump 'looptatside'
 		*nl
 
 	else
@@ -1715,60 +1770,5 @@ if $ARGS[0] = 'wrist_get':
 	act 'Return': gt 'pirsingsalon', 'start'
 end
 
-if $ARGS[0] = 'hand':
-	*clr
-	cla
-	if tathand = 0:
-
-		n = 1
-		:looptathand
-		*p '<a href="exec:n = <<n>> & gt ''pirsingsalon'', ''hand_get''"><img src="images/pc/body/tattoos/hand/tathnd<<n>>.jpg" height="250" /></a>'
-		n += 1
-		if n <= 9:jump 'looptathand'
-		*nl
-
-	else
-		'<center><img src="images/pc/body/tattoos/hand/tathnd<<tathand>>.jpg"></center>'
-		'You already have this tattoo here.'
-	end
-
-	act 'Return': gt 'pirsingsalon', 'start'
-end
-
-if $ARGS[0] = 'hand_get':
-	*clr
-	cla
-	'<center><img src="images/pc/body/tattoos/hand/tathnd<<n>>.jpg"></center>'
-
-	if (money < 7000) and (karta + bankDebtLimit < 7000):
-		'You cannot afford this tattoo.'
-	else
-		if money >= 7000:
-			act 'Get this tattoo 7,000 <b>₽</b> (cash)':
-				cla
-				tathand = n
-				money -= 7000
-				minut += 60
-				gs 'stat'
-
-				act 'Return': gt 'pirsingsalon', 'start'
-			end
-		end
-		if karta + bankDebtLimit >= 7000:
-			act 'Get this tattoo 7,000 <b>₽</b> (card)':
-				cla
-				tathand = n
-				karta -= 7000
-				minut += 60
-				gs 'stat'
-
-				act 'Return': gt 'pirsingsalon', 'start'
-			end
-		end
-	end
-
-	act 'Return': gt 'pirsingsalon', 'start'
-end
-
 --- pirsingsalon ---------------------------------
 

+ 11 - 13
locations/placer_gop_orgy.qsrc

@@ -19,10 +19,10 @@ if Frend_num = 14:
 	KatjaSex += (kol_man / 2) - 1
 	KatjaGuy += (kol_man / 2) - 1
 	KatjaOhrenet = 3
-	
+
 	gs 'arousal', 'foreplay', 10, 'group'
 	gs 'stat'
-	
+
 end
 
 act 'Continue':
@@ -35,16 +35,14 @@ act 'Continue':
 	if rand(0, 2) < 2:
 		gs 'dinsex','vaginal_sex',10
 		gs 'dinsex','sexcum'
-		
-	gs 'arousal', 'vaginal', 15, 'group', 'sub'
-	gs 'stat'
-	
+
+		gs 'arousal', 'vaginal', 15, 'group', 'sub'
+		gs 'stat'
 	else
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
-		
-	gs 'arousal', 'anal', 15, 'group'
-	gs 'stat'
-	
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
+
+		gs 'arousal', 'anal', 15, 'group'
+		gs 'stat'
 	end
 	ciklkm -= 1
 	if ciklkm > 0:'All of the guys want to fuck you or <<$ev_name>> at least once. You see one of them impatiently stroking his cock, keeping it erect while he is waiting for the Gopnik that is currently fucking you to finish. There might be more beyond your vision range though, you''re not quite sure.'
@@ -60,12 +58,12 @@ act 'Continue':
 		gs 'boyStat', $npclastgenerated
 		jump 'markgopgang'
 	end
-	
+
 	'The guys are finally done with the two of you, and you feel a tad embarrassed when you look at <<$ev_name>>. You can see she feels the same way, but at the same time... that was so hot! She loved getting treated like a piece of meat, and you certainly enjoyed watching her while they did the same to you. The two of you quickly get dressed and leave the house, exchanging glances.'
 
 	gs 'arousal', 'end'
 	gs 'stat'
-	
+
 	act 'Leave':gt 'placer_end'
 end
 

+ 3 - 2
locations/placer_house.qsrc

@@ -239,6 +239,7 @@ elseif kol_man = 3:
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/anal2.jpg"></center>'
 						'You tease him and whisper back: "Do you want my ass, baby? Just say the word and it''s all yours..."'
 						'He eagerly nods and nearly stutters over his words a few times, unsure whether you''re playing a prank on him or not. However, you hold true to your word and undress for him, making a little striptease out of it. Then you get on your hands and knees and wink at him.'
+						gs 'arousal', 'auto_lube', 'anal'
 						gs 'arousal', 'anal', 5, 'sub'
 						gs 'arousal', 'end'
 						gs 'stat'
@@ -327,7 +328,7 @@ elseif kol_man = 3:
 					'<center><img <<$set_imgh>> src="images/shared/sex/group/grupd2.jpg"></center>'
 					'You give the boys a sweet smile and ask them: "Boys, I would really like it if you fucked me in my ass right now, it''s been so long... could you be a dear and make a girl feel good?"'
 					'They gladly agree, and one of them impatiently rubs his cock against your tight spincter. Meanwhile, his friend moves back to your face and offers you his cock to suck on while you get fucked. You open your mouth without hesitation and obediently suck him off, while his friend fucks your ass from behind.'
-					gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+					gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 					spafinloc = 3
 					gs 'cum_manage'
 					gs 'boyStat', $npclastgenerated
@@ -349,7 +350,7 @@ elseif kol_man = 3:
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/anal.jpg"></center>'
 							'The first guy pulls his limp cock out of your asshole, truly spent. The guy who you were sucking off earlier is more than happy to take his place; he didn''t think he would get to fuck your ass today, and quickly makes his move before you can change your mind. He immediately pulls away from your mouth and gets behind you, pushing his cock into your already prepared butthole in one fluent motion.'
-							gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+							gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 							spafinloc = 3
 							gs 'cum_manage'
 							gs 'arousal', 'bj', 5, 'sub', 'group', 'deepthroat'

+ 2 - 3
locations/placer_sex.qsrc

@@ -1822,11 +1822,10 @@ if $ARGS[0] = 'sitting_park_bench':
 	if alko >= 7 and pcs_apprnc >= 120:
 		gt'placer_sex','sleeping_park_alco_rape'
 	else
-		cla
-		*clr
+		*clr & cla
+		$location_type = 'public_outdoors'
 		if PCloStyle2 = 4:
 			iif(rand(0,1)=1,'<center><img <<$set_imgh>> src="images/locations/shared/park/bench_5.jpg"></center>','<center><img <<$set_imgh>> src="images/locations/shared/park/bench_6.jpg"></center>')
-			!I think the original one is better then this...anyway, Lets random.
 		elseif PCloSkirt > 0:
 			'<center><img <<$set_imgh>> src="images/locations/shared/park/bench_2.jpg"></center>'
 		elseif PCloPants > 3:

+ 1 - 1
locations/podval_rape.qsrc

@@ -40,7 +40,7 @@ elseif podvalrape = 1:
 		gs 'stat'
 		
 	elseif tiprand = 2:
-		gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+		gs 'dinSex','boy_wants_anal','','lubri' & gs 'dinsex','analsex'
 		
 		gs 'arousal', 'bj', 15, 'group', 'sub', 'rough'
 		gs 'arousal', 'anal', 15, 'group', 'sub', 'rough'

+ 12 - 6
locations/preSYS.qsrc

@@ -1362,9 +1362,11 @@ if $ARGS[0] = 'slut':
 !!If you can do uniforms then they can choose inappropriate
 	'<center><h4><font color="maroon">Slut</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/pre/sys/altstart25.jpg"></center>'
-	'You were the first girl at your age to lose her virginity, to your childhood friend Vasily. You became curious about sex far sooner than other kids your age and started masturbating at an early age. You loved the sensation so much that you wanted to find out how good sex would feel. Once you tried it, you learned that you loved it - you really love everything about it.'
+	'You were the first girl at your age to lose her virginity, to your childhood friend Vasily. You became curious about sex far sooner than other kids your age and started masturbating long before the others in your year, you also found a desire for pornography and would masturbate to it. You loved the sensation so much that you wanted to find out how good sex would feel. Once you tried it, you learned that you loved it - you really love everything about it.'
 	*nl
-	'You used to give the boys blowjobs under the bleachers during recess and after school - you always savored swallowing their cum, and you even love how it tastes. The only thing you like more than sucking cock and swallowing cum is getting fucked by huge cock while sucking on another one. Though loving sex has made you a social pariah, the girls all hate you and the boys publicly mock you, though in private they don''t mind using you. The nerds though completely avoid you, while the gopniks seem to tolerate you the most or maybe they just like to keep you handy to suck their dicks.'
+	'The boys took advantage of your sexual needs and made you give them hand jobs which then led to blowjobs under the bleachers during recess and after school (sometimes they would return the favour by fingering you or a few times even eating you out) - you always savored swallowing their cum, and you even love how it tastes. The only thing you like more than sucking cock and swallowing cum is getting fucked by huge cock while sucking on another one.'
+	*nl
+	'Though loving sex has made you a social pariah, the girls all hate you and the boys publicly mock you, though in private they don''t mind using you. The nerds though completely avoid you, while the gopniks seem to tolerate you the most or maybe they just like to keep you handy to suck their dicks.'
 	act 'Select another': gt 'preSYS', 'charselect'
 	act 'Confirm this option':
 		gs 'preSYS', 'outcast'
@@ -1414,14 +1416,18 @@ if $ARGS[0] = 'slut':
 		motherKnowSpravka = 2
 		Gspassed = 0
 		salo = 60
-		stat['hj'] = 50
-		stat['bj'] = 30
+		stat['porn'] = 75
+		stat['mast'] = 100
+		stat['hj'] = 70
+		stat['bj'] = 50
+		stat['vaginal_finger'] = 20
+		stat['cuni'] = 5
 		stat['vaginal'] = 30
 		stat['anal'] = 20
 		stat['group'] = 5
 		guy = 15
-		orgasm = 15
-		swallow = 20
+		orgasm = 120
+		swallow = 40
 		trt_cumeater = 1
 		willpowermax = 50
 		gt 'preCUST', 'SGStart'

+ 4 - 4
locations/preSYS2.qsrc

@@ -3,6 +3,7 @@
 if $ARGS[0] = 'start':
 	if genbsize = '': genbsize = 22
 	if $soc_grup = '':gs 'preSYS2', 'none'
+	if pcs_inhib > 50: '<font color="red">Attention: You are starting a character with greater than 50 inhibition. You will not have any clothes besides the default school uniform. Make sure to buy clothes before removing this uniform or you may be stuck naked.</font>'
 	act 'Pick a social group': gt 'preSYS2','modgrup'
 	act 'Set attributes': gt 'preSYS2','modatt'
 	act 'Set skills': gt 'preSYS2','modskl'
@@ -13,10 +14,9 @@ if $ARGS[0] = 'start':
 	act 'Set money (<<money>>₽)': money = input 'Set Cash Amount' & gt'preSYS2','start'
 	act 'Return to preset character menu': gt 'preSYS', 'charselect'
 	act 'Confirm these options':
-		pcs_inhib = 100 - pcs_inhib
 		if pcs_inhib < 10: pcs_inhib = 10
-		!!This line should get sveta to wear school uniform because she has no other clothing with >=40
-		if pcs_inhib >= 40: gs 'clothing', 'wear', 'school', 6
+		!!This line should get sveta to wear school uniform because she has no other clothing with > 50
+		if pcs_inhib > 50: gs 'clothing', 'wear', 'school', 6
 		if bag = 1:
 			!!using current combination should prevent having more than 1 bag at the start of game.
 			dynamic $currentpursetype + '_purses[<<currentpursenumber>>] = 1'
@@ -518,7 +518,7 @@ if $ARGS[0] = 'none':
 	pcs_chrsm = 30
 	pcs_prcptn = 30
 	pcs_grade = 75
-	pcs_inhib = 90	
+	pcs_inhib = 10
 	pcs_heel = 5
 
 	!!Mental Skills Reset

+ 33 - 44
locations/sisterQW.qsrc

@@ -16,6 +16,7 @@ end
 if $ARGS[0] = 'sisboyQW_bedroom':
 	*clr & cla
 	minut += 1
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/sisboyqw_08.jpg"></center>'
 	'You walk up to your bedroom door, you stop just before it. Your sister asked you to give her some privacy with her boyfriend and you are sure you know they are having or going to have sex. You know you should just walk away, but at the same time you can not shake the stimulating thoughts, your desire to spy on Anya and her boyfriend.'
@@ -85,6 +86,9 @@ if $ARGS[0] = 'spy1':
 	'You are getting a little carried away, you should leave the room, before you are discovered.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt'korrPar'
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Caress yourself (<<will_cost>> Willpower)':
@@ -95,11 +99,6 @@ if $ARGS[0] = 'spy1':
 	else
 		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
 if $ARGS[0] = 'spy2':
@@ -110,6 +109,9 @@ if $ARGS[0] = 'spy2':
 	'At that moment you want so much to be in your sisters place, but you are exposed here by the door and you don''t want to be caught.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt 'korrPar'
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Caress yourself (<<will_cost>> Willpower)':
@@ -120,14 +122,9 @@ if $ARGS[0] = 'spy2':
 	else
 		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
-if $ARGS[0] = 'see3':
+if $ARGS[0] = 'spy3':
 	*clr & cla
 	sisterbfspy += 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/spy2.jpg"></center>'
@@ -139,6 +136,9 @@ if $ARGS[0] = 'see3':
 	'You want to watch until the end, but you are running the risk of being noticed.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt 'korrPar'
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Caress yourself (<<will_cost>> Willpower)':
@@ -149,17 +149,12 @@ if $ARGS[0] = 'see3':
 	else
 		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
 if $ARGS[0] = 'spy4':
 	*clr & cla
 	sisterbfspy += 1
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/event/spy9.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/spy9.jpg"></center>'
 	'Once they are both naked, Anya crawls on the bed. While she is still on all fours, Roma comes up behind her, slaps her ass once. Then he grabs her hips and pulls her back towards him, suddenly she moans loudly, and Roma starts thrusting against her obviously fucking her and she seems to be loving it. For several minutes this goes on.'
 	*nl
 	'Roma is red and sweety, when he suddenly freezes for a moment, then falls on his back.'
@@ -167,6 +162,9 @@ if $ARGS[0] = 'spy4':
 	'It seems they need to talk, you have time to run away, since you have not been noticed.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt 'korrPar'
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Caress yourself (<<will_cost>> Willpower)':
@@ -177,11 +175,6 @@ if $ARGS[0] = 'spy4':
 	else
 		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
 if $ARGS[0] = 'spy5':
@@ -195,6 +188,9 @@ if $ARGS[0] = 'spy5':
 	'It seems they are so engrossed in each other, that they have not yet noticed your presence, it might be time to leave the hot couple.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt 'korrPar'
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Caress yourself (<<will_cost>> Willpower)':
@@ -205,11 +201,6 @@ if $ARGS[0] = 'spy5':
 	else
 		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
 if $ARGS[0] = 'spy6':
@@ -220,11 +211,24 @@ if $ARGS[0] = 'spy6':
 	'You are getting a little carried away, you should leave the room, before you are discovered, you know. But you really want to watch the whole thing.'
 	gs 'arousal', 'voyeur_sex', 5
 	gs 'stat'
+	
+	act 'Leave': gs 'arousal', 'end' & gt 'korrPar'
+	
+	gs 'willpower', 'voyeur', 'self', 'medium'
+	if will_cost <= pcs_willpwr:
+		act 'Caress yourself (<<will_cost>> Willpower)':
+			*clr & cla
+			gs 'willpower', 'pay', 'self'
+			gt 'sisterQW', 'caress'
+		end
+	else
+		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+	end
+	
 	gs 'willpower', 'voyeur', 'self', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Keep watching (<<will_cost>> Willpower)':
 			*clr & cla
-			gs 'willpower', 'voyeur', 'self', 'medium'
 			gs 'willpower', 'pay', 'self'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/spy5.jpg"></center>'
 			'After giving him a blowjob for a bit, he pulls her up till she is kneeling facing him. He grabs her and lifts her up, she spreads her legs and lines up his cock with her pussy as he lowers her back down, impaling her on his dick. They both moan as he holds her up as they fuck, Roma seems to be pretty strong, being able to hold her up like that and still fuck her.'
@@ -259,6 +263,7 @@ if $ARGS[0] = 'spy6':
 							gs 'arousal', 'voyeur_sex', 5
 							gs 'arousal', 'end'
 							gs 'stat'
+							
 							act 'Leave': gt'korrPar'
 						end
 					end
@@ -268,22 +273,6 @@ if $ARGS[0] = 'spy6':
 	else
 		act 'Keep watching (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
-	gs 'willpower', 'voyeur', 'self', 'medium'
-	if will_cost <= pcs_willpwr:
-		act 'Caress yourself (<<will_cost>> Willpower)':
-			*clr & cla
-			gs 'willpower', 'voyeur', 'self', 'medium'
-			gs 'willpower', 'pay', 'self'
-			gt 'sisterQW', 'caress'
-		end
-	else
-		act 'Caress yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
-	act 'Leave':
-		gs 'arousal', 'end'
-		gs 'stat'
-		gt'korrPar'
-	end
 end
 
 if $ARGS[0] = 'caress':

+ 59 - 41
locations/sister_chat.qsrc

@@ -77,7 +77,7 @@ if $ARGS[0] = 'checks':
 				*nl
 				'You tell yourself, "Come on <<$pcs_nickname>>, deep breath, focus, you can do this."'
 				'You feel your head is clear enough to talk to your sister once more.'
-				act 'chat': gt 'sister_chat', 'sister_chat'
+				act 'Chat': gt 'sister_chat', 'sister_chat'
 			end
 		end
 		
@@ -103,7 +103,7 @@ if $ARGS[0] = 'checks':
 					'Your sister smiles, "Wow, you go <<$pcs_nickname>>!"'
 					'She seems to approve and spends a few minutes asking you all about it.'
 					act 'Move away':gt $loc, $metka
-					act 'chat': gt 'sister_chat', 'sister_chat'
+					act 'Chat': gt 'sister_chat', 'sister_chat'
 				end
 				exit
 			end
@@ -118,7 +118,7 @@ if $ARGS[0] = 'checks':
 				'<center><img <<$set_imgh>> src="images/pc/body/piercings/b<<pirsB>>.jpg"></center>'
 				'You thank your sister for her compliment instinctively playing with your new piercing.'
 				act 'Move away':gt $loc, $metka
-				act 'chat': gt 'sister_chat', 'sister_chat'
+				act 'Chat': gt 'sister_chat', 'sister_chat'
 			end
 			exit
 		end
@@ -127,7 +127,7 @@ if $ARGS[0] = 'checks':
 			sisterQW['pirsC'] = 1
 			'Your sister looks at your earrings. Reaching up to hold and inspect one closely she says, "Well, finally! I thought you would never get your ears pierced."'
 			act 'Move away':gt $loc, $metka
-			act 'chat': gt 'sister_chat', 'sister_chat'
+			act 'Chat': gt 'sister_chat', 'sister_chat'
 		end
 
 		if pirsD > 0 and pirsD < 10000 and sisterQW['pirsD'] = 0:
@@ -135,14 +135,14 @@ if $ARGS[0] = 'checks':
 			'Anya is clearly shocked by your nose ring: "Damn, <<$pcs_nickname>>, tell me who did this to you and I''ll get them for you."'
 			'She dances around you shadow boxing and you both end up laughing loudly.'
 			act 'Move away':gt $loc, $metka
-			act 'chat': gt 'sister_chat', 'sister_chat'
+			act 'Chat': gt 'sister_chat', 'sister_chat'
 		end
 
 		if pirsE > 0 and pirsE < 10000 and sisterQW['pirsE'] = 0:
 			sisterQW['pirsE'] = 1
 			'Your sister takes a good look at your eyebrow piercing and says, "Nice, but be careful, don''t accidentally get it caught on something!"'
 			act 'Move away':gt $loc, $metka
-			act 'chat': gt 'sister_chat', 'sister_chat'
+			act 'Chat': gt 'sister_chat', 'sister_chat'
 		end
 		
 		!! If you are visibly pregnant:
@@ -254,13 +254,13 @@ if $ARGS[0] = 'checks':
 			else
 				'Anya shakes her head at you. "<<$pcs_nickname>>, sooner or later mom is going to catch you and tan your ass.'
 				act 'Move away':gt $loc, $metka
-				act 'chat': gt 'sister_chat', 'sister_chat'
+				act 'Chat': gt 'sister_chat', 'sister_chat'
 			end
 		end
 	end
 
 	!Responses that only happen in the bedroom
-	if $loc = 'BedrPar':
+	if $loc = 'bedrPar':
 		!! After Roma visit
 		if ((sisboyday + 1 = daystart and hour > 18) or sisboyday + 1 < daystart) and sisThank = 1:
 			*clr & cla
@@ -300,19 +300,9 @@ if $ARGS[0] = 'checks':
 			'"You promised to join me and Roma, what happened? Well maybe next time..."'
 			act 'Continue':gt 'sister_chat', 'sister_chat'
 		end
-	
-		!! Anya is about to head to work
-		if hour = 8 and week < 6:
-			*clr & cla
-			'<center><h1><font color="maroon">Anya</font></h1></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sobir.jpg"></center>'
-			'Your sister is busy getting ready for work.'
-			'Anya, without even turning around, says, "<<$pcs_nickname>>, no time to talk, I''m already late!"'
-			act 'Move away':gt $loc, $metka
-		end
-	
+		
 		!! If you haven''t learned how to braid hair yet:
-		if canBraidHair = 0 and npc_rel['A33'] > 75 and (pcs_hairlng > 80 and pcs_hairlng <= 800):
+		if canBraidHair = 0 and npc_rel['A33'] > 50 and pcs_hairlng > 80:
 			act '"Hey sis, can you teach me how to braid my hair...?"':
 				*clr & cla
 				minut += 1
@@ -337,9 +327,9 @@ if $ARGS[0] = 'checks':
 				end
 			end
 		end
-
+		
 		!! If you had sex with Anya
-		if sisterLesb > 0 and (sisterQW['dno'] = 0 or sisterQW['lesb'] = 0 or sisterQW['bi'] = 0 or sisterQW['sisbi'] = 0):
+		if sisterLesb > 0 and sisterQW['dno'] = 0 and sisterQW['lesb'] = 0 and sisterQW['bi'] = 0 and sisterQW['sisbi'] = 0:
 			*clr & cla
 			minut += 2
 			gs'stat'
@@ -355,6 +345,8 @@ if $ARGS[0] = 'checks':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_24.jpg"></center>'
 					'You look at Anya blushing, "Forgive me, I was so worked up, I just could not control myself, I do not know what came over me."'
 					'"Well, I do not mind, if you sometimes lose control of yourself. Just try and control yourself though." She smiles slyly, You smile at her...'
+					act 'Move away':gt $loc, $metka
+					act 'Chat': gt 'sister_chat', 'sister_chat'
 				end
 			end
 			if sisterQW['lesb'] = 0:
@@ -366,6 +358,8 @@ if $ARGS[0] = 'checks':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_24.jpg"></center>'
 					'You look at Anya blushing, "I like girls, I''m a lesbian and I don''t know what came over me... you are just so pretty and I was so horny..."'
 					'"Oh!" She seems a little surprised but then smiles at you and hugs you. "As long as you are happy that is all I care about, but for the record I''m not a lesbian." She says with a laugh and then she asks you about any girl friends you have had, for someone that claims to be straight she sure seems curious about lesbian sex.'
+					act 'Move away':gt $loc, $metka
+					act 'Chat': gt 'sister_chat', 'sister_chat'
 				end
 			end
 			if sisterQW['bi'] = 0:
@@ -377,6 +371,8 @@ if $ARGS[0] = 'checks':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_24.jpg"></center>'
 					'You look at Anya blushing, "I like girls too, I''m not a lesbian, I just like both guys and girls. I don''t know what came over me that night... you are just so pretty and I was so horny..."'
 					'"Oh!" She seems a little surprised but then smiles at you and hugs you. "As long as you are happy that is all I care about, but for the record I''m not a lesbian or into girls." She says with a laugh and then she asks you about any girl friends you have had, for someone that claims to be straight she sure seems curious about lesbian sex.'
+					act 'Move away':gt $loc, $metka
+					act 'Chat': gt 'sister_chat', 'sister_chat'
 				end
 			end
 			if sisterQW['sisbi'] = 0:
@@ -390,10 +386,10 @@ if $ARGS[0] = 'checks':
 					'Anya blushes. "Well yes, twice before. I was curious and horny." She says with a laugh when she realizes it sounds like you when you came onto her.'
 					'You grin and pry. "So did you like it?"'
 					'She blushes maybe even more. "Yeah a little, it was fun. But I much prefer guys, they are way more fun." Soon the two of your are talking about the differences in sex with guys and girls, with you adding in your own experiences along with hers.'
+					act 'Move away':gt $loc, $metka
+					act 'Chat': gt 'sister_chat', 'sister_chat'
 				end
 			end
-			act 'Move away':gt $loc, $metka
-			act 'chat': gt 'sister_chat', 'sister_chat'
 		end
 	
 		!! If Anya saw you masturbating
@@ -406,7 +402,17 @@ if $ARGS[0] = 'checks':
 			'Anya looks at you and laughs "Well, <<$pcs_nickname>>, I know what you were up to! I went into the room, and you were playing with yourself!"'
 			act 'Move away':gt $loc, $metka
 		end
-
+	
+		!! Anya is about to head to work
+		if hour = 8 and week < 6:
+			*clr & cla
+			'<center><h1><font color="maroon">Anya</font></h1></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sobir.jpg"></center>'
+			'Your sister is busy getting ready for work.'
+			'Anya, without even turning around, says, "<<$pcs_nickname>>, no time to talk, I''m already late!"'
+			act 'Move away':gt $loc, $metka
+		end
+	
 		!! Anya is going for a walk
 		if sisterdialog = 3:
 			*clr & cla
@@ -556,7 +562,7 @@ if $ARGS[0] = 'sister_chat':
 			'You apologize for missing the party and Anya smiles at you.'
 			act 'Continue': gt 'sister_chat', 'sister_chat'
 		elseif npc_rel['A33'] < 20:
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 			'You are trying to talk to your sister but she refuses to talk to you.'
 	!!what is this sistersorry used for? can we get rid of it and just always have the say sorry as a option?
 			if sisterQW['lowrelboost'] ! daystart:
@@ -570,7 +576,7 @@ if $ARGS[0] = 'sister_chat':
 				end
 			end
 		elseif npc_rel['A33'] >= 20 and npc_rel['A33'] < 40:
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 			'You are trying to talk to your sister but she just cuts you off bluntly.'
 			if sisterQW['lowrelboost'] ! daystart:
 				act'Try to smooth your relations':
@@ -583,13 +589,19 @@ if $ARGS[0] = 'sister_chat':
 				end
 			end
 		else
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+			if $loc = 'kuhrPar' and indorf = 1:
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat_kitchen_easteregg.jpg"></center>' & ! Snegurochka''s easter egg for when mom''s not around
+			elseif $loc = 'kuhrPar':
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat_kitchen<<rand(1,3)>>.jpg"></center>'
+			else
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
+			end
 			'You start a conversation with your sister.'
 			if trfatherQW = 0:
 				act 'Ask about your father':
 					*clr & cla
 					trfatherQW = 1
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 					'You ask about your real father, Anya grins, "<<$pcs_nickname>>, I was 4 years old when they broke up. I don''t even remember what he looks like. <<$npc_nickname[''A29'']>> does not like to talk about him, but as you know, our real father went to live in another town. I also remember, he worked as a long-distance truck driver, maybe sometimes he passes through Pavlovsk."'
 					act 'Move away':gt $loc, $metka
 					act 'Keep talking': gt 'sister_chat', 'sister_chat'
@@ -599,7 +611,13 @@ if $ARGS[0] = 'sister_chat':
 				npc_rel['A33'] += 1
 				*clr & cla
 				temp = rand (1,15)
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+				if $loc = 'kuhrPar' and indorf = 1:
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat_kitchen_easteregg.jpg"></center>' & ! Snegurochka''s easter egg for when mom''s not around
+				elseif $loc = 'kuhrPar':
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat_kitchen<<rand(1,3)>>.jpg"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
+				end
 				if temp = 1:
 					'As you chat with your sister, she says it is possible to rent an apartment in the city and live and work there, but she is happy living in Pavlovsk, even with helping with the bills she has way more money to spend on herself this way.'	
 				elseif temp = 2:
@@ -667,7 +685,7 @@ if $ARGS[0] = 'sister_chat':
 						'Your sister admits to you that she wants to have sex with a black man. To suck his dick, to get fucked by him and finally for him to pound her little ass.'
 						act 'Tell her you want to':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 							'You grin at that imagery as well. "God yes I would like to as well, there is a boy in my school from America. He is tall and well built and as dark skinned as I have ever seen."'
 							'She laughs. "Well why don''t you hit on him then. I am sure he would be eager to show you what it is like."'
 							'You laugh and the two of you talk about what it would be like and why it is taboo.'
@@ -676,7 +694,7 @@ if $ARGS[0] = 'sister_chat':
 						end
 						act 'Tell her you don''t':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 							'You shake your head no. "Eww, don''t you have a boyfriend anyways?"'
 							'She sighs. "Yes but if we ever break up."'
 							'Then she drops the topic.'
@@ -686,12 +704,12 @@ if $ARGS[0] = 'sister_chat':
 						if npc_sex['A55'] > 0:
 							act 'tell her about Olu':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 								'You tell her you have been having sex with Olu, your aunt''s boyfriend. She is shocked at first until you explain that your aunt knows all about it and even asked for help satisfying him.'
 								act 'Move away':gt $loc, $metka
 								act 'Ask if she wants to go':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 									'You ask her if she wants to go up and visit him. "Would you like to come up with me next time I visit him?"'
 									'She thinks about it for a moment and then grins and nods yes. "Yes I think I would, you know just to try it." She says with a blush.'
 									'You promise to text her next time you are going up there and let him know she is willing to help with his needs too. "Ok next time I am going up there I will let you know and tell him."'
@@ -703,12 +721,12 @@ if $ARGS[0] = 'sister_chat':
 						elseif npc_sex['A146'] > 0:
 							act 'tell her about Marcus':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 								'You tell her about Marcus from school and how you have been having sex with him. Her eyes get big and she starts asking all kinds of questions about how it was. You tell her how big he is and start getting into details about your sex with him.'
 								act 'Move away':gt $loc, $metka
 								act 'Ask if she wants a turn':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 									'You ask her if she wants to give him a go. "Maybe I could invite him over one evening and you can give him a go, interested?"'
 									'She thinks about it for a moment and then grins and nods yes. "Yes I think I would, you know just to try it." She says with a blush.'
 									'You promise to text her next time you are going up there and let him know she is willing to help with his needs too. "Ok I will talk to him about it and let you know."'
@@ -720,12 +738,12 @@ if $ARGS[0] = 'sister_chat':
 						elseif afrdormgangbang > 0:
 							act 'tell her about the dorm':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 								'You tell her about the guys in the dorm and the sex you have had with them.'
 								act 'Move away':gt $loc, $metka
 								act 'Ask if she wants to join you':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 									'You ask her if she wants to go to the city with you and go have sex with them. "Would you like to come up with me next time I go?"'
 									'She thinks about it for a moment and then grins and nods yes. "Yes I think I would, you know just to try it." She says with a blush.'
 									'You promise to text her next time you are going up there and let him know she is willing to help with his needs too. "Ok next time I am going to the city to see them, I will let you know."'
@@ -740,10 +758,10 @@ if $ARGS[0] = 'sister_chat':
 					act 'Keep talking': gt 'sister_chat', 'sister_chat'
 				end
 			
-				if sisterLesb = 3 and $loc = 'BedrPar':
+				if sisterLesb => 3 and $loc = 'BedrPar':
 					act 'Tell her you want to have sex':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 						if hour > 6 and hour < 23:
 							'You you crawl over her bed towards her to kiss her and when she realizes what you are about to do she pulls back from you. "What are you doing? Everyone is still up, what if someone walked in?" She shakes her head. "You really need to control yourself little sister." She makes it clear nothing is going to happen.'
 							gs 'arousal', 'foreplay', 3, 'incest', 'lesbian'
@@ -788,7 +806,7 @@ if $ARGS[0] = 'sister_chat':
 						npc_QW['A33'] = 1
 						gs'stat'
 						'<center><h1><font color="maroon">Anya</font></h1></center>'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister_chat.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sister_chat.jpg"></center>'
 						'You ask Anya about her boyfriend. She smiles.'
 						'"Well, I have a boyfriend. Although nothing serious. He is more of a friend who I have sex with."'
 						'"Awesome, now when I think out about it, you simply must introduce me to him!"'

+ 26 - 26
locations/sister_party.qsrc

@@ -293,9 +293,9 @@ if $ARGS[0] = 'sisboyQW_party':
 		'You politely try and refuse the drink.'
 		'But seeing everyone watching gathered around began to chant: "Drink, drink, drink, drink, drink, drink."'
 		'Giving into peer pressure you take the bottle from Anya''s hand, and gulp down a huge amount of vodka.'
-		act 'Go dance': gt 'sisterQW', 'dance'
-		act 'Drink': gt 'sisterQW', 'drink'
-		act 'Sit': gt 'sisterQW', 'sit'
+		act 'Go dance': gt 'sister_party', 'dance'
+		act 'Drink': gt 'sister_party', 'drink'
+		act 'Sit': gt 'sister_party', 'sit'
 	end
 	act 'Accept the drink':
 		*clr & cla
@@ -307,9 +307,9 @@ if $ARGS[0] = 'sisboyQW_party':
 		'You took the bottle from her hands'
 		'"Well, let''s party." You say and gulp down a huge amount of vodka.'
 		'Roma looks at Anya and smirks. "Look, <<$pcs_nickname>> is drinking more than you." with these words, everyone began to drink heavily.'
-		act 'Go dance': gt 'sisterQW', 'dance'
-		act 'Drink': gt 'sisterQW', 'drink'
-		act 'Sit': gt 'sisterQW', 'sit'
+		act 'Go dance': gt 'sister_party', 'dance'
+		act 'Drink': gt 'sister_party', 'drink'
+		act 'Sit': gt 'sister_party', 'sit'
 	end
 	act 'Get up to dance':
 		*clr & cla
@@ -325,9 +325,9 @@ if $ARGS[0] = 'sisboyQW_party':
 		else
 			'You can''t deny the host of the party and take the bottle from his hands, and gulp down a huge shot, feeling it burn down your throat. You hear others shouting in encouragement.'
 		end
-		act 'Go dance': gt 'sisterQW', 'dance'
-		act 'Drink': gt 'sisterQW', 'drink'
-		act 'Sit': gt 'sisterQW', 'sit'
+		act 'Go dance': gt 'sister_party', 'dance'
+		act 'Drink': gt 'sister_party', 'drink'
+		act 'Sit': gt 'sister_party', 'sit'
 	end
 !elseif sisboypartyQW >= 2:
 !	gt'sbReksHome','party'
@@ -354,7 +354,7 @@ if $ARGS[0] = 'dance':
 		'You wanted to drink again and again, the boys quickly gave you two bottles of whiskey and without hesitation you start to pour both of them into your mouth, the whiskey spills out of your mouth, unable to drink it all fast enough, it pours all down your body.'
 		'All your clothes were wet, and through your wet bra everyone could see your protruding nipples.'
 		'Two guys around you mad with energy, began to dance around you, persistently lapping at the booze on your body.'
-		act 'Dance with them': gt 'sisterQW', 'two_boy'
+		act 'Dance with them': gt 'sister_party', 'two_boy'
 	end
 	act 'Keep dancing':
 		*clr & cla
@@ -367,15 +367,15 @@ if $ARGS[0] = 'dance':
 		gs 'stat'
 !! This should have a way to back out, but where to?
 		if sisterQW['rexbday'] = 2:
-			act 'Congratulate Rex personally': gt 'sisterQW', 'reks'
+			act 'Congratulate Rex personally': gt 'sister_party', 'reks'
 		end
 		if sisterQW['AnyaRomaQW'] = 0:
-			act 'Look For Anya': gt 'sisterQW', 'anna_find'
+			act 'Look For Anya': gt 'sister_party', 'anna_find'
 		end
-		act 'Dance with them': gt 'sisterQW', 'two_boy'
+		act 'Dance with them': gt 'sister_party', 'two_boy'
 	end
 	if sisterQW['rexbday'] = 2:
-		act 'Congratulate Rex personally': gt 'sisterQW', 'reks'
+		act 'Congratulate Rex personally': gt 'sister_party', 'reks'
 	end
 end
 
@@ -384,9 +384,9 @@ if $ARGS[0] = 'anna_find':
 	minut += 5
 	gs'stat'
 	'You are looking for your sister, but I can''t find her. "Where the hell, did she go?" You looked everywhere, you need to find her.'
-	act 'Look in the bathroom': gt 'sisterQW', 'anna_toilet'
-	act 'Look in the kitchen': gt 'sisterQW', 'anna_kit'
-	act 'Look in the bedroom': gt 'sisterQW', 'anna_kom'
+	act 'Look in the bathroom': gt 'sister_party', 'anna_toilet'
+	act 'Look in the kitchen': gt 'sister_party', 'anna_kit'
+	act 'Look in the bedroom': gt 'sister_party', 'anna_kom'
 end
 
 if $ARGS[0] = 'anna_kit':
@@ -480,8 +480,8 @@ if $ARGS[0] = 'anna_toilet':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_22.jpg"></center>'
 	*nl
 	'In the bathroom you find some guy pushing some poor girls head into the toilet. It wasn''t Anya and you didn''t want to get involved so you left.'
-	act 'Look in the kitchen': gt 'sisterQW', 'anna_kit'
-	act 'Look in the bedroom': gt 'sisterQW', 'anna_kom'
+	act 'Look in the kitchen': gt 'sister_party', 'anna_kit'
+	act 'Look in the bedroom': gt 'sister_party', 'anna_kom'
 end
 
 if $ARGS[0] = 'anna_kom':
@@ -492,8 +492,8 @@ if $ARGS[0] = 'anna_kom':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_23.jpg"></center>'
 	*nl
 	'In the bedroom you see two guys jerking off on the face of some poor unconscious girl. As one of them says to the other. "Let''s get the fuck out of here before she wakes up, I don''t want to deal with her ex-boyfriend, he''s one of the boxers.'
-	act 'Look in the bathroom': gt 'sisterQW', 'anna_toilet'
-	act 'Look in the kitchen': gt 'sisterQW', 'anna_kit'
+	act 'Look in the bathroom': gt 'sister_party', 'anna_toilet'
+	act 'Look in the kitchen': gt 'sister_party', 'anna_kit'
 end
 
 if $ARGS[0] = 'reks':
@@ -506,7 +506,7 @@ if $ARGS[0] = 'reks':
 	'"Hey girly, damn you''ve been having fun. Oh yeah, you''re Anya''s sister, I know, she''s... that''s odd, I haven''t seen her. Although I have been drinking bubbly all day, here, drink up."'
 	'With this he starts pouring the sweet champagne down your throat, he''s so drunk he pours it much too fast and as much as you try to keep up, alot of it spills on the floor.
 	 Then, without a word, Rex just staggers off.'
-	act 'Look For Anya': gt 'sisterQW', 'anna_find'
+	act 'Look For Anya': gt 'sister_party', 'anna_find'
 	act 'Follow Rex to the toilet for birthday sex':
 		*clr & cla
 		toiletRexSex = 1
@@ -531,7 +531,7 @@ if $ARGS[0] = 'reks':
 			'With a final grunt he shoots his sperm deep inside your pussy. "Wow <<$pcs_nickname>>, You are hotter than your sister." With these words he leaves you alone in the bathroom.'
 			gs 'arousal', 'vaginal', 5, 'sub', 'rough'
 			gs 'stat'
-			act 'Look For Anya': gt 'sisterQW', 'anna_find'
+			act 'Look For Anya': gt 'sister_party', 'anna_find'
 		end
 	end
 end
@@ -594,7 +594,7 @@ if $ARGS[0] = 'two_boy':
 				gs 'arousal', 'end'
 				minut -= 5
 				gs 'stat'
-				act 'Look For Anya': gt 'sisterQW', 'anna_find'
+				act 'Look For Anya': gt 'sister_party', 'anna_find'
 			end
 		end
 	end
@@ -609,7 +609,7 @@ if $ARGS[0] = 'drink':
 	*nl
 	'Everyone undressed to the waist and went into the hall to dance. "Come dance, <<$pcs_nickname>>, you don''t want to be left alone." Anya called to you.'
 	'Not now Anya, I want to drink some more first." You tell her.'
-	act 'Go dance': gt 'sisterQW', 'dance'
+	act 'Go dance': gt 'sister_party', 'dance'
 end
 
 if $ARGS[0] = 'sit':
@@ -619,7 +619,7 @@ if $ARGS[0] = 'sit':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/rekshome/party/sisboyqwparty_12.jpg"></center>'
 	*nl
 	'After drinking you start to feel a little dizzy, and you chose to sit for awhile. As your sitting Anya and her friends approached you. "<<$pcs_nickname>> why are you sitting here? Come dance with us." Not taking no for an answer Anya drags you out to dance with her and her friends.'
-	act 'Go dance': gt 'sisterQW', 'dance'
+	act 'Go dance': gt 'sister_party', 'dance'
 end
 
 --- sister_party ---------------------------------

+ 236 - 239
locations/sistersleep.qsrc

@@ -8,249 +8,251 @@ if $ARGS[0] = 'sister_sleep':
 	'Anya is sleeping face down on her bed, with her covers tossed aside, exposing her panty clad ass. You admit she has a really nice ass, you never see her workout, you wonder how she keeps so fit.'
 	if sisterLesb >= 6 or sisterLesb = -1:
 		'You want to touch her again but you keep from doing it, you agreed to not wake her up like this anymore. You sigh and then move away.'
-		act 'Move away':gt 'bedrPar'
+		act 'Move away': gt 'bedrPar'
 	else
-		act 'Move away':gt 'bedrPar'
-		gs 'willpower', 'foreplay', 'self', 'medium'
+		act 'Move away': gt 'bedrPar'
+		if sisterLesb = 0:
+			gs 'willpower', 'foreplay', 'self'
+		else
+			gs 'willpower', 'foreplay', 'self', 'easy'
+		end
+		if will_cost <= pcs_willpwr:
+			act 'Touch her (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'sistersleep', 'sister_sleep_1'
+		else
+			act 'Touch her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'sister_sleep_1':
+	*clr & cla
+	pcs_horny += 5
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/touch1.jpg"></center>'
+	act 'Move away': gs 'arousal', 'end' & gt 'bedrPar'
+	if sisterLesb = 0:
+		sisterLesb = 1
+		'You dare to touch your sleeping sister''s perfect ass.'
+		'Touching such a soft butt with your hand, you feel a shock run through your body, the feeling is weird, you can''t seem to place it.'
+		'Her ass feels as good as it looks.'
+		gs 'willpower', 'foreplay', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Proceed (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'sistersleep', 'sister_sleep_2'
+		else
+			act 'Proceed (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		'You can not stop thinking about the feelings you experienced last time you touched your sister''s bare ass.'
+		'Convinced that Anya is fast asleep, you once more dare yourself to touch her soft butt.'
+		'This time you decide to caress those buns a little longer, enjoying the moment.'
+		'Anya''s whole body is seriously sexy and it is filling you with desire.'
+		act 'Proceed': gt 'sistersleep', 'sister_sleep_2'
+	end
+	gs 'arousal', 'foreplay', 3, 'incest', 'lesbian'
+	gs 'stat'
+end
+
+if $ARGS[0] = 'sister_sleep_2':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/touch2.jpg"></center>'
+	'You continue to explore your sister''s hot body, your frisky fingers accidentally slipping between her legs. Her panties are wet, you gently pull her panties aside, exposing her wet pussy. Sensations of heat and moisture overwhelm you, her pussy is oozing with desire. Apparently she is having a sexual dream, or is it her response to your touch?'
+	'You are caught up in a fantasy, you start to lower your face to her pussy with your tongue out, wanting to taste her. When suddenly Anya stirs. "Fuck...Fuck..!" She''s waking up.'
+	'Sleepily Anya rolls over, looking up and sees you on her bed, as you hastily remove your hand and hide it behind your back.'
+	'"What...what''s going on here? <<$pcs_nickname>>? What are you doing?" She says as she sleepily sits up.'
+	'You sit in front of your sister on her bed, excited, caught off guard, and not knowing what to do.'
+	gs 'arousal', 'foreplay', 3, 'incest', 'lesbian'
+	gs 'stat'
+	act 'Act innocent':
+		*clr & cla
+		minut += 1
+		npc_rel['A33'] -= 10
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'
+		'You decide to do nothing and quietly move away from your sleepy sister, maybe she will forget it all for the morning'
+		'As you step away from her bed she calls to you.'
+		if sisterLesb = 1:
+			sisterLesb = 2
+			'"I do not want to know what you did to me while I was asleep, but don''t do it again."'
+		else
+			'"I told you last time I don''t want to do stuff with you, so please stop and don''t do it again." Then she rolls over angrily.'
+		end
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Move away': gt 'bedrPar'
+	end
+	if sisterLesb < 2:
+		gs 'willpower', 'foreplay', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Touch her (<<will_cost>> Willpower)':
+			act 'Kiss Anya (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'self' & gt 'sistersleep', 'sister_sleep_2_kiss'
+		else
+			act 'Kiss Anya (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		act 'Kiss Anya': gt 'sistersleep', 'sister_sleep_2_kiss'
+	end
+end
+
+if $ARGS[0] = 'sister_sleep_2_kiss':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/touch3.jpg"></center>'
+	'With nothing to lose, you feel yourself filled with courage, and while Anya is still half asleep, you bring your face to hers and sensually kiss her on the lips.'
+	'Anya is too aroused and sleepy to think or resist, her soft body easily giving into your touches as you bring her pleasure.'
+	'Your fingers again slip under your sister''s panties, but now your affection is bold and confident.'
+	'She starts fully waking and breaks the kiss and looks at you in a confused way. "What are you doing?"'
+	gs 'arousal', 'foreplay', 2, 'incest', 'lesbian'
+	gs 'stat'
+	act 'Finger your sister':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les3.jpg"></center>'
+		'You smile to her. "Shh... you looked stressed earlier and I thought I would help you out." You tell her as you slide your hand down her panties and then slip a finger inside of her soaking wet pussy. She grabs your wrist obviously intent on stopping you until her breath catches and you can see how turned on she is.'
+		'She slowly lets go of your wrist and just lays back spreading her legs and enjoying you fingering her. You pull her panties off and toss them aside and then go back to fingering her pussy as she starts to moan in pleasure.'
+		gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'incest'
+		gs 'stat'
+		act 'Keep fingering her':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les4.jpg"></center>'
+			'You slip another finger in her, now fingering her deeply with two fingers while your thumb rubs her clit. Anya lays all the way back and starts to moan louder, you lean forward and start kissing and sucking on her nipple as you keep finger banging her soaking wet pussy. Suddenly huddles in gentle convulsions and roughly orgasms, she looks at you with a gratefully, sleepy, but pleased look on her face and smiles.'
+			'"Well, aren''t you just the sweetest little sister. Now go to sleep." She says as she rolls over and nuzzles into her pillow, pulling her panties back up, as she goes back to sleep. You are really excited and even a little upset not to receive your own release, but you are satisfied for now.'
+			gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'incest'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Move away':gt 'bedrPar'
+		end
+	end
+	act 'Tell her you want to have sex':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les1.jpg"></center>'
+		'"I want to make you feel good, I want to make you orgasm." You tell her and then kiss her, she stiffens at the kiss but then relents and lets you kiss her, she is obviously turned on and trying to fight her desires.'
+		'Then she breaks the kiss and pulls her face a little ways away from yours. "No, it''s wrong, we''re sisters." She only sounds half convinced to you.'
+		act 'Say you''re sorry':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'
+			'You pull away from her. "Sorry, I didn''t think it was a big deal just comforting each other." You say softly.'
+			'She sighs. "It''s fine, just don''t do it again, ok. It is wrong and I''m into guys anyways." With that she rolls over and goes back to sleep.'
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Move away':gt 'bedrPar'
+		end
+		if sisterLesb < 3:
+			gs 'willpower', 'sex', 'force'
+			if will_cost <= pcs_willpwr:
+				act 'Convince her (<<will_cost>> Willpower)': gs 'willpower', 'pay', 'force' & gt 'sistersleep', 'sister_sleep_3'
+			else
+				act 'Convince her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else
+			act 'What about last time?': gt 'sistersleep', 'sister_sleep_3'
+		end
+	end
+end
+
+if $ARGS[0] = 'sister_sleep_3':
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les2.jpg"></center>'
+	if sisterLesb <= 2:
+		sisterLesb = 3
+		'"Why is it wrong? We love each other and just making each other feel good, how can that be wrong?" You ask her as you pull her panties down, she only half heartedly resists you.'
+		'"You know why, where sisters and I like guys even if that wasn''t true." She says, still not really putting up much of a fight.'
+		'You push her legs apart and you can see her pussy is wet from here. "If it is so wrong, why is your pussy so wet?"'
+		'"I... I was having a sex dream is all." She explains.'
+	else
+		'"Did it feel wrong last time? I think you enjoyed it enough to cum, tell me you didn''t enjoy it?" You ask her as you pull her panties down, she only half heartedly resists you.'
+		'"It doesn''t matter, you can enjoy things that are wrong, it doesn''t make them any less wrong." She says, still not really putting up much of a fight.'
+		'You push her legs apart and you can see her pussy is wet from here. "If it is so wrong, why is your pussy so wet?"'
+		'"I... shut up." She says with a blush, knowing why she is wet and knowing you know why as well.'
+	end
+	gs 'arousal', 'foreplay', 5, 'incest', 'lesbian'
+	gs 'stat'
+	act 'Finger her':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les3.jpg"></center>'
+		'You reach down and slide two fingers into her soaking wet pussy, they easily slide in by how turned on she is. You start rubbing her clit with your other hand. She moans softly obviously enjoying the sensations.'
+		'She moans out. "We should stop."'
+		'You keep fingering her and rubbing her clit. "Do you really want me to stop?"'
+		'She moans louder. "Yes... no..."'
+		gs 'arousal', 'vaginal_finger_give', 5, 'incest', 'lesbian'
+		gs 'stat'
+		act 'Go down on her':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les5.jpg"></center>'
+			'With that you move around and lay down between her legs and start licking and sucking on her clit with your mouth and tongue, as your fingers keep plunging in and out of her pussy.'
+			if sisterLesb = 3:
+				'She finally lays back and starts caress her breasts no longer resisting or even pretending to not enjoy it anymore.'
+			else
+				'She lays back and starts caress her breasts moaning passionately having fully given into your love making.'
+			end
+			gs 'arousal', 'cuni_give', 5, 'incest', 'lesbian'
+			gs 'arousal', 'vaginal_finger_give', -5, 'incest', 'lesbian'
+			gs 'stat'
+			act 'Have her return the favor':
 				*clr & cla
-				gs 'willpower', 'pay', 'self'
-				pcs_horny += 5
-				sisprynight = daystart
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/touch1.jpg"></center>'
-				if sisterLesb = 0:
-					sisterLesb = 1
-					'You dare to touch your sleeping sister''s perfect ass.'
-					'Touching such a soft butt with your hand, you feel a shock run through your body, the feeling is weird, you can''t seem to place it.'
-					'Her ass feels as good as it looks.'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les6.jpg"></center>'
+				if sisterLesb = 3:
+					sisterLesb = 4
+					'You get up and strip down, you lay down near her head. She watches you with lust in her eyes, but you can still see a bit of resistance. Not wanting to give her time to recover, you reach over and pull her head between your legs. She resist for a moment and then stops, instead she starts to lick your pussy in return.'
 				else
-					'You can not stop thinking about the feelings you experienced last time you touched your sister''s bare ass.'
-					'Convinced that Anya is fast asleep, you once more dare yourself to touch her soft butt.'
-					'This time you decide to caress those buns a little longer, enjoying the moment.'
-					'Anya''s whole body is seriously sexy and it is filling you with desire.'
+					'You get up and strip down, you lay down near her head. This time without even needing to prod her she rolls over and places her face between your legs and starts licking at your pussy and clit.'
 				end
-				gs 'arousal', 'foreplay', 3, 'incest', 'lesbian'
+				gs 'arousal', 'cuni', 5, 'incest', 'lesbian'
+				$orgasm_txt = '"Aaaaaaaaaaaa!!!" You catch a wave of pure bliss as you violently cum.'
+				$orgasm_or = 'yes'
 				gs 'stat'
-				act 'Move away':
+				act '69':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les7.jpg"></center>'
+					'Obviously still wanting more, Anya gets up and moves. She climbs on top of you and places her pussy above your face. You start licking her again, as she positions her face over your pussy and starts licking it again as well. The two of your lay there lapping at each others pussies in complete bliss. Until finally Anya''s body starts to convulse and she has a orgasm right on your face, as she grinds her pussy against you, riding out her orgasm.'
+					gs 'arousal', 'cuni_give', 5, 'lesbian', 'incest'
+					$orgasm_txt = '"Aaaaaaaaaaaa!!!" You catch a wave of pure bliss as you violently cum.'
+					$orgasm_or = 'yes'
+					gs 'arousal', 'cuni', 5, 'lesbian', 'incest'
 					gs 'arousal', 'end'
-					gs 'stat' 
-					gt 'bedrPar'
-				end
-				gs 'willpower', 'foreplay', 'self', 'medium'
-				if will_cost <= pcs_willpwr:
-					act 'Proceed (<<will_cost>> Willpower)':
+					gs 'stat'
+					act 'Aftermath':
 						*clr & cla
-						gs 'willpower', 'pay', 'self'
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/touch2.jpg"></center>'
-						'You continue to explore your sister''s hot body, your frisky fingers accidentally slipping between her legs. Her panties are wet, you gently pull her panties aside, exposing her wet pussy. Sensations of heat and moisture overwhelm you, her pussy is oozing with desire. Apparently she is having a sexual dream, or is it her response to your touch?'
-						'You are caught up in a fantasy, you start to lower your face to her pussy with your tongue out, wanting to taste her. When suddenly Anya stirs. "Fuck...Fuck..!" She''s waking up.'
-						'Sleepily Anya rolls over, looking up and sees you on her bed, as you hastily remove your hand and hide it behind your back.'
-						'"What...what''s going on here? <<$pcs_nickname>>? What are you doing?" She says as she sleepily sits up.'
-						'You sit in front of your sister on her bed, excited, caught off guard, and not knowing what to do.'
-						gs 'arousal', 'foreplay', 3, 'incest', 'lesbian'
-						gs 'stat'
-						act 'Act innocent':
-							*clr & cla
-							minut += 1
-							npc_rel['A33'] -= 10
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'
-							'You decide to do nothing and quietly move away from your sleepy sister, maybe she will forget it all for the morning'
-							'As you step away from her bed she calls to you.'
-							if sisterLesb = 1:
-								sisterLesb = 2
-								'"I do not want to know what you did to me while I was asleep, but don''t do it again."'
-							else
-								'"I told you last time I don''t want to do stuff with you, so please stop and don''t do it again." Then she rolls over angrily.'
-							end
-							gs 'arousal', 'end'
-							gs 'stat'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les8.jpg"></center>'
+						'Once her orgasm has fully passed she climbs off you and gets up on her knees and blushes deeply. "Look I had fun but lets forget this ever happened ok?"'
+						if sisterLesb = 4:
+							sisterLesb = 5
+							'You respond by getting up on your knees and kissing her, she returns the kiss. Once you finish kissing her you tell her. "Sure sis, nothing happened." You tell her in a slightly teasing tone.'
+							'She shakes her head. "I need to get some sleep. You need to go back to your bed and go to sleep too." With that she lays back down and rolls over facing away from you and tries to go back to sleep.'
 							act 'Move away':gt 'bedrPar'
-						end
-						gs 'willpower', 'foreplay', 'self', 'medium'
-						if will_cost <= pcs_willpwr:
-							act 'Kiss Anya (<<will_cost>> Willpower)':
+						else
+							act 'Accept her decision':
 								*clr & cla
-								gs 'willpower', 'pay', 'self'
+								sisterLesb = -1
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'					
+								'You put your best little sister pout on your face, but thinking she has already made her mind up, you shrug, and accept that you won''t be having any more private times with her.'
+								'She rolls over and goes to sleep.'
+								gs 'arousal', 'end'
 								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/touch3.jpg"></center>'
-								'With nothing to lose, you feel yourself filled with courage, and while Anya is still half asleep, you bring your face to hers and sensually kiss her on the lips.'
-								'Anya is too aroused and sleepy to think or resist, her soft body easily giving into your touches as you bring her pleasure.'
-								'Your fingers again slip under your sister''s panties, but now your affection is bold and confident.'
-								'She starts fully waking and breaks the kiss and looks at you in a confused way. "What are you doing?"'
-								gs 'arousal', 'foreplay', 2, 'incest', 'lesbian'
+								act 'Move away':gt 'bedrPar'
+							end
+							!! Flagged for skill check (instead of willpower check, which has been removed)
+							act 'Convince her otherwise':
+								*clr & cla
+								girl += 1
+								sisterLesb = 6
+								npc_rel['A33'] += 5
+								$orgasm_or = 'no'
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les8.jpg"></center>'
+								'"Anya, you don''t have to be a lesbian to enjoy a special release that only another woman can know how to give you.", you say as you begin lightly caressing her thigh.'
+								'"What if we agreed that we''ll help each other out only when we REALLLLYYYYY need it, but depend on our normal boyfriends most of the time, hmmm?". Her breathing starts to get faster as your fingertips glide to the center of her legs.'
+								*nl
+								'"Well... since you put it that way, I''m still not a lesbian, but helping each other out when we.... REALLLLYYYYY....need....mmmmmhhmmmm... help might be okay ....mmmmm..", she sighed, as she leans in and kisses you.'
+								*nl
+								'Once you break the kiss she adds. "Ok but seriously no more waking me up like this, we can ... when we really need it just tell the other one ok?" You nod and agree to not wake up her like this anymore, besides her into it from the start would be better anyways. Then she rolls over and tries to go to sleep. "Night" She tells you. You tell her good night as well and then go leave her to sleep.'
+								gs 'arousal', 'kiss', 3, 'incest'
+								gs 'arousal', 'forplay', 3, 'incest'
+								gs 'arousal', 'vaginal_finger', 3, 'incest'
+								$orgasm_txt = 'You both start feeling the heat, and lay down, kissing, touching, licking each other into orgasm.'
+								$orgasm_or = 'yes'
+								gs 'arousal', 'cuni', 3, 'incest'
+								gs 'arousal', 'end'
 								gs 'stat'
-								act 'Finger your sister':
-									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les3.jpg"></center>'
-									'You smile to her. "Shh... you looked stressed earlier and I thought I would help you out." You tell her as you slide your hand down her panties and then slip a finger inside of her soaking wet pussy. She grabs your wrist obviously intent on stopping you until her breath catches and you can see how turned on she is.'
-									'She slowly lets go of your wrist and just lays back spreading her legs and enjoying you fingering her. You pull her panties off and toss them aside and then go back to fingering her pussy as she starts to moan in pleasure.'
-									gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'incest'
-									gs 'stat'
-									act 'Keep fingering her':
-										*clr & cla
-										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les4.jpg"></center>'
-										'You slip another finger in her, now fingering her deeply with two fingers while your thumb rubs her clit. Anya lays all the way back and starts to moan louder, you lean forward and start kissing and sucking on her nipple as you keep finger banging her soaking wet pussy. Suddenly huddles in gentle convulsions and roughly orgasms, she looks at you with a gratefully, sleepy, but pleased look on her face and smiles.'
-										'"Well, aren''t you just the sweetest little sister. Now go to sleep." She says as she rolls over and nuzzles into her pillow, pulling her panties back up, as she goes back to sleep. You are really excited and even a little upset not to receive your own release, but you are satisfied for now.'
-										gs 'arousal', 'vaginal_finger_give', 5, 'lesbian', 'incest'
-										gs 'arousal', 'end'
-										gs 'stat'
-										act 'Move away':gt 'bedrPar'
-									end
-								end
-								act 'Tell her you want to have sex':
-									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les1.jpg"></center>'
-									'"I want to make you feel good, I want to make your orgasm." You tell her and then kiss her, she stiffens at the kiss but then relents and lets you kiss her, she is obviously turned on and trying to fight her desires.'
-									'Then she breaks the kiss and pulls her face a little ways away from yours. "No, it''s wrong, where sisters." She only sounds half convinced to you.'
-									act 'Say your sorry':
-										*clr & cla
-										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'
-										'You pull away from her. "Sorry, I didn''t think it was a big deal, just comforting each other." You say softly.'
-										'She sighs. "It''s fine, just don''t do it again, ok. It is wrong and I am into guys anyways." With that she rolls over and goes back to sleep.'
-										gs 'arousal', 'end'
-										gs 'stat'
-										act 'Move away':gt 'bedrPar'
-									end
-									gs 'willpower', 'sex', 'force', 'medium'
-									if will_cost <= pcs_willpwr:
-										act 'Convince her (<<will_cost>> Willpower)':
-											*clr & cla
-											gs 'willpower', 'pay', 'force'
-											gs 'stat'
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les2.jpg"></center>'
-											if sisterLesb <= 2:
-												sisterLesb = 3
-												'"Why is it wrong? We love each other and just making each other feel good, how can that be wrong?" You ask her as you pull her panties down, she only half heartedly resists you.'
-												'"You know why, where sisters and I like guys even if that wasn''t true." She says, still not really putting up much of a fight.'
-												'You push her legs apart and you can see her pussy is wet from here. "If it is so wrong, why is your pussy so wet?"'
-												'"I... I was having a sex dream is all." She explains.'
-											else
-												'"Did it feel wrong last time? I think you enjoyed it enough to cum, tell me you didn''t enjoy it?" You ask her as you pull her panties down, she only half heartedly resists you.'
-												'"It doesn''t matter, you can enjoy things that are wrong, it doesn''t make them any less wrong." She says, still not really putting up much of a fight.'
-												'You push her legs apart and you can see her pussy is wet from here. "If it is so wrong, why is your pussy so wet?"'
-												'"I... shut up." She says with a blush, knowing why she is wet and knowing you know why as well.'
-											end
-											gs 'arousal', 'foreplay', 5, 'incest', 'lesbian'
-											gs 'stat'
-											act 'Finger her':
-												*clr & cla
-												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les3.jpg"></center>'
-												'You reach down and slide two fingers into her soaking wet pussy, they easily slide in by how turned on she is. You start rubbing her clit with your other hand. She moans softly obviously enjoying the sensations.'
-												'She moans out. "We should stop."'
-												'You keep fingering her and rubbing her clit. "Do you really want me to stop?"'
-												'She moans louder. "Yes... no..."'
-												gs 'arousal', 'vaginal_finger_give', 5, 'incest', 'lesbian'
-												gs 'stat'
-												act 'Go down on her':
-													*clr & cla
-													'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les5.jpg"></center>'
-													'With that you move around and lay down between her legs and start licking and sucking on her clit with your mouth and tongue, as your fingers keep plunging in and out of her pussy.'
-													if sisterLesb = 3:
-														'She finally lays back and starts caress her breasts no longer resisting or even pretending to not enjoy it anymore.'
-													else
-														'She lays back and starts caress her breasts moaning passionately having fully given into your love making.'
-													end
-													gs 'arousal', 'cuni_give', 5, 'incest', 'lesbian'
-													gs 'arousal', 'vaginal_finger_give', -5, 'incest', 'lesbian'
-													gs 'stat'
-													act 'Have her return the favor':
-														*clr & cla
-														'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les6.jpg"></center>'
-														if sisterLesb = 3:
-															sisterLesb = 4
-															'You get up and strip down, you lay down near her head. She watches you with lust in her eyes, but you can still see a bit of resistance. Not wanting to give her time to recover, you reach over and pull her head between your legs. She resist for a moment and then stops, instead she starts to lick your pussy in return.'
-														else
-															'You get up and strip down, you lay down near her head. This time without even needing to prod her she rolls over and places her face between your legs and starts licking at your pussy and clit.'
-														end
-														gs 'arousal', 'cuni', 5, 'incest', 'lesbian'
-														$orgasm_txt = '"Aaaaaaaaaaaa!!!" You catch a wave of pure bliss as you violently cum.'
-														$orgasm_or = 'yes'
-														gs 'stat'
-														act '69':
-															*clr & cla
-															'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les7.jpg"></center>'
-															'Obviously still wanting more, Anya gets up and moves. She climbs on top of you and places her pussy above your face. You start licking her again, as she positions her face over your pussy and starts licking it again as well. The two of your lay there lapping at each others pussies in complete bliss. Until finally Anya''s body starts to convulse and she has a orgasm right on your face, as she grinds her pussy against you, riding out her orgasm.'
-															gs 'arousal', 'cuni_give', 5, 'lesbian', 'incest'
-															$orgasm_txt = '"Aaaaaaaaaaaa!!!" You catch a wave of pure bliss as you violently cum.'
-															$orgasm_or = 'yes'
-															gs 'arousal', 'cuni', 5, 'lesbian', 'incest'
-															gs 'arousal', 'end'
-															gs 'stat'
-															act 'Aftermath':
-																*clr & cla
-																'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les8.jpg"></center>'
-																if sisterLesb = 4:
-																	sisterLesb = 5
-																	'Once her orgasm has fully passed she climbs off you and gets up on her knees and blushes deeply. "Look I had fun but lets forget this ever happened ok?"'
-																	'You respond by getting up on your knees and kissing her, she returns the kiss. Once you finish kissing her you tell her. "Sure sis, nothing happened." You tell her in a slightly teasing tone.'
-																	'She shakes her head. "I need to get some sleep. You need to go back to your bed and go to sleep too." With that she lays back down and rolls over facing away from you and tries to go back to sleep.'
-																	act 'Move away':gt 'bedrPar'
-																else
-																	act 'Accept her decision':
-																		*clr & cla
-																		sisterLesb = -1
-																		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/home/sisboyqw_20.jpg"></center>'					
-																		'You put your best little sister pout on your face, but thinking she has already made her mind up, you shrug, and accept that you won''t be having any more private times with her.'
-																		'She rolls over and goes to sleep.'
-																		gs 'arousal', 'end'
-																		gs 'stat'
-																		act 'Move away':gt 'bedrPar'
-																	end
-																	gs 'willpower', 'sex', 'force', 'medium'
-																	if will_cost <= pcs_willpwr:
-																		act 'Convince her (<<will_cost>> Willpower)':
-																			*clr & cla
-																			gs 'willpower', 'pay', 'force'
-																			girl += 1
-																			sisterLesb = 6
-																			npc_rel['A33'] += 5 
-																			gs 'stat'
-																			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sex/les8.jpg"></center>'
-																			'"Anya, you don''t have to be a lesbian to enjoy a special release that only another woman can know how to give you.", you say as you begin lightly caressing her thigh.'
-																			'"What if we agreed that we''ll help each other out only when we REALLLLYYYYY need it, but depend on our normal boyfriends most of the time, hmmm?". Her breathing starts to get faster as your fingertips glide to the center of her legs.'
-																			*nl
-																			'"Well... since you put it that way, I''m still not a lesbian, but helping each other out when we.... REALLLLYYYYY....need....mmmmmhhmmmm... help might be okay ....mmmmm..", she sighed, as she leans in and kisses you.'
-																			*nl
-																			'Once you break the kiss she adds. "Ok but seriously no more waking me up like this, we can ... when we really need it just tell the other one ok?" You nod and agree to not wake up her like this anymore, besides her into it from the start would be better anyways. Then she rolls over and tries to go to sleep. "Night" She tells you. You tell her good night as well and then go leave her to sleep.'
-																			gs 'arousal', 'kiss', 3, 'incest'
-																			gs 'arousal', 'forplay', 3, 'incest'
-																			gs 'arousal', 'vaginal_finger', 3, 'incest'
-																			$orgasm_txt = 'You both start feeling the heat, and lay down, kissing, touching, licking each other into orgasm.'
-																			$orgasm_or = 'yes'
-																			gs 'arousal', 'cuni', 3, 'incest'
-																			gs 'arousal', 'end'
-																			gs 'stat'
-																			act 'Move away':gt 'bedrPar'
-																		end
-																	else
-																		act 'Convince her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-																	end
-																end
-															end
-														end
-													end
-												end
-											end
-										end
-									else
-										act 'Convince her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-									end
-								end
+								act 'Move away':gt 'bedrPar'
 							end
-						else
-							act 'Kiss Anya (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 						end
 					end
-				else
-					act 'Proceed (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end	
+				end
 			end
-		else
-			act 'Touch her (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 		end
 	end
 end
@@ -259,22 +261,17 @@ if $ARGS[0] = 'sister_sex':
 	sisterLesb += 1
 	if sisterLesb <= 6: 
 		gt 'sistersleep', 'sister_lesbian'
-	elseif sisterLesb >= 8: 
+	elseif sisterLesb < 8:
 		gt 'sistersleep', 'sister_strapon'
-	else 
-		gt 'sistersleep', 'sister_repeat'
+	else
+		if rand(1,3) = 1:
+			gt 'sistersleep', 'sister_strapon'
+		else
+			gt 'sistersleep', 'sister_lesbian'
+		end
 	end
 end
 
-if $ARGS[0] = 'sister_repeat':
-    sisterles = rand(1,3)
-    if sisterles = 1:
-        gt 'sistersleep', 'sister_strapon'
-    else
-        gt 'sistersleep', 'sister_lesbian'
-    end
-end
-
 if $ARGS[0] = 'sister_lesbian':
 	*clr & cla
 	npc_rel['A33'] += 1

+ 1 - 1
locations/start.qsrc

@@ -49,7 +49,7 @@ act '<center><b>Start</b></center>':
 		volume = 100
 		music_loop = 1
 	end
-	gt 'begin','real_character'
+	gt 'begin','warning'
 end
 
 act '<center><b>LOAD</b></center>':OPENGAME

+ 4 - 5
locations/street_event.qsrc

@@ -474,7 +474,7 @@ if $ARGS[1] = 'main':
 	if shantpopala > 0:
 		*clr & cla
 		menu_off = 1
-		hour += 8
+		minut += 480
 		spafinloc = 14
 		gs 'cum_manage'
 		spafinloc = 4
@@ -503,10 +503,9 @@ if $ARGS[1] = 'main':
 		'They got up and came back at you, barely a minute later you wished your were still knocked out, as these jackasses had their ways with you. You try to resist, but the tape hindered you from moving. Not long after, everything faded to black and you lost your consciousness again.'
 		'You feel groggy as you wake up, but it feels like someone is grapping you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he shouts, then kicks you into the stomach and leaves. As you collapse on the ground holding your stomach in pain, you take a glimpse at the street and see the assholes speed away in their black jeep. The main road is about 200m away, you crawl most of the way there, but soon you can walk again and eventually you find your way back to one of the mainstreets.'
 
-		gs 'arousal', 'bj', 40, 'group', 'rough', 'sub'
-		gs 'arousal', 'vaginal', 40, 'group', 'rough', 'sub'
-		gs 'arousal', 'anal', 40, 'group', 'rough', 'sub'
-		minut -= 40
+		gs 'arousal', 'bj', -40, 'group', 'rough', 'sub'
+		gs 'arousal', 'vaginal', -40, 'group', 'rough', 'sub'
+		gs 'arousal', 'anal', -40, 'group', 'rough', 'sub'
 		gs 'arousal', 'end'
 		gs 'stat'
 

+ 2 - 2
locations/tatiana_missions.qsrc

@@ -114,7 +114,7 @@ if $ARGS[0] = 'mission1':
 		else
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/trainstation/central_station_day.jpg"></center>'
 		end
-		hour += 1
+		minut += 60
 		'This time, you don''t walk far - she directs your steps towards the train station and inside where she buys two tickets for you.'
 		'"Where are we going exactly?"'
 		'"Pavlovsk," she replies, handing you your ticket.'
@@ -225,7 +225,7 @@ if $ARGS[0] = 'mission1':
 					act 'Try to follow the conversation':
 						*clr & cla
 						knowsfairy = 1
-						hour += 1
+						minut += 60
 						'You try to follow what they''re saying, you really do, but Tatiana''s questions are about the nature of fairy magic, how their dust works and where they get it from, if and when their glow changes, how fairies choose their homes, how they procreate, and many, many more that you can either see little point to or that you quite literally have trouble understanding.'
 						'About an hour passes like this and you are starting to get tired of standing around doing nothing, but it would seem that Tatiana has also remembered that you''re still there. Or maybe she''s just tired of the fairy giving her vague and confused answers, there''s really no telling which it is.'
 						'Regardless of the ''why'', the redhead finally stops talking and looks at you. "I think those may be enough questions for one day; and certainly enough for our first joint encounter with a magical being, wouldn''t you say?"'

+ 3 - 3
locations/trashplace.qsrc

@@ -378,10 +378,10 @@ if bomzQW = -10 and rand(0,5) = 0:
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/hobosgb.jpg"></center>'
 				'"What a lucky find" says the hobo holding you in place while the two others pull out from your mouth and move to their drunk friend, you still have no idea about what they''re talking about, but you''re suddenly lifted up and the free of them come back to you and you can see what this big discovery was, a rope !'
-				'"I don''t knot if that cunt is into bondage, but I''m getting bored of holding her" comments the one behind you. "That''s fine dude, leave it to us, you can have her ass when we''re done" retorts the hobo holding the rope while his two friends start pawing at your vulnerable tits "You will thank us after we''re done with you, bitch" one of them teases, and you remain speechless as the three men start tying you up with the rope, locking your arms in your back and painfully squeezing your breasts.'
-				'Soon enough they are done and all admire your vulnerable form, "Lets get this party started guys" says the one behind you, and the three others enthusiastically agree, one of them lays down on his back and the others lift you up, spread your legs and lower you on top of him, he then playfully slap your ass before reaching for his cock and guiding it against your snatch "Here we go" he teases before roughly thrusting upwards, hilting his cock ballsdeep in one go.'
+				'"I don''t know if that cunt is into bondage, but I''m getting bored of holding her" comments the one behind you. "That''s fine dude, leave it to us, you can have her ass when we''re done" retorts the hobo holding the rope while his two friends start pawing at your vulnerable tits "You will thank us after we''re done with you, bitch" one of them teases, and you remain speechless as the three men start tying you up with the rope, locking your arms in your back and painfully squeezing your breasts.'
+				'Soon enough they are done and all admire your vulnerable form, "Lets get this party started guys" says the one behind you, and the three others enthusiastically agree, one of them lays down on his back and the others lift you up, spread your legs and lower you on top of him, he then playfully slap your ass before reaching for his cock and guiding it against your snatch "Here we go" he teases before roughly thrusting upwards, hilting his cock balls deep in one go.'
 				'You wince at the sudden penetration but gather your thoughts, you know they''re only getting started, and you''re damn right, soon you feel a hand grabbing hold of your bonds. "I''m going in dry, slut" is the only warning you get before you feel a cock forcefully pushing against your vulnerable anus and making its way in your ass. The pain rapidly overcomes you and you scream, tears forming in your eyes while your whole body is frozen in shock.'
-				'"Be silent, fucking bitch." mutters one of the two other hobos who just moved in frond of you, he grabs your hair in one hand and roughly slaps your face with the other. "You''re gonna be a good girl and make me feel good with that mouth." he then calmly explains, you do your best to put yourself together and obediendly nob before leaning forward to engulf the head of his cock in your mouth, doing your best to make it an enjoyable experience for him.'
+				'"Be silent, fucking bitch." mutters one of the two other hobos who just moved in frond of you, he grabs your hair in one hand and roughly slaps your face with the other. "You''re gonna be a good girl and make me feel good with that mouth." he then calmly explains, you do your best to put yourself together and obediently nob before leaning forward to engulf the head of his cock in your mouth, doing your best to make it an enjoyable experience for him.'
 				gs 'arousal', 'bj', 20, 'rough', 'group', 'submissive', 'gangbang'
 				gs 'npcgeneratec', 0, 'hobo', rand(35,55)
 				gs 'boyStat', $npclastgenerated

+ 1 - 1
locations/version.qsrc

@@ -111,7 +111,7 @@ act 'Return': gt 'start'
 '- Options for car location actions sorted to add second layer for Pav and city locations to reduce the length of action list by Kevin Smarts'
 '- Orgasms restricted to direct stimulation only by Kevin Smarts, based on changes suggested by pb2eb'
 '- Night time bike ride of doom removed by Kevin Smarts'
-'- Virinity checker that let''s Sveta recall her first time from CroWke'
+'- Virginity checker that let''s Sveta recall her first time from CroWke'
 '- checker added to repo by bicobus'
 '- First part of Anna events at the station hotel from junjulang75 with code from julzor'
 '- Divorce party (street random events) from Akossi'

+ 1 - 0
locations/zaprFWash.qsrc

@@ -556,6 +556,7 @@ if $ARGS[0] = 'fuckAnal':
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/fuckanal' + rand(1,4) + '.mp4"></video></center>'
 	end
 	
+	gs 'arousal', 'auto_lube', 'anal'
 	if $ARGS[1] = 'Paid':
 		'You bend over and let the man start fucking your ass after you collect your money. His cock is still wet with your saliva as it slides inside you.'
 		gs 'arousal', 'anal', 30, 'sub', 'prostitution', 'unknown'