1
0
Selaa lähdekoodia

Update from 2018-06-26

Johnny Moreau 6 vuotta sitten
vanhempi
sitoutus
c595abcc63
61 muutettua tiedostoa jossa 3061 lisäystä ja 1463 poistoa
  1. 2 2
      MakeQSP.bat
  2. BIN
      glife_7.2.2+ IkarumodV20180612.qsp.zip
  3. 48 46
      locations/BDSM_Club.qsrc
  4. 125 117
      locations/Cheatmenu_din.qsrc
  5. 66 44
      locations/MagEncounterFairy.qsrc
  6. 163 163
      locations/MartinSex.qsrc
  7. 10 10
      locations/MartinSex2.qsrc
  8. 1 1
      locations/MartinSex3.qsrc
  9. 8 8
      locations/MartinTalk.qsrc
  10. 13 13
      locations/WorkHosp.qsrc
  11. 132 132
      locations/_attributes_swimwear.qsrc
  12. 60 0
      locations/_difficulty.qsrc
  13. 1 1
      locations/abduction.qsrc
  14. 1 1
      locations/andrey.qsrc
  15. 1 1
      locations/annafrends.qsrc
  16. 2 1
      locations/arousal.qsrc
  17. 2 2
      locations/artemEv.qsrc
  18. 2 2
      locations/billiard.qsrc
  19. 2 1
      locations/body.qsrc
  20. 54 97
      locations/brother.qsrc
  21. 266 0
      locations/brother2.qsrc
  22. 0 2
      locations/brother_lessons.qsrc
  23. 23 17
      locations/brother_voyeur.qsrc
  24. 3 1
      locations/buklinik_event.qsrc
  25. 117 99
      locations/cikl.qsrc
  26. 7 2
      locations/din_van.qsrc
  27. 2 2
      locations/dinfather.qsrc
  28. 0 1
      locations/fbDorm.qsrc
  29. 240 28
      locations/femcyc.qsrc
  30. 101 164
      locations/foto.qsrc
  31. 3 3
      locations/foto_models.qsrc
  32. 1 1
      locations/gargazel.qsrc
  33. 37 37
      locations/gpoli.qsrc
  34. 12 11
      locations/gschool_events.qsrc
  35. 45 41
      locations/kafe2.qsrc
  36. 24 22
      locations/kid.qsrc
  37. 2 2
      locations/kit_din.qsrc
  38. 437 0
      locations/lact_lib.qsrc
  39. 2 2
      locations/lesbidomhouse.qsrc
  40. 4 0
      locations/lesbimistress.qsrc
  41. 7 7
      locations/lesbisubhouse.qsrc
  42. 26 26
      locations/mitkasex.qsrc
  43. 7 7
      locations/obj_din.qsrc
  44. 37 37
      locations/poli.qsrc
  45. 1 1
      locations/preSYS.qsrc
  46. 7 7
      locations/preSYS2.qsrc
  47. 8 8
      locations/qwBarBilliard.qsrc
  48. 1 1
      locations/qwBarEncounters.qsrc
  49. 6 6
      locations/qwBarPolet.qsrc
  50. 2 1
      locations/saveupdater.qsrc
  51. 8 7
      locations/seeporn.qsrc
  52. 2 2
      locations/start.qsrc
  53. 73 84
      locations/stat_display.qsrc
  54. 4 4
      locations/stat_sklattrib.qsrc
  55. 2 2
      locations/stat_sklattrib_lvlset.qsrc
  56. 6 6
      locations/therapist.qsrc
  57. 61 2
      locations/traits.qsrc
  58. 1 2
      locations/ugol.qsrc
  59. 1 2
      locations/ugol1.qsrc
  60. 5 1
      locations/zaprF.qsrc
  61. 777 173
      locations/zaprFWash.qsrc

+ 2 - 2
MakeQSP.bat

@@ -2,7 +2,7 @@
 
 :: Set those lines to fit your setup. 
 :: This is where glife.qsp will be copied. If you don't want to move it just comment (::) the line below.
-:: set CP_TO=..\GL_ECV
+set CP_TO=..\Game
 
 :: This is the program used to open the QSPFILE. If you comment this line windows will launch the default app for the ".qsp" extension.
 set QSPGUI=QSP\Player-video\qspgui.exe
@@ -75,7 +75,7 @@ echo.
 echo Building ...
 
 @ECHO ON
-python -3 txtmerge.py locations glife.txt
+python txtmerge.py locations glife.txt
 txt2gam.exe glife.txt %QSPFILE% > nul
 @ECHO OFF
 

BIN
glife_7.2.2+ IkarumodV20180612.qsp.zip


+ 48 - 46
locations/BDSM_Club.qsrc

@@ -90,52 +90,54 @@ if $ARGS[0] = 'in':
 		'"Well," the woman puts her hands together and looks at you.  Who do you want to be? Top or bottom?'
 		'"I do not know,"  you shrug. "What does that mean?"'
 		'"Dominant or submissive?"'
-        act 'submissive':
-            cls
-            minut += 10
-            sub += 1
-            $BDSMrole = 's'
-            gs 'stat'
-            '<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/r<<BDSMmeet>>_2.jpg"></center>'
-            'The woman''s eyes light up. She stands up behind the desk and orders you.'
-            '"Stand up!"'
-            'You jump, than understand, why you did. The imperious voice of this Lady holds you in awe.'
-            '"No sitting lower in the presence of top. Understood?"'
-            '"Yes."'
-            '"Wrong! Try again!"'
-            '"Yes, Mistress."'
-            'The woman nods. "Undress!"'
-            '"But..."'
-            '"Undress, now! Or I''ll knock you out!" Mistress has her hand on the table.'
-            'You look to the man you were just talking to, but he just stands there, expressionless. You undress.'
-            '"Sign!"'
-            'You sign the document. The man places the paper in a folder.'
-            '"Listen carefully..."'
-            'She explains to you, that the club costs 20,000 <b>₽</b> per 30 days access, with a 10,000 ruble registration fee. For slaves there is a means for discount, if the slave is well behaved and earns enough merits, the membership will be automatically extended.'
-            'Untrained slaves are not allowed in the Mansion, you will require training. You''ll have to report to me for that, I''m going to enjoy it.'
-            '"Come back when you are ready for training. Be clean, have an enema. You must own a maid outfit, so you will be wearing it. Everything clear?'
-            '"But...  what if I don''t have a maid outfit?..." You whisper.'
-            '"Find a branch of G & M and buy one, and don''t forget to bring the first instalment of 10 thousand <b>₽</b>. We are not a charitable organization, nothing is free. However, if you prove yourself as a sub, you will be able to earn some tips in private sessions. But the main thing – do not talk. We have important clients, and don''t need advertising. Everything clear?"'
-            '"Clear... Mistress..."'
-            'As you are leaving, you think, where will you get the money for the down payment.'
-            act 'Logout':gt 'BDSM_Club', 'start'
-        end
-        act 'Dominant':
-            cls
-            minut += 10
-            $BDSMrole = 'd'
-            gs 'stat'
-            !'<center><img <<$set_imgh>> src="images/bdsm_club/<<$BDSMrole>><<BDSMmeet>>_2.jpg"></center>'
-            'The woman sighs disappointedly.'
-            '"Pity, we are short on subs."'
-            '"There is a registration fee of 10,000 <b>₽</b>. You should wear a expensive or formal clothing."'
-            '"That seems reasonable" You reply.'
-            '"If you find a submissive and come together, then they can earn you tips."'
-            '"Before you can get started, you will have some orientation under the guidance of an experienced mistress." She points at herself, "The cost of this is covered by your registation fee. If you are satisfied, sign this document."'
-            'You sign the document. The man places the paper in a folder.'
-            'As you are leaving, you think, where will you get the money for the registration fee and if you can persuade someone to come here as a sub.'
-            act 'Leave':gt 'BDSM_Club', 'start'
-        end
+
+			act 'submissive':
+				cls
+				minut += 10
+				sub += 1
+				$BDSMrole = 's'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/city/suburb/bdsm_club/r<<BDSMmeet>>_2.jpg"></center>'
+				'The woman''s eyes light up. She stands up behind the desk and orders you.'
+				'"Stand up!"'
+				'You jump, than understand, why you did. The imperious voice of this Lady holds you in awe.'
+				'"No sitting lower in the presence of top. Understood?"'
+				'"Yes."'
+				'"Wrong! Try again!"'
+				'"Yes, Mistress."'
+				'The woman nods. "Undress!"'
+				'"But..."'
+				'"Undress, now! Or I''ll knock you out!" Mistress has her hand on the table.'
+				'You look to the man you were just talking to, but he just stands there, expressionless. You undress.'
+				'"Sign!"'
+				'You sign the document. The man places the paper in a folder.'
+				'"Listen carefully..."'
+				'She explains to you, that the club costs 20,000 <b>₽</b> per 30 days access, with a 10,000 ruble registration fee. For slaves there is a means for discount, if the slave is well behaved and earns enough merits, the membership will be automatically extended.'
+				'Untrained slaves are not allowed in the Mansion, you will require training. You''ll have to report to me for that, I''m going to enjoy it.'
+				'"Come back when you are ready for training. Be clean, have an enema. You must own a maid outfit, so you will be wearing it. Everything clear?'
+				'"But...  what if I don''t have a maid outfit?..." You whisper.'
+				'"Find a branch of G & M and buy one, and don''t forget to bring the first instalment of 10 thousand <b>₽</b>. We are not a charitable organization, nothing is free. However, if you prove yourself as a sub, you will be able to earn some tips in private sessions. But the main thing – do not talk. We have important clients, and don''t need advertising. Everything clear?"'
+				'"Clear... Mistress..."'
+				'As you are leaving, you think, where will you get the money for the down payment.'
+				act 'Logout':gt 'BDSM_Club', 'start'
+			end
+
+			act 'Dominant':
+				cls
+				minut += 10
+				$BDSMrole = 'd'
+				gs 'stat'
+				!'<center><img <<$set_imgh>> src="images/bdsm_club/<<$BDSMrole>><<BDSMmeet>>_2.jpg"></center>'
+				'The woman sighs disappointedly.'
+				'"Pity, we are short on subs."'
+				'"There is a registration fee of 10,000 <b>₽</b>. You should wear a expensive or formal clothing."'
+				'"That seems reasonable" You reply.'
+				'"If you find a submissive and come together, then they can earn you tips."'
+				'"Before you can get started, you will have some orientation under the guidance of an experienced mistress." She points at herself, "The cost of this is covered by your registation fee. If you are satisfied, sign this document."'
+				'You sign the document. The man places the paper in a folder.'
+				'As you are leaving, you think, where will you get the money for the registration fee and if you can persuade someone to come here as a sub.'
+				act 'Leave':gt 'BDSM_Club', 'start'
+			end
 	end
 end
 

+ 125 - 117
locations/Cheatmenu_din.qsrc

@@ -702,7 +702,7 @@ $cheatmenu['stats'] = {
 	nl
 	pl'<b>Others:</b>'
 	pl 'Chess - Adjusted total (<<pcs_chess>>) - Skill level (<<chess_lvl>>): <a href="exec:chess_lvl += 1 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:chess_lvl += 5 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:chess_lvl += 10 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:chess_lvl -= 1 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:chess_lvl -= 5 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:chess_lvl -= 10 & chess_lvlst = chess_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
-	pl 'Gaming - Adjusted total (<<pcs_ttgmng>>) - Skill level (<<ttgmng_lvl>>): <a href="exec:ttgmng_lvl += 1 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:ttgmng_lvl += 5 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:ttgmng_lvl += 10 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:ttgmng_lvl -= 1 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:ttgmng_lvl -= 5 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:ttgmng_lvl -= 10 & ttgmng_lvlst = ttgmng_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
+	pl 'Gaming - Adjusted total (<<pcs_gaming>>) - Skill level (<<gaming_lvl>>): <a href="exec:gaming_lvl += 1 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:gaming_lvl += 5 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:gaming_lvl += 10 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:gaming_lvl -= 1 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:gaming_lvl -= 5 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:gaming_lvl -= 10 & gaming_lvlst = gaming_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
 	pl 'People - skills Adjusted total (<<pcs_humint>>) - Skill level (<<humint_lvl>>): <a href="exec:humint_lvl += 1 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:humint_lvl += 5 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:humint_lvl += 10 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:humint_lvl -= 1 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:humint_lvl -= 5 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:humint_lvl -= 10 & humint_lvlst = humint_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
 	pl 'Persuasion - Adjusted total (<<pcs_persuas>>) - Skill level (<<persuas_lvl>>): <a href="exec:persuas_lvl += 1 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:persuas_lvl += 5 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:persuas_lvl += 10 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:persuas_lvl -= 1 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:persuas_lvl -= 5 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:persuas_lvl -= 10 & persuas_lvlst = persuas_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
 	pl 'Observation - Adjusted total (<<pcs_observ>>) - Skill level (<<observ_lvl>>): <a href="exec:observ_lvl += 1 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:observ_lvl += 5 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >+5</a> <a href="exec:observ_lvl += 10 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:observ_lvl -= 1 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:observ_lvl -= 5 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >-5</a> <a href="exec:observ_lvl -= 10 & observ_lvlst = observ_lvl & dynamic $cheatmenu[''stats'']" >-10</a>'
@@ -733,10 +733,10 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_family = 1:
 			pl '<a href="exec:Enable_reputation_family = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl 'Stepfather: <<npc_rel[''A28'']>>  <a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl 'Mother: <<npc_rel[''A29'']>>  <a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl 'Sister: <<npc_rel[''A33'']>>  <a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl 'Brother: <<npc_rel[''A34'']>>  <a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Stepfather: <<npc_rel[''A28'']>>  <a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A28''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Mother: <<npc_rel[''A29'']>>  <a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A29''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Sister: <<npc_rel[''A33'']>>  <a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A33''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Brother: <<npc_rel[''A34'']>>  <a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A34''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		nl
@@ -747,18 +747,18 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_popular = 1:
 			pl '<a href="exec:Enable_reputation_popular = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <<npc_rel[''A1'']>>  <a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <<npc_rel[''A4'']>>  <a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <<npc_rel[''A14'']>>  <a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <<npc_rel[''A15'']>>  <a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <<npc_rel[''A17'']>>  <a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <<npc_rel[''A23'']>>  <a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <<npc_rel[''A146'']>>  <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <<npc_rel[''A147'']>>  <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <<npc_rel[''A148'']>>  <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if soniaPS = 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>  <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <<npc_rel[''A139'']>>  <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <<npc_rel[''A140'']>>  <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <<npc_rel[''A1'']>>  <a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A1''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <<npc_rel[''A4'']>>  <a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A4''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <<npc_rel[''A14'']>>  <a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A14''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <<npc_rel[''A15'']>>  <a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A15''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <<npc_rel[''A17'']>>  <a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A17''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <<npc_rel[''A23'']>>  <a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A23''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <<npc_rel[''A146'']>>  <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A146''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <<npc_rel[''A147'']>>  <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A147''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <<npc_rel[''A148'']>>  <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A148''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if soniaPS = 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>  <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <<npc_rel[''A139'']>>  <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A139''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <<npc_rel[''A140'']>>  <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A140''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		pl '<i>Athletes</i>'
@@ -767,16 +767,16 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_athletes = 1:
 			pl '<a href="exec:Enable_reputation_athletes = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <<npc_rel[''A3'']>>  <a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if fedormasha = 0: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>  <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <<npc_rel[''A8'']>>  <a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <<npc_rel[''A13'']>>  <a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if zverRageQW = 0 or zverRageQW = 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>  <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <<npc_rel[''A19'']>>  <a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <<npc_rel[''A22'']>>  <a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <<npc_rel[''A149'']>>  <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <<npc_rel[''A150'']>>  <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <<npc_rel[''A141'']>>  <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <<npc_rel[''A3'']>>  <a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A3''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if fedormasha = 0: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>  <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <<npc_rel[''A8'']>>  <a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A8''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <<npc_rel[''A13'']>>  <a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A13''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if zverRageQW = 0 or zverRageQW = 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>  <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <<npc_rel[''A19'']>>  <a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A19''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <<npc_rel[''A22'']>>  <a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A22''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <<npc_rel[''A149'']>>  <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A149''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <<npc_rel[''A150'']>>  <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A150''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <<npc_rel[''A141'']>>  <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A141''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		pl '<i>Nerds</i>'
@@ -785,14 +785,14 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_nerds = 1:
 			pl '<a href="exec:Enable_reputation_nerds = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <<npc_rel[''A2'']>>  <a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <<npc_rel[''A6'']>>  <a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <<npc_rel[''A12'']>>  <a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <<npc_rel[''A16'']>>  <a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <<npc_rel[''A151'']>>  <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>>  <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>>  <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>>  <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <<npc_rel[''A2'']>>  <a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A2''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <<npc_rel[''A6'']>>  <a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A6''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <<npc_rel[''A12'']>>  <a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A12''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <<npc_rel[''A16'']>>  <a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A16''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <<npc_rel[''A151'']>>  <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A151''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>>  <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>>  <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>>  <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		pl '<i>Gopniks</i>'
@@ -801,20 +801,20 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_gopniks = 1:
 			pl '<a href="exec:Enable_reputation_gopniks = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <<npc_rel[''A9'']>>  <a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <<npc_rel[''A10'']>>  <a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <<npc_rel[''A11'']>>  <a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <<npc_rel[''A20'']>>  <a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <<npc_rel[''A21'']>>  <a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <<npc_rel[''A24'']>>  <a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <<npc_rel[''A154'']>>  <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <<npc_rel[''A155'']>>  <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <<npc_rel[''A156'']>>  <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <<npc_rel[''A157'']>>  <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <<npc_rel[''A158'']>>  <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <<npc_rel[''A143'']>>  <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <<npc_rel[''A144'']>>  <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <<npc_rel[''A145'']>>  <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <<npc_rel[''A9'']>>  <a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A9''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <<npc_rel[''A10'']>>  <a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A10''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <<npc_rel[''A11'']>>  <a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A11''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <<npc_rel[''A20'']>>  <a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A20''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <<npc_rel[''A21'']>>  <a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A21''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <<npc_rel[''A24'']>>  <a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A24''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <<npc_rel[''A154'']>>  <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A154''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <<npc_rel[''A155'']>>  <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A155''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <<npc_rel[''A156'']>>  <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A156''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <<npc_rel[''A157'']>>  <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A157''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <<npc_rel[''A158'']>>  <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A158''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <<npc_rel[''A143'']>>  <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A143''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <<npc_rel[''A144'']>>  <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A144''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <<npc_rel[''A145'']>>  <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A145''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		pl '<i>Outcasts/Loners</i>'
@@ -823,11 +823,11 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_outcasts = 1:
 			pl '<a href="exec:Enable_reputation_outcasts = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <<npc_rel[''A7'']>>  <a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if soniaPS > 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>  <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if zverRageQW > 1 and zverRageQW < 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>  <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if fedormasha = 1: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>  <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <<npc_rel[''A159'']>>  <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <<npc_rel[''A7'']>>  <a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A7''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if soniaPS > 0: pl '<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>  <a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if zverRageQW > 1 and zverRageQW < 10: pl '<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>  <a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if fedormasha = 1: pl '<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>  <a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <<npc_rel[''A159'']>>  <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A159''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		pl '<i>Teachers/Coaches</i>'
@@ -836,43 +836,43 @@ $cheatmenu['reputation'] = {
 		end
 		if Enable_reputation_teachers = 1:
 			pl '<a href="exec:Enable_reputation_teachers = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			pl '<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <<npc_rel[''A26'']>>  <a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl 'Mikhail Nikolayevich: <<npc_rel[''A69'']>>  <a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <<npc_rel[''A128'']>>  <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <<npc_rel[''A129'']>>  <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <<npc_rel[''A130'']>>  <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <<npc_rel[''A131'']>>  <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <<npc_rel[''A132'']>>  <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <<npc_rel[''A133'']>>  <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <<npc_rel[''A134'']>>  <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <<npc_rel[''A135'']>>  <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <<npc_rel[''A136'']>>  <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <<npc_rel[''A137'']>>  <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			pl '<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <<npc_rel[''A138'']>>  <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <<npc_rel[''A26'']>>  <a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A26''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Mikhail Nikolayevich: <<npc_rel[''A69'']>>  <a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A69''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <<npc_rel[''A128'']>>  <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A128''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <<npc_rel[''A129'']>>  <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A129''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <<npc_rel[''A130'']>>  <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A130''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <<npc_rel[''A131'']>>  <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A131''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <<npc_rel[''A132'']>>  <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A132''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <<npc_rel[''A133'']>>  <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A133''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <<npc_rel[''A134'']>>  <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A134''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <<npc_rel[''A135'']>>  <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A135''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <<npc_rel[''A136'']>>  <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A136''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <<npc_rel[''A137'']>>  <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A137''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl '<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <<npc_rel[''A138'']>>  <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A138''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		nl
 		nl
 		pl '<font color="blue"><b>Others</b></font>'
 		nl
 		if npc_rel['A112'] >= 0:
-			pl 'Sergei Shulgin: <<npc_rel[''A112'']>>  <a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			pl 'Sergei Shulgin: <<npc_rel[''A112'']>>  <a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A112''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 	end
 	nl
 	if npc_rel['A219'] >= 0:
-		pl 'Kat: <<npc_rel[''A219'']>>  <a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Kat: <<npc_rel[''A219'']>>  <a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A219''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A218'] >= 0:
 		pl 'Tanya: <<npc_rel[''A218'']>>  <a href="exec:npc_rel[''A218''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A218''] & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A220'] >= 0:
-		pl 'Vika: <<npc_rel[''A220'']>>  <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Vika: <<npc_rel[''A220'']>>  <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A220''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A93'] >= 0:
-		pl 'Irina: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Irina: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A43'] >= 0:
-		pl 'Tamara: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Tamara: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if alla >= 0:
 		pl 'Alla: <<alla>>  <a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
@@ -881,19 +881,19 @@ $cheatmenu['reputation'] = {
 		pl 'Masha: <<masha>>  <a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A41'] >= 0:
-		pl 'Givi: <<npc_rel[''A41'']>>  <a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Givi: <<npc_rel[''A41'']>>  <a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A41''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A42'] >= 0:
-		pl 'Ashot: <<npc_rel[''A42'']>>  <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Ashot: <<npc_rel[''A42'']>>  <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A42''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if afra >= 0:
 		pl 'Black Guys: <<afra>>  <a href="exec:afra += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:afra -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A89'] >= 0:
-		pl 'Eugene: <<npc_rel[''A89'']>>  <a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Eugene: <<npc_rel[''A89'']>>  <a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A89''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A217'] >= 0:
-		pl 'Pavlin: <<npc_rel[''A217'']>>  <a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Pavlin: <<npc_rel[''A217'']>>  <a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A217''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if hantersAndreiQw >= 0:
 		pl 'Hunter Andrew: <<hantersAndreiQw>>  <a href="exec:hantersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:hantersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
@@ -905,7 +905,7 @@ $cheatmenu['reputation'] = {
 		pl 'Hunter Igor: <<hantersIgorQw>>  <a href="exec:hantersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:hantersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 	if npc_rel['A217'] >= 0:
-		pl 'Martin: <<npc_rel[''A216'']>>  <a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		pl 'Martin: <<npc_rel[''A216'']>>  <a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A216''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 	end
 
 	if pcs_lovers[0] = 1:
@@ -957,9 +957,7 @@ $cheatmenu['reputation'] = {
 				pl'Your mother thinks that you are a virgin. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
 			end
 			nl
-			if brotherSex >= 1:
-				pl'Your brother thinks you are a slut. <a href="exec:brotherSex = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-			elseif evgenQW >= 3:
+			if evgenQW >= 3:
 				pl'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
 			end
 			if brotherknowslut = 1: pl'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
@@ -1347,6 +1345,7 @@ $cheatmenu['display'] = {
 
 	pl 'Mod management page: <a href="exec:gt ''mod_setting''">Here</a>'
 
+
 	if Enable_nogameover = 1:
 		pl'Prevent Non-Drama GAMEOVER: Currently ON - <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
 	else
@@ -1385,6 +1384,15 @@ $cheatmenu['display'] = {
 		pl'Editing of the names of the porn movies you stared disabled: Currently OFF - <a href="exec:editpornname = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
 	end
 	nl
+
+	pl '<center><B>Difficulty Setting</B></center>'
+
+	pl 'Difficulty: Currenty at <<func(''_difficulty'',''getdifficulty'')>>'
+	pl '<ul><li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''easy peasy'') & dynamic $cheatmenu[''display'']">easy peasy</a></li>'
+	pl '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''relaxed'') & dynamic $cheatmenu[''display'']">relaxed</a></li>'
+	pl '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''realistic'') & dynamic $cheatmenu[''display'']">realistic</a></li>'
+	pl '<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''hardcore'') & dynamic $cheatmenu[''display'']">hardcore</a></li></ul>'
+	nl
 	pl '<center><B>Display Setting</B></center>'
 	if set_imgh > 0: set_imgw = 0
 	if set_imgw > 0: set_imgh = 0
@@ -1619,43 +1627,43 @@ $cheatmenu['pain'] = {
 	pl '<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a></center>'
 	nl
 	pl '<a href="exec:killvar ''pain'' & dynamic $cheatmenu[''pain'']">No pain</a>'
-	pl 'pain[head] = <<pain[''head'']>> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[hair] = <<pain[''hair'']>> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[ears] = <<pain[''ears'']>> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[eyebrows] = <<pain[''ears'']>> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[eyes] = <<pain[''eyes'']>> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[cheeks] = <<pain[''cheeks'']>> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[nose] = <<pain[''nose'']>> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[mouth] = <<pain[''mouth'']>> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[lips] = <<pain[''lips'']>> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[tongue] = <<pain[''tongue'']>> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[throat] = <<pain[''throat'']>> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[neck] = <<pain[''neck'']>> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[back] = <<pain[''back'']>> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[asscheeks] = <<pain[''asscheeks'']>> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[asshole] = <<pain[''asshole'']>> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[hips] = <<pain[''hips'']>> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[thighs] = <<pain[''thighs'']>> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[left leg] = <<pain[''legL'']>> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[right leg] = <<pain[''legR'']>> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[feet] = <<pain[''feet'']>> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[toes] = <<pain[''toes'']>> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[shoulders] = <<pain[''shoulders'']>> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[left arm] = <<pain[''armL'']>> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[right arm] = <<pain[''armR'']>> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[hands] = <<pain[''hands'']>> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[fingers] = <<pain[''fingers'']>> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[chest] = <<pain[''chest'']>> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[breasts] = <<pain[''breasts'']>> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[nipples] = <<pain[''nipples'']>> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[ribs] = <<pain[''ribs'']>> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[tummy] = <<pain[''tummy'']>> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[pubic] = <<pain[''pubic'']>> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[vaginal] = <<pain[''vaginal'']>> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[labia] = <<pain[''labia'']>> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[clitoris] = <<pain[''clitoris'']>> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[urethra] = <<pain[''urethra'']>> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	pl 'pain[cervix] = <<pain[''cervix'']>> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[head] = <<pain[''head'']>> <a href="exec:pain[''head''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[hair] = <<pain[''hair'']>> <a href="exec:pain[''hair''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[ears] = <<pain[''ears'']>> <a href="exec:pain[''ears''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[eyebrows] = <<pain[''ears'']>> <a href="exec:pain[''eyebrows''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[eyes] = <<pain[''eyes'']>> <a href="exec:pain[''eyes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[cheeks] = <<pain[''cheeks'']>> <a href="exec:pain[''cheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[nose] = <<pain[''nose'']>> <a href="exec:pain[''nose''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[mouth] = <<pain[''mouth'']>> <a href="exec:pain[''mouth''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[lips] = <<pain[''lips'']>> <a href="exec:pain[''lips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[tongue] = <<pain[''tongue'']>> <a href="exec:pain[''tongue''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[throat] = <<pain[''throat'']>> <a href="exec:pain[''throat''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[neck] = <<pain[''neck'']>> <a href="exec:pain[''neck''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[back] = <<pain[''back'']>> <a href="exec:pain[''back''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[asscheeks] = <<pain[''asscheeks'']>> <a href="exec:pain[''asscheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[asshole] = <<pain[''asshole'']>> <a href="exec:pain[''asshole''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[hips] = <<pain[''hips'']>> <a href="exec:pain[''hips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[thighs] = <<pain[''thighs'']>> <a href="exec:pain[''thighs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[left leg] = <<pain[''legL'']>> <a href="exec:pain[''legL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[right leg] = <<pain[''legR'']>> <a href="exec:pain[''legR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[feet] = <<pain[''feet'']>> <a href="exec:pain[''feet''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[toes] = <<pain[''toes'']>> <a href="exec:pain[''toes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[shoulders] = <<pain[''shoulders'']>> <a href="exec:pain[''shoulders''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[left arm] = <<pain[''armL'']>> <a href="exec:pain[''armL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[right arm] = <<pain[''armR'']>> <a href="exec:pain[''armR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[hands] = <<pain[''hands'']>> <a href="exec:pain[''hands''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[fingers] = <<pain[''fingers'']>> <a href="exec:pain[''fingers''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[chest] = <<pain[''chest'']>> <a href="exec:pain[''chest''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[breasts] = <<pain[''breasts'']>> <a href="exec:pain[''breasts''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[nipples] = <<pain[''nipples'']>> <a href="exec:pain[''nipples''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[ribs] = <<pain[''ribs'']>> <a href="exec:pain[''ribs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[tummy] = <<pain[''tummy'']>> <a href="exec:pain[''tummy''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[pubic] = <<pain[''pubic'']>> <a href="exec:pain[''pubic''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[vaginal] = <<pain[''vaginal'']>> <a href="exec:pain[''vaginal''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[labia] = <<pain[''labia'']>> <a href="exec:pain[''labia''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[clitoris] = <<pain[''clitoris'']>> <a href="exec:pain[''clitoris''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[urethra] = <<pain[''urethra'']>> <a href="exec:pain[''urethra''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	pl 'pain[cervix] = <<pain[''cervix'']>> <a href="exec:pain[''cervix''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
 }
 
 $cheatmenu['DNA'] = {

+ 66 - 44
locations/MagEncounterFairy.qsrc

@@ -80,7 +80,7 @@ end
 if $ARGS[0] = 'fairy_chat':
 	cls
 	gs 'stat'
-	'You take the few steps over to the glowing orb that apparently only you can recognize as what it truely is: a fairy.'
+	'You take the few steps over to the glowing orb that apparently only you can recognize as what it truly is: a fairy.'
 	act 'Chat with the fairy':
 		cls
 		minut += 30
@@ -93,12 +93,12 @@ if $ARGS[0] = 'fairy_chat':
 		pcs_manna += 25 * pcs_magik
 		pcs_mood += 15
 		gs 'MagEncounterFairy', 'fairychattopic'
-		if pcs_skin < 80 and fairyday < daystart and fairyshoo = 0:
+		if pcs_skin < 80 and fairyday ! daystart and fairyshoo = 0:
 			pcs_skin += 10
 			fairyday = daystart
 			gs 'stat'
 			'The fairy bids you farewell.'
-			''
+			*nl
 			wait 725
 			'Just as she flies off, she returns fluttering in front of your face.'
 			'"You know, you could still look lovelier.", she says. "Don''t move."'
@@ -110,60 +110,81 @@ if $ARGS[0] = 'fairy_chat':
 			fairyday = daystart
 			gs 'stat'
 			'The fairy bids you farewell.'
-			''
+			*nl
 			wait 725
 			'Just as she flies off, she returns fluttering in front of your face.'
 			'"You know, you''re almost a magical creature now.", she says. "Don''t move."'
 			'Remembering the last time you hold your breath and close your eyes. Just a moment later you feel a much more intense tingling, this time seeming to go all the way through you.'
-		elseif fairyday < daystart and (pcs_nips < 80 or clit_size < 80):
+		elseif fairyday ! daystart and (pcs_nips < 80 or clit_size < 80):
 			fairyday = daystart
 			gs 'stat'
-
-			'The fairy takes another quick look at you, rubs her chin, and says "Hmm, since you''ve been a little nice to me, maybe I could be a little nice to you. Nips or Bud?"'
+			'The fairy takes another quick look at you, rubs her chin, and says "Hmm, since you''ve been a little nice to me, maybe I could be a little nice to you."'
 			act 'Huh?':
 				cls
-				' '
+				*nl
 				'You look at her, puzzled, wondering if you heard her right.  She just shrugs her shoulders and says "Okay, if you''re not interested"'
 				act 'Go on your way': gt $loc, $metka
 			end
-
-			act 'Nips?':
+			act 'Sure':
 				cls
-				pcs_nips += 5
-				pcs_horny += 10
-				gs 'stat'
-				if pcs_nips < 20:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples1.jpg"></center>'
-				if pcs_nips >= 20 and pcs_nips < 40:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples2.jpg"></center>'
-				if pcs_nips >= 40 and pcs_nips < 60:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples3.jpg"></center>'
-				if pcs_nips >= 60 and pcs_nips < 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples4.jpg"></center>'
-				if pcs_nips >= 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples5.jpg"></center>'
-				'She giggles in her little squeaky voice, "Ohh, goodie!", and throws something sparkly at your chest.  Suddenly, your nipples get really firm and pointed, and seem to be a bit larger now.'
-				'You can''t help but rub both breasts, feeling the warm tingling in them, and in your pussy.'
-				'The fairy admires the changes she''s made, and smiles at you.'
-				'You two say your goodbyes and the fairy flies off.'
+				fday_surprise += 1
+				fairy_surprise = RAND(1,9)
+				if fairy_surprise =< 2:
+					pcs_nips += 5
+					pcs_horny += 10
+					gs 'stat'
+					if pcs_nips < 20:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples1.jpg"></center>'
+					if pcs_nips >= 20 and pcs_nips < 40:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples2.jpg"></center>'
+					if pcs_nips >= 40 and pcs_nips < 60:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples3.jpg"></center>'
+					if pcs_nips >= 60 and pcs_nips < 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples4.jpg"></center>'
+					if pcs_nips >= 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples5.jpg"></center>'
+					'You hear a giggle.  Suddenly, your nipples get really firm and pointed, and seem to be a bit larger now.'
+					'You can''t help but rub both breasts, feeling the warm tingling in them, and in your pussy.'
+				elseif fairy_surprise = 3:
+					pcs_nips -= 5
+					gs 'stat'
+					if pcs_nips < 20:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples1.jpg"></center>'
+					if pcs_nips >= 20 and pcs_nips < 40:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples2.jpg"></center>'
+					if pcs_nips >= 40 and pcs_nips < 60:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples3.jpg"></center>'
+					if pcs_nips >= 60 and pcs_nips < 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples4.jpg"></center>'
+					if pcs_nips >= 80:'<center><img <<$set_imgh>> src="images/pc/body/nipples/nipples5.jpg"></center>'
+					'You hear a giggle.  Suddenly, your nipples get really firm and pointed, yet seem to be smaller then before.'
+					'You can''t help but rub both breasts, feeling the warm tingling in them, and in your pussy.'
+				elseif fairy_surprise <= 4:
+					clit_size += 5
+					pcs_horny += 10
+					gs 'stat'
+					if clit_size < 20:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit1.jpg"></center>'
+					if clit_size >= 20 and clit_size < 40:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit2.jpg"></center>'
+					if clit_size >= 40 and clit_size < 60:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit3.jpg"></center>'
+					if clit_size >= 60 and clit_size < 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit4.jpg"></center>'
+					if clit_size >= 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit5.jpg"></center>'
+					'You hear a giggle and you feel a warm tingle at the top of your slit, you reach down and part your pussy lips with your fingers.'
+					'Your clitoris has swollen, and seems to stand out even more than before! You can''t help but rub all around it, feeling the warm tingling and the moisture build at the entrance.'
+					'The fairy admires the changes she''s made, and smiles at you, looking again at your puffy pussy and licking her lips.'
+					'You two say your goodbyes and the fairy flies off.'
+				elseif fairy_surprise = 5:
+					clit_size -= 5
+					gs 'stat'
+					if clit_size < 20:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit1.jpg"></center>'
+					if clit_size >= 20 and clit_size < 40:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit2.jpg"></center>'
+					if clit_size >= 40 and clit_size < 60:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit3.jpg"></center>'
+					if clit_size >= 60 and clit_size < 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit4.jpg"></center>'
+					if clit_size >= 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit5.jpg"></center>'
+					'You hear a giggle and you feel a warm tingle at the top of your slit, you reach down and part your pussy lips with your fingers.'
+					'Your clitoris has shunk, and seems to more demure than before! You can''t help but rub all around it, feeling the warm tingling and the moisture build at the entrance.'
+				elseif fairy_surprise <= 7:
+					min_arousal += rand(1,5)
+					'You hear a giggle, then sparkles surround your body and you get all tingly.'
+					'You suddenly feel flustered and more aroused then before.'
+				else
+					min_arousal -= rand(1,5)
+					'You hear a giggle, then sparkles surround your body and you get all tingly.'
+					'You suddenly feel colder and less aroused then before.'
+				end
 				act 'Go on your way': gt $loc, $metka
 			end
-
-			act 'Bud?':
-				cls
-				clit_size += 5
-				pcs_horny += 10
-				gs 'stat'				
-				if clit_size < 20:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit1.jpg"></center>'
-				if clit_size >= 20 and clit_size < 40:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit2.jpg"></center>'
-				if clit_size >= 40 and clit_size < 60:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit3.jpg"></center>'
-				if clit_size >= 60 and clit_size < 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit4.jpg"></center>'
-				if clit_size >= 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit5.jpg"></center>'
-				'She giggles in her little squeaky voice, "Ohh, goodie!", and throws something sparkly at your hips.'
-				'Suddenly, you feel a warm tingle at the top of your slit, and, after taking a quick glance around to make sure nobody is looking, you reach down and part your pussy lips with your fingers.'
-				'Your clitoris has swollen, and seems to stand out even more than before! You can''t help but rub all around it, feeling the warm tingling and the moisture build at the entrance.'
-				'The fairy admires the changes she''s made, and smiles at you, looking again at your puffy pussy and licking her lips.'
-				'You two say your goodbyes and the fairy flies off.'
-				act 'Go on your way': gt $loc, $metka						
-			end
-
 		end
-		act 'Go on your way': gt $loc, $metka
 	end
 end
 
@@ -172,7 +193,7 @@ killvar '$din_fairy_chat_no1' & killvar '$din_fairy_shoo' & killvar '$din_fairy_
 if $ARGS[0] = 'fairychattopic':
 !!	These are the random chat texts for the Fairy from UsagiTripleSix
 	frandchat = rand(0,14)
-	
+
 	if frandchat = 1:
 		'You spend a while chatting with the fairy. She openly wonders why human children need to go to school, and brags about how fairies already know everything there is to know.'
 	elseif frandchat = 2:
@@ -204,7 +225,8 @@ if $ARGS[0] = 'fairychattopic':
 	else
 		'Today the fairy introduces you to fairy knock-knock jokes. She spends almost half an hour telling joke after joke, but you failed to understand a single one. By the time you''re ready to leave, she''s complaining about how humans have no sense of humor.'
 	end
-	
+
+	act 'Go on your way': gt $loc, $metka
 	killvar 'frandchat'
 
 end

+ 163 - 163
locations/MartinSex.qsrc

@@ -17,18 +17,18 @@ if $ARGS[0] = '':
 	minut += 1
 	npc_rel['A216'] += rand(0,1)
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinAfterHours.jpg"></center>'
-	
+
 	if MartinSexTalk = 0 and MartinSex = 0:
 		'You approach Martin as he''s cleaning the floor. The bartender raises his head when he notices you.'
 		'"Oh, I didn''t think you were still here, <<$pcs_firstname>>."'
 		'You pout your <<$pcdesc_lipsrandom>> lips. "If you are that unhappy about it, maybe you want me to leave?"'
 		'He gives you a half-smile. "No, of course not."'
 		'"Thought so," you say, smiling back.'
-		
+
 		if MartinTalkVar < 9:
 			*nl
 			'You haven''t known Martin for very long, so this may be a good opportunity to talk a little more.'
-			
+
 			act 'Chat with Martin':
 				cla
 				minut += 30
@@ -39,10 +39,10 @@ if $ARGS[0] = '':
 				'Every now and then, you get a little flirty or add a double entendre, but you keep the conversation light and friendly overall, same as you would during your regular visits and talks. You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things.'
 				*nl
 				'After about half an hour, you decide that you should let Martin finish up for the night. After a brief but friendly goodnight, you leave your friend to himself and exit the bar.'
-				
+
 				act 'Leave': gt 'nord'
 			end
-			
+
 			act 'Leave the bar':
 				cla
 				minut += 5
@@ -57,19 +57,19 @@ if $ARGS[0] = '':
 				'"And you be careful on the way home," Martin admonishes.'
 				*nl
 				'You share a brief, friendly hug and goodbye before you turn and leave the bar.'
-				
+
 				act 'Leave': gt 'nord'
-			end 
-			
+			end
+
 		else
 			*nl
-			'As nice as this exchange is, something is different about this, you can tell. You have been chatting with him for a while now and yet you have never felt this... tense before, as if you were mentally preparing for something.' 
+			'As nice as this exchange is, something is different about this, you can tell. You have been chatting with him for a while now and yet you have never felt this... tense before, as if you were mentally preparing for something.'
 			'But it''s not just you: You have had plenty of time to watch him while he worked, seen the way he looks at the women who come to the bar, even the attractive ones: He is appreciative of beauty but self-confident enough to not try to hide his brief stare. The way his eyes jump down to your curves, lingering on your' + iif(tatback>0,'tattooed ','') + 'back, ass,' + iif(tatupb>0,' the tramp stamp in between,','') + ' and ' + iif(tatleg>0,'tattooed ','') + 'legs for a moment before jumping back, as if he couldn''t keep himself from doing it but didn''t want you to notice... It''s almost like he''s a different man. And not an unattractive one at that...'
-			
+
 			act 'Leave the bar':
 				cla
 				minut += 2
-				pcs_mood += rand(0,1)
+				pcs_mood -= rand(0,1)
 				*nl
 				'"Just wanted to say goodnight before I leave," you say, feeling a little tense and unhappy with yourself for running away instead of dealing with whatever emotional dilemma you are facing.'
 				*nl
@@ -79,10 +79,10 @@ if $ARGS[0] = '':
 				*nl
 				'You share a brief, friendly hug and goodbye before you turn and leave the bar, wondering if or when you will gather the courage to talk about this with Martin.'
 				'<i>Maybe tomorrow</i>, you think to yourself.'
-					
+
 				act 'Leave': gt 'nord'
-			end 
-			
+			end
+
 			act 'Keep it light - Talk to Martin':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinAfterHours.jpg"></center>'
@@ -97,10 +97,10 @@ if $ARGS[0] = '':
 				*nl
 				'After about half an hour, you decide that you should let Martin finish up for the night. After a brief but friendly goodnight, you leave the bar with a tingly stomach - whether it''s purely from lustful longing or more, you''re not sure, but you know that the only way to find out is to talk to Martin when he''s alone again.'
 				'<i>Maybe tomorrow</i>, you think to yourself.'
-				
+
 				act 'Leave the bar': gt 'nord'
 			end
-			
+
 			act 'Go for it - Flirt with him':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinFlirt.jpg"></center>'
@@ -119,34 +119,34 @@ if $ARGS[0] = '':
 				'You get closer to him, an inch away from touching him, and lower your voice to a whisper. "If I''m that smart, why don''t you let me decide what I want?"'
 				'He looks at you, longing but self-possessed. "Some decisions are better made for you."'
 				*nl
-				if exhibitionism > 20 and pcs_dom > 30 and cycle ! 0:
+				if exhibitionist_lvl > 0 and pcs_dom > 30 and cycle ! 0:
 					'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind.'
-				elseif exhibitionism > 20 and pcs_dom > 30 and cycle = 0:
+				elseif exhibitionist_lvl > 0 and pcs_dom > 30 and cycle = 0:
 					'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind, but then you remember that you are on your period, so stripping isn''t really a sexy option right now.'
 				end
-				
-				if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
+
+				if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
 					'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be.'
-				elseif exhibitionism > 20 and pcs_dom > 50 and cycle = 0:
+				elseif exhibitionist_lvl > 0 and pcs_dom > 50 and cycle = 0:
 					'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be, and your period certainly isn''t going to stand in the way of <i>that</i>.'
 				end
-				
-				if exhibitionism > 20 and pcs_dom > 30 and cycle ! 0:
+
+				if exhibitionist_lvl > 0 and pcs_dom > 30 and cycle ! 0:
 					act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 				end
-				
-				if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20:
+
+				if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
 					act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 				end
-				
+
 				act 'I understand (calm)':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinUnderstand.jpg"></center>'
 					MartinSexTalk = 2
 					npc_rel['A216'] += 1
-					pcs_mood += 4
+					pcs_mood -= 4
 					*nl
-					'Could he be right? Maybe it really isn''t a good idea to act on this. He is old enough to be your father, after all; and right now, you are friends and everything is fine - why risk that for a bit of fun?' 
+					'Could he be right? Maybe it really isn''t a good idea to act on this. He is old enough to be your father, after all; and right now, you are friends and everything is fine - why risk that for a bit of fun?'
 					*nl
 					'"I understand... I guess." You step back. Of course, you feel a little rejected, but your mind is working hard to convince you that it''s better this way.'
 					'"Good," Martin gives a sigh of relief. You could tell that he was holding himself back, but the sigh gives you an impression of how much of an effort that really was for him. "I don''t want this to stand between us, <<$pcs_firstname>>, I just... Uh..." He trails off, unsure what to say.'
@@ -156,16 +156,16 @@ if $ARGS[0] = '':
 					'"Sure, I''ll be around."'
 					*nl
 					'You give him as much of a smile as you can manage, turn around and leave the bar, utterly confused as to what you want.'
-					
+
 					act 'Leave the bar': gt 'nord'
 				end
-				
+
 				act 'Storm out (angry)':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinAngry.jpg"></center>'
 					MartinSexTalk = 1
 					MartinSexTalkDay = daystart
-					pcs_mood += 8
+					pcs_mood -= 8
 					*nl
 					$OpenInnerThought+'Too young? Really?'+$CloseInnerThought
 					'Being treated like you are basically a child pisses you off to no end. Who is he to decide what is good or bad for you, anyway?'
@@ -176,30 +176,30 @@ if $ARGS[0] = '':
 					*nl
 					'In the blink of an eye, you are face to face with him again, yelling at him unrestrainedly. "No! Apparently, you think I''m too young and too dumb to know what I want, so you don''t get to ''<<$pcs_firstname>>'' me! I don''t need ' + iif(StoryLine > 0,'another','a') + ' stepdad who knows what''s best for me!"'
 					'Before Martin could utter even another word, you had stormed out of the bar, livid at his paternalism and, deep down, below the layers of fury, wounded by his rejection.'
-				
+
 					act 'Get out of the bar': gt 'nord'
 				end
 			end
-		end	
-		
+		end
+
 	elseif MartinSexTalk = 1 and MartinSex = 0:
 		'You approach Martin from behind, but you aren''t sure he has noticed you yet. He said you were too young to know better, that you were seeing something in him that wasn''t there - he was basically saying that you were stupid, wasn''t he?'
 		*nl
 		'But instead of forgetting about him or wallowing in self-pity, you are now standing here, and feeling indecisive at that. What are you gonna do, apologize to him for not letting yourself be patronized? It''s not like he was right... right?'
-		if exhibitionism > 15 and pcs_dom > 20:
+		if exhibitionist_lvl > 0 and pcs_dom > 20:
 			*nl
-			'Maybe he just needs a little push. Maybe, all you have to do is show him that you aren''t too young, show him what he is missing out on.' 
+			'Maybe he just needs a little push. Maybe, all you have to do is show him that you aren''t too young, show him what he is missing out on.'
 			if cycle = 0: 'But, damn, since you are currently on your period, that isn''t an option today. You will have to think of something else or come back some other time.'
-		
-			if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20:
-				if cycle = 0: 
+
+			if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
+				if cycle = 0:
 					'A good blowjob would probably set him straight right quick, no matter what time of the month it is.'
 				else
 					'And if all else fails, you can just go down on Martin - what man''s going to argue with a woman who her lips wrapped around his cock?'
 				end
 			end
 		end
-		
+
 		act 'Reconcile with Martin':
 			cls
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinReconcile.jpg"></center>'
@@ -208,8 +208,8 @@ if $ARGS[0] = '':
 			pcs_mood += 5
 			minut += 3
 			*nl
-			'No matter how you look at it, things didn''t go well last time. You hate the way he decided for you without actually listening to you, but are you happy about how you basically told him to go fuck himself?' 
-			'No, not really. And the way things look, your only options are to either be the bigger woman or to have awkward conversations with him, if any, from hereon out.' 
+			'No matter how you look at it, things didn''t go well last time. You hate the way he decided for you without actually listening to you, but are you happy about how you basically told him to go fuck himself?'
+			'No, not really. And the way things look, your only options are to either be the bigger woman or to have awkward conversations with him, if any, from hereon out.'
 			'With an inward sigh, you decide that it is time to restore your friendship with Martin... or whatever it is that''s going on between you.'
 			*nl
 			'"Martin?"'
@@ -229,28 +229,28 @@ if $ARGS[0] = '':
 			'"Sure, I''ll be around."'
 			*nl
 			'You give him as much of a smile as you can manage, turn around and leave the bar, relieved at your reconciliation but also unsure as to whether the restored friendship is enough for you.'
-			
+
 			act 'Leave the bar': gt 'nord'
 		end
-		
-		act 'You are still too angry to talk to him - Just leave the bar': 
+
+		act 'You are still too angry to talk to him - Just leave the bar':
 			cla
 			*nl
 			'But as much as you try to bring yourself to, you just can''t properly face him yet.'
 			*nl
 			'You turn and go towards the exit. You can hear something behind you, feel his look on your back, but you ignore it as best you can and go outside, the matter between you unresolved.'
-			
+
 			act 'Leave': gt 'nord'
 		end
-		
-		if exhibitionism > 15 and pcs_dom > 20 and cycle ! 0:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 20 and cycle ! 0:
 			act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 		end
-		
-		if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
 			act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 		end
-	
+
 	elseif MartinSexTalk = 2 and MartinSex = 0:
 		'You approach Martin as he''s cleaning the floor. The bartender raises his head when he notices you.'
 		'"Oh, I didn''t think you were still here, <<$pcs_firstname>>."'
@@ -260,23 +260,23 @@ if $ARGS[0] = '':
 		*nl
 		'Martin rejected you, but you can tell that he is attracted to you, no matter what he said about age. You told him that you understand, but that doesn''t mean it has to be the final word in the matter...'
 		*nl
-		
-		if exhibitionism > 20 and pcs_dom > 30 and cycle ! 0:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 30 and cycle ! 0:
 			'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind.'
-		elseif exhibitionism > 20 and pcs_dom > 30 and cycle = 0:
+		elseif exhibitionist_lvl > 0 and pcs_dom > 30 and cycle = 0:
 			'You are half-tempted to go on the offensive, show him what he''s missing out on by acting like a knight in shining armor and see if that won''t change his mind, but then you remember that you are on your period, so stripping isn''t really a sexy option right now.'
 		end
-				
-		if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20 and cycle ! 0:
 			'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be.'
-		elseif exhibitionism > 20 and pcs_dom > 50 and cycle = 0:
+		elseif exhibitionist_lvl > 0 and pcs_dom > 50 and cycle = 0:
 			'Or you could just pull his pants off and blow him - you''ve done it enough times to know how convincing that can be, and your period certainly isn''t going to stand in the way of <i>that</i>.'
 		end
-		
+
 		act 'Leave the bar':
 			cla
 			minut += 2
-			pcs_mood += rand(0,1)
+			pcs_mood -= rand(0,1)
 			*nl
 			'"Just wanted to say goodnight before I leave," you say, feeling a little tense and unhappy with yourself for running away instead of dealing with whatever emotional dilemma you are facing.'
 			*nl
@@ -286,15 +286,15 @@ if $ARGS[0] = '':
 			*nl
 			'You share a brief, friendly hug and goodbye before you turn and leave the bar, wondering if or when you will gather the courage to talk about this with Martin again.'
 			'<i>Maybe tomorrow</i>, you think to yourself.'
-					
+
 			act 'Leave': gt 'nord'
-		end 
-		
+		end
+
 		act 'Avoid the topic - Chat with Martin':
 			cla
 			minut += 30
 			npc_rel['A216'] += rand(0,1)
-			pcs_mood += 1
+			pcs_mood -= 1
 			*nl
 			'You don''t know if you want to have the final word, though. Shouldn''t you go into this with some kind of plan, an idea of how to convince him? Hell, are you even sure you want more from him? Isn''t it enough to be friend with him?'
 			*nl
@@ -303,10 +303,10 @@ if $ARGS[0] = '':
 			*nl
 			'After about half an hour, you decide that you should let Martin finish up for the night. After a brief but friendly goodnight, you leave the bar with a tingly stomach - whether it''s from nervousness, desire or something else, you can''t tell, but you probably won''t find out unless you talk about this with Martin.'
 			'<i>Maybe tomorrow</i>, you think to yourself.'
-			
+
 			act 'Leave the bar': gt 'nord'
 		end
-		
+
 		act 'Talk about "getting involved"':
 			cls
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/MartinReconcile.jpg"></center>'
@@ -323,18 +323,18 @@ if $ARGS[0] = '':
 			*nl
 			'Well, with your eloquence having deserted you at the worst possible moment, the question is:'
 			'Do you take a stand or run for the hills?'
-			
+
 			act 'Chicken out':
 				cla
 				minut += 1
-				pcs_mood += 8
+				pcs_mood -= 8
 				*nl
 				$OpenInnerThought+'I want to talk about this! I really, really do!'+$CloseInnerThought+' You tell yourself.'
 				'... but that doesn''t mean it has to be today, right?'
 				*nl
 				'"Nevermind, it''s not urgent," you backpedal quickly. "I have to go now."'
 				'Feeling really awkward, and a little angry with yourself for chickening out, you turn around and leave, ignoring the confused but somewhat relieved Martin.'
-				
+
 				act 'Leave the bar': gt 'nord'
 			end
 
@@ -363,7 +363,7 @@ if $ARGS[0] = '':
 				'Then, all of a sudden, you feel his lips against yours, showing without a doubt which side of him won the argument, and you kiss him back with a passion, your <<$pcdesc_tongue>> finally united with his.'
 				gs 'arousal', 'kiss', 5
 				gs 'stat'
-				
+
 				act 'Better to take it slow - Leave':
 					cls
 					*nl
@@ -374,40 +374,40 @@ if $ARGS[0] = '':
 					'Despite how good the kiss feels, you break it eventually and step back, out of your tight embrace with Martin. You''re breathing is heavy, but you manage to state what''s on your mind:'
 					'"We should take it slow."'
 					*nl
-					'Martin''s cock must be rock-hard by now if the bulge in his pants is anything to go by, and his breathing is as heavy as yours, but he nods slowly.' 
+					'Martin''s cock must be rock-hard by now if the bulge in his pants is anything to go by, and his breathing is as heavy as yours, but he nods slowly.'
 					'"You''re right. I... uh, I have to finish up here at the bar anyway."'
 					*nl
-					'"Finishing up, huh?" You smirk.' 
+					'"Finishing up, huh?" You smirk.'
 					'"Oh, screw you," he retorts, and both of you break into a chuckle. The unintended pun helps you keep your cool, though - it took a lot of convincing, both on your end and on his, to get this far, and you don''t want to mess up this careful balance between friendship and... Attraction? Love? Overflowing horniness? By jumping the gun.'
 					*nl
 					'"Okay, then I''ll see you soon?"'
 					'"Yeah. You know where to find me, corazón." Martin gives you the most lighthearted smile you have ever seen on him - it''s strange how that can make a man look younger, and how that can make you weak in the knees.'
-					'With a goofy smile of your own plastered on your ' + iif(tatfce>0,'tattooed ','') + 'face, you turn around and leave the bar.' 
+					'With a goofy smile of your own plastered on your ' + iif(tatfce>0,'tattooed ','') + 'face, you turn around and leave the bar.'
 					gs 'arousal', 'end'
 					gs 'stat'
-					
+
 					act 'Leave the bar': gt 'nord'
 				end
-				
+
 				act 'Go down on Martin': gt 'MartinSex3', 'MartinBlowTease'
 			end
 		end
-		
-		if exhibitionism > 20 and pcs_dom > 30 and cycle ! 0:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 30 and cycle ! 0:
 			act 'Go on the offensive - Strip':MartinStripVar = 1 & gt'MartinSex','MartinTease'
 		end
-				
-		if exhibitionism > 20 and pcs_dom > 50 and count['bj'] > 20:
+
+		if exhibitionist_lvl > 0 and pcs_dom > 50 and count['bj'] > 20:
 			act 'Be even more aggressive - Give Martin a blowjob': MartinConvinceBJ = 1 & gt'MartinSex3','MartinBlowTease'
 		end
-	
+
 	else
 		'"Still here, <<$pcs_firstname>>?"'
 		'"So it would seem," you smile and approach him. "Would you like me to leave?"'
 		'"No." In the blink of an eye, Martin has pulled you close and gives you a kiss. "Can''t you tell?"'
 		*nl
 		'You laugh in surprise, but also because you <b>can</b> tell that he has a bulge in his pants.'
-		
+
 		act 'Leave the bar':
 			cla
 			minut += 2
@@ -420,14 +420,14 @@ if $ARGS[0] = '':
 			'"Yeah, I have to get up early tomorrow," you apologize, your eyes glued to his poorly hidden hard-on. "Don''t work too <b>hard</b>, yeah?" You grin coquettishly.'
 			'"Oh, screw you," he murmurs, but grins too.'
 			*nl
-			'You share a kiss, and a fondle or two, but you don''t wanna make this <b>harder</b> on him than it already is, so you finally step away, smiling inwardly at your stupid pun.' 
+			'You share a kiss, and a fondle or two, but you don''t wanna make this <b>harder</b> on him than it already is, so you finally step away, smiling inwardly at your stupid pun.'
 			'"Be careful on your way home," Martin admonishes, as usual.'
 			'You raise your <<$pcdesc_eyebrowrandom>> at that, but there''s no helping it - he''s gonna worry anyway.'
 			'"Always am," you reassure him, turn around and leave the bar, wondering if, maybe instead of leaving, you should have fucked Martin''s brains out.'
-				
+
 			act 'Leave': gt 'nord'
-		end 
-		
+		end
+
 		act 'Talk to Martin':
 			cla
 			minut += 30
@@ -435,17 +435,17 @@ if $ARGS[0] = '':
 			*nl
 			'But you decide not to indulge him today. After all, you are a respectable woman who would <b>never</b> have sex in a public place, right?'
 			*nl
-			'So instead, you just have a normal chat with Martin. Well, as normal as can be in this situation.' 
-			'You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, but this conversation is at regular intervals interrupted by double entendres, kisses, you giving Martin generous looks at your <<$pcdesc_breastsrandom>> cleavage and <<$body>> ass, and other things you cannot or will not do while the bar is open.' 
+			'So instead, you just have a normal chat with Martin. Well, as normal as can be in this situation.'
+			'You catch up on the day-to-day' + iif($MartinHobby!'',', your <<$MartinHobby>>,','') + ' and talk about a few other trivial things, but this conversation is at regular intervals interrupted by double entendres, kisses, you giving Martin generous looks at your <<$pcdesc_breastsrandom>> cleavage and <<$body>> ass, and other things you cannot or will not do while the bar is open.'
 			*nl
 			'After about half an hour of talking, among other things, you decide that you should let Martin finish up for the night. After a final goodnight kiss, you leave the bar with a tingly stomach, your mind still lingering at the bulge in his pants and all the things you could do with him instead of talking...'
 			gs 'arousal', 'kiss', 5
 			gs 'stat'
 			gs 'arousal', 'end'
-						
+
 			act 'Leave': gt 'nord'
 		end
-		
+
 		act 'Blow him':gt 'MartinSex3', 'MartinBlowTease'
 		if cycle ! 0:
 			act 'Tease him':gt 'MartinSex', 'MartinTease'
@@ -456,35 +456,35 @@ end
 if $ARGS[0] = 'MartinTease':
 	cls
 	gs 'boyStat', 'A216'
-	
+
 	if MartinStripVar = 1:
 		MartinSex = 1
 		MartinSexTalk = 2
 		if pcs_dancero <= 50:dancero_exp += rand(2,5)
-		exhibition_exp += rand(0,2)
-		
+		pcs_exhib += rand(0,2)
+
 		if $pantyworntype ! 'none':
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease1.jpg"></center>'
 			'You are not in the mood to play hard-to-get; in fact, now that you think about it, maybe the easiest way to get Martin to drop this "you deserve better" spiel is to be <i>easy</i>.'
 			*nl
 			'You bend over and take off your lower garment.'
 			'Martin is utterly perplexed by that. "<<$pcs_firstname>>, what are you-"'
-			'"Oops, I seem to have accidentally pulled my panties down," you say innocently, giving him a broad smile.' 
+			'"Oops, I seem to have accidentally pulled my panties down," you say innocently, giving him a broad smile.'
 			*nl
 			'Most of your crotch is revealed to him, but your ' + iif(tatvag>0,'tattooed ','') + 'pussy is only vaguely perceptible. Still, you can already tell that the situation is entirely different from how it was a minute ago - the suave barkeeper is on the defensive. And you are just getting started...'
 			gs 'clothing', 'strip'
 			gs 'arousal', 'foreplay', 1, 'exhibitionism'
 			gs 'stat'
-					
+
 			act 'Turn around':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease2.jpg"></center>'
 				'You pull your panties all the way down to your knees and spin around for a moment to let him look at you from all sides. Spotting a growing bulge in his pants, you turn your back to Martin and bend over a nearby table.'
 				*nl
 				'"Well?" You ask flirtatiously over your shoulder, your <<$pcdesc_genitals>> and asshole completely revealed to him. "Do I still look too young to you? Or... just old enough?"'
-				'His speechlessness is all the answer you need.' 
+				'His speechlessness is all the answer you need.'
 				'And you can''t blame him for this reaction - you went from being a friendly flirt to showing him your pussy in under a minute, so most men would need a second to catch up with a reality that has gone utterly mad.'
-				
+
 				if analplugin = 1:
 					analplugin = 0
 					minut += 1
@@ -499,13 +499,13 @@ if $ARGS[0] = 'MartinTease':
 				gs 'underwear', 'remove'
 				gs 'arousal', 'foreplay', 1, 'exhibitionism'
 				gs 'stat'
-						
+
 				act 'Climb on the table':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease3.jpg"></center>'
 					'Deciding to make full use of the table being there, you climb on top of it and sit down, spreading your legs to give Martin a good view of your ' + iif(pirsG>0,'pierced ','') + 'pussy.'
 					*nl
-					'"You could do more than just look, you know." The flirtatious tone is gone now - anything but being openly sultry just wouldn''t do this porno-esque situation justice.' 
+					'"You could do more than just look, you know." The flirtatious tone is gone now - anything but being openly sultry just wouldn''t do this porno-esque situation justice.'
 					'Plus, Martin isn''t the only one getting turned on by this, and both of you can see it. "This <<$pcdesc_pubesrandom>> <<$pcdesc_pussyrandom>> <<$pcdesc_genitals>> could be yours."'
 					*nl
 					'Maybe something you said shook him out of his reverie, or maybe enough time has passed for him to snap out of it, but Martin seems to have regained the ability to speak. But he just loves saying things you don''t want to hear, doesn''t he?'
@@ -513,14 +513,14 @@ if $ARGS[0] = 'MartinTease':
 					'It''s telling that his mouth says one thing while his eyes are transfixed with your glistening <<$pcdesc_genitals>>.'
 					gs 'arousal', 'foreplay', 1, 'exhibitionism'
 					gs 'stat'
-							
+
 					act 'Sensibly take off your shirt':
 						cls
 						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease4.jpg"></center>'
-						'"I don''t know what gave you the idea that I wanted ''sensible''."' 
+						'"I don''t know what gave you the idea that I wanted ''sensible''."'
 						'As you say that, you pull your shirt over your head, revealing your breasts to him. "A man should be able to tell when a woman wants to fuck. Can''t you?"'
 						*nl
-						'Pride - it is most men''s sore spot and your final remarks were squarely aimed at Martin''s sense of pride. You might as well have asked him if he couldn''t get it up. It was a dangerous game to play.' 
+						'Pride - it is most men''s sore spot and your final remarks were squarely aimed at Martin''s sense of pride. You might as well have asked him if he couldn''t get it up. It was a dangerous game to play.'
 						*nl
 						'But it worked: Before you know it, Martin has closed the gap between you and is kissing you, hard.'
 						'His hands are roaming your body, pawing at your breasts, brushing against your ass and pussy. Then, all of a sudden, Martin pulls you closer to the edge, his pants miraculously already undone, his <<dick>>cm <<$dick_girth>> dick revealed in all its glory.'
@@ -529,12 +529,12 @@ if $ARGS[0] = 'MartinTease':
 						gs 'arousal', 'foreplay', 2, 'exhibitionism'
 						gs 'stat'
 						killvar 'MartinStripVar'
-						
+
 						act 'Let Martin fuck you':$martinpos='missionary' & gt'MartinSex2','MartinSexDyn'
 					end
 				end
 			end
-		
+
 		else
 			alko += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease1.jpg"></center>'
@@ -551,13 +551,13 @@ if $ARGS[0] = 'MartinTease':
 			'"I must have forgotten to put it on," you note innocently.'
 			gs 'arousal', 'foreplay', 1, 'exhibitionism'
 			gs 'stat'
-			
+
 			act 'Time for a good look':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease2.jpg"></center>'
 				'It wouldn''t be nice to tease Martin with a sight like that and keep him guessing if the carpets do indeed match the drapes.'
 				*nl
-				'Without putting the glass down, you turn your side to Martin and bare your lower half with your free hand. You can feel Martin''s eyes linger on your <<$pcdesc_legsrandom>> legs, but you know what he really wants to see, as much as he''d deny it.' 
+				'Without putting the glass down, you turn your side to Martin and bare your lower half with your free hand. You can feel Martin''s eyes linger on your <<$pcdesc_legsrandom>> legs, but you know what he really wants to see, as much as he''d deny it.'
 				'Feeling ready to burn whatever bridge there''s left behind you, you face Martin, revealing your <<$pcdesc_pubesrandom>> <<$pcdesc_genitals>> to him. He seems shocked by your boldness; not just by you stripping for him, right here in the empty bar - although that must be a big part of it - but also by the fact that you had been walking around commando like there was nothing to it.'
 				*nl
 				'"Like what you see?"'
@@ -565,22 +565,22 @@ if $ARGS[0] = 'MartinTease':
 				gs 'clothing', 'strip'
 				gs 'arousal', 'foreplay', 1, 'exhibitionism'
 				gs 'stat'
-				
+
 				act 'Then he''s gonna like what''s next':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease3.jpg"></center>'
 					'With an audience as appreciative as this, how could you possibly stop now?'
 					*nl
-					'Setting the glass, your trusty prop, aside, you pull down what little covers your ' + iif(tatbrst>0,'tattooed ','') + 'chest and ' + iif(tatblly>0&tatbrst=0,'tattooed ','') +'belly, giving Martin a good look at your <<$pcdesc_breastsrandom>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
+					'Setting the glass, your trusty prop, aside, you pull down what little covers your ' + iif(tatbrst > 0,'tattooed ','') + 'chest and ' + iif(tatblly > 0 and tatbrst = 0,'tattooed ','') +'belly, giving Martin a good look at your <<$pcdesc_breastsrandom>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
 					*nl
 					'You lift your arms a little, playing with your <<$pcdesc_hairobjectwordy>> and sticking out your breasts even more.'
-					'No, you <b>really<b> aren''t making it easy for Martin to adhere to his principles regarding celibacy and sexy young women, or whatever it is that''s holding him back from bending you over and nailing you into the fucking counter.'
+					'No, you <b>really</b> aren''t making it easy for Martin to adhere to his principles regarding celibacy and sexy young women, or whatever it is that''s holding him back from bending you over and nailing you into the fucking counter.'
 					*nl
 					'He''s not frozen solid anymore, though. He seems to be struggling with his lust, and you don''t think his ''reason'' is winning.'
 					gs 'underwear', 'remove'
 					gs 'arousal', 'foreplay', 1, 'exhibitionism'
 					gs 'stat'
-					
+
 					act 'Go Lust!':
 						cls
 						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease4.jpg"></center>'
@@ -595,7 +595,7 @@ if $ARGS[0] = 'MartinTease':
 						'You momentarily see something like hope or relief flare up in his eyes. You are not feeling very merciful tonight, though:'
 						'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<pcs_ass>> asshole wasn''t already visible to him.'
 						'"There, better now?"'
-						
+
 						if analplugin = 1:
 							analplugin = 0
 							minut += 1
@@ -609,7 +609,7 @@ if $ARGS[0] = 'MartinTease':
 						end
 						gs 'arousal', 'foreplay', 1, 'exhibitionism'
 						gs 'stat'
-						
+
 						act 'Just one last push...':
 							cls
 							'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease5.jpg"></center>'
@@ -623,25 +623,25 @@ if $ARGS[0] = 'MartinTease':
 							'"I never wanted you to," you moan, his fingers stroking your <<$pcdesc_genitals>> and clit.'
 							*nl
 							'You don''t know if his zipper exploded at your last words or if he was just that damn good with his hands that you didn''t even notice when he opened it to reveal his <<dick>>cm <<$dick_girth>> dick, but you cannot wait to feel him inside you and, judging by how he''s now taking position behind you, neither can he.'
-							
+
 							gs 'arousal', 'foreplay', 1, 'exhibitionism'
 							gs 'arousal', 'kiss', 1
 							gs 'stat'
 							killvar 'MartinStripVar'
-							
+
 							act 'Let Martin fuck you':$martinpos='doggystyle' & gt'MartinSex2','MartinSexDyn'
 						end
 					end
 				end
 			end
 		end
-	
+
 	else
 		if $pantyworntype ! 'none':
 			if pcs_dancero <= 50:dancero_exp += rand(2,5)
-			exhibition_exp += rand(0,2)
+			pcs_exhib += rand(0,2)
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease1.jpg"></center>'
-			'Feeling in the mood to give Martin a bit of a show today, you give him a soft push, just strong enough to make him get the hint and sit down on the chair behind him.' 
+			'Feeling in the mood to give Martin a bit of a show today, you give him a soft push, just strong enough to make him get the hint and sit down on the chair behind him.'
 			'You then take a few steps back and slowly bend forward, giving him a generous look at your <<$pcdesc_breastsrandom>> cleavage and <<$pcdesc_legsrandom>> legs as you take off your lower garment.'
 			*nl
 			'Martin certainly looks like he likes where this is going, and you have no intention of changing course.'
@@ -649,7 +649,7 @@ if $ARGS[0] = 'MartinTease':
 			gs 'clothing', 'strip'
 			gs 'arousal', 'foreplay', 1, 'exhibitionism'
 			gs 'stat'
-			
+
 			act 'Turn around':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease2.jpg"></center>'
@@ -658,7 +658,7 @@ if $ARGS[0] = 'MartinTease':
 				'You ever so slowly turn your back to Martin and lasciviously bend over a nearby table.'
 				'"Well?" You ask flirtatiously over your shoulder, your <<$pcdesc_pubesrandom>> <<$pcdesc_genitals>> and asshole completely revealed to him. "Enjoying the view?"'
 				'"You have no idea," he breathes, a lustful glint in his eyes.'
-				
+
 				if analplugin = 0:
 					*nl
 					'Considering how reluctant he was to let you "settle for an old man", he seems to be awfully happy about that same young <<$body>> woman stripping and exposing her privates to him.'
@@ -667,7 +667,7 @@ if $ARGS[0] = 'MartinTease':
 					minut += 1
 					*nl
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/buttplug.jpg"></center>'
-					'Your ass in particular seems to have caught your attention, and it doesn''t take you long to realize that he''s staring at your anal plug with utter fascination.' 
+					'Your ass in particular seems to have caught your attention, and it doesn''t take you long to realize that he''s staring at your anal plug with utter fascination.'
 					*nl
 					'"My my, it''s almost like you enjoy it when women take something up their ass," you comment playfully.'
 					'"Pull it out." His voice is low but the order unmistakeable. "Slowly."'
@@ -682,8 +682,8 @@ if $ARGS[0] = 'MartinTease':
 				end
 				gs 'underwear', 'remove'
 				gs 'arousal', 'foreplay', 1, 'exhibitionism'
-				gs 'stat'		
-				
+				gs 'stat'
+
 				act 'Climb on the table':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease3.jpg"></center>'
@@ -694,47 +694,47 @@ if $ARGS[0] = 'MartinTease':
 					*nl
 					'Feeling it would be cruel to continue too quickly - and enjoying his stare immensely - you give him a moment to bask in the nubile display before you...'
 					gs 'arousal', 'foreplay', 2, 'exhibitionism'
-					gs 'stat'		
-									
+					gs 'stat'
+
 					act 'Take off your shirt':
 						cls
 						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/tease4.jpg"></center>'
 						'... pull your shirt over your head, revealing your <<$pcdesc_breastsrandom>> breasts to Martin. "And what do you think of my tits?"'
 						'Martin leans back, smiling ear to ear, and shows you his crotch in response, and the sight before you adds fuel to the fire in your loins: He is pitching a perfect tent, his pants barely able to contain the cock underneath, and Martin seems very pleased with himself and the world. And why wouldn''t he be? What man his age would be anything but ecstatic to have a pretty young woman strip for him, and only him, and to have her stare at his hard-on in curiosity?'
 						*nl
-						'You could certainly make him, and yourself, even happier, if you wanted to.' 
+						'You could certainly make him, and yourself, even happier, if you wanted to.'
 						'But at least part of the excitement you are feeling right now came from teasing Martin, from having control over the situation and over him. And, as cruel as that may be, what could possibly emphasize your power over him more than leaving him with blue balls?'
-						
+
 						if dildo = 1 or middildo = 1 and bag > 0:
 							*nl
 							'Or... well, you could take your ''little friend'' out of your purse and take care of your own needs before deciding anything...'
 						end
 						gs 'arousal', 'foreplay', 1, 'exhibitionism'
 						gs 'stat'
-						
+
 						temp = rand(1,3)
 						if pcs_dom > 20 and cycle ! 0:
 							act 'Tell Martin to go down on you':gt 'MartinSex3','MartinPussyLick'
 						elseif temp = 1 and cycle ! 0:
 							act 'Martin wants to go down on you':gt 'MartinSex3','MartinPussyLick'
 						end
-						
+
 						act 'Take care of Martin (Blowjob)':gt 'MartinSex3', 'MartinBlowTease'
 						act 'Beckon Martin to fuck you like this (On your back)':$martinpos='missionary' & gt 'MartinSex2','MartinSexPrep'
 						act 'Get up and bend over for Martin (From behind)':$martinpos='doggystyle' & gt 'MartinSex2','MartinSexPrep'
 						act 'Roll on your side (Sideways)':$martinpos='sideways' & gt 'MartinSex2','MartinSexPrep'
 						act 'Get up and tell Martin you wanna ride him (Cowgirl)':$martinpos='cowgirl' & gt 'MartinSex2','MartinSexPrep'
 						act 'Get up and tell Martin you wanna ride him (<b>Reverse</b> Cowgirl)':$martinpos='rev_cowgirl' & gt 'MartinSex2','MartinSexPrep'
-						
+
 						act 'Blueball him - Get dressed and leave':
 							cls
 							minut += 5
 							pcs_dom += 1
-							npc_rel['A216'] += 1
+							npc_rel['A216'] -= 1
 							'<center><video src="images/locations/city/industrial/bar/GettingDressed.mp4"></center>'
 							'"I''m glad you like it," you say, swinging your legs off the table as you put your shirt back on, "because that''s all you''ll be getting today."'
 							*nl
-							'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.' 
+							'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.'
 							'"You''d leave me here, alone, in this state?" He points towards his crotch where his dick is straining against the fabric of his pants. "You couldn''t possibly be this cruel."'
 							*nl
 							'You walk up to Martin, put your ' + iif(tatarm>0,'tattooed ','') + 'arms around his neck and give him a soft kiss. When you break it, you whisper: "If I wasn''t cruel at least once in a while, you wouldn''t appreciate it when I''m not."'
@@ -745,21 +745,21 @@ if $ARGS[0] = 'MartinTease':
 							gs 'clothing', 'wear_last_worn'
 							gs 'arousal', 'end'
 							gs 'stat'
-							
+
 							act 'Leave the bar': gt 'nord'
 						end
-						
+
 						if dildo = 1 or middildo = 1 and bag > 0:
 							act 'Masturbate with your dildo':gt 'MartinSex','MartinTeaseDildo'
 						end
 					end
 				end
 			end
-		
+
 		else
 			alko += 1
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease1.jpg"></center>'
-			'Feeling in the mood to give Martin a bit of a show today, you give him a soft push, just strong enough to make him get the hint and sit down on the chair behind him.' 
+			'Feeling in the mood to give Martin a bit of a show today, you give him a soft push, just strong enough to make him get the hint and sit down on the chair behind him.'
 			*nl
 			'You slip out of your shoes first. "You know, I think I''ll have something to drink. Do you mind if I help myself?"'
 			'Without waiting for Martin''s reply, you stretch and bend over the counter slightly. Spotting a glass that''s within reach and an open bottle of white wine, you fill it with a thumb or two of the cool liquid. You don''t think you''ve ever seen Martin serve wine to anyone - it would seem he likes to have a little while he closes up shop.'
@@ -772,7 +772,7 @@ if $ARGS[0] = 'MartinTease':
 			'Martin chuckles softly at your nonchalance, but with his eyes glued to your crotch, he replies: "Just curious."'
 			gs 'arousal', 'foreplay', 1, 'exhibitionism'
 			gs 'stat'
-			
+
 			act 'A little curiosity doesn''t hurt':
 				cls
 				'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease2.jpg"></center>'
@@ -785,7 +785,7 @@ if $ARGS[0] = 'MartinTease':
 				gs 'clothing', 'strip'
 				gs 'arousal', 'foreplay', 1, 'exhibitionism'
 				gs 'stat'
-				
+
 				act 'He''s gonna like what''s next':
 					cls
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease3.jpg"></center>'
@@ -793,7 +793,7 @@ if $ARGS[0] = 'MartinTease':
 					*nl
 					'Setting the glass aside, you pull down what little covers your ' + iif(tatbrst>0,'tattooed ','') + 'chest and ' + iif(tatblly>0&tatbrst=0,'tattooed ','') +'belly, giving Martin a good look at your <<$pcdesc_breastsrandom>> tits, your <<$pcdesc_nipplesrandom>> nipples standing hard thanks to the chilly, smoky air... and maybe also due to his intense stares.'
 					*nl
-					'You lift your arms a little, playing with your <<$pcdesc_hairobjectwordy>> and sticking out your breasts even more.' 
+					'You lift your arms a little, playing with your <<$pcdesc_hairobjectwordy>> and sticking out your breasts even more.'
 					'Honestly, it wouldn''t have surprised you if he had just bent you over and nailed you into the fucking counter then and there - his eyes are certainly burning with desire enough to tell you that he wants to.'
 					*nl
 					'But he doesn''t jump up and fuck you. He sits there, patiently, waiting to see what else you have in store for him, how else you want to tease and torture him.'
@@ -801,7 +801,7 @@ if $ARGS[0] = 'MartinTease':
 					gs 'underwear', 'remove'
 					gs 'arousal', 'foreplay', 1, 'exhibitionism'
 					gs 'stat'
-					
+
 					act 'The show must go on':
 						cls
 						'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease4.jpg"></center>'
@@ -815,7 +815,7 @@ if $ARGS[0] = 'MartinTease':
 						'You almost burst into laughter after your brain has caught up with his challenge, but you are only too happy to indulge him, if it''s an even sexier display he wants.'
 						'You put one of your hands on your ass and pull slightly, completely revealing what little of your <<$pcdesc_genitals>> and <<pcs_ass>> asshole wasn''t already visible to him.'
 						'"Just okay, huh?"'
-						
+
 						if analplugin = 0:
 							*nl
 							'"Maybe a little better than okay," he smirks.'
@@ -840,7 +840,7 @@ if $ARGS[0] = 'MartinTease':
 						end
 						gs 'arousal', 'foreplay', 1, 'exhibitionism'
 						gs 'stat'
-						
+
 						act 'Better than okay':
 							cls
 							'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/nopant_tease5.jpg"></center>'
@@ -849,42 +849,42 @@ if $ARGS[0] = 'MartinTease':
 							'"So..." Your tone is about as casual as you can muster, but your glistening pussy gives away your true feelings. "What do you think of my body?"'
 							'Martin leans back, smiling ear to ear, and shows you his crotch in response, and the sight before you adds fuel to the fire in your loins: He is pitching a perfect tent, his pants barely able to contain the cock underneath, and Martin seems very pleased with himself and the world. And why wouldn''t he be? What man his age would be anything but ecstatic to have a pretty young woman strip for him, and only him, and to have her stare at his hard-on in curiosity?'
 							*nl
-							'You could certainly make him, and yourself, even happier, if you wanted to.' 
+							'You could certainly make him, and yourself, even happier, if you wanted to.'
 							'But at least part of the excitement you are feeling right now came from teasing Martin, from having control over the situation and over him. And, as cruel as that may be, what could possibly emphasize your power over him more than leaving him with blue balls?'
-						
+
 							if dildo = 1 or middildo = 1 and bag > 0:
 								*nl
 								'Or... well, you could take your ''little friend'' out of your purse and take care of your own needs before deciding anything...'
 							end
 							gs 'arousal', 'foreplay', 1, 'exhibitionism'
 							gs 'stat'
-							
+
 							temp = rand(1,3)
 							if pcs_dom > 20 and cycle ! 0:
 								act 'Tell Martin to go down on you':gt 'MartinSex3','MartinPussyLick'
 							elseif temp = 1 and cycle ! 0:
 								act 'Martin wants to go down on you':gt 'MartinSex3','MartinPussyLick'
 							end
-							
+
 							act 'Take care of Martin (Blowjob)':gt 'MartinSex3', 'MartinBlowTease'
 							act 'Beckon Martin to fuck you like this (On your back)':$martinpos='missionary' & gt 'MartinSex2','MartinSexPrep'
 							act 'Get up and bend over for Martin (From behind)':$martinpos='doggystyle' & gt 'MartinSex2','MartinSexPrep'
 							act 'Roll on your side (Sideways)':$martinpos='sideways' & gt 'MartinSex2','MartinSexPrep'
 							act 'Get up and tell Martin you wanna ride him (Cowgirl)':$martinpos='cowgirl' & gt 'MartinSex2','MartinSexPrep'
 							act 'Get up and tell Martin you wanna ride him (<b>Reverse</b> Cowgirl)':$martinpos='rev_cowgirl' & gt 'MartinSex2','MartinSexPrep'
-							
+
 							act 'Blueball him - Get dressed and leave':
 								cls
 								minut += 5
 								pcs_dom += 1
-								npc_rel['A216'] += 1
+								npc_rel['A216'] -= 1
 								'<center><video src="images/locations/city/industrial/bar/GettingDressed.mp4"></center>'
 								'"I''m glad you like it," you say, swinging your legs off the table as you put your shirt back on, "because that''s all you''ll be getting today."'
 								*nl
-								'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.' 
+								'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.'
 								'"You''d leave me here, alone, in this state?" He points towards his crotch where his dick is straining against the fabric of his pants. "You couldn''t possibly be this cruel."'
 								*nl
-								'You walk up to Martin, put your arms around his neck and give him a soft kiss. When you break it, you whisper:' 
+								'You walk up to Martin, put your arms around his neck and give him a soft kiss. When you break it, you whisper:'
 								'"If I wasn''t cruel at least once in a while, you wouldn''t appreciate it when I''m not. Besides, I think you''ll cum immediately when I''m out that door once you realize that I''m going commando again."'
 								*nl
 								'With that, you quickly move out of his range, towards the door, blow the perplexed barkeeper a final kiss and make off like a bandit.'
@@ -893,10 +893,10 @@ if $ARGS[0] = 'MartinTease':
 								gs 'clothing', 'wear_last_worn'
 								gs 'arousal', 'end'
 								gs 'stat'
-								
+
 								act 'Leave the bar': gt 'nord'
 							end
-							
+
 							if dildo = 1 or middildo = 1 and bag > 0:
 								act 'Masturbate with your dildo':gt 'MartinSex','MartinTeaseDildo'
 							end
@@ -911,7 +911,7 @@ end
 if $ARGS[0] = 'MartinTeaseDildo':
 	cls
 	gs 'boyStat', 'A216'
-	exhibition_exp += rand(0,2)
+	pcs_exhib += rand(0,2)
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/teasedildo1.jpg"></center>'
 	'You roll to your ' + iif(tatside>0,'tattooed ','') + 'side. Grinning like a Cheshire cat, you rummage through your purse and, under the curious looks of Martin, pull out your ' + iif(dildo = 1,'10cm','15cm') + ' dildo.'
 	*nl
@@ -925,62 +925,62 @@ if $ARGS[0] = 'MartinTeaseDildo':
 	$orgasm_txt = 'no'
 	gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism'
 	gs 'stat'
-	
+
 	act 'Fuck yourself with your dildo':
 		cls
 		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/teasedildo2.jpg"></center>'
-		'Your smile fades fast as lust overtakes you.' 
+		'Your smile fades fast as lust overtakes you.'
 		'Time moves different when you are aroused like this, when every sensation is like a shockwave in your head and every nerve of your body is on edge. A giant crowd could have been watching you right now and you wouldn''t even care - no, actually, at this point it would probably only make this more intense.'
 		*nl
-		'You can sense every tiny movement of the dildo inside your <<$pcs_vag>> <<$pcdesc_genitals>> as you shift around, move it in and out, rubbing it against this wall and that and making sure to brush against your clit every now and then.' 
+		'You can sense every tiny movement of the dildo inside your <<$pcs_vag>> <<$pcdesc_genitals>> as you shift around, move it in and out, rubbing it against this wall and that and making sure to brush against your clit every now and then.'
 		'There are plenty of instances when you wouldn''t be able to cum without rubbing your sensitive nub, but this situation is so hot that you have no trouble at all getting yourself off.'
 		$orgasm_txt = 'no'
 		gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism'
 		gs 'stat'
-		
+
 		act 'Cum all over your dildo':
 			cls
 			'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/bar/martin/tease/teasedildo3.jpg"></center>'
-			'And off you get.' 
+			'And off you get.'
 			*nl
 			'It starts slow, like the rumble of thunder in the distance, but before you know it, an explosion goes off in your head and your body starts shaking like a leaf in the wind. You can hear yourself moaning loudly, but you are barely even registering that, like it''s happening in an adjacent room, to another person.'
 			*nl
 			'As you come down from your high, you regain awareness of your surroundings and open your eyes. Martin is still there, spellbound.'
-			'You give him an almost shy smile and, opting to give him a little tease-cherry on top, lick your dildo clean before you put it away.' 
+			'You give him an almost shy smile and, opting to give him a little tease-cherry on top, lick your dildo clean before you put it away.'
 			*nl
 			'The question of whether he enjoyed the show entirely superfluous. The question of whether you still want to leave him with blue (or, at this point, deep purple) balls, however, still stands.'
 			$orgasm_txt = 'yes'
 			gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism'
 			gs 'stat'
-			
+
 			temp = rand(1,3)
 			if pcs_dom > 20 and cycle ! 0:
 				act 'Tell Martin to go down on you':gt 'MartinSex3','MartinPussyLick'
 			elseif temp = 1 and cycle ! 0:
 				act 'Martin wants to go down on you':gt 'MartinSex3','MartinPussyLick'
 			end
-			
+
 			act 'Take care of Martin (Blowjob)':gt 'MartinSex3', 'MartinBlowTease'
 			act 'Roll on your back (On your back)':$martinpos='missionary' & gt 'MartinSex2','MartinSexPrep'
 			act 'Get up and bend over for Martin (From behind)':$martinpos='doggystyle' & gt 'MartinSex2','MartinSexPrep'
 			act 'Beckon Martin to fuck you like this (Sideways)':$martinpos='sideways' & gt 'MartinSex2','MartinSexPrep'
 			act 'Get up and tell Martin you wanna ride him (Cowgirl)':$martinpos='cowgirl' & gt 'MartinSex2','MartinSexPrep'
 			act 'Get up and tell Martin you wanna ride him (<b>Reverse</b> Cowgirl)':$martinpos='rev_cowgirl' & gt 'MartinSex2','MartinSexPrep'
-			
+
 			act 'Blueball him - Get dressed and leave':
 				cls
 				minut += 5
 				pcs_dom += 1
-				npc_rel['A216'] += 1
+				npc_rel['A216'] -= 1
 				gs 'underwear', 'wear'
 				'<center><video src="images/locations/city/industrial/bar/GettingDressed.mp4"></center>'
 				'"I''m glad you liked the show," you say, swinging your legs off the table as you put your top back on, "because that''s all you''ll be getting today."'
 				*nl
-				'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.' 
+				'At first, Martin probably thinks you''re joking, but seeing as you''re putting your other clothes back on as well, he gets up, frowning.'
 				'"You''d leave me here, alone, in this state?" He points towards his crotch where his dick is straining against the fabric of his pants. "You couldn''t possibly be this cruel."'
 				*nl
 				'You walk up to Martin, put your arms around his neck and give him a soft kiss, the taste of your ' + iif(pirsG>0,'pierced ','') + 'pussy on your ' + iif(tatlip>0,'tattooed ','') + 'lips and tongue. When you break it, you whisper: "If I wasn''t cruel at least once in a while, you wouldn''t appreciate it when I''m not."'
-				
+
 				if $pantyworntype ! 'none':
 					'"Besides," you add with a naughty smile, "you just saw me cum really hard, so I think you''ll cum immediately when I''m out that door once you realize that I''m going commando again."'
 					*nl
@@ -995,7 +995,7 @@ if $ARGS[0] = 'MartinTeaseDildo':
 				gs 'clothing', 'wear_last_worn'
 				gs 'arousal', 'end'
 				gs 'stat'
-				
+
 				act 'Leave the bar': gt 'nord'
 			end
 		end

+ 10 - 10
locations/MartinSex2.qsrc

@@ -104,7 +104,7 @@ if $ARGS[0] = 'MartinSexPrep':
 		*nl
 		'You feel bad for him - after all, you wouldn''t exactly feel much better than him if he had just walked out on you in the middle of sex - but your mind is made up, so you give him a small consolation in the form of a tender little kiss and a whispered "see you soon" before you leave him to himself, regret and arousal haunting your every step.'
 		minut += 3
-		npc_rel['A216'] += 1
+		npc_rel['A216'] -= 1
 		gs 'underwear', 'wear'
 		gs 'clothing', 'wear_last_worn'
 		gs 'arousal', 'end'
@@ -189,7 +189,7 @@ if $ARGS[0] = 'MartinSexDyn':
 	*nl
 	
 	if pcs_vag = 0:
-		npc_rel['A216'] += 2
+		npc_rel['A216'] -= 2
 		'The trickle of blood from your broken hymen doesn''t escape his sharp eyes, though, and he brings your carnal act to a grinding halt.'
 		*nl
 		'"What...? <<$pcs_firstname>>, are you a virgin?!" He asks, aghast - he probably wouldn''t have agreed to being intimate with you if he had known this.'
@@ -274,7 +274,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			*nl
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody else is here right now.'
 			
-			if exhibitionism > 50 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to fuck the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
+			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to fuck the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
 			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcs_vag>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
@@ -311,7 +311,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			*nl
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
-			if exhibitionism > 50 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
+			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
 			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcs_vag>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
@@ -348,7 +348,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			*nl
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
-			if exhibitionism > 50 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
+			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
 			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcs_vag>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
@@ -392,7 +392,7 @@ if $ARGS[0] = 'MartinSexDyn':
 			*nl
 			'It only adds to the excitement of it all to know that this is a public place, even if nobody''s here now.'
 			
-			if exhibitionism > 50 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
+			if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This idea, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to be fuck by the bartender right here in the center, with all of their eyes on you...' & pcs_horny += 10
 			$orgasm_txt = 'And it''s this fantasy that sets you off, causing you to cry out in heat and your <<$pcs_vag>> pussy to quiver around Martin''s cock as you imagine how strangers jerk off to your fucking. As you come down from your high, you feel like a pervert... but that''s not a bad thing, right?'
 			gs 'arousal', 'vaginal', 3, 'exhibitionism'
 			*nl
@@ -756,7 +756,7 @@ if $ARGS[0] = 'MartinAnalDyn':
 		
 		act 'Continue':
 			cls
-			$orgasm_txt = iif(dominance > 20,'Wresting control from','Submitting to') + ' Martin and the intense feeling of him filling your ass drive you ever closer to the edge until you can no longer take it. You cum loudly, shivering all over' + iif(exhibitionism>50 or exhibitionism['pref']>50,' as your mind basks in your exhibitionist fantasy','') + ', your ass clenching around and massaging Martin''s cock with its contractions as if it wanted to squeeze the cum out of him as' + iif($martinpos='doggystyle',' he fucks you',' you fuck him') + '. Your anal orgasm lasts for what feels like an eternity, but when it has passed and you look back at him, Martin gives you a smug, self-satisfied look that makes you chuckle. You''re not done with each other yet, though, and before long, you''ve resumed your fast, hard rhythm.'
+			$orgasm_txt = iif(dominance > 20,'Wresting control from','Submitting to') + ' Martin and the intense feeling of him filling your ass drive you ever closer to the edge until you can no longer take it. You cum loudly, shivering all over' + iif(exhibitionist_lvl > 1 or exhibitionism['pref']>50,' as your mind basks in your exhibitionist fantasy','') + ', your ass clenching around and massaging Martin''s cock with its contractions as if it wanted to squeeze the cum out of him as' + iif($martinpos='doggystyle',' he fucks you',' you fuck him') + '. Your anal orgasm lasts for what feels like an eternity, but when it has passed and you look back at him, Martin gives you a smug, self-satisfied look that makes you chuckle. You''re not done with each other yet, though, and before long, you''ve resumed your fast, hard rhythm.'
 			
 			if $martinpos = 'rev_cowgirl':
 				'<center><video src="images/locations/city/industrial/bar/sex/bar/martin/anal/anal_rev.mp4"></center>'
@@ -778,7 +778,7 @@ if $ARGS[0] = 'MartinAnalDyn':
 					'Being fucked from below, your lover proving that he is still the man of the house turns you on, plain and simple, and the fact that you are doing it in the middle of an empty bar, <b>his</b> empty bar, just makes it more exciting.'
 				end
 				*nl
-				if exhibitionism > 50 or exhibitionism['pref'] > 50: 'This final thought, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to take the bartender''s cock up your ass right here in the center, with all of their eyes on you...' & pcs_horny += 10
+				if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'This final thought, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to take the bartender''s cock up your ass right here in the center, with all of their eyes on you...' & pcs_horny += 10
 				*nl
 				if pcs_dom > 20:
 					gs 'arousal', 'anal', 10, 'dom'
@@ -807,7 +807,7 @@ if $ARGS[0] = 'MartinAnalDyn':
 					'"You''re fucking me," you moan, aroused by the power he has over you. "You''re fucking my ass in the middle of your bar." As you say it, you are reminded of how public of a place this really is, despite being empty, and that alone is almost enough to make you cum.'
 				end
 				*nl
-				if exhibitionism > 50 or exhibitionism['pref'] > 50: 'That final thought, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to take the bartender''s cock up your ass right here in the center, with all of their eyes on you...' & pcs_horny += 10
+				if exhibitionist_lvl > 1 or exhibitionism['pref'] > 50: 'That final thought, and the memories of your previous exhibitionist acts manifest themselves in a small fantasy: You imagine what it would be like if the bar wasn''t empty but bustling with people, what it might be like to take the bartender''s cock up your ass right here in the center, with all of their eyes on you...' & pcs_horny += 10
 				*nl
 				if pcs_dom > 20:
 					gs 'arousal', 'anal', 10
@@ -951,7 +951,7 @@ if $ARGS[0] = 'PainalDyn':
 		*nl
 		'You feel bad for him - after all, you wouldn''t exactly feel much better than him if he had just walked out on you in the middle of sex - but your mind is made up, so you give him a small consolation in the form of a tender little kiss and a whispered "see you soon" before you leave him to himself, regret and arousal haunting your every step.'
 		minut += 3
-		npc_rel['A216'] += 1
+		npc_rel['A216'] -= 1
 		gs 'underwear', 'wear'
 		gs 'clothing', 'wear_last_worn'
 		gs 'arousal', 'end'

+ 1 - 1
locations/MartinSex3.qsrc

@@ -328,7 +328,7 @@ if $ARGS[0] = 'MartinPussyLick':
 		cls
 		minut += 5
 		pcs_dom += 1
-		npc_rel['A216'] += 1
+		npc_rel['A216'] -= 1
 		gs 'underwear', 'wear'
 		'<center><video src="images/locations/city/industrial/bar/GettingDressed.mp4"></center>'
 		'"That was wonderful," you say, pushing yourself off the counter, "but I''m afraid I have to go now."'

+ 8 - 8
locations/MartinTalk.qsrc

@@ -441,7 +441,7 @@ if $ARGS[0] = '':
 		
 		act 'Give a non-committal answer':
 			cla
-			npc_rel['A216'] += 2
+			npc_rel['A216'] -= 2
 			'"Oh, you know, this and that. Whatever covers the bills. I get by"'
 			*nl
 			
@@ -492,8 +492,8 @@ if $ARGS[0] = '':
 					persuas_exp += rand(2,5)
 					
 					if age >= 18:
-						npc_rel['A216'] += 10
-						pcs_mood += rand(3,5)
+						npc_rel['A216'] -= 10
+						pcs_mood -= rand(3,5)
 						'"I, uh... I''m <<age>> now," you stammer.'
 						'"You are <b>now</b>," he repeats. "So you weren''t 18 when you first came here? You lied to my face?"' 
 						'He''s clearly angry with you, but he seems to be more disappointed than angry.'
@@ -505,8 +505,8 @@ if $ARGS[0] = '':
 						act 'Finish your drink': gt 'qwBarPolet'
 					
 					else
-						npc_rel['A216'] += 20
-						pcs_mood += rand(3,6)
+						npc_rel['A216'] -= 20
+						pcs_mood -= rand(3,6)
 						knowMartin = 2
 						MartinLie = 1
 						'You open your mouth, but as soon as you do, as soon as you look at him, you know you wouldn''t be able to lie convincingly. The cat''s out of the bag.'
@@ -531,8 +531,8 @@ if $ARGS[0] = '':
 				
 				else
 					persuas_exp += rand(4,6)
-					npc_rel['A216'] += 2
-					pcs_mood += rand(1,3)
+					npc_rel['A216'] -= 2
+					pcs_mood -= rand(1,3)
 					'"My parents sent me to school a year later than usual. Thought it''d be good if I had more childhood," you say quickly.'
 					'"I''m serious, <<$pcs_firstname>>: You haven''t been lying to me, have you?"'
 					'"No," you say, hoping he''ll believe you, "no, I haven''t."'
@@ -803,7 +803,7 @@ if $ARGS[0] = '':
 		*nl
 		'"How could I possibly forget that?" He speaks and looks at you with a sudden intensity that almost makes you blush. "I just wanted to know how you feel about it."'
 		*nl
-		'You give him a hint of a smile. "Trust me, if I didn''t like what we''re doing, you''d know. But for the record: I like sex.' + iif(pcs_dom>0,' I like being on top.',' I like being dominated.') + iif(stat['bj']>30,' I like giving blowjobs.','') + iif(stat['anal']>30,' I like anal.','') + iif(rough['pref']>30,' I like it rough.','') + iif(pcs_exhibition>30,' I like exposing myself.','') + iif(lesbian>10,' And I kinda like women, too.','') + ' But most importantly, I like having sex with you."'
+		'You give him a hint of a smile. "Trust me, if I didn''t like what we''re doing, you''d know. But for the record: I like sex.' + iif(pcs_dom>0,' I like being on top.',' I like being dominated.') + iif(stat['bj']>30,' I like giving blowjobs.','') + iif(stat['anal']>30,' I like anal.','') + iif(rough['pref']>30,' I like it rough.','') + iif(exhibitionist_lvl > 0,' I like exposing myself.','') + iif(lesbian>10,' And I kinda like women, too.','') + ' But most importantly, I like having sex with you."'
 		'You lean forward, so close to Martin now that he can smell the alcohol on your breath. "Does that answer your questions?"'
 		*nl
 		'Baffled by your directness, Martin nods silently.'

+ 13 - 13
locations/WorkHosp.qsrc

@@ -44,19 +44,19 @@ if $ARGS[0] = 'start':
 		act 'Masturbate (0:15)':
 			mastrrand = rand(0, 2)
 
-			if mastrrand = 0:
-				gt 'WorkHosp', '1'
-			else
-				cla
-				*clr
-				if pcs_exhibition < 30:exhibition_exp += rand(1,3)
-				picrand = 11
-				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/mastr11.jpg"></center>'
-				'You begin to secretly masturbate whenever nobody is watching.'
-				$orgasm_or = 'custom'
-				$orgasm_txt = 'Gradually a pleasant warmth and sensation radiates from your needy sex, culminating in a powerful orgasm that sends waves of pleasure through your entire body.'
-				gs 'arousal', 'masturbate', 15
-				gs 'stat'
+				if mastrrand = 0:
+					gt 'WorkHosp', '1'
+				else
+					cla
+					*clr
+					pcs_exhib += rand(1,3)
+					picrand = 11
+					'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/mastr11.jpg"></center>'
+					'You begin to secretly masturbate whenever nobody is watching.'
+					$orgasm_or = 'custom'
+					$orgasm_txt = 'Gradually a pleasant warmth and sensation radiates from your needy sex, culminating in a powerful orgasm that sends waves of pleasure through your entire body.'
+					gs 'arousal', 'masturbate', 15
+					gs 'stat'
 			end
 
 			act 'Leave':gt 'WorkHosp', 'start'

Tiedoston diff-näkymää rajattu, sillä se on liian suuri
+ 132 - 132
locations/_attributes_swimwear.qsrc


+ 60 - 0
locations/_difficulty.qsrc

@@ -0,0 +1,60 @@
+# _difficulty
+
+if difficulty = 0:
+	difficulty = 3
+end
+
+if $ARGS[0] = 'setdifficulty':
+	difficulty = 3
+	if $ARGS[1] = 'easy peasy': difficulty = 1
+	if $ARGS[1] = 'relaxed': difficulty = 2
+	if $ARGS[1] = 'hardcore': difficulty = 4
+end		
+
+!! following function returns the current difficulty
+if $ARGS[0] = 'getdifficulty':
+	$result = 'realistic'
+	if difficulty = 1:	$result = 'easy peasy'
+	if difficulty = 2:	$result = 'relaxed'
+	if difficulty = 4:	$result = 'hardcore'
+end &! --- getdifficulty ---
+		
+
+!! following function returns the basic adjustment for stat gain via exp.
+!! hardcore: 80
+!! realistic: 60
+!! relaxed: 40
+!! easy peasy: 20
+!! use func('_difficulty','getexpadj')
+if $ARGS[0] = 'getexpadj':
+	result = 20 * difficulty
+end &! --- getexpadj ---
+
+!! following function adjusts money gain by difficulty.
+!! use func('_difficulty','addmoney', x) with x being the base amount (for 'realistic' difficulty)
+if $ARGS[0] = 'addmoney':
+	money += (ARGS[1] * (5-difficulty)) / 2
+end &! --- addmoney ---
+
+!! following function returns the adjusted money added (e.g. for displaying the correct amount of money earnt in texts)
+!! use func('_difficulty','addmoneystring', x) with x being the base amount (for 'realistic' difficulty)
+if $ARGS[0] = 'addmoneystring':
+	result = (ARGS[1] * (5-difficulty)) / 2
+end &! --- addmoneystring ---
+
+!! following function adjusts money spent by difficulty.
+!! use func('_difficulty','spendmoney', x) with x being the base amount (for 'realistic' difficulty)
+if $ARGS[0] = 'spendmoney':
+	money -= (ARGS[1] * (difficulty + 1)) / 4
+end &! --- spendmoney ---
+
+
+!! following function returns the adjusted money spent (e.g. for displaying the correct price in shops)
+!! use func('_difficulty','spendmoneystring', x) with x being the base amount (for 'realistic' difficulty)
+if $ARGS[0] = 'spendmoneystring':
+	result = (ARGS[1] * (difficulty + 1)) / 4
+end &! --- spendmoneystring ---
+
+
+--- _difficulty ---------------------------------
+

+ 1 - 1
locations/abduction.qsrc

@@ -521,7 +521,7 @@ if $ARGS[0] = 'abdFood':
 	'In the corner there is something remotely similar to a shower, with cold water only, though.'
 	'There''s enough space to do some basic <a href="exec:gt ''abduction'', ''abdpushup''">exercise</a>.'
 	chainChance = rand(1, 100)
-	if chainChance <= 60 and (rapeCount > 5 or tortureCount > 5):
+	if chainChance <= 80 and (rapeCount > 5 or tortureCount > 5):
 		'Suddenly you spot a loose chainlink on your leash. You try to manipulate it and you manage to free yourself from the wall.'
 		'<a href="exec:gt ''abduction'', ''abdEscape''">Go to the window</a>'
 	end

+ 1 - 1
locations/andrey.qsrc

@@ -316,7 +316,7 @@ if $ARGS[0] = 'beg':
 			'"Fine, then there''s the door!" Mr. Sobulyagin snaps, clearly upset with your answer.'
 			act 'Leave':gt 'young_shop', 'start'
 		end
-		act 'Agree': gt 'andry', 'rehired'
+		act 'Agree': gt 'andrey', 'rehired'
 	end
 	act 'Leave':gt 'young_shop', 'start'
 end

+ 1 - 1
locations/annafrends.qsrc

@@ -235,7 +235,7 @@ if $ARGS[0] = 'scene1':
 		temp = rand(1,100)
 		if temp >= 70:
 			'You notice Rex briefly glancing at your feet.'
-			if  (PCloSkirt > 2 or PCloPants > 4):
+			if pcs_horny > 30 and (PCloSkirt > 2 or PCloPants > 4):
 				act 'Show off your legs':
 					cla
 					minut += 5

+ 2 - 1
locations/arousal.qsrc

@@ -561,7 +561,7 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 !!Reduction in arousal linked to pain, masochism helps to deal with this
 	if pain['total'] > 0:
 		if maso['pref'] <= 0 and pain['total'] < 50:
-			if pain['total'] - (maso['exp'] + 1 / 6) > 0:stim['total'] += (pain['total'] - (maso['exp'] / 6))
+			if pain['total'] - (maso['exp'] + 1 / 6) > 0:stim['total'] -= (pain['total'] - (maso['exp'] / 6))
 		elseif maso['pref'] < 25 and pain['total'] < 55:
 			stim['total'] += (pain['total'] * maso['exp'] +1 / 400)/60*stim['time']
 		elseif maso['pref'] < 50 and pain['total'] < 70:
@@ -610,6 +610,7 @@ end
 !!-----------------------------------------------
 
 if $ARGS[0] = 'end':
+	if orgasm_buildup > 250: orgasm_buildup = 250
 	if orgasm_buildup > 200: orgasm_buildup -= 10
 	if orgasm_buildup > 150: orgasm_buildup -= 10
 	if orgasm_buildup > 100: orgasm_buildup -= 10

+ 2 - 2
locations/artemEv.qsrc

@@ -87,7 +87,7 @@ end
 if $ARGS[0] = 'learn':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/2.jpg"></center>'
 	'You spend an hour doing your homework together with Artem. He''s a very smart guy, and explains several things to you. At the end of the hour, you feel like you had a very productive homework session, and that you learned a lot from Artem''s tutoring.'
-	minut += 6
+	minut += 1
 	npc_rel['A2'] += 10
 	lernHome = 0
 	lern += rand(3, 6)
@@ -691,7 +691,7 @@ if $ARGS[0] = 'kiss':
 				npc_sex['A2'] += 1
 				hja += 1
 				gs 'arousal','hj',15,'sub'
-				if pcs_mood > 50:pcs_mood += 50
+				if pcs_mood > 50:pcs_mood = 90
 				gs 'cum_call','hands',$boy,1
 				cumspclnt = 9
 				gs 'cum_cleanup'

+ 2 - 2
locations/billiard.qsrc

@@ -13,8 +13,8 @@ act 'Leave':gt 'torgcentr'
 if hour >= 8 and hour <= 20:
 	if money >= 250:
 		act 'Play (250 <b>₽</b>) (00:15)':
-			money -= 15
-			minut += 60
+			money -= 250
+			minut += 15
 			billvar = 0
 			pool_exp += rand(0, 3)
 			billrand = rand(0, 5)

+ 2 - 1
locations/body.qsrc

@@ -451,6 +451,7 @@ if dounspell = 0:
 	
 !!This sets weight
 !! This variable is actually only used ONCE, when stripping, to see if you fall off the pole from being too heavy. I am reluctant to touch it, since the math is not explained. Maybe later.
+!! Weight = (height in cm x bottom of average weight in kilos for a 170cm female / 170cm + (hip modifier + 2 x overrun fat)/4 + cup size
 	pcs_weight = (pcs_hgt * 62 / 170) + (vhips + (vofat * 2)) / 4 + tits
 end
 
@@ -462,7 +463,7 @@ if pcs_hairlng <= 80:
 	if defcurly = 0:
 		curly = 0
 	else
-		!! ...Wat?
+		!! This sets curly hair to as high a number as possible to prevent it straightening in error
 		curly = 2147483647
 	end
 	hbraids = 0

+ 54 - 97
locations/brother.qsrc

@@ -10,7 +10,16 @@ if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20
 ! brothersawpirsF: Flag 0/1 Have your brother seen your nipple piercings
 ! npc_rel['A34']: relationship
 ! npc_dick['A34']: size of brothers dick (14cm)
-! brotherSex: Number of sexual interactions with brother (cap at 10)
+! brotherSex = 1 - You have kissed him
+! brotherSex = 2 - You have purposely shown him your tits
+! brotherSex = 3 - You have purposely shown him your naked body
+! brotherSex = 4 - You have let him touch you
+! brotherSex = 5 - You have given him a handjob
+! brotherSex = 6 - You have given him a blowjob
+! brotherSex = 7 - You've fucked
+! brotherSex = 8 - You've done anal
+! brotherSex = 9 - You are siblings with benefits
+! brotherSex = 10 - You are lovers
 ! npc_QW['A34']: Quest stages
 ! brotherAge: your age - 2
 ! brotherknowslut: brother knowledge of your sexual activity (1 = seen cum, 2 = groupsex in park)
@@ -31,11 +40,17 @@ if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20
 
 if $ARGS[0] = 'start':
 	gs 'stat'
+	gs 'boystat','A34'
+	dick = npc_dick['A<<34>>']
 	'<center><b><font color="maroon">Kolka</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
 	'Your brother Kolka is younger than you, he''s <<brotherAge>> years old. While you share the same mother, unlike you and your sister, Kolka''s dad is your stepfather. He is a student at the same school as you, and enjoys soccer.'
 
-	if npc_rel['A34'] < 20:
+	if brotherSex = 10:
+		'You and your brother are lovers.'
+	elseif brotherSex = 9:
+		'You are siblings with benefits.'
+	elseif npc_rel['A34'] < 20:
 		'You and your brother argue all the time.'
 	elseif npc_rel['A34'] >= 20 and npc_rel['A34'] < 40:
 		'You and your brother bicker sometimes.'
@@ -102,7 +117,7 @@ if $ARGS[0] = 'start':
 			if brotherSex < 1:
 				'Your brother sarcastically comments on the small towel you are wearing:'
 				'<<$pcs_nickname>>, Are you sure that is not a hand towel?'
-			elseif brotherSex >= 1:
+			elseif brotherSex >= 2:
 				'Your brother sarcastically comments on the small towel you are wearing:'
 				'"Are you wearing that for me sis?"'
 			end
@@ -277,10 +292,10 @@ if $ARGS[0] = 'start':
 				brothersawpirsF=1
 				npc_rel['A34'] += 3
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/9vh2v.jpg" ></center>'
-				'"Look what I have," you walk up to Kolka, your chest bare, showing off your nipple pircings, "Don''t be shy, you can touch them."'
+				'"Look what I have," you walk up to Kolka, your chest bare, showing off your nipple piercings, "Don''t be shy, you can touch them."'
 				'Your brother, dumbfounded by your suggestion, hesitantly touches the piercing in one of your nipples, causing you to moan gently.'
 				if brotherSex = 0:
-					'He abruptly withdraws his hand and apologizes for his rudeness. You have no choice, but to apologise, that wasn''t fair. You cover your chest.'
+					'He abruptly withdraws his hand and apologizes for his rudeness. You have no choice, but to apologize, that wasn''t fair. You cover your chest.'
 				else
 					'Seeing the pleasure playing with your nipples brings you, he begins to play harder with your piercings, sometimes squeezing your exposed Breasts.
 					After playing for a while, he lets go of your breasts, and says, "I really like your new additions."'
@@ -293,7 +308,7 @@ if $ARGS[0] = 'start':
 
 
 		if indorf = 0 and $clothingworntype = 'nude' and pirsF > 0 and brothersawpirsF = 0:
-			if brotherSex = 0:
+			if brotherSex < 4:
 				if npc_rel['A34'] >= 70:
 					'"Looks good on you." your brother winks, and points toward your pierced nipples.'
 					if npc_rel['A34'] <50:npc_rel['A34'] += 1
@@ -328,76 +343,17 @@ if $ARGS[0] = 'start':
 
 		if indorf = 0 and brotherSexCount > 0 and brotherDay = daystart:
 			brotherRand = rand(0,10)
-			if hour >= 5 and hour < 7 and brotherSex > 0 and brotherMorningSex ! daystart and brotherRand < 2:
-				'Going up to your sleeping brother, you see he''s pitching a tent.'
-				if pcs_horny >= 90 and brothersex > 6:
-					act 'Mount him':
-						if brotherSex > 10: brotherSex = 10
-						cls
-						minut += 5
-						pcs_horny += 10
-						gs 'boyStat', 'A34'
-						pose = 0
-
-						gs 'stat'
-
-						'<center><img <<$set_imgh>> src="images/locations/shared/sex/sexrand/nae22.jpg"></center>'
-						'Approaching your brother, you gently pull back the covers and carefully straddle his sleeping body, taking care not to wake him.'
-						if pcs_sleep <= 50 and rand(0,4) =0:
-
-							$risk_boy = 'your own brother'
-							gs 'dinsex','vaginal_sex',10
-							gs 'brother', 'sleepsexcum'
-						else
-							protect = 0
-							vidageday -= 1
-
-							if prezik > 0:
-								dynamic $prezik
-								protect = 1
-								if preziktype = 2:
-									sexcontra = 7
-									'You take a sabotaged condom and put it on <<$boydesc>>.'
-								else
-									sexcontra = 3
-									'You take a condom and put it on <<$boydesc>>.'
-								end
-
-							end
-							$risk_boy = 'your own brother'
-							gs 'dinsex','vaginal_sex',10
-							gs 'brother', 'sleepsexcum'
-						end
-					end
-				else
-					act 'Solve your brother''s morning problem':
-						cls
-						minut += 5
-						pcs_horny += 10
-						stat['bj'] += 1
-						gs 'boyStat', 'A34'
-						spafinloc = 12
-						sexpartkno = 1
-						gs 'cum_manage'
-						swallow += 1
-						brotherbj += 1
-						brotherSex += 1
-						brotherSexCount -= 1
-						brotherMorningSex = daystart
-						gs 'stat'
-
-						'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj34.jpg"></center>'
-						'Approaching your brother, you gently pull back the covers and begin to suck his <<dick>> cm dick. After a few minutes, he moans softly in his sleep and his cock twitches.'
-						'Your mouth quickly fills with warm sperm and you feel its sharp taste.'
-						'Swallowing the semen, you gently replace the blanket and, seeing a slight smile on your sleeping brother, you leave.'
-
-						act '<B>Move away</B>':gt 'sitrPar'
-						exit
-					end
+			if hour >= 6 and hour < 7 and brotherMorningSex ! daystart:
+				'You look at your brother sleeping peacefully on the couch.'
+				if brotherRand < 5:'As you look, you can also clearly see the outline of his morning wood pitching a tent under the blanket.'
+				if week < 6 and kanikuli = 0:
+					act'Wake him up for breakfast':gt'brother2','wakeup'
 				end
+			elseif hour < 7 and brotherMorningSex = daystart:
+				'Your brother is busying himself getting ready for school.'
 			end
 
-			if hour >= 21 and hour < 24 and brotherSex > 0 and brotherNightSex ! daystart:
+			if hour >= 21 and hour < 24 and brotherSex > 4 and brotherNightSex ! daystart:
 				'When you get close, he suddenly opens his eyes and says,:'
 				if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
 					'"<<$pcs_nickname>>, help me sleep." Then he throws back the blanket, revealing his erection.'
@@ -430,7 +386,7 @@ if $ARGS[0] = 'start':
 				'When you get close, He turns to you and says,:'
 				if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
 					gs 'boyStat', 'A34'
-					'"<<$pcs_nickname>>, Come on you have work to do, and quitely, you don''t want to wake our parents up." Then he drops his pants, and you see his hard <<dick>> cm dick.'
+					'"<<$pcs_nickname>>, come on you have work to do. And be quiet! You don''t want to wake up mom and dad." Then he drops his pants, and you see his hard <<dick>> cm dick.'
 					brotherSexCount -= 1
 					brotherEvSex = daystart
 
@@ -483,7 +439,6 @@ if $ARGS[0] = 'start':
 end
 
 if $ARGS[0] = 'sleepsexcum':
-	brotherSex += 1
 	brotherfuck += 1
 	minut += 15
 	if protect ! 1:
@@ -621,11 +576,11 @@ end
 if $ARGS[0] = 'brotherSexStart':
 	cla
 	gs 'boyStat', 'A34'
-	if brotherSex = 0:brotherSex = 1 & guy += 1
 	act 'Jerk your brother':
 		cls
 		minut += 5
 		stat['hj'] += 1
+		if brotherSex < 5:brotherSex = 5
 		gs 'stat'
 
 		'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj1.jpg"></center>'
@@ -635,13 +590,14 @@ if $ARGS[0] = 'brotherSexStart':
 		gs 'cum_manage'
 		gs 'brother', 'brotherSexEnd'
 	end
-	if brotherSex > 4:
+	if brotherSex >= 5:
 		act 'Suck your brother':
 			cls
 			minut += 5
 			pcs_horny += 10
 			brotherfuck += 1
 			stat['bj'] += 1
+			if brotherSex < 6:brotherSex = 6
 			gs 'stat'
 
 			'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/kolka/sex/blow0,<<rand(0,6)>>.mp4"></video></center>'
@@ -686,9 +642,9 @@ if $ARGS[0] = 'brotherSexStart':
 
 				gs 'brother', 'brotherSexEnd'
 			end
-			if brotherSex > 6:
+			if brotherSex >= 6:
 				act 'Give yourself to your brother':
-					if brotherSex > 10: brotherSex = 10
+					if brotherSex < 7:brotherSex = 7
 					cls
 					minut += 5
 					pcs_horny += 10
@@ -708,12 +664,13 @@ if $ARGS[0] = 'brotherSexStart':
 					gs 'brother', 'brotherSexEnd'
 				end
 			end
-			if brotherSex >= 10:
+			if brotherSex >= 6:
 				act 'Offer your ass to your brother':
 					cls
 					minut += 5
 					pcs_horny += 10
 					brotherfuck += 1
+					if brotherSex < 8:brotherSex = 8
 					gs 'boyStat', 'A34'
 
 					gs 'stat'
@@ -729,10 +686,10 @@ if $ARGS[0] = 'brotherSexStart':
 			end
 		end
 	end
-	if brotherSex > 6:
+	if brotherSex >= 6:
 		act 'Give yourself to your brother':
 			brotherfuck += 1
-			if brotherSex > 10: brotherSex = 10
+			if brotherSex < 7:brotherSex = 7
 			cls
 			minut += 5
 			pcs_horny += 10
@@ -751,12 +708,13 @@ if $ARGS[0] = 'brotherSexStart':
 			gs 'brother', 'brotherSexEnd'
 		end
 	end
-	if brotherSex >= 10:
+	if brotherSex >= 7:
 		act 'Offer your ass to your brother':
 			brotherfuck += 1
 			cls
 			minut += 5
 			pcs_horny += 10
+			if brotherSex < 8:brotherSex = 8
 			gs 'boyStat', 'A34'
 
 			gs 'stat'
@@ -772,7 +730,6 @@ if $ARGS[0] = 'brotherSexStart':
 end
 
 if $ARGS[0] = 'brotherSexEnd':
-	brotherSex += 1
 	if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
 		if $loc = 'sitrPar' and father_go = 1 and hour >= 18 and hour < 21:
 			minut += 15
@@ -991,10 +948,10 @@ if $ARGS[0] = 'brother_sex_end':
 	minut += RAND(2,5)
 	'<center><video src="images/characters/pavlovsk/resident/kolka/event/shower/shower.mp4"></center>'
 	'You stay under the shower for a while, touching yourself, remembering Kolka inside of you.'
-	if brothersex > 10:
+	if brothersex >= 9:
 		'You really enjoyed this little tryst, and in secret you are hoping for a repeat.'
 	elseif brothersex > 0:
-		'You are a little bedevilled that you just had sex with your own brother, in the shower, not the least, but you can''t deny that you enjoyed it, maybe more so because it is taboo.'
+		'You are a little bedeviled that you just had sex with your own brother, in the shower, not the least, but you can''t deny that you enjoyed it, maybe more so because it is taboo.'
  	else
 		'You can''t believe that you just had sex with your little brother. You are a little shocked, but also feel a strange glow, even knowing that this is fundamentally wrong.'
 	end
@@ -1147,7 +1104,7 @@ if $ARGS[0] = 'anus_check':
 		elseif brother_saw_analplug = 1:
 			'"There it is again with this thing in your ass?" asked Kolka, obviously referring to sex-toy in your ass.'
 			'"Aha..." you coquettishly answer.'
-			if brotherSex > 0:
+			if brotherSex > 4:
 				'"Maybe you should take it out and put it back in?" He asks.'
 				'"Maybe next time, Kolka"'
 			else
@@ -1288,11 +1245,12 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 	minut += RAND(5,10)
 	ivrand = RAND(1,2)
 	brotherConfidence += 4
-	if brotherConfidence < 10 and brotherSex < 1:
+	if brotherConfidence < 10 and brotherSex < 4:
 		gs 'cum_call', 'stomach', 'A34', 1, 0, 0, rand(20,30)
 		gs 'cum_call', 'breasts', 'A34', 1, 0, 0, rand(10,20)
 		gs 'cum_call', 'labia', 'A34', 1, 0, 0, rand(10,20)
 		gs 'stat'
+		if brotherSex < 4:brotherSex = 4
 		if sound = 0:PLAY 'sound/moaning<<ivrand>>.mp3',30
 			picrand = RAND(1,2)
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/homework/f (6.<<picrand>>).jpg"></center>'
@@ -1323,7 +1281,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 			end
 			act'Dress':gt $loc, $metka
 		end
-	elseif brotherSex > 0:
+	elseif brotherSex >= 4:
 		cls
 		minut += 5
 		pcs_horny += 10
@@ -1333,7 +1291,6 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 		sexpartkno = 1
 		gs 'cum_manage'
 		swallow += 1
-		brotherSex += 1
 		brotherSexCount -= 1
 		brotherEvSex = daystart
 		gs 'stat'
@@ -1354,7 +1311,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 			'You don''t say anything as you get dressed.'
 			act'Dress':gt $loc, $metka
 		end
-	elseif brotherConfidence > 10 and brotherSex = 0:
+	elseif brotherConfidence > 10 and brotherSex < 4:
 		cls
 		minut += 5
 		pcs_horny += 10
@@ -1364,7 +1321,7 @@ if $ARGS[0] = 'brother_voyeur_ev8':
 		sexpartkno = 1
 		gs 'cum_manage'
 		swallow += 1
-		brotherSex += 1
+		if brotherSex < 4:brotherSex = 4
 		brotherSexCount -= 1
 		brotherEvSex = daystart
 		gs 'stat'
@@ -1391,21 +1348,21 @@ end
 
 if $ARGS[0] = 'pregreact':
 	if pregTalkbrother = 0 and knowpreg = 1:
-		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex = 0 and kid = 0:
+		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex < 7 and kid = 0:
 			'Surprised, your brother looks at your tummy. "<<$pcs_nickname>>, are you pregnant? Mom and dad are going to be pissed!" After a moments pause he adds "You do still look good pregnant, though."'
 			pregTalkbrother = 1
 
 			act 'Continue' :gt 'sitrPar'
 		exit
 
-		elseif $clothingworntype ! 'nude' and pregchem > 3460 and brotherSex = 0 and kid = 0:
+		elseif $clothingworntype ! 'nude' and pregchem > 3460 and brotherSex < 7 and kid = 0:
 			'Surprised, your brother looks at your tummy, "<<$pcs_nickname>>, why didn''t you tell me I''m going to be an uncle? '
 			pregTalkbrother = 1
 
 			act 'Continue' :gt 'sitrPar'
 		exit
 
-		elseif brotherSex > 0 and kid = 0 and pregTalkMom = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
+		elseif brotherSex >= 7 and kid = 0 and pregTalkMom = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
 			cla
 			'"Are you really pregnant? It''s.. It''s not mine, is it?"'
 			*nl
@@ -1421,7 +1378,7 @@ if $ARGS[0] = 'pregreact':
 		exit
 
 
-		elseif ($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem > 3460) and brotherSex = 0 and kid > 0:
+		elseif ($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem > 3460) and brotherSex < 7 and kid > 0:
 			'"You''re already pregnant again? This is starting to look like a new hobby," he laughs.'
 			'"You know what? Maybe it is," you joke back. "Some girls play sports; I get serially impregnated."'
 			'"Well, congratulations on taking home the gold in getting knocked up."'
@@ -1432,7 +1389,7 @@ if $ARGS[0] = 'pregreact':
 
 			act 'Continue' :pregTalkbrother = 1 & gt 'sitrPar'
 
-		elseif brotherSex > 0 and pregTalkMom = 0 and kid > 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
+		elseif brotherSex >= 7 and pregTalkMom = 0 and kid > 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
 			cla
 			'"Wow, you''re pregnant again? Is it mine this time?"'
 			*nl

+ 266 - 0
locations/brother2.qsrc

@@ -0,0 +1,266 @@
+# brother2
+
+
+if $ARGS[0] = 'wakeup':
+	cla & *clr
+	'<center><b><font color="maroon">Kolka</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+	'"Hey, it''s time to get up Kolka."'
+	'"Mrph. Lemme alone," he mutters, eyes squeezing tight in annoyance.'
+	'"Come on Kolka. Mom''s gonna be mad if you''re late for breakfast again."'
+	'He doesn''t respond except to grumble again, turning over and pulling his blanket tighter.'
+	*nl
+	act'Leave him alone':
+		cla
+		*nl
+		'You shrug, realizing that you''re not going to find a way to wake him up any time soon without him being mad at you and decide to leave him be.'
+		act'Move away':gt $loc, $metka
+	end
+	
+	act'Yank his blanket off':
+		brotherMorningSex = daystart
+		cla
+		*nl
+		'"Come on Kolka! Wake. UP!"'
+		if $clothingworntype = 'nude':
+			'With a mighty tug, you yank the blanket off of him, leaving him clutching himself and shivering on the couch. After a few moments, he forces his eyes open, blinking wearily as he sits up on the couch and shamelessly glances up and down your naked body.'
+		else
+			'With a mighty tug, you yank the blanket off of him, leaving him clutching himself and shivering on the couch. After a few moments, he forces his eyes open, blinking wearily as he sits up on the couch, glaring at you with half closed eyes.'
+		end
+		if brotherSex >= 7:
+			'"You know, it''s a good thing that you put out or I might not like you as much."'
+			'Rolling your eyes, you toss your brother''s blanket into the corner.'
+			'"Yeah, well lucky for you, I happen to go above and beyond the qualities of a good sister. Including getting her annoying little brother out of bed when he needs to be getting ready for school. Now go get dressed before mom comes out and yells at you!"'
+		elseif brotherSex = 6:
+			'"You''re lucky that you give me blowjobs or I might actually get mad at you."'
+			'You throw your brother''s blanket into the corner.'
+			'"You''re lucky I decide to give you blowjobs at all! Keep this up and that might change. You might end up having to get your own rocks off," you sneer, miming a jerk-off motion at him. "Now go get dressed before mom comes out and yells at you too!"'
+		elseif brotherSex = 5:
+			npc_rel['A34'] -= 1
+			'"Not even handjobs are worth this," he mutters.'
+			'"Yeah well I can always stop if you''re gonna be a little baby about it," you say, throwing your brother''s blanket into the corner. "Now go get dressed before mom comes out here and yells at you."'
+		elseif $clothingworntype = 'nude':
+			npc_rel['A34'] -= 1
+			'"At least you have the decency to give me a good view when you ruin my sleep in the morning."'
+			'You roll your eyes in exasperation and throw his blanket into the corner.'
+			'"Shut the fuck up and get dressed for school Kolka. Before mom comes out here and yells at the both of us."'
+		else
+			npc_rel['A34'] -= 1
+			'"I hate you."'
+			'"Oh stop being so melodramatic," you say, rolling your eyes and tossing his blanket into the corner. "Now get ready for school before mom yells at you."'
+		end
+		act'Move away':gt $loc, $metka
+	end
+		
+	if brotherSex >= 2 or pcs_inhib >= 35 or npc_rel['A34'] >= 75:
+		act'Tell him you''ll show him your tits':
+			cla
+			brotherMorningSex = daystart
+			'"I''ll tell you what Kolka, if you get up now, I''ll let you look at my tits."'
+			if $clothingworntype = 'nude' and $braworntype = 'none':
+				'He cracks open an eye. "I don''t need to get up to do that."'
+				'You look down at yourself and remember that you''re already topless. Right. That wasn''t a very good plan...'
+				act'Back to the drawing board':gt'brother2','wakeup'
+			elseif brotherwaketrick = 1:
+				'He opens his eyes slowly, looking at you with suspicion.'
+				'"You''re not just going to leave like you did last time are you?"'
+				'"No Kolka."'
+				'"You promise? For real this time?"'
+				'"I promise."'
+				'He pulls back his blanket and sits up, rubbing the sleep from his eyes to focus on you.'
+			else
+				'He opens his eyes slowly, looking at you with suspicion.'
+				'"This isn''t just some trick to get me out of bed?"'
+				'"No Kolka."'
+				'"You promise?"'
+				'"I promise."'
+				'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focus on you.'
+			end
+			if $clothingworntype ! 'nude':
+				act'Pull up your top':
+					cla & *clr
+					npc_rel['A34'] += 4
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash<<rand(1,4)>>.jpg"></center>'
+					'Following through on your promise, you lift up your top, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
+					'"There. Happy now?"'
+					if brotherwaketrick = 1:
+						'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
+						'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
+						'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka."'
+						brotherwaketrick = 2
+					else
+						'"Very."'
+						'"Good." You cover yourself up, putting your clothes back in place. "Now go get dressed."'
+					end
+					'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
+					act'Move away':gt $loc, $metka
+				end
+			else
+				act'Pull down your bra':
+					cla & *clr
+					npc_rel['A34'] += 4
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash5.jpg"></center>'
+					'Following through on your promise, you pull down your bra, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
+					'"There. Happy now?"'
+					if brotherwaketrick = 1:
+						'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
+						'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
+						'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka."'
+						brotherwaketrick = 2
+					else
+						'"Very."'
+						'"Good." You cover yourself up, putting your clothes back in place. "Now go get dressed."'
+					end
+					'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
+					act'Move away':gt $loc, $metka
+				end
+			end
+			
+			act'Trick him and don''t do it':
+				cla & *clr
+				brotherwaketrick = 1
+				npc_rel['A34'] -= 5
+				'<center><b><font color="maroon">Kolka</font></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+				'You wait for him to be more or less fully awake before snatching his blanket and move away.'
+				'"Hey!" he cries. "What are you doing?"'
+				'"I''m leaving. What the hell is wrong with you? You really thought I was gonna show you my tits?"'
+				if brotherSex = 2 or brotherSex = 3:
+					'"You''ve let me look at you before!"'
+					'"Yeah well, this isn''t ''before''. I''m not doing it today."'
+				elseif brotherSex >= 4:
+					'"You''ve done so much with me before!"'
+					'"Yeah well, this isn''t ''before''. I''m not doing anything today."'
+				end
+				'"Liar!" he screams at you.'
+				'"Listen here you little-!"'
+				'<b><i>"Hey!"</i></b> your mother shouts from the bedroom. "What is all this racket going on so early in the morning?! You two get along or so help me I will spank you! I don''t care how old you are!"'
+				'Glaring silently at one another, the two of you retreat after a ceasefire being called by your mother. This probably wasn''t good for your relationship though...'
+				act'Move away':gt $loc, $metka
+			end
+		end
+	end
+	if brotherSex >= 3  or pcs_inhib >= 45 or npc_rel['A34'] >= 80:
+		act'Tell him you''ll show him your pussy':
+			cla
+			brotherMorningSex = daystart
+			'"I''ll tell you what Kolka, if you get up now, I''ll show you my pussy."'
+			if $clothingworntype = 'nude' and $panyworntype = 'none':
+				'He cracks open an eye. "I don''t need to get up to do that."'
+				'You look down at yourself and remember that you''re naked. Right. That wasn''t a very good plan...'
+				act'Back to the drawing board':gt'brother2','wakeup'
+			elseif brotherwaketrick = 1:
+				'He opens his eyes slowly, looking at you with suspicion.'
+				'"You''re not just going to leave like you did last time are you?"'
+				'"No Kolka."'
+				'"You promise? For real this time?"'
+				'"I promise."'
+				'He pulls back his blanket and sits up, rubbing the sleep from his eyes to focus on you.'
+			else
+				'He opens his eyes slowly, looking at you with suspicion.'
+				'"This isn''t just some trick to get me out of bed?"'
+				'"No Kolka."'
+				'"You promise?"'
+				'"I promise."'
+				'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focus on you.'
+			end
+			act'Expose yourself':
+				cla & *clr
+				npc_rel['A34'] += 4
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/pussyflash.jpg"></center>'
+				'Following through on your promise, you pull down your panties and pull up your top, exposing your breasts and pussy to your brother. Still tired, he smiles only faintly in satisfaction.'
+				'"There. Happy now?"'
+				if brotherwaketrick = 1:
+					'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
+					'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
+					'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka. Mom will kill you if you''re late for school."'
+					brotherwaketrick = 2
+				else
+					'"Very. Not that I''m complaining, but how come you showed me your boobs too? I only asked to see your pussy."'
+					'"More motivation for you to wake up," you smile. You cover yourself up, putting your clothes back in place. "Bet it''s difficult to go back to sleep with an erection that hard. Now go get dressed."'
+				end
+				'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
+				act'Move away':gt $loc, $metka
+			end
+			
+			act'Trick him and don''t do it':
+				cla & *clr
+				brotherwaketrick = 1
+				npc_rel['A34'] -= 5
+				'<center><b><font color="maroon">Kolka</font></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+				'You wait for him to be more or less fully awake before snatching his blanket and move away.'
+				'"Hey!" he cries. "What are you doing?"'
+				'"I''m leaving. What the hell is wrong with you? You really thought I was gonna show you my pussy?"'
+				if brotherSex = 2 or brotherSex = 3:
+					'"You''ve let me look at you before!"'
+					'"Yeah well, this isn''t ''before''. I''m not doing it today."'
+				elseif brotherSex >= 4:
+					'"You''ve done so much with me before!"'
+					'"Yeah well, this isn''t ''before''. I''m not doing anything today."'
+				end
+				'"Liar!" he screams at you.'
+				'"Listen here you little-!"'
+				'<b><i>"Hey!"</i></b> your mother shouts from the bedroom. "What is all this racket going on so early in the morning?! You two get along or so help me I will spank you! I don''t care how old you are!"'
+				'Glaring silently at one another, the two of you retreat after a ceasefire being called by your mother. This probably wasn''t good for your relationship though...'
+				act'Move away':gt $loc, $metka
+			end
+		end
+	end
+			
+	
+	if brotherSex >= 5 or pcs_inhib >= 50 or npc_rel['A34'] >= 85:
+		act'Tell him you''ll give him a handjob':
+			cla
+			brotherMorningSex = daystart
+			'"I''ll tell you what Kolka, if you get up now, I''ll help you deal with your morning wood before mom and dad come out of their room."'
+			'His eye cracks open to look at you, seemingly intrigued.'
+			'"How?"'
+			'"With a handjob of course!"'
+			'"Hmmm..." He seems to consider for a moment before throwing off his blanket and revealing to you a rock hard erection showing through his pajama pants. "Deal."'
+			act'Give your brother a handjob':
+				cla & *clr
+				gs 'arousal', 'hj', 5
+				gs 'cum_call','hands', $boy
+				if brotherSex < 5:brotherSex = 5
+				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/kotovhj.jpg"></center>'
+				'Pulling down Kolka''s pants, you get started immediately, gently working his member with your hand.'
+				'Within just a few minutes he groans, ejaculating as his warm cum coats your fingers.'
+				'Your duty done, you pull your now sticky hand back, saying, "Alright Kolka. A deal''s a deal. Now clean up and get dressed before mom comes out here and sees you like this."'
+				'"Alright!" he says cheerfully, waddling away with his pants around his ankles to find some tissues to clean himself up.'
+				act'Move away':gt $loc, $metka
+			end
+		end
+	end
+	if brotherSex >= 6 or pcs_inhib >= 50 or npc_rel['A34'] >= 85:
+		act'Tell him you''ll give him a blowjob':
+			cla
+			brotherMorningSex = daystart
+			'"Okay Kolka, if you get up now, before mom and dad come out of their room, I''ll give you a blowjob."'
+			'His eye cracks open to look at you, seemingly intrigued.'
+			'"How does that sound?"'
+			'"Sounds pretty good to me," he says, throwing off his blanket and leaning back as he pulls his <<dick>> cm cock out.'
+			act'Blow him':
+				cla & *clr
+				gs 'arousal', 'hj', 5
+				gs 'cum_call','mouth', $boy
+				swallow += 1
+				if brotherSex < 6:brotherSex = 6
+				if $clothingworntype = 'nude' and $braworntype = 'none':
+					'<center><video src="images/characters/pavlovsk/resident/kolka/bj1.mp4"></center>'
+				else
+					'<center><video src="images/characters/pavlovsk/resident/kolka/bj2.mp4"></center>'
+				end
+				'Kneeling down, you lean forward and wrap your lips around Kolka''s cock. You suck on it gently, but move your head forward and backward with quick bobbing motions.'
+				'Several minutes go by before you feel hot viscous liquid shooting into your mouth without warning and hear your brother sighing loudly in satisfaction. You pull back as he finishes cumming and realizing there''s nowhere else for you to deposit his sperm, swallow it in one gulp.'
+				'"Thanks sis," he says. "That was pretty refreshing. Actually makes me want to get up in the morning if you''re gonna give me great head like that!"'
+				'"Glad I could help I guess," you reply, giving his cock a few more licks to make sure it''s clean. "Now go get dressed for school. Before mom comes out and yells at you for having your dick hanging out."'
+				'"Okay, okay," he says, getting up and tidying up the couch from where he was sleeping.'
+				act'Move away':gt $loc, $metka
+			end
+		end
+	end
+end
+
+--- brother2 ---------------------------------
+

+ 0 - 2
locations/brother_lessons.qsrc

@@ -45,7 +45,6 @@ if $ARGS[0] = 'homework':
 				elseif ivrand = 2 and (brotherEvSex ! daystart or anatomyhomeworkhelp = 1):
 					gs 'brother_lessons', 'showbody'
 				else
-                    act 'Show body': gt 'showbody'
 					act 'Finish': gt 'sitrPar'
 				end
 			end
@@ -73,7 +72,6 @@ if $ARGS[0] = 'homework':
 				pcs_horny += RAND(5,10)
 				'You decide to continue to do homework, trying not to pay attention to Kolka''s hand on your leg. He realizes that you don''t mind so he continues to stroke higher up your leg.'
 				act 'Finish': gt 'sitrPar'
-                act 'Show body': gt 'showbody'
 			end
 			act'Remove hand and continue':
 				cla

+ 23 - 17
locations/brother_voyeur.qsrc

@@ -57,6 +57,7 @@ if $ARGS[0] = 'showertalk1':
 				npc_rel['A34'] += 5
 				*clr & cla
 				brothershowerlook = 1
+				if brotherSex < 3:brotherSex = 3
 				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothertalk4.jpg"></center>'
 				npc_rel['A34'] += 5
 				'	"Kolka..." When you say this he starts to turn towards you a little bit but then stops himself and continues to stare at the wall. You sigh sympathetically. "It''s okay to look at me you know."'
@@ -142,6 +143,7 @@ if $ARGS[0] = 'showertalk2':
 		act'"You can look at me you know"':
 			*clr & cla
 			brothershowerlook = 1
+			if brotherSex < 3:brotherSex = 3
 			npc_rel['A34'] += 5
 			bro_ass_compliment = rand(1,3)
 			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothertalk4.jpg"></center>'
@@ -628,10 +630,10 @@ if $ARGS[0] = 'brother_shower_together':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
 			'	"So, how was your day?" you ask cheerfully.'
-			if brother_shower_times < 3 or brotherSex < 1:
+			if brother_shower_times < 3 or brotherSex < 4:
 				'	"It, uhh... was... g-good... uhm..." he stammers.'
 				act'Continue':gt'brother_voyeur','brother_shower_together_first'
-			elseif brotherSex >= 1 and brothergrope = 1:
+			elseif brotherSex >= 4 and brothergrope = 1:
 				'	"Getting better by the moment..." he says, sliding up behind you.'
 				act'"Eek-!"':gt'brother_voyeur','showerfun'
 
@@ -651,7 +653,7 @@ if $ARGS[0] = 'brother_shower_together':
 				'	"It''s... Uhh... fine..." he stammers.'
 				act'Continue':gt'brother_voyeur','brother_shower_together_first'
 
-			elseif brotherSex >= 1 and brothergrope = 1:
+			elseif brotherSex >= 4 and brothergrope = 1:
 				brothergrope = 2
 				'	"It''s fine, but I''ve been having a little trouble paying attention in class lately," he says, stepping behind you.'
 				'	"Why''s that?"'
@@ -671,7 +673,7 @@ if $ARGS[0] = 'brother_shower_together':
 			if brother_shower_times < 3 or brotherSex < 1:
 				'	"They''re... Uhh... fine..." he stammers.'
 				act'Continue':gt'brother_voyeur','brother_shower_together_first'
-			elseif brotherSex >= 1 and brothergrope = 1:
+			elseif brotherSex >= 4 and brothergrope = 1:
 				brothergrope = 3
 				'	"Who cares about them?" he says, stepping behind you.'
 				act'"Eek-!"':gt'brother_voyeur','showerfun'
@@ -732,10 +734,10 @@ if $ARGS[0] = 'brother_shower_together':
 					'	"Hey Kolka, want to see something cool?"'
 					'	"Huh?" He asks, confused. "What is it?"'
 					'	His eyes go wide when you grab him by the cock. Slightly panicked, he looks back at you when you start to kneel.'
-					'	"It''s my mouth around your cock!" you grin at him.'
+					'	"It''s my mouth around your cock!"'
 					act'Blow him':gt'brother_voyeur','brother_shower_bj'
 				else
-					'	Looking at Kolka, he glances back at you to see a mischievous twinkle in your eye. Without a second''s thought or warning, you get on your knees and start blowing him.'
+					'	Looking at Kolka, he glances back at you to see a mischievous twinkle in your eye. Without a second''s thought or warning, you get on your knees and wrap your lips around his <<dick>> cm cock.'
 					act'Blow him':gt'brother_voyeur','brother_shower_bj'
 				end
 			end
@@ -765,11 +767,12 @@ end
 
 if $ARGS[0] = 'brother_wash':
 	npc_rel['A34'] += 5
+	if brotherSex < 4:brotherSex = 4
 	cla & *clr
 	brotherwash += 1
 	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brotherwash.jpg"></center>'
 	'	You and Kolka spend some time lathering each other with soap and rubbing each other down, both of you appreciatively feeling each other''s bodies as you do so.'
-	if brotherwash > 5 or brotherSex > 0 or brotherfuck > 0:
+	if brotherwash > 5 or brotherSex > 5 or brotherfuck > 0:
 		'	Kolka even slips his hands between your legs and gives your pussy a good cleaning, paying special attention to your clit and causing you to squirm and and moan under his touch.'
 		gs 'arousal','vaginal_finger',3
 	end
@@ -1406,7 +1409,7 @@ if $ARGS[0] = 'brother_shower_bj':
 	npc_rel['A34'] += 3
 	brotherbj += 1
 	brothershowerbj = daystart
-	brotherSex += 1
+	if brotherSex < 6:brotherSex = 6
 	cla & *clr
 	'<center><video src="images/shared/home/bathroom/showerbj.mp4"></center>'
 	'	Kneeling down, you take Kolka''s freshly washed cock and push it between your lips, sucking gently. Several minutes go by while you to continue blowing your brother, going slowly up and down his length, the sound of water raining down from the showerhead muting the soft slurping sounds coming from your mouth.'
@@ -1905,11 +1908,11 @@ if $ARGS[0] = 'brother_shower_fuck_first':
 	npc_rel['A34'] += 20
 	gs 'boystat','A34'
 	cla & *clr
+	if brotherSex < 7:brotherSex = 7
 	'<center><video src="images/shared/home/bathroom/BroShower2.mp4"></center>'
 	'	You lean back into your brother, gripping his member and jerking it a few times to make sure he''s still hard enough for what you want to do next. You pull on him, carefully guiding his cock until you can feel the tip pressing against the entrance of pussy.'
 	if brother_knows_not_virgin = 1:
 		brotherfuck += 1
-		brotherSex += 1
 		'	"I was wondering if you were going to let me join the "Boys Who Fuck <<$pcs_nickname>>" Club," he says, grin radiating from behind you.'
 		*nl
 		act'It''s pretty exclusive':
@@ -1968,7 +1971,6 @@ if $ARGS[0] = 'brother_shower_fuck_first':
 		end
 	else
 		brotherfuck += 1
-		brotherSex += 1
 		'	You feel Kolka tense up behind you and he hesitates.'
 		'	"Is this...? Are you...?"'
 		'	"My first time? A virgin?"'
@@ -1991,6 +1993,7 @@ if $ARGS[0] = 'brother_shower_fuck_first':
 			end
 
 			act'No, I''m a slut (lie)':
+				cla
 				brothervirginlie = 2
 				'	"Nope!" You smile at him. "Sorry to disappoint, but yours is just going to be one more of many different dicks that have been inside my pussy little brother."'
 				'	You''re not really sure why you''re lying to him about this, especially with the implication that you''re a huge slut, but there''s no time to think about that as you push your ass towards him and impale yourself on his cock.'
@@ -2005,6 +2008,7 @@ if $ARGS[0] = 'brother_shower_fuck_first':
 			end
 
 			act'No, I''m a slut':
+				cla
 				'	"Nope!" You smile at him. "Sorry to disappoint, but yours is just going to be one more of many different dicks that have been inside my pussy little brother."'
 				'	You''re not really sure why you''re telling him about this, especially with the implication that you''re a huge slut, but there''s no time to think about that as you push your ass towards him and swallow his cock with your pussy.'
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_first2'
@@ -2081,6 +2085,7 @@ if $ARGS[0] = 'brother_shower_fuck':
 	gs 'boystat','A34'
 	if brotherfuck < 1:gt'brother_voyeur','brother_shower_fuck_first'
 	brotherfuck += 1
+	if brotherSex < 7:brotherSex = 7
 	npc_rel['A34'] += 5
 	gs 'arousal', 'vaginal', rand(5,10)
 	gs 'stat'
@@ -2374,7 +2379,7 @@ if $ARGS[0] = 'brother_shower_fuck_end':
 	if brotherfuck = 1 and brother_knows_not_virgin >= 1:
 		pcs_horny = 0
 		gs'stat'
-		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/broshowersex2.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 		'	Thoroughly satisfied with the dicking you received from your brother, you lean into him letting him feel you up from behind.'
 		'	"So," you ask, nonchalantly grabbing his cock and working it gently. "Did you enjoy losing your virginity? Was it everything your teenage brain dreamed of?"'
 		'	"Everything and more," he responds, gently pinching your nipples, causing you to moan and squeeze his dick in response. "But more than that, I''m happy to be part of the club."'
@@ -2385,17 +2390,18 @@ if $ARGS[0] = 'brother_shower_fuck_end':
 			'	He hesitates before he asks his next question. "Does that mean that I''m going to be the only ''active'' member of the club? I mean... does this mean that I''m going to be the only one you have sex with?"'
 			act'No, it means we help each other out':
 				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/broshowersex2.jpg"></center>'
-				'	"Well..." You think for a moment. "I''d still like to get a boyfriend, maybe get married some day. And I like fucking you, but you''re still just my brother to me. I don''t really see you that way. And I''m sure that you''d like to get a real girlfriend someday too, not just get favors from your sister. So maybe we''d just take care of each other? So we''d still see other people and stuff, but we can always fuck each other''s brains out whenever we need some relief. Deal?"'
-				'	Your brother thinks to himself briefly before his mouth splits into a wide grin.'
-				'	"Deal. Besides, you can''t be the only girl I have sex with. I need to fuck a real virgin some day. Not some loose slut throwing freebies to her brother."'
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+				if brotherSex < 9:brotherSex = 9
+				'	"Well..." You think for a moment. "I''d still like to get a boyfriend, maybe get married some day. And I like fucking you, but you''re still just my brother to me. I can''t really see you any other way. Besides, I''m sure that you''d like to get a real girlfriend someday. Not just be that boy who''s so pathetic because the only poon he can get is from his sister. Maybe we can just take care of each other? So we''d still see other people and stuff, but we can always fuck each other''s brains out whenever we need some relief. How does that sound?"'
+				'	"Sounds good," he grins at you. "Besides, you can''t be the only girl I have sex with. I need to fuck a real virgin some day. Not some loose slut throwing freebies to her brother."'
 				'	You smack his arm but smile anyways. "Yeah, but I still have <i>your</i> virginity. No matter how many other girls'' you take, yours will always be mine!"'
 				'	The two of you banter back and forth for a little while longer before you realize someone might notice that your brother is missing and become suspicious. You quickly shut off the water and dry him off, gathering Kolka''s clothes and shooing him into the hallway.'
 				act'Finish':mirror_steam = hour & gt $loc
 			end
 			act'Yes, I love you':
 				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/broshowersex2.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+				if brotherSex < 10:brotherSex = 10
 				'	His question strikes you by surprise. Even more surprisingly, you hear yourself whispering.'
 				'	"Yes."'
 				'	"You''re the only one for Kolka. You''re my brother and I love you like a brother but... I also feel something more for you. I want to be with you. I love you."'
@@ -2409,7 +2415,7 @@ if $ARGS[0] = 'brother_shower_fuck_end':
 
 		act'Glad to have a new member (slut)':
 			cla & *clr
-			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/broshowersex2.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 			'	"Oh yeah, I''m glad to have a new member. You can never have enough members inside y-, I mean, in the club," you say, winking at him mischievously.'
 			'	"Slut."'
 			'	"Cocktoy."'

+ 3 - 1
locations/buklinik_event.qsrc

@@ -151,7 +151,9 @@ if $ARGS[0] = 'pos9':
 	'He shouts back, "No way! I''m good here. I see lovely young ladies jogging past every day. I won''t leave here unless you''ve got hot girls in panties there."'
 	'The volunteer turns to you, "We''ve been trying to move this old pervert out from here for weeks. <<$pcs_nickname>>, do you have any idea how to lure him out?'
 
-	act 'There is one idea':gt 'buklinik_event', 'pos10'
+	if pcs_horny > 50 and $pantyworntype ! 'none' and PCloSkirt > 1 and pcs_inhib > 20:
+		act 'There is one idea':gt 'buklinik_event', 'pos10'
+	end
 	act 'I have no idea':gt 'buklinik', 'olga2'
 end
 

+ 117 - 99
locations/cikl.qsrc

@@ -142,8 +142,6 @@ if coatH[defaultcoat] <= 0: defaultcoat = 0
 !!------------------------------------------------------------------------------------------------------------
 !!	Bimbo
 !!------------------------------------------------------------------------------------------------------------
-!!A Succubus cannot be a Bimbo
-if succubusflag = 1 and bimbo > 0: bimbo -= succublvl * 2
 
 !!Bonus from clothing and shoes
 if succubusflag = 0 and $cheatBimbo ! '<b>ON</b>':
@@ -180,15 +178,89 @@ if bimbolevel = 1: supnatvnesh = 2 & bimbostupidity = (pcs_intel / 6)
 if bimbolevel = 2: supnatvnesh = 4 & bimbostupidity = (pcs_intel / 4)
 if bimbolevel = 3: supnatvnesh = 8 & bimbostupidity = (pcs_intel / 3)
 
+!!A Succubus cannot be a Bimbo
+if succubusflag = 1:
+	if bimbolevel > 0 and bimbo > 0: bimbowithdrawal = 40
+elseif bimbolevel >= 1:
+!!Checks how often sex has occured in the last 24 hours and for drops in bimbo score, for calculating withdrawal
+	bimbo += ((stat['vaginal'] + stat['bj'] + stat['anal']) - snapshotX) - 3
+	if bimbo > snapshotY:
+		bimbowithdrawal = 0
+	else
+		bimbowithdrawal += 1
+	end
+end
+
+if bimbo < 0: bimbo = 0
+snapshotX = (stat['vaginal'] + stat['bj'] + stat['anal'])
+snapshotY = bimbo
+
+!!------------------------------------------------------------------------------------------------------------
+!!	Exhibitionism
+!!------------------------------------------------------------------------------------------------------------
+
+if pcs_exhib > 0 or exhibitionist_lvl > 0:
+    if pcs_exhib < 10:
+        pcs_exhib -= 1
+    elseif pcs_exhib < 20:
+    	exhibitionist_lvl = 1
+    elseif pcs_exhib < 30:
+    	exhibitionist_lvl = 2
+    else
+        exhibitionist_lvl = 3
+    end
+end
+
+!!Inhibition increases from wearing revealing clothing
+
+if exhibition_outdoors > 0:
+	if pcs_inhib > 90:
+		exhibition_outdoors = exhibition_outdoors * 3
+	elseif pcs_inhib > 75:
+		exhibition_outdoors = exhibition_outdoors * 5 / 2
+	elseif pcs_inhib > 60:
+		exhibition_outdoors = exhibition_outdoors * 2
+	elseif pcs_inhib > 30:
+		exhibition_outdoors = exhibition_outdoors * 3 / 2
+	end
+
+	if exhibition_outdoors <= 5:
+		inhib_exp += rand(3,6)
+	elseif exhibition_outdoors <= 10:
+		inhib_exp += rand(5,9)
+	elseif exhibition_outdoors <= 15:
+		inhib_exp += rand(7,12)
+	elseif exhibition_outdoors <= 20:
+		inhib_exp += rand(9,15)
+	elseif exhibition_outdoors <= 25:
+		inhib_exp += rand(12,20)
+	elseif exhibition_outdoors <= 30:
+		inhib_exp += rand(16,25)
+	elseif exhibition_outdoors <= 35:
+		inhib_exp += rand(20,30)
+	elseif exhibition_outdoors <= 40:
+		inhib_exp += rand(25,40)
+	elseif exhibition_outdoors <= 50:
+		inhib_exp += rand(35,50)
+	elseif exhibition_outdoors <= 65:
+		inhib_exp += rand(50,75)
+	else
+		inhib_exp += rand(70,100)
+	end
+end
+
+exhibition_outdoors = 0
+
+!!------------------------------------------------------------------------------------------------------------
+!!	Succubus
+!!------------------------------------------------------------------------------------------------------------
+
 !!Succubus Level & hunger calcs
 if succubusflag = 1:
 
 	cheatHealth = 1
 	dynamic $cheatmenu['std_cure']
 
-!!	A Succubus cannot be a Bimbo
-	if bimbolevel > 0 and bimbo > 0: bimbowithdrawal = 40
-
 !!	Hunger handling
 	if sucxpsnapshot >= succubxp: succhungry += 1
 	sucxpsnapshot = succubxp
@@ -274,21 +346,6 @@ if succubusflag = 1:
 	end
 end
 
-!!Bimbo second half, after Succubus so changes there can be reflected here if still bimbo and Succubus
-!!Checks how often sex has occured in the last 24 hours and for drops in bimbo score, for calculating withdrawal
-if bimbolevel >= 1:
-	bimbo += ((stat['vaginal'] + stat['bj'] + stat['anal']) - snapshotX) - 3
-	if bimbo > snapshotY:
-		bimbowithdrawal = 0
-	else
-		bimbowithdrawal += 1
-	end
-end
-
-if bimbo < 0: bimbo = 0
-snapshotX = (stat['vaginal'] + stat['bj'] + stat['anal'])
-snapshotY = bimbo
-
 !!------------------------------------------------------------------------------------------------------------
 
 if defcurly = 0 and curly > 0:curly -= 1
@@ -656,46 +713,6 @@ if pcs_horny < 0:pcs_horny = 0
 
 !!------------------------------------------------------------------------------------------------------------
 
-!!Exhibitionism
-
-if exhibition_outdoors > 0:
-	if pcs_inhib > 90:
-		exhibition_outdoors = exhibition_outdoors * 3
-	elseif pcs_inhib > 75:
-		exhibition_outdoors = exhibition_outdoors * 5 / 2
-	elseif pcs_inhib > 60:
-		exhibition_outdoors = exhibition_outdoors * 2
-	elseif pcs_inhib > 30:
-		exhibition_outdoors = exhibition_outdoors * 3 / 2
-	end
-
-	if exhibition_outdoors <= 5:
-		inhib_exp += rand(3,6)
-	elseif exhibition_outdoors <= 10:
-		inhib_exp += rand(5,9)
-	elseif exhibition_outdoors <= 15:
-		inhib_exp += rand(7,12)
-	elseif exhibition_outdoors <= 20:
-		inhib_exp += rand(9,15)
-	elseif exhibition_outdoors <= 25:
-		inhib_exp += rand(12,20)
-	elseif exhibition_outdoors <= 30:
-		inhib_exp += rand(16,25)
-	elseif exhibition_outdoors <= 35:
-		inhib_exp += rand(20,30)
-	elseif exhibition_outdoors <= 40:
-		inhib_exp += rand(25,40)
-	elseif exhibition_outdoors <= 50:
-		inhib_exp += rand(35,50)
-	elseif exhibition_outdoors <= 65:
-		inhib_exp += rand(50,75)
-	else
-		inhib_exp += rand(70,100)
-	end
-end
-
-exhibition_outdoors = 0
-
 !counter for Dimka avoidance
 if dimaFilm = 1 and dimaRudeBlock = 0:
 	nodimkaK += 1
@@ -750,43 +767,43 @@ if pregtime > 10:fat += 1
 !!	Pain
 !!------------------------------------------------------------------------------------------------------------
 
-if pain['head'] > 0:pain['head'] += rand(1,3)
-if pain['hair'] > 0:pain['hair'] += rand(1,3)
-if pain['ears'] > 0:pain['ears'] += rand(1,3)
-if pain['eyebrows'] > 0:pain['eyebrows'] += rand(1,3)
-if pain['eyes'] > 0:pain['eyes'] += rand(1,3)
-if pain['cheeks'] > 0:pain['cheeks'] += rand(1,3)
-if pain['nose'] > 0:pain['nose'] += rand(1,3)
-if pain['mouth'] > 0:pain['mouth'] += rand(1,3)
-if pain['lips'] > 0:pain['lips'] += rand(1,3)
-if pain['tongue'] > 0:pain['tongue'] += rand(1,3)
-if pain['throat'] > 0:pain['throat'] += rand(1,3)
-if pain['neck'] > 0:pain['neck'] += rand(1,3)
-if pain['back'] > 0:pain['back'] += rand(1,3)
-if pain['asscheeks'] > 0:pain['asscheeks'] += rand(1,3)
-if pain['asshole'] > 0:pain['asshole'] += rand(1,3)
-if pain['hips'] > 0:pain['hips'] += rand(1,3)
-if pain['thighs'] > 0:pain['thighs'] += rand(1,3)
-if pain['legL'] > 0:pain['legL'] += rand(1,3)
-if pain['legR'] > 0:pain['legR'] += rand(1,3)
-if pain['feet'] > 0:pain['feet'] += rand(1,3)
-if pain['toes'] > 0:pain['toes'] += rand(1,3)
-if pain['shoulders'] > 0:pain['shoulders'] += rand(1,3)
-if pain['armL'] > 0:pain['armL'] += rand(1,3)
-if pain['armR'] > 0:pain['armR'] += rand(1,3)
-if pain['hands'] > 0:pain['hands'] += rand(1,3)
-if pain['fingers'] > 0:pain['fingers'] += rand(1,3)
-if pain['chest'] > 0:pain['chest'] += rand(1,3)
-if pain['breasts'] > 0:pain['breasts'] += rand(1,3)
-if pain['nipples'] > 0:pain['nipples'] += rand(1,3)
-if pain['ribs'] > 0:pain['ribs'] += rand(1,3)
-if pain['tummy'] > 0:pain['tummy'] += rand(1,3)
-if pain['pubic'] > 0:pain['pubic'] += rand(1,3)
-if pain['vaginal'] > 0:pain['vaginal'] += rand(1,3)
-if pain['labia'] > 0:pain['labia'] += rand(1,3)
-if pain['clitoris'] > 0:pain['clitoris'] += rand(1,3)
-if pain['urethra'] > 0:pain['urethra'] += rand(1,3)
-if pain['cervix'] > 0:pain['cervix'] += rand(1,3)
+if pain['head'] > 0:pain['head'] -= rand(1,3)
+if pain['hair'] > 0:pain['hair'] -= rand(1,3)
+if pain['ears'] > 0:pain['ears'] -= rand(1,3)
+if pain['eyebrows'] > 0:pain['eyebrows'] -= rand(1,3)
+if pain['eyes'] > 0:pain['eyes'] -= rand(1,3)
+if pain['cheeks'] > 0:pain['cheeks'] -= rand(1,3)
+if pain['nose'] > 0:pain['nose'] -= rand(1,3)
+if pain['mouth'] > 0:pain['mouth'] -= rand(1,3)
+if pain['lips'] > 0:pain['lips'] -= rand(1,3)
+if pain['tongue'] > 0:pain['tongue'] -= rand(1,3)
+if pain['throat'] > 0:pain['throat'] -= rand(1,3)
+if pain['neck'] > 0:pain['neck'] -= rand(1,3)
+if pain['back'] > 0:pain['back'] -= rand(1,3)
+if pain['asscheeks'] > 0:pain['asscheeks'] -= rand(1,3)
+if pain['asshole'] > 0:pain['asshole'] -= rand(1,3)
+if pain['hips'] > 0:pain['hips'] -= rand(1,3)
+if pain['thighs'] > 0:pain['thighs'] -= rand(1,3)
+if pain['legL'] > 0:pain['legL'] -= rand(1,3)
+if pain['legR'] > 0:pain['legR'] -= rand(1,3)
+if pain['feet'] > 0:pain['feet'] -= rand(1,3)
+if pain['toes'] > 0:pain['toes'] -= rand(1,3)
+if pain['shoulders'] > 0:pain['shoulders'] -= rand(1,3)
+if pain['armL'] > 0:pain['armL'] -= rand(1,3)
+if pain['armR'] > 0:pain['armR'] -= rand(1,3)
+if pain['hands'] > 0:pain['hands'] -= rand(1,3)
+if pain['fingers'] > 0:pain['fingers'] -= rand(1,3)
+if pain['chest'] > 0:pain['chest'] -= rand(1,3)
+if pain['breasts'] > 0:pain['breasts'] -= rand(1,3)
+if pain['nipples'] > 0:pain['nipples'] -= rand(1,3)
+if pain['ribs'] > 0:pain['ribs'] -= rand(1,3)
+if pain['tummy'] > 0:pain['tummy'] -= rand(1,3)
+if pain['pubic'] > 0:pain['pubic'] -= rand(1,3)
+if pain['vaginal'] > 0:pain['vaginal'] -= rand(1,3)
+if pain['labia'] > 0:pain['labia'] -= rand(1,3)
+if pain['clitoris'] > 0:pain['clitoris'] -= rand(1,3)
+if pain['urethra'] > 0:pain['urethra'] -= rand(1,3)
+if pain['cervix'] > 0:pain['cervix'] -= rand(1,3)
 
 if painpub = 2:
 	if painpubday + 5 < daystart:
@@ -876,6 +893,9 @@ if GspravkaT = 1:Gspravka -= 1
 if IvanPodstavaQW = 2 and PodpiskaNeviezd = 30:IvanPodstavaQW = 3
 if IvanPodstavaQW = 2 and PodpiskaNeviezd > 0 and PodpiskaNeviezd < 30:PodpiskaNeviezd += 1
 
+!!remove degradation for inhibition
+inhib_flr = inhib_lvl
+
 gs 'stat_sklattrib', 'daycall'
 
 if dounspell = 1:
@@ -1367,8 +1387,6 @@ elseif mentats_dose > 1:
     pain['head'] += 20 * mentats_dose
     mentats_dose = 0
 end
-if breastpumped = 0 and breastcount > 0: breastcount -= 1
-if breastpumped = 1: breastpumped = 0
 
 !!Appearance base calculation call
 gs 'body_shape', 'basebeautycalc'

+ 7 - 2
locations/din_van.qsrc

@@ -688,8 +688,6 @@ if $ARGS[0] = 'private':
 	if fillimplant = 1 and siliconeBag >= 1:'<a href="exec:cls & siliconeBag -= 1 & silicone += 10 & gt $loc, $metka">Inject silicone into breast implants.</a>'
 	if fillimplant = 1 and silicone >= 20:'<a href="exec:cls & silicone -= 10 & gt $loc, $metka">Drain silicone from breast implants.</a>'
 
-	if breastpump > 0:'<a href="exec:gt ''shortgs'', ''milk_me''">Use breast pump.</a></center>'
-
 	dynamic $bteeth
 
 	dynamic $tampon
@@ -902,6 +900,13 @@ if $ARGS[0] = 'private':
 			act 'Finish':gt $loc, $metka
 		end
 	end
+	
+	!!breast pump is now in the menue, not on the screen
+	if breastpump > 0:
+		act 'Use breast pump':
+			gt 'lact_lib', 'bp_milking'
+		end
+	end
 end
 
 if $ARGS[0] = 'misery':

+ 2 - 2
locations/dinfather.qsrc

@@ -14,7 +14,7 @@ if $ARGS[0] =  'father act 1':
 			'In a moment of horniness, you slowly and teasingly bend over with a playful smile on your lips, providing your stepfather with an amazing view of your <<$titsize>> breasts.'
 
 			if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,2)
+			if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
 			if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
 			if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
 			if fatherLust>=2:
@@ -509,7 +509,7 @@ $d_fatherdrunk_act[3]={
 		'You, pretending to not notice, slowly spread your legs while you talk with the guys.'
 
 		if pcs_apprnc + (npc_rel['A28']/10) < 60:fatherLust = 2
-		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,3)
+		if pcs_apprnc + (npc_rel['A28']/10) >= 60 and pcs_apprnc + (npc_rel['A28']/10) < 120:fatherLust = Rand (1,4)
 		if pcs_apprnc + (npc_rel['A28']/10) >= 120 and pcs_apprnc + (npc_rel['A28']/10) < 200:fatherLust = Rand (1,2)
 		if pcs_apprnc + (npc_rel['A28']/10) >= 200 or TouchedByFather=1:fatherLust = 1
 			if fatherLust>=2:

+ 0 - 1
locations/fbDorm.qsrc

@@ -15,7 +15,6 @@ act '"Ehmm... I changed my mind"':
 		'You make up your mind; you should not be doing this. You apologize to him: "Sorry <<$bname>>, but I don''t think this is such a good idea. I have to go... take care." Then you quickly kiss him on the cheek and leave, ignoring his pleas. Fortunately he doesn''t follow you.'
 
 		act 'Leave':gt 'pavResidential'
-        dynamic $d_fbd_start
 	else
 		'Before you know it you nod, and he smiles as he takes you by the arm and guides you into the hostel. You''re still not sure about this, and somewhat question your decision while you let him show you to his room.'
 		dynamic $d_fbd_start

+ 240 - 28
locations/femcyc.qsrc

@@ -3,7 +3,7 @@
 !! I have to initialize the variables somewhere, maybe in preCUST?
 if Luth_Max = 0: LutH_Max = rand(312,360) & !! 13-15 days including ovulation
 if Foch_Max = 0: FocH_Max = rand(312,360) & !! 13-15 days including menstruation
-		
+
 if $ARGS[0] = '':
 	!{Hourly reduction in semen potency}
 	!{First it sets the array index to the first index, then it checks to be sure the array tracking the age is less than 144 hours. If it is 144 hours old, it kills that index, which should shift the index up. If it is less than 144 hours old, it sets a current potency drop. The drop is 2x or 3x regularly, but during ovulation it is only 1x, to represent the better environment from fertile cervical mucus.}
@@ -205,28 +205,231 @@ if $ARGS[0] = '':
 		KILLVAR 'ctemp'
 	end
 
-	if lactate > 0:
-		if lactatemv <= 0:
-			lactatemv = 0
-			if lactatemm < pcs_cupsize*40 and milkgrowday < daystart:
-				lactatemm += 10
-				lactatemv += 10
+
+	!! new milkgrowday function.
+	!! Not lactating yet, but there was milkdemand, meaning someone worked your nipples and breasts.
+	if lactate = 0 and milkoverdemand >= 0 and prolactinlvl >= 0:
+		if milkgrowday < daystart:
+			prolactinlvl += milkoverdemand/200
+			!! as long as your tits are not over 11 growth will happen to them. If you do not pump or no pregnancy happens, no growth will happen.
+			if milkoverdemand = 0 and pregchem = 0 and tits < 11:
+				temp_var = prolactinlvl - 10
+				if temp_var < 0:
+					prolactinlvl = 0
+				end
+				!! if prolactinlvl is sinking too much, the aveoli will deflate and thus the breasts growth is reverted. This only counts for induced lactation. If natural lactation occurs breasts will shrink a bit too, but stay bigger in total.
+				if prolactinlvl < 75 and total_milkinduce_growth > 0:
+					nbsize -= total_milkinduce_growth
+					prolactinlvl -= 10
+					total_milkinduce_growth = 0
+				else
+					prolactinlvl -= 10
+				end
+				milkoverdemand = 0
+				milkgrowday = daystart
+			elseif milkoverdemand > 0 and pregchem = 0 and tits < 11:
+				!! inducing without ever being pregnant
+				if prolactinlvl > 75 and kid <= 0:
+					if total_milkinduce_growth < 8:
+						total_milkinduce_growth += 1 + pumpinggrowth
+						nbsize += 1 + pumpinggrowth
+						pumpinggrowth = 0
+					else
+						pumpinggrowth = 0
+					end
+				!! inducing after being pregnant
+				elseif prolactinlvl > 75 and kid > 0:
+					if total_milkinduce_growth < (total_preg_growth/2):
+						total_milkinduce_growth += 1 + pumpinggrowth
+						nbsize += 1 + pumpinggrowth
+						pumpinggrowth = 0
+					end
+				end
+				milkoverdemand = 0
+			elseif milkoverdemand >= 0 and pregchem > 0 and tits < 11:
+				if prolactinlvl > 75 and pregchem < 3000 and kid <= 0:
+					if total_milkinduce_growth < 8:
+						total_milkinduce_growth += 1 + pumpinggrowth
+						nbsize += 1 + pumpinggrowth
+						pumpinggrowth = 0
+					else
+						pumpinggrowth = 0
+					end
+				!! first breast growth with first pregnancy
+				elseif prolactinlvl >= 75 and pregchem >= 2000 and pregchem < 3000 and kid <= 0:
+					if rand(0,100) > 55:
+						first_preg_growth += 1
+						total_preg_growth += 1
+						if total_preg_growth > total_milkinduce_growth: nbsize += 1
+					end
+				!! there is little chance your breast grow additional sizes if you have more kids.
+				elseif prolactinlvl >= 75 and pregchem >= 2000 and pregchem < 3000 and kid > 0:
+					if first_preg_growth > total_preg_growth:
+						total_preg_growth += 1
+						if total_preg_growth > total_milkinduce_growth: nbsize += 1
+					else
+						if rand(0,100) > 95:
+							total_preg_growth += 1
+							if total_preg_growth > total_milkinduce_growth: nbsize += 1
+						end
+					end
+				!! inducing after being pregnant
+				elseif prolactinlvl > 75 and pregchem =< 3000 and kid > 0:
+					if total_milkinduce_growth < (total_preg_growth/2):
+						total_milkinduce_growth += 1 + pumpinggrowth
+						nbsize += 1 + pumpinggrowth
+						pumpinggrowth = 0
+					end
+				end
+				milkoverdemand = 0
+				milkgrowday = daystart
+			end
+			milkgrowday = daystart
+		else
+			milkgrowday = daystart
+		end
+	elseif lactate > 0 and milkoverdemand => 0 and prolactinlvl >= 0:
+		lactatemm = func('lact_lib','$calc_lactatemm')
+		!! checking if induced or not and if girl went through pregnancy already.
+		if lactateinduced > 0 and kid <= 0:
+			if milkgrowday < daystart:
+				!! first breast growth with first pregnancy
+				if prolactinlvl >= 75 and pregchem >= 2000 and pregchem < 3000 and kid <= 0:
+					if rand(0,100) > 55:
+						first_preg_growth += 1
+						total_preg_growth += 1
+						if total_preg_growth > total_milkinduce_growth: nbsize += 1
+					end
+				end
+				if lactatemm > lactatemv:
+					lactatemv += lactaterate
+					temp_var = lactaterate/100
+					if temp_var <= 0: temp_var = 1
+					pcs_energy -= temp_var
+					if lactatemv > lactatemm: lactatemv = lactatemm
+				end
+				if milkoverdemand > 0 and breastpumped > 0:
+					!! lactationrate growing, so you make more milk the more demand there was in the day before.
+					temp_var = prolactinlvl + milkoverdemand/20
+					if  temp_var > 120:
+						prolactinlvl += milkoverdemand/20
+						!! uppon reaching a specific limit, the lactationrate will grow slower. Human body limits etc... you know
+						if lactaterate > 3500:
+							lactaterate += 5*(prolactinlvl/200)
+						elseif lactaterate > 6000:
+							lactaterate += prolactinlvl/200
+						else
+							lactaterate += 10*(prolactinlvl/200)
+						end
+						prolactinlvl = 100
+					else
+						prolactinlvl = 100
+					end
+					'Your breasts tingle a bit more from milkproduction.'
+				elseif milkoverdemand = 0 and breastpumped > 0:
+					prolactinlvl = 100
+				elseif milkoverdemand = 0 and breastpumped = 0:
+					if lactaterate > 0 and pregchem >=0:
+						temp_var = lactaterate/4
+						if temp_var < 1:temp_var = 0
+						lactaterate = temp_var
+						'Your breasts tingle a little less from milkproduction.'
+					elseif lactaterate = 0 and pregchem < 1000:
+						lactate = 0
+						lactateinduced = 0
+						nbsize -= total_milkinduce_growth
+						'You notice that you stopped lactating.'
+					elseif lactaterate = 0 and pregchem >= 1000:
+						lactaterate = 1
+					else
+						lactaterate = 0
+					end
+				end
+				milkgrowday = daystart
+				milkoverdemand = 0
+				breastpumped = 0
+			else
+				milkgrowday = daystart
+				if lactatemm >= lactatemv:
+					lactatemv += lactaterate
+					if lactatemv > lactatemm:
+						lactatemv = lactatemm
+						lact_engorgement += 1
+						if lact_engorgement > 2: lactatemess += 1
+					end
+				end
+			end
+			milkgrowday = daystart
+		else
+			if milkgrowday < daystart:
+				if lactatemm > lactatemv:
+					lactatemv += lactaterate
+					temp_var = lactaterate/100
+					if temp_var <= 0: temp_var = 1
+					pcs_energy -= temp_var
+					if lactatemv > lactatemm: lactatemv = lactatemm
+				end
+				if milkoverdemand > 0 and breastpumped > 0:
+					!! lactationrate growing, so you make more milk the more demand there was in the day before.
+					temp_var = prolactinlvl + milkoverdemand/10
+					if  temp_var > rand(150,200):
+						prolactinlvl += milkoverdemand/20
+						!! uppon reaching a specific limit, the lactationrate will grow slower. Human body limits etc... you know :D
+						if lactaterate > 3500:
+							lactaterate += 5*(prolactinlvl/200)
+						elseif lactaterate > 6000:
+							lactaterate += prolactinlvl/200
+						else
+							lactaterate += 10*(prolactinlvl/200)
+						end
+						prolactinlvl = 100
+					else
+						prolactinlvl = 100
+					end
+					'Your breasts tingle a bit more from milkproduction.'
+				elseif milkoverdemand = 0 and breastpumped > 0:
+					prolactinlvl = 100
+				else
+					if lactaterate > 0 and pregchem >= 0:
+						temp_var = lactaterate/8
+						if temp_var < 1:temp_var = 0
+						lactaterate = temp_var
+						milkoverdemand = 0
+						'Your breasts tingle a little less from milkproduction.'
+					elseif lactaterate = 0 and pregchem < 1000:
+						lactate = 0
+						lactateinduced = 0
+						if total_milkinduce_growth > 0: nbsize -= total_milkinduce_growth
+						if total_preg_growth > 0:
+							nbsize -= total_preg_growth
+							nbsize += first_preg_growth/2
+						end
+						total_milkinduce_growth = 0
+						milkoverdemand = 0
+						'You stopped lactating.'
+					elseif lactaterate = 0 and pregchem >= 1000:
+						lactaterate = 1
+					else
+						lactaterate = 0
+					end
+				end
 				milkgrowday = daystart
-			elseif milkgrowday < daystart:
-				if rand(0,30) = 0: pcs_cupsize += 1
+				milkoverdemand = 0
+				breastpumped = 0
+			else
 				milkgrowday = daystart
-				lactatemv += 10
+				if lactatemm >= lactatemv:
+					lactatemv += lactaterate
+					if lactatemv > lactatemm:
+						lactatemv = lactatemm
+						lact_engorgement += 1
+						if lact_engorgement > 2: lactatemess += 1
+					end
+				end
 			end
-		elseif lactatemv < lactatemm:
-			lactatemv += lactatemm/20
-		elseif lactatemv = lactatemm and milkgrowday < daystart:
 			milkgrowday = daystart
-			lactatemm -= 10
-			lactatemv -= 10
-			if rand(0,90) = 0: pcs_cupsize -= 1
-		elseif lactatemv > lactatemm:
-			lactatemv = lactatemm
 		end
+		milkgrowday = daystart
 	end
 
 	if cycle <= 0:
@@ -276,9 +479,9 @@ if $ARGS[0] = 'cyc1':
 		if rand(0,9) = 0: EggRH += 1
 		FocH += 1
 		temprand = rand(0,9) - sterileov + tempovbonus
-		if temprand < 0: 
+		if temprand < 0:
 			EggRH -= 1
-		elseif temprand > 9: 
+		elseif temprand > 9:
 			EggRH += 1
 		end
 	else
@@ -316,9 +519,9 @@ if $ARGS[0] = 'cyc2':
 		cum_total = 0
 !!{Compute array of unique fathers known to PC and another two arrays of unique total fathers and their individual sperm totals from all entries in cumarrcpt for that father. Also tally all cum present.}
 		:FatherCumAnalyze
-			!! If the current DNA is new (no occurence in the womb array), it is added to the end of $wombDNA array, and added the amount of cum to the end of cumamount array. 
+			!! If the current DNA is new (no occurence in the womb array), it is added to the end of $wombDNA array, and added the amount of cum to the end of cumamount array.
 			!! If exists, just increase the amount of cum in the womb.
-			
+
 			!! $wombDNA: sperm in womb potent enough to cause pregnancy
 			!! wombAmount: how potent is the sperm of a guy
 			!! $wombName: the name of the NPC
@@ -328,7 +531,7 @@ if $ARGS[0] = 'cyc2':
 				$wombDNA[y] = $npc_dna[$cumarrnam[can_idx]]
 				wombAmount[y] = cumarrcpt[can_idx]
 				$wombName[y] = $cumarrnam[can_idx]
-				
+
 			else
 				!! This DNA is in the womb, but does it belong to the same guy?
 				x = 0
@@ -346,9 +549,9 @@ if $ARGS[0] = 'cyc2':
 				killvar 'z'
 			end
 			killvar 'y'
-			
+
 			if cumarrkno[can_idx] = 1 and arrpos('$wombpotfath', $cumarrnam[can_idx]) < 0:$wombpotfath[arrsize('$wombpotfath')] = $cumarrnam[can_idx]
-			
+
 			!! If the guy is a known/possible element (PC know about the sex, it was actual sex, condom/pill was not used or condom was broken, etc.), he can be considered as father.
 			if instr('14570',str(cumarrcon[can_idx])) > 0 and cumarrdel[can_idx] = 0 and cumarrkno[can_idx] >= 0:
 				!! If guy is recorded already, increase his cumtime, else record him for the first time.
@@ -359,9 +562,9 @@ if $ARGS[0] = 'cyc2':
 					cumtime[arrpos('$cumfthname', $cumarrnam[can_idx])] += 1
 				end
 			end
-			
+
 			cum_total += cumarrcpt[can_idx]
-			
+
 		if can_idx < can_sz:can_idx += 1 & jump 'FatherCumAnalyze'
 
 		!! setting the default believed father if there is no difficult choice or there is no choice
@@ -716,11 +919,20 @@ if $ARGS[0] = 'preg':
 			'You begin lactating'
 			lactate = 1
 			lactatemv = 0
-			lactatemm = 100
+			lactatemm = func('lact_lib','$calc_lactatemm')
+			lacaterate = 10
+			prolactinlvl = 150
 		else
 			if lactate < 1: lactate = 1
 		end
 	end
+	if PregChem > 1000:
+		if prolactinlvl < 100 and lactate <= 0:
+			if rand(0,100) > 50:
+				prolactinlvl +=1
+			end
+		end
+	end
 	if PregChem > 2203:
 		if pregchem > 2853 or kid > 0:
 			if rand(0,7) = 0: dynamic $d_pregmovement

+ 101 - 164
locations/foto.qsrc

@@ -957,11 +957,10 @@ if $ARGS[0] = 'practicemodel':
 					mdlng_exp += rand(3,5)
 					fashionshoot = rand(1,4)
 					gs 'stat'
-					if fashionshoot = 1:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion.mp4"></video></center>'
-					if fashionshoot = 2:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion2.mp4"></video></center>'
-					if fashionshoot = 3:'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fasion3.jpg"></center>'
-					if fashionshoot < 4:'	You dress up in the latest in fashion wear and spend the next two hours posing for the photographer.'
-					if fashionshoot = 4:
+					if fashionshoot <= 2:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion<<rand(1,2>>.mp4"></video></center>'
+					if fashionshoot >= 3 and fashionshoot < 5:'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fashion<<rand(1,3)>>.jpg"></center>'
+					if fashionshoot < 5:'	You dress up in the latest in fashion wear and spend the next two hours sexily posing for the photographer.'
+					if fashionshoot = 5:
 						'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion4.mp4"></video></center>'
 						'	You spend the next two hours putting on various dresses, practicing modelling for the online catalogs of retail clothing stores. Apparently for consistency they want you to have the exact same expression on your face every time, so you spend most of the time practicing that.'
 					end
@@ -1462,8 +1461,36 @@ if $ARGS[0] = 'practicemodel':
 					end
 				end
 			end
+			
+			
+			
+				
+					cla
+					act 'Not for me':gt 'foto','studio'
 
-			act 'Nude with covered genitals':
+					act 'Agree (2:00)':
+						*clr & cla
+						minut += 120
+						modelpayfin = 0
+						mdlng_exp += rand(8,10)
+						inhib_exp += 4
+						gs 'stat'
+						'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie_trans<<rand(1,3)>>.mp4"></video></center>'
+						'	You put on some very lacy, very transparent underwear and get to posing, your nipples often showing through the thin fabric.'
+						*nl
+						'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
+						*nl
+						if pornstudio = 0:pornstudio = 2 & '	At the end of the shoot a staff member comes up to you. "By the way, you should take this," he says, handing you a business card. You''re shocked to see that it''s for a porn production company in St. Petersburg. "Since you''ve shown that you''re willing to go full nude, we figure we might as well let you know this opportunity exists. We share a couple of models with them and from what we can tell, it increases sales for both of us. If you feel like you''re up to it, use this card and tell them we sent you. That will get you a special audition. But we understand if you don''t go. We know it''s not for everyone and that some of you want more legitimate fame."'
+						if pcs_mdlng >= 40 and commercial = 0:
+							act 'Leave':gt'foto','commercial'
+						else
+							act 'Leave':gt 'foto', 'end'
+						end
+					end
+				end
+			end
+			
+			act 'Transparent Lingerie':
 				cla
 				act 'Not for me':gt 'foto','studio'
 
@@ -1473,17 +1500,17 @@ if $ARGS[0] = 'practicemodel':
 						minut += 120
 						modelpayfin = 0
 						mdlng_exp += 1
-						inhib_exp += rand(3,5)
+						inhib_exp += rand(1,2)
 						gs 'stat'
-						'<center><video autoplay loop src="images/locations/city/citycenter/photo/model6.mp4"></video></center>'
-						'	It''s okay... It''s a nude shoot but you don''t have to show your pussy. That makes it just like a topless so it''s fine right? A topless shoot except with more of your legs exposed... Or almost completely exposed...'
-						'	You pick up the prop you''re using and spend the next two hours taking photos in various poses for a photographer.'
+						'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie_trans<<rand(1,3)>>.mp4"></video></center>'
+						'	It''s okay... It''s just like a normal lingerie shoot... Except that your nipples will be clearly visible. That makes it just like a topless so it''s fine right? Even though the transparent lace feels more exposing than being topless...'
+						'	You slip into the lacy underwear and spend the next two hours practicing poses with the photographer.'
 						if pcs_mdlng < 20:
 							act'Continue':
 								cla
 								*nl
-								'	You keep your crotch covered with your hands or props during the shoot. The urge to use them to cover up completely is almost irresistible but you have to power through this if you want to do this kind of work. You must be bold!'
-								'	That being said, you''re having a difficult time of it and you can tell you aren''t doing a very good job.'
+								'	Each time the camera clicks, you give a small yelp, shielding your nipples from the flash that threatens to highlight them by turning your back. The sighs of the photographer from behind the camera are very audible.'
+								'	You''re going to have to work on your basic confidence as a model if you want to start confronting your confidence in your own body.'
 								act'Continue':
 									*clr & cla
 									*nl
@@ -1496,8 +1523,11 @@ if $ARGS[0] = 'practicemodel':
 							act'Continue':
 								*clr & cla
 								*nl
+								inhib_exp += rand(1,3)
 								'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
 								'	The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
+								*nl
+								'	You have the discipline to not turn or shy your body away from the camera to hide yourself, but your expressions are very rigid and sometimes awkward. Maybe you need to work more on your confidence in your body before you''ll be able to progress here.'
 								if pcs_mdlng >= 40 and commercial = 0:
 									act 'Leave':gt'foto','commercial'
 								else
@@ -1514,13 +1544,13 @@ if $ARGS[0] = 'practicemodel':
 						mdlng_exp += rand(8,10)
 						inhib_exp += 4
 						gs 'stat'
-						'<center><video autoplay loop src="images/locations/city/citycenter/photo/model6.mp4"></video></center>'
-						'	You step onto the set spend the next two hours taking photos in various poses for a photographer, keeping your pussy covered with hands, props, or carefully crossed legs.'
+						'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie_trans<<rand(1,3)>>.mp4"></video></center>'
+						'	You put on some lacy underwear and spend the next two hours practicing poses with the photographer.'
 						if pcs_mdlng < 20:
 							act'Continue':
 								cla
 								*nl
-								'	As the shoot progresses, you find it difficult to use what you have as coverage in a way that is still sexy or good for the camera. You probably need more practice.'
+								'	As the shoot progresses, you find it difficult surprisingly difficult to use the lingerie to your advantage. Despite its inherent seductiveness, there are certain poses and postures that you need to be in to fully accentuate what you''re trying to show off underneath. You probably need more practice.'
 								act'Continue':
 								*clr & cla
 								*nl
@@ -1546,91 +1576,8 @@ if $ARGS[0] = 'practicemodel':
 				end
 			end
 
-			act 'Nude with stockings':
-				cla
-				act 'Not for me':gt 'foto','studio'
-
-				if pcs_inhib < 60:
-					act 'Practice (2:00)':
-					*clr & cla
-					minut += 120
-					modelpayfin = 0
-					mdlng_exp += 1
-					inhib_exp += rand(4,6)
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/model2.jpg"></center>'
-					'	This is it... If you want to be a top model you''re going to have to be willing to show what''s between you legs on camera... This is a necessary step for moving forward... but that doesn''t make it easy either...'
-					'	You go to the changing room and pull up some stockings. Even though it doesn''t cover any of your privates, it''s somehow comforting to be wearing something instead of being completely nude.'
-					'	You spend the next two hours with a photographer taking photos in poses that accentuate your breasts and pussy.'
-						if pcs_mdlng < 20:
-							act'Continue':
-								cla
-								*nl
-								'	You''re panicking and it''s showing through to the photographer. The idea of doing this for real and having pictures of your vagina on display in magazines and the internet for people to see horrifies you. Over the course of the session, the photographer helps you find ways to relax and be more comfortable in the nude, but you don''t think your skill as a model has improved very much.'
-								act'Continue':
-									*clr & cla
-									*nl
-									'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
-									'	The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
-									act 'Leave':gt 'foto', 'end'
-								end
-							end
-						else
-							act'Continue':
-								*clr & cla
-								*nl
-								'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
-								'	The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
-								if pcs_mdlng >= 40 and commercial = 0:
-									act 'Leave':gt'foto','commercial'
-								else
-									act 'Leave':gt 'foto', 'end'
-								end
-							end
-						end
-					end
-				else
-					act 'Practice (2:00)':
-						*clr & cla
-						minut += 120
-						modelpayfin = 0
-						mdlng_exp += rand(8,10)
-						inhib_exp += 2
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/model2.jpg"></center>'
-						'	You go to the changing room and pull up some stockings.'
-						'	You spend the next two hours with a photographer taking photos in poses that accentuate your breasts and pussy.'
-						if pcs_mdlng < 20:
-							act'Continue':
-								cla
-								*nl
-								'	You''re having difficulty getting in the poses the photographer wants you in. The stockings can be slippery sometimes and it''s hard finding ways to use them to amplify your own beauty. This will take some getting used to.'
-								act'Continue':
-									cla & *clr
-									*nl
-									'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
-									'	The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
-									act 'Leave':gt 'foto','end'
-								end
-							end
-						else
-							act'Continue':
-								cla & *clr
-								*nl
-								'<center><video autoplay loop src="images/locations/city/citycenter/photo/modelbts2.mp4"></video></center>'
-								'	The practice shoot ends and he calls you over to his computer to show you what you need to work on.'
-								if pcs_mdlng >= 40 and commercial = 0:
-									act 'Leave':gt'foto','commercial'
-								else
-									act 'Leave':gt 'foto', 'end'
-								end
-							end
-						end
-					end
-				end
-			end
 
-			act 'Completely nude':
+			act 'Nude':
 				cla
 				act 'Maybe not today':gt 'foto','studio'
 
@@ -1858,18 +1805,17 @@ if $ARGS[0] = 'model':
 				mdlng_exp += rand(5,8)
 				city_modelling += rand(7,12)
 				pav_modelling += rand(1,city_modelling)/10
-				fashionshoot = rand(1,4)
+				fashionshoot = rand(1,5)
 				gs 'stat'
-				if fashionshoot = 1:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion.mp4"></video></center>'
-				if fashionshoot = 2:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion2.mp4"></video></center>'
-				if fashionshoot = 3:'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fasion3.jpg"></center>'
-				if fashionshoot < 4:'	You dress up in the latest in fashion wear and spend the next two hours posing for the photographer.'
-				if fashionshoot = 4:
-					'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion4.mp4"></video></center>'
+				if fashionshoot <= 2:'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion<<rand(1,2>>.mp4"></video></center>'
+				if fashionshoot >= 3 and fashionshoot < 5:'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fashion<<rand(1,3)>>.jpg"></center>'
+				if fashionshoot < 5:'	You dress up in the latest in fashion wear and spend the next two hours sexily posing for the photographer.'
+				if fashionshoot = 5:
+					'<center><video autoplay loop src="images/locations/city/citycenter/photo/fashion3.mp4"></video></center>'
 					'	You spend the next two hours modelling for the online catalogs of retail clothing stores, wearing various different dresses but the same expression. It''s boring but it still gets you paid.'
 				end
 				*nl
-				'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+				'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 				act 'Leave':gt 'foto', 'end'
 			end
 		end
@@ -1947,7 +1893,8 @@ if $ARGS[0] = 'model':
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/model1.jpg"></center>'
 					'	You dress up in sexy clothes and spend the next two hours posing for the photographer.'
-					'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+					*nl
+					'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 					act 'Leave':gt 'foto', 'end'
 				end
 			end
@@ -1971,9 +1918,10 @@ if $ARGS[0] = 'model':
 					pav_modelling += rand(0,city_modelling)/10
 					inhib_exp += 2
 					gs 'stat'
-					'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie.mp4"></video></center>'
+					'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie<<rand(1,2)>>.mp4"></video></center>'
 					'	You put on some sexy lingerie and spend the next two hours striking various poses for a photographer.'
-					'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+					*nl
+					'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 					if pcs_mdlng >= 40 and commercial = 0:
 						act 'Leave':gt'foto','commercial'
 					else
@@ -2016,7 +1964,8 @@ if $ARGS[0] = 'nude_shoot':
 			gs 'stat'
 			'<center><video autoplay loop src="images/locations/city/citycenter/photo/model5.mp4"></video></center>'
 			'	You dressed up in sexy clothes and spend the next two hours striking various poses for a photographer, your nipples occasionally slipping out from behind the clothing.'
-			'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+			*nl
+			'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 			if pcs_mdlng >= 40 and commercial = 0:
 				act 'Leave':gt'foto','commercial'
 			else
@@ -2025,7 +1974,7 @@ if $ARGS[0] = 'nude_shoot':
 		end
 	end
 
-	act 'Transparent clothing that exposes your breasts':
+	act 'Transparent clothing':
 		!!already matched the exhibitionism value above
 		cla
 		act 'Maybe not today':gt 'foto','studio'
@@ -2044,7 +1993,7 @@ if $ARGS[0] = 'nude_shoot':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/seethru1.jpg"><img <<$set_imgh>> src="images/locations/city/citycenter/photo/seethru2.jpg"></center>'
 			'	You put on a transparent top and spend the next two hours in various poses for the photographer, a flash highlighting your breasts with every click of the camera.'
 			*nl
-			'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+			'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 			if pcs_mdlng >= 40 and commercial = 0:
 				act 'Leave':gt'foto','commercial'
 			else
@@ -2074,7 +2023,8 @@ if $ARGS[0] = 'nude_shoot':
 				gs 'stat'
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/model4.mp4"></video></center>'
 				'	You put on some pants and omit a top leaving your breasts exposed. You spend the next two hours striking various poses, covering and uncovering your breasts, and listen to instruction while the photographer takes pictures of you.'
-				'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+				*nl
+				'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 				if pcs_mdlng >= 40 and commercial = 0:
 					act 'Leave':gt'foto','commercial'
 				else
@@ -2084,7 +2034,7 @@ if $ARGS[0] = 'nude_shoot':
 		end
 	end
 
-	act 'Nude with covered genitals':
+	act 'Transparent Lingerie':
 		if pcs_inhib < 55:
 			msg'You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you''re not ready to do it for real.'
 			gt 'foto', 'nude_shoot'
@@ -2097,54 +2047,18 @@ if $ARGS[0] = 'nude_shoot':
 				minut += 120
 				modelpayfin = 800 + (modelpay * 2) + (15*rand(0,7))
 				modelfoto_nip += 1
-				modelfoto_topless += 1
-				modelfoto_nude += 1
+				modelfoto_lingerie += 1
 				mdlng_exp += rand(8,10)
 				city_modelling += rand(9,14)
 				pav_modelling += rand(0,city_modelling)/10
 				inhib_exp += 4
 				gs 'stat'
-				'<center><video autoplay loop src="images/locations/city/citycenter/photo/model6.mp4"></video></center>'
-				'	You step onto the set spend the next two hours taking photos in various poses for a photographer, keeping your pussy covered with hands, props, or carefully crossed legs.'
-				'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+				'<center><video autoplay loop src="images/locations/city/citycenter/photo/lingerie_trans<<rand(1,3)>>.mp4"></video></center>'
+				'	You put on some very lacy, very transparent underwear and get to posing, your nipples often showing through the thin fabric.'
 				*nl
-				if pornstudio = 0:pornstudio = 2 & '	At the end of the shoot a staff member comes up to you. "By the way, you should take this," he says, handing you a business card. You''re shocked to see that it''s for a porn production company in St. Petersburg. "Since you''ve shown that you''re willing to go full nude, we figure we might as well let you know this opportunity exists. We share a couple of models with them and from what we can tell, it increases sales for both of us. If you feel like you''re up to it, use this card and tell them we sent you. That will get you a special audition. But we understand if you don''t go. We know it''s not for everyone and that some of you want more legitimate fame."'
-				if pcs_mdlng >= 40 and commercial = 0:
-					act 'Leave':gt'foto','commercial'
-				else
-					act 'Leave':gt 'foto', 'end'
-				end
-			end
-		end
-	end
-
-	act 'Nude with stockings':
-		if pcs_inhib < 60:
-			msg'You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you''re not ready to do it for real.'
-			gt 'foto', 'nude_shoot'
-		else
-			cla
-			act 'Not for me':gt 'foto','studio'
-
-			act 'Agree (2:00)':
-				*clr & cla
-				minut += 120
-				modelpayfin = 800 + (modelpay * 2) + (15*rand(0,7))
-				modelfoto_nip += 1
-				modelfoto_nude += 1
-				modelfoto_pussy += 1
-				mdlng_exp += rand(8,10)
-				city_modelling += rand(10,18)
-				pav_modelling += rand(0,city_modelling)/10
-				inhib_exp += 5
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/model2.jpg"></center>'
-				'	You strip down your clothes and pull up some stockings and spend the next two hours taking photos in various poses for a photographer.'
-				'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
-				'	The majority of photos seem to be focused on your naked breasts and pussy.'
+				'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 				*nl
 				if pornstudio = 0:pornstudio = 2 & '	At the end of the shoot a staff member comes up to you. "By the way, you should take this," he says, handing you a business card. You''re shocked to see that it''s for a porn production company in St. Petersburg. "Since you''ve shown that you''re willing to go full nude, we figure we might as well let you know this opportunity exists. We share a couple of models with them and from what we can tell, it increases sales for both of us. If you feel like you''re up to it, use this card and tell them we sent you. That will get you a special audition. But we understand if you don''t go. We know it''s not for everyone and that some of you want more legitimate fame."'
-
 				if pcs_mdlng >= 40 and commercial = 0:
 					act 'Leave':gt'foto','commercial'
 				else
@@ -2154,7 +2068,8 @@ if $ARGS[0] = 'nude_shoot':
 		end
 	end
 
-	act 'Full nude shoot':
+
+	act 'Nude':
 		if pcs_inhib < 60:
 			msg'You think about asking to do this shoot but then blush and realize you aren''t confident enough to have pictures of yourself like this circling around the internet. Maybe you could practice it later, but you''re not ready to do it for real.'
 			gt 'foto', 'nude_shoot'
@@ -2166,19 +2081,41 @@ if $ARGS[0] = 'nude_shoot':
 				*clr & cla
 				minut += 120
 				modelpayfin = 800 + (modelpay * 2) + (15*rand(0,7))
-				modelfoto_nip += 1
-				modelfoto_topless += 1
 				modelfoto_nude += 1
-				modelfoto_pussy += 1
 				mdlng_exp += rand(9,10)
 				city_modelling += rand(10,20)
 				pav_modelling += rand(0,city_modelling)/4
 				inhib_exp += 5
+				shoot_type rand(1,3)
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude.jpg"></center>'
-				'	Already naked, you step onto set and begin the shoot immediately.'
-				*nl
-				'	You spend the next two hours posing confidently for a photographer taking full frontal pictures of you. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+				if shoot_type = 1:
+					modelfoto_pussy += 1
+					modelfoto_nip += 1
+					if pcs_pubes <= 20:
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(1,3)>>.jpg"></center>'
+						'	Already naked, you step onto set and begin the shoot immediately.'
+						*nl
+						'	You spend the next two hours posing confidently for a photographer taking pictures of you that fully expose your breasts and pussy. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+					else
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(13,15)>>.jpg"></center>'
+						'	Already naked, you step onto set and begin the shoot immediately.'
+						*nl
+						'	You spend the next two hours posing confidently for a photographer taking pictures of you, your thick bush being used as a simple censor of your pussy and make it more "acceptable" as art while still maintaining the feeling of eroticism. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+					end
+				elseif shoot_type = 2:
+					modelfoto_nip += 1
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude<<rand(4,11)>>.jpg"></center>'
+					'	Already naked, you step onto set and begin the shoot immediately.'
+					*nl
+					'	You spend the next two hours posing confidently for a photographer taking pictures of you, often being asked to carefully position your hands or legs in ways that tastefully shields your pussy while simultaneously teasing the would-be readers of what they cannot see. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+				else
+					city_modelling += rand(0,5)
+					pav_modelling += rand(0,2)
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/nude12.jpg"></center>'
+					'	Already naked, you step onto set and begin the shoot immediately.'
+					*nl
+					'	You spend the next two hours posing confidently for a photographer taking pictures of you, often being asked to carefully position your hands or legs in ways that tastefully hides your pussy and nipples. These images, though incredibly provocative, are still somehow considered to be conservative enough to be allowed on the front cover of fashion, sports, and other tabloid magazines. When the shoot ends, both you and the photographers are very proud of the results and you are paid <<modelpayfin>> <b>₽</b> for your work.'
+				end
 				*nl
 				if pornstudio = 0:pornstudio = 2 & '	At the end of the shoot a staff member comes up to you. "By the way, you should take this," he says, handing you a business card. You''re shocked to see that it''s for a porn production company in St. Petersburg. "Since you''ve shown that you''re willing to go full nude, we figure we might as well let you know this opportunity exists. We share a couple of models with them and from what we can tell, it increases sales for both of us. If you feel like you''re up to it, use this card and tell them we sent you. That will get you a special audition. But we understand if you don''t go. We know it''s not for everyone and that some of you want more legitimate fame."'
 
@@ -2216,7 +2153,7 @@ if $ARGS[0] = 'nude_shoot':
 				'<center><video autoplay loop src="images/locations/city/citycenter/photo/vmodel.mp4"></video></center>'
 				'	You spend the next two hours posing for the photographer, changing in and out of various underwears, sexy clothings, and lingeries until you end the shoot fully striped down and dancing naked.'
 				*nl
-				'	Finally having taken all his pictures, the photographer thanks you for your time, counts out your <<modelpayfin>> <b>₽</b>, and pays it to you.'
+				'	After having taken all his pictures, the photographer thanks you for your time and concludes the shoot, counting out your <<modelpayfin>> <b>₽</b> to hand to you.'
 				if pcs_mdlng >= 40 and commercial = 0:
 					act 'Leave':gt'foto','commercial'
 				else

+ 3 - 3
locations/foto_models.qsrc

@@ -485,17 +485,17 @@ if $ARGS[0] = 'mari_chat':
 					'	You think of your siblings and smile, "Yeah. We are."'
 					act 'Keep chatting':gt 'foto_models','mari_chat'
 
-				elseif sisterLesb >= 5 and brotherSex >= 1 and brotherSex < 6 and npc_rel['A34'] >= 80:
+				elseif sisterLesb >= 5 and brotherSex >= 1 and brotherSex < 7 and npc_rel['A34'] >= 80:
 					'	"Yeah, I''ve got two. My sister who''s about the same age as you are and my adorable little brother. I love them both so much!"'
 					'	Mari smiles at you. "You sound close."'
 					'	Your mind wanders back to your siblings and how you''ve fooled around with both of them separately.'
 					'	"You could say that..."'
 					act 'Keep chatting':gt 'foto_models','mari_chat'
 
-				elseif sisterLesb >= 5 and brotherSex >= 6 and npc_rel['A34'] >= 80:
+				elseif sisterLesb >= 5 and brotherSex >= 7 and npc_rel['A34'] >= 80:
 					'	"Yeah, I''ve got two. My sister who''s about the same age as you are and my adorable little brother. I love them both so much!"'
 					'	Mari smiles at you. "You sound close."'
-					'	Your mind wanders back to your siblings and how you''ve fooled around with your sister and even had full fledged intercourse with your brother. Your thoughts wander to the memory of the last time his cock slid out of you and it causes you to blush.'
+					'	Your mind wanders back to your siblings and how you''ve fooled around with your sister and even had full fledged intercourse with your brother. Your thoughts wander to the memory of the last time his cock was inside you and it causes you to blush.'
 					'	"You could say that..."'
 					act 'Keep chatting':gt 'foto_models','mari_chat'
 

+ 1 - 1
locations/gargazel.qsrc

@@ -8,7 +8,7 @@ clr
 gs 'stat'
 '<center><h4>Garage</h4></center>'
 
-if father_go = 0 and hour >= 16 and hour < 21:
+if hour >= 16 and hour < 21:
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/garage/gargazel.jpg"></center>'
 	'A large garage that belongs to your stepfather. He spends time in there working on his beloved Gazelle pickup truck whenever he can in the late afternoons and evenings. You can tell the door is not locked, he''s probably in there now.'
 else

+ 37 - 37
locations/gpoli.qsrc

@@ -117,43 +117,43 @@ if $ARGS[0] = '':
 			act 'Pain relief (1:00)':
 				cla
 				minut += 60
-				if pain['head'] > 0:pain['head'] += rand(7,13)
-				if pain['hair'] > 0:pain['hair'] += rand(7,13)
-				if pain['ears'] > 0:pain['ears'] += rand(7,13)
-				if pain['eyebrows'] > 0:pain['eyebrows'] += rand(7,13)
-				if pain['eyes'] > 0:pain['eyes'] += rand(7,13)
-				if pain['cheeks'] > 0:pain['cheeks'] += rand(7,13)
-				if pain['nose'] > 0:pain['nose'] += rand(7,13)
-				if pain['mouth'] > 0:pain['mouth'] += rand(7,13)
-				if pain['lips'] > 0:pain['lips'] += rand(7,13)
-				if pain['tongue'] > 0:pain['tongue'] += rand(7,13)
-				if pain['throat'] > 0:pain['throat'] += rand(7,13)
-				if pain['neck'] > 0:pain['neck'] += rand(7,13)
-				if pain['back'] > 0:pain['back'] += rand(7,13)
-				if pain['asscheeks'] > 0:pain['asscheeks'] += rand(7,13)
-				if pain['asshole'] > 0:pain['asshole'] += rand(7,13)
-				if pain['hips'] > 0:pain['hips'] += rand(7,13)
-				if pain['thighs'] > 0:pain['thighs'] += rand(7,13)
-				if pain['legL'] > 0:pain['legL'] += rand(7,13)
-				if pain['legR'] > 0:pain['legR'] += rand(7,13)
-				if pain['feet'] > 0:pain['feet'] += rand(7,13)
-				if pain['toes'] > 0:pain['toes'] += rand(7,13)
-				if pain['shoulders'] > 0:pain['shoulders'] += rand(7,13)
-				if pain['armL'] > 0:pain['armL'] += rand(7,13)
-				if pain['armR'] > 0:pain['armR'] += rand(7,13)
-				if pain['hands'] > 0:pain['hands'] += rand(7,13)
-				if pain['fingers'] > 0:pain['fingers'] += rand(7,13)
-				if pain['chest'] > 0:pain['chest'] += rand(7,13)
-				if pain['breasts'] > 0:pain['breasts'] += rand(7,13)
-				if pain['nipples'] > 0:pain['nipples'] += rand(7,13)
-				if pain['ribs'] > 0:pain['ribs'] += rand(7,13)
-				if pain['tummy'] > 0:pain['tummy'] += rand(7,13)
-				if pain['pubic'] > 0:pain['pubic'] += rand(7,13)
-				if pain['vaginal'] > 0:pain['vaginal'] += rand(7,13)
-				if pain['labia'] > 0:pain['labia'] += rand(7,13)
-				if pain['clitoris'] > 0:pain['clitoris'] += rand(7,13)
-				if pain['urethra'] > 0:pain['urethra'] += rand(7,13)
-				if pain['cervix'] > 0:pain['cervix'] += rand(7,13)
+				if pain['head'] > 0:pain['head'] -= rand(7,13)
+				if pain['hair'] > 0:pain['hair'] -= rand(7,13)
+				if pain['ears'] > 0:pain['ears'] -= rand(7,13)
+				if pain['eyebrows'] > 0:pain['eyebrows'] -= rand(7,13)
+				if pain['eyes'] > 0:pain['eyes'] -= rand(7,13)
+				if pain['cheeks'] > 0:pain['cheeks'] -= rand(7,13)
+				if pain['nose'] > 0:pain['nose'] -= rand(7,13)
+				if pain['mouth'] > 0:pain['mouth'] -= rand(7,13)
+				if pain['lips'] > 0:pain['lips'] -= rand(7,13)
+				if pain['tongue'] > 0:pain['tongue'] -= rand(7,13)
+				if pain['throat'] > 0:pain['throat'] -= rand(7,13)
+				if pain['neck'] > 0:pain['neck'] -= rand(7,13)
+				if pain['back'] > 0:pain['back'] -= rand(7,13)
+				if pain['asscheeks'] > 0:pain['asscheeks'] -= rand(7,13)
+				if pain['asshole'] > 0:pain['asshole'] -= rand(7,13)
+				if pain['hips'] > 0:pain['hips'] -= rand(7,13)
+				if pain['thighs'] > 0:pain['thighs'] -= rand(7,13)
+				if pain['legL'] > 0:pain['legL'] -= rand(7,13)
+				if pain['legR'] > 0:pain['legR'] -= rand(7,13)
+				if pain['feet'] > 0:pain['feet'] -= rand(7,13)
+				if pain['toes'] > 0:pain['toes'] -= rand(7,13)
+				if pain['shoulders'] > 0:pain['shoulders'] -= rand(7,13)
+				if pain['armL'] > 0:pain['armL'] -= rand(7,13)
+				if pain['armR'] > 0:pain['armR'] -= rand(7,13)
+				if pain['hands'] > 0:pain['hands'] -= rand(7,13)
+				if pain['fingers'] > 0:pain['fingers'] -= rand(7,13)
+				if pain['chest'] > 0:pain['chest'] -= rand(7,13)
+				if pain['breasts'] > 0:pain['breasts'] -= rand(7,13)
+				if pain['nipples'] > 0:pain['nipples'] -= rand(7,13)
+				if pain['ribs'] > 0:pain['ribs'] -= rand(7,13)
+				if pain['tummy'] > 0:pain['tummy'] -= rand(7,13)
+				if pain['pubic'] > 0:pain['pubic'] -= rand(7,13)
+				if pain['vaginal'] > 0:pain['vaginal'] -= rand(7,13)
+				if pain['labia'] > 0:pain['labia'] -= rand(7,13)
+				if pain['clitoris'] > 0:pain['clitoris'] -= rand(7,13)
+				if pain['urethra'] > 0:pain['urethra'] -= rand(7,13)
+				if pain['cervix'] > 0:pain['cervix'] -= rand(7,13)
 				'You receive a combined painkiller, steroid and vitamin shot which not only helps the pain but speeds your recovery too permanently reducing your current pain.'
 
 				act 'Leave':gt 'gpoli'

+ 12 - 11
locations/gschool_events.qsrc

@@ -167,24 +167,25 @@ if $ARGS[0] = 'teacher_greet':
 						pcs_horny += 3
 						act 'Continue': gt 'gschool_lessons', 'morning'
 					end
-					if $pantyworntype = 'none':
-						if pcs_inhib > 35:
+					if pcs_inhib > 35:
+						if $pantyworntype = 'none':
 							act 'Show more':
 								*clr & cla
-								exhibition_exp += 2
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendover.jpg"></center>'
-								'You don''t pay attention to the teacher''s words and decide to have fun a little more. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your panty clad ass.'
-								'"<<$pcs_lastname>>, cover up." the teacher rushes to you and pulls your skirt down, covering your ass.'
-								'"Anatoly Evgenievich, but it''s just us. I always feel safe when you are around." you reply, standing up.'
+								exhibition_exp += 3
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendoverbare.jpg"></center>'
+								'You don''t pay attention to the teacher''s words and decide to have fun a little more. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your pussy and ass.'
+								'"<<$pcs_lastname>>, cover up." the teacher notices that you are not wearing any panties. He quickly runs up to you and pulls your skirt down, covering up your naked ass.'
 								'The teacher gives you a lecture on how to properly pick up books from the floor, then you both leave, not saying a word more to each other.'
 								act 'Continue': gt 'gschool_lessons', 'morning'
 							end
 						else
 							act 'Show more':
-								exhibition_exp += 3
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendoverbare.jpg"></center>'
-								'You don''t pay attention to the teacher''s words and decide to have fun a little more. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your pussy and ass.'
-								'"<<$pcs_lastname>>, cover up." the teacher notices that you are not wearing any panties. He quickly runs up to you and pulls your skirt down, covering up your naked ass.'
+								*clr & cla
+								exhibition_exp += 2
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendover.jpg"></center>'
+								'You don''t pay attention to the teacher''s words and decide to have fun a little more. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your panty clad ass.'
+								'"<<$pcs_lastname>>, cover up." the teacher rushes to you and pulls your skirt down, covering your ass.'
+								'"Anatoly Evgenievich, but it''s just us. I always feel safe when you are around." you reply, standing up.'
 								'The teacher gives you a lecture on how to properly pick up books from the floor, then you both leave, not saying a word more to each other.'
 								act 'Continue': gt 'gschool_lessons', 'morning'
 							end

+ 45 - 41
locations/kafe2.qsrc

@@ -41,7 +41,7 @@ if $ARGS[0] = 'toilet':
 	end
 
 	act 'Leave':gt 'kafe', 'workPred'
-	
+
 	act 'Look in the mirror': gt 'mirror', 'start'
 	if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
 
@@ -61,7 +61,7 @@ if $ARGS[0] = 'givi':
 			act 'Beg for time off':
 				cla
 				minut += 5
-				npc_rel['A41'] += 5
+				npc_rel['A41'] -= 5
 				'You take time off to leave early, Givi was a little angry but let you go.'
 
 				act 'Move away':gt 'street'
@@ -122,7 +122,7 @@ if $ARGS[0] = 'givi':
 						'You bend down behind the bar, out of view of the customers, kneel before Givi and take out his member.'
 						gs 'bdsex', 'autobj'
 						'Givi grabs you hard by the hair and pulls your mouth deeper onto his cock.'
-						
+
 						gs 'arousal', 'bj', 10, 'sub'
 						gs 'stat'
 
@@ -140,7 +140,7 @@ if $ARGS[0] = 'givi':
 
 							gs 'arousal', 'end'
 							gs 'stat'
-							
+
 							act 'Move away':gt 'kafe', 'workPred'
 						end
 					end
@@ -213,7 +213,7 @@ if $ARGS[0] = 'ashot':
 
 				if Ashotrand > 20:
 					'"You''re a cool bitch" says Ashot grabbing your ass.'
-					
+
 					gs 'arousal', 'foreplay', 10, 'sub'
 					gs 'stat'
 
@@ -242,7 +242,7 @@ if $ARGS[0] = 'ashot':
 
 								gs 'arousal', 'anal', 10, 'sub'
 								gs 'stat'
-						
+
 								act 'Moan':
 									*clr
 									cla
@@ -258,7 +258,7 @@ if $ARGS[0] = 'ashot':
 
 									'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/kafeanpie.jpg"></center>'
 									'Ashot leans forward thrusting his cock as deeply as possible.'
-									
+
 									gs 'arousal', 'anal', 10, 'sub'
 									gs 'stat'
 
@@ -281,7 +281,7 @@ if $ARGS[0] = 'ashot':
 
 							gs 'arousal', 'anal', 10, 'sub'
 							gs 'stat'
-									
+
 							act 'Moan':
 								*clr
 								cla
@@ -294,7 +294,7 @@ if $ARGS[0] = 'ashot':
 
 								'<center><img <<$set_imgh>> src="images/shared/sex/cum/analcreampie/kafeanpie.jpg"></center>'
 								'Ashot leans forward thrusting his cock as deeply as possible.'
-								
+
 								gs 'arousal', 'anal', 10, 'sub'
 								gs 'stat'
 
@@ -313,20 +313,20 @@ if $ARGS[0] = 'ashot':
 				end
 			elseif giviSex = 0 and Ashotsex > 0:
 				'"Sexy girl, with your lovely juicy ass, my dick still remembers skewering it." Says Ashot grabbing your ass.'
-				
+
 				gs 'arousal', 'foreplay', 10, 'sub'
 				gs 'stat'
-									
+
 			end
 		end
 	else
 		'Ashot is putting away his cooking equipment, getting ready to go.'
-		
+
 	end
 
 	gs 'arousal', 'end'
 	gs 'stat'
-		
+
 	act 'Move away':gt 'kafe', 'workPred'
 end
 
@@ -626,7 +626,7 @@ if $ARGS[0] = 'margoroom2':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/beast/zoo/margo6.jpg"></center>'
 		'Margot leans towards the male and shifts to an excellent position to start sucking him. Finally the member of the dog is alert.'
-		
+
 		gs 'arousal', 'voyeur', 15, 'beast'
 		gs 'stat'
 
@@ -647,7 +647,7 @@ if $ARGS[0] = 'margoroom2':
 			gs 'arousal', 'voyeur', 15, 'beast'
 			gs 'arousal', 'end'
 			gs 'stat'
-		
+
 			act 'Walk into the shower with Margaret':gt 'kafe2', 'margoshower'
 		end
 	end
@@ -662,7 +662,7 @@ if $ARGS[0] = 'margoshower':
 
 	gs 'arousal', 'kiss', 15, 'lesbian'
 	gs 'stat'
-		
+
 	act '<font color="magenta">Have her lick your nipples</font>':
 		cls
 
@@ -671,19 +671,21 @@ if $ARGS[0] = 'margoshower':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/beast/zoo/margo2.jpg"></center>'
 		'Margaret takes your swollen nipples into her mouth. She begins to lick them and their sharp little edges'
-		
+
 		gs 'arousal', 'foreplay', 15, 'lesbian', 'dom'
 		gs 'stat'
-	
+
 		if lactate = 1:
 			'You feel your breasts let down, as Margaret continues to suck on your nipples'
-			minut += (lactatemv/100)
-			if lactatemv > 800:
+			temp_var = lactatemv + lactaterate
+			if tempvar > 8000:
+				milkedvolume = breastmilkvolume = func('lact_lib','$get_breastmilk', 0, 60)
 				'She sucks for a long while, drinking a full belly of your ample milk.'
-				lactatemv = 0
+
 			else
+				milkedvolume = breastmilkvolume = func('lact_lib','$get_breastmilk', 0, 20)
 				'She empties your breasts, and then smiles at you.'
-				lactatemv = 0
+
 			end
 		end
 		act 'Carry her out':gt 'korr'
@@ -697,7 +699,7 @@ if $ARGS[0] = 'margoshower':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/beast/zoo/margo3.jpg"></center>'
 		'Margaret kneels down and starts to lick your pussy. Her tongue makes your body tingle with a wave of pleasure.'
-		
+
 		gs 'arousal', 'cuni', 15, 'lesbian', 'dom'
 		gs 'stat'
 
@@ -717,9 +719,9 @@ if $ARGS[0] = 'margoshower':
 		gs 'arousal', 'anal_finger', 15, 'lesbian', 'dom'
 		minut -= 15
 		gs 'stat'
-	
+
 		if pcs_horny >= 99:pcs_horny = 0 & orgasm += 1 & 'You covered orgasm.'
-		
+
 		$orgasm_or = 'yes'
 		gs 'stat'
 
@@ -735,13 +737,13 @@ if $ARGS[0] = 'margoshower':
 
 				gs 'arousal', 'anal_fist', 15, 'lesbian'
 				gs 'stat'
-	
+
 				if pcs_horny >= 90:pcs_horny = 0 & analorgasm += 1 & 'You covered orgasm.'
 
 				$orgasm_or = 'yes'
 				gs 'arousal', 'end'
 				gs 'stat'
-				
+
 				act 'Carry her out':gt 'korr'
 			end
 		end
@@ -755,7 +757,7 @@ if $ARGS[0] = 'margoroom3':
 
 	gs 'arousal', 'kiss', 15, 'lesbian'
 	gs 'stat'
-	
+
 	act 'Have her lick your nipples':
 		cls
 		if MargoSex = 0:MargoSex = 1 & girl += 1
@@ -763,19 +765,21 @@ if $ARGS[0] = 'margoroom3':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/beast/zoo/margo2.jpg"></center>'
 		'Margaret takes your swollen nipples into her mouth. She begins to lick and nibble on them with her sharp little teeth'
-		
+
 		gs 'arousal', 'foreplay', 15, 'lesbian', 'dom'
 		gs 'stat'
-		
+
 		if lactate = 1:
 			'You feel your breasts let down, as Margaret continues to suck on your nipples'
-			minut += (lactatemv/100)
-			if lactatemv > 800:
+			temp_var = lactatemv + lactaterate
+			if tempvar > 8000:
+				milkedvolume = breastmilkvolume = func('lact_lib','$get_breastmilk', 0, 60)
 				'She sucks for a long while, drinking a full belly of your ample milk.'
-				lactatemv = 0
+
 			else
+				milkedvolume = breastmilkvolume = func('lact_lib','$get_breastmilk', 0, 20)
 				'She empties your breasts, and then smiles at you.'
-				lactatemv = 0
+
 			end
 		end
 		act 'Walk into the room':gt 'kafe2', 'margoroom2'
@@ -789,12 +793,12 @@ if $ARGS[0] = 'margoroom3':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/beast/zoo/margo3.jpg"></center>'
 		'Margaret kneels down and starts to lick your pussy. Her tongue makes your body tingle with a wave of pleasure.'
-		
+
 		gs 'arousal', 'cuni', 15, 'lesbian', 'dom'
 		gs 'stat'
 
 		if pcs_horny >= 90:pcs_horny = 0 & orgasm += 1 & 'You have an orgasm.'
-		
+
 		$orgasm_or = 'yes'
 		gs 'stat'
 
@@ -811,12 +815,12 @@ if $ARGS[0] = 'margoroom3':
 
 		gs 'arousal', 'cuni', 15, 'lesbian', 'dom'
 		gs 'stat'
-		
+
 		if pcs_horny >= 99:pcs_horny = 0 & orgasm += 1 & 'You have an orgasm.'
 
 		$orgasm_or = 'yes'
 		gs 'stat'
-		
+
 		act 'Walk into the room':gt 'kafe2', 'margoroom2'
 
 		if pcs_ass > 15 and pcs_horny > 0:
@@ -828,12 +832,12 @@ if $ARGS[0] = 'margoroom3':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/beast/zoo/margo5.jpg"></center>'
 				'First she inserts one finger, then two, three and so on, until eventually she shoves her hand in completely. She quickly found herself in the depths of your ass. It feels unbelievable. Margaret penetrated deeper and deeper and you felt like you were in seventh heaven. It feels impossibly good. Your ass accepted her flexible hand. She starts massaging inside you like a real mistress, causing you to moan loudly and wagging your ass with pleasure.'
-				
+
 				gs 'arousal', 'anal_fist', 15, 'lesbian', 'dom'
 				gs 'stat'
-		
+
 				if pcs_horny >= 90:pcs_horny = 0 & orgasm += 1 & 'You covered orgasm.'
-				
+
 				$orgasm_or = 'yes'
 				gs 'arousal', 'end'
 				gs 'stat'

+ 24 - 22
locations/kid.qsrc

@@ -13,15 +13,17 @@ $breastfeed = {
 		minut += 5
 	else
 		minut += 15
-		'You lift <<$kidname[ks]>> to your breast and feed your baby <<$polreb[ks]>>. <<$kidPosProPN[ks]>> drinks <<lactatemv>>ml of your milk.'
+
 		breastcounter += 1
-		lactatemv = 0
-		if pain['nipples'] < 10:
-			pain['nipples'] += 20
+		milkedvolume = func('lact_lib','$get_breastmilk', 2, 15)
+		if milkedvolume < 800:
+			'You lift <<$kidname[ks]>> to your breast and feed your baby <<$polreb[ks]>>. Your baby doesn''t seem to be satisfied with the amount of milk.'
+		else
+			'You lift <<$kidname[ks]>> to your breast and feed your baby <<$polreb[ks]>>. Your baby seems satisfied with the amount of your milk.'
 		end
 	end
 	'You gently lay <<$kidname[ks]>> back <<$babyloc>>.'
-	act 'Done': 
+	act 'Done':
 		gt 'kid', 'start'
 	end
 }
@@ -49,13 +51,13 @@ $totplay = {
 	'<center><b><font color="maroon"><<$kidname[ks]>> <<$pcs_lastname>></font></b></center>'
 	'<center><img <<$set_imgh>> src="images/pc/activities/tot_play.jpg"></center>'
 	'"Mom! Mom! Mom! Mom!" Yells <<$kidname[ks]>>, "Come play with me!"'
-	'"Ok <<$kidname[ks]>>!" You reply.' 
+	'"Ok <<$kidname[ks]>>!" You reply.'
 	'You pull out a bin of blocks and spend a period of time playing and building with your child.'
 	'After a short time, <<$kidname[ks]>> pushes over the small tower you have built, snickers and runs off'
 	'You get up, straighten up your clothes, laugh, and move on with your day'
 	pcs_mood += 20
 	minut += 20
-	act 'Done': 
+	act 'Done':
 		gt 'kid', 'start'
 	end
 }
@@ -69,7 +71,7 @@ $tottv = {
 	'You watch a cartoon featuring a Rabbit, a Duck, and a Pig that is quite silly'
 	mood += 10
 	minut += 60
-	act 'Done': 
+	act 'Done':
 		gt 'kid', 'start'
 	end
 }
@@ -84,7 +86,7 @@ $kidtv = {
 	'"Well I am gonna watch with you." You reply, followed by tickling <<$kidname[ks]>> to open up a spot on the couch for you to sit.'
 	'You watch a kids TV show about two American teenagers that barely catches your interest.'
 	minut += 60
-	act 'Done': 
+	act 'Done':
 		gt 'kid', 'start'
 	end
 }
@@ -112,7 +114,7 @@ $homework = {
 	end
 	homework[ks] = daystart
 	minut += rand(30,80)
-	act 'Done': 
+	act 'Done':
 		gt 'kid', 'start'
 	end
 }
@@ -122,8 +124,8 @@ if $ARGS[0] = 'start':
 	if kid > 0:
 		k = 0
 		end
-		if lactate > 0 and lactatemv <= 1:
-			'You cannot breast feed right now.'
+		if lactate > 0 and pain['nipples'] > 60:
+			'You cannot breast feed right now. Your nipples are too sore.'
 		end
 		:loop
 		if k < kid:
@@ -132,9 +134,9 @@ if $ARGS[0] = 'start':
 			jump 'loop'
 		end
 		'Child Selected: <<$kidname[ks]>>'
-		if ks > 0:'<a href="exec:ks -= 1& gt ''kid'', ''start'' ">Select Previous Child</a>' 
+		if ks > 0:'<a href="exec:ks -= 1& gt ''kid'', ''start'' ">Select Previous Child</a>'
 		if ks < (kid - 1):'<a href="exec:ks += 1& gt ''kid'', ''start'' ">Select Next Child</a>'
-		
+
 	act 'Leave':
 		cla
 		killvar 'ks'
@@ -145,7 +147,7 @@ end
 if $ARGS[0] = 'kidlist':
 		if kidage[k] < 1:
 			if (month - monthkid[k]) < 1 and (day-daykid[k]) < 7:
-				kiddaycalc[k] = day - daykid[k]	
+				kiddaycalc[k] = day - daykid[k]
 				if kiddaycalc[k] = 1:
 					$kidagetext[k] = '<<kiddaycalc[k]>> day old'
 				else
@@ -196,18 +198,18 @@ if $ARGS[0] = 'kidlist':
 		if ks = k:
 		'<font color= #06992D>Your <<$sdtext[k]>> <<$kidname[k]>> is <<$kidagetext[k]>>. <<$kidposproC[k]>> date of birth is <<monthkid[k]>>/<<daykid[k]>>/<<yearkid[k]>>.</font>'
 		else:
-		'Your <<$sdtext[k]>> <<$kidname[k]>> is <<$kidagetext[k]>>. <<$kidposproC[k]>> date of birth is <<monthkid[k]>>/<<daykid[k]>>/<<yearkid[k]>>.' 
+		'Your <<$sdtext[k]>> <<$kidname[k]>> is <<$kidagetext[k]>>. <<$kidposproC[k]>> date of birth is <<monthkid[k]>>/<<daykid[k]>>/<<yearkid[k]>>.'
 		end
-		
+
 		if kidage[k] < 1:
-			if hour >= 12 and hour < 18: 
+			if hour >= 12 and hour < 18:
 			$babyloc = 'onto the blanket'
 			'<<$kidname[k]>></a> is laying on a blanket'
 			else:
 			$babyloc = 'into the crib'
 			'<<$kidname[k]>> is asleep, lying in <<$kidPosPro[k]>> crib.'
 			end
-			
+
 		elseif kidage[k] >= 1 and kidage[k] < 7:
 			if hour >= 9 and hour < 21 and rkidloc < 8:
 			$totloc = 'playing with toys on the floor'
@@ -234,13 +236,13 @@ if $ARGS[0] = 'kidlist':
 			end
 		end
 		if kid > 0 and kidage[ks] < 1:
-			
-			if lactate > 0 and lactatemv > 1:
+
+			if lactate > 0:
 				act 'Breast Feed <<$kidname[ks]>>':dyneval($breastfeed)
 			end
 			if $babyloc = 'onto the blanket':
 				act 'Play with <<$kidname[ks]>> (0:20)': dyneval($play)
-			end				
+			end
 		end
 		if kid > 0 and kidage[ks] >=1 and kidage[ks] <7:
 			if $totloc = 'playing with toys on the floor':

+ 2 - 2
locations/kit_din.qsrc

@@ -366,7 +366,7 @@ $dirtarm = {
 		minut += dirttarelka * 3
 		cltarelka += dirttarelka
 		dirttarelka = 0
-		pcs_mood += 5
+		pcs_mood -= 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/kitchen/dirt.jpg"></center>'
 		'Using the dishwashing liquid you washed the dishes.'
@@ -399,7 +399,7 @@ $edagotpk = {
 	kuhdrova = 0
 	musor += 1
 	cltarelka -= 1
-	pcs_mood += 5
+	pcs_mood -= 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/home/kitchen/cook.jpg"></center>'
 	'You prepare the meal.'

+ 437 - 0
locations/lact_lib.qsrc

@@ -0,0 +1,437 @@
+# lact_lib
+
+if $ARGS[0] = '$calc_lactatemm':
+
+	!! func('lact_lib', 'calc_lactatemm')
+	!! No arguments at the moment. Information is taken from the global variables 'nbsize', 'lactate','lactateinduced','kid'.
+	!! lactatemm should be calculated every day, so if the breasts size is changed naturally the lactatemm will get higher. No change when silicone tits happen. Only natural breast tissue should make milk.
+	!! Usage: lactatemm = func('lact_lib','$calc_lactatemm')
+	!! RESULT = lactatemm in ml*10
+
+	if lactate = 0:
+		RESULT = 0
+	elseif lactate >0:
+		temp_breastsize = 0
+		temp_breastsize += nbsize
+		temp_var = 0
+		if lactateinduced > 0 and kid <= 0:
+			temp_var = ((8*temp_breastsize*temp_breastsize)+(37*temp_breastsize))/4
+			RESULT = temp_var
+		else
+			RESULT = ((8*temp_breastsize*temp_breastsize)+(37*temp_breastsize))
+		end
+	else
+		cls & '<b><font color="red">BAD ARGUMENT CHECK IN <i>$calc_lactatemm</i>!</font></b>'
+	end
+end
+
+if $ARGS[0] = '$get_breastmilk':
+
+	!!	func('lact_lib','$get_breastmilk', sucktion_type, sucktion_time)
+	!!	ARGS[1] = sucktion_type: the type of sucktion. adult_mouth [0], child_mouth [1], baby_mouth [2], manual_breastpump [3] , electric_breastpump [4], hand_expressing [5], cow milker [6]
+	!!	ARGS[2] = sucktion_time: how many minutes the sucking/pumping takes place
+	!!	Usage: breastmilkvolume = func('lact_lib','$get_breastmilk', 4, 20)
+	!! 	RESULT = Milk in ml*10
+	!! what type of sucktion is happening? different sucktion can cause a different demand of breastmilk. Base rate of sucktion is 10ml/minute.
+
+	soreness_mod = 10
+	breastpumped = 1
+	!! 'suck_flow_rate initialized'
+	if ARGS[1] = 0:
+		!! 'adult sucking'
+		suck_flow_rate = 12 + rand(0,4)
+		temp_var = pcs_mood +(ARGS[2]/8)
+		if temp_var > 100:
+			pcs_mood = 100
+		else
+			pcs_mood += ARGS[2]/8
+		end
+	elseif ARGS[1] = 1:
+		!! 'child sucking'
+		suck_flow_rate = 8 + rand(0,2)
+		temp_var = pcs_mood + (ARGS[2]/2)
+		if temp_var > 100:
+			pcs_mood = 100
+		else
+			pcs_mood += ARGS[2]/2
+		end
+	elseif ARGS[1] = 2:
+		!!	'baby sucking'
+		suck_flow_rate = 6 + (rand(0,2))
+		temp_var = pcs_mood + ARGS[2]
+		if temp_var > 100:
+			pcs_mood = 100
+		else
+			pcs_mood += ARGS[2]
+		end
+	elseif ARGS[1] = 3:
+		!!	'manual_breastpump sucking'
+		suck_flow_rate = 9
+	elseif ARGS[1] = 4:
+		!!	'electric_breastpump sucking'
+		suck_flow_rate = 10
+	elseif ARGS[1] = 5:
+		!! 'hand expression'
+		suck_flow_rate = 3 + rand(1,2)
+	elseif ARGS[1] = 6:
+		!! 'cow milker sucking'
+		suck_flow_rate = 100
+	else
+		!! 'suck flow else branch'
+		suck_flow_rate = 10
+	end
+	!!	If you pump and work your breast more, soreness will decrease after pumping. This can also decline if your breasts arent worked for a longer time.
+	if breastcounter > 0:
+		temp_var = breastcounter/10
+		soreness_mod += temp_var
+		if soreness_mod > 20: soreness_mod = 20
+		if nipple_cream = 1:
+			soreness_mod += 10
+			nipple_cream = 0
+		end
+	end
+	!! No lactation, no milk, but stimulus is applied, so some things are going to happen here.
+	if lactate = 0:
+		if milkoverdemand <= 0: milkoverdemand = 0
+		pump_stop_brake = 0
+		!!	This is how much milk demand is applied to the breasts. In this function it is needed to calculate the nipple pain and breast pain.
+		max_sucktion_demand = 10*suck_flow_rate*ARGS[2]
+		if pain['nipples'] <= 60:
+			suck_until_pain = ((60 - pain['nipples'])*10*(soreness_mod/10))/suck_flow_rate
+		end
+		temp_var = pain['nipples'] + (max_sucktion_demand/100)/(soreness_mod/10)
+		if temp_var > 60:
+			pain['nipples'] = 65
+			pump_stop_brake = 1
+			pumptime = suck_until_pain
+			max_sucktion_demand = 10*suck_flow_rate*pumptime
+		else
+			pain['nipples'] += (max_sucktion_demand/100)/(soreness_mod/10)
+		end
+
+		temp_var = pain['breasts'] + max_sucktion_demand/1000
+		if temp_var > 20:
+			pain['breasts'] = 25
+		else
+			pain['breasts'] += max_sucktion_demand/1000
+		end
+		!! Pumping breasts is exhausting even if no milk comes. so this is handled here.
+
+		temp_var = pcs_energy - max_sucktion_demand/1500
+		if temp_var < 0:
+			pcs_energy = 0
+			!! energy usage flag on.
+			energytomilkpump = 1
+		else
+			pcs_energy -= max_sucktion_demand/1500
+			!! energy usage flag on.
+			energytomilkpump = 1
+		end
+
+		if pumptime < 10:
+			breastcounter += 1
+		else
+			breastcounter += pumptime/10
+		end
+
+		milkoverdemand += max_sucktion_demand
+		RESULT = 0
+	!! If there is lactation, do the magic
+	elseif lactate >0:
+		!!	How much milk can go through the nipple. Base rate is 10ml/minute when sucktion is applied to the nipple. If the demand is higher than the nipple can push through, nipple soreness will happen more quickly.
+		if pcs_nips > 0:
+			max_nip_flow_rate = 6
+		elseif pcs_nips > 20:
+			max_nip_flow_rate = 8
+		elseif pcs_nips > 40:
+			max_nip_flow_rate = 10
+		elseif pcs_nips > 60:
+			max_nip_flow_rate = 12
+		elseif pcs_nips > 80:
+			max_nip_flow_rate = 14
+		elseif pcs_nips > 100:
+			max_nip_flow_rate = 16
+		else
+			max_nip_flow_rate = 10
+		end
+
+		!!	If you pump and work your breast more, soreness will decrease after pumping. This can also decline if your breasts arent worked for a longer time.
+		if breastcounter > 0:
+			temp_var = breastcounter/10
+			soreness_mod += temp_var
+			if soreness_mod > 20: soreness_mod = 20
+			if nipple_cream = 1:
+				soreness_mod += 10
+				nipple_cream = 0
+			end
+		end
+
+		!!	If you pump more, more milk will come, disregarding nipplesize. Things will get used to milking and be more loose.
+		nip_flow_mod = 1
+		temp_var = breastcounter/10
+		nip_flow_mod += temp_var
+		if nip_flow > 30: nip_flow_mod = 30
+		max_nip_flow_rate += nip_flow_mod
+
+		!!	How much milk demand is applied to the breasts. We want to know if we can just suck out what is already stored or if additional milk production is needed to go through the whole pumping/sucking.
+		!!	If we only need 20ml from a 100ml storage, we would only substract 20ml, leaving 80ml inside the breasts.
+		
+		max_sucktion_demand = 10*suck_flow_rate*ARGS[2]
+		!!	Is enough milk already in the breasts?
+		if lactatemv > max_sucktion_demand:
+			!! can the nipples handle the flow?
+			if max_nip_flow_rate >= suck_flow_rate:
+				milkedvolume = max_sucktion_demand
+				lactatemv -= max_sucktion_demand
+			elseif max_nip_flow_rate < suck_flow_rate:
+				milkedvolume = max_nip_flow_rate*10*ARGS[2]
+				lactatemv -= milkedvolume
+				!!	time for sore nipples. We apply more sucking than the nipples can handle. So it hurts more. if nipple pain over 60, then it goes to 65. else it just adds soreness.
+				max_sucktion_demand -= milkedvolume
+				temp_var = pain['nipples'] + (max_sucktion_demand/100)/(soreness_mod/10)
+				if temp_var > 60:
+					pain['nipples'] = 65
+				else
+					pain['nipples'] += (max_sucktion_demand/100)/(soreness_mod/10)
+				end
+			else
+				cls & '<b><font color="red">BAD ARGUMENT CHECK IN <i>$get_breastmilk</i>!</font></b><b>Error in Lactatemv bigger than max_sucktion_demand fork.</b>'
+			end
+		elseif lactatemv < max_sucktion_demand:
+			!!	Magic!
+			temp_var = (lactatemv/(max_nip_flow_rate*10))
+			if temp_var <= 0 and lactatemv > 0: temp_var = 1
+			pumptime_left = ARGS[2] - temp_var
+			if pumptime_left <= 0 and lactatemv > 0: pumptime_left = 1
+			temp_var = lactaterate/60
+			if temp_var <= 0 and lactaterate > 0: temp_var = 1
+			if temp_var >= max_nip_flow_rate:
+				if ARGS[1] = 2: breastcounter += 50
+				milkedvolume = (max_nip_flow_rate * 10 * pumptime_left) + (max_nip_flow_rate * 10 * (ARGS[2] - pumptime_left))
+				lactatemv -= (max_nip_flow_rate * 10 * (ARGS[2] - pumptime_left))
+			elseif temp_var < max_nip_flow_rate:
+				!!with a baby sucking, more milk should be made due to nature ...
+				if ARGS[1] = 2: milkoverdemand += 100000
+				milkedvolume = (temp_var * pumptime_left) + (max_nip_flow_rate * 10 * (ARGS[2] - pumptime_left))
+				lactatemv -= (max_nip_flow_rate * 10 * (ARGS[2] - pumptime_left))
+			else
+				cls & '<b><font color="red">BAD ARGUMENT CHECK IN <i>$get_breastmilk</i>!</font></b><b>Error in Lactatemv smaller than max_sucktion_demand fork.</b>'
+			end
+			if lactatemv <= 0: lactatemv = 0
+			!!	the breasts had to produce milk, so energy is used.
+			temp_var = pcs_energy - milkedvolume/1000
+			if temp_var < 0:
+				pcs_energy = 0
+				if rand(0,100) > 90: fat -= 1
+				!!	this is checking if pcs_energy was impacted during milking.
+				energytomilkpump = 1
+			else
+				pcs_energy -= milkedvolume/1000
+				!!	this is checking if pcs_energy was impacted during milking.
+				energytomilkpump = 1
+			end
+			!! the breasts had to produce milk, so hydration is used.
+			temp_var = pcs_hydra - milkedvolume/500
+			if temp_var < 0:
+				pcs_hydra = 0
+				energytomilkpump = 1
+			else
+				pcs_hydra -= milkedvolume/500
+				energytomilkpump = 1
+			end
+			!!	if more is pumped than produced the breasts will hurt too.
+			if milkedvolume < max_sucktion_demand:
+				!!	milkoverdemand: This is used for the daily milk growth. If there is overdemand, the lactaterate will change the next day. Will be set to 0 every day.
+				milkoverdemand += max_sucktion_demand - milkedvolume
+				temp_var = pain['breasts'] + (max_sucktion_demand - milkedvolume)/1000
+				if temp_var > 20:
+					pain['breasts'] = 20
+				else
+					pain['breasts'] += (max_sucktion_demand - milkedvolume)/1000
+				end
+			end
+			if max_nip_flow_rate < suck_flow_rate:
+				!!	sore nipples again. "used to breastpumping" variable needs to come in here too!
+				temp_var = pain['nipples'] + ((((max_nip_flow_rate*100)/60) * pumptime_left)/100) + (max_sucktion_demand/100)/(soreness_mod/10)
+				if temp_var > 60:
+					pain['nipples'] = 65
+				else
+					pain['nipples'] += ((((max_nip_flow_rate*100)/60) * pumptime_left)/100) + (max_sucktion_demand/100)/(soreness_mod/10)
+				end
+			end
+		end
+		!! The standard nipple pain applied due to pumping. Adding to the pain that is calculated above
+		temp_var = pain['nipples'] + (max_sucktion_demand/100)/(soreness_mod/10)
+		if temp_var > 60:
+			pain['nipples'] = 65
+		else
+			pain['nipples'] += (max_sucktion_demand/100)/(soreness_mod/10)
+		end
+
+		if pumptime < 10:
+			breastcounter += 1
+		else
+			breastcounter += pumptime/10
+		end
+
+		RESULT = milkedvolume
+	else
+		cls & '<b><font color="red">BAD ARGUMENT CHECK IN <i>$get_breastmilk</i>!</font></b>'
+	end
+end
+
+!! lact_lib
+
+!!	bp_milking - breast pump milking
+!!	use href="exec:gt ''lact_lib'',''bp_milking''"
+
+if $ARGS[0] = 'bp_milking':
+	pumptime = 0
+	pumptype = 0
+	if $location_type ! 'bathroom' and pcs_exhibition < 60:
+		'You can''t use it here.'
+	else
+		*clr
+		cla
+		pumptime = input ("How long do you plan to pump your breasts? (Not more than 60 minutes)")
+		if pumptime <= 0 or pumptime > 60:
+			minut += 2
+			act 'Don''t pump':gt $loc, $metka
+		elseif pumptime > 0 and pumptime <= 60:
+			gt 'lact_lib', 'milking'
+		end
+	end
+end
+
+!!	man_milking - manual (with hands) milking
+!!	use href="exec:gt ''lact_lib'',''man_milking''"
+
+if $ARGS[0] = 'man_milking':
+	pumptime = 0
+	pumptype = 1
+	if $location_type ! 'bathroom' and pcs_exhibition < 60:
+		'You can''t do this here.'
+	else
+		*clr
+		cla
+		pumptime = input ("How long would you like to milk your breasts? (Not more than 60 minutes)")
+		if pumptime <= 0 or pumptime > 60:
+			minut += 2
+			act 'Don''t milk':gt $loc, $metka
+		elseif pumptime > 0 and pumptime <= 60:
+			gt 'lact_lib', 'milking'
+		end
+	end
+end
+
+!!	milking
+!!	never use directly. Always use bp_milking, man_milking or sex_milking
+
+if $ARGS[0] = 'milking':
+	if pumptime <= 0 or pumptime > 60:
+		act 'Finish':gt $loc, $metka
+	end
+	if pumptype = 1:
+		pumptime = (pumptime*6)/10
+	end
+	if lactate > 0 and pain['nipples'] < 60:
+		milkedvolume = func('lact_lib','$get_breastmilk', 3, pumptime)
+		'<center><img <<$set_imgh>> src="images/pc/body/tits/pump_lactating.jpg"></center>'
+		'You attach the pump to your breast and start rythmically squeezing the bulb until your breasts feel empty.<br>You give it a few more pumps and detach the pump.<br>You filled the bottle with <<milkedvolume/10>>ml of your milk.'
+		breastcounter += 1
+		if energytomilkpump > 0 and pcs_energy = 0:
+			'<br>During pumping you feel really hungry, producing breast milk seems to be more exhausing then thought.'
+			energytomilkpump = 0
+		elseif energytomilkpump > 0:
+			'<br>You feel a bit thirsty after pumping.'
+			energytomilkpump = 0
+		end
+		if bcream_used = 1:
+			pcs_nips += rand(0,2)
+			bcream_used = 0
+		end
+		minut += pumptime
+	elseif lactate = 0 and pain['nipples'] < 60:
+		if rand(1,50) + prolactinlvl >= rand(200,250):
+			'<center><img <<$set_imgh>> src="images/pc/body/tits/lactate_start.jpg"></center>'
+			'As usual, you attach the pump but after a few pumps white liquid suddenly starts flowing from your nipples.<br>You started lactating!'
+			lactateinduced = 1
+			lactate = 1
+			if func('lact_lib','$calc_lactatemm') > 0: lactatemm = func('lact_lib','$calc_lactatemm')
+			if prolactinlvl < 200: prolactinlvl = 200
+			lactaterate = 10*(prolactinlvl/200)
+			pcs_nips += 2
+			pumpinggrowth = 0
+		else
+			milkedvolume = func('lact_lib','$get_breastmilk', 3, pumptime)
+			'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tits>>.jpg"></center>'
+			'You attach the pump to your nipples and start squeezing the bulb. The vacuum feels good on your nipples.'
+			if prolactinlvl > 70: 'A few droplets of liquid come out of your nipples but it is not milk.'
+			breastcounter += 1
+			if pump_stop_brake = 1:
+				'During pumping your nipples start to hurt extremely. You have to stop after <<pumptime>> minutes, because you couldn''t go on.'
+			end
+			if prolactinlvl > 75:
+				if rand(0,10) > 9:
+					pumpinggrowth += 1
+				end
+				'After finishing, your breasts feel weirdly engorged.'
+			end
+			if bcream_used = 1:
+				pcs_nips += rand(0,2)
+				bcream_used = 0
+			end
+		end
+		minut += pumptime
+	else
+		'Your nipples feel too sore to use the pump right now.'
+	end
+	if milkedvolume > 0:
+		lact_engorgement = 0
+		lactatemess = 0
+		act 'Pour it into the sink':
+			*clr
+			cla
+			'<center><img <<$set_imgh>> src="images/pc/body/tits/milk_sink.jpg"></center>'
+			'<center>You pour <<milkedvolume/10>>ml of your breast milk into the sink and clean up your breastpump.</center>'
+			minute += 5
+			act 'Finish':
+				milkedvolume = 0
+				gt $loc, $metka
+			end
+		end
+		if pcs_hydra < 100:
+			act 'Drink it':
+				*clr
+				cla
+				'<center><img <<$set_imgh>> src="images/pc/body/tits/milk_drink.jpg"></center>'
+				'<center>You drink your own breast milk and clean up your breastpump.</center>'
+				'<center>The milk is still warm from your breasts.</center>'
+				if pcs_hydra < 90:
+					pcs_hydra += 10
+				else
+					pcs_hydra = 100
+				end
+				minute += 7
+				act 'Finish':
+					milkedvolume = 0
+					gt $loc, $metka
+				end
+			end
+		end
+	else
+		act 'Finish':gt $loc, $metka
+	end
+end
+
+!!	engorged_morning
+!!	use href="exec:gt ''lact_lib'',''engorged_morning''"
+
+if $ARGS[0] = 'engorged_morning':
+	minut += 5
+	'<center><img <<$set_imgh>> src="images/pc/body/tits/lactate_start.jpg"></center>'
+	'You wake up and your breasts hurt. As you look down, you can see that you have a heavy letdown. You should pump your breasts as soon as possible.'
+	act 'Finish':gt $loc, $metka
+end
+
+--- lac_lib ---------------------------------

+ 2 - 2
locations/lesbidomhouse.qsrc

@@ -991,7 +991,7 @@ if $ARGS[0] = 'QW6':
 			'While you clean, you begin to reflect on your current situation and Mistress in general. You can''t help but admire her, despite the torture she is putting you through. She clearly knows what she is doing, wearing you down like she is... she''s such a strong woman, so convincing! And if you keep paying attention, you will learn how to do this to other girls too! You just have to suffer through it, for a little while longer... it will be worth it in the long run for sure!'
 			'After two hours of cleaning, Mistress releases you. She deftly removes the cuffs and collar from you, says you can go and leaves without another word.'
 
-			act 'Leave her apartment':minut += 120 & pcs_mood += 5 & gt'street'
+			act 'Leave her apartment':minut += 10 & pcs_mood += 5 & gt'street'
 		elseif temp = 2:
 		
 			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub11.jpg"></center>'
@@ -1000,7 +1000,7 @@ if $ARGS[0] = 'QW6':
 			'While you clean, you begin to reflect on your current situation and Mistress in general. You can''t help but admire her, despite the torture she is putting you through. She clearly knows what she is doing, wearing you down like she is... she''s such a strong woman, so convincing! And if you keep paying attention, you will learn how to do this to other girls too! You just have to suffer through it, for a little while longer... it will be worth it in the long run for sure!'
 			'After two hours of cleaning, Mistress says you can get up and take off the apron. She takes the apron out of your hands, says you can go and leaves without another word.'
 
-			act 'Leave her apartment':minut += 120 & pcs_mood += 5 & gt'street'
+			act 'Leave her apartment':minut += 10 & pcs_mood += 5 & gt'street'
 		end
 	end
 end

+ 4 - 0
locations/lesbimistress.qsrc

@@ -1198,6 +1198,7 @@ if $ARGS[0] = 'neutral_9':
 		cla
 		*clr
 		exhibition_exp += 3
+		if exhibitionist_lvl < 1: pcs_horny += rand(1,3)
 		gs'stat'
 		'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub226.jpg"></center>'
 		'You get in Mistress'' car, and just look out the window where she drives you to where she wants to take you.'
@@ -1215,6 +1216,7 @@ if $ARGS[0] = 'neutral_9':
 			cla
 			*clr
 			exhibition_exp += 7
+			if exhibitionist_lvl < 1: pcs_horny += rand(2,5)
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub227.jpg"></center>'
 			'You get back in the car once you get dressed, and let Mistress take you where she wants to go. She parks somewhere in the city center, and then guides you to a back alley. She taps a door several times with her knuckles in an irregular pattern, and it swings open almost immediately. Must''ve been a code.'
@@ -1230,6 +1232,7 @@ if $ARGS[0] = 'neutral_9':
 				cla
 				*clr
 				exhibition_exp += 5
+				if exhibitionist_lvl < 1: pcs_horny += rand(1,3)
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub228.jpg"></center>'
 				'Once Mistress leaves, you can tell that several of the patrons are looking at you very intently.'
@@ -1244,6 +1247,7 @@ if $ARGS[0] = 'neutral_9':
 					cla
 					*clr
 					exhibition_exp += 5
+					if exhibitionist_lvl < 1: pcs_horny += rand(1,3)
 					gs'stat'
 					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/sub229.jpg"></center>'
 					'Just when you were starting to feel at ease, a man walks up to you. His eyes are scanning your body intently, greedily consuming every square inch of you.'

+ 7 - 7
locations/lesbisubhouse.qsrc

@@ -75,7 +75,7 @@ if $ARGS[0] = 'start':
 			act 'Fuck her pussy':
 				cls
 				pcs_sweat += 10
-				if pcs_mood < 50:pcs_mood += 50
+				if pcs_mood < 50:pcs_mood = 50
 				gs'stat'
 				
 				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom14.jpg"></center>'
@@ -169,7 +169,7 @@ if $ARGS[0] = 'start':
 			act 'Fuck her ass':
 				cls
 				pcs_sweat += 10
-				if pcs_mood < 50:pcs_mood += 50
+				if pcs_mood < 50:pcs_mood = 50
 				gs'stat'
 				
 				'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom15.jpg"></center>'
@@ -264,7 +264,7 @@ if $ARGS[0] = 'start':
 			act 'Fuck your pussy with her mouth... sort of':
 				cls
 				pcs_sweat += 10
-				if pcs_mood < 50:pcs_mood += 50
+				if pcs_mood < 50:pcs_mood = 50
 				if pcs_vag < 10:
 					if vgape < 3:vgape += 1
 				end
@@ -481,7 +481,7 @@ if $ARGS[0] = 'start':
 				act 'Fuck her pussy':
 					cls
 					pcs_sweat += 10
-					if pcs_mood < 50:pcs_mood += 50
+					if pcs_mood < 50:pcs_mood = 50
 					gs'stat'
 					
 					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom22.jpg"></center>'
@@ -554,7 +554,7 @@ if $ARGS[0] = 'start':
 				act 'Fuck her in the ass':
 					cls
 					pcs_sweat += 10
-					if pcs_mood < 50:pcs_mood += 50
+					if pcs_mood < 50:pcs_mood = 50
 					gs'stat'
 					
 					'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom23.jpg"></center>'
@@ -627,7 +627,7 @@ if $ARGS[0] = 'start':
 				act 'Fuck your ass with her mouth... sort of':
 					cls
 					pcs_sweat += 10
-					if pcs_mood < 50:pcs_mood += 50
+					if pcs_mood < 50:pcs_mood = 50
 					if pcs_ass < 10:
 						if agape < 3:agape += 1
 					end
@@ -1545,7 +1545,7 @@ if $ARGS[0] = 'ev1':
 							act 'Have her lick your pussy':
 								cls
 								mistbath = daystart
-								if pcs_mood < 50:pcs_mood += 50
+								if pcs_mood < 50:pcs_mood = 50
 								gs'stat'
 
 								'<center><img <<$set_imgh>> src="images/characters/city/natalya/sex/dom43.jpg"></center>'

+ 26 - 26
locations/mitkasex.qsrc

@@ -592,7 +592,7 @@ if $args[0] = 'gadsexOral1':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagadsexoral1.'+rand(1,2)+'.jpg"></center>'
 	'You kneel in front of a boy. <<$boydesc>> taking your <<dick>> cm dick, brings it to your lips...'
 	gs 'oral','start'
-	if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+	if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 	*pl
 	'<<$textsexhanter4>>'
 	gs 'arousal', 'bj', 5, 'sub'
@@ -617,7 +617,7 @@ if $ARGS[0] = 'gadOralCum1':
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkagadsexoralcuml1.jpg"></center>'
 	'Realizing that <<$boydesc>> will soon run out, you are increasing the pace...'
-	if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+	if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 	gs 'dinsex', 'dinrandswallow'
 	*pl
 	'<<$textsexhanter3>>'
@@ -1805,10 +1805,10 @@ if $ARGS[0] = 'forestVag3':
 	if temp_ms = 1:
 		gs 'boyStat', 'A63'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickA > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1819,10 +1819,10 @@ if $ARGS[0] = 'forestVag3':
 	elseif temp_ms = 2:
 		gs 'boyStat', 'A62'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickC > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1833,10 +1833,10 @@ if $ARGS[0] = 'forestVag3':
 	elseif temp_ms = 3:
 		gs 'boyStat', 'A61'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickB > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1886,18 +1886,18 @@ if $ARGS[0] = 'forestAnal3_3':
 	if temp_ms = 1:
 		gs 'boyStat', 'A62'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickC > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		gs 'boyStat', 'A63'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickA > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1907,18 +1907,18 @@ if $ARGS[0] = 'forestAnal3_3':
 	elseif temp_ms = 2:
 		gs 'boyStat', 'A61'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickB > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		gs 'boyStat', 'A62'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickC > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1928,17 +1928,17 @@ if $ARGS[0] = 'forestAnal3_3':
 	elseif temp_ms = 3:
 		gs 'boyStat', 'A63'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickA > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		gs 'boyStat', 'A61'
-		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickB > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		gs 'oral','start'
@@ -1979,10 +1979,10 @@ if $ARGS[0] = 'forestAnal3_2':
 	if temp_ms = 1:
 		gs 'boyStat', 'A63'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickA > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickA > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -1992,10 +1992,10 @@ if $ARGS[0] = 'forestAnal3_2':
 	elseif temp_ms = 2:
 		gs 'boyStat', 'A62'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickC > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickC > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl
@@ -2005,10 +2005,10 @@ if $ARGS[0] = 'forestAnal3_2':
 	elseif temp_ms = 3:
 		gs 'boyStat', 'A61'
 		gs 'oral','start'
-		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood += 5 & pcs_horny -= 20
+		if klismaday ! daystart and dirty_dickB > 0:'<<$textsexhanter>>' & pcs_mood -= 5 & pcs_horny -= 20
 		if klismaday = daystart  and Mira_enema = 0 and dirty_dickB > 0:
 			'From a member of the unpleasant smells and remains in the mouth tastes foul feces. "-Fucking enema to do, fool!!!" - you throw the World into violent views.'
-			pcs_mood += 5
+			pcs_mood -= 5
 			pcs_horny -= 20
 		end
 		*pl

+ 7 - 7
locations/obj_din.qsrc

@@ -209,7 +209,7 @@ if $ARGS[0] = 'sex_skills':
 	nl
 	pl '<b>Sexual characteristics</b>'
 	nl
-	pl 'Exhibitionism <<pcs_exhibition>>'
+	pl 'Inhibition <<pcs_inhib>>'
 	pl 'Exhibitionist sex preference: <<exhibitionism[''pref'']>>'
 	pl 'Exhibitionist sex: <<exhibitionism[''exp'']>>'
 	if SUB > 0:pl 'Submissiveness <<SUB>>'
@@ -540,11 +540,11 @@ if $ARGS[0] = 'stats_achievements':
 	if maxdamage > 0:pl 'The impact force on the dynamometer <<maxdamage>> kgN' & nl
 
 	if stripdancesum > 0 and hidden_stripdancesum = 0:
-		pl 'You have been dancing <<stripdancesum>> times in the stripclub'
+		pl 'You have danced <<stripdancesum>> times in the stripclub'
 	elseif stripdancesum = 0 and hidden_stripdancesum > 0:
-		pl 'You have been dancing <<hidden_stripdancesum>> times in the stripclub, but you do nor remember it'
+		pl 'You have danced <<hidden_stripdancesum>> times in the stripclub, but you do nor remember it'
 	elseif stripdancesum > 0 and hidden_stripdancesum > 0:
-		pl 'You have been dancing <<stripdancesum+hidden_stripdancesum>> times in the stripclub, but you only remember <<stripdancesum>> times'
+		pl 'You have danced <<stripdancesum+hidden_stripdancesum>> times in the stripclub, but you only remember <<stripdancesum>> times'
 	end
 	if profiDanceTime > 0:pl 'You danced <<profiDanceTime>> times professionally.'
 	if SchoolAtestat = 1:pl 'You have finished school.'
@@ -751,7 +751,7 @@ if $ARGS[0] = 'stats_sport':
 	pl'Marksmanship <<pcs_shoot>>'
 	pl'Chess <<pcs_chess>>'
 	pl'Ice Skating <<pcs_icesktng>>'
-	pl'Gaming <<pcs_ttgmng>>'
+	pl'Gaming <<pcs_gaming>>'
 end
 
 if $ARGS[0] = 'stats_beauty':
@@ -962,7 +962,7 @@ if $ARGS[0] = 'rep2':
 	nl
 	pl'<a href="exec:gs ''obj_din'', ''reputation''">Return to fame</a>'
 
-	if rinslut > 1 and kavslut > 0:pl'In the residential area of ​​you are known as a whore that sleeps with Caucasians.'
+	if rinslut > 0 or kavslut > 0:pl'In the residential area of ​​you are known as a whore that sleeps with Caucasians.'
 	if afra > 80: pl'In the student hostel, you are known for bedding blacks.'
 	if opusk > 0 or gnewQW >= 5: pl'In the residential area it is well known by all the guys that you are a whore.'
 	if StoryLine = 1:
@@ -1003,7 +1003,7 @@ if $ARGS[0] = 'rep2':
 		if brothershowerlook = 1:pl'You let your brother look at you when you''re shower'
 		if brothershave > 0:pl'<<brothershave>> - Number of times you''ve let your brother watch you shave your pussy'
         if brotherbj > 0:pl'<<brotherbj>> - Number of times you''ve given your brother blowjobs'
-        if brotherfuck > 0:pl'<<brotherSex>> - Number of times you''ve had sex with your brother'
+        if brotherfuck > 0:pl'<<brotherfuck>> - Number of times you''ve had sex with your brother'
 
 	end
 end

+ 37 - 37
locations/poli.qsrc

@@ -60,43 +60,43 @@ if $ARGS[0] = 'start':
 		act 'Ask the doctor to treat your pains (1:00)':
 			cla
 			minut += 60
-			if pain['head'] > 0:pain['head'] += rand(7,13)
-			if pain['hair'] > 0:pain['hair'] += rand(7,13)
-			if pain['ears'] > 0:pain['ears'] += rand(7,13)
-			if pain['eyebrows'] > 0:pain['eyebrows'] += rand(7,13)
-			if pain['eyes'] > 0:pain['eyes'] += rand(7,13)
-			if pain['cheeks'] > 0:pain['cheeks'] += rand(7,13)
-			if pain['nose'] > 0:pain['nose'] += rand(7,13)
-			if pain['mouth'] > 0:pain['mouth'] += rand(7,13)
-			if pain['lips'] > 0:pain['lips'] += rand(7,13)
-			if pain['tongue'] > 0:pain['tongue'] += rand(7,13)
-			if pain['throat'] > 0:pain['throat'] += rand(7,13)
-			if pain['neck'] > 0:pain['neck'] += rand(7,13)
-			if pain['back'] > 0:pain['back'] += rand(7,13)
-			if pain['asscheeks'] > 0:pain['asscheeks'] += rand(7,13)
-			if pain['asshole'] > 0:pain['asshole'] += rand(7,13)
-			if pain['hips'] > 0:pain['hips'] += rand(7,13)
-			if pain['thighs'] > 0:pain['thighs'] += rand(7,13)
-			if pain['legL'] > 0:pain['legL'] += rand(7,13)
-			if pain['legR'] > 0:pain['legR'] += rand(7,13)
-			if pain['feet'] > 0:pain['feet'] += rand(7,13)
-			if pain['toes'] > 0:pain['toes'] += rand(7,13)
-			if pain['shoulders'] > 0:pain['shoulders'] += rand(7,13)
-			if pain['armL'] > 0:pain['armL'] += rand(7,13)
-			if pain['armR'] > 0:pain['armR'] += rand(7,13)
-			if pain['hands'] > 0:pain['hands'] += rand(7,13)
-			if pain['fingers'] > 0:pain['fingers'] += rand(7,13)
-			if pain['chest'] > 0:pain['chest'] += rand(7,13)
-			if pain['breasts'] > 0:pain['breasts'] += rand(7,13)
-			if pain['nipples'] > 0:pain['nipples'] += rand(7,13)
-			if pain['ribs'] > 0:pain['ribs'] += rand(7,13)
-			if pain['tummy'] > 0:pain['tummy'] += rand(7,13)
-			if pain['pubic'] > 0:pain['pubic'] += rand(7,13)
-			if pain['vaginal'] > 0:pain['vaginal'] += rand(7,13)
-			if pain['labia'] > 0:pain['labia'] += rand(7,13)
-			if pain['clitoris'] > 0:pain['clitoris'] += rand(7,13)
-			if pain['urethra'] > 0:pain['urethra'] += rand(7,13)
-			if pain['cervix'] > 0:pain['cervix'] += rand(7,13)
+			if pain['head'] > 0:pain['head'] -= rand(7,13)
+			if pain['hair'] > 0:pain['hair'] -= rand(7,13)
+			if pain['ears'] > 0:pain['ears'] -= rand(7,13)
+			if pain['eyebrows'] > 0:pain['eyebrows'] -= rand(7,13)
+			if pain['eyes'] > 0:pain['eyes'] -= rand(7,13)
+			if pain['cheeks'] > 0:pain['cheeks'] -= rand(7,13)
+			if pain['nose'] > 0:pain['nose'] -= rand(7,13)
+			if pain['mouth'] > 0:pain['mouth'] -= rand(7,13)
+			if pain['lips'] > 0:pain['lips'] -= rand(7,13)
+			if pain['tongue'] > 0:pain['tongue'] -= rand(7,13)
+			if pain['throat'] > 0:pain['throat'] -= rand(7,13)
+			if pain['neck'] > 0:pain['neck'] -= rand(7,13)
+			if pain['back'] > 0:pain['back'] -= rand(7,13)
+			if pain['asscheeks'] > 0:pain['asscheeks'] -= rand(7,13)
+			if pain['asshole'] > 0:pain['asshole'] -= rand(7,13)
+			if pain['hips'] > 0:pain['hips'] -= rand(7,13)
+			if pain['thighs'] > 0:pain['thighs'] -= rand(7,13)
+			if pain['legL'] > 0:pain['legL'] -= rand(7,13)
+			if pain['legR'] > 0:pain['legR'] -= rand(7,13)
+			if pain['feet'] > 0:pain['feet'] -= rand(7,13)
+			if pain['toes'] > 0:pain['toes'] -= rand(7,13)
+			if pain['shoulders'] > 0:pain['shoulders'] -= rand(7,13)
+			if pain['armL'] > 0:pain['armL'] -= rand(7,13)
+			if pain['armR'] > 0:pain['armR'] -= rand(7,13)
+			if pain['hands'] > 0:pain['hands'] -= rand(7,13)
+			if pain['fingers'] > 0:pain['fingers'] -= rand(7,13)
+			if pain['chest'] > 0:pain['chest'] -= rand(7,13)
+			if pain['breasts'] > 0:pain['breasts'] -= rand(7,13)
+			if pain['nipples'] > 0:pain['nipples'] -= rand(7,13)
+			if pain['ribs'] > 0:pain['ribs'] -= rand(7,13)
+			if pain['tummy'] > 0:pain['tummy'] -= rand(7,13)
+			if pain['pubic'] > 0:pain['pubic'] -= rand(7,13)
+			if pain['vaginal'] > 0:pain['vaginal'] -= rand(7,13)
+			if pain['labia'] > 0:pain['labia'] -= rand(7,13)
+			if pain['clitoris'] > 0:pain['clitoris'] -= rand(7,13)
+			if pain['urethra'] > 0:pain['urethra'] -= rand(7,13)
+			if pain['cervix'] > 0:pain['cervix'] -= rand(7,13)
 			'The doctor guides you to a bed and tells you to lie down, after which he gives you a combined painkiller, steroid and vitamin shot.'
 			'You feel drowsy for a little while, but afterwards you feel a lot better. The shot sped up your aching body''s recovery by a lot, meaning the pain probably won''t come back nearly as strongly when the shot wears off.'
 

+ 1 - 1
locations/preSYS.qsrc

@@ -316,7 +316,7 @@ if $ARGS[0] = 'charselect':
 				pcs_grades = 80
 				pcs_compskl = 40
 				pcs_comphckng = 20
-				pcs_ttgmng = 30
+				pcs_gaming = 30
 				internet = 20
 				npc_rel['A152'] += 10
 				npc_rel['A153'] += 10

+ 7 - 7
locations/preSYS2.qsrc

@@ -440,7 +440,7 @@ if $ARGS[0] = 'modskl_spo':
 	gs 'preSYS2', 'modrel_setup2', 'pcs_shoot', 'Marskmanship'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_chess', 'Chess'
 	gs 'preSYS2', 'modrel_setup2', 'pcs_icesktng', 'Ice Skating'
-	gs 'preSYS2', 'modrel_setup2', 'pcs_ttgmng', 'Gaming'
+	gs 'preSYS2', 'modrel_setup2', 'pcs_gaming', 'Gaming'
 	'</table></center>'
 	nl
 
@@ -530,7 +530,7 @@ if $ARGS[0] = 'none':
 	pcs_shoot = 0
 	pcs_chess = 0
 	pcs_icesktng = 0
-	pcs_ttgmng = 0
+	pcs_gaming = 0
 	
 	!!Beauty Skills Reset
 	pcs_makupskl = 20
@@ -625,10 +625,10 @@ if $ARGS[0] = 'modrel_fam':
 	*nl
 	*nl
 	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
-	'<TR bgcolor=#ffffff><TD>Stepfather: <<npc_rel[''A28'']>></TD><TD><a href="exec:npc_rel[''A28''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A28''] += 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A28''] += 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A28''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A28''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A28''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
-	'<TR bgcolor=#ffffff><TD>Mother: <<npc_rel[''A29'']>></TD><TD><a href="exec:npc_rel[''A29''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A29''] += 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A29''] += 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A29''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A29''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A29''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
-	'<TR bgcolor=#ffffff><TD>Sister: <<npc_rel[''A33'']>></TD><TD><a href="exec:npc_rel[''A33''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A33''] += 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A33''] += 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A33''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A33''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A33''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
-	'<TR bgcolor=#ffffff><TD>Brother: <<npc_rel[''A34'']>></TD><TD><a href="exec:npc_rel[''A34''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A34''] += 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A34''] += 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A34''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A34''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A34''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD>Stepfather: <<npc_rel[''A28'']>></TD><TD><a href="exec:npc_rel[''A28''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A28''] -= 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A28''] -= 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A28''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A28''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A28''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD>Mother: <<npc_rel[''A29'']>></TD><TD><a href="exec:npc_rel[''A29''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A29''] -= 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A29''] -= 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A29''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A29''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A29''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD>Sister: <<npc_rel[''A33'']>></TD><TD><a href="exec:npc_rel[''A33''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A33''] -= 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A33''] -= 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A33''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A33''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A33''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD>Brother: <<npc_rel[''A34'']>></TD><TD><a href="exec:npc_rel[''A34''] = 0 & gt ''preSYS2'', ''modrel_fam''">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A34''] -= 10 & gt ''preSYS2'', ''modrel_fam''">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''A34''] -= 5 & gt ''preSYS2'', ''modrel_fam''">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A34''] += 5 & gt ''preSYS2'', ''modrel_fam''">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''A34''] += 10 & gt ''preSYS2'', ''modrel_fam''">plus 10</a></TD><TD><a href="exec:npc_rel[''A34''] = 100 & gt ''preSYS2'', ''modrel_fam''">100</a></TD>'
 	'</table></center>'
 	act 'Return': gt 'preSYS2','modrel'
 end
@@ -637,7 +637,7 @@ end
 if $ARGS[0] = 'modrel_setup':
 	if npc_rel['<<$ARGS[1]>>'] < 0: npc_rel['<<$ARGS[1]>>'] = 0
 	if npc_rel['<<$ARGS[1]>>'] > 100: npc_rel['<<$ARGS[1]>>'] = 100
-	'<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''preSYS2'', $metka">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''preSYS2'', $metka">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''preSYS2'', $metka">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''preSYS2'', $metka">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''preSYS2'', $metka">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''preSYS2'', $metka">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''preSYS2'', $metka">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''preSYS2'', $metka">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''preSYS2'', $metka">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''preSYS2'', $metka">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''preSYS2'', $metka">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''preSYS2'', $metka">100</a></TD>'
 end
 
 if $ARGS[0] = 'modrel_pop':

+ 8 - 8
locations/qwBarBilliard.qsrc

@@ -262,20 +262,20 @@ if $ARGS[0] = 'billiard_ev1':
 								act 'Return to the bar': gt 'qwBarPolet'
 							end
 
-							if pcs_dom >= 30 and pcs_exhibition >= 50:
+							if pcs_dom >= 30 and exhibitionist_lvl > 1:
 								$martinpos = 'But I want to'
 							elseif pcs_horny >= 80 and pcs_inhib >= 30:
 								$martinpos = 'I''ll do it if you want me to'
 							end
 
-							if (pcs_horny >= 80 and pcs_exhibition >= 30) or (pcs_dom >= 30 and pcs_exhibition >= 50):
+							if (pcs_horny >= 80 and exhibitionist_lvl > 0) or (pcs_dom >= 30 and exhibitionist_lvl > 1):
 								act '<<$martinpos>>':
 									cls
 									'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poolm1.jpg"></center>'
 									gs 'boyStat', 'A216'
 									npc_rel['A216'] += 1
 
-									if pcs_horny >= 80 and pcs_exhibition >= 30:
+									if pcs_horny >= 80 and exhibitionist_lvl > 0:
 										'"Oh, I think you <b>do</b> want it here and now," you say coyly as you unbutton Martin''s pants, "and I want to, too." You can see him tense, see that he is torn between his own rules and his lust for you, but in that moment your hand reaches into his underpants and your fingers close around his impressive length, the battle is over.'
 									else
 										'"Are you sure? I would do it if you asked me to."'
@@ -295,10 +295,10 @@ if $ARGS[0] = 'billiard_ev1':
 									act 'Make Martin come':
 										cls
 										'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poolm2.jpg"></center>'
-										if pcs_exhibition <= 30:
-											pcs_exhibition += rand(0,2)
+										if exhibitionist_lvl > 0:
+											pcs_exhib += rand(0,2)
 										else
-											pcs_exhibition += rand(0,1)
+											pcs_exhib += rand(0,1)
 										end
 										'You are giving Martin the best blowjob you can, working him over with your mouth, tongue and hand to make him shoot his load quickly. And you seem to be doing something right, cause Martin is starting to tense.'
 										'As Martin groans quietly, moments away from climax, you become acutely aware of the heat between your legs. The forbidden nature of what you''re doing apparently isn''t lost on your pussy, regardless of whether your conscious mind is turned on or scared.'
@@ -333,7 +333,7 @@ if $ARGS[0] = 'billiard_ev1':
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/bar/sex/pool/poold1.jpg"></center>'
 					gs 'npcgeneratec', 0, 'stranger', rand(18,35)
 					gs 'boyStat', $npclastgenerated
-					'Well, a bet is a bet. If you weren''t willing to do it, you shouldn''t have made the bet. At least that''s what''s going through your head as you get down on your knees in front of him. Even being in a separate room and hidden from sight, the fact that everything that''s between you and a whole bar full of people is a fluttering curtain ' + iif(pcs_exhibition<30,'terrifies','excites') + ' you.'
+					'Well, a bet is a bet. If you weren''t willing to do it, you shouldn''t have made the bet. At least that''s what''s going through your head as you get down on your knees in front of him. Even being in a separate room and hidden from sight, the fact that everything that''s between you and a whole bar full of people is a fluttering curtain ' + iif(exhibitionist_lvl < 1,'terrifies','excites') + ' you.'
 					'He has his pants unbuttoned in about two seconds and out comes his cock, standing at attention already and revealing his eagerness and anticipation.'
 					*nl
 					'You quickly take it into your mouth and start sucking it for all you are worth, looking to get this over with as quickly as you can. You use your hands to caress his shaft and fondle his balls as you suck his dick, and while could imagine yourself doing more pleasant things, the fact that you are blowing a stranger in public does have a slight effect on you.'
@@ -504,7 +504,7 @@ if $ARGS[0] = 'billiard_ev2':
 			!Erick Lewis as Victor, dark-skinned, charming, composed - https://de.pornhub.com/pornstar/erick-lewis http://wtfpass.com/models/eric-cfst30/2/
 			!Maxim (or anybody else - Edik?) as Artyom, fair-skinned, a little more brutish and lecherous - http://wtfpass.com/models/maxim-2/
 
-			!Sex progression? first strip teases, masturbation, then handjobs/blowjobs, sex, anal, DP - dependent on pcs_exhibition - caught in a specific act (blowjob? sex?) - each act is worth more
+			!Sex progression? first strip teases, masturbation, then handjobs/blowjobs, sex, anal, DP - dependent on pcs_exhib - caught in a specific act (blowjob? sex?) - each act is worth more
 			!Small scene variants where she only blows one of them, only has sex with one of them etc.
 
 

+ 1 - 1
locations/qwBarEncounters.qsrc

@@ -303,7 +303,7 @@ if $ARGS[0] = '':
 			act 'He might have a point - Finish your drink': gt 'qwBarPolet'
 		end
 		
-		if pcs_horny >= 70 or sub >= 20 or alko >= 5 or pcs_exhibition >= 40:
+		if pcs_horny >= 70 or sub >= 20 or alko >= 5 or exhibitionist_lvl > 1:
 			act 'Grind back against him':
 				cla
 				*clr

+ 6 - 6
locations/qwBarPolet.qsrc

@@ -113,7 +113,7 @@ if $ARGS[0] = '':
 
 		act 'Order a snack':
 			if cumloc[7] > 0 or cumloc[10] > 0 or cumloc[11] > 0 or cumloc[13] > 0 or cumloc[16] > 0:
-				if pcs_exhibition < 60:
+				if exhibitionist_lvl < 2:
 					mood -= rand(2,5)
 				else
 					pcs_horny += 5
@@ -121,11 +121,11 @@ if $ARGS[0] = '':
 				npc_rel['A216'] += 2
 				'Martin gives a stern look. "Don''t you think you should clean yourself up first?"'
 				*nl
-				if pcs_exhibition < 60 and pcs_inhib < 70:
+				if exhibitionist_lvl < 2 and pcs_inhib < 70:
 					'You are visibly covered in cum and Martin noticed it!'
 					*nl
 					'How embarrassing...'
-				elseif pcs_inhib >= 70 and pcs_exhibition < 60:
+				elseif pcs_inhib >= 70 and exhibitionist_lvl < 2:
 					'"Huh?" You look over to the mirror behind the bar and realize that you still have cum on your face.'
 					'"Oh! Didn''t notice that. Yeah you''re right, I should go wash that off," you say before excusing yourself.'
 				else
@@ -298,7 +298,7 @@ if $ARGS[0] = 'Ordering':
 	!Different Picture/s?!
 	'You go to the counter, sit down on one of the stools and, when the bartender notices you, ask: "Hey, could you bring me something to drink?"'
 	if cumloc[7] > 0 or cumloc[10] > 0 or cumloc[11] > 0 or cumloc[13] > 0 or cumloc[16] > 0:
-		if pcs_exhibition < 60:
+		if exhibitionist_lvl < 2:
 			mood -= rand(2,5)
 		else
 			pcs_horny += 5
@@ -306,11 +306,11 @@ if $ARGS[0] = 'Ordering':
 		npc_rel['A216'] += 2
 		'Martin gives a stern look. "Don''t you think you should clean yourself up first?"'
 		*nl
-		if pcs_exhibition < 60 and pcs_inhib < 70:
+		if exhibitionist_lvl < 2 and pcs_inhib < 70:
 			'You are visibly covered in cum and Martin noticed it!'
 			*nl
 			'How embarrassing...'
-		elseif pcs_inhib >= 70 and pcs_exhibition < 60:
+		elseif pcs_inhib >= 70 and exhibitionist_lvl < 2:
 			'"Huh?" You look over to the mirror behind the bar and realize that you still have cum on your face.'
 			'"Oh! Didn''t notice that. Yeah you''re right, I should go wash that off," you say before excusing yourself.'
 		else

+ 2 - 1
locations/saveupdater.qsrc

@@ -343,13 +343,14 @@ if $home_town = '':
 end
 
 !! exhibition to inhib
-if pcs_exhibition > 0 or exhibition_exp > 0:
+if exhibition_to_inhib = 0:
 	pcs_inhib = pcs_exhibition
 	inhib_exp = exhibition_exp
 	inhib_lvlst = pcs_exhibition
 	inhib_lvl = pcs_exhibition
 	killvar 'pcs_exhibition'
 	killvar 'exhibition_exp'
+	exhibition_to_inhib = 1
 end
 
 --- saveupdater ---------------------------------

+ 8 - 7
locations/seeporn.qsrc

@@ -72,7 +72,7 @@ act 'watch porn':
 
 					gs 'brother', 'brotherSexCount'
 
-					if brotherSexCount > 0 and brotherSex > 6 and evgenrand = 1:
+					if brotherSex > 6 and evgenrand = 1:
 						cls
 						minut += 5
 						pcs_horny += 10
@@ -84,7 +84,7 @@ act 'watch porn':
 						gs 'stat'
 						'Kolka tells guys that he should take you home.' 
 						'As soon as you leave the school building your brother whispers; "Let''s look for a quiet place, I''m still horny."' 
-						'Soon you find a secluded spot and Kolka says; "This looks good. Bend over."'
+						'Soon you find a secluded spot and Kolka says, "This looks good. Bend over."'
 						if rand1<5:'<center><img <<$set_imgh>> src="images/shared/sex/public/boysex.jpg"></center>'
 						if rand1>=5 and rand1<30:'<center><video autoplay loop src="images/shared/sex/public/publ1,<<rand(0,2)>>.mp4"></video></center>'
 						if rand1>=30:'<center><img <<$set_imgh>> src="images/shared/sex/public/publ1,<<rand(0,6)>>.jpg"></center>'
@@ -175,7 +175,7 @@ act 'watch porn':
 						gs 'cum_manage'
 						facial += 1
 
-						if brotherSex = 0:brotherSex = 1 & guy += 1
+						if brotherSex < 6:brotherSex = 6
 
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial22.jpg"></center>'
@@ -346,7 +346,7 @@ if $ARGS[0] = 'SeePornPalevo':
 
 			if rand1<30:'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/seeporn/sex/seepornblowbang.jpg"></center>'
 			if rand1>=30:'<center><video autoplay loop src="images/locations/pavlovsk/school/grounds/seeporn/sex/seepornbro0,<<rand(0,2)>>.mp4"></video></center>'
-			'Your sillence is taken as consent, Zhendos gets his dick out and pulls your face toward it, You dutifully wrapped your lips around it and began to suck.' 
+			'Your silence is taken as consent, Zhendos gets his dick out and pulls your face toward it, You dutifully wrapped your lips around it and began to suck.' 
 			'Your brother Kolka and Mishan also get their members out and stand around you, you start to masturbate and suck dick. You find the unusual and awkward situation a little exciting.'
 
 			act 'Suck':
@@ -379,8 +379,9 @@ if $ARGS[0] = 'SeePornPalevo':
 				sexpartkno = 1
 				gs 'cum_manage'
 				pcs_horny += 10
+				if brotherSex < 6:brotherSex = 6
 				gs 'stat'
-
+				
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/seeporn/sex/seepornbbcum.jpg"></center>'
 				'The boys don''t last long and cum right in your face, Soon almost all of your face is covered in a layer of sperm and it''s dripping on to your clothes. The boys laugh "That''s right, good girl".'
 
@@ -410,13 +411,13 @@ if $ARGS[0] = 'SeePornPalevo':
 
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/seeporn/sex/seeporndouble.jpg"></center>'
 			'You dutifully kneel in front of the guys, grab their hard dicks and start to push them into your mouth.'
-			'"I told you that she would take it in the mouth like a pro, and you didn''t believe me", laughs your brother. "Ok, no choking my sister".'
+			'"I told you that she would take it in the mouth like a pro, and you didn''t believe me", your brother laughs.'
 
 			act 'Suck':
 				cls
 				pcs_horny += 10
 				gs 'stat'
-
+				if brotherSex < 6:brotherSex = 6
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/seeporn/sex/seeporndouble2.jpg"></center>'
 				'You diligently continue to suck two dicks at the same time, the guys moaning and moving their hips trying to shove them into you deeper.' 
 				'Your brother is looking at you closely and with his hand down his pants, while loudly telling details about what a dirty whore you are.'

+ 2 - 2
locations/start.qsrc

@@ -25,7 +25,7 @@ else
 end
 $fname = 'Tahoma'
 fsize = 12
-$version = '0.7.2+ Ikaruga Mod.'
+$version = '0.7.3+ Ikaruga Mod.'
 
 opPRE = 1
 
@@ -33,7 +33,7 @@ opPRE = 1
 '<center>Version <b><<$version>></b></center>'
 '<center><font color="red"><b>Children under 18 years are strictly forbidden to play</b></font>'
 *nl
-'<b>* Ikaruga Mod Version 1 Based on lastest version of the game (0.7.2.3 - 2018-06-07) <a href="http://f95zone.com">F95 Zone</a> (External link) *</center></b>'
+'<b>* Ikaruga Mod Version 1 Based on lastest version of the game (0.7.2.3 - 2018-06-26) <a href="http://f95zone.com">F95 Zone</a> (External link) *</center></b>'
 '<center>Thanks for your support !.</center>'
 *nl
 '<center><img <<$set_imgh>> src="images/system/gl3.jpg" ></center>'

+ 73 - 84
locations/stat_display.qsrc

@@ -84,7 +84,7 @@ if pcs_sleep > 100: pcs_sleep = 100
 !!----------------image Extra messages, start--------------------------
 $stat_imgtool_msg=''
 $stat_imgextra_msg=''
-	
+
 if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 	!There are 3 display mode, with toobar / top / bottom, controlled by Enable_statimg_loc
 	if Enable_statimg_face = 0:
@@ -101,7 +101,7 @@ if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_body = 0 & gs ''$menu_obnovit''">◆Body</a>'
 		$img_temp = FUNC('$body_image','body')
 		if $img_temp ! null:  $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
-	end	
+	end
 
 	if Enable_statimg_coat = 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 1 & gs ''$menu_obnovit''">◇Coat</a>'
@@ -109,7 +109,7 @@ if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_coat = 0 & gs ''$menu_obnovit''">◆Coat</a>'
 		$img_temp = FUNC('$body_image','coat')
 		if $img_temp ! null:  $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
-	end	
+	end
 
 	if Enable_statimg_cloth = 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 1 & gs ''$menu_obnovit''">◇Clothes</a>'
@@ -117,7 +117,7 @@ if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_cloth = 0 & gs ''$menu_obnovit''">◆Clothes</a>'
 		$img_temp = FUNC('$body_image','clothes')
 		if $img_temp ! null:  $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
-	end	
+	end
 
 	if Enable_statimg_bra = 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_bra = 1 & gs ''$menu_obnovit''">◇Bra</a>'
@@ -133,7 +133,7 @@ if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_panties = 0 & gs ''$menu_obnovit''">◆Panties</a>'
 		$img_temp = FUNC('$body_image','panties')
 		if $img_temp ! null:  $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
-	end	
+	end
 
 	if Enable_statimg_shoes = 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 1 & gs ''$menu_obnovit''">◇Shoes</a>'
@@ -141,9 +141,9 @@ if Enable_showstatimg = 1 or Enable_statimg_loc > 0:
 		$stat_imgtool_msg += ' <a href="exec:Enable_statimg_shoes = 0 & gs ''$menu_obnovit''">◆Shoes</a>'
 		$img_temp = FUNC('$body_image','shoes')
 		if $img_temp ! null:  $stat_imgextra_msg += '<a href="exec:view ''<<$img_temp>>''"><img <<$set_statimgh>> src="<<$img_temp>>"></a> '
-	end	
+	end
 	$stat_imgtool_msg += ' <a href="exec:gs ''Cheatmenu_din'' & Enable_settingmode = 1 & dynamic $cheatmenu[''display'']">◎Setting</a>'
-	
+
 end
 !!----------------image Extra messages, end --------------------------
 
@@ -171,7 +171,7 @@ if bankAccount = 0 and stolmoney = 0:
 else
 	!combine money status to single line
 	$stat_msg += '<BR><<$pockets>>: <b><<money>> ₽</b>'
-	if stolmoney > 0: $stat_msg += ', Drawer <b><<stolmoney>> ₽</b>'	
+	if stolmoney > 0: $stat_msg += ', Drawer <b><<stolmoney>> ₽</b>'
 	if bankAccount = 1:
 		if karta >= 0:
 			$stat_msg += ', Bank: <b><<karta>> ₽</b>'
@@ -315,7 +315,7 @@ else
 		end
 		gs 'indik', '1', pcs_apprnc / 2, pcs_apprnc
 		$stat_extra_msg += '<BR><<$ind>> Attractiveness'
-	
+
 		if SchoolAtestat = 0 and StoryLine > 0:
 			gs 'indik', '1', pcs_grades, pcs_grades
 			$stat_extra_msg += '<BR><<$ind>> School Grades'
@@ -328,7 +328,7 @@ else
 			gs 'indik', '1', pcs_heels, pcs_heels
 			$stat_extra_msg += '<BR><<$ind>> Heels skill'
 		end
-		$stat_extra_msg += '<BR>' 
+		$stat_extra_msg += '<BR>'
 	end
 end
 killvar '$st_temp'
@@ -409,16 +409,16 @@ else
 		if pcs_servng > 0: gs 'show_table', '<<pcs_servng>> Serving', '2'
 		if pcs_medcn > 0: gs 'show_table', '<<pcs_medcn>> Medicine', '2'
 		if workPTU > 1: gs 'show_table','<<teachlevel>> Teacher credibility','2'
-	end	
+	end
 	!skip if this is first message
-	if $stat_extra_msg ! null: 
+	if $stat_extra_msg ! null:
 		$stat_extra_msg += '<br><a href="exec:Enable_showskill = 0 & gs ''$menu_obnovit''">▲Skills:</a> <<$stat_sktool_msg>>'
 	else
 		$stat_extra_msg += '<br><<$stat_sktool_msg>>'
 	end
 	if st_count > 0 :
 		$stat_extra_msg += '<BR><TABLE BORDER=1><<$show_table>></TR></TABLE>'
-	end	
+	end
 end
 
 killvar 'stat_sktool_msg'
@@ -472,9 +472,9 @@ if Enable_statimg_loc = 0:
 	if Enable_showstatimg = 0:
 		$stat_tool_msg += ' <a href="exec:Enable_showstatimg = 1 & gs ''$menu_obnovit''">▽Image</a>'
 	else
-		$stat_tool_msg += ' <a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image</a>'	
+		$stat_tool_msg += ' <a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image</a>'
 		!skip if this is first message
-		if $stat_extra_msg ! null: 
+		if $stat_extra_msg ! null:
 			$stat_extra_msg += '<br><a href="exec:Enable_showstatimg = 0 & gs ''$menu_obnovit''">▲Image:</a> <<$stat_imgtool_msg>>'
 		else
 			$stat_extra_msg += '<br><<$stat_imgtool_msg>>'
@@ -668,35 +668,42 @@ end
 
 if lactate = 1 and night_mode = 0:
 	if lactatemv >= lactatemm-1:
-			$stat_msg += '<BR><font color = black>Your breasts are so full they hurt and a little milk is constantly dribbling out.</font><BR>'
-		elseif lactatemv > lactatemm*9/10:
-			$stat_msg += '<BR><font color = black>Your breasts are firm and full, and starting to hurt from all the milk they contain.</font><BR>'
-		elseif lactatemv > lactatemm*3/4:
-			$stat_msg += '<BR><font color = black>Your breasts feel firm and heavy, full of milk.</font><BR>'
-		elseif lactatemv > lactatemm/2:
-			$stat_msg += '<BR><font color = black>Your breasts are heavy, a cargo of milk inside.</font><BR>'
-		elseif lactatemv > lactatemm/4:
-			$stat_msg += '<BR><font color = black>Your breasts feel a little heavy.</font><BR>'
-		elseif lactatemv > 0:
-			$stat_msg += '<BR><font color = black>Your breasts tingle a little from the feeling of milk production.</font><BR>'
-		else
-			$stat_msg += '<BR><font color = black>Your breasts feel soft and empty.</font><BR>'
-	end
-elseif lactate = 1 and night_mode = 1:
-	if lactatemv >= lactatemm-1:
-			$stat_msg += '<BR><font color = white>Your breasts are so full they hurt and a little milk is constantly dribbling out.</font><BR>'
-		elseif lactatemv > lactatemm*9/10:
-			$stat_msg += '<BR><font color = white>Your breasts are firm and full, and starting to hurt from all the milk they contain.</font><BR>'
-		elseif lactatemv > lactatemm*3/4:
-			$stat_msg += '<BR><font color = white>Your breasts feel firm and heavy, full of milk.</font><BR>'
-		elseif lactatemv > lactatemm/2:
-			$stat_msg += '<BR><font color = white>Your breasts are heavy, a cargo of milk inside.</font><BR>'
-		elseif lactatemv > lactatemm/4:
-			$stat_msg += '<BR><font color = white>Your breasts feel a little heavy.</font><BR>'
-		elseif lactatemv > 0:
-			$stat_msg += '<BR><font color = white>Your breasts tingle a little from the feeling of milk production.</font><BR>'
+		if lact_engorgement > 3 and lact_engorgement <= 6:
+			$stat_msg += '<BR><font color = red>Your breasts are so full they hurt and you can feel milk seeping out.</font><BR>'
+		elseif lact_engorgement > 6:
+			$stat_msg += '<BR><font color = red>Your breasts are so full they hurt and you can feel your milk spraying out.</font><BR>'
 		else
-			$stat_msg += '<BR><font color = white>Your breasts feel soft and empty.</font><BR>'
+			$stat_msg += '<BR><font color = orange>Your breasts are so full they hurt.</font><BR>'
+		end
+		if $clothingworntype = 'nude' and lactatemess > 0:
+			if lactatemess < 3:
+				$stat_msg += ''+iif(night_mode = 1,'<font color = white>','<font color = black>')+'You have a little milk residue around your nipples.</font>'
+			elseif lactatemess < 7:
+				$stat_msg += '<font color = orange>You have a lot of milk residue around your nipples.</font>'
+			else
+				$stat_msg += '<font color = red>Your breasts are drenched with milk residue.</font>'
+			end
+		elseif lactatemess > 0:
+			if lactatemess < 3:
+				$stat_msg += '<font color = orange>You have tiny wet spots on your clothes above your nipples.</font>'
+			elseif lactatemess < 7:
+				$stat_msg += '<font color = red>Milk has soaked through your clothes and made visible circles on your breasts.</font>'
+			else
+				$stat_msg += '<font color = red>Your shirt is drenched with milk from your breasts.</font>'
+			end
+		end
+	elseif lactatemv > lactatemm*9/10:
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts are firm and full, and starting to hurt from all the milk they contain.</font><BR>'
+	elseif lactatemv > lactatemm*3/4:
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts feel firm and heavy, full of milk.</font><BR>'
+	elseif lactatemv > lactatemm/2:
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts are heavy, a cargo of milk inside.</font><BR>'
+	elseif lactatemv > lactatemm/4:
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts feel a little heavy.</font><BR>'
+	elseif lactatemv > 0:
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts tingle a little from the feeling of milk production.</font><BR>'
+	else
+		$stat_msg += '<BR>'+iif(night_mode = 1,'<font color = white>','<font color = black>')+'Your breasts feel soft and empty.</font><BR>'
 	end
 end
 
@@ -773,7 +780,7 @@ if arrsize('sparrvol') > 0:
 						j = 3
 					end
 				end
-				
+
 				cumvolume['<<i>>:<<j>>'] += sparrvol[idx]
 				if sparrvol[idx] > 0:
 					if sparridt[idx] = 0:
@@ -811,29 +818,29 @@ killvar 'cumloc'
 
 i = 0
 :cumlocloop
-	if i = 0: 
+	if i = 0:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/creampie/cumpussy'+rand(1,14)+'.jpg''">pussy</a>'
-	elseif i = 1: 
+	elseif i = 1:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumpussy/cumpus'+rand(1,4)+'.jpg''">labia</a>'
-	elseif i = 2: 
+	elseif i = 2:
 		$txtloc = 'the front of your panties'
-	elseif i = 3: 
+	elseif i = 3:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumanal/cumanal'+rand(1,11)+'.jpg''">ass</a>'
-	elseif i = 4: 
+	elseif i = 4:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumass/cumass'+rand(1,6)+'.jpg''">butt</a>'
-	elseif i = 5: 
+	elseif i = 5:
 		$txtloc = 'the back of your panties'
-	elseif i = 6: 
+	elseif i = 6:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumclothes/'+rand(1,3)+'.jpg''">clothes near your groin</a>'
-	elseif i = 7: 
+	elseif i = 7:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumclothes/cumclothes'+rand(1,21)+'.jpg''">clothes</a>'
-	elseif i = 8: 
+	elseif i = 8:
 		$txtloc = 'your back'
-	elseif i = 9: 
+	elseif i = 9:
 		$txtloc = 'your legs'
-	elseif i = 10: 
+	elseif i = 10:
 		$txtloc = 'your arms'
-	elseif i = 11: 
+	elseif i = 11:
 		if pcs_haircol = 0:
 			$cum_face_image = 'brown/'
 			$cum_face_image += rand(1, 31)
@@ -852,20 +859,20 @@ i = 0
 		end
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumface/<<$cum_face_image>>.jpg''">face</a>'
 		killvar 'cum_face_image'
-	elseif i = 13: 
+	elseif i = 13:
 		$txtloc = 'your hands'
-	elseif i = 14: 
+	elseif i = 14:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumbelly/cumbelly'+rand(1,12)+'.jpg''">stomach</a>'
-	elseif i = 15: 
+	elseif i = 15:
 		$txtloc = 'your <a href="exec:view''images/pc/body/cum/cumtits/cumtits'+rand(1,19)+'.jpg''">breasts</a>'
-	elseif i = 16: 
+	elseif i = 16:
 		$txtloc = 'your hair</a>'
-	elseif i = 17: 
+	elseif i = 17:
 		$txtloc = 'in your vagina in a slipped condom'
 	else
 		$txtloc = 'the gusset of your panties</a>'
 	end
-	
+
 	j = 0
 	:ageloop
 		if cumvolume['<<i>>:<<j>>'] > 0:
@@ -885,7 +892,7 @@ i = 0
 				!! residue amount, no leakage
 				$txtamount = 'Small '
 			end
-			
+
 			!! if sperm age stage is 4, it means inside the body
 			if j = 4:
 				if (vibratorIN = 1 and i = 0) or (analplugin = 1 and i = 3):
@@ -903,7 +910,7 @@ i = 0
 						$txtproxy = 'seeping out of '
 					else
 						$txtproxy = 'staying inside of '
-					end	
+					end
 				end
 			elseif j >= 5:
 			!! if sperm age stage is over 4, meaning in condom
@@ -935,7 +942,7 @@ i = 0
 					$txtproxy += 'powderly '
 				end
 			end
-			
+
 			$txtperson = ''
 			if cumcount['<<i>>:<<j>>'] = 0:
 				$txtiscum = 'some whitish substance '
@@ -1019,25 +1026,6 @@ killvar 'cumcount'
 killvar 'knownguy'
 killvar 'cumowner'
 
-
-if $clothingworntype = 'nude' and lactatemess > 0:
-	if lactatemess < 3:
-		$stat_msg += '<BR><font color = black>You have a little milk residue around your nipples.</font>'
-	elseif lactatemess < 7:
-		$stat_msg += '<BR><font color = black>You have a lot of milk residue around your nipples.</font>'
-	else
-		$stat_msg += '<BR><font color = black>Your breasts are drenched with milk residue.</font>'
-	end
-elseif lactatemess > 0:
-	if lactatemess < 3:
-		$stat_msg += '<BR><font color = black>You have tiny wet spots on your clothes above your nipples.</font>'
-	elseif lactatemess < 7:
-		$stat_msg += '<BR><font color = black>Milk has soaked through your clothes and made visible circles on your breasts.</font>'
-	else
-		$stat_msg += '<BR><font color = black>Your shirt is drenched with milk from your breasts.</font>'
-	end
-end
-
 if Gerpes >= 10 and GenHerpes = 1:
 	$stat_msg += '<BR><b><font color="red">On your pussy sores have appeared. This is genital herpes.</font></b>'
 elseif Gerpes >= 5 and GenHerpes =1:
@@ -1341,3 +1329,4 @@ end
 
 --- stat_display ---------------------------------
 
+>>>>>>> 48c11b415a2f0467c4e8bcf088acba01ca5cc362

+ 4 - 4
locations/stat_sklattrib.qsrc

@@ -63,7 +63,7 @@ $skl_name[10] = 'danc'
 $skl_name[11] = 'dancero'
 $skl_name[12] = 'dancpol'
 $skl_name[13] = 'chess'
-$skl_name[14] = 'ttgmng'
+$skl_name[14] = 'gaming'
 $skl_name[15] = 'humint'
 $skl_name[16] = 'persuas'
 $skl_name[17] = 'run'
@@ -114,7 +114,7 @@ $traitattskl[2] = 'schlrly'
 if attsklupdate = 0:
 	i = 0 & x = 1
 	:rstloop
-	expadj = 60
+	expadj = func('_difficulty','getexpadj')
 	tl = 0
 	:trtrstloop
 	tltp = 0
@@ -176,7 +176,7 @@ if $ARGS[0] = 'daycall':
 	:degloop
 	degadj = 60
 	if x = 2: degadj += 30
-	expadj = 60
+	expadj = func('_difficulty','getexpadj')
 	tl = 0
 	:trtdegloop
 	tltp = 0
@@ -241,7 +241,7 @@ end
 !!Advancement Loop
 i = 0 & x = 1
 :advloop
-expadj = 60
+expadj = func('_difficulty','getexpadj')
 tl = 0
 :trtadvloop
 tltp = 0

+ 2 - 2
locations/stat_sklattrib_lvlset.qsrc

@@ -91,8 +91,8 @@ pcs_chess = (chess_lvl + pcs_intel) / 2 + (5 * logictrt)
 chess[1] = 3 & chess[2] = -1
 
 !!Gaming; Abstracts skills at all types of Table Top games
-pcs_ttgmng = (ttgmng_lvl + (2 * pcs_intel + pcs_react) / 3) / 2
-ttgmng[1] = 3 & ttgmng[2] = 4 & ttgmng[3] = -1
+pcs_gaming = (gaming_lvl + (2 * pcs_intel + pcs_react) / 3) / 2
+gaming[1] = 3 & gaming[2] = 4 & gaming[3] = -1
 
 !!People skills; basic human interaction skill set
 pcs_humint = (humint_lvl + (pcs_prcptn + pcs_chrsm + pcs_react)/3) / 2 + (5 * chrmng) - (5 * meantrt)

+ 6 - 6
locations/therapist.qsrc

@@ -452,10 +452,10 @@ if $ARGS[0] = 'hypnoEnd':
 	elseif hypnoTime < 10:
 		hypnoAddict = 1
 		hypnoDay = daystart
-		exhibition_exp += (100+sub-pcs_dom)/25+1
+		pcs_exhib += (100+sub-pcs_dom)/25+1
 		inhib_exp += (100+sub-pcs_dom)/25+1
-		pain['vaginal'] += 5
-		pain['asshole'] += 5
+		pain['vaginal'] -= 5
+		pain['asshole'] -= 5
 		pcs_horny = 40
 		'When you wake up, you see your therapist smiling.'
 		'"Very good, Miss <<$pcs_lastname>>. How do you feel?"'
@@ -464,10 +464,10 @@ if $ARGS[0] = 'hypnoEnd':
 	else
 		hypnoAddict = 2
 		hypnoDay = daystart
-		exhibition_exp += (100+sub-pcs_dom)/25+2
+		pcs_exhib += (100+sub-pcs_dom)/25+2
 		inhib_exp += (100+sub-pcs_dom)/25+1
-		pain['vaginal'] += 5
-		pain['asshole'] += 5
+		pain['vaginal'] -= 5
+		pain['asshole'] -= 5
 		pcs_horny = 60
 		'When you wake up, you see your therapist fixing his shirt.'
 		'"Miss <<$pcs_lastname>>, how do you feel right now?"'

+ 61 - 2
locations/traits.qsrc

@@ -5,8 +5,67 @@ if $ARGS[0] = 'menu':
 	pl '<center>Traits Menu</center>'
 	pl'<a href="exec:gs ''stat''">Leave</a>'
 	nl
-!!	pl '<b>Bimbo</b>'
-
+	pl '<b>Bimbo</b>'
+	if bimbolevel = 0:
+		pl 'You do not have this trait.'
+		pl 'To gain this trait you must wear bimbo clothing / shoes for a few days.'
+		pl 'You have <<bimbo>> out of 10 points towards level 1.'
+	elseif bimbolevel = 1:
+		pl 'You have this trait at level 1.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a very small bonus to appearance and a very small penalty to intelligence.'
+		pl 'You have <<bimbo>> out of 20 points towards level 2.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	elseif bimbolevel = 2:
+		pl 'You have this trait at level 2.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a small bonus to appearance and a small penalty to intelligence.'
+		pl 'You have <<bimbo>> out of 30 points towards level 3.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	else
+		pl 'You have this trait at level 3.'
+		pl 'To maintain this trait you must wear bimbo clothing / shoes and/or have regular sex.'
+		pl 'Due to this trait you gain a moderate bonus to appearance and a moderate penalty to intelligence.'
+		if bimbowithdrawal = 0:
+			pl 'You are not in withdrawal.'
+		else
+			pl 'You have <<bimbowithdrawal>> out of 30 points towards losing this trait.'
+		end
+	end
+	nl
+	pl '<b>Exhibitionist</b>'
+	if Exhibitionist_lvl = 0:
+		pl 'You do not have this trait.'
+		pl 'To gain this trait you must have low enough inhibition and choose to expose your breasts in public.'
+		pl 'You have <<pcs_exhib>> out of 10 points towards level 1. This will slowly decrease each day unless you expose yourself.'
+    elseif Exhibitionist_lvl = 1:
+		pl 'You have this trait at level 1.'
+		pl 'To increase this trait you must choose to expose your breasts and/or bare bottom in public.'
+		pl 'This trait grants you a small amount or excitement from exposing yourself.'
+		pl 'You have <<pcs_exhib>> out of 50 points towards level 2.'
+    elseif Exhibitionist_lvl = 2:
+		pl 'You have this trait at level 2.'
+		pl 'To increase this trait you must choose to expose your breasts, bare bottom and/or pussy in public.'
+		pl 'This trait grants you a moderate amount or excitement from exposing yourself.'
+		if pcs_exhib < 100:
+			pl 'You have <<pcs_exhib>> out of 100 points towards level 3.'
+		else
+			pl 'You must trigger an event in the park to gain level 3.'
+		end
+    else
+		pl 'You have this trait at level 3.'
+		pl 'This is the highest level of this trait.'
+		pl 'This trait grants you a large amount or excitement from exposing yourself.'
+    end
+	nl
 	pl '<b>Cumeater</b>'
 	if trt_cumeater = 0:
 		pl 'You do not have this trait.'

+ 1 - 2
locations/ugol.qsrc

@@ -20,8 +20,7 @@ if pcs_horny >= 90 and pcs_inhib > 30:
 			'Feeling desperate for release you hitch up your skirt above your waist.'
 		end
 		if $pantyworntype ! 'none': 'You are distracted by your wet panties sticking to you, your arousal keeping your pussy soaking wet. Looking around once more to make sure you are alone, you pull down your panties a bit to expose your pussy.'
-		exhibition_exp += rand(1,3)
-		inhib_exp += rand(1,3)
+		pcs_exhib += rand(1,3)
         pcs_sweat += 20
         'Then you begin to rub your clit, at first in slow soft circles but you quickly feel yourself building up to an orgasm, you bite your lip to keep from crying out as you start rubbing your clit with urgency. A massive shudder runs through your body as you orgasm, your soft cries of ecstasy echoing in the corridor. Getting dressed and blushing slightly you check once more to make sure you are along. You hope no one heard you, as you quickly leave.'
        

+ 1 - 2
locations/ugol1.qsrc

@@ -7,8 +7,7 @@ act 'Masturbate':
 	'You leaned back against the fence, noticing the area was completely deserted.'
 	'You are distracted by your wet panties sticking to you, your arousal keeping your pussy soaking wet. Looking around once more to make sure you are alone, you pull down your panties a bit to expose your pussy.'
 	
-	if pcs_exhibition < 30:exhibition_exp += rand(1,3)
-	inhib_exp += rand(1,3)
+	pcs_exhib += rand(1,3)
 	gs'stat'
 	'Then you begin to rub your clit, at first in slow soft circles but you quickly feel yourself building up to a orgasm, you bite your lip to keep from crying out as you start rubbing your clit with urgency. A massive shudder runs through your body as you orgasm, your soft cries muffled by your own hand over your mouth. Getting dressed and blushing slightly you check once more to make sure you are alone. You hope no one heard you, as you quickly leave.'
 

+ 5 - 1
locations/zaprF.qsrc

@@ -16,7 +16,11 @@ if $ARGS[0] = 'start':
 	'The petrol price is 30 <b>₽</b> per liter.'
 	*nl
 
-	if hour < 9:
+	if temper < 10:
+		'It''s too cold outside to wash cars. You''re more likely to get ill than make money. Maybe try again when the weather is warmer?'
+	elseif sunWeather = 0:
+		'You can''t wash cars if it''s raining outside! Maybe try again on a sunny day?'
+	elseif hour < 9:
 		'It''s too early to wash cars.'
 	elseif hour > 19:
 		'It''s too late to wash cars.'

+ 777 - 173
locations/zaprFWash.qsrc

@@ -1,4 +1,6 @@
 # zaprFWash
+! most complete comments for how the code works can be found in 'wash', 'titsFlash', 'runback', and 'punishSpank'
+! most other code in here are just variations of those sections
 
 if $ARGS[0] = 'start':
 	$metka = 'start'
@@ -6,138 +8,506 @@ if $ARGS[0] = 'start':
 	cla
 	clr
 
-	if temper < 10:
-		'It''s too cold you''re more likely to get ill than make money, maybe try when the weather is a bit nicer?'
-		act 'Return':gt 'zaprF', 'start'
-	elseif (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
+	! can''t wash cars if have visible cum already
+	if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
 		minut += 5
-		'The gas station worker chases you away: "Go wash yourself off first at least, whore!"'
+		mood -= 5
+		pav_sex += rand(0,2)
+		
+		'The gas station worker chases you away: "At least go wash yourself off first, whore!"'
+		
+		act 'Go to the toilet':gt 'zaprF', 'toilet'
 		act 'Leave':gt 'zaprF', 'start'
 	else
-		if (PCloBimbo = 1 or PCloStyle = 4) and pcs_apprnc >= 60:
-			minut += 60
-			pcs_sweat += 2
-			money += 100
-			skimpyCustomerChance = rand(1, 100)
-
-			if skimpyCustomerChance > 30:
-				gt 'zaprFWash', 'titsQ'
-			else
-				gt 'zaprFWash', 'wash'
-			end
-
-		else
-			minut += 60
-			pcs_sweat += 2
-			money += 80
-			gt 'zaprFWash', 'wash'
-		end
+		gt 'zaprFWash', 'wash'
 	end
 end
 
 if $ARGS[0] = 'wash':
+	! only wearing bimbo or prostitute clothing and looking good can get propositioned by a customer
 	if PCloBimbo = 1 or PCloStyle = 4:
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
-		'You washed the windows of several cars and earned 100 <b>₽</b>.'
+		
+		minut += 60
+		mood -= 5
+		pcs_sweat += 2
+		
+		if pcs_apprnc >= 60:
+			! slightly more money for wearing bimbo or prostitute clothing and looking good too
+			'You washed the windows of several cars and earned 100 <b>₽</b>.'
+			money += 100
+			
+			! min chance of 20 percent; max chance of 80 percent; percent chance scales with pav_prostitute and/or pav_sex
+			! as your repuation increases you will be asked more often
+			! reputation effects are delayed by 30 because thats the delay in fame as well
+			skimpyCustomerChance = rand(1, 100)
+			if skimpyCustomerChance <= min(max(20,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),80):
+				'As you finish washing another car, the driver walks up to you to give you a tip. From the way he''s looking at you, it''s obvious he''s interested in something more as well.'
+				! starts off with always doing titsQ when rep is low, as rep increases they may skip a question since they know you will do it anyway
+				! also different people have different tastes so you wont be asked the same thing in the same order every time by every customer that walks up to you
+				carwashscene = rand(1, 100)
+				if carwashscene <= min(max(25,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),50) and carwashscene >= 25:
+					gt 'zaprFWash', 'assQ'
+				elseif carwashscene <= min(max(50,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),65) and carwashscene >= 50:
+					gt 'zaprFWash', 'pussyQ'	
+				elseif carwashscene <= min(max(65,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),85) and carwashscene >= 65:	
+					gt 'zaprFWash', 'handQ'
+				elseif carwashscene <= min(max(85,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),100) and carwashscene >= 85:	
+					gt 'zaprFWash', 'blowQ'
+				else
+					gt 'zaprFWash', 'titsQ'
+				end
+			else
+				! can flash now at the gas station without leading to sex still need to meet inhibition or horny requirements to unlock actions
+				if pcs_inhib >= 10 or pcs_horny >= 10: act 'Flash your tits at passing cars':gt 'zaprFWash', 'titsFlash', 'Free', 'Flash'
+				if pcs_inhib >= 15 or pcs_horny >= 15: act 'Flash your ass at passing cars':gt 'zaprFWash', 'assFlash', 'Free', 'Flash'
+				if pcs_inhib >= 20 or pcs_horny >= 20: act 'Flash your pussy at passing cars':gt 'zaprFWash', 'pussyFlash', 'Free', 'Flash'
+				act 'Continue':gt 'zaprF', 'start'
+			end
+		else
+			! slightly more money for wearing bimbo or prostitute clothing but not looking too great
+			'You washed the windows of several cars and earned 80 <b>₽</b>.'
+			money += 80
+			
+			! can flash now at the gas station without leading to sex still need to meet inhibition or horny requirements to unlock actions
+			if pcs_inhib >= 10 or pcs_horny >= 10: act 'Flash your tits at passing cars':gt 'zaprFWash', 'titsFlash', 'Free', 'Flash'
+			if pcs_inhib >= 15 or pcs_horny >= 15: act 'Flash your ass at passing cars':gt 'zaprFWash', 'assFlash', 'Free', 'Flash'
+			if pcs_inhib >= 20 or pcs_horny >= 20: act 'Flash your pussy at passing cars':gt 'zaprFWash', 'pussyFlash', 'Free', 'Flash'
+			act 'Continue':gt 'zaprF', 'start'
+		end
 	else
+		minut += 60
+		mood -= 5
+		pcs_sweat += 2
+		money += 60
+		
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/regular<<i>>.jpg"></center>'
-		'You washed the windows of several cars and earned 80 <b>₽</b>.'
+		
+		! normal money just for the car washing
+		'You washed the windows of several cars and earned 60 <b>₽</b>.'
+		
+		! can flash now if not wearing bimbo or prostitute clothing; just need to meet inhibition or horny requirements to unlock actions
+		if pcs_inhib >= 10 or pcs_horny >= 10: act 'Flash your tits at passing cars':gt 'zaprFWash', 'titsFlash', 'Free', 'Flash'
+		if pcs_inhib >= 15 or pcs_horny >= 15: act 'Flash your ass at passing cars':gt 'zaprFWash', 'assFlash', 'Free', 'Flash'
+		if pcs_inhib >= 20 or pcs_horny >= 20: act 'Flash your pussy at passing cars':gt 'zaprFWash', 'pussyFlash', 'Free', 'Flash'
+		act 'Continue':gt 'zaprF', 'start'
 	end
-	act 'Continue':gt 'zaprF', 'start'
 end
 
 if $ARGS[0] = 'titsQ':
 	i = rand(1, 4)
 	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
-	'You wash another car. The driver finishes filling his tank and walks up to you giving you some tips. It''s obvious he''s looking for something more.'
-	'Want to earn more? Show me your tits, girl. Theres 100 in it, easy money.'
-	act 'Agree and show him your tits':gt 'zaprFWash', 'titsFlash'
-	act 'Refuse':gt 'zaprF', 'start'
+	
+	'Want to earn some more cash, girl? Show me your tits. I''ll give you 100 <b>₽</b>. It''s easy money.'
+	
+	! inhibition or horny requirements needed to accept the offer or just have fun with him
+	if pcs_inhib >= 10 or pcs_horny >= 10: act 'Agree and show him your tits':gt 'zaprFWash', 'titsFlash', 'Paid', 'Question'
+	if pcs_inhib >= 15 or pcs_horny >= 15: act 'Show him your tits for free instead':gt 'zaprFWash', 'titsFlash', 'Free', 'Question'
+	act 'Refuse':gt 'zaprFWash', 'refuse'
 end
 
 if $ARGS[0] = 'assQ':
 	i = rand(1, 4)
 	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
-	'That was cool, girl. How about your ass, will another 100 convince you to show it to me?'
-	act 'Agree and show him your ass':gt 'zaprFWash', 'assFlash'
-	act 'Refuse':gt 'zaprF', 'start'
+	
+	'What a nice ass you have there. Let me see it. Will 100 <b>₽</b> convince you to show it to me?'
+	
+	! inhibition or horny requirements needed to accept the offer or just have fun with him
+	if pcs_inhib >= 15 or pcs_horny >= 15: act 'Agree and show him your ass':gt 'zaprFWash', 'assFlash', 'Paid', 'Question'
+	if pcs_inhib >= 20 or pcs_horny >= 20: act 'Show him your ass for free instead':gt 'zaprFWash', 'assFlash', 'Free', 'Question'
+	act 'Refuse':gt 'zaprFWash', 'refuse'
+end
+
+if $ARGS[0] = 'pussyQ':
+	i = rand(1, 4)
+	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
+	
+	'You look like a cool girl. Let me see your pussy. I''ll only look for 100 <b>₽</b>.'
+		
+	! inhibition or horny requirements needed to accept the offer or just have fun with him
+	if pcs_inhib >= 20 or pcs_horny >= 20: act 'Agree and show him your pussy':gt 'zaprFWash', 'pussyFlash', 'Paid', 'Question'
+	if pcs_inhib >= 25 or pcs_horny >= 25: act 'Show him your pussy for free instead':gt 'zaprFWash', 'pussyFlash', 'Free', 'Question'
+	act 'Refuse':gt 'zaprFWash', 'refuse'
+end
+
+if $ARGS[0] = 'handQ':
+	i = rand(1, 4)
+	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
+	
+	'Could you help me out girl? It''s getting tight down here in my pants just looking at you. How about you touch it a bit? I''ll pay you 200 <b>₽</b>.'
+	
+	! inhibition or horny requirements needed to accept the offer or just have fun with him
+	if pcs_inhib >= 25 or pcs_horny >= 25: act 'Agree and give him a handjob':gt 'zaprFWash', 'handjob', 'Paid'
+	if pcs_inhib >= 30 or pcs_horny >= 30: act 'Give him a handjob for free instead':gt 'zaprFWash', 'handjob', 'Free'
+	act 'Refuse':gt 'zaprFWash', 'refuse'
 end
 
 if $ARGS[0] = 'blowQ':
 	i = rand(1, 4)
 	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/bimboclean<<i>>.jpg"></center>'
-	'What a wonderful ass! I have a new problem now, girl. It''s getting tight down here, in my pants. How about you put your mouth to a good use? There is another 300 in it.'
-	act 'Agree and give him blowjob':gt 'zaprFWash', 'blowjob'
-	act 'Refuse':gt 'zaprF', 'start'
+	
+	'Looking hot today girl! How about you put your mouth to good use? I''ll pay you 200 <b>₽</b>.'
+	
+	! inhibition or horny requirements needed to accept the offer or just have fun with him
+	if pcs_inhib >= 30 or pcs_horny >= 30: act 'Agree and give him a blowjob':gt 'zaprFWash', 'blowjob', 'Paid', 'Question'
+	if pcs_inhib >= 35 or pcs_horny >= 35: act 'Give him a blowjob for free instead':gt 'zaprFWash', 'blowjob', 'Free', 'Question'
+	act 'Refuse':gt 'zaprFWash', 'refuse'
 end
 
+if $ARGS[0] = 'refuse':
+	! just being asked can slowly change your inhibitions which will enable a player to eventually agree to the questions above
+	if pcs_inhib < 35: inhib_exp += rand(1,2)
+	pcs_dom += 1
+	mood += 5
+	gs 'stat'
+	
+	'<center><video autoplay loop src="images/pc/no.mp4"></video></center>'
+	
+	'You begin to consider his offer but decide turn him down and walk away.'
+	
+	act 'Go back to washing cars':gt 'zaprF', 'start'
+end
+
+! $ARGS[1] = whether you got paid for this
+! $ARGS[2] = whether this act came from a customer question or just flashing for passing cars
 if $ARGS[0] = 'titsFlash':
-	money += 50
+	! reputation and money will depend on whether you were paid
+	if $ARGS[1] = 'Paid':
+		money += 50
+		pav_prostitute += rand(0,1)
+	elseif $ARGS[1] = 'Free':
+		pav_sex += rand(0,1)
+	end
+	if pcs_inhib < 30: inhib_exp += rand(2,4)
+	mood += 5
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 30:
-		i = rand(1, 3)
-		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/titsflash<<i>>.jpg"></center>'
+	! chance for using photos or videos
+	if gifornot < 50:
+		i = rand(1, 100)
+		! chance of using old pics since there are so many newer pics to choose from
+		if i < 15:
+			if PCloPants > 0:
+				! loop to sort through old pics since they are jumbled together in the folder but we want to display pics based on clothing
+				! will keep looping until it gets a photo with shorts/pants in it
+				:loop_tits_old_pics1
+				i = rand(1, 3)
+				if i = 2: jump 'loop_tits_old_pics1'
+				'<center><img <<$set_imgh>> src="images/locations/shared/carwash/titsflash<<i>>.jpg"></center>'
+			elseif PCloSkirt > 0:
+				! loop to sort through old pics since they are jumbled together in the folder but we want to display pics based on clothing
+				! will keep looping until it gets a photo with a skirt/dress in it
+				:loop_tits_old_pics2
+				i = rand(1, 3)
+				if i = 1 or i = 3: jump 'loop_tits_old_pics2'
+				'<center><img <<$set_imgh>> src="images/locations/shared/carwash/titsflash<<i>>.jpg"></center>'
+			end
+		else
+			! newer photos are more neatly organized into different folders so no looping needed
+			if PCloPants > 0:
+				i = rand(1, 14)
+				'<center><img <<$set_imgh>> src="images/pc/flashing/pants/outside/tits/<<i>>.jpg"></center>'
+			elseif PCloSkirt > 0:
+				i = rand(1, 12)
+				'<center><img <<$set_imgh>> src="images/pc/flashing/dress/outside/tits/<<i>>.jpg"></center>'
+			end
+		end
 	else
-		i = rand(1, 7)
-		'<center><video autoplay loop src="images/locations/shared/carwash/titsflash<<i>>.mp4"></video></center>'
+		if PCloPants > 0:
+			! loop to sort through old vids since they are jumbled together in the folder but we want to display vids based on clothing
+			! will keep looping until it gets a video with shorts/pants in it
+			:loop_tits_old_vids1
+			i = rand(1, 7)
+			if i = 4 or i = 6 or i = 7: jump 'loop_tits_old_vids1'
+			'<center><video autoplay loop src="images/locations/shared/carwash/titsflash<<i>>.mp4"></video></center>'
+		elseif PCloSkirt > 0:
+			! loop to sort through old vids since they are jumbled together in the folder but we want to display vids based on clothing
+			! will keep looping until it gets a video with a skirt/dress in it
+			:loop_tits_old_vids2
+			i = rand(1, 7)
+			if i = 1 or i = 2 or i = 3 or i = 5: jump 'loop_tits_old_vids2'
+			'<center><video autoplay loop src="images/locations/shared/carwash/titsflash<<i>>.mp4"></video></center>'
+		end
+	end
+	
+	! text differences depending on whether you were paid, whether you are flashing for a customer or for the cars on the road, and what type of clothing you are wearing
+	if $ARGS[1] = 'Paid':
+		if PCloPants > 0:'You lift up your top up and show him your breasts for a few seconds. Then you quickly cover up and take your money.'
+		if PCloSkirt > 0:'You pull down your top and show him your breasts for a few seconds. Then you quickly cover up and take your money.'
+	elseif $ARGS[1] = 'Free':
+		if $ARGS[2] = 'Question':
+			if PCloPants > 0:'You lift up your top up and show him your breasts for a few seconds. You give your breasts a little shake for him before you cover up.'
+			if PCloSkirt > 0:'You pull down your top and show him your breasts for a few seconds. You give your breasts a little shake for him before you cover up.'
+		elseif $ARGS[2] = 'Flash':
+			if PCloPants > 0:'You lift up your top up and expose your breasts to the road for a few seconds. A couple cars pass by and honk in appreciation. You give your breasts a little shake before you cover up.'
+			if PCloSkirt > 0:'You pull down your top and expose your breasts to the road for a few seconds. A couple cars pass by and honk in appreciation. You give your breasts a little shake before you cover up.'
+		end
 	end
-
-	'You quickly pull up your top up and show him your naked breasts for a few seconds. You then quickly cover up and take your money.'
 	gs 'arousal', 'flashlite', 5
 	gs 'stat'
-	if sub >= 30 or bimbolevel >= 1 or pcs_horny > 4:
-		act 'Continue':gt 'zaprFWash', 'assQ'
+	
+	! can only continue with more questions if flashing for a customer
+	! also more questions will require either sub or dom or bimbo or horny as well as bimbo or prostitute clothing
+	! this has a wide range of requirements so that many different types of characters can still play this content
+	if (sub >= 10 or pcs_dom >= 10 or bimbolevel >= 1 or pcs_horny >= 5) and (PCloBimbo = 1 or PCloStyle = 4) and $ARGS[2] = 'Question':
+		! once again dynamically choosing the next scene to play based on reputation
+		carwashscene = rand(1, 100)
+		if carwashscene <= min(max(30,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),60) and carwashscene >= 50:
+			act 'Continue':gt 'zaprFWash', 'pussyQ'	
+		elseif carwashscene <= min(max(60,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),80) and carwashscene >= 60:	
+			act 'Continue':gt 'zaprFWash', 'handQ'
+		elseif carwashscene <= min(max(80,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),100) and carwashscene >= 80:	
+			act 'Continue':gt 'zaprFWash', 'blowQ'
+		else
+			act 'Continue':gt 'zaprFWash', 'assQ'
+		end
+	! flashing for cars just allows you to return to the gas station
 	else
-		act 'Run away':gt 'zaprF', 'start'
+		act 'Go back to the gas station':gt 'zaprF', 'start'
 	end
 end
 
+! $ARGS[1] = whether you got paid for this
+! $ARGS[2] = whether this act came from a customer question or just flashing for passing cars
 if $ARGS[0] = 'assFlash':
-	money += 50
+	if $ARGS[1] = 'Paid':
+		money += 50
+		pav_prostitute += rand(0,1)
+	elseif $ARGS[1] = 'Free':
+		pav_sex += rand(0,1)
+	end
+	if pcs_inhib < 30: inhib_exp += rand(2,4)
+	mood += 5
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 30:
-		i = rand(1, 2)
-		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/assflash<<i>>.jpg"></center>'
+	if gifornot < 50:
+		i = rand(1, 100)
+		if i < 10:
+			if PCloPants > 0:
+				:loop_ass_old_pics1
+				i = rand(1, 2)
+				if i = 1: jump 'loop_ass_old_pics1'
+				'<center><img <<$set_imgh>> src="images/locations/shared/carwash/assflash<<i>>.jpg"></center>'
+			elseif PCloSkirt > 0:
+				:loop_ass_old_pics2
+				i = rand(1, 2)
+				if i = 2: jump 'loop_ass_old_pics2'
+				'<center><img <<$set_imgh>> src="images/locations/shared/carwash/assflash<<i>>.jpg"></center>'
+			end
+		else
+			if PCloPants > 0:
+				i = rand(1, 16)
+				'<center><img <<$set_imgh>> src="images/pc/flashing/pants/outside/butt/<<i>>.jpg"></center>'
+			elseif PCloSkirt > 0:
+				i = rand(1, 9)
+				'<center><img <<$set_imgh>> src="images/pc/flashing/dress/outside/butt/<<i>>.jpg"></center>'
+			end
+		end
 	else
-		i = rand(1, 5)
-		'<center><video autoplay loop src="images/locations/shared/carwash/assflash<<i>>.mp4"></video></center>'
+		if PCloPants > 0:
+			:loop_ass_old_vids1
+			i = rand(1, 5)
+			if i = 2 or i = 3: jump 'loop_ass_old_vids1'
+			'<center><video autoplay loop src="images/locations/shared/carwash/assflash<<i>>.mp4"></video></center>'
+		elseif PCloSkirt > 0:
+			:loop_ass_old_vids2
+			i = rand(1, 5)
+			if i = 1 or i = 4 or i = 5: jump 'loop_ass_old_vids2'
+			'<center><video autoplay loop src="images/locations/shared/carwash/assflash<<i>>.mp4"></video></center>'
+		end
+	end
+	
+	if $ARGS[1] = 'Paid':
+		if PCloPants > 0:'You pull your pants down and show him your ass for a few seconds. Then you quickly cover up and take your money.'
+		if PCloSkirt > 0:'You lift your skirt up and show him your ass for a few seconds. Then you quickly cover up and take your money.'
+	elseif $ARGS[1] = 'Free':
+		if $ARGS[2] = 'Question':
+			if PCloPants > 0:'You pull your pants down and show him your ass for a few seconds. You give your ass a little shake for him before you cover up.'
+			if PCloSkirt > 0:'You lift your skirt up and show him your ass for a few seconds. You give your ass a little shake for him before you cover up.'
+		elseif $ARGS[2] = 'Flash':
+			if PCloPants > 0:'You pull your pants down and expose your ass to the road for a few seconds. A couple cars pass by and honk in appreciation. You give your ass a little shake before you cover up.'
+			if PCloSkirt > 0:'You lift your skirt up and expose your ass to the road for a few seconds. A couple cars pass by and honk in appreciation. You give your ass a little shake before you cover up.'
+		end
 	end
-	'You quickly pull down your pants and show him your ass for a few seconds. You then quickly cover up and take your money.'
 	gs 'arousal', 'flashlite', 5
 	gs 'stat'
-	if sub >= 30 or bimbolevel >= 1 or pcs_horny > 6:
-		act 'Continue':gt 'zaprFWash', 'blowQ'
+	
+	if (sub >= 10 or pcs_dom >= 10 or bimbolevel >= 1 or pcs_horny >= 10) and (PCloBimbo = 1 or PCloStyle = 4) and $ARGS[2] = 'Question':
+		carwashscene = rand(1, 100)
+		if carwashscene <= min(max(50,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),75) and carwashscene >= 50:	
+			act 'Continue':gt 'zaprFWash', 'handQ'
+		elseif carwashscene <= min(max(75,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),100) and carwashscene >= 75:	
+			act 'Continue':gt 'zaprFWash', 'blowQ'
+		else
+			act 'Continue':gt 'zaprFWash', 'pussyQ'
+		end
 	else
-		act 'Run away':gt 'zaprF', 'start'
+		act 'Go back to the gas station':gt 'zaprF', 'start'
 	end
 end
 
-if $ARGS[0] = 'blowjob':
+! $ARGS[1] = whether you got paid for this
+! $ARGS[2] = whether this act came from a customer question or just flashing for passing cars
+if $ARGS[0] = 'pussyFlash':
+	if $ARGS[1] = 'Paid':
+		money += 50
+		pav_prostitute += 1
+	elseif $ARGS[1] = 'Free':
+		pav_sex += 1
+	end
+	if pcs_inhib < 40: inhib_exp += rand(4,6)
+	mood += 5
+	gs 'stat'
+	
+	if PCloPants > 0:
+		i = rand(1, 9)
+		'<center><img <<$set_imgh>> src="images/pc/flashing/pants/outside/pussy/<<i>>.jpg"></center>'
+	elseif PCloSkirt > 0:
+		i = rand(1, 13)
+		'<center><img <<$set_imgh>> src="images/pc/flashing/dress/outside/pussy/<<i>>.jpg"></center>'
+	end
+	
+	if $ARGS[1] = 'Paid':
+		if PCloPants > 0:'You pull your pants down and show him your pussy for a few seconds. Then you quickly cover up and take your money.'
+		if PCloSkirt > 0:'You lift your skirt up and show him your pussy for a few seconds. Then you quickly cover up and take your money.'
+	elseif $ARGS[1] = 'Free':
+		if $ARGS[2] = 'Question':
+			if PCloPants > 0:'You pull your pants down and show him your pussy for a few seconds. You rub your clit a little for him before you cover up.'
+			if PCloSkirt > 0:'You lift your skirt up and show him your pussy for a few seconds. You rub your clit a little for him before you cover up.'
+		elseif $ARGS[2] = 'Flash':
+			if PCloPants > 0:'You pull your pants down and expose your pussy to the road for a few seconds. A couple cars pass by and honk in appreciation. You rub your clit a little before you cover up.'
+			if PCloSkirt > 0:'You lift your skirt up and expose your pussy to the road for a few seconds. A couple cars pass by and honk in appreciation. You rub your clit a little before you cover up.'
+		end
+	end
+	gs 'arousal', 'flashlite', 5
+	gs 'stat'
+	
+	if (sub >= 10 or pcs_dom >= 10 or bimbolevel >= 1 or pcs_horny >= 15) and (PCloBimbo = 1 or PCloStyle = 4) and $ARGS[2] = 'Question':
+		carwashscene = rand(1, 100)
+		if carwashscene <= min(max(60,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),100) and carwashscene >= 60:	
+			act 'Continue':gt 'zaprFWash', 'blowQ'
+		else
+			act 'Continue':gt 'zaprFWash', 'handQ'
+		end
+	else
+		act 'Go back to the gas station':gt 'zaprF', 'start'
+	end
+end
+
+! $ARGS[1] = whether you got paid for this
+if $ARGS[0] = 'handjob':
+	! generate random npc for sex
 	gs 'npcgeneratec', 0, 'gas station customer', rand(18,40)
 	gs 'boyStat', $npclastgenerated
+	
+	if $ARGS[1] = 'Paid':
+		money += 200
+		pav_prostitute += 2
+	elseif $ARGS[1] = 'Free':
+		pav_sex += 2
+	end
+	if pcs_inhib < 50: inhib_exp += rand(6,8)
+	mood += 5
+	gs 'stat'
+	
+	gifornot = rand (1, 100)
+	if gifornot < 50:
+		i = rand(1, 2)
+		if i = 1:
+			'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
+		end
+	else
+		i = rand(0, 2)
+		if i = 0:
+			'<center><video autoplay loop src="images/shared/sex/handjob/hj<<i>>.mp4"></video></center>'
+		else
+			'<center><video autoplay loop src="images/shared/sex/handjob/HandJob<<i>>.mp4"></video></center>'
+		end
+	end
+	
+	if $ARGS[1] = 'Paid':
+		'You follow him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working his shaft with your hands.'
+		gs 'arousal', 'hj', 15, 'sub', 'prostitute', 'unknown'
+	elseif $ARGS[1] = 'Free':
+		'You lead him behind the gas station, kneel down, unzip his pants and start working his shaft with your hands.'
+		gs 'arousal', 'hj', 15, 'dom', 'unknown'
+	end
+	gs 'stat'
+	
+	'After a while, the man starts pulling your head closer and closer to him. He asks you to blow him: "I''ll give you 200 <b>₽</b> if you open that mouth for me.'
+	
+	if sub >= 10 or pcs_dom >= 10 or bimbolevel >= 1 or pcs_horny >= 30:
+		if pcs_inhib >= 30 or pcs_horny >= 30:act 'Open your mouth for him':gt 'zaprFWash', 'blowjob', 'Paid', 'handjob'
+		if pcs_inhib >= 35 or pcs_horny >= 35:act 'Open your mouth for him for free instead':gt 'zaprFWash', 'blowjob', 'Free', 'handjob'
+		act 'Rub harder to make him cum':gt 'zaprFWash', 'handjobEndQ'
+	else
+		act 'Rub harder to make him cum':gt 'zaprFWash', 'handjobEndQ'
+	end
+end
 
-	money += 300
-
+! $ARGS[1] = whether you got paid for this
+! $ARGS[2] = whether this act came from a customer question or already giving a customer a handjob
+if $ARGS[0] = 'blowjob':
+	if $ARGS[2] = 'Question':
+		gs 'npcgeneratec', 0, 'gas station customer', rand(18,40)
+		gs 'boyStat', $npclastgenerated
+	end
+	
+	if $ARGS[1] = 'Paid':
+		money += 200
+		pav_prostitute += 2
+	elseif $ARGS[1] = 'Free':
+		pav_sex = 2
+	end
+	if pcs_inhib < 50: inhib_exp += rand(6,8)
+	mood += 5
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 30:
+	if gifornot < 50:
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/blowjob<<i>>.jpg"></center>'
 	else
 		i = rand(1, 3)
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/blowjob<<i>>.mp4"></video></center>'
 	end
-	'You follow him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working his shaft with your mouth.'
-	'After a while, the man starts trying to remove your clothes. He asks you to let him fuck your pussy: "I''ll give you another 300 if you let me take your pussy! C''mon!'
-	gs 'arousal', 'bj', 15, 'sub', 'prostitute'
+	
+	if $ARGS[2] = 'Question': 
+		if $ARGS[1] = 'Paid':
+			'You follow him behind the gas station, where you get the promised money, kneel down, unzip his pants and start working his shaft with your mouth.'
+			gs 'arousal', 'bj', 15, 'sub', 'prostitute', 'unknown'
+		elseif $ARGS[1] = 'Free':
+			'You lead him behind the gas station, kneel down, unzip his pants and start working his shaft with your mouth.'
+			gs 'arousal', 'bj', 15, 'dom', 'unknown'
+		end
+	elseif $ARGS[2] = 'handjob':
+		if $ARGS[1] = 'Paid':
+			'You grab the money he tosses at you and switch to working his shaft with your mouth.'
+			gs 'arousal', 'bj', 15, 'sub', 'prostitute', 'unknown'
+		elseif $ARGS[1] = 'Free':
+			'You switch to working his shaft with your mouth.'
+			gs 'arousal', 'bj', 15, 'dom', 'unknown'
+		end
+	end
 	gs 'stat'
-	if sub >= 30 or bimbolevel >= 1 or pcs_horny > 6:
+	
+	'After a while, the man starts trying to remove your clothes. He asks you to let him fuck your pussy: "I''ll give you 400 <b>₽</b> if you let me take your pussy! C''mon!'
+	
+	if sub >= 10 or pcs_dom >= 10 or bimbolevel >= 1 or pcs_horny >= 40:
 		if pcs_vag = 0:
-			act 'Offer your ass instead (you don''t want to lose your virginity to this stranger...)':gt 'zaprFWash', 'fuckAnal'
+			if pcs_inhib >= 40 or pcs_horny >= 40: act 'Offer your ass instead (you don''t want to lose your virginity to this stranger...)':gt 'zaprFWash', 'fuckAnal', 'Paid'
+			if pcs_inhib >= 45 or pcs_horny >= 45: act 'Offer your ass for free instead (you don''t want to lose your virginity to this stranger...)':gt 'zaprFWash', 'fuckAnal', 'Free'
 		else
-			act 'Offer your pussy':gt 'zaprFWash', 'fuckPussy'
-			act 'Offer your ass':gt 'zaprFWash', 'fuckAnal'
+			if pcs_inhib >= 40 or pcs_horny >= 40: act 'Offer your pussy':gt 'zaprFWash', 'fuckPussy', 'Paid'
+			if pcs_inhib >= 45 or pcs_horny >= 45: act 'Offer your pussy for free instead':gt 'zaprFWash', 'fuckPussy', 'Free'
+			if pcs_inhib >= 40 or pcs_horny >= 40: act 'Offer your ass':gt 'zaprFWash', 'fuckAnal', 'Paid'
+			if pcs_inhib >= 45 or pcs_horny >= 45: act 'Offer your ass for free instead':gt 'zaprFWash', 'fuckAnal', 'Free'
 		end
 		act 'Suck harder to make him cum':gt 'zaprFWash', 'blowjobEndQ'
 	else
@@ -145,39 +515,71 @@ if $ARGS[0] = 'blowjob':
 	end
 end
 
+! $ARGS[1] = whether you got paid for this
 if $ARGS[0] = 'fuckPussy':
-	money += 300
-
+	if $ARGS[1] = 'Paid':
+		money += 400
+		pav_prostitute += 4
+	elseif $ARGS[1] = 'Free':
+		pav_sex += 4
+	end
+	if pcs_inhib < 60: inhib_exp += rand(14,16)
+	mood += 10
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 40:
+	if gifornot < 50:
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckpussy<<i>>.jpg"></center>'
 	else
 		i = rand(1, 4)
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/fuckpussy<<i>>.mp4"></video></center>'
 	end
-	'You bend over and let the man start fucking your pussy.'
-	gs 'arousal', 'vaginal', 30, 'sub', 'prostitute'
+	
+	if $ARGS[1] = 'Paid':
+		'You bend over and let the man start fucking your pussy after collecting your money.'
+		gs 'arousal', 'vaginal', 30, 'sub', 'prostitute', 'unknown'
+	elseif $ARGS[1] = 'Free':
+		'You bend over and let the man start fucking your pussy.'
+		gs 'arousal', 'vaginal', 30, 'dom', 'unknown'
+	end
 	gs 'stat'
+	
 	act 'Continue':gt 'zaprFWash', 'pussyEndQ'
 end
 
+! $ARGS[1] = whether you got paid for this
 if $ARGS[0] = 'fuckAnal':
-	money += 300
-
+	if $ARGS[1] = 'Paid':
+		money += 400
+		pav_prostitute += 4
+	elseif $ARGS[1] = 'Free':
+		pav_sex += 4
+	end
+	if pcs_inhib < 60: inhib_exp += rand(14,16)
+	mood += 10
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 40:
+	if gifornot < 50:
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/fuckanal<<i>>.jpg"></center>'
 	else
 		i = rand(1, 4)
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/fuckanal<<i>>.mp4"></video></center>'
 	end
-	'You bend over and let the man start fucking your ass, his cock wet with your saliva.'
-	gs 'arousal', 'anal', 30, 'sub', 'prostitute'
+	
+	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', 'vaginal', 30, 'sub', 'prostitute', 'unknown'
+	elseif $ARGS[1] = 'Free':
+		'You bend over and let the man start fucking your ass. His cock is still wet with your saliva as it slides inside you.'
+		gs 'arousal', 'vaginal', 30, 'dom', 'unknown'
+	end
 	gs 'stat'
+	
 	rapePussyChance = rand(1, 100)
-	if rapePussyChance < 10:
+	if rapePussyChance <= min(max(1,pav_prostitute-60,pav_sex-60,pav_prostitute+pav_sex-120),20):
 		act 'Continue':gt 'zaprFWash', 'rapePussy'
 	else
 		act 'Continue':gt 'zaprFWash', 'analEndQ'
@@ -187,85 +589,155 @@ end
 if $ARGS[0] = 'rapePussy':
 	i = rand(1, 5)
 	'<center><video autoplay loop src="images/locations/shared/carwash/sex/hardanal<<i>>.mp4"></video></center>'
+	
 	'The man fucks your ass furiously, taking no heed to your painful moans. As you try to move away a bit to limit the depth he can reach in your ass, he slaps your buttcheeks hard and shouts:'
 	'"Stop moving bitch! Who do you think you are, that you can tell me what to do?"'
+	
 	if pcs_vag = 0:
 		'He gropes your ass, lifts it up and suddenly spots your hymen.'
 		'"What, you are a virgin? Such a tease and still a virgin, really?"'
 		rapeAnyway = rand(1, 100)
-		if rapeAnyway < 50:
-			'"It would have happened sooner or later anyway, virgin slut. Now enjoy and remember this moment!"'
-			act 'Continue':gt 'zaprFWash', 'rapePussyYes'
+		if rapeAnyway <= min(max(1,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),50):
+			'"It would have happened sooner or later anyway, virgin slut. Now enjoy and remember this moment; I know I will!"'
+			act 'Continue':gt 'zaprFWash', 'rapePussyYes', 'virgin'
 		else
-			'"Girls like you should not be acting like this! Someone should have taught you a hard lesson a long time ago."'
+			'"Girls like you should not be acting like this! Someone should have taught you a lesson a long time ago."'
 			act 'Continue':gt 'zaprFWash', 'punishSpank'
 		end
 	else
-		act 'Continue':gt 'zaprFWash', 'rapePussyYes'
+		act 'Continue':gt 'zaprFWash', 'rapePussyYes', 'normal'
 	end
-	pcs_mood += 5
-	gs 'stat'
 end
 
+! $ARGS[1] = whether you were a virgin before this or not
 if $ARGS[0] = 'rapePussyYes':
-	'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust, all the way to the hilt!'
+	inhib_exp += rand(10,20)
+
 	i = rand(1, 3)
 	'<center><video autoplay loop src="images/locations/shared/carwash/sex/pussytoanal<<i>>.mp4"></video></center>'
-	gs 'arousal', 'vaginal', 15, 'sub', 'prostitute', 'rough'
+	
+	if $ARGS[1] = 'virgin':
+		sub += 10
+		mood -= 30
+		'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust! You feel your hymen break and know your virginity is gone forever. What will your friends and family think of you now if they find out?'
+	elseif $ARGS[1] = 'normal':
+		sub += 6
+		mood -= 20
+		'He gropes your ass, lifts it up and pushes his dick inside your pussy in one thrust, all the way to the hilt!'
+	end
+	gs 'arousal', 'vaginal', 30, 'sub', 'prostitute', 'rough', 'rape', 'unknown'
 	gs 'stat'
-	act 'Continue':gt 'zaprFWash', 'vaginaCum'
+	
+	act 'Continue':gt 'zaprFWash', 'vaginaCum', 'rape'
+end
+
+if $ARGS[0] = 'pussyEndQ':
+	'You can feel that the man is about to orgasm. You decide to...:'
+	
+	act 'Let him cum inside your vagina':gt 'zaprFWash', 'vaginaCum', 'consensual'
+	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace', 'inside'
+	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth', 'inside'
 end
 
 if $ARGS[0] = 'analEndQ':
 	'You can feel that the man is about to ejaculate. You decide to...:'
+	
 	act 'Let him cum inside your ass':gt 'zaprFWash', 'assCum'
-	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
-	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace', 'inside'
+	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth', 'inside'
 end
 
-if $ARGS[0] = 'pussyEndQ':
-	'You can feel that the man is about to orgasm. You decide to...:'
-	act 'Let him cum inside your vagina':gt 'zaprFWash', 'vaginaCum'
-	act 'Take his cum on your face':gt 'zaprFWash', 'blowjobEndFace'
-	act 'Let him cum inside your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+! $ARGS[1] = whether this was rape or not
+if $ARGS[0] = 'vaginaCum':
+	if pcs_inhib < 40: inhib_exp += rand(4,6)
+	pcs_vag += 1
+	pain['vaginal'] += 4
+	gs 'cum_call', ''
+	gs 'stat'
+	
+	i = rand(1, 5)
+	'<center><video autoplay loop src="images/locations/shared/carwash/sex/cumpussy<<i>>.mp4"></video></center>'
+	
+	if $ARGS[1] = 'consensual':
+		mood += 20
+		'You let him cum deep inside your vagina. A pleasant warmth fills your insides as he shoots his load deep inside you. When he pulls out, a bit of sperm leaks out of your hole.'
+	elseif $ARGS[1] = 'rape':
+		mood -= 20
+		'The pounding suddenly stops as he cums deep inside your vagina. You can feel his cum inside of you as he continues to shoot his load inside your vagina. When he pulls out, a bit of sperm leaks out of your hole.'
+	end
+	
+	gs 'arousal', 'end'
+	gs 'stat'
+	
+	act 'Go back to the gas station':gt 'zaprF', 'start'
 end
 
 if $ARGS[0] = 'assCum':
+	if pcs_inhib < 40: inhib_exp += rand(4,6)
 	minut += 5
-	pain['asshole'] += 1
+	mood += 10
 	pcs_ass += 1
+	pain['asshole'] += 1
 	gs 'cum_call', 'anus'
 	gs 'stat'
+	
 	i = rand(1, 2)
+	
 	'<center><video autoplay loop src="images/locations/shared/carwash/sex/cumanal<<i>>.mp4"></video></center>'
+	
 	'You let him cum deep inside your ass. A pleasant warmth fills your insides as he shoots his load deep inside you. When he pulls out, a bit of sperm leaks out of your hole before you can tighten your worn out anus.'
+	
 	gs 'arousal', 'end'
 	gs 'stat'
+	
 	act 'Go back to gas station':gt 'zaprF', 'start'
 end
 
-if $ARGS[0] = 'vaginaCum':
-	minut += 5
-	pcs_vag += 1
-	pain['vaginal'] += 4
-	gs 'cum_call', ''
+if $ARGS[0] = 'handjobEndQ':
+	'You can feel that the man is about to orgasm. You decide to take it...:'
+	
+	act 'On your face':gt 'zaprFWash', 'blowjobEndFace', 'outside'
+	act 'On your hands':gt 'zaprFWash', 'handjobEndHands'
+end
+
+if $ARGS[0] = 'handjobEndHands':	
+	if pcs_inhib < 30: inhib_exp += rand(2,4)
+	mood += 5
+	gs 'cum_call', 'hands'
 	gs 'stat'
-	i = rand(1, 5)
-	'<center><video autoplay loop src="images/locations/shared/carwash/sex/cumpussy<<i>>.mp4"></video></center>'
-	'You let him cum deep inside your vagina. A pleasant warmth fills your insides as he shoots his load deep inside you. When he pulls out, a bit of sperm leaks out of your hole.'
+	
+	gifornot = rand (1, 100)
+	if gifornot < 30:
+		i = rand(0, 1)
+		'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,<<i>>.mp4"></video></center>'
+	else
+		i = rand(1, 2)
+		'<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand<<i>>.jpg"></center>'
+	end
+	
+	'When the man starts to ejaculate, you quickly point his cock away from your face. Your hands are covered in cum by the time he is done ejaculating. His sack was full, you can say that for sure.'
+	
 	gs 'arousal', 'end'
 	gs 'stat'
+	
 	act 'Go back to the gas station':gt 'zaprF', 'start'
 end
 
 if $ARGS[0] = 'blowjobEndQ':
 	'You can feel that the man is about to orgasm. You decide to take it...:'
-	act 'On your face':gt 'zaprFWash', 'blowjobEndFace'
-	act 'In your mouth':gt 'zaprFWash', 'blowjobEndMouth'
+	
+	act 'On your face':gt 'zaprFWash', 'blowjobEndFace', 'outside'
+	act 'In your mouth':gt 'zaprFWash', 'blowjobEndMouth', 'outside'
 end
 
+! $ARGS[1] = whether his cock was inside or outside of you before he cums on your face
 if $ARGS[0] = 'blowjobEndFace':
-	minut += 5
+	if pcs_inhib < 30: inhib_exp += rand(2,4)
+	mood += 5
+	gs 'cum_call', 'face'
+	gs 'stat'
+	
+	gifornot = rand (1, 100)
 	if gifornot < 30:
 		i = rand(1, 2)
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/cumface<<i>>.mp4"></video></center>'
@@ -273,26 +745,41 @@ if $ARGS[0] = 'blowjobEndFace':
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cumface<<i>>.jpg"></center>'
 	end
-	'When the man starts to ejaculate, you quickly take his cock out and point it towards your face. His sack was full, you can say that for sure.'
-	gs 'cum_call', 'face'
+	
+	if $ARGS[1] = 'outside':
+		'When the man starts to ejaculate, you quickly point point his cock towards your face. Your face is covered in cum by the time he is done ejaculating. His sack was full, you can say that for sure.'
+	elseif $ARGS[1] = 'inside':
+		'When the man starts to ejaculate, you quickly take his cock out of you and point it towards your face. Your face is covered in cum by the time he is done ejaculating. His sack was full, you can say that for sure.'
+	end
+	
 	gs 'arousal', 'end'
 	gs 'stat'
+	
 	act 'Go back to the gas station':gt 'zaprF', 'start'
 end
 
+! $ARGS[1] = whether his cock was inside or outside of you before he cums in your mouth
 if $ARGS[0] = 'blowjobEndMouth':
-	minut += 5
+	gs 'cum_call', 'mouth'
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot < 30:
+	if gifornot < 60:
 		i = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/cummouth<<i>>.jpg"></center>'
 	else
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/cummouth1.mp4"></video></center>'
 	end
-	'When the man starts to ejaculate, you quickly take his cock out of your mouth while keeping it aimed straight at your tongue, giving him a good view of the cum as it flies inside your gaping mouth. His sack was full, you can say that for sure.'
-	gs 'cum_call', 'mouth'
+	
+	if $ARGS[1] = 'outside':
+		'When the man starts to ejaculate, you quickly open your mouth while keeping his cock aimed straight at your tongue, giving him a good view of the cum as it flies inside your mouth. His sack was full, you can say that for sure.'
+	elseif $ARGS[1] = 'inside':
+		'When the man starts to ejaculate, you quickly take his cock out of you and aim it straight at your tongue, giving him a good view of the cum as it flies inside your mouth. His sack was full, you can say that for sure.'
+	end
+	
 	gs 'arousal', 'end'
 	gs 'stat'
+	
 	act 'Continue':gt 'zaprFWash', 'blowjobEndMouthQ'
 end
 
@@ -304,134 +791,251 @@ end
 
 
 if $ARGS[0] = 'blowjobEndMouthSwallow':
+	if pcs_inhib < 40: inhib_exp += rand(4,6)
 	swallow += 1
-	'You gulp down the mouthful of sperm and then present your tongue as a proof that all of his seed is now in your belly.'
+	sub += 1
+	mood += 10
+	gs 'stat'
+	
 	i = rand(1, 4)
 	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/swallow<<i>>.jpg"></center>'
+	
+	'You gulp down the mouthful of sperm and then present your tongue as a proof that all of his seed is now in your belly.'
 	'The man smiles, slaps you mildly on your face and says: "What a nice young slut you are. Next time I need a refill, I''ll be sure to stop by."'
+	
+	gs 'arousal', 'end'
+	gs 'stat'
+	
 	act 'Go back to the gas station':gt 'zaprF', 'start'
 end
 
 if $ARGS[0] = 'blowjobEndMouthSpit':
-	'You spit the load of sperm down between the legs of your customer. He doesn''t seem happy about it...'
-	i = rand(1, 3)
+	if pcs_inhib < 30: inhib_exp += rand(2,4)
+	pcs_dom += 3
+	gs 'stat'
+	
 	gifornot = rand (1, 100)
-	if gifornot > 30:
-	'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/spit<<i>>.jpg"></center>'
+	if gifornot > 50:
+		i = rand(1, 3)
+		'<center><img <<$set_imgh>> src="images/locations/shared/carwash/sex/spit<<i>>.jpg"></center>'
 	else
-	'<center><video autoplay loop src="images/locations/shared/carwash/sex/spit1.mp4"></video></center>'
+		'<center><video autoplay loop src="images/locations/shared/carwash/sex/spit1.mp4"></video></center>'
 	end
+	
+	'You spit the load of sperm down between the legs of your customer. He doesn''t seem happy about it...'
 	'His face darkens and he says: "What, my cum isn''t good enough for you to swallow? I''ll teach you bitch!"'
 	'He moves closer to you with an angry look!'
+	
 	act 'Run back to the gas station':gt 'zaprFWash', 'runback'
 end
 
 if $ARGS[0] = 'runback':
+	minut += 5
+	! runSuccess uses a simpler version of the formula used with carwashscene
+	! just based on strength and agility; uses whichever is higher to try and run away
+	! min 25 percent chance; max 75 percent chance for this initial getaway
 	runSuccess = rand(1, 100)
-	if runSuccess > 50:
-		'You managed to escape his grasp!'
-		act 'Continue':gt 'zaprF', 'start'
+	if runSuccess <= min(max(25,pcs_stren,pcs_agil),75):
+		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
+		
+		'You managed to escape his grasp! You take a quick look behind you to make sure he''s not following you before heading back to the gas station.'
+		
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Escape':gt 'zaprF', 'start'
 	else
 		pain['cheeks'] += 2
 		pain['head'] += 2
 		pain['mouth'] += 2
 		pain['neck'] += 4
+		
 		'<center><video autoplay loop src="images/locations/shared/carwash/sex/punishbeatface.mp4"></video></center>'
+		
 		'You weren''t quick enough and he caught you. He pushes you down and starts to slap your face!'
+		
 		gs 'arousal', 'end'
 		gs 'stat'
+		
 		act 'Endure his punishment':gt 'zaprFWash', 'punish'
+		! gave doms the choice to fight back as long as they have some energy related stat with something left even if they lost the roll for runSuccess
+		! these values are based off of the cheat menu values for players who turn off these stats as they can never go below 35
+		if dom > 0 and (pcs_energy > 35 or pcs_hydra > 35 or pcs_sleep > 35):
+			act 'Push him off of you and escape':gt 'zaprFWash', 'fight'
+		end
+	end
+end
+
+if $ARGS[0] = 'fight':
+	! maybe at some point this could be an actual fight but with the state of the combat logic is in this will just be left to drain a stat to escape
+	! these values are based off of the cheat menu values for players who turn off these stats as they can never go below 35
+	if pcs_energy >= 35: 
+		pcs_energy -= 35
+	elseif pcs_hydra >= 35: 
+		pcs_hydra -= 35
+	elseif pcs_sleep >= 35: 
+		pcs_sleep -= 35
 	end
+	
+	gs 'arousal', 'end'
+	gs 'stat'
+	
+	gt 'zaprF', 'start'
 end
 
 if $ARGS[0] = 'punish':
+	! once again punishType uses the same logic as carwashscene for dynamic choices
 	punishType = rand(1, 100)
-	if punishType < 33:
-		gt 'zaprFWash', 'punishSpank'
-	elseif punishType < 66:
+	if punishType <= min(max(50,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),75) and punishType >= 50:	
+		gt 'zaprFWash', 'punishAnal'
+	elseif punishType <= min(max(75,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),100) and punishType >= 75:	
 		gt 'zaprFWash', 'punishPussyQ'
 	else
-		gt 'zaprFWash', 'punishAnal'
+		gt 'zaprFWash', 'punishSpank'
 	end
 end
 
 if $ARGS[0] = 'punishSpank':
-	minut += 20
 	pcs_horny = 0
+	pcs_mood -= 10
+	sub += 2
+	inhib_exp += rand(2,4)
 	pain['asscheeks'] += 5
+	gs 'stat'
+	
 	'<center><video autoplay loop src="images/locations/shared/carwash/sex/punishspank.mp4"></video></center>'
-	'The angry man bends you over an old chair and starts to spank your ass, hard.'
+	
+	'The angry man drags you to a more secluded area, bends you over and starts to spank your ass very hard.'
 	'After twenty minutes of ruthless punishment, you can finally crawl away with your burning ass.'
-	abductionChance = rand(1, 100)
+	
+	gs 'arousal', 'foreplay', 15, 'sub', 'rough', 'unknown'
+	gs 'arousal', 'end'
+	gs 'stat'
+	
+	! reputationScalar has a min of 1 and a max of 180; the more well known you are the higher the chance of being abducted
+	reputationScalar = min(max(1,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),180)
+	! fitnessScalar has a min of 1 and a max of 90; the more fit you are the lower the chance of being abducted
+	fitnessScalar = min(max(1,pcs_stren,pcs_agil),90)
+	! abductionChance is calculated using a combination of these 2 values
+	! in the beginning of the game fitness will usually outweigh your reputation and keep your abductionChance very low (min is 0)
+	! once reputation begins to rise it will even out with the fitness and abductionChance will stabilize at an average value (around 45)
+	! but fitness caps at 100 and reputation does not so eventually if your reputation grows to be very large the abductionChance will continue to rise (max of 90)
+	abductionChance = reputationScalar-fitnessScalar
+	if (abductionChance > 0 and abductionChance <= rand(1,100)) or sub > 99:
+		'But your perpetrator isn''t done with you.'
+		'He catches you again, drags you to his car and pushes you into the trunk...'
+		'You have a feeling this probably will not go well for you...'
+		
+		act 'Cry for help':gt 'abduction', 'start'
+	else		
+		'Your perpetrator stands up and just watches as you crawl away in pain.'
+		'He turns around and calmly walks away, leaving you alone.'
+		
+		act 'Escape':gt 'zaprF', 'start'
+	end
+end
 
-    act 'Continue (abduction)':gt 'zaprFWash', 'getAbducted'
-    act 'Get back to the gas station':gt 'zaprF', 'start'
-	pcs_mood += 5
+if $ARGS[0] = 'punishAnal':
+	pcs_horny = 0
+	pcs_mood -= 20
+	sub += 4
+	pain['asshole'] += 6
+	inhib_exp += rand(5,10)
+	gs 'cum_call', 'anus'
 	gs 'stat'
+	
+	i = rand(1, 3)
+	'<center><video autoplay loop src="images/locations/shared/carwash/sex/punishanal<<i>>.mp4"></video></center>'
+	
+	'The angry man drags you to a more secluded area, bends you over, and sticks a finger in your ass.'
+	'Your anus fully exposed, he starts fucking it ruthlessly.'
+	'After half an hour of rough assfucking he releases his grip on you so you can finally crawl away; your aching ass sore from the brutal penetration.'
+	
+	gs 'arousal', 'anal', 30, 'sub', 'rough', 'rape', 'unknown'
 	gs 'arousal', 'end'
 	gs 'stat'
+	
+	reputationScalar = min(max(1,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),180)
+	fitnessScalar = min(max(1,pcs_stren,pcs_agil),90)
+	abductionChance = reputationScalar-fitnessScalar
+	if (abductionChance > 0 and abductionChance <= rand(1,100)) or sub > 99:
+		'But your perpetrator isn''t done with you.'
+		'He catches you again, drags you to his car and pushes you into the trunk...'
+		'You have a feeling this probably will not go well for you...'
+		
+		act 'Cry for help':gt 'abduction', 'start'
+	else		
+		'Your perpetrator stands up and just watches as you crawl away in pain.'
+		'He turns around and calmly walks away, leaving you alone.'
+		
+		act 'Escape':gt 'zaprF', 'start'
+	end
 end
 
 if $ARGS[0] = 'punishPussyQ':
-	'The angry man drags you to an old house. He bends you over and starts to rub your pussy.'
+	'The angry man drags you to a more secluded area. He bends you over and starts to rub your pussy.'
+	
 	if pcs_vag = 0:
 		'Suddenly he remarks: "What? You''re a virgin? Such slutty tease and still a virgin?'
+		
 		penetrate = rand (1, 100)
-		if penetrate <= 100 and penetrate > 66:
-			'Someone should have done this long time ago!'
-			act 'Endure':gt 'zaprFWash', 'punishSpank'
-		elseif penetrate <= 66 and penetrate > 33:
+		if penetrate <= min(max(50,pav_prostitute-30,pav_sex-30),75) and penetrate >= 50:	
 			'I''ll spare your virginity but you''ll get fucked anyway. Sluts have more than one hole for a reason, right?'
+			
 			act 'Endure':gt 'zaprFWash', 'punishAnal'
+		elseif penetrate <= min(max(75,pav_prostitute-30,pav_sex-30),100) and penetrate >= 75:	
+			'This makes it even better! I''ll enjoy your tears even more! I haven''t had a virgin in forever!'
+			
+			act 'Endure':gt 'zaprFWash', 'punishPussy', 'virgin'
 		else
-			'This makes it even better! I''ll enjoy your tears even more!'
-			act 'Endure':gt 'zaprFWash', 'punishPussy'
+			'Someone should have done this a long time ago, but I''ll spare you penetration this time!'
+			
+			act 'Endure':gt 'zaprFWash', 'punishSpank'
 		end
 	else
-		'Let''s try this teenie snatch!'
-		act 'Endure':gt 'zaprFWash', 'punishPussy'
+		'Let''s try what you''ve been teasing, you ungrateful whore!'
+		act 'Endure':gt 'zaprFWash', 'punishPussy', 'normal'
 	end
 end
 
+! $ARGS[1] = whether you were a virgin before this or not
 if $ARGS[0] = 'punishPussy':
+	pcs_horny = 0
 	pain['vaginal'] += 4
+	inhib_exp += rand(5,10)
 	gs 'cum_call', ''
+	gs 'stat'
+	
 	i = rand(1, 5)
 	'<center><video autoplay loop src="images/locations/shared/carwash/sex/punishpussy<<i>>.mp4"></video></center>'
-	'Your pussy fully exposed, he starts fucking it ruthlessly.'
+	
+	if $ARGS[1] = 'virgin':
+		sub += 10
+		'Your pussy fully exposed, he slowly inserts his cock inside of you. He pushes right up against your hymen, savoring the moment. Suddenly, you feel your hymen break and know your virginity is gone forever. What will your friends and family think of you now if they find out?'
+		pcs_mood -= 40
+	elseif $ARGS[1] = 'normal':
+		sub += 6
+		'Your pussy fully exposed, he starts fucking it ruthlessly.'
+		pcs_mood -= 20
+	end
 	'After half an hour of destroying your cunt he releases his grip on you so you can finally crawl away; your aching pussy sore from the brutal penetration.'
-	gs 'arousal', 'vaginal', 30, 'sub', 'rough'
-	gs 'arousal', 'end'
-	gs 'stat'
-	abductionChance = rand(1, 100)
-	act 'Continue (Abduction)':gt 'zaprFWash', 'getAbducted'
-    act 'Get back to the gas station':gt 'zaprF', 'start'
-	pcs_mood += 5
-	gs 'stat'
-end
-
-if $ARGS[0] = 'punishAnal':
-	pain['asshole'] += 6
-	gs 'cum_call', 'anus'
-	pcs_mood = - 15
-
-	i = rand(1, 3)
-	'<center><video autoplay loop src="images/locations/shared/carwash/sex/punishanal<<i>>.mp4"></video></center>'
-	'Your anus fully exposed, he starts fucking it ruthlessly.'
-	'After half an hour of rough assfucking he releases his grip on you so you can finally crawl away; your aching ass sore from the brutal penetration.'
-	gs 'arousal', 'anal', 30, 'sub', 'rough'
+	
+	gs 'arousal', 'vaginal', 30, 'sub', 'rough', 'rape', 'unknown'
 	gs 'arousal', 'end'
 	gs 'stat'
-	abductionChance = rand(1, 100)
-	act 'Continue (Abduction)':gt 'zaprFWash', 'getAbducted'
-    act 'Get back to the gas station':gt 'zaprF', 'start'
-end
-
-if $ARGS[0] = 'getAbducted':
-	'But your perpetrator isn''t done with you.'
-	'He catches you again, drags you to his car and pushes you into the trunk...'
-	'You probably made a terrible mistake...'
-	act 'Cry for help':gt 'abduction', 'start'
+	
+	reputationScalar = min(max(1,pav_prostitute-30,pav_sex-30,pav_prostitute+pav_sex-60),180)
+	fitnessScalar = min(max(1,pcs_stren,pcs_agil),90)
+	abductionChance = reputationScalar-fitnessScalar
+	if (abductionChance > 0 and rand(1,100) <= abductionChance) or sub > 99:
+		'But your perpetrator isn''t done with you.'
+		'He catches you again, drags you to his car and pushes you into the trunk...'
+		'You have a feeling this probably will not go well for you...'
+		act 'Cry for help':gt 'abduction', 'start'
+	else		
+		'Your perpetrator stands up and just watches as you crawl away in pain.'
+		'He turns around and calmly walks away, leaving you alone.'
+		act 'Escape':gt 'zaprF', 'start'
+	end
 end
 
 --- zaprFWash ---------------------------------

Kaikkia tiedostoja ei voida näyttää, sillä liian monta tiedostoa muuttui tässä diffissä