Browse Source

Merge branch 'master' into mine

alecsp 2 years ago
parent
commit
0a52e6e49e
100 changed files with 2423 additions and 1992 deletions
  1. 2 0
      .gitignore
  2. 21 0
      changes from 0_8_5 to 0_8_6.txt
  3. 283 275
      glife.qproj
  4. 1 1
      locations/BDSM.qsrc
  5. 1 1
      locations/BDsex.qsrc
  6. 1 1
      locations/BurgerTip.qsrc
  7. 9 0
      locations/Cheatmenu_din.qsrc
  8. 9 9
      locations/Club2.qsrc
  9. 1 0
      locations/Cum_Manage.qsrc
  10. 1 1
      locations/FedorEv2.qsrc
  11. 3 3
      locations/Gnpc2.qsrc
  12. 457 118
      locations/KatjaHomeTalk.qsrc
  13. 46 41
      locations/Katja_Tanga.qsrc
  14. 1 1
      locations/Komp.qsrc
  15. 1 1
      locations/LCporn.qsrc
  16. 4 4
      locations/LCwork.qsrc
  17. 1 1
      locations/NatBelGo.qsrc
  18. 4 3
      locations/NikoEv.qsrc
  19. 1 1
      locations/Peterroom.qsrc
  20. 1 1
      locations/UnitAppearance.qsrc
  21. 0 435
      locations/Voltrener - WIP.qsrc
  22. 2 2
      locations/VoltrenerSexShower.qsrc
  23. 2 1
      locations/_attributes_danilovich_outfits.qsrc
  24. 2 1
      locations/_attributes_fancy_burlesque.qsrc
  25. 10 11
      locations/_attributes_school.qsrc
  26. 2 1
      locations/_phone_theme.qsrc
  27. 2 1
      locations/act_extras1.qsrc
  28. 2 1
      locations/act_extras3.qsrc
  29. 2 1
      locations/act_main1.qsrc
  30. 2 1
      locations/act_minor1.qsrc
  31. 2 1
      locations/actress.qsrc
  32. 278 48
      locations/albina_chat.qsrc
  33. 2 1
      locations/albina_election_events.qsrc
  34. 2 1
      locations/albina_house_events.qsrc
  35. 2 1
      locations/anushaptbr.qsrc
  36. 2 2
      locations/arousal.qsrc
  37. 2 2
      locations/artgar.qsrc
  38. 1 1
      locations/arturdin.qsrc
  39. 2 1
      locations/audition_reflections.qsrc
  40. 2 1
      locations/audition_sex1.qsrc
  41. 2 1
      locations/audition_sex2.qsrc
  42. 2 1
      locations/audition_sex3.qsrc
  43. 2 1
      locations/auditions.qsrc
  44. 5 0
      locations/begin.qsrc
  45. 1 1
      locations/belpicknick.qsrc
  46. 3 3
      locations/body.qsrc
  47. 2 1
      locations/body_din.qsrc
  48. 50 93
      locations/body_shape.qsrc
  49. 2 1
      locations/booty_call.qsrc
  50. 2 1
      locations/booty_call_after.qsrc
  51. 2 1
      locations/booty_call_sex.qsrc
  52. 1 1
      locations/booty_call_start.qsrc
  53. 1 1
      locations/booty_call_talk.qsrc
  54. 1 1
      locations/booty_call_virgin.qsrc
  55. 1 1
      locations/brother.qsrc
  56. 29 8
      locations/budilnik.qsrc
  57. 3 3
      locations/burger.qsrc
  58. 1 1
      locations/burgerWork.qsrc
  59. 1 1
      locations/castSpell.qsrc
  60. 1 1
      locations/castSpellNPC.qsrc
  61. 1 1
      locations/casting.qsrc
  62. 1 1
      locations/cfnm.qsrc
  63. 4 4
      locations/cikl.qsrc
  64. 1 1
      locations/city_apt_building.qsrc
  65. 1 1
      locations/city_center.qsrc
  66. 247 114
      locations/city_clinic.qsrc
  67. 1 1
      locations/city_industrial_train.qsrc
  68. 2 2
      locations/city_jorahouse.qsrc
  69. 1 1
      locations/city_kafegivisex.qsrc
  70. 2 2
      locations/city_kavkazkafe.qsrc
  71. 8 8
      locations/city_lake.qsrc
  72. 2 1
      locations/city_musicstore.qsrc
  73. 2 1
      locations/city_musicstore_stock.qsrc
  74. 88 88
      locations/city_nightclub.qsrc
  75. 81 0
      locations/city_nightclubToilet.qsrc
  76. 1 1
      locations/city_saunawhore.qsrc
  77. 1 1
      locations/city_train.qsrc
  78. 1 1
      locations/city_trashplaceevents.qsrc
  79. 2 2
      locations/cleanHTML.qsrc
  80. 2 2
      locations/clothing.qsrc
  81. 9 9
      locations/clothing_QV.qsrc
  82. 0 1
      locations/costuming.qsrc
  83. 1 1
      locations/costuming_outfits1.qsrc
  84. 1 1
      locations/cum_call.qsrc
  85. 2 2
      locations/dimaEv.qsrc
  86. 1 1
      locations/directors.qsrc
  87. 5 5
      locations/event.qsrc
  88. 1 1
      locations/fame.qsrc
  89. 6 0
      locations/family_schedule.qsrc
  90. 1 1
      locations/fbDormD.qsrc
  91. 1 1
      locations/flash.qsrc
  92. 1 1
      locations/foto_practice.qsrc
  93. 1 1
      locations/garfather.qsrc
  94. 9 9
      locations/gdksex.qsrc
  95. 1 618
      locations/gdktoilet_womens.qsrc
  96. 644 0
      locations/gloryhole.qsrc
  97. 1 1
      locations/gopnew.qsrc
  98. 3 3
      locations/gopskver.qsrc
  99. 2 2
      locations/grades.qsrc
  100. 3 3
      locations/gschool_chats.qsrc

+ 2 - 0
.gitignore

@@ -16,6 +16,8 @@ avatar.*
 *.rar
 *.zip
 VideoDecodeStats/
+tools/*.AppImage
+lbuild.sh
 
 glmf.code-workspace
 

+ 21 - 0
changes from 0_8_5 to 0_8_6.txt

@@ -8,6 +8,19 @@ fertility					<- cum_arrcheat
 Zvereva_sub_1				<- gKristinaZv
 Zvereva_domme_1
 Zvereva_events
+gloryhole					<- gt 'gdktoilet_womens', 'emptystall' -> gt 'gloryhole', 'start'
+city_nightclub				<- club
+city_nightclubToilet		<- gt 'city_nightclub', 'toi' -> gt 'city_nightclubToilet', 'start'
+hookup_virgin
+pet_dog
+rex_party
+rex_party_firstTime
+rex_party_smallEvents
+rex_party_sexEvents
+vicky_meynold_schedule
+katja_meynold_schedule
+igor_schedule
+pav_beach_chat
 
 === deleted locations ===
 
@@ -16,6 +29,14 @@ npc_intro					-> gs 'npc','intro',..,..
 gschool_schedule			-> gs 'gschool', 'schedule'
 cum_arrcheat				-> gs 'fertility', 'cum_arrcheat'
 gKristinaZv					-> gt 'Zvereva_sub_1', 'showers'
+club						-> gt 'city_nightclub'
+rex_party_home
+rex_party_events
+rex_party_boys_events
+rex_party_girls_events
+rex_party_sister_events
+
+
 
 Variables:
 

+ 283 - 275
glife.qproj

@@ -73,6 +73,9 @@
 		<Location name="medical_din"/>
 		<Location name="sweat"/>
 		<Location name="piercing_management"/>
+		<Location name="$face_image"/>
+		<Location name="$body_image"/>
+		<Location name="$pube_image"/>
 	</Folder>
 	<Folder name="Stimulus">
 		<Location name="boyStat"/>
@@ -83,15 +86,13 @@
 		<Location name="dinSex2"/>
 		<Location name="dinsexFX"/>
 		<Location name="oral"/>
-	</Folder>
-	<Folder name="CumManage">
 		<Location name="Cum_Manage"/>
 		<Location name="cum_cleanup"/>
 		<Location name="cum_call"/>
 		<Location name="pregriskeval"/>
 		<Location name="cuminsidereact"/>
 	</Folder>
-	<Folder name="clothing">
+	<Folder name="Clothing">
 		<Location name="wardrobe"/>
 		<Location name="clothing"/>
 		<Location name="clothing_QV"/>
@@ -145,7 +146,7 @@
 		<Location name="portnoi"/>
 		<Location name="portnoi2"/>
 	</Folder>
-	<Folder name="shoes">
+	<Folder name="Shoes">
 		<Location name="shoes"/>
 		<Location name="$shoe_image"/>
 		<Location name="$shoe_description"/>
@@ -160,7 +161,7 @@
 		<Location name="$attributes_eroto_shoes"/>
 		<Location name="$attributes_scandalicious_shoes"/>
 	</Folder>
-	<Folder name="coats">
+	<Folder name="Coats">
 		<Location name="coats"/>
 		<Location name="$coat_image"/>
 		<Location name="coat_attributes"/>
@@ -171,7 +172,7 @@
 		<Location name="$attributes_gm_coats"/>
 		<Location name="$attributes_moncheri_coats"/>
 	</Folder>
-	<Folder name="underwear">
+	<Folder name="Underwear">
 		<Location name="underwear"/>
 		<Location name="bras"/>
 		<Location name="$bra_image"/>
@@ -222,6 +223,21 @@
 		<Location name="preALT"/>
 		<Location name="preCSB"/>
 	</Folder>
+	<Folder name="Intro">
+		<Location name="intro_sg"/>
+		<Location name="intro_sg_m"/>
+		<Location name="intro_sg_tg"/>
+		<Location name="intro_city"/>
+		<Location name="intro_city_m"/>
+		<Location name="intro_city_tg"/>
+		<Location name="intro_uni"/>
+		<Location name="intro_uni_m"/>
+		<Location name="intro_uni_tg"/>
+		<Location name="intro_initialization"/>
+		<Location name="intro_customization"/>
+		<Location name="intro_sg_select"/>
+		<Location name="intro_sg_select_custom"/>
+	</Folder>
 	<Folder name="NPCManage">
 		<Location name="npccleanc"/>
 		<Location name="npcgeneratec"/>
@@ -268,7 +284,7 @@
 		<Location name="TV"/>
 		<Location name="vann"/>
 	</Folder>
-	<Folder name="Shared locations">
+	<Folder name="Home-Shared locations">
 		<Location name="outdoors"/>
 		<Location name="indoors"/>
 		<Location name="shop"/>
@@ -285,6 +301,7 @@
 		<Location name="fame_events"/>
 		<Location name="noticeboard"/>
 		<Location name="shop_allure"/>
+		<Location name="gloryhole"/>
 	</Folder>
 	<Folder name="Post office">
 		<Location name="post_office"/>
@@ -292,37 +309,7 @@
 		<Location name="post_deliveries"/>
 		<Location name="post_events"/>
 	</Folder>
-	<Folder name="Home Street - Locations">
-		<Location name="city_residential"/>
-		<Location name="city_apt_building"/>
-		<Location name="city_pharmacy"/>
-		<Location name="city_smalloffice"/>
-		<Location name="city_dima"/>
-		<Location name="city_kafegivisex"/>
-		<Location name="city_irinaroom"/>
-		<Location name="city_kafe"/>
-		<Location name="city_kafe2"/>
-		<Location name="city_kafeend"/>
-		<Location name="city_kavkazkafe"/>
-		<Location name="city_jorahouse"/>
-		<Location name="city_lake"/>
-		<Location name="city_lake_path"/>
-		<Location name="city_drugden"/>
-		<Location name="city_bobka"/>
-		<Location name="city_park"/>
-		<Location name="park_walkeventsrnd"/>
-		<Location name="park_walkevents"/>
-		<Location name="city_clinic"/>
-		<Location name="city_market"/>
-		<Location name="city_marketwork"/>
-		<Location name="city_sauna"/>
-		<Location name="city_saunawhore"/>
-		<Location name="city_trashplace"/>
-		<Location name="city_trashplaceevents"/>
-		<Location name="city_marketsex"/>
-		<Location name="city_church"/>
-	</Folder>
-	<Folder name="BDSM_Club">
+	<Folder name="BDSM Club">
 		<Location name="BDSM_Club"/>
 		<Location name="BDSM_training"/>
 		<Location name="MHall"/>
@@ -400,7 +387,7 @@
 		<Location name="nichTaras"/>
 		<Location name="nichUtil"/>
 	</Folder>
-	<Folder name="Apartment">
+	<Folder name="Home- City Residental Apartment">
 		<Location name="bedr"/>
 		<Location name="sitr"/>
 		<Location name="vanr"/>
@@ -408,7 +395,7 @@
 		<Location name="korr"/>
 		<Location name="housecall"/>
 	</Folder>
-	<Folder name="House">
+	<Folder name="Home- City Residental House">
 		<Location name="city_house_res_misc"/>
 		<Location name="city_house_res_bedr"/>
 		<Location name="city_house_res_bathr"/>
@@ -427,7 +414,7 @@
 		<Location name="gopsex"/>
 		<Location name="misha"/>
 	</Folder>
-	<Folder name="Parent's Apartment">
+	<Folder name="Home-Parent's Apartment">
 		<Location name="bedrPar"/>
 		<Location name="bedrPar2"/>
 		<Location name="sitrPar"/>
@@ -452,37 +439,23 @@
 		<Location name="family"/>
 		<Location name="ludahome"/>
 		<Location name="olu"/>
-	</Folder>
-	<Folder name="Rolan">
-		<Location name="pav_complexrolan"/>
-		<Location name="rolanapt"/>
-		<Location name="rolanbath"/>
-	</Folder>
-	<Folder name="Generic boyfriend">
-		<Location name="Gnpc"/>
-		<Location name="Gnpc_cinema"/>
-		<Location name="Gnpc2"/>
-		<Location name="hookup"/>
-		<Location name="hookup_sex"/>
-		<Location name="hookup_virgin"/>
-		<Location name="hookup_after"/>
-		<Location name="hookup_talk"/>
-		<Location name="hookup_morning"/>
-	</Folder>
-	<Folder name="Brother porn">
 		<Location name="brother"/>
 		<Location name="brother2"/>
 		<Location name="brother_voyeur"/>
 		<Location name="brother_lessons"/>
 		<Location name="seeporn"/>
 	</Folder>
+	<Folder name="Rolan">
+		<Location name="pav_complexrolan"/>
+		<Location name="rolanapt"/>
+		<Location name="rolanbath"/>
+	</Folder>
 	<Folder name="Rex">
 		<Location name="rex_events"/>
-		<Location name="rex_party_home"/>
-		<Location name="rex_party_events"/>
-		<Location name="rex_party_boys_events"/>
-		<Location name="rex_party_girls_events"/>
-		<Location name="rex_party_sister_events"/>
+		<Location name="rex_party_firstTime"/>
+		<Location name="rex_party"/>
+		<Location name="rex_party_smallEvents"/>
+		<Location name="rex_party_sexEvents"/>
 	</Folder>
 	<Folder name="Dima Nosov">
 		<Location name="dimaEv"/>
@@ -501,6 +474,7 @@
 	<Folder name="Igor Kruglov">
 		<Location name="igorev"/>
 		<Location name="igorhome"/>
+		<Location name="igor_schedule"/>
 	</Folder>
 	<Folder name="Katja Meynold">
 		<Location name="katjaEv"/>
@@ -508,12 +482,14 @@
 		<Location name="KatjaHomeTalk"/>
 		<Location name="katja_sex"/>
 		<Location name="Katja_Tanga"/>
+		<Location name="katja_meynold_schedule"/>
 	</Folder>
-	<Folder name="Vika Meynold">
+	<Folder name="Viky Meynold">
 		<Location name="mey_home"/>
 		<Location name="NikoMeyHome"/>
 		<Location name="mey_vika_events"/>
 		<Location name="mey_tamara_events"/>
+		<Location name="vicky_meynold_schedule"/>
 	</Folder>
 	<Folder name="Niko Volkov">
 		<Location name="VolkovHome"/>
@@ -537,54 +513,6 @@
 	<Folder name="Sonia">
 		<Location name="soniadisco"/>
 	</Folder>
-	<Folder name="Gadyukino">
-		<Location name="gadhouse"/>
-		<Location name="grandmahelp"/>
-		<Location name="grandpahelp"/>
-		<Location name="gaddvor"/>
-		<Location name="gadsarai"/>
-		<Location name="gadbana"/>
-		<Location name="gadukino"/>
-		<Location name="gadukino_event"/>
-		<Location name="gadriver"/>
-		<Location name="meadow"/>
-		<Location name="mitka"/>
-		<Location name="mitkabuh"/>
-		<Location name="mitkabuh_group"/>
-		<Location name="mitkasex"/>
-		<Location name="gadprostitutes"/>
-		<Location name="bicycle"/>
-		<Location name="gadfield"/>
-		<Location name="gadgarden"/>
-		<Location name="gadmarket"/>
-		<Location name="gadroad"/>
-		<Location name="grigory"/>
-		<Location name="miroslavahome"/>
-		<Location name="miroslava"/>
-		<Location name="mirasex"/>
-		<Location name="mirafather"/>
-		<Location name="gadforest"/>
-		<Location name="gadforest_event"/>
-		<Location name="gadforestlost"/>
-		<Location name="gad_church"/>
-	</Folder>
-	<Folder name="Swamp">
-		<Location name="swamp"/>
-		<Location name="swamp_yard"/>
-		<Location name="swamphouse"/>
-		<Location name="swampspring"/>
-		<Location name="backwater"/>
-		<Location name="hunters"/>
-		<Location name="huntersex"/>
-		<Location name="hunterLoveSex"/>
-		<Location name="hunter_ambient"/>
-		<Location name="hunter_favors"/>
-		<Location name="hunter_interactions"/>
-		<Location name="swamp_woods"/>
-		<Location name="andreihunter"/>
-		<Location name="igorhunter"/>
-		<Location name="sergeihunter"/>
-	</Folder>
 	<Folder name="Generator">
 		<Location name="placer"/>
 		<Location name="placer_pav_park"/>
@@ -604,49 +532,6 @@
 		<Location name="fbGar"/>
 		<Location name="zsoft_gopskverGorSlut"/>
 	</Folder>
-	<Folder name="Pavlovsk">
-		<Location name="pav_residential"/>
-		<Location name="pav_commercial"/>
-		<Location name="pav_commercial_offices"/>
-		<Location name="pav_industrial"/>
-		<Location name="leonid"/>
-		<Location name="gargazel"/>
-		<Location name="garfather"/>
-		<Location name="pav_factory"/>
-		<Location name="pav_pharmacy"/>
-		<Location name="gkafe"/>
-		<Location name="motherkafeboss"/>
-		<Location name="pav_clinic"/>
-		<Location name="therapist"/>
-		<Location name="therapist_reminder"/>
-		<Location name="pavlov_home"/>
-		<Location name="gevent"/>
-		<Location name="pav_park"/>
-		<Location name="gopskver"/>
-		<Location name="gskino"/>
-		<Location name="cafe_parco"/>
-		<Location name="kotovEv"/>
-		<Location name="IvanEv"/>
-		<Location name="strela"/>
-		<Location name="kotovSex"/>
-		<Location name="kotovdom"/>
-		<Location name="boymass"/>
-		<Location name="barbershop"/>
-		<Location name="MagEncounterFairy"/>
-		<Location name="pav_church"/>
-		<Location name="pav_church2"/>
-		<Location name="brothel"/>
-		<Location name="tour_guide"/>
-		<Location name="shop_coco_carmen"/>
-		<Location name="marisha_ev"/>
-	</Folder>
-	<Folder name="pav_lake">
-		<Location name="pav_lake"/>
-		<Location name="pav_lake_nude"/>
-		<Location name="pav_lake_nude_events"/>
-		<Location name="pav_lake_nude_forest"/>
-		<Location name="LakeBoyZ"/>
-	</Folder>
 	<Folder name="Fedor">
 		<Location name="FedorEv"/>
 		<Location name="FedorEv2"/>
@@ -694,7 +579,7 @@
 		<Location name="nerd_game_night"/>
 		<Location name="gopnik_initiation"/>
 	</Folder>
-	<Folder name="Shared_appartment">
+	<Folder name="Home-Shared_appartment">
 		<Location name="pav_shared_apt"/>
 		<Location name="pav_shared_gp"/>
 		<Location name="pav_shared_nd"/>
@@ -716,7 +601,7 @@
 		<Location name="VolleyTrenCentr"/>
 		<Location name="VolleyTrenerSpeak"/>
 		<Location name="Voltrenersex"/>
-		<Location name="chessplay"/>
+		<Location name="chessplay"/>git
 		<Location name="boilerroom"/>
 		<Location name="krupo"/>
 		<Location name="kruchess"/>
@@ -724,8 +609,6 @@
 		<Location name="Snpc"/>
 		<Location name="cumreaction"/>
 		<Location name="kotovtalker"/>
-	</Folder>
-	<Folder name="Pavlovsk Disco">
 		<Location name="pav_disco"/>
 		<Location name="pav_disco_coolkids"/>
 		<Location name="pav_disco_gopniks"/>
@@ -754,7 +637,7 @@
 		<Location name="Zvereva_events"/>
 		<Location name="Zvereva_sub_1"/>
 	</Folder>
-	<Folder name="Julia Milov 12">
+	<Folder name="Julia Milov">
 		<Location name="JuliaMilGo"/>
 		<Location name="JuliaMilHome"/>
 		<Location name="JuliaMilVhod"/>
@@ -768,7 +651,7 @@
 		<Location name="arturdin"/>
 		<Location name="arturQW"/>
 	</Folder>
-	<Folder name="Natasha Belova 16">
+	<Folder name="Natasha Belova">
 		<Location name="natbelapt"/>
 		<Location name="natbelEv"/>
 		<Location name="natkolEv"/>
@@ -815,6 +698,69 @@
 		<Location name="brosok"/>
 		<Location name="gossips"/>
 	</Folder>
+	<Folder name="Salon">
+		<Location name="salon"/>
+		<Location name="masseuse_work"/>
+		<Location name="masseuse_schedule"/>
+		<Location name="masseuse_break"/>
+	</Folder>
+	<Folder name="Photo studio">
+		<Location name="foto"/>
+		<Location name="foto_shoot"/>
+		<Location name="foto_practice"/>
+		<Location name="foto_events"/>
+		<Location name="foto_events2"/>
+		<Location name="foto_model_documentary"/>
+		<Location name="foto_albums"/>
+		<Location name="foto_models"/>
+		<Location name="foto_models2"/>
+	</Folder>
+	<Folder name="Crime and Punishment">
+		<Location name="police_station"/>
+		<Location name="sentence"/>
+		<Location name="shoplifting"/>
+	</Folder>
+	<Folder name="Mansion">
+		<Location name="city_mansion_residence_1"/>
+		<Location name="city_mansion_residence_2"/>
+		<Location name="city_mansion_residence_3"/>
+	</Folder>
+	<Folder name="Porn Studio">
+		<Location name="BDSM"/>
+		<Location name="pornstudio"/>
+		<Location name="pornfilm"/>
+		<Location name="pornhist"/>
+		<Location name="pornschedule"/>
+	</Folder>
+	<Folder name="Boys">
+		<Location name="BDman"/>
+		<Location name="BDsex"/>
+		<Location name="boy"/>
+		<Location name="boyfrend"/>
+		<Location name="boylove"/>
+	</Folder>
+	<Folder name="music">
+		<Location name="music_actions"/>
+		<Location name="music_bedroompractice"/>
+		<Location name="music_onlinemusic"/>
+ 		<Location name="music_gigstarts"/>
+   		<Location name="music_guitarlesson"/>   
+   		<Location name="music_buskingevents"/>
+		<Location name="music_delparco"/>
+	</Folder>
+	<Folder name="Lover">
+		<Location name="girl"/>
+		<Location name="girlfriend"/>
+		<Location name="dateF"/>
+		<Location name="lover"/>
+		<Location name="lover_change"/>
+		<Location name="lover_likes"/>
+		<Location name="lover_love"/>
+		<Location name="lover_meet"/>
+		<Location name="lover_pref"/>
+		<Location name="lover_pronouns"/>
+		<Location name="pronouns"/>
+	</Folder>
 	<Folder name="City Center">
 		<Location name="city_center"/>
 		<Location name="city_train"/>
@@ -827,12 +773,11 @@
 		<Location name="moncheri"/>
 		<Location name="lusso"/>
 		<Location name="butoilet"/>
-		<Location name="cfnm"/>
-		<Location name="club"/>
+		<Location name="city_nightclub"/>
+		<Location name="city_nightclubToilet"/>
 		<Location name="Club2"/>
 		<Location name="vipclub"/>
 		<Location name="danceclass"/>
-		<Location name="uni_dorm"/>
 		<Location name="city_library"/>
 		<Location name="fit"/>
 		<Location name="talent_agency"/>
@@ -858,27 +803,35 @@
 		<Location name="shop_materinstvo"/>
 		<Location name="shop_photography"/>
 	</Folder>
-	<Folder name="Salon">
-		<Location name="salon"/>
-		<Location name="masseuse_work"/>
-		<Location name="masseuse_schedule"/>
-		<Location name="masseuse_break"/>
-	</Folder>
-	<Folder name="Photo studio">
-		<Location name="foto"/>
-		<Location name="foto_shoot"/>
-		<Location name="foto_practice"/>
-		<Location name="foto_events"/>
-		<Location name="foto_events2"/>
-		<Location name="foto_model_documentary"/>
-		<Location name="foto_albums"/>
-		<Location name="foto_models"/>
-		<Location name="foto_models2"/>
-	</Folder>
-	<Folder name="Crime and Punishment">
-		<Location name="police_station"/>
-		<Location name="sentence"/>
-		<Location name="shoplifting"/>
+	<Folder name="City Residential">
+		<Location name="city_residential"/>
+		<Location name="city_apt_building"/>
+		<Location name="city_pharmacy"/>
+		<Location name="city_smalloffice"/>
+		<Location name="city_dima"/>
+		<Location name="city_kafegivisex"/>
+		<Location name="city_irinaroom"/>
+		<Location name="city_kafe"/>
+		<Location name="city_kafe2"/>
+		<Location name="city_kafeend"/>
+		<Location name="city_kavkazkafe"/>
+		<Location name="city_jorahouse"/>
+		<Location name="city_lake"/>
+		<Location name="city_lake_path"/>
+		<Location name="city_drugden"/>
+		<Location name="city_bobka"/>
+		<Location name="city_park"/>
+		<Location name="park_walkeventsrnd"/>
+		<Location name="park_walkevents"/>
+		<Location name="city_clinic"/>
+		<Location name="city_market"/>
+		<Location name="city_marketwork"/>
+		<Location name="city_sauna"/>
+		<Location name="city_saunawhore"/>
+		<Location name="city_trashplace"/>
+		<Location name="city_trashplaceevents"/>
+		<Location name="city_marketsex"/>
+		<Location name="city_church"/>
 	</Folder>
 	<Folder name="City Industrial">
 		<Location name="city_industrial"/>
@@ -900,17 +853,6 @@
 		<Location name="pirsingsalon"/>
 		<Location name="obekt"/>
 		<Location name="obekt2"/>
-	</Folder>
-	<Folder name="Red Light">
-		<Location name="city_redlight"/>
-		<Location name="bordel"/>
-		<Location name="bordelv"/>
-		<Location name="sexshop"/>
-		<Location name="stripclub"/>
-		<Location name="stwork"/>
-		<Location name="stwork2"/>
-	</Folder>
-	<Folder name="Bar Rabotnik">
 		<Location name="qwBarPolet"/>
 		<Location name="qwBarPoletToilet"/>
 		<Location name="qwBarBilliard"/>
@@ -920,74 +862,31 @@
 		<Location name="MartinSex"/>
 		<Location name="MartinSex2"/>
 		<Location name="MartinSex3"/>
+		<Location name="casino"/>
+		<Location name="mqroom"/>
+		<Location name="hotel"/>
+		<Location name="deckShuffle"/>
 	</Folder>
-	<Folder name="North Road">
-		<Location name="dachain"/>
-		<Location name="dachamy"/>
-		<Location name="dachaogr"/>
-		<Location name="dachaogr0"/>
-		<Location name="dachi"/>
-		<Location name="graveyard"/>
-		<Location name="motel"/>
-		<Location name="road"/>
-		<Location name="city_mansion_entrance"/>
-		<Location name="furi"/>
-		<Location name="furisex"/>
-	</Folder>
-	<Folder name="Mansion">
-		<Location name="city_mansion_residence_1"/>
-		<Location name="city_mansion_residence_2"/>
-		<Location name="city_mansion_residence_3"/>
-	</Folder>
-	<Folder name="Porn">
-		<Location name="BDSM"/>
-		<Location name="pornstudio"/>
-		<Location name="pornfilm"/>
-		<Location name="pornhist"/>
-		<Location name="pornschedule"/>
-	</Folder>
-	<Folder name="Boys">
-		<Location name="BDman"/>
-		<Location name="BDsex"/>
-		<Location name="boy"/>
-		<Location name="boyfrend"/>
-		<Location name="boylove"/>
-	</Folder>
-	<Folder name="music">
-		<Location name="music_actions"/>
-		<Location name="music_bedroompractice"/>
-		<Location name="music_onlinemusic"/>
- 		<Location name="music_gigstarts"/>
-   		<Location name="music_guitarlesson"/>   
-   		<Location name="music_buskingevents"/>
-		<Location name="music_delparco"/>
-	</Folder>
-	<Folder name="Lover">
-		<Location name="girl"/>
-		<Location name="girlfriend"/>
-		<Location name="dateF"/>
-		<Location name="lover"/>
-		<Location name="lover_change"/>
-		<Location name="lover_likes"/>
-		<Location name="lover_love"/>
-		<Location name="lover_meet"/>
-		<Location name="lover_pref"/>
-		<Location name="lover_pronouns"/>
-		<Location name="pronouns"/>
+	<Folder name="City Red Light">
+		<Location name="city_redlight"/>
+		<Location name="bordel"/>
+		<Location name="bordelv"/>
+		<Location name="sexshop"/>
+		<Location name="stripclub"/>
+		<Location name="cfnm"/>
+		<Location name="stwork"/>
+		<Location name="stwork2"/>
 	</Folder>
-	<Folder name="University">
+	<Folder name="City_Island">
 		<Location name="city_island"/>
 		<Location name="uni_shop"/>
 		<Location name="shop_dolls"/>
 		<Location name="shop_nerdvana"/>
-		<Location name="vecher"/>
-		<Location name="djibril"/>
-		<Location name="gosha"/>
-		<Location name="kendra"/>
-		<Location name="djibrilev1"/>
-		<Location name="Vika"/>
-		<Location name="vikaev1"/>
+		<Location name="shop_flamingos"/>
+	</Folder>
+	<Folder name="University">
 		<Location name="uni_grounds"/>
+		<Location name="uni_dorm"/>
 		<Location name="uni_admin"/>
 		<Location name="uni_programs"/>
 		<Location name="uni_lessons"/>
@@ -999,31 +898,138 @@
 		<Location name="uni_library"/>
 		<Location name="unicoursework"/>
 		<Location name="uniutil"/>
-		<Location name="shop_flamingos"/>
 	</Folder>
-	<Folder name="Game 1">
+	<Folder name="University Characters">
+		<Location name="vecher"/>
+		<Location name="djibril"/>
+		<Location name="gosha"/>
+		<Location name="kendra"/>
+		<Location name="djibrilev1"/>
+		<Location name="Vika"/>
+		<Location name="vikaev1"/>
+	</Folder>
+	<Folder name="Pavlovsk">
+		<Location name="pav_residential"/>
+		<Location name="pav_commercial"/>
+		<Location name="pav_commercial_offices"/>
+		<Location name="pav_industrial"/>
+		<Location name="leonid"/>
+		<Location name="gargazel"/>
+		<Location name="garfather"/>
+		<Location name="pav_factory"/>
+		<Location name="pav_pharmacy"/>
+		<Location name="gkafe"/>
+		<Location name="motherkafeboss"/>
+		<Location name="pav_clinic"/>
+		<Location name="therapist"/>
+		<Location name="therapist_reminder"/>
+		<Location name="pavlov_home"/>
+		<Location name="gevent"/>
+		<Location name="pav_park"/>
+		<Location name="gopskver"/>
+		<Location name="gskino"/>
+		<Location name="cafe_parco"/>
+		<Location name="kotovEv"/>
+		<Location name="IvanEv"/>
+		<Location name="strela"/>
+		<Location name="kotovSex"/>
+		<Location name="kotovdom"/>
+		<Location name="boymass"/>
+		<Location name="barbershop"/>
+		<Location name="MagEncounterFairy"/>
+		<Location name="pav_church"/>
+		<Location name="pav_church2"/>
+		<Location name="brothel"/>
+		<Location name="tour_guide"/>
+		<Location name="shop_coco_carmen"/>
+		<Location name="marisha_ev"/>
+	</Folder>
+	<Folder name="Pav Lake">
+		<Location name="pav_lake"/>
+		<Location name="pav_lake_nude"/>
+		<Location name="pav_lake_nude_events"/>
+		<Location name="pav_lake_nude_forest"/>
+		<Location name="LakeBoyZ"/>
+		<Location name="pav_beach_chat"/>
+	</Folder>
+	<Folder name="Gadyukino">
+		<Location name="gadhouse"/>
+		<Location name="grandmahelp"/>
+		<Location name="grandpahelp"/>
+		<Location name="gaddvor"/>
+		<Location name="gadsarai"/>
+		<Location name="gadbana"/>
+		<Location name="gadukino"/>
+		<Location name="gadukino_event"/>
+		<Location name="gadriver"/>
+		<Location name="meadow"/>
+		<Location name="gadprostitutes"/>
+		<Location name="bicycle"/>
+		<Location name="gadfield"/>
+		<Location name="gadgarden"/>
+		<Location name="gadmarket"/>
+		<Location name="gadroad"/>
+		<Location name="miroslavahome"/>
+		<Location name="gadforest"/>
+		<Location name="gadforest_event"/>
+		<Location name="gadforestlost"/>
+		<Location name="gad_church"/>
+		<Location name="swamp"/>
+		<Location name="swamp_yard"/>
+		<Location name="swamphouse"/>
+		<Location name="swampspring"/>
+		<Location name="backwater"/>
+	</Folder>
+	<Folder name="Gadyukino Characters">
+		<Location name="hunters"/>
+		<Location name="huntersex"/>
+		<Location name="hunterLoveSex"/>
+		<Location name="hunter_ambient"/>
+		<Location name="hunter_favors"/>
+		<Location name="hunter_interactions"/>
+		<Location name="swamp_woods"/>
+		<Location name="andreihunter"/>
+		<Location name="igorhunter"/>
+		<Location name="sergeihunter"/>
+		<Location name="mitka"/>
+		<Location name="mitkabuh"/>
+		<Location name="mitkabuh_group"/>
+		<Location name="mitkasex"/>
+		<Location name="miroslava"/>
+		<Location name="mirasex"/>
+		<Location name="mirafather"/>
+		<Location name="grigory"/>
+	</Folder>
+	<Folder name="North Road">
+		<Location name="dachain"/>
+		<Location name="dachamy"/>
+		<Location name="dachaogr"/>
+		<Location name="dachaogr0"/>
+		<Location name="dachi"/>
+		<Location name="graveyard"/>
+		<Location name="motel"/>
+		<Location name="road"/>
+		<Location name="city_mansion_entrance"/>
+		<Location name="furi"/>
+		<Location name="furisex"/>
+	</Folder>
+	<Folder name="Computer Game">
 		<Location name="KGstart"/>
 		<Location name="KGOLgame"/>
 		<Location name="KGOLenemy"/>
 		<Location name="KGOLboss"/>
 		<Location name="KGOLfight"/>
 		<Location name="KGOLexpa"/>
-	</Folder>
-	<Folder name="Game 2">
 		<Location name="KGDstart"/>
 		<Location name="KGDgame"/>
 		<Location name="KGDexp"/>
 		<Location name="KGDbefore"/>
 		<Location name="KGDfight"/>
 		<Location name="KGDparty"/>
-	</Folder>
-	<Folder name="Game 3">
 		<Location name="KGZstart"/>
 		<Location name="KGZgame"/>
 		<Location name="KGZdyn"/>
 		<Location name="KGZfight"/>
-	</Folder>
-	<Folder name="Game 4">
 		<Location name="FSstart"/>
 		<Location name="FSgame"/>
 		<Location name="FSstat"/>
@@ -1055,12 +1061,6 @@
 		<Location name="qwloc"/>
 		<Location name="qwmeet"/>
 	</Folder>
-	<Folder name="Casino">
-		<Location name="casino"/>
-		<Location name="mqroom"/>
-		<Location name="hotel"/>
-		<Location name="deckShuffle"/>
-	</Folder>
 	<Folder name="Game Menu">
 		<Location name="$menu_setting"/>
 		<Location name="$menu_skills"/>
@@ -1100,6 +1100,17 @@
 		<Location name="buklinik_event"/>
 		<Location name="tryndin"/>
 	</Folder>
+	<Folder name="Generic boyfriend">
+		<Location name="Gnpc"/>
+		<Location name="Gnpc_cinema"/>
+		<Location name="Gnpc2"/>
+		<Location name="hookup"/>
+		<Location name="hookup_sex"/>
+		<Location name="hookup_virgin"/>
+		<Location name="hookup_after"/>
+		<Location name="hookup_talk"/>
+		<Location name="hookup_morning"/>
+	</Folder>
 	<Folder name="Misc">
 		<Location name="beg"/>
 		<Location name="beg1"/>
@@ -1113,9 +1124,6 @@
 		<Location name="$single_stock_item"/>
 		<Location name="$buy_item"/>
 		<Location name="$buy_single_item"/>
-		<Location name="$face_image"/>
-		<Location name="$body_image"/>
-		<Location name="$pube_image"/>
 	</Folder>
 	<Folder name="New Year 2010">
 		<Location name="nyp_school"/>

+ 1 - 1
locations/BDSM.qsrc

@@ -96,7 +96,7 @@ act 'Begin participating in the shooting':
 							act 'Time to finish...':
 								cla
 								*clr
-								facial += 1
+								
 								swallow += 1
 
 !!Image needed								if pcs_haircol = 0:'<center><img <<$set_imgh>> src="images/locations/city/redlight/studio_porn/brunette_9.jpg"></center>'

+ 1 - 1
locations/BDsex.qsrc

@@ -454,7 +454,7 @@ if $ARGS[0] = 'minet':
 end
 
 if $ARGS[0] = 'facial':
-	facial += 1
+	
 	minut += 3
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial<<rand(11, 15)>>.jpg"></center>'
 	if protect = 1:

+ 1 - 1
locations/BurgerTip.qsrc

@@ -1004,7 +1004,7 @@ if $ARGS[0] = 'ily_work2':
 				*clr&cla
 				BurgerQW['IlyQWBlackmail'] = 2
 				gs 'cum_call', 'face', 'A76', 1
-				facial += 1
+				
 				guy += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/ilyushkin/sex/ilyfacial.jpg"></center>'

+ 9 - 0
locations/Cheatmenu_din.qsrc

@@ -622,6 +622,13 @@ $cheatmenu['permanent'] = {
 	'</tr></table></b></center>'
 }
 
+$cheatmenu['therapist_reset'] = {
+	gs 'therapist'
+	dynamic $RestTherapyVariables
+	gs 'stat'
+	dynamic $cheatmenu['state']
+}
+
 $cheatmenu['state'] = {
 	gs'stat'
 	*clr & cla
@@ -697,6 +704,8 @@ $cheatmenu['state'] = {
 		end
 		'<font color="grey">Does <<$pcs_firstname>> know she induced lactation herself, or not? (This is only used for some events.)</font>'
 	end
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''therapist_reset'']">Reset therapist states</a>'
 	'</tr></table></b></center>'
 }
 

+ 9 - 9
locations/Club2.qsrc

@@ -13,7 +13,7 @@ if $ARGS[0] = 'toilet1':
 	'The next thing you know, a cock is pushed through the hole. A lustful voice says, "here''s a treat for you, baby."'
 	'This is so unexpected, that you hardly believe any of this is real, as you tentatively touch their member. It is hard and hot.'
 
-	act 'Leave':gt 'club', 'inside'
+	act 'Leave':gt 'city_nightclub', 'inside'
 
 	act 'Take a closer look':
 		*clr & cla
@@ -53,7 +53,7 @@ if $ARGS[0] = 'toilet1':
 				gs 'arousal', 'end'
 				gs 'stat'
 				
-				act 'Leave':gt 'club', 'inside'
+				act 'Leave':gt 'city_nightclub', 'inside'
 			end
 
 			act 'Spit out':
@@ -69,7 +69,7 @@ if $ARGS[0] = 'toilet1':
 				gs 'arousal', 'end'
 				gs 'stat'
 				
-				act 'Leave':gt 'club', 'inside'
+				act 'Leave':gt 'city_nightclub', 'inside'
 			end
 		end
 	end
@@ -83,7 +83,7 @@ if $ARGS[0] = 'toilet':
 	gs 'arousal', 'clit_finger', 3 
 	gs 'stat'
 
-	act 'Leave':gs 'arousal', 'end' & gt 'club', 'inside'
+	act 'Leave':gs 'arousal', 'end' & gt 'city_nightclub', 'inside'
 
 	act 'Caress yourself':
 		cla
@@ -102,7 +102,7 @@ if $ARGS[0] = 'toilet':
 		gs 'arousal', 'end'
 		gs 'stat'
 	
-		act 'Leave':gt 'club', 'inside'
+		act 'Leave':gt 'city_nightclub', 'inside'
 	end
 end
 
@@ -111,7 +111,7 @@ if $ARGS[0] = 'toilet2':
 	'You sit in a booth and hear both adjacent doors closing as two others enter.'
 	'A voice from the next stall tells you - "Don''t be afraid baby, we won''t hurt you! On the contrary, we will give you some delicious candy with extra cream filling.'
 
-	act 'Leave':gt 'club', 'inside'
+	act 'Leave':gt 'city_nightclub', 'inside'
 
 	act 'Take a closer look':
 		*clr & cla
@@ -189,10 +189,10 @@ if $ARGS[0] = 'toilet2':
 								'A male voice says "I have some more work for you."'
 								'He pushes a card through the hole and says "Come find me at my studio if you want to have fun and make more money."'
 
-								act 'Leave':gt 'club', 'inside'
+								act 'Leave':gt 'city_nightclub', 'inside'
 							end
 						else
-							act 'Leave':gt 'club', 'inside'
+							act 'Leave':gt 'city_nightclub', 'inside'
 						end
 					end
 				end
@@ -201,4 +201,4 @@ if $ARGS[0] = 'toilet2':
 	end
 end
 
---- Club2 ---------------------------------
+--- Club2 ---------------------------------

+ 1 - 0
locations/Cum_Manage.qsrc

@@ -519,6 +519,7 @@ if $ARGS[0] = 'cumgather':
 		elseif cloc = 10:
 			$part = 'arms'
 		elseif cloc = 11:
+			stat['cum_facial'] += 1
 			$part = 'face'
 		elseif cloc = 14:
 			$part = 'stomach'

+ 1 - 1
locations/FedorEv2.qsrc

@@ -800,7 +800,7 @@ if $ARGS[0] = 'Park 2':
 				FedorLuv += 2
 				gs 'boyStat', 'A5'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev2/park/swing4.jpg"></center>'
-				'You grab the back of Fedor''s neck then slowly pull it toward you while tilting your head forward until you feel Fedor''s lips make contact with yours. You passionately kiss Fedor while running your fingers though his hair gently. The kiss lasts for a few minutes but soon after you lower your head then look back up at Fedor''s eyes as he says, "<<$pcs_firstname>> you are such a great kisser and your lips are so soft." yuo give Fedor a smile as you reply, "Keep treating me right and I may do more for you in the future." Fedor returns the smile as he responds, "I''ll treat you better than "Right" just stay with me and I''ll show you how a woman should be treated. Anyway are you ready to head home or do you have some business in town to attend to?"'
+				'You grab the back of Fedor''s neck then slowly pull it toward you while tilting your head forward until you feel Fedor''s lips make contact with yours. You passionately kiss Fedor while running your fingers though his hair gently. The kiss lasts for a few minutes but soon after you lower your head then look back up at Fedor''s eyes as he says, "<<$pcs_firstname>> you are such a great kisser and your lips are so soft." You give Fedor a smile as you reply, "Keep treating me right and I may do more for you in the future." Fedor returns the smile as he responds, "I''ll treat you better than "Right" just stay with me and I''ll show you how a woman should be treated. Anyway are you ready to head home or do you have some business in town to attend to?"'
 				gs 'arousal', 'kiss', 10, 'dom'
 				gs 'arousal', 'end'	
 				gs 'stat'		

+ 3 - 3
locations/Gnpc2.qsrc

@@ -526,7 +526,7 @@ $din_gboy_go_to_disco = {
 										gs 'arousal', 'bj', 5
 										spafinloc = 11
 										gs 'cum_manage'
-										facial += 1
+										
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 										'You remove his member from your mouth just as a stream of hot sperm hits your face, then another and another and finally he stopped dumping his thick cum on your face.'
@@ -642,7 +642,7 @@ $din_gboy_go_to_disco = {
 													gs 'arousal', 'bj', 5
 													spafinloc = 11
 													gs 'cum_manage'
-													facial += 1
+													
 													gs 'stat'
 													'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 													'You remove his member from your mouth and then a stream of hot sperm hits your face, then another and another and finally your guy stops shooting his thick cum on your face.'
@@ -875,7 +875,7 @@ $din_gboy_tits = {
 						pcs_horny += 10
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'
 						'You remove his member from your mouth just as a stream of hot sperm hits you in the face, then another and another until he eventually finished coating your face with his cum.'

+ 457 - 118
locations/KatjaHomeTalk.qsrc

@@ -6,6 +6,13 @@
 !! katjaQW['QWstage'] = 2 You have been to Katja''s house and you can go there to hang out with her. (meynoldQW = 2) 
 !! katjaQW['QWstage'] = 3 You have kissed Katja and she might be interested in more. (katjaFirstKiss = 1 and KatjaOTN)
 !! npc_sex['A14'] = 1 You have had at least one sexual experince with Katja.
+!! katjaQW['QWstage'] = 4 Katja have asked you to helpe have sex with a boy.
+!! katjaQW['QWstage'] = 5 You have agreed to help Katja have sex with a boy.
+!! katjaQW['QWstage'] = 6 You have talked with Katja about her first experience with a boy.
+
+!! katjaQW['anal_quest'] =1 Katja has asked you to help her have anal sex with a boy.
+!! katjaQW['anal_quest'] =2 You have agreed to help Katja have anal sex with a boy.
+!! katjaQW['anal_quest'] =3 Katja has had anal sex with a boy and you discussed it afterwards.
 
 !! katjaQW['pantiesQWstage'] The stages of the side quest of getting Katja to go comando to school. 1 to 3 are just temprary counts,
 !!									4 means you have gotten Katja to take of her panties when you ask her, and 5 means that she wont wear panties to school anymore.
@@ -17,7 +24,7 @@
 !! katjaQW['horny'] a messure of Katja''s arousal. Grows until she have an orgasmn and will determine how willing she is at the moment to have sex.
 !! katjaQW['dom'] a number that tell if Katja is dominant or submissiv. 0 is neutal, a negative means she is submessive and a possitive that she is dominant. In general the absulut valu nee to be above 30 before you will see any effect. (katjaDom but not a 1 to 1 translation since that variable was all over the place.)
 
-!!	katjaQW['park_sex'] 	a messure of what experience Katja have had with random guys in the park. 0 means she have not have had sex whit anybody in the park, 
+!! katjaQW['park_sex'] 	a messure of what experience Katja have had with random guys in the park. 0 means she have not have had sex whit anybody in the park, 
 !!								1 means that she have had sex with one guy at a time (either alone, in a threesome with the player character or in while the the player have sex with another guy next to them)
 !!								2 means she have had a threesome whit 2 guys you met in the park, and 3 means she has paticipated in an orgy with guys from the park. (katjaSex)
 
@@ -33,11 +40,18 @@
 
 !! katjaQW['ivan_pussy'] = 1 Katja have take Ivan''s cock in her pussy.
 !! katjaQW['ivan_anal'] = 1 Katja have take Ivan''s cock in her ass.
+!! katjaQW['marcus_pussy'] = 1 Katja have take Marcus''s cock in her pussy.
+!! katjaQW['marcus_anal'] = 1 Katja have take Marcus''s cock in her ass.
+
+!! katjaQW['Marcus_day'] is set to daystart if you ar Katja ask to have a threesome with Marcus. Such that the cuestion will only be asked once per day.
+
+!! katjaQW['birth_control_start_day'] This is said to the daystart value from the day Katja''s birth control will be efective effect, if the player tells her to use it. Should be used to Check if katja can become pregnant by a if katjaQW['birth_control_start_day'] ! 0 and katjaQW['birth_control_start_day'] < daystart to make sure is protected.
 
 !! KatjaQW['orgasm_day'] Is set to be equal to daystart when Katja gain an orgasm (It is not set all palces). (KatjaOrgasm)
+!! katjaQW['take_of_panties_day'] is set to ddaystart if you get >katja to take of her panties during school break.
 !! katjaQW['afterschool_hangout_day'] Is set to be equal daystart when you choose to hang out with Katja after school. (katjaMeynoldday)
-!! katjaQW['no_panties_day'] Is set to daystart if you show Katja that you are not wearing panties. (tangaday)
-
+!! katjaQW['no_panties_day'] Is set to daystart if you show Katja that you are not wearing panties.
+!! katjaQW['no_panties_day_disco'] Is set to daystart if you show Katja that you are not wearing panties at the pav disco. (tangaday)
 
 !! katjaQW['knows_masterbation'] = 1 You have told Katja how you masturbate (KatjaKnowMastr =1)
 !! katjaQW['knows_self_fisting'] = 1 You have told Katja how you stuck you fist into your anus (SelfFistingKnow =1)
@@ -61,7 +75,7 @@ if $ARGS[0] = 'cikl':
 		if katjaQW['horny'] < 0:katjaQW['horny'] = 0
 		if katjaQW['horny'] >= 100:
 			if rand(0,2) = 0 and week < 6:
-				katjaQW['horny'] =	max(katjaQW['slut']/2,50)
+				katjaQW['horny'] = max(katjaQW['slut']/2,50)
 				if katjaQW['masturbates'] = 0: katjaQW['masturbates'] = 1
 			else
 				katjaQW['horny'] = 100
@@ -85,12 +99,37 @@ if $ARGS[0] = '':
 	$location_type = 'indoors'
 	CLOSE ALL
 	menu_off = 1
+	gs 'vicky_meynold_schedule'
+	gs 'katja_meynold_schedule'
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
 
-	if pcs_sweat >= 20:
-		'Katja wrinkles her nose. "<<$pcs_nickname>>, you''re all sweaty. Do you want to use my shower?"'
+	if katjaQW['QWstage'] > 2:
+		if katjaQW['horny'] < 20:
+			'Katja looks calm and stoic.'
+		elseif katjaQW['horny'] < 40:
+			'Katja looks at you with a naughty twinkle in her eyes.'
+		elseif katjaQW['horny'] < 60:
+			'Katja looks at you, a faint blush on her cheeks as she smiles at you mischievously.'
+		elseif katjaQW['horny'] < 80:
+			'Katja is blushing fairly obviously and looks at you longingly.'
+		else
+			'Katja''s face is flushed bright red and her chest is heaving from her heavy breathing. She''s idly rubbing her thighs against one another.'
+		end
+	else
+		'Katja looks at you with a smile.'
+	end
+
+
+	if locat['katja'] = 10:
+		'"The others are meeting at the beach right now. Come on lets go meet them" she says.'
+		act 'Go to the beach with Katja': minut += 15 & gt 'pav_lake', 'school_mates'
+	elseif locat['katja'] = 8:
+		'"Let''s go to the disco!" Katja suggests with a smile.'
+		if money >= 25:act 'Go to the disco':money -= 25 & minut += 10 & gt 'pav_disco'
+	elseif pcs_sweat >= 20:
+		'Katja wrinkles her nose. "<<$pcs_nickname>>, you''re all sweaty! Do you want to use my shower?"'
 
 		act 'Have a shower':
 			cla & *clr
@@ -100,7 +139,7 @@ if $ARGS[0] = '':
 			if katjaQW['horny'] >= 50 and katjaQW['QWstage'] > 2:
 				'Katja takes you into the bathroom. Blushing, she says, "I think I''ll join you."'
 
-				act 'Have the shower alone':
+				act 'Have a shower alone':
 					cla & *clr
 					noShampoo = 1
 					dynamic $showerdin
@@ -114,7 +153,7 @@ if $ARGS[0] = '':
 					gs 'stat'
 					'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 					'You kick Katja out of the bathroom and close the door. You get into the shower and begin to lather your body with a cloth.'
-					'After washing off the soap you wash your hair with shampoo. Once you rinse the shampoo off, you are completely clean.'
+					'After washing off the soap, you wash your hair with shampoo. Once you rinse the shampoo off, you are completely clean.'
 					if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 					act 'Get out of the shower':gt 'KatjaHomeTalk'
@@ -139,16 +178,16 @@ if $ARGS[0] = '':
 						'You and Katja undress and climb into the shower together.'
 
 						if pcs_pubes <= 3:
-							'Katja''s eyes slide over your body, lingering a little on your breasts and pussy. She moves closer to you as you rinse yourself off.'
+							'Katja''s eyes glance over your body, lingering a little on your breasts and pussy. She moves closer to you as you rinse yourself off.'
 
 							act 'Continue':
 								cla & *clr
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/shower2.jpg"></center>'
-								'Katja gently rubs shampoo into your hair then rinses it out with warm shower jets.'
+								'Katja gently rubs shampoo into your hair before rinsing it out.'
 
 								if katjaQW['horny'] >= 80 and npc_sex['A14'] > 0:
-									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
+									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes are glistening.'
 
 									act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
 								else
@@ -159,7 +198,7 @@ if $ARGS[0] = '':
 								if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 							end
 						elseif pcs_pubes > 3:
-							'Katja eyes slide over your body lingering a little on your breasts and pubic hair. Katja smiles, "<<$pcs_nickname>>, you''ve got too much hair, it''s not fashionable. I''ll shave it off."'
+							'Katja eyes glance over your body, lingering a little on your breasts and pubic hair. She then smiles at you. "<<$pcs_nickname>>, you''ve got too much hair down there! It''s not fashionable! I''ll shave it off."'
 
 							act 'Get shaved':
 								cla & *clr
@@ -168,10 +207,10 @@ if $ARGS[0] = '':
 								katjaQW['horny'] += 10
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/lobok.jpg"></center>'
-								'Katja sat in the bath and you lathers your crotch (and most of your stomach and chest) with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'
+								'Katja sits in the bath as you lather yourself up with shaving gel. She takes a razor and begins to gently shave the hair between your legs.'
 
 								if katjaQW['horny'] >= 80 and npc_sex['A14'] > 0:
-									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes glistening.'
+									'Katja washes your pussy and breasts with soap, gently stroking her palms against you. Her cheeks are flushed and her eyes are glistening.'
 
 									act 'Continue': gt 'KatjaHomeTalk', 'shower_kiss_home'
 								else
@@ -197,7 +236,7 @@ if $ARGS[0] = '':
 				gs 'stat'
 				'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 				'Katja shows you where the toiletries are and leaves you to have a shower. You get into the shower and begin to lather your body with a cloth.'
-				'After washing off the soap you wash your hair with shampoo. Once you rinse off the shampoo you are completely clean.'
+				'After washing off the soap, you wash your hair with shampoo. Once you rinse off the shampoo, you are completely clean.'
 				if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
 				act 'Get out of the shower':gt 'KatjaHomeTalk'
@@ -237,35 +276,35 @@ if $ARGS[0] = '':
 						flag_KissEV = 0
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
 						'"We likely kissed about the same number of boys," you answer with a smile.'
-						'Katja breathes a sigh of relief. "I shouldn''t have asked anyways." she said, kissing you in gratitude.'
+						'She breathes a sigh of relief. "I shouldn''t have asked anyways," she replies and kisses you in gratitude.'
 						act 'Change the subject':gt 'KatjaHomeTalk'
 					end
-					act 'Claim to have won.':
+					act 'Claim victory':
 						cla
 						flag_KissEV = 3
-						'"I totally won," you say with a playful smile.'
-						'"I only slowed down because you were so far behind," she says, sticking her tongue out at you.'
+						'"I totally won!" you say with a playful smile.'
+						'"I only slowed down because you were so far behind!" she says and sticks her tongue out at you.'
 						'"Suuure. I think they just liked kissing me more than you."'
 						'"Oh, yeah? Let''s go see then. We''ll go to the park and see who can kiss more boys," she says with a hint of anger in her voice.'
 						act 'Go to the park': gt 'katja_sex','park'
 					end
 				elseif katjaPreg = 0 or knowKatjaPreg = 1:
 					if rand(0,100) > katjaQW['horny'] + min(katjaQW['slut']/2,50):
-						'Katja talks about school lessons, cosmetics, the latest fashion trends and other very important things.'
+						'Katja talks about school lessons, cosmetics, the latest fashion trends and other things she considers very important.'
 					else
 						gs 'KatjaHomeTalk', 'Sextalk'
 						exit
 					end
 				else
-					'Katja bites her lip and, without looking you in the eye, finally plucks up the courage and says, "<<$pcs_nickname>>, I am pregnant."'
+					'Katja bites her lip and, without looking you in the eye, finally plucks up the courage "<<$pcs_nickname>>, I''m pregnant..."'
 
 					act 'Who''s the father?':
 						cla
 						minut += 5
 						knowKatjaPreg = 1
 						gs 'stat'
-						'"Who?" you ask, dumbfounded.'
-						'Katja wrinkles her nose, "Santa Claus? Alright, it was Voinov. I hooked up with him at the Christmas party and boom! Jesus, what do I do now?!"'
+						'"Wait, what? Who?" you ask, dumbfounded.'
+						'Katja wrinkles her nose. "Svyatoslav.... I hooked up with him at the Christmas party and...well... Jesus, what do I do now?!"'
 
 						act 'Be sympathetic':
 							cla
@@ -279,26 +318,34 @@ if $ARGS[0] = '':
 			end
 
 			if katjaQW['boy_lie'] = 1:
-				act 'Ask Katja who the boy she likes is':
+				act 'Ask Katja who she likes':
 					cla & *clr
 					katjaQW['horny'] += 1
 					minut += 15
 					gs 'stat'
 					'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-					'You ask Katja who the Boy she mentions being interested earlier is.' 
+					'"So who''s the boy you mentioned being interested in earlier?" you ask curiously.' 
 					if katjaQW['slut'] >= 60 and npc_sex['A14'] > 0 and katjaQW['horny'] > 40:
-						'"Nobody you dummy. It was just an excuse so that you would kiss me" she answers laughing at you.'
+						'"Nobody, you dummy! It was just an excuse so you would kiss me!" she answers with a laugh.'
 						katjaQW['boy_lie'] = 2
-						act 'continue': gt 'KatjaHomeTalk', 'hornykiss'
+						act 'Continue': gt 'KatjaHomeTalk', 'hornykiss'
 					else
-						'"That is my secret, and I am not going to tell you" she says with a wink in her eye.'
+						'"That''s my secret, and I''m not going to tell you!" she says with a wink.'
 						act 'Continue':gt 'KatjaHomeTalk'
 					end
 				end
 			end
 
-			if npc_sex['A14'] > 0 and katjaQW['slut'] > 100 and katjaQW['horny'] > 60:
+			if katjaQW['QWstage'] = 4 and katjaQW['marcus_pussy'] = 0: act 'Tell her you''ll find a boy for her to have sex with': gt 'KatjaHomeTalk', 'boy_discussion'
+
+			if katjaQW['anal_quest'] = 1: act 'Tell her you''ll find a boy for her to try anal with': gt 'KatjaHomeTalk', 'anal_discussion'
+
+			if katjaQW['slut'] >= 50 and katjaQW['horny'] >= 80:
+				act 'Lick Katja': gt 'KatjaEvDin', 'kuni_dom'
+			end
+
+			if katjaQW['QWstage'] >= 7 and katjaQW['birth_control_start_day'] < daystart and katjaQW['horny'] > 60:
 				act 'Look for boys in the park':
 					minut += 15
 					katjaQW['horny'] += 5
@@ -316,11 +363,43 @@ if $ARGS[0] = '':
 				end
 			end
 			
+			!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home.
+			if katjaQW['QWstage'] = 5 and katjaQW['marcus_asked'] = 2 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and (katjaQW['horny']+katjaQW['slut']) > 100:
+				act 'Suggest that you call Marcus':
+					*clr & cla
+					katjaQW['Marcus_day'] = daystart
+					mintu += 5
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+					'Katja is looking aroused, so you suggest calling Marcus so that Katja can finally see what it''s like to have sex with a boy.'
+					'"Okay. Let''s call him. We should have time before Vicky comes home," she says, looking both aroused and nervous at the same time.'
+					act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
+				end
+			end
+
+			!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home.
+			if katjaQW['QWstage'] >= 6 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and katjaQW['horny'] > 80 and katjaQW['Marcus_day'] ! daystart:
+				act 'Suggest that you call Marcus':
+					*clr & cla
+					katjaQW['Marcus_day'] = daystart
+					mintu += 5
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+					'Katja is looking very aroused, so you suggest calling Marcus to see if he wants to have some fun with you.'
+					'"Okay. Let''s call him. We should have time before Vicky comes home," she says while looking very excited.'
+					act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
+				end
+			end
+
+			if katjaQW['birth_control_start_day'] = 0 and katjaQW['QWstage'] >= 6:
+				act 'Tell Katja that you think she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
+			end
+
 			act '"Let''s hang out"': 
 				cla
 				gs 'stat'
 				if katjaQW['QWstage'] > 1 and pcs_makeup <= 1:
-					'"Hey! Wait a moment <<$pcs_nickname>>! I bet you would look great with a little make-up on you! What do you say?"'
+					'"Hey! Wait a minute <<$pcs_nickname>>! I bet you would look great with a little make-up on you! What do you say?"'
 					act 'Let her put makeup on you':
 						*clr & cla
 						pcs_hairbsh = 1
@@ -328,7 +407,7 @@ if $ARGS[0] = '':
 						gs 'stat'
 						'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 						'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-						'Katja happily grins as she quickly straightens your hair: "What do you want? A light touch-up, some normal make-up or shall I just shovel it on?"'
+						'Katja happily grins as she quickly straightens your hair. "What do you want? A light touch-up, some normal make-up or shall I just shovel it on?"'
 
 						act 'Light touch-up':
 							cla
@@ -358,28 +437,33 @@ if $ARGS[0] = '':
 						end
 					end
 					
-					act 'You really don''t need it.':gt 'katjaEv','kathan'
+					act 'You really don''t need it':gt 'katjaEv','kathan'
 				else
 					gt 'katjaEv','kathan'
 				end 
 			end
-			
-			if katjaQW['horny'] > rand(40,100):
-				if katjaQW['QWstage'] > 2:
+
+			if katjaQW['QWstage'] = 6 and katjaQW['anal_ques'] >= 3 and katjaQW['slut'] > 100 and katjaQW['horny'] > 60: gt 'KatjaHomeSex', 'random_park_sex_talk'
+
+			if katjaQW['QWstage'] = 5 and katjaQW['marcus_pussy'] > 0: gt 'KatjaHomeTalk', 'first_boy_sex_follow_up'
+
+			if katjaQW['QWstage'] = 5 and katjaQW['marcus_asked'] = 1: gt 'KatjaHomeTalk', 'Marcus_answer_talk'
+
+			if katjaQW['slut'] >= 50 and katjaQW['horny'] >= 40 and (katjaQW['knows_BJ'] + katjaQW['knows_sex']) >= 2 and npc_sex['A14'] > 0 and katjaQW['QWstage'] < 4: gt 'KatjaHomeTalk', 'sex_with_boy_ask'
+
+			if katjaQW['slut'] >= 60 and katjaQW['horny'] >= 40 and (katjaQW['knows_BJ'] + katjaQW['knows_anal']) >= 2 and npc_sex['A14'] > 0 and katjaQW['anal_quest'] = 0: gt 'KatjaHomeTalk', 'anal_sex_with_boy_ask'
+
+			if katjaQW['horny'] > rand(40,120):
+				!!Katja will only have Marcus come over when Vicky is in the park with Vanya and Tamara is not home.
+				if katjaQW['QWstage'] >= 6 and week < 6 and (locat['Vicky'] = 10 or locat['Vicky'] = 11) and rand(0,6) =0 and katjaQW['Marcus_day'] ! daystart:
+					katjaQW['Marcus_day'] = daystart
+					gt 'katjaHomeTalk', 'marcus_kiss' 
+				elseif katjaQW['QWstage'] > 2:
 					gt 'KatjaHomeTalk', 'hornykiss'
 				else
 					gt 'KatjaHomeTalk', 'tender_kiss'
 				end
 			end
-
-			if katjaQW['slut'] >= 50 and katjaQW['horny'] >= 80:
-				act 'Lick Katja': gt 'KatjaEvDin', 'kuni_dom'
-			end
-
-		elseif hour >= 20 and week >= 5 and week < 7:
-			'"Let''s go to the disco," Katja says.'
-
-			if money >= 25:act 'Go to the disco':money -= 25 & minut += 10 & gt 'pav_disco'
 		end
 	end
 
@@ -403,7 +487,6 @@ if $ARGS[0] = '':
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
 				'"What?! That''s so exiting! You didn''t get pregnant just to be like me, did you?" she asks playfully.'
-				*nl
 				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
 			end
 		elseif KatjaPreg = 0 and func('body_din','pregnancyVisibility') = 1:
@@ -425,7 +508,6 @@ if $ARGS[0] = '':
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
 				'"What? That''s so exiting!'
-				*nl
 				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
 			end
 		end
@@ -450,8 +532,7 @@ if $ARGS[0] = '':
 				gs 'stat'
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'Katja''s face lights up. "Congratulations! This is even more exciting than last time! Every time you tell me you’re pregnant, I feel even better about my own teen pregnancy. Hell, that''s probably the reason you keep getting pregnant, isn''t it?" She giggles while looking at you affectionately.'
-				*nl
+				'Katja''s face lights up. "Congratulations! This is even more exciting than last time! Every time you tell me you’re pregnant, I feel even better about my own pregnancy. Hell, that''s probably the reason you keep getting pregnant, isn''t it?" She giggles while looking at you affectionately.'
 				act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
 			end
 		end
@@ -462,11 +543,10 @@ if $ARGS[0] = '':
 			cla & *clr
 			gs 'stat'
 			KatjaConflict = 2
-			'"I''m really sorry I didn''t tell you I was pregnant sooner. I was just so embarrassed."'
+			'"I''m really sorry I didn''t tell you sooner. I was just so embarrassed."'
 			'Katja sighs. "I understand. I just want you to know you can trust me and it hurts to realize that you don''t."'
-			'"I do trust you. I promise I won''t keep anything else like this from you in the future."'
+			'"I do trust you. I promise I won''t keep anything like this from you in the future."'
 			'"Good. Now let''s get down to business."'
-			*nl
 			act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
 		end
 	end
@@ -476,11 +556,10 @@ if $ARGS[0] = '':
 			cla & *clr
 			gs 'stat'
 			KatjaConflict = 2
-			'"I''m really sorry I didn''t tell you I was pregnant sooner. I was just so embarrassed it happened again."'
+			'"I''m really sorry I didn''t tell you sooner. I was just so embarrassed it happened again."'
 			'Katja sighs. "I understand. I just want you to know you can trust me and it hurts to realize that you don''t."'
 			'"I do trust you. I promise I won''t keep anything else like this from you in the future."'
 			'"Good. Now let''s get down to business."'
-			*nl
 			act 'Next':gt 'KatjaHomeTalk', 'katjaknows1'
 		end
 	end
@@ -501,8 +580,8 @@ if $ARGS[0] = 'katjaknows':
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
 		'You tell Katja that you''re having Kolka''s baby.'
-		'"You were knocked up by your brother!? That''s so crazy. Is he at least good in bed?"'
-		'"I wouldn''t be pregnant if he wasn''t," you laugh. "I only let the best cock inside of me."'
+		'"You were knocked up by your brother!? That''s so crazy! Is he at least good in bed?"'
+		'"I wouldn''t be pregnant if he wasn''t," you laugh. "I only let the best cock inside me."'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
 		act 'Continue':gt 'KatjaHomeTalk'
@@ -511,7 +590,7 @@ if $ARGS[0] = 'katjaknows':
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
 		'You tell Katja that you''re having your step-father''s baby.'
-		'"You were knocked up by your Step-dad!? That''s so crazy"'
+		'"You were knocked up by your step-dad!? That''s so crazy!"'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
 		act 'Continue':gt 'KatjaHomeTalk'
@@ -520,7 +599,7 @@ if $ARGS[0] = 'katjaknows':
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
 		'You tell Katja that you''re having your biological father''s baby.'
-		'"You were knocked up by your own father!? That''s so crazy"'
+		'"You were knocked up by your own father!? That''s so crazy!"'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
 		act 'Continue':gt 'KatjaHomeTalk'
@@ -528,19 +607,19 @@ if $ARGS[0] = 'katjaknows':
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
-		'You tell her that you don''t actually know whose baby is growing inside of you.'
+		'You tell her that you don''t actually know whose baby is growing inside you.'
 		'"No way! Really?" She is completely flabbergasted.'
 		'"Yeah, I sometimes feel like my life is spinning out of control."'
-		'Katja places a hand on your choulder "<<$pcs_nickname>>, if I can do anything to make your life a little easier, please let me know."'
-		'You blush and thank her, before placing a quick kiss on her cheek.'
+		'Katja places a hand on your shoulder "<<$pcs_nickname>>, if I can do anything to make your life a little easier, please let me know."'
+		'You blush and thank her before planting a quick kiss on her cheek.'
 
 		act 'Continue':gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
 		minut += 10
-		'"Who''d you let pump their cum into that wonderful body of yours?" Katja asks while biting her bottom lip.'
+		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
 		'You tell Katja that you''re having Kolka''s baby.'
-		'"You were knocked up by your brother!? That''s so sexy," moans Katja before going in for a passionate kiss.'
+		'"You were knocked up by your brother!? That''s so sexy!" she moans before going in for a passionate kiss.'
 		'As your <<$liptalk3>> separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions revolve around riding your brother''s dick."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
@@ -548,10 +627,10 @@ if $ARGS[0] = 'katjaknows':
 		act 'Continue':gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Stepfather' and npc_rel['A28'] > 50:
 		minut += 10
-		'"Who''d you let pump their cum into that wonderful body of yours?" Katja asks while biting her bottom lip.'
+		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
 		'You tell Katja that you''re having your step-father''s baby.'
-		'"You were knocked up by your Step-dad!? That''s so sexy," moans Katja before going in for a passionate kiss.'
+		'"You were knocked up by your step-dad!? That''s so sexy!" she moans before going in for a passionate kiss.'
 		'As your <<$liptalk3>> separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
@@ -559,10 +638,10 @@ if $ARGS[0] = 'katjaknows':
 		act 'Continue':gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Biological Father' and npc_rel['A29'] > 50:
 		minut += 10
-		'"Who''d you let pump their cum into that wonderful body of yours?" Katja asks while biting her bottom lip.'
+		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
 		'You tell Katja that you''re having your biological father''s baby.'
-		'"You were knocked up by your own father!? That''s so sexy," moans Katja before going in for a passionate kiss.'
+		'"You were knocked up by your own father!? That''s so sexy!" she moans before going in for a passionate kiss.'
 		'As your <<$liptalk3>> separate from hers, you look into her eyes. "I didn''t think admitting to incest would get me rewarded."'
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
@@ -570,10 +649,10 @@ if $ARGS[0] = 'katjaknows':
 		act 'Continue':gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] >= 60 and $wombthfath = '':
 		minut += 10
-		'"Who''d you let pump their cum into that wonderful body of yours?" Katja asks while biting her bottom lip.'
+		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
 		'You tell her that you don''t actually know whose baby is growing inside of you.'
-		'"You''re such a sexy slut," moans Katja before going in for a passionate kiss.'
+		'"You''re such a sexy slut!" she moans before going in for a passionate kiss.'
 		'As your <<$liptalk3>> separate from hers, you look into her eyes. "I''m really glad you''re not judging me like a lot of other people have."'
 		'"<<$pcs_nickname>>, I would never judge you. Plus, if I''m being honest, I''m a little jealous. I wish I could let myself have that much fun."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
@@ -584,7 +663,7 @@ if $ARGS[0] = 'katjaknows':
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
 		'"It looks like I got knocked up by <<$wombthfath>>"'
-		'"I hope they know how lucky they are," Katja says, clearly blushing.'
+		'"I hope they know how lucky they are," she says while clearly blushing.'
 
 		act 'Continue':gt 'KatjaHomeTalk'
 	end
@@ -609,7 +688,7 @@ if $ARGS[0] = 'katjaknows1':
 		'You tell Katja that <<$wombthfath>> got you pregnant again.'
 		'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
 		'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-		'After a few minutes, she breaks the kiss, but keeps her lips millimeters from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
+		'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] < 60 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
@@ -621,8 +700,8 @@ if $ARGS[0] = 'katjaknows1':
 	elseif katjaQW['slut'] >= 60 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
 		'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
 		'Her eyes widen. "Wow, your family must be really close," she giggles.'
-		'"Shit, ‘which of your family members did you like being knocked up by the most?’ might be the hottest question anyone has ever made me think of. Just when I started thinking I couldn''t love you any more." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-		'After a few minutes, she breaks the kiss, but keeps her lips millimeters from yours. "Don''t think I''ll forget the image of you being passed around your family like a good little slut. I need something to masturbate about when you''re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
+		'"Shit, ''which of your family members did you like being knocked up by the most?'' might be the hottest question anyone has ever made me think of. Just when I started thinking I couldn''t love you any more." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+		'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t think I''ll forget the image of you being passed around your family like a good little slut. I need something to masturbate about when you''re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
 	elseif arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1 and ($wombthfath ! 'Kolka' and $wombthfath ! 'Stepfather' and $wombthfath ! 'Biological Father'):
@@ -634,11 +713,11 @@ if $ARGS[0] = 'katjaknows1':
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] < 60 and $wombthfath = '':
-		'"Seems like you had a little too much fun then," She chuckles.'
+		'"Seems like you had a little too much fun then," she chuckles.'
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
 	elseif katjaQW['slut'] >= 60 and $wombthfath = '':
-		'"Seems like you had a little too much fun then," She chuckles.'
+		'"Seems like you had a little too much fun then," she chuckles.'
 		'"I hope you''ll include me next time."'
 
 		act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
@@ -651,7 +730,7 @@ if $ARGS[0] = 'shower_kiss_home':
 	katjaQW['horny'] += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showerkiss.jpg"></center>'
-	'Katja gently hugs you with one hand and kisses you on the lips. You feel her soft palm on your naked pussy as her thin finger finds your clitoris and begins to rub it.'
+	'Katja gently hugs you with one hand and kisses you on the lips. You feel her soft palm on your naked pussy as her finger finds your clitoris and begins to rub it.'
 
 	gs 'arousal', 'kiss', 10, 'dom', 'lesbian'
 	gs 'arousal', 'vaginal_finger', 10, 'dom', 'lesbian'
@@ -659,7 +738,7 @@ if $ARGS[0] = 'shower_kiss_home':
 	gs 'stat'
 
 	if katjaQW['slut'] >= 50:
-		'Katja, gently but firmly puts you on the edge of the tub.'
+		'Katja gently but firmly puts you on the edge of the tub.'
 	else
 		'Katja gently caresses your clitoris with her fingers and her lips begin to kiss your neck, slowly making her way down.'
 	end
@@ -672,9 +751,9 @@ if $ARGS[0] = 'shower_kiss_home':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/showersex.jpg"></center>'
 		'You sat on the edge of the tub and open your legs to expose your wet pussy. Katja gets on her knees in front of you and gently licks your swollen red petals.'
-		'Her tongue begins to briskly caress your pussy, not forgetting about the clitoris. Soon bliss envelopes your entire body.'
+		'Her tongue begins to briskly caress your pussy, not forgetting about your clitoris. Bliss soon envelopes your entire body.'
 		'You notice Katja''s hand between her legs and get further turned on watching her pleasure herself while she pleasures you.'
-		$orgasm_txt = 'Suddenly you are hit by a powerful orgasm, you feel like you might lose consciousness, your whole body bends and convulses and a hot wave washes over you.'
+		$orgasm_txt = 'You are suddenly hit by a powerful orgasm and feel like you might lose consciousness as your whole body bends and convulses and a hot wave washes over you.'
 		$orgasm_or = 'yes'
 		gs 'arousal', 'cuni', 10, 'dom', 'lesbian'
 		gs 'stat'
@@ -696,7 +775,7 @@ if $ARGS[0] = 'shower_kiss_home':
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-			'You remove her hands and smile at her. Then you dismiss Katja, who shyly looks to the floor and leaves the bathroom.'
+			'You remove her hands and smile at her. You dismiss her and she shyly looks at the floor before leaving the bathroom.'
 
 			act 'Get out of the shower':
 				gs 'arousal', 'end'
@@ -714,7 +793,7 @@ if $ARGS[0] = 'Sextalk':
 
 	if kattalkrand = 0:
 		if katjaQW['knows_BJ'] > 0:
-			'"<<$pcs_nickname>>, tell me, how are you at sucking dick."'
+			'"<<$pcs_nickname>>, tell me, how are you at sucking dick?"'
 		else
 			'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
 		end
@@ -726,24 +805,24 @@ if $ARGS[0] = 'Sextalk':
 				katjaQW['knows_BJ'] = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja how you sucked dick and what it feels like. Katja blushes and bites her lip.'
+				'You tell Katja how you''ve sucked dick and what it feels like. She blushes and bites her lip.'
 
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		else
-			act 'Tell Katja that you have never given a blowjob':
+			act 'You''ve never given a blowjob':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja that you have never given a blowjob to a guy. She admit that neither has she and says "Vicky talks about how good it is all the tiem, but I don''t know guy usually smell bad, I''m not sure it doesn''t tastes awfull".'
+				'You tell Katja that you have never given a blowjob to a guy. She admits that she hasn''t either. "Vicky talks about how good it is all the time, but I don''t know. Guys usually smell bad and I''m sure it would taste awful."'
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		end
 	elseif kattalkrand = 1:
 		if katjaQW['knows_sex'] > 0:
-			'"<<$pcs_nickname>>, tell me how you have fucked."'
+			'"<<$pcs_nickname>>, tell me. Have you ever fucked someone?"'
 		else
-			'"<<$pcs_nickname>>, have you had sex with a guy?"'
+			'"<<$pcs_nickname>>, have you ever had sex with a guy?"'
 		end
 
 		if stat['vaginal'] > 0:
@@ -753,23 +832,23 @@ if $ARGS[0] = 'Sextalk':
 				katjaQW['knows_sex'] = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja about the times you have had sex and how it felt. Katja blushes and bites her lip.'
+				'You tell Katja about the times you''ve had sex and how it felt. She blushes and bites her lip.'
 
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		else
-			act 'Tell Katja that you have never had sex guy':
+			act 'You''re a virgin':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja that you have never had sex with a guy. She admit that neither has she and says "That probably make us to only non nerds who haven''t. Vicky does it all the time with Vanya. She wont shut up about it".'
+				'You tell Katja that you''re still a virgin and have never had sex with a guy. She admits that she''s also still a virgin. "That probably makes us the only non nerds who haven''t had sex! Vicky does it all the time with Vanya. She won''t shut up about it!"'
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		end
 
 	elseif kattalkrand = 2:
 		if katjaQW['knows_anal'] > 0:
-			'"<<$pcs_nickname>>, what is anal sex like?"'
+			'"<<$pcs_nickname>>, what''s anal sex like?"'
 		else
 			'"<<$pcs_nickname>>, have you ever had a guy stick it in your ass?"'
 		end
@@ -781,16 +860,16 @@ if $ARGS[0] = 'Sextalk':
 				katjaQW['knows_anal'] = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You told Katja about the times you have had anal sex and what it feels like. Katja blushes and bites her lip.'
+				'You tell Katja about the times you''ve had anal sex and what it feels like. She blushes and bites her lip.'
 
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		else
-			act 'Tell Katja that you have never had anal sex':
+			act 'You''ve never had anal sex':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja that you have never had anal sex. She says that she hears that a lot of girls in your class does.'
+				'You tell Katja that you''ve never had anal sex. She says that she heard that a lot of girls in your class do, some more than others.'
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		end
@@ -808,7 +887,7 @@ if $ARGS[0] = 'Sextalk':
 				katjaQW['knows_cuni'] = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja about the times you have had gone down on another girl and how it feels. Katja blushes and bites her lip.'
+				'You tell Katja about the times you''ve gone down on another girl and how it feels. She blushes and bites her lip.'
 				
 				if katjaQW['horny'] > 50 and katjaQW['slut'] >= 40 and rand(-30,30) < katjaQW['dom']:
 					'Katja asks you to show her how you lick pussy.'
@@ -823,11 +902,11 @@ if $ARGS[0] = 'Sextalk':
 						if npc_sex['A14'] = 0: npc_sex['A14'] = 1 & girl += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/kuni2.jpg"></center>'
-						'At first you are a bit confused and then you notice she is pulling her panties off. Once she has them off she opens her legs wide. "Go on, <<$pcs_nickname>>, show me how you do it, please."'
-						'You pause a moment, more in surprise then anything, but her glistening wet pussy is enough to convince you. You lean forward and place your face between her legs and start licking.'
-						'You suck on her clit and slip your tongue inside of her, working her pussy for all you are worth. She begins to moan loudly and buck her hips, grinding your face into her crotch. As she gets close to orgasm she grabs your hair and holds your face against her pussy, rubbing herself against you as much as you are licking her, leaving your face coated in the juices from her pussy.'
-						'Her orgasm hits her hard, leaving her unable to talk as her body spasms. Once Katja''s orgasm passes pass you lick her clean of all her pussy juices, making sure not to miss a single spot. When you raise up to look at Katja she has a smile but also a new look, you are not quite sure what it is, confidence maybe? "Well aren''t you just a good little girl." Then she kisses you deeply, breaking the kiss you start to lean back and spread your legs but she is already shaking her head no.'
-						'"Sorry <<$pcs_nickname>> maybe next time, we need to finish our homework." She says sweetly, you pause a moment and then nod in understand and you see that new look intensify on her face as she smiles, while the two of you finish your homework.'
+						'You''re a little confused at first before you notice her pulling her panties off. Once she has them off, she opens her legs wide. "Go on, <<$pcs_nickname>>. Show me how you do it, please."'
+						'You pause, more in surprise than anything, but her glistening wet pussy is enough to convince you. You lean forward and place your face between her legs and start licking.'
+						'You suck on her clit and slip your tongue inside of her, working her pussy for all you''re worth. She begins to moan loudly and buck her hips, grinding your face into her crotch. As she gets close to orgasm, she grabs your hair and holds your face against her pussy, rubbing herself against you as much as you are licking her, leaving your face coated in her juices.'
+						'Her orgasm hits her hard, leaving her unable to talk as her body spasms. Once her orgasm passes, you lick her clean of all her pussy juices, making sure not to miss a single spot. When you look up at Katja, she has a confident smile on her face. "Well aren''t you just a good little girl?" She then kisses you deeply before you start to lean back and spread your legs, but she''s already shaking her head.'
+						'"Sorry <<$pcs_nickname>>, maybe next time. We need to finish our homework," she says sweetly. You pause before nodding in understanding. You see that new confident look intensify on her face as she smiles and the two of you finish your homework.'
 
 						gs 'arousal', 'cuni_give', 15, 'sub', 'lesbian'
 						gs 'stat'
@@ -847,7 +926,7 @@ if $ARGS[0] = 'Sextalk':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja that you have never had sex with another girl. She seems a little surprised and you get the feeling that this was not what she wanted to hear.'
+				'You tell Katja that you''ve never had sex with another girl. She seems a little surprised and you get the feeling that this was not what she wanted to hear.'
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		end
@@ -865,7 +944,7 @@ if $ARGS[0] = 'Sextalk':
 				katjaQW['knows_masterbation'] = 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja how you masturbate in the bathroom. Katja blushes and bites her lip.'
+				'You tell Katja how you masturbate in the bathroom and she blushes and bites her lip.'
 
 				if katjaQW['masturbates'] = 0:
 					act 'Further':minut += 15 & gt 'KatjaHomeTalk'
@@ -883,7 +962,7 @@ if $ARGS[0] = 'Sextalk':
 			end
 
 			if SelfFisting > 0:
-				act 'Tell her how you stuck your fist in your ass':
+				act 'Tell her how you fisted your ass':
 					cls
 					katjaQW['horny'] += 10
 
@@ -891,18 +970,18 @@ if $ARGS[0] = 'Sextalk':
 
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-					'You told Katja how you masturbate your ass and even managed to stretch it so much that you can shove a fist into it.'
-					'Katja blushes and bites her lip.'
+					'You tell Katja how you masturbate anally and even managed to stretch it so much that you could shove your fist into it.'
+					'She blushes and bites her lip.'
 
 					act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 				end
 			end
 		else
-			act 'Tell Katja that you have never masturbated':
+			act 'You''ve never masturbated':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'You tell Katja that you have never masturbated. She seems surprised'
+				'You tell Katja that you''ve never masturbated. She seems surprised at your answer.'
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		end
@@ -911,14 +990,14 @@ if $ARGS[0] = 'Sextalk':
 	act 'Refuse to talk about such topics':
 		cls
 		gs 'stat'
-		'You refuse to talk about such topics with her. Katja looks down, confused, and  mummbles "Sorry, <<$pcs_nickname>>, I didn''t mean to pry."'
+		'You refuse to talk about such topics with her and she looks down in confusion and mumbles. "Sorry, <<$pcs_nickname>>, I didn''t mean to pry."'
 
 		act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 	end
 end
 
 if $ARGS[0] = 'hornykiss':
-	'Katja brings her face to yours, so close that you can feel her hot breath on her skin.'
+	'Katja brings her face so close to yours that you can feel her hot breath on your skin.'
 
 	act 'Bring your face close to hers':
 		cla & *clr
@@ -937,12 +1016,12 @@ if $ARGS[0] = 'hornykiss':
 				act 'Change the subject':minut += 15 & gt 'KatjaHomeTalk'
 
 !!				if pcs_dom > 0:
-					act 'Seize Katja''s face':
+					act 'Grab Katja''s face':
 						cla & *clr
 						KatjaQW['dom'] -= 2
 						katjaQW['horny'] -= 10
 						gs 'stat'
-						'You wrapped your hands around her face and bring you lips to Katja''s.'
+						'You wrap your hands around her face and bring you lips to Katja''s.'
 
 						!!if pcs_dom < KatjaQW['dom']:
 							!!'Katja firmly takes your hands and removes them from her face, allowing you to understand, that she does not intend to kiss you.'
@@ -963,24 +1042,24 @@ end
 
 if $ARGS[0] = 'tender_kiss':
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-	'Katja thinks about something, then embarrassed and blushing asks you "<<$pcs_nickname>>, have you kissed a boy?"'
+	'Katja thinks about something before blushing in embarrassment. "<<$pcs_nickname>>... Have you ever... kissed a boy?"'
 	katjaQW['boy_lie'] = 1
 
 	act 'Yes':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-		'You smile at Katja and say that of course you kissed boys. Katja, even more shyly, "You see <<$pcs_nickname>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Could you teach me how to kiss?"'
+		'You smile at Katja and say that you''ve kissed boys. Katja, even more shyly, continues. "You see, I like this guy, but he''s older than me and I''m afraid that when we start to kiss, I''ll do something wrong. Could you teach me how to kiss?"'
 
 		act 'Kiss': gt 'katjaEv', 'kiss'
 
-		act 'Say no':
+		act 'Refuse':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-			'You tell Katja no and she look at you with her big eyes "Please <<$pcs_nickname>>, you don''t want me to be bad at kissing do you?"'
+			'You refuse and she looks at you with pleading eyes. "Please <<$pcs_nickname>>, you don''t want me to be bad at kissing, do you?"'
 		
-			act 'Relent and kiss Katja': 
+			act 'Relent': 
 				katjaQW['dom'] += 2 
 				gt 'katjaEv', 'kiss'
 			end
@@ -1011,16 +1090,16 @@ if $ARGS[0] = 'tender_kiss':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-		'You shake your head and say that you have never kissed a boy. Katja, even more shyly, "You see <<$pcs_nickname>>, I like this guy, he''s older than me, and I am afraid that when we start to kiss, I''ll do something wrong. Maybe we could try kissing and learn that way?"'
+		'You shake your head and say that you''ve never kissed a boy. Katja, even more shyly, continues. "You see, I like this guy but he''s older than me and I''m afraid that when we start to kiss, I''ll do something wrong. Maybe we could try kissing and learn that way?"'
 		act 'Kiss': gt 'katjaEv', 'kiss'
 
-		act 'Say no':
+		act 'Refuse':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-			'You tell Katja no and she look at you with her big eyes "Please <<$pcs_nickname>>, I will help os both so we are better when we finally are kissing a boy?"'
+			'You refuse and she looks at you with pleading eyes. "Please <<$pcs_nickname>>, it''ll help us both so we''re better when we finally kiss a boy!"'
 		
-			act 'Relent and kiss Katja': 
+			act 'Relent': 
 				katjaQW['dom'] += 2 
 				gt 'katjaEv', 'kiss'
 			end
@@ -1048,5 +1127,265 @@ if $ARGS[0] = 'tender_kiss':
 	end
 end
 
+if $ARGS[0] = 'marcus_kiss':
+	*clr & cla
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_kiss.jpg"></center>'
+	'Katja almost jumps you and gives you a kiss. Afterwards, she looks at you a little hesitantly. "You know, having Marcus over is quite fun, so why don''t we call him right now?"'
+	act 'Agree':  gt 'katja_sex', 'marcus_wait'
+	act 'You''re not in the mood': katjaQW['horny'] -= 20 & gt 'KatjaHomeTalk'
+end
+
+if $ARGS[0] = 'boy_discussion':
+	*clr & cla
+	katjaQW['QWstage'] = 5
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	if  Marcus_sextype > 0:
+		katjaQW['horny'] += 20
+		'"I sometimes have sex with Marcus, and I can tell you he is really into Russian girls. I''m sure that he would love to pop the cherry of a Russian beauty like you."'
+		'"Marcus is very good looking.... If you think he would be willing to have sex with a girl like me..." Katja trails off, starting to sound nervous again.'
+		'"I''m sure that he would love to have sex with you. As any man who isn''t gay would," you answer. Katja''s face brightens up and she moves towards you for a kiss.'
+		act 'Kiss her back': gt 'katjaEv', 'kiss'
+	else
+		katjaQW['horny'] += 10
+		'"Do you have any boy in mind?" you ask. 
+		"I don''t know. Lazar is hot, but I have the feeling that he would just consider us a check on his list, and not be able to keep his mouth shut." she answers before pondering. "Maybe Marcus? He''s very good looking, and I haven''t heard of him spreading rumors. Most of the others don''t listen to what he says anyway because he''s black and from America. Our classmates are so stupid sometimes." she continues'
+		'"Marcus is hot, but how would we approach him?" you ask. 
+		"Try to dance with him at the disco, and get close to him. He really seems to like the girls there, and since you''re the hottest there, I''m sure he''ll like it. Especially if you lead him on like you know how to do," she says in her most flattering voice.'
+		'You smile. "Okay, I''ll try to dance with him at the disco."'
+		act 'Talk about something else': gt 'KatjaHomeTalk'
+		if mey_vika['key'] = 1:
+			act 'Leave the room': gt 'mey_home', 'start'
+		else
+			act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
+		end
+	end
+end
+
+if $ARGS[0] = 'anal_discussion':
+	*clr & cla
+	katjaQW['anal_quest'] = 2
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	if  IvanShowerQW = 11:
+		katjaQW['horny'] += 20
+		'"Ivan seems to be very interested in our kissing. I sometimes have anal sex with him. You can say we''re what you call ''friends with benefits''. I think he might be interested," you tell her.'
+		'"Ivan is hot... I''ve also heard that he''s really into anal sex. Yeah, if you think he''s willing, then..." Katja is having trouble finding the words as she gets visibly excited thinking about it.'
+		'"I''ll talk to Ivan about it at school and arrange a meeting if he''s up for it," you answer and Katja throws her arms around you and goes in for a kiss.'
+		act 'Kiss her back': gt 'katjaEv', 'kiss'
+	else
+		katjaQW['horny'] += 10
+		'"Do you have any boy in mind?" you ask. 
+		"Well, Ivan seems to be quite interested in our kissing at school. The other girls say that he''s really into anal sex. He''s also very hot." she answers.'
+		'"Yeah, Ivan is hot. I need to find a way to approach him about it though," you reply. 
+		"He trains in the gym at the community center in the late afternoon. You might have luck talking with him there. I''ve also heard a rumor that he sometimes uses the women''s shower there," she tells you.'
+		'You smile. "Okay, I''ll try and talk with him about it."'
+		act 'Talk about something else': gt 'KatjaHomeTalk'
+		if mey_vika['key'] = 1:
+			act 'Leave the room': gt 'mey_home', 'start'
+		else
+			act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'preventation_talk':
+	*clr & cla
+	mintu += 5
+	gs 'stat'
+	katjaQW['birth_control_start_day'] = daystart + 15
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'	
+	'"If you want to '+iif( katjaQW['QWstage'] = 7, 'have sex with boys in the park', 'continue having sex with boys around here')+', you should get on birth control," you tell Katja. "Most of the boys around here don''t want to use condoms, and don''t care if they get the girls pregnant."'
+	'"And if they get a girl pregnant, they''ll just pretend it wasn''t them. You don''t want to raise a child on your own right now, do you?" you ask. 
+	"No" she answer weakly "No, I don''t. I want to have children, but not right now. Not before I go to university."' 
+	'"Then you should get on the pill," you continue. "I''m sure if you ask your mother, then she''ll help you. I can''t imagine Vicky not being on the pill at this point, but if you don''t want to ask her, you can buy it at the local pharmacy. My aunt Luda works there and she won''t tell anybody about it. She knows how to be discreet."'
+	act 'Talk about something else': gt 'KatjaHomeTalk'
+	if mey_vika['key'] = 1:
+		act 'Leave the room': gt 'mey_home', 'start'
+	else
+		act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
+	end	
+end
+
+if $ARGS[0] = 'random_park_sex_talk':
+	*clr & cla
+	katjaQW['QWstage'] = 7
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	'Katja gives you the most sultry look she can muster. "You know, sex with Ivan and Marcus is great and all, but I was thinking that it might be time to try other boys."'
+	'"Do you have anybody in mind?" you ask. 
+	"Not any of the boys in the class. I don''t think anybody except Ivan could keep their mouth shut about having a threesome with the two hottest chicks in school!" she answers. "I don''t really know anybody else. You''ve been much more around than me, so maybe you know somebody?" she asks.'
+	act 'Tell her about the boys in the park':
+		cla
+		katjaQW['horny'] += 5
+		'You tell her that strangers come to the park and look for girls to have fun with, without any commitment, and suggest that you could try to pick up some boys there.'
+		'"Awesome!" she says and looks at you really excitedly. "Why don''t we go right now?"'
+		if katjaQW['birth_control_start_day'] < daystart:
+			act 'Agree':
+				minut += 15
+				katjaQW['horny'] += 5
+				$ev_name = 'Katja'
+				$ev_name_a = 'Katja'
+				$ev_name_om = 'Katja'
+				dick = 0
+				place = 1
+				Frend_num = 14
+				p_slut = katjaQW['slut']
+				p_dom = KatjaQW['dom'] + 50
+				p_horny = katjaQW['horny']
+				p_alko = 0
+				gt 'placer'
+			end				
+			act 'Not right now': gt 'KatjaHomeTalk'
+		else
+			'Remembering that the boys in the park won''t use protection, you turn Katja down.'
+			act 'Tell Katja that you think she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
+			act 'Talk about something else': gt 'KatjaHomeTalk'
+			if mey_vika['key'] = 1:
+				act 'Leave the room': gt 'mey_home', 'start'
+			else
+				act 'Say goodbye and leave':minut += 5 & gt 'pav_residential'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'sex_with_boy_ask':
+	*clr & cla
+	katjaQW['QWstage'] = 4
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	'Katja looks at you nervously, but with that look in her eyes that tells you she''s thinking about something naughty. "You''ve told me all about how good it is to have sex with a boy," she meekly says. "I... I think... I think I would like to try it too..."'
+	if katjaQW['anal_quest'] > 1:
+		'"So you want me to set it up again?" you ask, and Katja just nods sheepishly. "Okay. Now Ivan doesn''t fuck girls in the pussy since he''s afraid of getting them pregnant, so I assume that you want me to find somebody else?"'
+		'"Yes <<$pcs_nickname>>. You know so many guys, so I''m sure you can arrange my first time to be perfect!" she says in her most persuasive voice.'
+	else
+		'"Okay, so why don''t you?" you ask. 
+		"I don''t know how to approach a boy..." she answers "I don''t want a boyfriend, I just want to try having sex with a boy. Can''t you help me arrange it? Please..." she says, looking at you pleadingly with her big eyes.'
+	end
+	act 'Agree': gt 'KatjaHomeTalk', 'boy_discussion'
+	act 'Refuse':
+		cla
+		'You refuse to help her, but she continues to beg you.'
+		act 'Tell her to ask a boy herself':
+			cla
+			katjaQW['horny'] -= 20
+			minut += 5
+			'She stops begging and you return to talking about other subjects.'
+			act 'Continue': gt 'KatjaHomeTalk'
+		end
+		act 'You''re too precious to share':
+			cla
+			katjaQW['horny'] += 20
+			minut += 5
+			'She stops begging and looks at you with lust in her eyes.'
+			act 'Talk about something else': gt 'KatjaHomeTalk'
+			act 'Kiss her': gt 'katjaEv', 'kiss'
+		end
+		act 'Tell her to stick with girls':
+			cla
+			katjaQW['horny'] -= 5
+			minut += 5
+			'"Boys aren''t worth it. Just stick with girls," you tell her and she stops begging, but doesn''t look completely convinced.'
+			act 'Talk about something else': gt 'KatjaHomeTalk'
+		end					
+	end
+end
+
+if $ARGS[0] = 'Marcus_answer_talk':
+	*clr & cla
+	katjaQW['marcus_asked'] = 2
+	mintu += 5
+	katjaQW['Marcus_day'] = daystart
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	'You tell Katja that you''ve talked with Marcus and he agreed. She looks at you exitedly. "So when do we do it?"'
+	'"He agreed to come over when I call him, so we can call him right now, or wait for another time," you answer.'
+	if week < 6 and  (locat['Vicky'] = 10 or locat['Vicky'] = 11) and (katjaQW['horny']+katjaQW['slut']) > 100:
+		'"Okay. Let''s call him right now!" she squeals, her face completely red.'
+		act 'Call Marcus': gt 'katja_sex', 'marcus_wait'
+	elseif (katjaQW['horny'] + katjaQW['slut']) <= 100:
+		'"I don''t know. Maybe another time. I need to think about it some more," she says while looking a little nervous. 
+		"Okay, another time then," you reply.'
+		act 'Talk about something else': gt 'KatjaHomeTalk'
+	else
+		'"We can''t call him now! Vicky will be home soon and I don''t want her to see him here!" she says while looking a little panicked. 
+		"Okay, we''ll plan it for another day when we have time," you reply.'
+		act 'Talk about something else': gt 'KatjaHomeTalk'
+	end
+end
+
+if $ARGS[0] = 'first_boy_sex_follow_up':
+	*clr & cla
+	katjaQW['QWstage'] = 6
+	mintu += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	'Katja gives you a big hug. "Thank you! The experience with Marcus was great!" she says with a huge grin.'
+	if npc_vag['A14'] + 5 < npc_dick['A146']:
+		'"It didn''t hurt too much?" you ask. 
+		"It hurt, that was why I couldn''t take it any longer. But it was fun and I think it''ll hurt less the next time," she answers. 
+		"So you want to have sex with a boy again?" you reply.'
+	else
+		'"It did look like you had fun," you say. 
+		"I definitely had fun, I thought it would hurt, but I didn''t feel any pain," she answers. 
+		"Might be all the times I used my dildo on you," you reply.'
+	end
+	'"We should definitely do this again some time," she finishes. 
+	"We''ll see if the opportunity comes up again," you answer.'
+	act 'Talk about something else': gt 'KatjaHomeTalk'
+	act 'Tell her that she should use birth control': gt 'KatjaHomeTalk', 'preventation_talk'
+end	
+
+if $ARGS[0] = 'anal_sex_with_boy_ask':
+	*clr & cla
+	mintu += 5
+	gs 'stat'
+	katjaQW['anal_quest'] = 1
+	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+	'Katja starts speaking a little hesitantly. "You keep telling me that anal sex with a boy is so good'+iif(katjaQW['strapon_ass'] = 1, ', and you fucking me in the ass with your strapon is nice, but it would probably be so much better with a real cock,', ', and I think I also would like to try it,')+'" she says while looking at you with her most begging eyes.'
+	if katjaQW['QWstage'] >= 6:
+		'"So you want me to set it up again?" you ask, and Katja just nods sheepishly. "Okay. Since you asked, I expect that you want to try it with somebody else that isn''t Marcus?" 
+		"Yes, <<$pcs_nickname>>. You know so many guys, so I''m sure you can arrange my first anal sex to be perfect!" she says in her most persuasive voice.'
+	else
+		'"Okay, so why don''t you?" you ask. 
+		"I don''t know how to approach a boy..." she answers. "I don''t want a boyfriend, I just want to try having anal sex with a boy. Can''t you help me arrange it? Please..." she says while looking at you pleadingly with her big eyes.'
+	end
+	act 'Agree': gt 'KatjaHomeTalk', 'anal_discussion'
+	act 'Refuse':
+		cla
+		'You refuse to help her, but she continues to beg you.'
+		act 'Tell her to ask a boy herself':
+			cla
+			katjaQW['horny'] -= 20
+			minut += 5
+			'She stops begging and you return to talking about other subjects.'
+			act 'Continue': gt 'KatjaHomeTalk'
+		end
+		act 'You''re too precious to share':
+			cla
+			katjaQW['horny'] += 20
+			minut += 5
+			'She stops begging and looks at you with lust in her eyes.'
+			act 'Talk about something else': gt 'KatjaHomeTalk'
+			act 'Kiss her': gt 'katjaEv', 'kiss'
+		end
+		act 'Tell her to stick to girls':
+			cla
+			katjaQW['horny'] -= 5
+			minut += 5
+			'"Boys aren''t worth it. Just stick with girls," you tell her and she stops begging, but doesn''t look completely convinced.'
+			act 'Talk about something else': gt 'KatjaHomeTalk'
+		end
+	end					
+end
+
 --- KatjaHomeTalk ---------------------------------
 

+ 46 - 41
locations/Katja_Tanga.qsrc

@@ -5,21 +5,21 @@ if $ARGS[0] = 'secretroom':
 	*clr & cla
 	if katjaQW['school_sex'] = 0: katjaQW['school_sex'] = 1 & ! Flag sex with Kate at the school
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_4.jpg"></center>'
-	'You hurry down the hall hand and hand with Katja towards the storage room she told you about. Each of you trying to pull up the others skirt. Once at the door she pulls out a key and unlocks the door, as she does you grab and squeeze her ass. As she pushes open the door she turns towards you and you both immediately start kissing and fondling each other. Barely avoid tumbling into the room, absently you manage to close the door and lock it as you''re all over each other.'
+	'You hurry down the hall hand in hand with Katja towards the storage room she told you about as each of you try to pull up the other''s skirt. Once at the door, she pulls out a key and unlocks it. You grab and squeeze her ass as she does before she pushes the door open and turns towards you. You both immediately start kissing and fondling each other, barely avoiding tumbling into the room before you manage to close the door and lock it.'
 	act 'Bare her breasts':
 		*clr & cla
 		gs 'arousal', 'foreplay', -5, 'lesbian'
 		gs 'arousal', 'kiss', 5, 'lesbian'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_3.jpg"></center>'
-		'As the two of you kiss, you start to unbutton her shirt, she quickly follows suit and soon both of you are topless. You stop kissing her lips and start kissing her neck, then her shoulder, leaving a trail of kisses down to her tits, where you begin to kiss, lick and suck on her nipple, your hand fondles her other breast at the same time. She moans in pleasure, at your touches.'
+		'You continue kissing as you start to unbutton each other''s shirts and you''re both soon topless. You stop kissing her lips and start kissing her neck, then her shoulder, leaving a trail of kisses down to her breasts. You begin to kiss, lick and suck on her nipple as your hand fondles her other breast. She moans softly in pleasure.'
 		act 'Work your way to her pussy':
 			gs 'arousal', 'vaginal_finger_give', -5, 'lesbian'
 			gs 'arousal', 'cuni_give', 5, 'lesbian'
 			gs 'stat'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_10.jpg"></center>'
-			'After a few minutes of teasing her nipples you kiss your way down to her stomach, pulling off her skirt as you do. Your lips descend down her body and you begin kissing and teasing her clit with your tongue. You pull her down and gentle lay her down on her back, once she is laying down you slide two of your fingers into her wet pussy and begin to finger fuck her. She moans in pleasure, as her hands run all over her own body, as squeezes her own breasts.'
+			'After a few minutes of teasing her nipples, you kiss your way down to her stomach, pulling off her skirt as you do. Your lips descend down her body and you begin kissing and teasing her clit with your tongue. You pull her down and gentle push her down on her back. Once she''s comfortable, you slide two of your fingers into her wet pussy and begin to finger fuck her. She moans in pleasure she squeezes her breasts firmly in her hands.'
 			!!The requirements here are to make sure you own a dildo and that neither you or Katja has a hymen, since the scene does not acount for that possibility.
 			if (middildo = 1 or dildo = 1 or largedildo = 1 or bigdildo = 1 or extradildo = 1 or superdildo = 1 or maddildo = 1) and pcs_vag > 0 and npc_vag['A14'] > 0:
 				act 'Get dildo':
@@ -45,7 +45,7 @@ if $ARGS[0] = 'secretroom':
 					gs 'stat'
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_5.jpg"></center>'
-					'Katja''s pussy becomes soaking wet and you can tell she would like something bigger than your fingers in her. Reaching over to your bag you pull out your dildo and slide it up between her breasts so show her what you have in store for her. Katja''s eyes widen slightly at the sight of the dildo but she quickly pulls your hand up holding the dildo and begins to suck on the dildo. Her moans of pleasure audible as she sucks the dildo as you continue to finger fuck her.'
+					'Her pussy is now soaking wet and you can tell she would like something bigger than your fingers in her. Reaching over to your bag, you pull out your dildo and slide it up between her breasts to show her what you have in store for her. Her eyes widen slightly at the sight of the dildo, but she quickly pulls your hand up and begins to suck on the dildo. She moans onto the dildo as you continue to finger fuck her.'
 					act 'Fuck Katja':
 						gs 'arousal', 'vaginal_dildo_give', -5, 'lesbian'
 						gs 'arousal', 'rimming_give', 5, 'lesbian'
@@ -56,12 +56,12 @@ if $ARGS[0] = 'secretroom':
 						gs 'stat'
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_9.jpg"></center>'
-						'Katja, begins moaning louder and bucking her hips against your fingers. You pull the dildo out of her mouth and your fingers out of her twat. You roll her over onto her stomach, as you slide down till your face is over her ass as you slip the wet dildo into her soaking wet pussy and begin to stroke the dildo deeply in her pussy. With your other hand you pull her ass cheeks apart and being to lick her asshole. Stroking the dildo as deep into her as it will go, she moans with pleasure getting ever louder. She beings to arch her hips up trying to take even more of the dildo into herself, but there is no more to give her. Instead you stick your tongue in her ass and begin to tongue fuck her ass. This brings even louder moans and before long she starts bucking her hips as her body spasms in an intense orgasm, as she cums.'
+						'Katja begins moaning louder and bucking her hips against your fingers. You pull the dildo out of her mouth and your fingers out of her pussy before rolling her onto her stomach and sliding the wet dildo into her soaking wet pussy. You bury your face between hr ass cheeks and lick her asshole as you start thrusting the dildo as deep as it will go. Her moans of pleasure get ever louder and she begins to arch her hips up, trying to take even more of the dildo into herself, but there is no more to give. Instead, you stick your tongue in her ass and begin to tongue fuck her ass. This casuses her to moan even louder and before long she starts bucking her hips as her body spasms in an intense orgasm as she cums.'
 						act'Use dildo':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_7.jpg"></center>'
-							'As her quivering body subsides and her panting breath gets under control. You pull the dildo out of her pussy and your tongue out of her ass, you lay back looking at her. She gives you a dreamy smile and reaches over to take the dildo out of your hand. She gets up and sits down between your legs. She lifts them up and then drags you closer continuing to lift your hips till your butt rest just under her breasts and your shoulders and head are the only parts of your body still touching the floor. "You''re so beautiful I want to eat you out" Katja whispers, moments later she starts licking your pussy before her tongue darts inside of your pussy. As your pussy becomes soaked at her attentions you reach up and grab her hair, moaning "Yes, faster, faster." You moan and whine wanting more, for several minutes she only uses her tongue. Then she pulls her face away and slides the dildo into your sopping wet pussy and beings fucking you furiously with the dildo. With her other hand she slips one of her fingers in your ass and begins to finger fuck your ass at the same time.'
-							$orgasm_txt = 'You can''t take it and quickly orgasm, your pussy over flowing with your juices, you feel them running down your stomach as the intense orgasm rocks your body.'
+							'As her quivering body subsides and her panting breath gets under control, you pull the dildo out of her pussy and your tongue out of her ass. She gives you a dreamy smile and reaches over to take the dildo out of your hand. She gets up and sits down between your legs, lifting them up and and dragging your pussy up to her. "You''re so beautiful, I could just eat you right up..." she whispers before she starts licking your pussy, her tongue occasionally darting inside you. As your pussy gets wetter, you reach up and grab her hair. "Yes, faster, faster!" you moan, wanting more. For several minutes, she only uses her tongue before she pulls away, slides the dildo into your wet pussy and begins furiously fucking you with it. Using her other hand, she slips one of her fingers in your ass and begins to finger fuck your ass at the same time.'
+							$orgasm_txt = 'You can''t take it and quickly orgasm. Your pussy overflows with your juices and you feel them running down your stomach as the intense orgasm rocks your body.'
 							$orgasm_or = 'custom'
 							gs 'arousal', 'anal_finger', -5, 'lesbian'
 							gs 'arousal', 'cuni', 5, 'lesbian'
@@ -69,7 +69,7 @@ if $ARGS[0] = 'secretroom':
 							gs 'arousal', 'end'
 							gs 'stat'
 							''
-							'After your orgasm subsides, she pulls her finger and the dildo out of you. Then she extends the dildo down to your mouth, opening your mouth as she slides the wet dildo into your mouth, as happily sucks your own pussy juices off it. Katja watches you with hungry eyes and biting her lower lip as you finish cleaning the dildo with your mouth. "That was amazing, I bet all the boys will be walking to their classes with erections thinking about what we were doing." She says and you both laugh, before getting quickly get dressed, knowing if you don''t hurry you will be late to class.'
+							'After your orgasm subsides, she pulls her finger and the dildo out of you before she extends the dildo down to your mouth. You open your mouth and she slides the wet dildo inside. You happily suck your own pussy juices off of it as Katja watches with hungry eyes, biting her lower lip as you finish cleaning the dildo with your mouth. "That was amazing! I bet all the boys will be walking to class with erections thinking about what we were doing," she says and you both laugh before quickly getting dressed.'
 							act 'Continue': gt 'gschool_lessons', 'short_break'
 						end
 					end
@@ -82,19 +82,19 @@ if $ARGS[0] = 'secretroom':
 				KatjaQW['Slut'] += 2
 				gs 'stat'
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_8.mp4"></video></center>'
-				'Pulling your fingers out of her twat, you run your lips down her inner thighs, till your lips are back on her clit. You kiss, lick and tease her clit with your tongue, she moans in pleasure raising her hips to try and force your tongue into her, as her wetness soaks her inner thighs and your face. Finally you slip your tongue inside of her pussy, she moans loudly and bucks against your face at first. Then she reaches down and grabs your hair, holding your head in place she grinds her crotch against your face as you tongue fuck her pussy, completely covering your face with her pussy juices. After several minutes she being moaning loudly as she cums.'
+				'Pulling your fingers out of her pussy, you run your lips along her inner thighs until you reach her clit. You kiss, lick and tease her clit with your tongue, causing her to moan in pleasure while raising her hips to try and force your tongue into her as her wetness soaks her inner thighs and your face. Giving in, you slip your tongue inside her pussy and moans loudly and bucks against your face before she reaches down and grabs your hair, holding your head in place as she grinds her crotch against your face and you tongue fuck her pussy, completely covering your face with her pussy juices. After several minutes, she begins moaning loudly as she cums.'
 				act 'Katja returns the favor':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/sex/school/tanga4_6.jpg"></center>'
-					'Katja gets up and pushes you down on all fours, then she lays down with her face between your legs under your pussy. She sucks on her fingers for a moment before lifting them up and sliding two of them into your pussy, she beings to finger fuck you, while her thumb works on your clit, she knows all the right spots. It feels amazing, it takes no time before you are moaning loudly, while your juices run down your inner thighs. Pulling her fingers out she lefts up her head and begins to lick your pussy, while her fingers still wet from your pussy slide into your asshole. First one finger and then two fingers, she eats your pussy as she finger fucks your ass.'
-					$orgasm_txt = 'Unable to take it anymore as convulsions run throughout your body, you orgasm hard. Your legs shaking, you can barely keep yourself from collapsing on her.'
+					'Katja gets up and pushes you down on all fours before moving between your legs. She sucks on her fingers before sliding two of them into your pussy, slowly finger fucking you while her thumb works on your clit. It feels amazing, and you moan loudly as your juices run down your inner thighs. Katja then pulls her fingers out and starts licking your pussy while her fingers, coated with your juices, slide into your asshole. She vigorously eats your pussy while finger fucking your ass.'
+					$orgasm_txt = 'Unable to take it anymore, you orgasm hard as convulsions run through your body. Your legs shaking, you can barely keep yourself from collapsing on her.'
 					$orgasm_or = 'custom'
 					gs 'arousal', 'anal_finger', 5, 'lesbian'
 					gs 'arousal', 'cuni', 5, 'lesbian'
 					gs 'arousal', 'end'
 					gs 'stat'
 					''
-					'Waiting until you recover from your orgasm, Katja looks at you biting her lip and says. "That was amazing, I bet all the boys will be walking to their classes with erections thinking about what we were doing in here." You both laugh as quickly get dress, knowing if you don''t hurry you will be late to class.'
+					'Waiting until you recover from your orgasm, Katja looks at you while biting her lip. "That was amazing! I bet all the boys will be walking to class with erections thinking about what we were doing in here," You both laugh before quickly getting dressed.'
 					act 'Continue': gt 'gschool_lessons', 'short_break'
 				end
 			end
@@ -106,18 +106,18 @@ if $ARGS[0] = 'school':
 	*clr & cla
 	i=rand(1,6)
 	katjaQW['no_panties_day'] = daystart
-	'You did a quick turn, causing your skirt to twirl up. For a brief moment exposing your lack of panties. Katja''s eyes widened in surprise. "You''re not wearing panties?" She whispers to you.'
+	'You do a quick turn, causing your skirt to twirl up and expose your lack of panties for a brief second. Katja''s eyes widen in surprise. "You''re not wearing panties?!" she whispers in shock.'
 	if analplugIN = 1:
 		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/katja/tanga1_7.mp4"></video></center>'
 		inhib_exp += rand(1,4)
-		'"I''m not only not wearing panties!" You say while smiling enigmatically. You turn and lift your skirt then briefly pull apart you butt cheeks, showing Katja the plug inserted in your ass.'
+		'"I''m not only not wearing panties!" you say while smiling enigmatically. You turn and lift your skirt before parting your ass cheeks, showing Katja the butt plug in your ass.'
 	else
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga1_<<i>>.jpg"></center>'
 		inhib_exp += rand(1,3)
-		'You looked around, checking no one else is around, then turn your ass toward Katya and bend over, showing off your bare ass and pussy, proving you''re not wearing any panties at school today.'
+		'You look around, making sure that nobody is nearby before turning your ass towards Katja and bending over, showing off your bare ass and pussy and proving that you''re not wearing any panties.'
 	end
 	''
-	'"I showed you mine." You state, "Now I want to know if you''re wearing any panties."'
+	'"I showed you mine," you state. "Now I want to know if you''re wearing any panties."'
 	act 'Katja''s turn':
 		*clr & cla
 		if katjaQW['pantiesQWstage'] = 5:
@@ -138,7 +138,7 @@ if $ARGS[0] = 'school1':
 	*clr
 	cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga2.jpg"></center>'
-	'Katja only blushes in embarrassment, and covers her eyes, "You''re such a bad influence, <<$pcs_nickname>>. I always wear shorts, the boys in this school are all perverts."'
+	'Katja blushes in embarrassment and covers her eyes, "You''re such a bad influence, <<$pcs_nickname>>! I always wear shorts since the boys in this school are all perverts."'
 	act 'Continue': gt 'gschool_lessons', 'short_break'
 end
 
@@ -148,7 +148,7 @@ if $ARGS[0] = 'school2':
 	pcs_horny += 10
 	KatjaQW['Slut'] += 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga3_<<i>>.jpg"></center>'
-	'Katja looked around to make sure no one else is around, then furtively lifts up her skirt, showing her panties. "See, I am wearing panties."'
+	'Katja looks around to make sure nobody is nearby before furtively lifting up her skirt and showing you her panties. "See? I''m wearing panties."'
 	act 'Continue': gt 'gschool_lessons', 'short_break'
 end
 
@@ -156,7 +156,8 @@ if $ARGS[0] = 'school3':
 	*clr
 	cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_1.jpg"></center>'
-	'You give a slightly disappointed frown. "So still wearing panties huh.", Katja blushes and whispers to you. "Yes but I''m not wearing a bra."'
+	'You give Katja a slightly disappointed frown. "Still wearing panties, huh?" 
+	Katja blushes. "Yes, but I''m not wearing a bra..." she whispers.'
 	act 'Share':
 		*clr & cla
 		gs 'arousal', 'erotic', -5
@@ -164,14 +165,14 @@ if $ARGS[0] = 'school3':
 		gs 'arousal', 'end'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga4_2.jpg"></center>'
-		'Katja looks around to make sure that no one is watching the two of you. Then she unbuttons her shirt and pulls it open to reveal her bare breasts. With a smile you reach up and grab both her breasts in your hands and tease her nipples with your fingers, eliciting a moan of pleasure from her.'
+		'Katja looks around to make sure nobody is watching before she unbuttons her shirt and pulls it open to reveal her bare breasts. With a smile, you reach up and grab her breasts in your hands, teasing her nipples with your fingers. A moan of pleasure escapes from her mouth.'
 		if pcs_horny >= 50 and katjaQW['Horny'] >= 40 and npc_sex['A14'] > 0 and mesec <= 0 and katjaQW['school_sex'] = 0:
-			'Blushing Katja pulls away from your touch and buttons her shirt back up, but looks at you slyly and says. "I have a key to a storage closet, we can go there for a bit more privacy if you want." Giving you a hopeful look that you will agree.'
+			'Blushing, Katja pulls away from you and buttons her shirt back up, but looks at you with a sly grin. "I have a key to a storage closet. We can go there for a bit more privacy if you want..." She gives you pleading eyes, hoping that you''ll agree.'
 			act 'Go': gt 'Katja_tanga', 'secretroom'
 		else
 			ketjaQW['horny'] += 10
 			if katjaQW['school_sex'] = 1: katjaQW['slut'] +=1
-			'Blushing Katja pulls away from your touch and buttons her shirt back up, looking around to see if anyone had seen you grabbing her tits. "<<$pcs_nickname>> Are you crazy? Anyone could have seen us and what would they say?". '
+			'Blushing, Katja pulls away from you and buttons her shirt back up, looking around to see if anyone had seen you. "<<$pcs_nickname>>, are you crazy?! Someone could have seen us! What would they say?!"'
 		end
 		act 'Continue': gt 'gschool_lessons', 'short_break'
 	end
@@ -183,33 +184,34 @@ if $ARGS[0] = 'school4':
 	KatjaQW['Slut'] += 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_1.jpg"></center>'
 	if katjaQW['pantiesQWstage'] = 4:
-		'Katja quickly lifted her skirt, showing her ass while wearing a thong. "You''re back to wearing panties again?" you cry. Katja hissed at you. "So? It''s not like you haven''t seen everything before."'
+		'Katja quickly lifts her skirt, showing you her thong clad ass. "You''re back to wearing panties again?" you cry. 
+		Katja hisses at you. "So? It''s not like you haven''t seen everything before."'
 	else
-		'Katja quickly lifted her skirt, showing her ass while wearing a thong. "So still wearing panties huh." you say. Katja hissed at you. "So? It''s not like you haven''t seen everything before."'
+		'Katja quickly lifts her skirt, showing her thong clad ass. "Still wearing panties, huh?" you ask and Katja hisses at you. "So? It''s not like you haven''t seen everything before."'
 	end
 	act 'Denied':
 		*clr & cla
 		gs 'arousal', 'kiss', -5, 'lesbian'
 		if katjaQW['pantiesQWstage'] < 1: katjaQW['pantiesQWstage'] = 1
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga_kiss1.jpg"></center>'
-		'Dejected at her reaction. "Fine, whatever.", You said as you turned to go. Katja afraid that she had offended you, grabs your hand and pulls you into a passionate kiss. "Don''t pout sweetie, I''m sorry. Let me make it up to you." she says.'
+		'"Fine, whatever," you say and turn to leave, dejected at her reaction. Katja, afraid that she has offended you, grabs your hand and pulls you into a passionate kiss. "Don''t pout sweetie, I''m sorry. Let me make it up to you!"'
 		act 'Watch':
 			*clr & cla
 			gs 'arousal', 'erotic', -5
 			if katjaQW['pantiesQWstage'] = 1: 
 				katjaQW['pantiesQWstage'] = 2
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_2.jpg"></center>'
-				'Katja sits down on the floor and parts her legs as she pulls aside her panties.'
+				'Katja sits on the floor and parts her legs as she pulls her panties aside.'
 				gs 'arousal', 'end'
 			elseif katjaQW['pantiesQWstage'] = 2:
 				katjaQW['pantiesQWstage'] = 3
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_3.jpg"></center>'
-				'Turning away from you and bending over Katja lifts up her skirt and pulls down her panties, showing you her lovely ass and pussy. Hearing someone coming she quickly pulls her panties back up and straightens up her skirt, as she smiles to you shyly.'
+				'Turning away from you and bending over, Katja lifts up her skirt and pulls down her panties, showing you her ass and pussy. Hearing someone coming, she quickly pulls her panties back up and straightens up her skirt as she smiles at you shyly.'
 				gs 'arousal', 'end'
 			else
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_4.jpg"></center>'
-				'Turning away from you and bending over Katja lifts up her skirt and pulls down her panties, showing you her lovely ass and pussy. She starts to pull up her panties as you say pouting. "Is that it?"'
-				act '"What that''s all?"':
+				'Turning away from you and bending over, Katja lifts up her skirt and pulls down her panties, showing you her ass and pussy. She starts to pull her panties back up as you pout. "Is that it?"'
+				act 'That''s all?':
 					*clr & cla
 					if KatjaQW['Slut'] > 80 and katjaQW['pantiesQWstage'] = 4: katjaQW['pantiesQWstage'] = 5
 					if katjaQW['pantiesQWstage'] = 3: katjaQW['pantiesQWstage'] = 4
@@ -217,7 +219,7 @@ if $ARGS[0] = 'school4':
 					gs 'arousal', 'erotic', -5
 					gs 'arousal', 'end'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga5_5.jpg"></center>'
-					'Katja looks over her shoulder at you, biting her lower lip she looks around to make sure no one is around and with a mischievous smile. Pulls her panties down further letting them drop around her ankles. "To hell with panties then." She quickly gathers her panties off the floor and sticks them in her purse. Then she twirls in front of you, giving you a fantastic view of her pussy and bare ass.'
+					'Katja looks over her shoulder at you, biting her lower lip as she looks around with a mischievous smile to make sure nobody is nearby. She then pulls her panties down further, letting them drop around her ankles. "To hell with panties then." She quickly gathers her panties off the floor and sticks them in her purse before she twirls in front of you, giving you a fantastic view of her pussy and bare ass.'
 					act 'Continue': gt 'gschool_lessons', 'short_break'
 				end
 			end
@@ -232,7 +234,8 @@ if $ARGS[0] = 'school5':
 	gs 'arousal', 'end'
 	KatjaQW['Slut'] += 1
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga6_<<i>>.jpg"></center>'
-	'Without any embarrassment Katja pulls up her skirt and shows you her pussy. "Like what you see?" She asks with a teasing smile.'
+	'Without any hesitation, Katja pulls up her skirt and shows you her pussy. 
+	"Like what you see?" she asks with a teasing smile.'
 	act 'Continue': gt 'gschool_lessons', 'short_break'
 end
 
@@ -244,20 +247,20 @@ if $ARGS[0] = 'dance':
 	i=rand(1,3)
 	inhib_exp += rand(1,2)
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco2_<<i>>.jpg"></center>'
-	'You lift the edge of your skirt up and flashed your pussy in front of Katja. "I showed you mine, now show me yours.".'
+	'You lift the edge of your skirt up and flash your pussy at Katja. "I showed you mine, now show me yours."'
 	act 'Ask to see':
 		*clr & cla
 		if KatjaQW['Slut'] <= 20:
 			katjaQW['Horny'] += 10
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco3.jpg"></center>'
-			'But Katja only blushed in embarrassment, clasping her hands. "I''m not as brave as you to go to a dance without my panties on."'
+			'Katja blushes in embarrassment. "I''m not as brave as you! I can''t to go to a dance without my panties on."'
 			gs 'arousal', 'end'
 		elseif KatjaQW['Slut'] <= 40:
 			gs 'arousal', 'erotic', -5
 			gs 'arousal', 'end'
 			katjaQW['Horny'] += 10
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco4.jpg"></center>'
-			'Katja looked around to make sure no one was watch and then turns away and partially bends over lifting her skirt. Showing you she was wearing a thong and giving you a nice view of her ass.'
+			'Katja looks around to make sure nobody is watching before partially bending over and lifting her skirt, showing you her thong and giving you a nice view of her ass.'
 		elseif KatjaQW['Slut'] <= 60:
 			gs 'arousal', 'erotic', -5
 			gs 'arousal', 'end'
@@ -266,10 +269,10 @@ if $ARGS[0] = 'dance':
 			if katjaQW['disco_Foto'] = 0:
 				katjaQW['disco_Foto'] = 1 & !The flag in the photo
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco5_1.jpg"></center>'
-				'Katja unbuttons her shirt and exposes her pretty bra. A moment later there is a brief flash as someone takes a picture, you quickly look around but can''t tell who took the picture.'
+				'Katja unbuttons her shirt and exposes her bra. There is a brief flash as someone takes a picture. You quickly look around, but can''t tell who took the picture.'
 			else
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco5_2.jpg"></center>'
-				'Katja unbuttons her shirt and exposes her pretty bra.'
+				'Katja unbuttons her shirt and exposes her bra.'
 			end
 		elseif KatjaQW['Slut'] <= 80:
 			if	katjaQW['Horny'] > 70:
@@ -277,14 +280,15 @@ if $ARGS[0] = 'dance':
 				katjaQW['Horny'] += 10
 				KatjaQW['Slut'] += 1
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_1.jpg"></center>'
-				'Katja resolutely lifts her dress up to her neck,  showing not only her cute little panties, but her beautiful bare breasts. Pulling her dress back down she says. "Now show me your tits."'
+				'Katja resolutely lifts her dress up to her neck, showing not only her panties, but her bare breasts. She smiles as she pulls her dress back down. "Now show me your tits."'
 				if pcs_horny > 70 or alko > 1:
 					act 'Show your tits':
 						*clr & cla
 						gs 'arousal', 'flash', -5
 						gs 'arousal', 'end'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_2.jpg"></center>'
-						'Laughing, you pull aside your dress and reveal one of your bare breasts. Katja looks at you wanting more. "I showed you both of mine." You smile and reply, "Yeah, but you''re wearing panties and I''m not."'
+						'Laughing, you pull aside your dress and reveal one of your bare breasts. Katja looks at you, wanting more. "I showed you both of mine!" 
+						You smile. "Yeah, but you''re wearing panties and I''m not."'
 						act 'Move away': gt'pav_disco'
 					end
 				end
@@ -293,13 +297,14 @@ if $ARGS[0] = 'dance':
 					gs 'arousal', 'flash', -5
 					gs 'arousal', 'end'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_3.jpg"></center>'
-					'You pull at the edge of your dress, exposing just a bit of one of your nipples. Katja indignant squeaks."Hey I showed you mine.",	You responded with a laugh "I already showed you my pussy, so that makes us even."'
+					'You pull at the edge of your dress, barely exposing one of your nipples as Katja indignantly squeaks."Hey, I showed you mine!"
+					You respond with a laugh. "I already showed you my pussy, so that makes us even."'
 					act 'Move away': gt'pav_disco'
 				end
 			else
 				gs 'arousal', 'end'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_4.jpg"></center>'
-				'You began to look on with anticipation, but Katja just pulls down her top showing a little extra cleavage before stopping. After seeing your disappointed look,  she sticks out her tongue and turns away. That redheaded bitch you think and nearly say it, but you hold your tongue.'
+				'You watch with anticipation, but Katja just pulls down her top, showing a little extra cleavage before stopping. After seeing your disappointed look, she sticks out her tongue and turns away. You grit your teeth at her teasing.'
 			end
 		else
 			gs 'arousal', 'erotic', -10
@@ -308,7 +313,7 @@ if $ARGS[0] = 'dance':
 			KatjaQW['Slut'] += 1
 			katjaQW['no_panties_at_disco']= 1 &!Event at the end of the disc
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco7_<<i>>.jpg"></center>'
-			'Katja does not hesitate and lifts the hem of her skirt, showing you her bare pussy.'
+			'Katja doesn''t hesitate and lifts the hem of her skirt, showing you her bare pussy.'
 		end
 		act 'Move away': gt'pav_disco'
 	end

+ 1 - 1
locations/Komp.qsrc

@@ -1848,4 +1848,4 @@ if $ARGS[0] = 'fin':
 end
 
 
---- komp ---------------------------------
+--- komp ---------------------------------

+ 1 - 1
locations/LCporn.qsrc

@@ -87,7 +87,7 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'bj', 20, 'futa', 'sub', 'deepthroat'
 		'Finally, a good half hour after you started sucking her cock, Eugene finally lets out a loud and girly moan and releases her load all over your face. Thick strands of saliva are running down your chin by now.'
 		gs 'cum_call', 'face', $boy, 1
-		facial += 1
+		
 		gs 'stat'
 		'She licks her cum on your face and kisses you. She smiles and starts to get dressed. She tells you: "Thank you, <<$pcs_nickname>>! That was great... but I should go back to work before someone realizes I am missing! We''ve got to do this again, <<$pcs_nickname>>!"'
 		

+ 4 - 4
locations/LCwork.qsrc

@@ -3,7 +3,7 @@ if $ARGS[0] = 'start1':
 	cla
 	*clr
 	horand = rand(1, 100)+ 40
-	facial += 1
+	
 	gs 'dinSex', 'std_trigger_oral'
 	gs 'dinSex', 'std_trigger'
 	randLCpay = 1000
@@ -60,7 +60,7 @@ if $ARGS[0] = 'start2':
 	cla
 	*clr
 	horand = rand(1, 100)
-	facial += 1
+	
 	spafinloc = 11
 	gs 'cum_manage'
 	randLCpay = 500
@@ -101,7 +101,7 @@ if $ARGS[0] = 'start3':
 	cla
 	*clr
 	horand = rand(1, 100) + 20
-	facial += 1
+	
 	spafinloc = 11
 	gs 'cum_manage'
 	spafinloc = 12
@@ -273,7 +273,7 @@ if $ARGS[0] = 'start6':
 	cla
 	*clr
 	horand = rand(1, 100)
-	facial += 1
+	
 	randLCpay = 500
 	guy += 1
 

+ 1 - 1
locations/NatBelGo.qsrc

@@ -25,4 +25,4 @@ act 'Go with Natasha':
 	end
 end
 
---- NatBelGo ---------------------------------
+--- NatBelGo ---------------------------------

+ 4 - 3
locations/NikoEv.qsrc

@@ -340,6 +340,7 @@ if $ARGS[0] =  'Date 1':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/Dates/Walk1.jpg"></center>'
 		'"I sure am." Niko gives you a warm smile as he responds, "I figured that we could go to an amusement park, out of town. I will pay our way of course, so come on, let''s get going." Niko takes your hand and walks you to the train station where you both board the train and get seated.'	
 		
+		NikoNextDate_day = daystart + 7 - week + 1
 		act 'Go with Niko':gt 'NikoDates', 'Date 1_1'
 	end
 	
@@ -370,7 +371,7 @@ if $ARGS[0] =  'Date 2':
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk3.jpg"></center>'
 		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist as he leads you toward the lake.'
-		
+		NikoNextDate_day = daystart + 7 - week + 1
 		act 'Follow Niko''s lead':gt 'NikoDates', 'Date 2'
 	end
 	
@@ -401,7 +402,7 @@ if $ARGS[0] =  'Date 3':
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/dates/walk4.jpg"></center>'
 		'"I sure am." Niko''s smile widens as he replies, "Great let''s get going." Niko wraps his arm around your waist as he leads you toward the lake.'	
-		
+		NikoNextDate_day = daystart + 7 - week + 1
 		act 'Follow Niko''s lead':gt 'NikoDates', 'Date 2'
 	end
 	
@@ -431,7 +432,7 @@ if $ARGS[0] =  'Date 4':
 		'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/avatars/<<week>>.jpg"></center>'
 		'"I can never turn down a day at the beach." Niko chuckles as he responds, "Great I have everything we should need here." Niko then opens his bag which houses a beach towel, cigarettes and sunscreen.'	
-		
+		NikoNextDate_day = daystart + 7 - week + 1
 		act 'Let''s go!':	
 			*clr & cla
 			minut += 5

+ 1 - 1
locations/Peterroom.qsrc

@@ -309,4 +309,4 @@ if $ARGS[0] = 'd2':
 	end
 end
 
---- Peterroom ---------------------------------
+--- Peterroom ---------------------------------

+ 1 - 1
locations/UnitAppearance.qsrc

@@ -1548,4 +1548,4 @@ if $ARGS[0] = 'CurVal':
 
 end
 
---- UnitAppearance ---------------------------------
+--- UnitAppearance ---------------------------------

+ 0 - 435
locations/Voltrener - WIP.qsrc

@@ -1,435 +0,0 @@
-# Voltrener
-
-!! vball['coachsex'] = 1 - He has given you massages
-!! vball['coachsex'] = 2 - He has given you naked massages
-!! vball['coachsex'] = 3 - You have given him a handjob
-!! vball['coachsex'] = 4 - You have given him a blowjob
-!! vball['coachsex'] = 5 - You''ve done anal
-!! vball['coachsex'] = 6 - You''ve fucked
-!! vball['coachsex'] = 7 - You''ve slept over at his place
-!! vball['coachsex'] = 8 - You are in a relationship with him
-
-CLOSE ALL
-gs 'stat'
-
-if $ARGS[0] = 'start':
-	gs 'boyStat', 'A69'
-	if $npc_nickname['A29'] = '':$npc_nickname['A29'] = 'Coach Mikhail'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener6.jpg"></center>'
-	*nl
-	'You enter the coach''s office in which there are cups, balls, sports equipment, a massage table, and a desk where the coach sometimes sits and does paperwork. <<$npc_nickname[''A29'']>> Vlasov does not only teach amateur volleyball but he also coaches a professional volleyball team.'
-	*nl
-	'The coach looks up as you come in.'
-	if npc_rel['A69'] < 80:
-		'"Yes?"'
-	else
-		'"<<$pcs_nickname>>! What''s up?"'
-	end
-
-	act 'Leave':gt 'gdksport', 'start'
-	act 'Talk with the coach':gt'Voltrener', 'talk'
-end
-
-
-if $ARGS[0] = 'talk':
-	*clr & cla
-	gs 'stat'
-	npc_rel['A69'] += rand(0,1)
-	if pcs_apprnc >= 60: vball['coach_lust'] += rand(0,1)
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/teacher/mikhail/volleytrener6.jpg"></center>'
-	*nl
-	if vball['team'] = 0:
-		if npc_rel['A69'] <= 0:
-			'"Ugh, what do you want <<$pcs_lastname>>?"'
-		elseif npc_rel['A69'] < 20:
-			'"Do you need to talk to me right now <<$pcs_lastname>>? I''m very busy with the team."'
-		elseif npc_rel['A69'] < 40:
-			'"Yes, <<$pcs_lastname>>? Did you need something?"'
-		elseif npc_rel['A69'] < 60:
-			'"Yes, <<$pcs_lastname>>? Can I help you with something?"'
-		elseif npc_rel['A69'] < 80:
-			'"Of course, <<$pcs_lastname>>. I always have time for you. Need help with anything?"'
-		else
-			'"Of course, <<$pcs_nickname>>! I always have time for you."'
-		end
-	elseif vball['team'] > 1:
-		if vball['coachsex'] > 0:
-			if vball['coachsex'] = 1:
-				'"Of course, <<$pcs_lastname>>.'
-			elseif vball['coachsex'] = 2:
-			
-			elseif vball['coachsex'] = 3:
-			
-			elseif vball['coachsex'] = 4:
-			
-			end
-		else
-			if vball['coach_lust'] >= 80:
-				'Coach can''t take his eyes of you and he keeps making sexual references in your presence.'
-			elseif vball['coach_lust'] >= 60:
-				'Coach sometimes makes lewd comments around you and you often catch him ogling your body.'
-			elseif vball['coach_lust'] >= 40:
-				'Coach seems more interested in watching you practice than the other girls.'
-			elseif vball['coach_lust'] >= 20:
-				'Sometimes you can see Coach Mikhail looking your body up and down.'
-			elseif vball['coach_lust'] > 0:
-				'You occasionally catch Coach looking at you a second longer than he should.'
-			end
-		end
-		if npc_rel['A69'] < 80:
-			'"What is it <<$pcs_lastname>>? Did you need help with something?"'
-		else
-			'"<<$pcs_nickname>>! What''s up?"'
-		end
-		
-	end
-	act 'Leave':gt 'gdksport', 'start'
-	act'Check on your stats':
-		*nl
-		if vball['coachsex'] = 0:
-			vball['coach_lust'] += 1
-			'Coach looks at you, "<<$pcs_lastname>>. Here''s your stats, now go out there and work harder."'
-			'"Your volleyball skill is <<pcs_vball>>, the team has played <<volsesongame>> games: Won - <<volsesonwin>>, lost - <<volsesonloss>>."'
-		else
-			'Coach looks at you "Hey <<$pcs_nickname>>. Checking up on your stats?."'
-			'"Your volleyball skill is <<pcs_vball>>, the team has played <<volsesongame>> games: Won - <<volsesonwin>>, lost - <<volsesonloss>>."'
-		end
-	end
-	if npc_rel['A69'] < 80:
-		act'Ask him about his personal life':
-			*nl
-			'"I don''t think that''s any of your business <<$pcs_lastname>>."'
-		end
-	else
-		act'Ask him what he loves about volleyball':
-		
-		if vball['coach_wife'] = 0:
-			act'Ask him if he has a girlfriend':
-			
-		elseif vball['coach_wife'] = 1:
-			act'Ask him about his wife':
-		
-		elseif vball['coach_wife'] >= 2:
-			act'Ask him more about his wife':
-			
-		end
-		
-		act'Ask about where he lives':
-		
-		act'Ask him what he loves about volleyball':
-	end
-	act'Flirt with him':
-		cla & *clr
-		!! IMAGE LINK
-		vball['coach_lust'] += rand(1,3)
-		'Placeholder text'
-	end
-	act'Ask him for a masssage':
-		cla & *clr
-		!! IMAGE LINK
-		if vball['coachsex'] < 1:
-			'"Hey Coach, I''m feeling kind of stiff after practice. Could you maybe... give me a massage? Help work out the kinks in my muscles?"'
-			if vball['coach_lust'] >= 60:
-				'A hungry glint appears in his eyes and you can see him imagining his hands all over your body.'
-				'"Yes... muscular health is... important... Why don''t you come into the back here?" he says, gesturing towards a door at the back of his office. "I have a massage table back there. It''ll be much more effective than in a chair."'
-				act'Chicken out':
-					cla & *clr
-					!! IMAGE LINK
-					'You take a step towards him and suddenly hesitate.'
-					*nl
-					'<i>Are you really going to do this?</i>'
-					*nl
-					'"ActuallyIthinkI''mfineI''llseeyouatpracticeCoach!"'
-					*nl
-					'Spewing out a torrent of words, you rush out the door and slam it shut behind you.'
-					*nl
-					'<i>What were you thinking?</i>'
-					act'Continue':gt'gdksport','start'
-				end
-				
-				act'Follow him':gt'Voltrener','massage'
-			elseif vball['coach_lust'] >= 30:
-				'You see his gaze roam up and down your body and for a moment, you think he might be considering it before he suddenly looks away.'
-				'"No, you just need... rest. Don''t bother me right now <<$pcs_lastname>>."'
-				'He immediately turns back towards whatever he was working on on his desk.'
-				*nl
-				'<i>Tch. So close.</i>'
-				act'Continue':gt'gdksport','start'
-			else
-				'"No <<$pcs_lastname>>, you just need rest. Go home. Don''t bother me with this."'
-				'He doesn''t even give you another look as he continues looking at his stats.'
-				act'Continue':gt'gdksport','start'
-			end
-		elseif vball['coachsex'] >= 1:
-	end
-	if vball['coachsex'] > 0:
-		act'Ask him if he''d like some "relief"':
-		
-		end
-		
-		
-		act'Ask him for some "relief"':
-		
-		end
-	end
-end
-
-
-if $ARGS[0] = 'massage':
-	!! IMAGE LINK
-	'You follow <<$npc_nickname[''A29'']>> into the back of his office. It has a massage table on it as well as a multitude of medical supplies for various kinds of sports injuries.'
-	'"Lay down on the table <<$pcs_lastname>>," he says, turning away for a moment to get something.'
-	act'Lay down':
-		cla & *clr
-		!! IMAGE LINK
-		'You do as he says, laying face down on the table.'
-		*nl
-		'He comes up behind you and you can feel his hands on your shoulders.'
-		*nl
-		'"Just try and relax..."'
-		act'Continue':
-			vball['coach_massage'] += 1
-			cla & *clr
-			!! IMAGE LINK
-			if vball['coach_massage'] = 1:
-				'The next half hour is spent under the coach''s ministrations.'
-				*nl
-				'Involuntary gasps are drawn from you as he kneads his hands into your muscles. He knows exactly where to apply pressure, how to run his hand along your aching muscles. Your breath can''t help but hitch from his touch, and you feel a deep warmth spreading from between your legs.'
-				*nl
-				$orgasm_txt = 'Despite the fact that it''s just a massage you can''t help but be aroused. Arousal builds to excitement, and before you know it you find yourself quivering in orgasm, biting hard on your lip to keep from crying out. "Are you feeling okay <<$pcs_lastname>>? Something wrong?" You simply shake your head in response, not trusting yourself to speak.'
-				gs 'arousal','massage', 30
-				act'Finish':gt'Voltrener','massage_end'
-			elseif vball['coach_massage'] <= 4:
-				'It''s just as good as last time. You groan in pleasure as the coach''s hands work through your sore muscles, gasping when he hits those perfect spots that can''t help but turn you on.'
-				*nl
-				'Through the process, you can''t help but notice moments when <<$npc_nickname[''A29'']>> takes advantage of the situation. When massaging your sides, his fingers press into your breasts. In addition to when he works his perfect pressure points, a gasp is elicited when he grabs a handful of ass on the way down to your legs. And this time he spends a lot more time massaging your thighs, especially on the inside. Makes you wonder if he notices your spreading wetness in return.'
-				*nl
-				$orgasm_txt = 'Eventually you can''t take it anymore, and you find yourself climaxing under his touch. Even as every muscle in your body tenses up again, he doesn''t let up. "You''re <i>very</i> tight <<$pcs_lastname>>. You need to loosen up some more." Breathing slowly, you choose not to respond.'
-				gs 'arousal','massage', 25
-				gs 'arousal','foreplay', 5
-				act'Finish':gt'Voltrener','massage_end'
-			elseif vball['coach_massage'] = 5:
-				'He''s starting to get bolder now.'
-				*nl
-				'<<$npc_nickname[''A29'']>>''s hands roam your body freely, openly and brazenly copping a feel of you wherever he pleases. You swear, half this "massage" is spent groping you instead. Not that it matters to you. It feels good.'
-				*nl
-				'When he squeezes your breasts. When his hands spread your ass cheeks. When his fingers run up and down your snatch.'
-				*nl
-				'You allow your eyes to roll back as you relax into sensual bliss.'
-				*nl
-				$orgasm_txt = 'When your climax comes, you don''t even try to hide it. It starts as soft grunts before becoming loud moans and then a gasping cry as you cum hard, your clit fingered through your pants as you ride out your orgasm.'
-				gs 'arousal','massage', 15
-				gs 'arousal','foreplay', 15
-				act'Finish':gt'Voltrener','massage_end'
-			else
-				'<<$npc_nickname[''A29'']>>''s hands roam your body freely and you moan in response to his touch. Half massage, half foreplay, you enjoy yourself while <<$npc_nickname[''A29'']>> enjoys your body. Sore muscles are worked loose and erogenous zones are teased and played with. Through one way or another, you find yourself supremely relaxed.'
-				*nl
-				'You allow your eyes to roll back as you relax into sensual bliss.'
-				*nl
-				$orgasm_txt = 'Under <<$npc_nickname[''A29'']>>''s magic touch, you find yourself gasping in orgasm in no time at all.'
-				gs 'arousal','massage', 15
-				gs 'arousal','foreplay', 15
-				act'Finish':gt'Voltrener','massage_end'
-			end
-		end
-	end
-	
-	act'Take off your clothes first':
-		cla & *clr
-		!! IMAGE LINK
-		
-	end
-end
-
-!! gs 'arousal','end'
-
-if $ARGS[0] = 'massage_end':
-	pcs_stam += 20
-	pcs_mood += 20
-	!! IMAGE LINK
-	'"There, all done," <<$npc_nickname[''A29'']>> says, drawing his hands back.'
-	if vball['coach_massage'] = 1:
-		'You roll your shoulders and stretch, sighing in relief at your loosened muscles.'
-	elseif vball['coach_massage'] <= 4:
-		'You roll your shoulders and stretch, sighing in relief at your loosened muscles, rolling your hips in relaxed arousal.'
-	else
-		'You roll your shoulders and stretch, sighing in relief at your loosened muscles, making eye contact with him as you adjust your clothes around your breasts and tug on your waistband around your hips.'
-	end
-	'"Feel better now?"'
-	act'Much better':
-		cla & *clr
-		!! IMAGE LINK
-		'"Much better," you say, stretching your arms behind your back so your breasts push out against your top, heavily emphasizing your stiff nipples. "Thanks for the massage Coach."'
-		'"You''re welcome <<$pcs_lastname>>. Now hit the showers."'
-		act'Yes Coach':gt'gdksport','start'
-		
-		act'Gonna join me?':
-			cla & *clr
-			!! IMAGE LINK
-			'"Gonna join me?" you smirk heading towards the door.'
-			*nl
-			if vball['coachsex'] >= 3:
-				'You yelp when you feel a hand fiercely slap across your ass, jumping on contact. You glare back at <<$npc_nickname[''A29'']>>. His expression is neutral but for a childish glint in his eye.'
-				'"I can play games too, <<$pcs_lastname>>." You shrug and give a wistful smile before exiting out the door.'
-			else
-				'Looking back over your shoulder you can see his gaze roaming your body, obviously tempted by your offer.'
-				'"Nobody likes a tease, <<$pcs_lastname>>," he sighs.'
-				'"You know you love it," you say, slipping out the door.'
-			end
-			act'Continue':gt'gdksport','start'
-		end
-	end
-	
-	act'Offer him some relief in return':
-		cla & *clr
-		!! IMAGE LINK
-		'"I feel great <<$npc_nickname[''A29'']>>. Maybe I could..." you step in close to him, putting your hands on his chest. "... do something for you now...?"'
-		if vball['coachsex'] = 3:
-			
-		elseif vball['coachsex'] >= 4:
-			
-		elseif vball['coach_lust'] >= 60 and npc_rel['A69'] >= 80:
-			'"Like what?"'
-		elseif vball['coach_lust'] >= 40 and npc_rel['A69'] >= 80:
-			'You see him hesitate, seriously considering doing something with you. A moment later, he puts his hands on your shoulders and gently pushes you away.'
-			'"<<$pcs_nickname>>. We can''t do this."'
-			'"Why not?"'
-			'"We just... can''t." He takes a further step away from you. "You need to go. Now."'
-			'You sigh in dejection, moving out the door without another word.'
-			act'Leave':gt'gdksport','start'
-		else
-			'"What are you doing <<$pcs_lastname>>?"'
-			act'Nothing':
-				cla & *clr
-				!! IMAGE LINK
-				'"Nothing," you say innocently. "I just wondered if-"'
-				'You''re cut off when <<$npc_nickname[''A29'']>> abruptly pushes you back.'
-				'"Enough <<$pcs_lastname>>. Get out."'
-				'"But-"'
-				'"<b>Out.</b>'
-				'You sigh in dejection, moving out the door without another word.'
-				act'Leave':gt'gdksport','start'
-			end
-			
-			act'Paying you back for your massage':
-				cla & *clr
-				!! IMAGE LINK
-				'"I just really appreciated the massage," you say. "I want to pay you back for it. Maybe with-"'
-				'You''re cut off when <<$npc_nickname[''A29'']>> abruptly pushes you back.'
-				'"Enough <<$pcs_lastname>>. Get out."'
-				'"But-"'
-				'"<b>Out.</b>'
-				'You sigh in dejection, moving out the door without another word.'
-				act'Leave':gt'gdksport','start'
-			end
-			
-			act'Seducing you':
-				cla & *clr
-				!! IMAGE LINK
-				vball['coach_lust'] += 20
-				'"Seducing you of course."'
-				'You run your hands down his chest, biting your lip as you stare into his eyes, just before swiftly grabbing his crotch.'
-				if vball['coach_lust'] < 60 or npc_rel['A69'] < 80:
-					npc_rel['A69'] -= 15
-					'He immediately jerks back, shoving you away.'
-					'"What the hell <<$pcs_lastname>>!"'
-					'"I told you what I was doing," you smile back. "I''m sedu-"'
-					'"ENOUGH!" he shouts, shocking you backwards.'
-					'"You don''t know what you''re starting here. I''m a married man. You''re <<age>>. You can''t do this. Now get out."'
-					'"But-"'
-					'"OUT!"'
-					'Taken aback by his anger, you shrink away and leave his office. You can only hope this hasn''t damaged your relationship with him too much.'
-					act'Leave':gt'gdksport','start'
-				else
-					'Mikhail''s body tenses up but he doesn''t move. It gives you a great opportunity to feel his rock hard erection beneath his clothes.'
-					'"I want you," you whisper under your breath. "Don''t you want me too?"'
-					'"I... This is..." He hesitates.'
-					act'Pull out his cock':
-						if vball['coachsex'] < 3:vball['coachsex'] = 3
-						gs 'arousal','kiss',3
-						gs 'arousal','hj',rand(3,5)
-						cla & *clr
-						!! IMAGE LINK
-						'You slip your hand into his waistband and draw out his <<dick>>cm cock. At the same time, you lean into him, drawing a kiss from his lips. You slowly jerk up and down the length of his manhood while your tongues explore each other''s mouths.'
-						*nl
-						'After a few minutes, you feel him begin to tense up and you sense he''s about to cum.'
-						act'Keep jerking him off':
-							gs 'cum_call','hands','A69',1
-							cla & *clr
-							!! IMAGE LINK
-							'You keep jerking him off until you feel hot liquid spill all over your fingers, never for a moment breaking the kiss.'
-							*nl
-							'Eventually his cock stops pulsing and you finally end the kiss, looking down at your sticky cum covered hand and the mess on the floor.'
-							*nl
-							'"Feel better now?" you smile at <<$npc_nickname[''A29'']>>.'
-							'"Much better..." he says, leaning down to kiss you one more time. Then he grabs your ass without warning, eliciting a gasp from you. "Now clean that up and get out of my office before somebody finds us like this."'
-							act'Clean up':
-								cumspclnt = 9
-								gs 'cum_cleanup'
-								gs 'arousal','end'
-								cla & *clr
-								!! IMAGE LINK
-								'"Yes Coach," you grin.'
-								*nl
-								'You quickly clean the cum up off the floor, wiping your hand with a tissue while you''re at it. Once that''s done, you move over to him and share one more kiss before quietly leaving his office.'
-								*nl
-								'<i>Maybe this will be the start of something else...</i>'
-								act'Leave':gt'gdksport','start'
-							end
-							
-							act'Lick your hand clean':
-								cla & *clr
-								!! IMAGE LINK
-								cumspclnt = 9
-								gs 'cum_cleanup'
-								swallow += 1
-								gs 'arousal','end'
-								cla & *clr
-								!! IMAGE LINK
-								'"Yes Coach," you grin, staring at him while you lick the cum from your fingers. You don''t break eye contact until every drop is gone. Afterwards, you take a nearby tissue and clean up the mess you made on the floor as well.'
-								*nl
-								'Finally, you move over to <<$npc_nickname[''A69'']>> and give him one more gentle kiss before departing his office.'
-								*nl
-								'<i>Maybe this will be the start of something else...</i>'
-								act'Leave':gt'gdksport','start'
-							end
-						end
-					end
-					act'Kneel down':
-						if vball['coachsex'] < 4:vball['coachsex'] = 4
-						cla & *clr
-						'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2.mp4"></video></center>'
-						'You kneel in front of <<$npc_nickname[''A69'']>>, pulling his pants with you on your way down to reveal a fully erect <<dick>>cm cock.'
-						act'Suck his cock':
-							gs 'arousal','bj',rand(3,10)
-							cla & *clr
-							'<center><video autoplay loop src="images/shared/sex/blowjob/bj45.mp4"></video></center>'
-							'You quickly get to work, working his shaft with your hand and mouth. The initial rigidity of his body begins to fade, as if you were sucking his tension and apprehension out through his cock. After several minutes of gently blowing him, he tenses up again, though you can imagine this time it''s for different reasons.'
-							act'Jerk him onto your face':
-							
-							end
-							
-							act'Keep sucking':
-							
-							end
-						end
-					end
-				end
-			end
-		end
-	end
-	
-	act'I need more (seduce him)':
-		cla & *clr
-		!! IMAGE LINK
-		
-	end	
-end
-
-if $ARGS[0] = 'naked_massage':
-
-
-
-end
---- Voltrener ---------------------------------
-

+ 2 - 2
locations/VoltrenerSexShower.qsrc

@@ -184,7 +184,7 @@ if $ARGS[0] = '4':
 				gs 'stat'
 				act 'That did it':
 					cls
-					facial += 1
+					
 					'<center><video autoplay loop src="images/locations/pavlovsk/community/gym/volley/sex/voltrenersexshower16.mp4"></video></center>'
 					'It seems Ivan never expected this, but moments later, jets of sperm begin fountaining from his member, and heavy, warm drops start falling on your face. He clearly liked it very much.'
 					act 'Turn':
@@ -193,7 +193,7 @@ if $ARGS[0] = '4':
 						'You turn to see the coach still looking, wide-eyed and with his jaw hanging open. Ivan finally notices this, and oblivious to the fact that your actions were only partially for his benefit, hastily covers up, grabs his things and jumps out of the shower. As soon as the door closes behind Ivan, the coach walks closer to you, pulls his member out of his pants and points it at you. Passion and lust overpower you and you immediately reach for his cock, but unfortunately, it seems the coach was already on the edge, and he begins to cum as soon as your hands envelop his shaft. He sprays your breasts with his spunk, then promptly pulls up his pants and leaves you in the shower. On your knees. Overflowing with arousal.'
 						VoltrenerVoyeur += 1
 						pcs_horny = 100
-						facial += 1
+						
 						minut += 15
 						trenerlust += 2
 						gs 'stat'

+ 2 - 1
locations/_attributes_danilovich_outfits.qsrc

@@ -977,4 +977,5 @@ elseif ARGS[1] = 160:
 end
 
 
---- $attributes_danilovich_outfits ---------------------------------
+--- $attributes_danilovich_outfits ---------------------------------
+

+ 2 - 1
locations/_attributes_fancy_burlesque.qsrc

@@ -244,4 +244,5 @@ elseif ARGS[1] = 40:
 
 end
 
---- $attributes_fancy_burlesque ---------------------------------
+--- $attributes_fancy_burlesque ---------------------------------
+

+ 10 - 11
locations/_attributes_school.qsrc

@@ -1,5 +1,5 @@
 # $attributes_school
-!!2022/01/15
+!!2022/01/26
 !Quality range is usually 2-5.
 
 if ARGS[1] = 1:
@@ -194,7 +194,7 @@ elseif ARGS[1] = 27:
 	
 elseif ARGS[1] = 28:
 	CloQuality = 3
-	CloThinness = 3
+	CloThinness = 2
 	CloTopCut = 1
 	CloSkirtShortness = 3
 	CloStyle2 = 4
@@ -208,7 +208,7 @@ elseif ARGS[1] = 29:
 	
 elseif ARGS[1] = 30:
 	CloQuality = 3
-	CloThinness = 3
+	CloThinness = 2
 	CloTopCut = 1
 	CloSkirtShortness = 2
 	CloStyle2 = 4
@@ -228,10 +228,10 @@ elseif ARGS[1] = 32:
 	CloStyle2 = 4
 	
 elseif ARGS[1] = 33:
-	CloQuality = 4
+	CloQuality = 5
 	CloThinness = 1
 	CloTopCut = 1
-	CloPantsShortness = 1
+	CloSkirtShortness = 4
 	CloStyle2 = 4
 	
 elseif ARGS[1] = 34:
@@ -243,11 +243,10 @@ elseif ARGS[1] = 34:
 	CloBimbo = 1
 	
 elseif ARGS[1] = 35:
-	CloQuality = 5
+	CloQuality = 3
 	CloThinness = 4
 	CloTopCut = 3
-	CloSkirtShortness = 5
-	CloDress = 1
+	CloSkirtShortness = 6
 	CloStyle2 = 4
 	CloBimbo = 1
 	
@@ -434,10 +433,10 @@ elseif ARGS[1] = 56:
 	CloStyle = 4
 	
 elseif ARGS[1] = 57:
-	CloQuality = 4
+	CloQuality = 5
 	CloThinness = 5
-	CloBra = 1
-	CloPanties = 1
+	CloTopCut = 3
+	CloSkirtShortness = 5
 	CloStyle2 = 4
 	CloBimbo = 1
 	CloStyle = 4

+ 2 - 1
locations/_phone_theme.qsrc

@@ -2,4 +2,5 @@
 
 $RESULT = 'images/system/phone/theme/' + $phonetheme_name[pcs_phonetheme] + '/'
 
---- $phone_theme ---------------------------------
+--- $phone_theme ---------------------------------
+

+ 2 - 1
locations/act_extras1.qsrc

@@ -263,4 +263,5 @@ if $ARGS[0] = 'student1':
 end
 
 
---- act_extras1 ---------------------------------
+--- act_extras1 ---------------------------------
+

+ 2 - 1
locations/act_extras3.qsrc

@@ -263,4 +263,5 @@ if $ARGS[0] = 'student1':
 end
 
 
---- act_extras3 ---------------------------------
+--- act_extras3 ---------------------------------
+

+ 2 - 1
locations/act_main1.qsrc

@@ -528,4 +528,5 @@ if $ARGS[0] = 'misc3':
 end
 
 
---- act_main1 ---------------------------------
+--- act_main1 ---------------------------------
+

+ 2 - 1
locations/act_minor1.qsrc

@@ -234,4 +234,5 @@ if $ARGS[0] = 'hot_bartender1':
 end
 
 
---- act_minor1 ---------------------------------
+--- act_minor1 ---------------------------------
+

+ 2 - 1
locations/actress.qsrc

@@ -62,4 +62,5 @@ if $ARGS[0] = 'scene_prep':
 end
 
 
---- actress ---------------------------------
+--- actress ---------------------------------
+

+ 278 - 48
locations/albina_chat.qsrc

@@ -229,7 +229,6 @@ if $ARGS[0] = 'chat':
 			act 'Change the subject': gt 'albina_chat', 'chat'
 			act 'Ask her about her sex life instead': gt 'albina_chat', 'Anal'
 		else
-			pcs_horny += 10
 			'She isn''t willing to talk about losing her own virginity and you can guess why, but she listens as you tell her about your first time.'
 			'"So what''s your favourite position?" she asks.'
 			act 'Missionary': gt 'albina_chat', 'Missionary'
@@ -248,28 +247,30 @@ if $ARGS[0] = 'Missionary':
 	'"BO-RING!"'
 	act'It''s nice!':
 		cla & *nl
-		'"What??" you protest. "It''s... nice."'
-		'"You''re trying to tell me that lying on your back doing nothing is ''nice''?" she rolls her eyes. "Nuh uh. Bend me over and spank my ass! Pound me on all fours and grab my hair! Doggystyle is the way to go!"'
+		'"What''s wrong with missionary?" you protest. "It''s... nice."'
+		'"You''re trying to tell me that lying on your back doing nothing is ''nice''?" She rolls her eyes. "Nuh uh. Bend me over and spank me! Grab me by the hair and pound my ass! Doggystyle is the way to go!"'
 		gs'albina_chat','Missionary2'
 	end
 	
 	act'It''s romantic':
 		cla & *nl
 		'"It''s romantic!" you protest. "You can look up into his eyes when you cum. Or kiss. It makes it so much better."'
-		'"Romance is for married folks and decrepit old fucks," she rolls her eyes. "Which are basically the same thing. Nuh uh. Give it to me <i>dirty</i>. Bend me over and spank my ass! Pound me on all fours and grab my hair! Doggystyle is the way to go!"'
+		'"Romance is for decrepit old fucks," she rolls her eyes. "Nuh uh. Give it to me <i>dirty</i>. Bend me over and spank me! Grab me by the hair and pound my ass! Doggystyle is the way to go!"'
 		gs'albina_chat','Missionary2'
 	end
 	
 	act'It''s easy':
 		cla & *nl
 		'"It''s easy," you shrug. "I don''t have to do any work. Just lay there and get dicked."'
-		'"Holy <i>fuck!</i> You sound like a dull lay," she rolls her eyes. "I can''t believe you''re the kind of girl who starfishes. Not only that, but you actually <i>like</i> it! Nuh uh. Not me. Give it to me <i>dirty</i>. Bend me over and spank my ass! Pound me on all fours and grab my hair! Doggystyle is the way to go!"'
+		'"Holy <i>fuck!</i> You sound like a dull lay," she rolls her eyes. "I can''t believe you''re the kind of girl who starfishes. Not only that, but you actually <i>like</i> it! Nuh uh. Not me. Give it to me <i>dirty</i>. Bend me over and spank me! Grab me by the hair and pound my ass! Doggystyle is the way to go!"'
 		gs'albina_chat','Missionary2'
 	end
 end
 
 if $ARGS[0] = 'Missionary2':
-	'You both agree to disagree, but find yourself a little turned on by her comment. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
+	pcs_horny += 15
+	gs'stat'
+	'You both agree to disagree, but find yourself a little turned on by her response. Judging by the way she''s rubbing her thighs together, you think she is too.'
 	act 'Change the subject': gt 'albina_chat', 'chat'
 	act 'Ask her about her anal fetish': gt 'albina_chat', 'Anal'
 end
@@ -279,45 +280,34 @@ if $ARGS[0] = 'Doggystyle':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
-	'"I like doggystyle. Just thinking about it getting fucked from behind turns me on."'
-	'"That''s my girl!" Albina grins back at you. "What''s your favorite thing about it?"'
+	'"I like doggystyle."'
+	'"That''s my girl!" Albina cheers excitedly. "What''s your favorite thing about it?"'
 	act'It''s more intense':
 		cla & *nl
-		'"It''s more intense," you gush. "Soemthing about it just feels primal and <i>aggressive</i>, you know what I mean?"'
-		'"Oh yeah! Getting bent over and pounded from behind is the <i>best!</i> Especially when they spank me! The harder, the better!" You giggle at her and find yourself a little turned on. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
+		'"There''s something <i>intense</i> about it," you say. "Something primal. I can''t explain it, but when I get fucked from behind, it drives me wild."'
+		'"I definitely get that," Albina says. "I love that about it too. All I want from a guy is for him to grab me by the hair, shove his cock up my ass, and spank me til I come. Best night ever."'
 		gs'albina_chat','Doggystyle2'
 	end
 	
 	act'It goes deeper':
 		cla & *nl
-		'"I love how deep it goes," you smile. "It feels like his cock just reaches further inside me in doggy style. I don''t get that kind of dicking in other positions."'
-		'"Ugh! <i>Yes!</i> I love that about it too! Balls deep, right up the ass! Split my cheeks in half! And spank me while you''re at it! The harder, the better!" You giggle at her and find yourself a little turned on. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
+		'"It goes deeper in doggy," you explain. "I feel like it <i>fills</i> me, hitting every part of my insides. It just feels the best in that position."'
+		'"Fuck yeah," Albina says. "Doggy is the only way to <i>really</i> get balls deep inside a girl. And then when you get grabbed by the hair and pulled back even harder? And when he shoves it up your ass and spanks you? Fuck me, I could come just thinking about it."'
 		gs'albina_chat','Doggystyle2'
 	end
 	
 	act'Easy spankings':
 		cla & *nl
-		'"Easy spankings," you grin. "I can''t get slapped on the ass in any other position."'
-		'"<i>Yes</i> girl!" she cheers. "Preach it! If my ass isn''t red and tender by the end, then you didn''t really fuck me." You giggle at her and find yourself a little turned on. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
+		'"I love getting spanked," you grin.'
+		'"Fuck yeah!" Albina shouts, high fiving you so hard it hurts. "There''s nothing I love more than a cock balls deep up my ass and being spanked until it''s red and tender. If I can still sit down without wincing after, then you didn''t really fuck me."'
 		gs'albina_chat','Doggystyle2'
 	end
-!!{	
-	act'I like having my hair pulled':
-		cla & *nl
-		'"Easy spankings," you grin. "I can''t get slapped on the ass in any other position."'
-		'"<i>Yes</i> girl!" she cheers. "That''s the best part! " You giggle at her and find yourself a little turned on. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
-		gs'albina_chat','Doggystyle2'
-	end
-	
-	act'I like having my hair pulled (shy)':
-		cla & *nl
-		'"Easy spankings," you grin. "I can''t get slapped on the ass in any other position."'
-		'"<i>Yes</i> girl!" she cheers. "That''s the best part! " You giggle at her and find yourself a little turned on. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
-		gs'albina_chat','Doggystyle2'
-	end}
 end
 
 if $ARGS[0] = 'Doggystyle2':
+	pcs_horny += 15
+	gs'stat'
+	'You giggle at her answer, feeling warmth blossoming between your hips and wetness seeping from your pussy. With the "fuck me eyes" Albina is giving you think she''s probably feeling something similar.'
 	act 'Change the subject': gt 'albina_chat', 'chat'
 	act 'Ask her about her anal fetish': gt 'albina_chat', 'Anal'
 end
@@ -327,32 +317,34 @@ if $ARGS[0] = 'Cowgirl':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
-	'"Cowgirl," you admit.'
-	'"Oh, so little <<$pcs_nickname>> here likes riding dick? Who knew?" she smiles teasingly.'
-	act'I like the angle':
+	'"I like cowgirl," you admit.'
+	'"Oh?" She raises an eyebrow curiously. "That''s what you''re into?"'
+	act'It feels better':
 		cla & *nl
-		'"I just like the angle," you shrug. "Dick hits all the right spots when I''m on top."'
-		'"Nuh uh," she wags her finger. "If you want a real dicking, you can only get it from behind. Cock will only reach the deepest part of you if you''re getting pulled balls deep by the hair onto it."'
+		'"It just feels better," you shrug. "I don''t know how to explain it. The angle? Just the way it fits inside when I''m on top? It feels good. What can I say?"'
+		'"I think it feels best in doggy," Albina says. "It goes way deeper and you can get surprise anal in that position which is the <i>best</i> kind of anal. Plus spankings. If I can''t sit down after a fuck, it was a good fuck."'
 		gs'albina_chat','Cowgirl2'
 	end
 	
-	act'I like my boobs being grabbed':
+	act'I like being in control':
 		cla & *nl
-		'"I like it when the guy grabs my boobs," you giggle. "It''s the best position for it because his hands are free. All I have to do is bounce on his cock and feel good."'
-		'"You''re a boob slut? I should have known," she rolls her eyes. "No way, it''s all about getting spanked. Cock stuffed up your ass, hair yanked back, and cheeks slapped red and raw. That''s what it''s all about!"'
+		'"I like being in control," you explain. "If I want to go slow, I can go slow. If I want to go fast, I can ride him as hard as I like. It makes me feel... powerful? Just knowing that I''m the one in charge is such a turn on for me."'
+		'"I don''t think that kind of stuff matters to me," Albina shrugs back. "I like it hard and rough every time. Don''t get all slow and gentle with me. If I''m gonna get fucked, I want to <i>feel</i> it. I''d rather get my face stuffed into the sheets with a cock balls deep up my ass and spanked until my eyes water. At the end of it, I want my makeup to look as fucked as I feel. Now <i>that''s</i> a good time!"'
 		gs'albina_chat','Cowgirl2'
 	end
-	
-	act'I like being in control':
+		
+	act'I like it when he grabs my boobs':
 		cla & *nl
-		'"I like being in control," you say with a dirty grin. "When I''m on top, I can do whatever I want. I can ride him hard, I can tease him slow, and he only cums when I want him to."'
-		'"That''s what you''re into?" Albina asks quizzically. "I prefer getting roughed up. Hair yanked back, cock stuffed into my holes, ass spanked raw. Hell, I think I could almmost get off on seeing my reflection when my makeup is all fucked up afterwards. Nothing is better than feeling like a limp dishrag after the end of a hard fuck."'
+		'"I like having my boobs grabbed," you grin. "If I''m on top, then his hands are free to grope me."'
+		'"But he can still grab your tits from behind," Albina argues. "Plus, he can spank you til you''re red and wriggling. Why choose when you can have both?"'
 		gs'albina_chat','Cowgirl2'
 	end
 end
 
 if $ARGS[0] = 'Cowgirl2':
-	'You both agree to disagree, but find yourself a little turned on by her comment. Judging by the way she''s chewing her lips and rubbing her thighs together, you think she is too.'
+	pcs_horny += 15
+	gs'stat'
+	'You both agree to disagree, but find yourself a little turned on by her response. Judging by the way she''s rubbing her thighs together, you think she is too.'
 	act 'Change the subject': gt 'albina_chat', 'chat'
 	act 'Ask her about her anal fetish': gt 'albina_chat', 'Anal'
 end
@@ -438,22 +430,260 @@ end
 
 if $ARGS[0] = 'wine_invite':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
-	'"Albina gets very tipsy."'
+	'As the two of you head back inside the house, Albina turns towards you, grabbing your attention.'
+	if albina['wine'] = 0:
+		'"Hey, wanna break open a bottle of wine with me? Really warms you up after a quick dip."'
+	else
+		'"Hey, wanna drink some wine with me again?"'
+	end
+	act'No thanks':
+	
+	end
+	
+	act'Sure':
+		cla & *clr
+		!! IMAGE HERE
+		if albina['wine'] = 0:
+			'"Sure, that sounds nice. Should I just get dressed and meet you back-"'
+			'"Nah, fuck that," Albina cuts you off and drags you to the living room. "It tastes better the sooner you drink it after coming out."'
+			'She puts you down on the couch and saunters over to the wine cabinet, plucking out a bottle and two glasses. You wait awkwardly while she opens the bottle, feeling weird about sitting naked in the middle of her house. Soon, she hands you a glass and plops down next to you.'
+			'"Cheers!" she grins, clinking her glass against yours and takes a sip from her glass. You do the same, feeling the warmth spread through your chest almost immediately.'
+			*nl
+			'<i>Wow, that <b>is</b> really nice after getting out of the water,</i> you think, taking another sip.'
+		else
+			'"Sure," you smile.'
+			'"Great, I''ll go get the bottle."'
+			'You head over to her living room with her, sitting down on the couch while she procures the alcohol. A short time later, she places a glass in your hand and clinks hers against it.'
+			'"Cheers!" she grins, and you both start enjoying your wine together.'
+		end
+		act'Drink':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
+			if albina['wine'] = 0:
+				'A short while later, you find yourself feeling very warm, fuzzy, and <i>very</i> dizzy, halfway through your second glass. Albina is already sipping from her third glass, head laid on your lap after emptying the bottle. The flush in her cheeks and the slur of her voice tells you she''s totally drunk. You''re not sure your own lips are working right either. Or is it your tongue? What makes you talk funny when you''re drunk? Is it your lips, your tongue, or your brain?'
+				*nl
+				'"<<$pcs_nickname>>!" Albina whines. "I''m fuckin'' talkin'' to you!"'
+				'You blink, confused.'
+				act'"What did you say?"':gt'albina_chat','wine_chat1'
+			else
+				'You''re not sure if you expected something else, but a short while later you find yourself drunk on the couch with Albina again.'
+				act'Drunkenly converse with Albina':gt'albina_chat','wine_chat1'
+			end
+		end
+	end
 end
 
-if $ARGS[0] = 'wine_chat':
+if $ARGS[0] = 'wine_chat1':
+	albina['wine_convo'] = rand(1,7)
+	cla & *clr
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
-	
 	if albina['wine_convo'] = 1:
+		'"I loave the taste of my own pusshy," she says loudly. "Iz that weird?"'
+		act'Super weird':
+			cla & *nl
+			'"Thad''s suhper fucking weird," you slur back.'
+			'"Bullshit!" she complains even louder. "You cahn''t tell me you dohn''t like the taste of ''ur own brand now and again."'
+			gs'albina_chat','wine_chat2'
+		end
 		
-	elseif albina['wine_convo'] = 1:
+		act'I like mine too':
+			cla & *nl
+			if pcs_vag > 0 and stat['bj'] > 0:
+				'"I l''ke the taste of my pussy too," you slur back. "It tastdes even better when it''s on a dick."'
+				'"You''r a fuhcking slut <<$pcs_nickname>>," Albina blurts out, sending both of you into giggles.'
+			elseif stat['mast'] > 0:
+				'"I l''ke the taste of my pussy too," you slur back. "Sometimes I stdick my fingers in my mouf after I masdurbate, lick it all off."'
+				'"Oh fuck, I do that to! Suck my dildo fucking clean right after I come. It mahkes me wahnt to rub another one out after!" Albina giggles, rubbing her thighs together.'
+			else
+				'"I l''ke the taste of my pussy too," you slur back.'
+				'"I fuhcking knew it!" Albina exclaims. "Every girl loves her own juice!"'
+				'"If you knew, then why are you asking if it''s weird?" you ask, puzzled.'
+				'"I jus'' wanted to see if <i>you</i> were the weird one!" Albina mumbles, voice echoing off the inside of the glass as she takes another sip.'
+			end
+			gs'albina_chat','wine_chat2'
+		end
+		if npc_sex['A23'] = 1:
+			act'I like your taste too':
+				cla & *nl
+				'"I like the taste of your pussy too," you slur back, giving her a filthy grin.'
+				'"Nnnngh~!" Albina rolls her hips, squeezing her thighs together hard. "Fuhck! You make me want to shove your head between my legs right now!"'
+				gs'albina_chat','wine_chat2'
+			end
+		end
+	elseif albina['wine_convo'] = 2:
+		'Shaving convo'
+	elseif albina['wine_convo'] = 3:
+		'"Honest question Sveta. How would dominate me in bed?"'
+	elseif albina['wine_convo'] = 4:
+		'"How often do you masturbate Sveta? Do you have any dildos? Ever double penetrated yourself with them? Ever wanted to try it?"'
+	elseif albina['wine_convo'] = 5:
+		'"What''s the sluttiest thing you''ve ever done?"'
+	elseif albina['wine_convo'] = 6:
+		'boob size'
+	elseif albina['wine_convo'] = 7:
+		if albina['commando_know'] = 0:gt'albina_chat','wine_chat1'
+		'"So, you really don''t wear panties?" Albina slurs, turning her head toward your pussy. "Like, ev''r?"'
+		if trait['commando_lvl'] = 3:
+			act'Only when I have to':
+				cla & *nl
+				'"Only when I have to," you say, wrinkling your nose in annoyance. "Sometimes you just can''t get away with it."'
+				'"Like when?" she asks curiously.'
+				act'School':
+					cla & *nl
+					'"At school," you sigh tiredly. "If I don''t, all the teachers will look up my skirt during class."'
+					'"All of them??" Albina looks confused. "I get the males, men are pigs. The women too? Whad ''bout Ms. Braakman??"'
+					'"Especially her!" you say, sending you both into fits of laughter.'
+					gs'albina_chat','wine_chat2'
+				end
+				act'Disco':
+					cla & *nl
+					'"At the disco," you sigh tiredly. "Everyone will think I''m a slut if they see me flash puss on the dance floor."'
+					'"That''s why I wear thongs," Albina smirks proudly. "All the ass, none of the slut shame."'
+					'"That''s why I wear <i>pants</i>," you retort. "No one can tell you''re going commando when you''re wearing pants."'
+					'"But don''t all commandos wear pants?"'
+					'Albina narrows her eyes and looks up at you, while you stare down at her.'
+					'"I... shuddup!"'
+					gs'albina_chat','wine_chat2'
+				end
+			end
+			
+			act'Nope, never':
+				cla & *nl
+				'"Nope!" you say, popping the P with your lips. "Neverrrrrr."'
+				'"Doesn''t your pussy get cold?"'
+				'"Nneh," you shrug. "You ged used to it."'
+				gs'albina_chat','wine_chat2'
+			end
+						
+			act'I hate them':
+				cla & *nl
+				'"Neverrr!" you say, wrinkling your nose. "I <i>hate</i> wearing them!"'
+				'"Doesn''t your pussy get itchy when you wear pants?" she asks back.'
+				'"My pussy is tough as nails!" you proclaim proudly. "My pussy doesn''t need no pussy soft panties to protect it!"'
+				'"What?" Albina looks confused. "That doesn''t make any sense at all..."'
+				gs'albina_chat','wine_chat2'
+			end
+		elseif trait['commando_lvl'] < 0:
+			act'Not never':
+				cla & *nl
+				'"Not <i>never</i>," you slur. "Sometimes I just... skip the part where I put them on..."'
+				'"Hah! Slut!" she shouts, taking another slurp of her wine.'
+				gs'albina_chat','wine_chat2'
+			end
+			
+			act'Rarely':
+				cla & *nl
+				
+				
+				gs'albina_chat','wine_chat2'
+			
+			end
+		else
+			albina['commando_know'] = 0
+			act'Nope, never':
+				cla & *nl
+				
+				
+				gs'albina_chat','wine_chat2'
+			end
+			
+			act'I hate them':
+				cla & *nl
+				
+				
+				gs'albina_chat','wine_chat2'
+			
+			end
+			
+		end
+	elseif albina['wine_convo'] = 8:
+		'"Do you think I would make a good stripper?" Albina asks.'
+		act'Probably':
+			cla & *nl
+			'"Probably," you mumble back. "You can dance and love shoving your ash in peopl''sh faces. Primo stripper qualities. Why do you ask?"'
+			'"Was thinking about how to pay for uni. Mama could probably do it for me, but what if I want some extra cash on the side?"'
+			gs'albina_chat','wine_chat2'
+		end
 		
-	elseif albina['wine_convo'] = 1:
+		act'Too bitchy':
+			cla & *nl
+			'"Nah." You wave your glass dismissively. "You''re too bitchy."'
+			'"Bitchy?!" she gasps, mouth agape in indignation.'
+			'"Yeah, too bitchy."'
+			'"What the fuck is that supposed to mean?"'
+			'"You''d rip someone''s balls off first time you get called a slut or a whore. You couldn''t put up with enough bullshit to be a stripper."'
+			'"... fuck, you''re right."'
+			'"See? Bitchy," you smile, smuggly sipping your wine.'
+			'"Oh fuck off," she grumbles back, taking a much bigger gulp.'
+			gs'albina_chat','wine_chat2'
+		end
+	end
+end
+
+if $ARGS[0] = 'wine_chat2':
+	act'Call her a butt slut':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
+		'"You''re such a butt slut Albina," you remark, taking another sip from your glass.'
+		'"Fuck yeah, I am. And I <i>love</i> being one," she grins back, almost spilling her wine all over her face when you both cackle with uncontrollable laughter.'
+		act'Continue':gt'albina_chat','wine_chat1'
+	end
+	
+	act'Spit or swallow?':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
+		'"So, spit or swallow?" you ask, looking down at Albina.'
+		'"Swallow, duh.'
+		act'Ew, gross':
+			cla & *nl
+			'"Ewww," you wrinkle your nose in disgust. "Thad''s fucking gross! I can''t believe you do that!"'
+			'"Waht else am I suppozed do?"'
+			'"Just spit it out!"'
+			'"But if he comes in your mouth, that means he wants you to swallow, right?" she says, looking genuinely confused that you''re suggesting there''s a choice.'
+			act'Continue':gt'albina_chat','wine_chat1'
+		end
 		
-	elseif albina['wine_convo'] = 1:
+		act'Me too':
+			cla & *nl
+			'"Me too," you mumble. "Spitting is quitting."'
+			'"Amen sizter," Albina says, throwing up her hand and high fiving you.'
+			act'Continue':gt'albina_chat','wine_chat1'
+		end
+		if trt_cumeater > 0:
+			act'I love the taste':
+				cla & *nl
+				'"Me too," you smile. "I love the way it feels, going down my throat. Taste is pretty good too."'
+				'"What the fuck?" Albina says, looking at you with digust. "You actually like the taste of cum?"'
+				'"Yeah, it''s why I swallow. You don''t like it?"'
+				'"No! It fuckin'' tastes like shit!"'
+				'"Then why do you do it?"'
+				'"Cuz you''re supposed to? If he comes in my mouth, I can''t spit it out," she says, looking genuinely confused that you''re suggesting there''s a choice.'
+				act'Continue':gt'albina_chat','wine_chat1'
+			end
+		end
+	end
+	
+	act'Your mom is is very pretty':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
+		'With Albina right on your lap, you find your thoughts drifting to her mother. Her hair, her facial structure, she really is her mother''s daughter. It''s easy to tell where she got her good looks from.'
+		'"Your mom is fucking hot," you suddenly blurt out, your mouth autocompleting your thought before it actually passes through your brain. You freeze in panic.'
+		'"Fucking hell, I <i>knowwwwwwww</i>," Albina whines beneath you. "I gots ass fer dayz, but she''s gots tits to match. Big fucking bootyful bounshy tits that give ''er cleavage in a t-shirt. <i>And</i> a great ass! Life is so un-fucking-fair..."'
+		act'Continue':gt'albina_chat','wine_chat1'
+	end
+	
+	act'':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
 		
-	elseif albina['wine_convo'] = 1:
+		act'Continue':gt'albina_chat','wine_chat1'
+	end
+	
+	act'':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
 		
+		act'Continue':gt'albina_chat','wine_chat1'
 	end
 end
 

+ 2 - 1
locations/albina_election_events.qsrc

@@ -165,4 +165,5 @@ if $ARGS[0] = 'din_zajava_albfather_no2':
 	end
 end
 
---- albina_election_events ---------------------------------
+--- albina_election_events ---------------------------------
+

+ 2 - 1
locations/albina_house_events.qsrc

@@ -735,4 +735,5 @@ if $ARGS[0] = 'computer':
 	end
 end
 
---- albina_house_events ---------------------------------
+--- albina_house_events ---------------------------------
+

+ 2 - 1
locations/anushaptbr.qsrc

@@ -447,4 +447,5 @@ if $ARGS[0] = 'rematch':
 	end
 end
 
---- anushaptbr ---------------------------------
+--- anushaptbr ---------------------------------
+

+ 2 - 2
locations/arousal.qsrc

@@ -800,8 +800,8 @@ if $ARGS[0] = 'end':
 	if stim['hidden_lesbian'] = 1: hidden_lesbian += 1
 	if stim['gang'] = 1 or stim['group'] = 1: gang += 1
 	if stim['hidden_gang'] = 1 or stim['hidden_group'] = 1: hidden_gang += 1
-	if stim['gloryhole'] = 1: gloryhole += 1
-	if stim['hidden_gloryhole'] = 1: hidden_gloryhole += 1
+	if stim['gloryhole'] = 1: stat['gloryhole'] += 1
+	if stim['hidden_gloryhole'] = 1: stat['hidden_gloryhole'] += 1
 	if stim['rape'] = 1: rape += 1
 	if stim['hidden_rape'] = 1: hidden_rape += 1
 	if stim['futa'] = 1: futa += 1

+ 2 - 2
locations/artgar.qsrc

@@ -28,7 +28,7 @@ if apmeet = 0:
 		if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
 		if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 		cumface += 2
-		facial += 1
+		
 		gs 'pain', 1, 'eyes', 'burn'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial19.jpg"></center>'
@@ -75,7 +75,7 @@ elseif apmeet = 1:
 			if npc_Sex['A2'] = 0: npc_Sex['A2'] = 1 & guy += 1
 			if npc_Sex['A6'] = 0: npc_Sex['A6'] = 1 & guy += 1
 			cumface += 2
-			facial += 1
+			
 			gs 'arousal', 'bj', 10, 'sub', 'humiliation', 'group'
 			gs 'arousal', 'anal_dildo', 5, 'sub', 'humiliation', 'rough'
 			gs 'arousal', 'end'

+ 1 - 1
locations/arturdin.qsrc

@@ -207,7 +207,7 @@ if $ARGS[0] = 'cum':
 	minut += 5
 	spafinloc = 11
 	gs 'cum_call', 'face', 'A73', 1
-	facial += 1
+	
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/cum0.jpg"></center>'
 	'Arthur suddenly yanks you up out of bed, nearly dislocating your arm, before pushing you to your knees. He grunts, stroking his cock, as a jet of sperm hits you in the face.'

+ 2 - 1
locations/audition_reflections.qsrc

@@ -1390,4 +1390,5 @@ if $ARGS[0] = 'virgin_reflect':
 end
 
 
---- audition_reflections ---------------------------------
+--- audition_reflections ---------------------------------
+

+ 2 - 1
locations/audition_sex1.qsrc

@@ -1515,4 +1515,5 @@ if $ARGS[0] = 'slutty_clean':
 end
 
 
---- audition_sex1 ---------------------------------
+--- audition_sex1 ---------------------------------
+

+ 2 - 1
locations/audition_sex2.qsrc

@@ -1795,4 +1795,5 @@ end
 
 
 
---- audition_sex2 ---------------------------------
+--- audition_sex2 ---------------------------------
+

+ 2 - 1
locations/audition_sex3.qsrc

@@ -1773,4 +1773,5 @@ if $ARGS[0] = 'slutty_assfuck_cum':
 		end
 	end
 end
---- audition_sex3 ---------------------------------
+--- audition_sex3 ---------------------------------
+

+ 2 - 1
locations/auditions.qsrc

@@ -1089,4 +1089,5 @@ end
 !!end
 
 
---- auditions ---------------------------------
+--- auditions ---------------------------------
+

+ 5 - 0
locations/begin.qsrc

@@ -3,6 +3,11 @@
 if $ARGS[0] = 'start':
 	$loc_arg = 'start'
 	$loc = 'begin'
+	timerEnd = 8
+	timerEndM = 0
+	timer = 6
+	timerM = 30
+
 	gs 'Cheatmenu_din'
 	showstat 1
 	'<center><b><font color="maroon">CHOOSE GAME START</font></b></center>'

+ 1 - 1
locations/belpicknick.qsrc

@@ -471,7 +471,7 @@ if $ARGS[0] = 'gang':
 		sexpartkno = 1
 		spafinloc = 12
 		gs 'cum_manage'
-		facial += 1
+		
 		gs'stat'
 		belsexpayment = 900
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bukkake.jpg"></center>'

+ 3 - 3
locations/body.qsrc

@@ -2007,8 +2007,8 @@ if $ARGS[0] = '':
 		$pcdesc_makeupwordy = 'really fucking bimbo-y'
 		$pcs_makeup = 'You look, like super hawt and everyone is so jelly because their makeup is boring and ugly.'
 		$pcs_makeup_msg = 'You look, like super hawt and everyone is so jelly because their makeup is boring and ugly.'
-		$pcs_makeup_tooltip = 'Your makeup is professional grade.'
-		mopkoef = 30
+		$pcs_makeup_tooltip = 'OMG! your makeup is sooo bimbo fine.'
+		if bimbolevel >= 2: extra_supnatvnesh = 2*bimbolevel - 2
 	end
 
 	if pcs_leghair <= 0:
@@ -2320,7 +2320,7 @@ if $ARGS[0] = '':
 	tempAccessoriesBonus = FUNC('body', 'calcAccessoriesBonus', bonusZ, PShoQuality, $pantyworntype, $braworntype)
 	tempGroomingBonus = FUNC('body', 'calcGroomingBonus', pcs_lipbalm, mopkoef, pcs_hairbsh, pcs_breath, deodorant_on, bmi_calc)
 	tempGroomingPenalty = FUNC('body', 'calcGroomingPenalty', pcs_hairlng, pcs_sweat, glassvnesh, dyevmod, legkoef)
-	Hotcat = FUNC('body', 'calcHotcat', pcs_apprncbase, supnatvnesh, tempclothingbonus, tempAccessoriesBonus, tempGroomingBonus, tempGroomingPenalty)
+	Hotcat = FUNC('body', 'calcHotcat', pcs_apprncbase, (supnatvnesh + extra_supnatvnesh), tempclothingbonus, tempAccessoriesBonus, tempGroomingBonus, tempGroomingPenalty)
 	pcs_apprnc = temppcs_apprnc & killvar 'temppcs_apprnc' & killvar 'temppcs_maxapprnc'
 
 

+ 2 - 1
locations/body_din.qsrc

@@ -37,4 +37,5 @@ if $ARGS[0] = 'pregnancyVisibility':
 	killvar 'clothingwornnumberTemp'
 end
 
---- body_din ---------------------------------
+--- body_din ---------------------------------
+

+ 50 - 93
locations/body_shape.qsrc

@@ -244,8 +244,8 @@ if $ARGS[0] = '':
 	if salolast < salo: salolast += 1
 
 !!Setting the pcs_apprnc bonus based on fat and strength
-	bmi_calc = FUNC('body_shape', 'bmicalc', salo, pcs_hgt)
-	bodykoef = FUNC('body_shape', 'setbodykoef', bmi_calc, strenbuf, salocatnow, vofat)
+	bmi_calc = FUNC('body_shape', 'bmicalc')
+	bodykoef = FUNC('body_shape', 'setbodykoef')
 
 !!This is to clean up unused variables
 	killvar 'normbuffpick' & killvar 'nrmbfpckct'
@@ -255,30 +255,26 @@ end
 
 if $ARGS[0] = 'setbodykoef':
 	!!Setting the pcs_apprnc bonus based on fat and strength
-	tempbmi_calc = ARGS[1] & !! result of bmicalc
-	tempstrenbuf = ARGS[2] & !!strenbuf
-	tempsalocatnow = ARGS[3] & !! salocatnow
-	tempvofat = ARGS[4] & !! vofat
 
-	if tempbmi_calc < 16:
+	if bmi_calc < 16:
 		!! severely underweight
 		tempbodykoef = 30
-    elseif tempbmi_calc < 19:
+    elseif bmi_calc < 19:
 		!! underweight
 		tempbodykoef = 65
-    elseif tempbmi_calc < 25:
+    elseif bmi_calc < 25:
 		!! healthy weight
 		tempbodykoef = 85
-    elseif tempbmi_calc < 30:
+    elseif bmi_calc < 30:
 		!! overweight
 		tempbodykoef = 75
-    elseif tempbmi_calc < 35:
+    elseif bmi_calc < 35:
 		!! moderately obese
 		tempbodykoef = 45
-    elseif tempbmi_calc < 40:
+    elseif bmi_calc < 40:
 		!! severely obese
 		tempbodykoef = 25
-    elseif tempbmi_calc < 45:
+    elseif bmi_calc < 45:
 		!! very severely obese
 		tempbodykoef = 5
     else
@@ -286,44 +282,34 @@ if $ARGS[0] = 'setbodykoef':
 		tempbodykoef = 0
     end
 
-	if tempstrenbuf >= 80:
+	if strenbuf >= 80:
 		tempbodykoef += 8
-	elseif tempstrenbuf >= 60:
+	elseif strenbuf >= 60:
 		tempbodykoef += 10
-	elseif tempstrenbuf >= 40:
+	elseif strenbuf >= 40:
 		tempbodykoef += 8
-	elseif tempstrenbuf >= 20:
+	elseif strenbuf >= 20:
 		tempbodykoef += 5
 	else
 		tempbodykoef += 2
 	end
 
 !!This modifies bodykoef for high or low salo values
-	if tempsalocatnow = 0 or tempsalocatnow >= 7:
+	if salocatnow = 0 or salocatnow >= 7:
 		tempbodykoef -= 8
-	elseif tempsalocatnow = 1 or tempsalocatnow = 6:
+	elseif salocatnow = 1 or salocatnow = 6:
 		tempbodykoef -= 4
 	end
 
-	if tempvofat > 0: tempbodykoef -= tempvofat
+	if vofat > 0: tempbodykoef -= vofat
 
 	result = tempbodykoef
 
-	killvar 'tempbmi_calc'
 	killvar 'tempbodykoef'
-	killvar 'tempbodyFat'
-	killvar 'temppcs_hgt'
-	killvar 'tempstrenbuf'
-	killvar 'tempsalocatnow'
-	killvar 'tempvofat'
 end
 
 if $ARGS[0] = 'bmicalc':
-	!! ARGS[1] salo
-	!! ARGS[2] pcs_hgt
-	tempbmi_calc = 10000 * (30 + ARGS[1] / 2 + (ARGS[2] - 170) * 7 / 10) / (ARGS[2] * ARGS[2])
-	result = tempbmi_calc
-	killvar 'tempbmi_calc'
+	result = 10000 * (30 + salo / 2 + (pcs_hgt - 170) * 7 / 10) / (pcs_hgt * pcs_hgt)
 end
 
 if $ARGS[0] = 'bmiadjust':
@@ -492,7 +478,7 @@ if $ARGS[0] = 'initial':
 	!!pcs_weight = (pcs_hgt * 62 / 170) + (vhips + (vofat * 2)) / 4 + tits
 	
 !!BMI Calculation
-	bmi_calc = FUNC('body_shape', 'bmicalc', salo, pcs_hgt)
+	bmi_calc = FUNC('body_shape', 'bmicalc')
 	
 !!BMI Descriptions
 	if bmi_calc < 16:
@@ -516,9 +502,9 @@ end
 
 if $args[0] = 'basebeautycalc':
 	if pcs_lashes <= 0: pcs_lashes = 0
-	pcs_HeadBonus = FUNC('body_shape', 'calcHeadBonus', pcs_lashes, pcs_eyesize, pcs_lip, pcs_teeth, bmi_calc)
-	tempAttributeBonus = FUNC('body_shape', 'calcAttributeBonus', pcs_agil, pcs_vital, bmi_calc)
-	pcs_apprncbase = FUNC('body_shape', 'basebeautycalc2', ARGS[1], vidage, pcs_skin, bodykoef, pcs_HeadBonus, tempAttributeBonus, pcs_apprncbase)
+	pcs_HeadBonus = FUNC('body_shape', 'calcHeadBonus')
+	tempAttributeBonus = FUNC('body_shape', 'calcAttributeBonus')
+	pcs_apprncbase = FUNC('body_shape', 'basebeautycalc2', ARGS[1])
 
 	if ARGS[1] = 0:
 !!	This is the rate of change limiter
@@ -547,105 +533,80 @@ if $args[0] = 'basebeautycalc':
 end 
 
 if $ARGS[0] = 'calcHeadBonus':
-	temppcs_lashes = ARGS[1] & !! pcs_lashes
-	temppcs_eyesize = ARGS[2] & !! pcs_eyesize
-	temppcs_lip = ARGS[3] & !! pcs_lip
-	temppcs_teeth = ARGS[4] & !! pcs_teeth (missing teeth)
-	tempbmi_calc = ARGS[5] & !! bmi_calc
 
 !!	Setting Eyelashes bonus
-	if temppcs_lashes <= 0:
+	if pcs_lashes <= 0:
 		resnicbonus = 0
-	elseif temppcs_lashes = 1:
+	elseif pcs_lashes = 1:
 		resnicbonus = 2
-	elseif temppcs_lashes = 2:
+	elseif pcs_lashes = 2:
 		resnicbonus = 5
-	elseif temppcs_lashes = 3:
+	elseif pcs_lashes = 3:
 		resnicbonus = 7
-	elseif temppcs_lashes = 4:
+	elseif pcs_lashes = 4:
 		resnicbonus = 8
-	elseif temppcs_lashes = 5:
+	elseif pcs_lashes = 5:
 		resnicbonus = 10
 	else
 		resnicbonus = 0		
 	end
-	resnicbonus = FUNC('body_shape', 'bmiadjust', resnicbonus, tempbmi_calc)
+	resnicbonus = FUNC('body_shape', 'bmiadjust', resnicbonus, bmi_calc)
 
 !!	Setting Eye Size bonus
-	if temppcs_eyesize = 1:
+	if pcs_eyesize = 1:
 		glarazbonus = 1
-	elseif temppcs_eyesize = 2:
+	elseif pcs_eyesize = 2:
 		glarazbonus = 3
-	elseif temppcs_eyesize = 3:
+	elseif pcs_eyesize = 3:
 		glarazbonus = 2
 	else
 		glarazbonus = 0
 	end
-	glarazbonus = FUNC('body_shape', 'bmiadjust', glarazbonus, tempbmi_calc)
+	glarazbonus = FUNC('body_shape', 'bmiadjust', glarazbonus, bmi_calc)
 
 !!	Setting the Lip size bonus
-	if temppcs_lip = 0:
+	if pcs_lip = 0:
 		lipbonus = -2
-	elseif temppcs_lip = 1:
+	elseif pcs_lip = 1:
 		lipbonus = 0
-	elseif temppcs_lip = 2:
+	elseif pcs_lip = 2:
 		lipbonus = 3
-	elseif temppcs_lip = 3:
+	elseif pcs_lip = 3:
 		lipbonus = 5
 	else
 		lipbonus = 3
 	end
-	lipbonus = FUNC('body_shape', 'bmiadjust', lipbonus, tempbmi_calc)
+	lipbonus = FUNC('body_shape', 'bmiadjust', lipbonus, bmi_calc)
 	
-	teethcalc = (5 * temppcs_teeth)
-	if teethcalc < 0: teethcalc = FUNC('body_shape', 'bmiadjust', teethcalc, tempbmi_calc)
-
-	tempHeadBonus = resnicbonus + glarazbonus + lipbonus - teethcalc
+	teethcalc = (5 * pcs_teeth)
+	if teethcalc < 0: teethcalc = FUNC('body_shape', 'bmiadjust', teethcalc, bmi_calc)
 
-	result = tempHeadBonus + 10
+	result = resnicbonus + glarazbonus + lipbonus - teethcalc + 10
 
-	killvar 'temppcs_lashes'
-	killvar 'temppcs_eyesize'
-	killvar 'temppcs_lip'
-	killvar 'temppcs_teeth'
-	killvar 'tempHeadBonus'
-	killvar 'tempbmi_calc'
 end
 
 if $ARGS[0] = 'calcAttributeBonus':
-	temppcs_agil = ARGS[1] & !! pcs_agil
-	temppcs_vital = ARGS[2] & !! pcs_vital
-	tempbmi_calc = ARGS[3] & !! bmi_calc
+	tempAttributeBonus = (pcs_agil / 10) + (pcs_vital / 10)
 
-	tempAttributeBonus = (temppcs_agil / 10) + (temppcs_vital / 10)
-	tempAttributeBonus = FUNC('body_shape', 'bmiadjust', tempAttributeBonus, tempbmi_calc)
-
-	result = tempAttributeBonus
-	killvar 'temppcs_agil'
-	killvar 'temppcs_vital'
+	result = FUNC('body_shape', 'bmiadjust', tempAttributeBonus, bmi_calc)
 	killvar 'tempAttributeBonus'
-	killvar 'tempbmi_calc'
 end
 
 !!This is the calculation for the base appearance if calling for testing always set ARGS[1] to 1
 if $args[0] = 'basebeautycalc2':
 	!!ARGS[1] reset pcs_apprncbase
-	tempvidage = ARGS[2] & !! vidage
-	temppcs_skin = ARGS[3] & !! pcs_skin
-	tempbodykoef = ARGS[4] & !! bodykoef
-	tempHeadBonus = ARGS[5] & !! result of calcHeadBonus
-	tempAttributeBonus = ARGS[6] & !! result of calcAttributeBonus
-	temppcs_apprncbase = ARGS[7] & !! pcs_apprncbase
+	!! result of pcs_HeadBonus
+	!! result of calcAttributeBonus
 
 
 !!	Setting vidagebonus
 	vidagebonus = 100
-	if tempvidage < 20: vidagebonus = 60 + (2 * tempvidage)
-	if tempvidage > 30: vidagebonus = 160 - (2 * tempvidage)
+	if vidage < 20: vidagebonus = 60 + (2 * vidage)
+	if vidage > 30: vidagebonus = 160 - (2 * vidage)
 
 !!	Preforming the calculation
-	skincalc = (temppcs_skin * 2 / 5)
-	vneshtemp = vidagebonus * (skincalc + tempbodykoef + tempAttributeBonus + tempHeadBonus) / 100
+	skincalc = (pcs_skin * 2 / 5)
+	vneshtemp = vidagebonus * (skincalc + bodykoef + tempAttributeBonus + pcs_HeadBonus) / 100
 
 !!	pcs_skin = skin condition, corrected to a 0 to 40 range; bodykoef set in main body_shape; pcs_teeth is missing teeth or cosmetically improved teeth (-1)
 
@@ -656,17 +617,13 @@ if $args[0] = 'basebeautycalc2':
 	vneshtemp += supnatvnesh
 
 !!	This is for use when a reset is called for by setting args[1] = 1
-	if args[1] = 1: temppcs_apprncbase = vneshtemp & killvar 'vneshtemp'
+	if args[1] = 1: pcs_apprncbase = vneshtemp & killvar 'vneshtemp'
 
-	result = temppcs_apprncbase
+	result = pcs_apprncbase
 
 !!	This is to clean up variables only used here
 	!!do not kill vneshtemp here it gets killed in basebeautycalc
-	killvar 'temppcs_apprncbase'
 	killvar 'skincalc'
-	killvar 'tempvidage'
-	killvar 'temppcs_skin'
-	killvar 'tempbodykoef'
 	killvar 'vidagebonus'
 	killvar 'tempHeadBonus'
 	killvar 'tempAttributeBonus'

+ 2 - 1
locations/booty_call.qsrc

@@ -1579,4 +1579,5 @@ if $ARGS[0] = 'exit':
 		gt 'city_center'
 	end
 end
---- booty_call ---------------------------------
+--- booty_call ---------------------------------
+

+ 2 - 1
locations/booty_call_after.qsrc

@@ -1022,4 +1022,5 @@ if $ARGS[0] = 'sleep':
 		end
 	end
 end
---- booty_call_after ---------------------------------
+--- booty_call_after ---------------------------------
+

+ 2 - 1
locations/booty_call_sex.qsrc

@@ -2671,4 +2671,5 @@ if $ARGS[0] = 'harden_mouth':
 	end
 end
 
---- booty_call_sex ---------------------------------
+--- booty_call_sex ---------------------------------
+

+ 1 - 1
locations/booty_call_start.qsrc

@@ -1873,4 +1873,4 @@ end
 
 
 
---- booty_call ---------------------------------
+--- booty_call_start ---------------------------------

+ 1 - 1
locations/booty_call_talk.qsrc

@@ -422,4 +422,4 @@ end
 !! --------------------- After Sex Talk ---------------------------------
 
 
---- costuming ---------------------------------
+--- booty_call_talk ---------------------------------

+ 1 - 1
locations/booty_call_virgin.qsrc

@@ -465,4 +465,4 @@ end
 
 !! --------------------- end virgin stuff ---------------------------------------
 
---- booty_call_virgin ---------------------------------
+--- booty_call_virgin ---------------------------------

+ 1 - 1
locations/brother.qsrc

@@ -806,7 +806,7 @@ if $ARGS[0] = 'brotherSexStart':
 				npc_rel['A34'] += 5
 				gs 'boyStat', 'A34'
 				gs 'cum_call', 'face', 'A34', 1
-				facial += 1
+				
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial21.jpg"></center>'

+ 29 - 8
locations/budilnik.qsrc

@@ -6,7 +6,7 @@ if $ARGS[0] = 'start':
 	*clr & cla
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/home/bedroom/bed2.jpg"></center>'
-	*nl
+	'Enter time using number pad and click set to change alarm times, don''t forget to turn your alarm on.'
 	*nl
 
 	if numbud = 4:'<center><b><<bud1>><<bud2>>:<<bud3>><<bud4>></b></center>'
@@ -15,27 +15,38 @@ if $ARGS[0] = 'start':
 	if numbud = 1:'<center><b><<bud1>></b><<bud2>>:<<bud3>><<bud4>></center>'
 	if numbud = 0:'<center><<bud1>><<bud2>> : <<bud3>><<bud4>></center>'
 
-	*nl
+	'<center><b><a href="exec:gt ''budilnik'', ''clear''">Clear</a>'
 	'<center><b><a href="exec:gt ''budilnik'', ''1''">1</a> <a href="exec:gt ''budilnik'', ''2''">2</a> <a href="exec:gt ''budilnik'', ''3''">3</a></b></center>'
 	'<center><b><a href="exec:gt ''budilnik'', ''4''">4</a> <a href="exec:gt ''budilnik'', ''5''">5</a> <a href="exec:gt ''budilnik'', ''6''">6</a></b></center>'
 	'<center><b><a href="exec:gt ''budilnik'', ''7''">7</a> <a href="exec:gt ''budilnik'', ''8''">8</a> <a href="exec:gt ''budilnik'', ''9''">9</a></b></center>'
 	'<center><b><a href="exec:gt ''budilnik'', ''0''">0</a></b></center>'
-	'<center><b><a href="exec: bud_weekend = 0 & gt ''budilnik'', ''Reset''">Reset (week)</a> <a href="exec: bud_weekend = 0 & gt ''budilnik'', ''Time''">Set this time for the week</a></b></center>' 
-	'<center><b><a href="exec:  bud_weekend = 1 & gt ''budilnik'', ''Reset''">Reset (weekend)</a> <a href="exec: bud_weekend = 1 & gt ''budilnik'', ''Time''">Set this time for the weekend</a></b></center>'
+	'<center><b><a href="exec: bud_weekend = 0 & gt ''budilnik'', ''Reset''">Reset weekday alarm</a> <a href="exec: bud_weekend = 0 & gt ''budilnik'', ''Time''">Set</a> weekday alarm to this time</b></center>'
+	'<center><b>Currently set for '+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+' </b></center>'
+	'<center><b><a href="exec:  bud_weekend = 1 & gt ''budilnik'', ''Reset''">Reset weekend alarm</a> <a href="exec: bud_weekend = 1 & gt ''budilnik'', ''Time''">Set</a> weekend alarm to this time</b></center>'
+	'<center><b>Currently set for '+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b></center>'
 	if Storyline > 0 and alarm_holiday = 0:
-		'<center><b><a href="exec:  alarm_holiday = 1 & gt ''budilnik'', ''start''">Use weekend alarm for holidays</a></b></center>'
+		'<center><b>Use weekend alarm for holidays - <a href="exec:  alarm_holiday = 1 & gt ''budilnik'', ''start''">OFF</a></b></center>'
 	elseif Storyline > 0 and alarm_holiday = 1:
-		'<center><b><a href="exec:  alarm_holiday = 0 & gt ''budilnik'', ''start''">Stop using weekend alarm for holidays</a></b></center>'
+		'<center><b>Use weekend alarm for holidays - <a href="exec:  alarm_holiday = 0 & gt ''budilnik'', ''start''">ON</a></b></center>'
 	end
 
 	
 	*nl
 	if budilnikOn = 0:
-		'<center>Your alarm is currently turned <a href="exec: budilnikOn = 1 & gt ''budilnik'', ''start''"><b>off</a></b></center>'
+		'<center>Your alarm is currently turned <a href="exec: budilnikOn = 1 & gt ''budilnik'', ''start''"><b>OFF</a></b></center>'
 	else
-		'<center>Your alarm is currently turned <a href="exec: budilnikOn = 0 & gt ''budilnik'', ''start''"><b>on</b></a></center>'
+		'<center>Your alarm is currently turned <a href="exec: budilnikOn = 0 & gt ''budilnik'', ''start''"><b>ON</b></a></center>'
 		'<center>The alarm is set to '+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+' during the week and to '+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+' during the weekend.</center>'		
 	end
+	act 'Clear time display':
+		cla
+		bud1 = 0
+		bud2 = 0
+		bud3 = 0
+		bud4 = 0
+		numbud = 0
+		gt 'budilnik', 'fin'
+	end
 	act 'Finish':
 		cla
 		bud1 = 0
@@ -47,6 +58,16 @@ if $ARGS[0] = 'start':
 	end
 end
 
+if $ARGS[0] = 'clear':
+	cla
+	bud1 = 0
+	bud2 = 0
+	bud3 = 0
+	bud4 = 0
+	numbud = 0
+	gt 'budilnik', 'fin'
+end
+
 if $ARGS[0] = 'Time':
 	cla
 	budilnikOn = 1

+ 3 - 3
locations/burger.qsrc

@@ -261,7 +261,7 @@ if $ARGS[0] = 'dishes':
 										gs 'arousal', 'bj', 4, 'sub', 'humiliation'
 										gs 'boyStat', 'A74'
 										gs 'cum_call', 'mouth_swallow', 'A74', 1, 0, 10000, 13
-										facial += 1
+										
 										gs 'cum_call', 'face', 'A74', 1, 0, 10000, 27
 										gs 'stat'
 
@@ -532,7 +532,7 @@ if $ARGS[0] = 'dishes':
 				gs 'boyStat', 'A75'
 				gs 'arousal', 'bj', 3, 'sub'
 				gs 'cum_call', 'mouth_swallow', 'A75', 1
-				facial += 1
+				
 				gs 'cum_call', 'face', 'A75', 1
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -587,7 +587,7 @@ if $ARGS[0] = 'dishes':
 						gs 'cum_call', 'face', 'A75', 1
 						gs 'cum_call', 'face', $BurgerQW['GroupSex1']
 						gs 'cum_call', 'face', $BurgerQW['GroupSex2']
-						facial += 3
+						stat['facial'] += 3
 						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/diner/sex/tri2.jpg"></center>'
 						'Hot jets of sperm slap you in the face, you close your eyes and just feel the stinky seed on your skin. Soon after the sprays of semen stop and your face is all covered with a thick layer of sticky cum. The guys look satisfied and laugh at you. Afterwards they exit the warehouse leaving you by yourself.'
 

+ 1 - 1
locations/burgerWork.qsrc

@@ -174,7 +174,7 @@ if $ARGS[0] = 'work2':
 						act 'Open your mouth':
 							*clr & cla
 							minut += 5
-							facial += 1
+							
 							gs 'boyStat', 'A76'
 							gs 'cum_call', 'face', 'A76', 1
 							gs 'stat'

+ 1 - 1
locations/castSpell.qsrc

@@ -87,4 +87,4 @@ killvar 'spellSuccess'
 killvar 'arouseVal'
 killvar 'manaCost'
 
---- castSpell ---------------------------------
+--- castSpell ---------------------------------

+ 1 - 1
locations/castSpellNPC.qsrc

@@ -47,4 +47,4 @@ killvar 'spellSuccess'
 killvar 'manaCost'
 killvar 'casterMana'
 
---- castSpellNPC ---------------------------------
+--- castSpellNPC ---------------------------------

+ 1 - 1
locations/casting.qsrc

@@ -453,4 +453,4 @@ if $ARGS[0] = 'YulyaGavrikov':
 end
 
 
---- casting ---------------------------------
+--- casting ---------------------------------

+ 1 - 1
locations/cfnm.qsrc

@@ -151,7 +151,7 @@ if $ARGS[0] = 'blow4':
 	*clr & cla
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	fotoCFNMblowjobCum += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/redlight/stripclub/sex/facial.jpg"></center>'

+ 4 - 4
locations/cikl.qsrc

@@ -217,12 +217,12 @@ if bimbo >= 40: bimbo = 40
 if bimbolevel = 0: supnatvnesh = 0 & bimbostupidity = 0
 if  CheatBimbo3 = 0:
 	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)
+	if bimbolevel = 2: supnatvnesh = 2 & bimbostupidity = (pcs_intel / 4)
+	if bimbolevel = 3: supnatvnesh = 4 & bimbostupidity = (pcs_intel / 3)
 elseif CheatBimbo3 = 1:
 	if bimbolevel = 1: supnatvnesh = 2 & bimbostupidity = 0
-	if bimbolevel = 2: supnatvnesh = 4 & bimbostupidity = 0
-	if bimbolevel = 3: supnatvnesh = 8 & bimbostupidity = 0
+	if bimbolevel = 2: supnatvnesh = 2 & bimbostupidity = 0
+	if bimbolevel = 3: supnatvnesh = 4 & bimbostupidity = 0
 end
 
 !!A Succubus cannot be a Bimbo

+ 1 - 1
locations/city_apt_building.qsrc

@@ -884,4 +884,4 @@ if $ARGS[0] = 'floor5_events':
 	killvar 'floor5'
 end
 
---- city_apt_building ---------------------------------
+--- city_apt_building ---------------------------------

+ 1 - 1
locations/city_center.qsrc

@@ -182,7 +182,7 @@ end
 'A few buildings away is <<$desc_txt1>> and <<$desc_txt2>>, a place for cheap fast food. For a more lavish dining experience, <<$desc_txt3>> is available.'
 *nl
 if week >= 4 and (hour >= 18 or hour <= 3):
-	$desc_txt3 = '<a href="exec:gt ''club'', ''start''">the nightclub</a>'
+	$desc_txt3 = '<a href="exec:gt ''city_nightclub'', ''start''">the nightclub</a>'
 else
 	$desc_txt3 = '<a href="exec:msg ''The nightclub is closed and will open from Friday to Sunday at 18:00''">The nightclub</a>'
 end

+ 247 - 114
locations/city_clinic.qsrc

@@ -216,25 +216,47 @@ if $ARGS[0] = 'start':
 				'The dentist examines you and says, it will cost you <<zubpay>> <b>₽</b> to fill the gaps'
 			end
 
-			if money >= zubpay:
-				act 'Sort out your teeth':
-					*clr & cla
-					money -= zubpay
-					minut += 60
-					gs 'body_shape', 'basebeautycalc', 1
-					gs 'stat'
-					if pcs_teeth > 0:
-						pcs_teeth = 0
-						'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
-					else
-						pcs_teeth = -1
-						'You pay the dentist to straighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
+			if money < zubpay and karta < zubpay:
+				*nl
+				'You do not have enough money to fix your teeth.'
+			else
+				if money >= zubpay:
+					act 'Sort out your teeth (cash)':
+						*clr & cla
+						money -= zubpay
+						minut += 60
+						gs 'body_shape', 'basebeautycalc', 1
+						gs 'stat'
+						if pcs_teeth > 0:
+							pcs_teeth = 0
+							'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
+						else
+							pcs_teeth = -1
+							'You pay the dentist to straighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
+						end
+
+						act 'Leave the clinic': minut += 5 & gt 'city_residential'
 					end
+				end
+				if karta >= zubpay:
+					act 'Sort out your teeth (card)':
+						*clr & cla
+						karta -= zubpay
+						minut += 60
+						gs 'body_shape', 'basebeautycalc', 1
+						gs 'stat'
+						if pcs_teeth > 0:
+							pcs_teeth = 0
+							'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
+						else
+							pcs_teeth = -1
+							'You pay the dentist to straighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
+						end
 
-					act 'Leave the clinic': minut += 5 & gt 'city_residential'
+						act 'Leave the clinic': minut += 5 & gt 'city_residential'
+					end
 				end
 			end
-				
 			act 'Leave the clinic': minut += 5 & gt 'city_residential'
 		end
 	end
@@ -269,43 +291,70 @@ if $ARGS[0] = 'start':
 			act 'Return to the entrance':gt 'city_clinic', 'start'
 
 			if glass = 1:
-				if money >= 4500:
-					act 'Buy glasses (4,500 <b>₽</b>)':
-						cls
-						money -= 4500
-						minut += 60
-						glass = 2
-						gs 'stat'
-						'You buy a new, more stylish pair of glasses.'
-
-						act 'Return to the entrance':gt 'city_clinic', 'start'
-					end
-				else
+				if money < 4500 and karta < 4500:
 					*nl
 					'You can not afford the more stylish glasses.'
+				else
+					if money >= 4500:
+						act 'Buy glasses (4,500 <b>₽</b>) (cash)':
+							cls
+							money -= 4500
+							minut += 60
+							glass = 2
+							gs 'stat'
+							'You buy a new, more stylish pair of glasses.'
+
+							act 'Return to the entrance':gt 'city_clinic', 'start'
+						end
+					end
+					if karta >= 4500:
+						act 'Buy glasses (4,500 <b>₽</b>) (card)':
+							cls
+							karta -= 4500
+							minut += 60
+							glass = 2
+							gs 'stat'
+							'You buy a new, more stylish pair of glasses.'
+
+							act 'Return to the entrance':gt 'city_clinic', 'start'
+						end
+					end
 				end
 			end
 
 			if glass ! 0:
-				if money >= 75000:
-					act 'Pay for laser correction (75,000 <b>₽</b>)':
-						cls
-						money -= 75000
-						minut += 60
-						blizoruk = 0
-						glass = 0
-						gs 'stat'
-						'You undergo laser eye surgery. Your eyesight is much better now.'
-						act 'Return to the entrance':gt 'city_clinic', 'start'
-					end
-				else
+				if money < 75000 and karta < 75000:
 					*nl
 					'You can not afford the laser eye correction surgery.'
+				else
+					if money >= 75000:
+						act 'Pay for laser correction (75,000 <b>₽</b>) (cash)':
+							cls
+							money -= 75000
+							minut += 60
+							blizoruk = 0
+							glass = 0
+							gs 'stat'
+							'You undergo laser eye surgery. Your eyesight is much better now.'
+							act 'Return to the entrance':gt 'city_clinic', 'start'
+						end
+					end
+					if karta >= 75000:
+						act 'Pay for laser correction (75,000 <b>₽</b>) (card)':
+							cls
+							karta -= 75000
+							minut += 60
+							blizoruk = 0
+							glass = 0
+							gs 'stat'
+							'You undergo laser eye surgery. Your eyesight is much better now.'
+							act 'Return to the entrance':gt 'city_clinic', 'start'
+						end
+					end
 				end
 			end
 		end
 	end
-	
 end
 
 if $ARGS[0] = 'stdclinic':
@@ -325,94 +374,107 @@ if $ARGS[0] = 'stdclinic':
 	
 	act 'Leave':gt 'city_clinic', 'start'
 
-	if money >= 1000: act 'Take STD test (1,000 <b>₽</b>)': gt 'city_clinic', 'stdcheck'
+	if money >= 1000:
+		act 'Get tested for STDs (1,000 <b>₽</b>) (cash)':
+			money -= 1000
+			gs 'city_clinic', 'stdcheck'
+		end
+	end
 
-	if GerpesNapr > 0 and money >= 450 and GerpesUkolDay ! daystart:
-		act 'Get herpes shot (450 <b>₽</b>). You need <<GerpesNapr>> more injections to complete the treatment.':
-			*clr & cla
-			menu_off = 1
-			money -= 450
-			minut += 60
-			GerpesUkolDay = daystart
-			GerpesNapr -= 1
-			gs 'stat'
-			'You see the nurse and she gives you a painful injection in your ass.'
-			
-			if GerpesNapr = 0:Gerpes = -10 & 'You have completed the treatment.'
-			act 'Leave':gt 'city_clinic', 'start'	
+	if karta >= 1000:
+		act 'Get tested for STDs (1,000 <b>₽</b>) (card)':
+			karta -= 1000
+			gs 'city_clinic', 'stdcheck'
 		end
 	end
 
-	if TriperNapr > 0 and money >= 750 and TriperUkolDay ! daystart:
-		act 'Get gonorrhea shot (750 <b>₽</b>). You need <<TriperNapr>> more injections to complete the treatment.':
-			*clr & cla
-			menu_off = 1
-			money -= 750
-			minut += 60
-			TriperUkolDay = daystart
-			TriperNapr -= 1
-			gs 'stat'
-			'You see the nurse and she gives you a painful injection in your ass.'
+	if GerpesNapr > 0 and GerpesUkolDay ! daystart:
+		if money < 450 and karta < 450: *nl & 'You cannot afford your herpes shot.'
 
-			if TriperNapr = 0:TriperOral = 0 & TriperOralSigns = 0 & Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'You have completed the treatment.'
+		if money >= 450:
+			act 'Get herpes shot (1,000 <b>₽</b>) (cash). You need <<GerpesNapr>> more injections to complete the treatment.':
+				money -= 450
+				gs 'city_clinic', 'herpes_shot'
+			end
+		end
 
-			act 'Leave':gt 'city_clinic', 'start'
+		if karta >= 450:
+			act 'Get herpes shot (1,000 <b>₽</b>) (card). You need <<GerpesNapr>> more injections to complete the treatment.':
+				karta -= 450
+				gs 'city_clinic', 'herpes_shot'
+			end
 		end
 	end
 
-	if money >= 1000 and SifNapr = 1:
-		act 'Get syphilis shot (1,000 <b>₽</b>).':
-			*clr & cla
-			menu_off = 1
-			money -= 1000
-			minut += 60
-			SifNapr = 0
-			SifacOnce = 0
-			Sifilis = 0
-			Venera -= 1
-			gs 'stat'
-			'You see the nurse and she gives you a painful injection in your ass.'
+	if TriperNapr > 0 and TriperUkolDay ! daystart:
+		if money < 750 and karta < 750: *nl & 'You cannot afford your gonorrhea shot.'
 
-			'"That''s it, you might still feel a bit off but the infection is now cured".'
+		if money >= 750:
+			act 'Get gonorrhea shot (1,000 <b>₽</b>) (cash). You need <<TriperNapr>> more injections to complete the treatment.':
+				money -= 750
+				gs 'city_clinic', 'gonorrhea_shot'
+			end
+		end
 
-			act 'Leave':gt 'city_clinic', 'start'
+		if karta >= 750:
+			act 'Get gonorrhea shot (1,000 <b>₽</b>) (card). You need <<TriperNapr>> more injections to complete the treatment.':
+				karta -= 750
+				gs 'city_clinic', 'gonorrhea_shot'
+			end
 		end
 	end
 
-	if GerpesOnce = 1 and money >= 45000 and week = 1 and day <= 10:
-		act 'Go to private clinic and completely cure your herpes (45,000 <b>₽</b>)':
-			cla
-			menu_off = 1
-			money -= 45000
-			day += 3
-			week += 3
-			GerpesOnce = 0
-			Gerpes = 0
-			OrHerpes = 0
-			GenHerpes = 0
-			Venera -= 1
-			gs 'stat'
-			'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
-			'After a long recovery, you have been completely cured of your herpes.'
+	if SifNapr = 1:
+		if money < 1000 and karta < 1000: *nl & 'You cannot afford your syphilis shot.'
 
-			act 'Leave':gt 'city_clinic', 'start'
+		if money >= 1000:
+			act 'Get syphilis shot (1,000 <b>₽</b>) (cash)':
+				money -= 1000
+				gs 'city_clinic', 'syphilis_shot'
+			end
+		end
+
+		if karta >= 1000:
+			act 'Get syphilis shot (1,000 <b>₽</b>) (card)':
+				karta -= 1000
+				gs 'city_clinic', 'syphilis_shot'
+			end
 		end
 	end
 
-	if KandidozOnce = 1 and money >= 15000 and week = 1 and day <= 10:
-		act 'Go to private clinic and completely cure your yeast infection. (15,000 <b>₽</b>)':
-			cla
-			menu_off = 1
-			money -= 15000
-			day += 3
-			week += 3
-			KandidozOnce = 0
-			Kandidoz = 0
-			gs 'stat'
-			'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
-			'After a long recovery, you have been completely cured of your yeast infection.'
+	if GerpesOnce = 1 and week = 1 and day <= 10:
+		if money < 45000 and karta < 45000: *nl & 'You to go to private clinic and completely cure your herpes.'
 
-			act 'Leave':gt 'city_clinic', 'start'
+		if money >= 45000:
+			act 'Go to private clinic and completely cure your herpes (45,000 <b>₽</b>) (cash)':
+				money -= 45000
+				gs 'city_clinic', 'herpes_cure'
+			end
+		end
+
+		if karta >= 45000:
+			act 'Go to private clinic and completely cure your herpes (45,000 <b>₽</b>) (card)':
+				karta -= 45000
+				gs 'city_clinic', 'herpes_cure'
+			end
+		end
+	end
+
+	if KandidozOnce = 1 and week = 1 and day <= 10:
+		if money < 15000 and karta < 15000: *nl & 'You cannot afford to go to private clinic and completely cure your yeast infection.'
+
+		if money >= 15000:
+			act 'Go to private clinic and completely cure your yeast infection. (15,000 <b>₽</b>) (cash)':
+				money -= 15000
+				gs 'city_clinic', 'yeast_cure'
+			end
+		end
+
+		if karta >= 15000:
+			act 'Go to private clinic and completely cure your yeast infection. (15,000 <b>₽</b>) (card)':
+				karta -= 15000
+				gs 'city_clinic', 'yeast_cure'
+			end
 		end
 	end
 end
@@ -514,6 +576,77 @@ if $ARGS[0] = 'stdcheck':
 	end
 end
 
+if $ARGS[0] = 'herpes_shot':
+	*clr & cla
+	minut += 15
+	GerpesUkolDay = daystart
+	GerpesNapr -= 1
+	gs 'stat'
+	'You see the nurse and she gives you a painful injection in your ass.'
+
+	if GerpesNapr = 0:Gerpes = -10 & 'You have completed the treatment.'
+	act 'Leave':gt 'city_clinic'
+end
+
+if $ARGS[0] = 'gonorrhea_shot':
+	*clr & cla
+	minut += 15
+	TriperUkolDay = daystart
+	TriperNapr -= 1
+	gs 'stat'
+	'You see the nurse and she gives you a painful injection in your ass.'
+
+	if TriperNapr = 0:TriperOral = 0 & TriperOralSigns = 0 & Triper = 0 & Venera -= 1 & TriperOnce = 0 & 'You have completed the treatment.'
+
+	act 'Leave':gt 'city_clinic'
+end
+
+if $ARGS[0] = 'syphilis_shot':
+	*clr & cla
+	minut += 60
+	SifNapr = 0
+	SifacOnce = 0
+	Sifilis = 0
+	Venera -= 1
+	gs 'stat'
+	'You see the nurse and she gives you a painful injection in your ass.'
+
+	'"That''s it, you might still feel a bit off but the infection is now cured".'
+
+	act 'Leave':gt 'city_clinic'
+end
+
+if $ARGS[0] = 'herpes_cure':
+	*clr & cla
+	menu_off = 1
+	day += 3
+	week += 3
+	KandidozOnce = 0
+	Kandidoz = 0
+	gs 'stat'
+	'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
+	'After a long recovery, you have been completely cured of your yeast infection.'
+
+	act 'Leave':gt 'city_clinic', 'start'
+end
+
+if $ARGS[0] = 'yeast_cure':
+	*clr & cla
+	menu_off = 1
+	day += 3
+	week += 3
+	GerpesOnce = 0
+	Gerpes = 0
+	OrHerpes = 0
+	GenHerpes = 0
+	Venera -= 1
+	gs 'stat'
+	'There''s an ambulance waiting outside. It drives you to a cutting edge medical facility, where you spend 3 days being treated and pampered.'
+	'After a long recovery, you have been completely cured of your herpes.'
+
+	act 'Leave':gt 'city_clinic', 'start'
+end
+
 if $ARGS[0] = 'ven1':
 	*clr & cla
 	menu_off = 1
@@ -521,7 +654,7 @@ if $ARGS[0] = 'ven1':
 	gs'stat'
     '<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/gy93cr29.jpg"></center>'
     'You lie down, almost crying, mulling over the doctor''s words again and again in your head. You know it is not fair, but you can''t allow these images to go public and decide to pay him to delete the footage.'
-	'You pull the money from your wallet and give it to him, hoping he''ll keep true to his word...'
+	'You pull the money from your purse and give it to him, hoping he''ll keep true to his word...'
     act 'Return to the lobby':gt'city_clinic','start'
 end
 
@@ -861,7 +994,7 @@ if $ARGS[0] = 'ninel2':
 
 						gs 'arousal', 'vaginal_dildo', 5, 'sub', 'lesbian'
 						gs 'stat'
-											
+
 						act 'Oh-h...!':
 							*clr & cla
 							pcs_horny = 100
@@ -879,7 +1012,7 @@ if $ARGS[0] = 'ninel2':
 							gs 'arousal', 'vaginal_finger', 15, 'sub', 'lesbian'
 							minut -= 15
 							gs 'stat'
-											
+
 							act 'Beg for it':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/city/residential/clinic/sex/exam07.jpg"></center>'
@@ -986,7 +1119,7 @@ if $ARGS[0] = 'ninel3':
 
 					gs 'arousal', 'vaginal_strap', 20, 'sub', 'lesbian'
 					gs 'stat'
-											
+
 					act 'Ride her':
 						*clr & cla
 						pcs_mood += 15
@@ -1005,7 +1138,7 @@ if $ARGS[0] = 'ninel3':
 						gs 'arousal', 'vaginal_strap', 10, 'sub', 'lesbian'
 						gs 'arousal', 'end'
 						gs 'stat'
-											
+
 						act 'Freshen up and go': minut += 5 & gt 'city_residential'
 					end
 				end

+ 1 - 1
locations/city_industrial_train.qsrc

@@ -247,7 +247,7 @@ if $ARGS[0] = 'pavlovsk':
 	'After 35 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
 	act 'Get off the train':
 		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
-		gt 'pav_train_hall', 'platform'
+		gt 'pav_train_hall'
 	end
 end
 

+ 2 - 2
locations/city_jorahouse.qsrc

@@ -387,7 +387,7 @@ if $ARGS[0] = 'ev 18':
 	act 'Continue':
 		cla
 		*clr
-		facial += 1
+		
 		'Semyon cums all over your face'
 		picrand = rand(18, 20)
 		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof18.jpg"></center>'
@@ -406,7 +406,7 @@ if $ARGS[0] = 'ev19':
 	klofQW += 2
 	money += 200
 	spafinloc = 11
-	facial += 1
+	
 	pcs_vag += 1
 	if jorasemyon = 1:
 		gs 'cum_call', 'mouth', 'A44', 1

+ 1 - 1
locations/city_kafegivisex.qsrc

@@ -113,7 +113,7 @@ if $ARGS[0] = 'giviirasexdivibor3':
 		gs 'cum_manage'
 		spafinloc = 11
 		gs 'cum_manage'
-		facial += 1
+		
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/sex/group/cum/threesome6.jpg"></center>'
 		'Givi puts you on your knees with Irina and begins to finish you on the face. You finish by both licking his member clean, turn to each other and kiss.'

+ 2 - 2
locations/city_kavkazkafe.qsrc

@@ -259,7 +259,7 @@ end
 
 if $ARGS[0] = 'grupcum':
 	minut += 5
-	facial += 1
+	
 	cumface += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/sex/group/grupcum.jpg"></center>'
@@ -416,7 +416,7 @@ end
 
 if $ARGS[0] = 'givibj5':
 	minut += 3
-	facial += 1
+	
 	picrand = rand(1, 9)
 	'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial<<picrand>>.jpg"></center>'
 	'You remove his member from your mouth, but Givi does not give you time to dodge as a jet of sperm slaps you, covering your face with hot, thick and sticky cum.'

+ 8 - 8
locations/city_lake.qsrc

@@ -509,7 +509,7 @@ if $ARGS[0] = 'walklake1':
 						cla & *clr
 						gs 'cum_call', 'face', 'A177', 1
 						gs 'cum_call', 'mouth', 'A177', 1
-						facial += 1
+						
 						gs 'arousal', 'bj', 5
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/facefuck1.jpg"></center>'
@@ -546,7 +546,7 @@ if $ARGS[0] = 'walklake1':
 					cla & *clr
 					gs 'cum_call', 'face', 'A177', 1
 					gs 'cum_call', 'mouth_swallow', 'A177', 1
-					facial += 1
+					
 					gs 'arousal', 'bj', 5
 					gs 'arousal', 'end'
 					gs 'stat'
@@ -648,7 +648,7 @@ if $ARGS[0] = 'dinribak':
 					gs 'cum_call', 'face', 'A177', 1
 					gs 'cum_call', 'mouth', 'A177', 1
 					gs 'arousal', 'bj', 5
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/facefuck1.jpg"></center>'
 					'He starts to cum on your face. A spurt of his cum flies into your mouth and you choke at the taste.'
@@ -706,7 +706,7 @@ if $ARGS[0] = 'dinribak':
 				gs 'cum_call', 'face', 'A177', 1
 				gs 'cum_call', 'mouth_swallow', 'A177', 1
 				gs 'arousal', 'bj', 5
-				facial += 1
+				
 				gs 'arousal', 'end'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/whore/cum.jpg"></center>'
@@ -1254,7 +1254,7 @@ if $ARGS[0] = 'vlake2':
 							gs 'npcgeneratec', 0, 'a stranger at the lake', rand(18,45)
 							gs 'boyStat', $npclastgenerated
 							gs 'cum_call', 'face', 'a stranger at the lake'
-							facial += 1
+							
 							gs 'arousal', 'end'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/vlake2/vlake7.jpg"></center>'
@@ -1439,7 +1439,7 @@ if $ARGS[0] = 'kater1cum':
 	gs 'cum_call', 'mouth_swallow', 'a rescuer at the lake'
 	gs 'cum_call', 'face', 'a rescuer at the lake'
 	gs 'cum_call', 'breasts', 'a rescuer at the lake'
-	facial += 1
+	
 	gs 'arousal', 'end'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/kater1/kater9.jpg"></center>'
@@ -1709,7 +1709,7 @@ if $ARGS[0] = 'horse1':
 									act 'Finish':
 										*clr & cla
 										gs 'cum_call', 'face', 'Quad rider'
-										facial += 1
+										
 										gs 'stat'
 										'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse1/horse10.jpg"></center>'
 										'You remove the dick from your mouth and begin stroking it. A few seconds, a stream of cum splatters across your face.'
@@ -1801,7 +1801,7 @@ if $ARGS[0] = 'horse2':
 						act 'Change position':
 							*clr & cla
 							gs 'cum_call', 'face', 'Horse rider'
-							facial += 1
+							
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/horse2/horse7.jpg"></center>'
 							'You climb off them and kneel down in front of them. They stand on either side of you as they jerk their cocks. One immediately groans as his cum splashes over your face.'

+ 2 - 1
locations/city_musicstore.qsrc

@@ -155,4 +155,5 @@ if $ARGS[0] = 'payandtakestuff':
 	killvar 'ml_hardcase'
 	act 'Leave': gt 'torgcentr'
 end
---- city_musicstore ---------------------------------
+--- city_musicstore ---------------------------------
+

+ 2 - 1
locations/city_musicstore_stock.qsrc

@@ -424,4 +424,5 @@ if $ARGS[0]='studio':
         end
     end
 end
---- city_musicstore_stock ---------------------------------
+--- city_musicstore_stock ---------------------------------
+

+ 88 - 88
locations/club.qsrc → locations/city_nightclub.qsrc

@@ -1,15 +1,15 @@
-# club
+# city_nightclub
 !!2021/04/15
 CLOSE ALL
 !!needs a complete rework of the club
 if $ARGS[0] = 'start':
-	$loc = 'club'
+	$loc = 'city_nightclub'
 	$loc_arg = 'start'
-	$menu_loc = 'club'
+	$menu_loc = 'city_nightclub'
 	$menu_arg = 'start'
 	menu_off = 0
 	$location_type = 'public_outdoors'
-	$sexloc = 'club'
+	$sexloc = 'city_nightclub'
 	*clr & cla
 	minut += 5
 	gs 'stat'
@@ -30,22 +30,22 @@ if $ARGS[0] = 'start':
 			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or ($clothingworntype = 'salacious_dress' or $clothingworntype = 'salacious_outfits')):
 				minut += 5
 				'He nods and says something into his walkie-talkie. A couple of minutes later you meet Erik in the foyer.'
-				act 'Talk to him':gt 'club', 'work'
+				act 'Talk to him':gt 'city_nightclub', 'work'
 			elseif PCloStyle = 4:
 				'He shakes his head, if you''re looking for paying clients, try the road by the park this is not a brothel.'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_sweat >= 30:
 				'"God, you actually smell!"'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_makeup = 1:
 				'You have to wear some makeup to start your work.'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_makeup = 0:
 				'"Fix your makeup first, girl. You look horrible."'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			else
 				'He tells you that you are over-dressed, you need to wear something shorter, or much more daring if you want to work.'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			end
 		end
 	end
@@ -58,27 +58,27 @@ if $ARGS[0] = 'start':
 				minut += 5
 				money -= 250
 				frost = 0
-				gt 'club', 'inside'
+				gt 'city_nightclub', 'inside'
 			elseif PCloStyle = 4:
 				cla
 				'He shakes his head, if you''re looking for paying clients, try the road by the park this is not a brothel.'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_sweat >= 50:
 				cla
 				'The bouncer shakes his head. "God, girl, you actually smell!"'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_makeup = 1:
 				cla
 				'The bouncer shakes his head. "At least wear some makeup, girl."'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			elseif pcs_makeup = 0:
 				cla
 				'The bouncer shakes his head. "Fix your makeup first, girl."'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			else
 				cla
 				'The bouncer shakes his head. "Don''t you have some sexy clothes?"'
-				act 'Continue':gt 'club', 'start'
+				act 'Continue':gt 'city_nightclub', 'start'
 			end
 		end
 	end
@@ -101,7 +101,7 @@ if $ARGS[0] = 'inside':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
 	'The music here is loud and the bass is thumping. You see a laser show on the stage and on the poorly lit dance floor filled with people dancing, like there''s no tomorrow.'
 	*nl
-	'There is also a <a href="exec:gt ''club'', ''vip''">vip-room</a>.'
+	'There is also a <a href="exec:gt ''city_nightclub'', ''vip''">vip-room</a>.'
 
 	if hour >= 18 and hotcat >= 6 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
 		*clr & cla
@@ -115,14 +115,14 @@ if $ARGS[0] = 'inside':
 			'"The club opens at 6pm you can work for an hour at a time up to 1am. The jobs vary according to time and demand, it includes finding customers to bring to the club, promoting drinks and some dancing."'
 			'"The pay depends on results, get more people in, get people buying up the promotional drinks or if you dance well and you get 200 <b>₽</b>. Do worse, you get less, do very well, you get a bonus. When you finish you can stay in the club, so you get free entry as well."'
 			'"So, are you interested?"'
-			act 'No':clubno = 1 & gt 'club', 'inside'
+			act 'No':clubno = 1 & gt 'city_nightclub', 'inside'
 			act 'Yes':
 				*clr & cla
 				clubwork = 1
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 				'You tell Erik you are interested and he takes your details.'
 				'"Great <<$pcs_nickname>>, you can find me here, and I''ll place your details on the door so you can get in, but you still have to do your makeup and dress for clubbing."'
-				act 'Return':gt 'club', 'inside'
+				act 'Return':gt 'city_nightclub', 'inside'
 			end
 		end
 
@@ -145,7 +145,7 @@ if $ARGS[0] = 'inside':
 			'You search the club for a few minutes, before finding the promoter.'
 			if hotcat >= 6:
 				'He asks you if you''ve changed your mind and want to do some work for him.'
-				act 'No':clubno = 1 & gt 'club', 'inside'
+				act 'No':clubno = 1 & gt 'city_nightclub', 'inside'
 				act 'Yes':
 					cla
 					*clr
@@ -154,7 +154,7 @@ if $ARGS[0] = 'inside':
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 					'You tell Erik you are interested and he takes your details.'
 					'"Great <<$pcs_nickname>>, you can find me here, and I''ll place your details on the door so you can get in, but you still have to do your makeup and dress for clubbing."'
-					act 'Return':gt 'club', 'inside'
+					act 'Return':gt 'city_nightclub', 'inside'
 				end
 			else
 				'You ask him about work, but he says you''re not pretty enough and walks off. You are shocked enough that you just stand there and watch him walk away.'
@@ -165,9 +165,9 @@ if $ARGS[0] = 'inside':
 	end
 
 	if hour <= 3 or hour >= 18:
-		act 'Use the toilet':gt 'club', 'toi'
-		act 'Go to the dance floor':gt 'club', 'dance'
-		act 'Go to the bar':gt 'club', 'bar'
+		act 'Use the toilet':gt 'city_nightclubToilet', 'start'
+		act 'Go to the dance floor':gt 'city_nightclub', 'dance'
+		act 'Go to the bar':gt 'city_nightclub', 'bar'
 	end
 
 	if (hour < 1 or hour >= 18) and clubwork = 1:
@@ -176,7 +176,7 @@ if $ARGS[0] = 'inside':
 			minut += 5
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 			'You search around and it only takes a few minutes to find Erik in his suit.'
-			act 'Talk to him':gt 'club', 'work'
+			act 'Talk to him':gt 'city_nightclub', 'work'
 		end
 	end
 end
@@ -196,7 +196,7 @@ if $ARGS[0] = 'toi':
 		gs 'stat'
 		'Finally there''s a free booth for you.'
 
-		act 'WC':gt 'club', 'tou'
+		act 'WC':gt 'city_nightclub', 'tou'
 	end
 
 	act 'Sneak into the mens toilet':
@@ -208,7 +208,7 @@ if $ARGS[0] = 'toi':
 		act 'Find a free cubicle':
 
 			if TQuest = 0 and pcs_horny < 50:
-				gt 'club', 'tou'
+				gt 'city_nightclub', 'tou'
 			elseif TQuest = 0 and pcs_horny >= 50:
 				gt 'Club2', 'toilet'
 			elseif TQuest = 1:
@@ -216,14 +216,14 @@ if $ARGS[0] = 'toi':
 			elseif TQuest = 2:
 				gt 'Club2', 'toilet2'
 			elseif TQuest >= 3 and rand(1, 100) < 60:
-				gt 'club', 'tou'
+				gt 'city_nightclub', 'tou'
 			elseif TQuest >= 3:
 				gt 'Club2', 'toilet1'
 			end
 		end
 	end
 
-	act 'Go back to the dancefloor':gt 'club', 'inside'
+	act 'Go back to the dancefloor':gt 'city_nightclub', 'inside'
 end
 
 if $ARGS[0] = 'tou':
@@ -244,7 +244,7 @@ if $ARGS[0] = 'tou':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club3.jpg"></center>'
 	*nl
 
-	act 'Leave the toilet':gt 'club', 'inside'
+	act 'Leave the toilet':gt 'city_nightclub', 'inside'
 
 	act 'Look in the mirror': gt 'mirror', 'start'
 	if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
@@ -265,7 +265,7 @@ if $ARGS[0] = 'dance':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
 	'The club is filled to the brink with people. Most of whom are on the dance floor having a great time.'
 	
-	act 'Leave the dance floor':gt 'club', 'inside'
+	act 'Leave the dance floor':gt 'city_nightclub', 'inside'
 	
 	if hour <= 3 or hour >= 18:
 		act 'Dance (0:15)':
@@ -293,7 +293,7 @@ if $ARGS[0] = 'dance':
 
 				'While you''re dancing you feel that someone is groping your ass, you turn around and see <<$boybod>>, <<$boyface>> haired guy of <<$boybody>> height. He''s <<$boyClo>>'
 
-				act 'Stop dancing':gt 'club', 'inside'
+				act 'Stop dancing':gt 'city_nightclub', 'inside'
 				
 				act 'Dance with him':
 					*clr & cla
@@ -304,7 +304,7 @@ if $ARGS[0] = 'dance':
 					gs 'stat'
 
 					if pcs_horny < 90:
-						act 'Go to the dance floor':gt 'club', 'dance'
+						act 'Go to the dance floor':gt 'city_nightclub', 'dance'
 					end
 
 					act 'Kiss':
@@ -316,7 +316,7 @@ if $ARGS[0] = 'dance':
 							gs 'arousal', 'kiss', 15, 'sub'
 							gs 'stat'							
 
-							if pcs_horny < 70: act 'Go to the dance floor':gt 'club', 'dance'
+							if pcs_horny < 70: act 'Go to the dance floor':gt 'city_nightclub', 'dance'
 							act 'Go to Vip-room with the guy':picrand = 38 & $sexloc = 'vipclub' & xgt 'sex', 'var'
 
 							act 'Suggest going to his place':
@@ -335,8 +335,8 @@ if $ARGS[0] = 'dance':
 							gs 'arousal', 'kiss', 15, 'sub'
 							gs 'stat'
 
-							if pcs_horny < 70: act 'Go to the dance floor':gt 'club', 'dance'
-							act 'Go to the toilet with a guy':gt 'club', 'sex'
+							if pcs_horny < 70: act 'Go to the dance floor':gt 'city_nightclub', 'dance'
+							act 'Go to the toilet with a guy':gt 'city_nightclub', 'sex'
 							act 'Suggest going to his place':
 								cla
 								'You lean in and whisper: "How about we have fun at your place?". His eyes light up. Before you even notice, he grabs your hand and walk you toward the exit.'
@@ -355,10 +355,10 @@ if $ARGS[0] = 'dance':
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/dancelezb.jpg"></center>'
 					'While you''re dancing you a hand groping your ass. You turn around to see who touched your butt, but you''re surprised to see a woman smiling at you, she is seductively biting her lip.'
 					
-					act 'Stop dancing':gt 'club', 'inside'
+					act 'Stop dancing':gt 'city_nightclub', 'inside'
 					
 					if rand(0, 1) = 0:
-						act '"Let''s go to the toilet, to have fun."':gt 'club', 'lezbsort'
+						act '"Let''s go to the toilet, to have fun."':gt 'city_nightclub', 'lezbsort'
 					else
 						act '"Let''s go to VIP-Room, to have fun."': picrand = rand(13, 17) & $sexloc = 'vipclub' & xgt 'lezbsex', 'var'
 					end
@@ -366,7 +366,7 @@ if $ARGS[0] = 'dance':
 			end
 
 			killvar 'clrand'
-			act 'Go away':gt 'club', 'dance'
+			act 'Go away':gt 'city_nightclub', 'dance'
 		end
 
 		act 'Go up to the DJ (0:30)':
@@ -393,13 +393,13 @@ if $ARGS[0] = 'dance':
 						'Into the booth came a man, who seems to be somewhere in forties. He has a large belly, has a bald head and is wearing glasses. Alexei greeted him and introduced you to him, his name is Alexander E. and he''s the owner of the club.'
 						'Alexander had a small talk with Alexei, then he left again.'
 
-						act 'Leave the booth':gt 'club', 'dance'
+						act 'Leave the booth':gt 'city_nightclub', 'dance'
 
 						exit
 					end
 
 					if alexeyClubSex ! 3 or sashaClubQW > 0:
-						act 'Leave the booth':gt 'club', 'dance'
+						act 'Leave the booth':gt 'city_nightclub', 'dance'
 
 						act 'Get on your knees and give him a BJ':
 							*clr & cla
@@ -429,26 +429,26 @@ if $ARGS[0] = 'dance':
 								gs 'arousal', 'end'
 								gs 'stat'
 
-								act 'Leave the booth':gt 'club', 'dance'
+								act 'Leave the booth':gt 'city_nightclub', 'dance'
 							end
 						end
 					end
 				end
 			end
 
-			act 'Leave the booth':gt 'club', 'dance'
+			act 'Leave the booth':gt 'city_nightclub', 'dance'
 		end
 	else
 		menu_off = 1
 		'It''s getting late and the music stops, looks like it might be time to go home.'
-		act 'Leave the dance floor': gt 'club', 'inside'
+		act 'Leave the dance floor': gt 'city_nightclub', 'inside'
 	end	
 end
 
 if $ARGS[0] = 'bar':
 	*clr & cla
 	minut += 5
-	$menu_loc = 'club'
+	$menu_loc = 'city_nightclub'
 	$menu_arg = 'bar'
 	menu_off = 0
 	gs 'stat'
@@ -458,12 +458,12 @@ if $ARGS[0] = 'bar':
 
 	if pcs_apprnc > 56:
 		barsexrand = rand(0, 10)
-		if barsexrand = 1: killvar 'barsexrand' & gt 'club', 'bar0'
-		if barsexrand = 2: killvar 'barsexrand' & gt 'club', 'bar1'
+		if barsexrand = 1: killvar 'barsexrand' & gt 'city_nightclub', 'bar0'
+		if barsexrand = 2: killvar 'barsexrand' & gt 'city_nightclub', 'bar1'
 		killvar 'barsexrand'
 	end
 
-	act 'Go back':gt 'club', 'inside'
+	act 'Go back':gt 'city_nightclub', 'inside'
 
 	if alko >= 7:
 		*clr & cla
@@ -760,7 +760,7 @@ if $ARGS[0] = 'bar':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club6.jpg"></center>'
 			'You found a free bar stool and sat down on it. You ordered the barkeeper to mix you a cocktail and a few moments later, you sipping on a sweet one.'
 
-			act 'Stand up':gt 'club', 'bar'
+			act 'Stand up':gt 'city_nightclub', 'bar'
 		end
 	end
 end
@@ -807,23 +807,23 @@ if $ARGS[0] = 'sex':
 					gs 'cum_manage'
 					'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'
 
-					act 'Stand up':gt 'club', 'tou'
+					act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 				end
 
 				act 'Let him cum on your face':
 					cla
-					facial += 1
+					
 					spafinloc = 11
 					gs 'cum_manage'
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubfacial1.jpg"></center>'
 					'You grabbed his cock and point his "gun" at your face. He groans as he cums and you can feel hot streams of semen covering your face.'
 
-					act 'Stand up':gt 'club', 'tou'
+					act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 				end
 
 				exit
 			elseif harakBoy = 2:
-				facial += 1
+				
 				spafinloc = 11
 				gs 'cum_manage'
 				SUB += 1
@@ -831,7 +831,7 @@ if $ARGS[0] = 'sex':
 				'The bloke grabs your hair and cums on your face. You quickly close your eyes, but it''s too late, a few drips of semen make it into your eyes. It hurts a bit.'
 			end
 
-			act 'Stand up':gt 'club', 'tou'
+			act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 		end
 
 		act 'Swallow his cum':
@@ -846,7 +846,7 @@ if $ARGS[0] = 'sex':
 			gs 'arousal', 'end'
 			gs 'stat'
 
-			act 'Stand up':gt 'club', 'tou'
+			act 'Stand up':gt 'city_nightclubToilet', 'clubtoilet_men'
 		end
 	end
 
@@ -877,7 +877,7 @@ if $ARGS[0] = 'sex':
 		gs 'arousal', 'end'
 		gs 'stat'
 
-		act 'Leave cubicle':gt 'club', 'tou'
+		act 'Leave cubicle':gt 'city_nightclubToilet', 'clubtoilet_men'
 	end
 end
 
@@ -890,7 +890,7 @@ if $ARGS[0] = 'bar0':
 	'As you sit at the bar, a woman walk up to you and begins to chat with you.'
 	'During the conversation you get the feeling that she''s flirting with you and before you even can react, her hands wander over your body, giving you a sensational feeling.'
 
-	act 'Move away from her':gt 'club', 'bar'
+	act 'Move away from her':gt 'city_nightclub', 'bar'
 
 	act 'Kiss her':
 		cla
@@ -901,7 +901,7 @@ if $ARGS[0] = 'bar0':
 		gs 'arousal', 'kiss', 5, 'lesbian'
 		gs 'stat'
 
-		act 'Tell her to meet at the toilet':gt 'club', 'lezbsort'
+		act 'Tell her to meet at the toilet':gt 'city_nightclub', 'lezbsort'
 
 		act 'Strip her':
 			cla
@@ -943,7 +943,7 @@ if $ARGS[0] = 'bar0':
 						gs 'arousal', 'end'
 						gs 'stat'
 
-						act 'Leave':gt 'club', 'inside'
+						act 'Leave':gt 'city_nightclub', 'inside'
 					elseif dildo > 0:
 						act 'Get dildo':
 							cla
@@ -971,7 +971,7 @@ if $ARGS[0] = 'bar0':
 								gs 'arousal', 'end'
 								gs 'stat'
 
-								act 'Leave':gt 'club', 'inside'
+								act 'Leave':gt 'city_nightclub', 'inside'
 							end
 						end
 					end
@@ -991,9 +991,9 @@ if $ARGS[0] = 'bar1':
 
 	act 'Turn him down':
 		if alko < 4:
-			gt 'club', 'bar'
+			gt 'city_nightclub', 'bar'
 		else
-			gt 'club', 'rape'
+			gt 'city_nightclub', 'rape'
 		end
 	end
 
@@ -1008,15 +1008,15 @@ if $ARGS[0] = 'bar1':
 			'He kneels down and begins to move his tongue between your folds. You immediately begin to moan softly. You close your eyes and admit to yourself, that he''s not half bad at it.'
 			gs 'arousal', 'cuni', 10, 'dom'
 			gs 'stat'
-			act 'Turn him down':gt 'club', 'bar'
-			act 'Suck his cock':gt 'club', 'bar2'
-			act 'Let him fuck you':gt 'club', 'bar3'
+			act 'Turn him down':gt 'city_nightclub', 'bar'
+			act 'Suck his cock':gt 'city_nightclub', 'bar2'
+			act 'Let him fuck you':gt 'city_nightclub', 'bar3'
 		end
 	else
 		act 'Tell him to lick you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end	
-	act 'Blow job':gt 'club', 'bar2'
-	act 'Let him fuck you':gt 'club', 'bar3'
+	act 'Blow job':gt 'city_nightclub', 'bar2'
+	act 'Let him fuck you':gt 'city_nightclub', 'bar3'
 end
 
 if $ARGS[0] = 'bar2':
@@ -1032,7 +1032,7 @@ if $ARGS[0] = 'bar2':
 	gs 'arousal', 'bj', 10, 'sub'
 	gs 'stat'
 
-	act 'Let him fuck you':gt 'club', 'bar3'
+	act 'Let him fuck you':gt 'city_nightclub', 'bar3'
 
 	act 'Continue to suck':
 		cla
@@ -1048,7 +1048,7 @@ if $ARGS[0] = 'bar2':
 		gs 'arousal', 'end'
 		gs 'stat'
 
-		act 'Move away':gt 'club', 'inside'
+		act 'Move away':gt 'city_nightclub', 'inside'
 	end
 end
 
@@ -1089,7 +1089,7 @@ if $ARGS[0] = 'bar3':
 	gs 'arousal', 'end'
 	gs 'stat'
 
-	act 'Leave':gt 'club', 'inside'
+	act 'Leave':gt 'city_nightclub', 'inside'
 end
 
 if $ARGS[0] = 'rape':
@@ -1122,7 +1122,7 @@ if $ARGS[0] = 'rape':
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				act 'Leave':gt 'club', 'inside'
+				act 'Leave':gt 'city_nightclub', 'inside'
 			else
 				cla
 				*clr
@@ -1139,7 +1139,7 @@ if $ARGS[0] = 'rape':
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				act 'Leave':gt 'club', 'inside'
+				act 'Leave':gt 'city_nightclub', 'inside'
 			end
 		end
 	else
@@ -1152,7 +1152,7 @@ if $ARGS[0] = 'rape':
 		gs 'arousal', 'end'
 		gs 'stat'
 
-		act 'Leave':gt 'club', 'inside'
+		act 'Leave':gt 'city_nightclub', 'inside'
 	end
 end
 
@@ -1165,9 +1165,9 @@ if $ARGS[0] = 'lezbsort':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/lezbsort.jpg"></center>'
 	'She follows you into the womens bathroom and you lure her into one of the empty booths.'
 
-	act 'Lick her':gt 'club', 'lezbsort1'
-	act 'Tell her to lick you':gt 'club', 'lezbsort2'
-	act 'Leave her':gt 'club', 'tou'
+	act 'Lick her':gt 'city_nightclub', 'lezbsort1'
+	act 'Tell her to lick you':gt 'city_nightclub', 'lezbsort2'
+	act 'Leave her':gt 'city_nightclub', 'tou'
 end
 
 if $ARGS[0] = 'lezbsort1':
@@ -1182,12 +1182,12 @@ if $ARGS[0] = 'lezbsort1':
 	gs 'arousal', 'cuni_give', 10, 'sub', 'lesbian'
 	gs 'stat'
 
-	if hour >= 15 or hour <= 3:act 'Now it''s your turn':gt 'club', 'lezbsort2'
+	if hour >= 15 or hour <= 3:act 'Now it''s your turn':gt 'city_nightclub', 'lezbsort2'
 
 	gs 'arousal', 'end'
 	gs 'stat'
 
-	act 'Leave her':gt 'club', 'tou'
+	act 'Leave her':gt 'city_nightclub', 'tou'
 end
 
 if $ARGS[0] = 'lezbsort2':
@@ -1203,12 +1203,12 @@ if $ARGS[0] = 'lezbsort2':
 	gs 'arousal', 'cuni', 10, 'sub', 'lesbian'
 	gs 'stat'
 
-	if hour >= 15 or hour <= 3:act 'Lick her':gt 'club', 'lezbsort1'
+	if hour >= 15 or hour <= 3:act 'Lick her':gt 'city_nightclub', 'lezbsort1'
 
 	gs 'arousal', 'end'
 	gs 'stat'
 
-	act 'Leave her':gt 'club', 'tou'
+	act 'Leave her':gt 'city_nightclub', 'tou'
 end
 
 if $ARGS[0] = 'vip':
@@ -1233,7 +1233,7 @@ if $ARGS[0] = 'vip':
 
 	if vipday = daystart:act 'Return to the VIP area':gt 'vipclub', 'start'
 
-	act 'Leave him be and go away':gt 'club', 'inside'
+	act 'Leave him be and go away':gt 'city_nightclub', 'inside'
 end
 
 if $ARGS[0] = 'work':
@@ -1271,10 +1271,10 @@ if $ARGS[0] = 'work':
 					'You hardy found anyone, Erik doesn''t seem happy, but he pays you 100 <b>₽</b> for your efforts.'
 				end
 				if hour < 1 or hour >= 18:
-					act 'Get another job from Erik':gt 'club', 'work'
+					act 'Get another job from Erik':gt 'city_nightclub', 'work'
 				end
 				
-				act 'Go to dancefloor':gt 'club', 'inside'
+				act 'Go to dancefloor':gt 'city_nightclub', 'inside'
 			end
 		end
 	elseif clubr = 1:
@@ -1292,9 +1292,9 @@ if $ARGS[0] = 'work':
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
 				'You hand Erik the empty bottles, he gives you 200 <b>₽</b>.'
-				if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'club', 'work'
+				if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'city_nightclub', 'work'
 
-				act 'Go to dancefloor':gt 'club', 'inside'
+				act 'Go to dancefloor':gt 'city_nightclub', 'inside'
 			end
 		end
 	elseif clubr = 2:
@@ -1315,13 +1315,13 @@ if $ARGS[0] = 'work':
 				'Erik thanks you for helping when he was short and pays you 200 <b>₽</b>, but doesn''t even mention your dancing.'
 			end
 			gs 'stat'
-			if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'club', 'work'
+			if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'city_nightclub', 'work'
 
-			act 'Go to dancefloor':gt 'club', 'inside'
+			act 'Go to dancefloor':gt 'city_nightclub', 'inside'
 		end
 	end
 	killvar 'clubr'
 end
 
---- club ---------------------------------
+--- city_nightclub ---------------------------------
 

+ 81 - 0
locations/city_nightclubToilet.qsrc

@@ -0,0 +1,81 @@
+# city_nightclubToilet
+
+if $ARGS[0] = 'start':
+    $location_type = 'public_indoors'
+	$loc = 'city_nightclubToilet'
+	$loc_arg = 'start'
+    $menu_loc = 'city_nightclubToilet'
+    $menu_arg = 'start'
+    gs 'themes', 'indoors'
+	killvar '$locclass'
+	menu_off = 0
+	gs 'stat'
+	*clr & cla
+    
+	'<center><b><font color="maroon">Nightclub-Restroom</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/toiletwalkway.jpg"></center>'
+	gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Enter the men''s restroom (<<will_cost>> Willpower)':
+				gs 'willpower', 'exhib', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gt 'city_nightclubToilet', 'clubtoilet_men'
+			end
+		else
+			act 'Enter the men''s restroom (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+    act 'Enter the women''s restroom': gt 'city_nightclubToilet', 'clubtoilet_women'
+	act 'Return to the dance floor': gt 'city_nightclub', 'inside'
+end
+
+if $ARGS[0] = 'clubtoilet_men':
+	$loc = 'city_nightclubToilet'
+	$loc_arg = 'clubtoilet_men'
+	$locM = 'city_nightclubToilet'
+	$locM_arg = 'clubtoilet_men'
+	$menu_loc = 'city_nightclubToilet'
+	$menu_arg = 'clubtoilet_men'
+	menu_off = 0
+	$location_type = 'bathroom'
+	$locclass = 'restroom'
+
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Nightclub-Men''s Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/mentoilet.jpg"></center>'
+	'You walk in to the men''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>.'
+	
+	act 'Leave': gt 'city_nightclubToilet', 'start'
+	
+	dynamic $tampon
+	dynamic $quickwash
+	dynamic $basin	
+end
+
+if $ARGS[0] = 'clubtoilet_women':
+	$loc = 'city_nightclubToilet'
+	$loc_arg = 'clubtoilet_women'
+	$locM = 'city_nightclubToilet'
+	$locM_arg = 'clubtoilet_women'
+	$menu_loc = 'city_nightclubToilet'
+	$menu_arg = 'clubtoilet_women'
+	menu_off = 0
+	$location_type = 'bathroom'
+	$locclass = 'restroom'
+	
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Nightclub-Women''s Room</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/womentoilet.jpg"></center>'
+	'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
+
+	act 'Leave': gt 'city_nightclubToilet', 'start'
+	act 'Go to the last stall': gt 'gloryhole', 'start'
+	
+	dynamic $tampon
+	dynamic $quickwash
+	dynamic $basin	
+end
+
+--- city_nightclubToilet ---------------------------------

+ 1 - 1
locations/city_saunawhore.qsrc

@@ -920,7 +920,7 @@ if $ARGS[0] = 'cumAnal':
 end
 
 if $ARGS[0] = 'cumFace':
-	facial += 1
+	
 	'<center><video autoplay loop src="images/locations/city/residential/sauna/sex/cumface'+rand(1, 5)+'.mp4"></video></center>'
 	if useCondom = 1:
 		'The client rips the condom from his dick and <<$cumType>> cum splatters all over your face.'

+ 1 - 1
locations/city_train.qsrc

@@ -191,7 +191,7 @@ if $ARGS[0] = 'pavlovsk':
 	'After 40 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
 	act 'Get off the train':
 		if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
-		gt 'pav_train_hall', 'platform'
+		gt 'pav_train_hall'
 	end
 end
 

+ 1 - 1
locations/city_trashplaceevents.qsrc

@@ -230,7 +230,7 @@ if $ARGS[0] = 'pos10':
 						act 'On your face':
 							*clr & cla
 							minut += 1
-							facial += 1
+							
 							gs 'cum_call', 'face', 'hobo'
 							
 							'<center><img <<$set_imgh>> src="images/shared/sex/public/cum0,'+rand(0,3)+'.jpg"></center>'

+ 2 - 2
locations/cleanHTML.qsrc

@@ -1,4 +1,4 @@
-#cleanHTML
+# cleanHTML
 !Removes Whitespace from between HTML tags in a string.
 !	Purpose is because having whitespace in writing code makes readablility,
 !	but the rendering engine adds extra lines at top for no reason.
@@ -23,4 +23,4 @@ $result = $cleanHTML['ReturnStr']
 killvar '$cleanHTML'
 killvar 'i'
 
---- cleanHTML ---------------------------------
+--- cleanHTML ---------------------------------

+ 2 - 2
locations/clothing.qsrc

@@ -205,7 +205,7 @@ if $ARGS[0] = 'view_clothing_list':
 
 	if ARRSIZE('dolls_outfits') > 0 or ARRSIZE('dolls_dress') > 0:'<center><a href="exec:$ward_list_store = ''dolls'' & gt ''clothing'', ''clothing_list'', ''dolls''"><img src="images/locations/city/island/dolls/shop_name.png"></a></center>'
 
-	if ARRSIZE('bomba_outfits') > 0 or ARRSIZE('nerdvana_cosplay') > 0:'<center><a href="exec:$ward_list_store = ''bomba'' & gt ''clothing'', ''clothing_list'', ''bomba''"><img src="images/locations/pushkin/bomba/shop_name.png"></a></center>'
+	if ARRSIZE('bomba_outfits') > 0 or ARRSIZE('bomba_dress') > 0:'<center><a href="exec:$ward_list_store = ''bomba'' & gt ''clothing'', ''clothing_list'', ''bomba''"><img src="images/locations/pushkin/bomba/shop_name.png"></a></center>'
 
 	if ARRSIZE('nerdvana_outfits') > 0 or ARRSIZE('nerdvana_cosplay') > 0 or ARRSIZE('nerdvana_bikinis') > 0 or ARRSIZE('nerdvana_swimsuit') > 0:'<center><a href="exec:$ward_list_store = ''nerdvana'' & gt ''clothing'', ''clothing_list'', ''nerdvana''"><img src="images/locations/city/island/nerdvana/shop_name.png"></a></center>'
 
@@ -1264,7 +1264,7 @@ if $ARGS[0] = 'clothing_list':
 	if $args[1] = 'market' or $args[1] = 'all':
 		if $args[1] ! 'all':
 			$ward_list_store = $args[1]
-			'<center>Clothing from the market</center>'
+			'<center><img src="images/pc/items/market/market.png"></center>'
 			gs 'clothing_QV', 'filter_header', 'store'
 			gs 'clothing', 'clothinglist_header'
 			!!To filter just this set

+ 9 - 9
locations/clothing_QV.qsrc

@@ -1,5 +1,5 @@
 # clothing_QV
-!!2021/04/15
+!!2022/01/20
 menu_off = 1
 
 if $ARGS[0] = 'list':
@@ -62,9 +62,9 @@ if $ARGS[0] = 'list':
 
 	if ARRSIZE('danilovich_outfits') > 0:'<center><a href="exec:gt ''clothing_QV'', ''clothing_list'', ''sports''"><img src="images/locations/city/citycenter/mall/sports.png"></a></center>'
 
-	if ARRSIZE('loopmaterinstvo_dress') > 0:'<center><a href="exec:gt ''clothing_QV'', ''clothing_list'', ''materinstvo''"><img src="images/locations/city/citycenter/mall/mommy.png"></a></center>'
+	if ARRSIZE('materinstvo_dress') > 0:'<center><a href="exec:gt ''clothing_QV'', ''clothing_list'', ''materinstvo''"><img src="images/locations/city/citycenter/mall/mommy.png"></a></center>'
 
-	if ARRSIZE('loopmarket_outfits') > 0:'<center><a href="exec:gt ''clothing_QV'', ''clothing_list'', ''market''">Clothing from the market</a></center>'
+	if ARRSIZE('market_outfits') > 0:'<center><a href="exec:gt ''clothing_QV'', ''clothing_list'', ''market''"><img src="images/pc/items/market/market.png"></a></center>'
 end
 
 if $ARGS[0] = 'clothing_list':
@@ -1284,21 +1284,21 @@ if $ARGS[0] = 'change':
 
 	if CloStyle2 = 4:
 		if CloInhibit <= 10:
-			'<font color="blue">This uniform is very conservative. Only the nerds would approve of you wearing it.</font>'
+			'<font color="blue">This uniform is very conservative in style. Only the nerds would approve of you for wearing it.</font>'
 		elseif CloSkirtShortness < 5 and CloThinness < 5 and CloBra = 0:
 			if CloQuality >= 4:
-				'<font color="blue">This uniform complies with the regulations and is of good quality. It would certainly help you with your standing with the cool kids and jocks.</font>'
+				'<font color="blue">This uniform follows the school regulations and is of good quality. You would gain approval from both the cool kids and the jocks.</font>'
 			else
-				'<font color="blue">This uniform complies with the school regulations on skirt length. Nobody in school would be offended by you wearing it.</font>'
+				'<font color="blue">This uniform follows the school regulations on skirt length. Every student feels indifferent to you for wearing it.</font>'
 			end
 		elseif CloSkirtShortness = 5 and CloThinness < 5 and CloBra = 0:
 			if CloQuality >= 4:
-				'<font color="blue">This uniform slightly breaches the school regulations on skirt length and is of good quality. Everybody apart from the nerds would approve of you wearing it.</font>'
+				'<font color="blue">This uniform slightly breaches the school regulations on skirt length and is of good quality. Students are, at least, indifferent to you for wearing it, except the disapproving looks from the nerds.</font>'
 			else
-				'<font color="blue">This uniform slightly breaches the school regulations on skirt length. The gopnik would approve of you wearing it.</font>'
+				'<font color="blue">This uniform slightly breaches the school regulations on skirt length. The gopnik would approve of you for wearing it.</font>'
 			end
 		else
-			'<font color="red">This uniform makes a mockery of the school uniform regulations. Everybody in school apart from the gopniks will think that you''re a slut.</font>'
+			'<font color="red">This uniform makes a mockery of the school regulations. Every students except the gopniks will think you a slut for wearing it.</font>'
 		end
 	end
 	act 'Return':gt 'clothing_QV', 'clothing_list', '<<$ward_list_store>>'

+ 0 - 1
locations/costuming.qsrc

@@ -376,4 +376,3 @@ end
 
 
 --- costuming ---------------------------------
-

+ 1 - 1
locations/costuming_outfits1.qsrc

@@ -178,4 +178,4 @@ end
 
 
 
---- costuming_outfits1 ---------------------------------
+--- costuming_outfits1 ---------------------------------

+ 1 - 1
locations/cum_call.qsrc

@@ -114,7 +114,7 @@ if $ARGS[0] ! 'precum':
 		spafinloc = 12
 	elseif $ARGS[0] = 'mouth_swallow':
 		spafinloc = 12
-		swallow += 1
+		stat['swallow'] += 1
 	elseif $ARGS[0] = 'hands':
 		spafinloc = 13
 	elseif $ARGS[0] = 'stomach':

+ 2 - 2
locations/dimaEv.qsrc

@@ -136,7 +136,7 @@ if $ARGS[0] = 'firstvisitsex':
 				*clr & cla
 				spafinloc = 11
 				gs 'cum_manage'
-				facial += 1
+				
 				if maxdra = 1: maxdra = 2
 				dimasexday = daystart
 				gs 'stat'
@@ -179,7 +179,7 @@ if $ARGS[0] = 'firstvisitsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					dimasexday = daystart
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sitcum.jpg"></center>'

+ 1 - 1
locations/directors.qsrc

@@ -79,4 +79,4 @@ if $ARGS[0] = 'punishment_fuck':
 end
 
 
---- directors ---------------------------------
+--- directors ---------------------------------

+ 5 - 5
locations/event.qsrc

@@ -91,14 +91,14 @@ if $ARGS[0] = 'blow':
 				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
 				'You take his cock out of your mouth and <<$loverdesc[lover_number]>> finishes in your hand.'
 			elseif tiprand = 3:
-				facial += 1
+				
 				spafinloc = 11
 				gs 'cum_manage'
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
 				'You took his cock out of your mouth and immediatly <<$loverdesc[lover_number]>> cums directly on your face, covering it with his warm and sticky seed.'
 			end
 		elseif haraklover[lover_number] = 2:
-			facial += 1
+			
 			spafinloc = 11
 			gs 'cum_manage'
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,8.jpg"></center>'
@@ -728,7 +728,7 @@ if $ARGS[0] = 'dima46':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/street/sex/15933_markdavisdonnaannika_447.jpg"></center>'
 	'When you''re downstairs, the girl moves you into a dark room with a round hole in one wall. Almost immediately, a cock appears from the hole.'
@@ -753,7 +753,7 @@ if $ARGS[0] = 'dima47':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	dimagh_counter += 1
 	if dimagh_counter <= 8:jump 'gloryhole1'
 	pcs_vag += 1
@@ -792,7 +792,7 @@ if $ARGS[0] = 'dima48':
 	spafinloc = 12
 	gs 'cum_manage'
 	swallow += 1
-	gloryhole += 1
+	stat['gloryhole'] += 1
 	dimagh_counter += 1
 	if dimagh_counter <= 8:jump 'gloryhole2'
 	gs 'stat'

+ 1 - 1
locations/fame.qsrc

@@ -767,4 +767,4 @@ if $ARGS[0] = 'calculateSlut':
 	end	
 end
 
---- fame ---------------------------------
+--- fame ---------------------------------

+ 6 - 0
locations/family_schedule.qsrc

@@ -71,6 +71,9 @@ if sister_indorf = 0:
 				if anyaloc['rand1'] ! daystart:
 					anyaloc = func('shortgs', 'rand_pick', '', 10, 15)
 					anyaloc['rand1'] = daystart
+					anyaloc['save1'] = anyaloc
+				else
+					anyaloc = anyaloc['save1']
 				end
 				if anyaloc = 15:
 					anyaloc['athome'] = 1
@@ -103,6 +106,9 @@ if sister_indorf = 0:
 				if anyaloc['rand2'] ! daystart:
 					anyaloc = func('shortgs', 'rand_pick', '', 13, 14, 15)
 					anyaloc['rand2'] = daystart
+					anyaloc['save2'] = anyaloc
+				else
+					anyaloc = anyaloc['save2']
 				end
 				if anyaloc = 15:
 					anyaloc['athome'] = 1

+ 1 - 1
locations/fbDormD.qsrc

@@ -183,7 +183,7 @@ $d_fbd_face = {
 		gs 'cum_manage'
 		spafinloc = 12
 		gs 'cum_manage'
-		facial += 1
+		
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/fbdface.jpg"></center>'
 		'<<$boydesc>> jerks off, while his cock is pointing at your face. You instinctively stick out your tongue, and he rubs the head of his dick against it while he''s approaching his orgasm. Suddenly a jet of sperm hits your face, covering you in cum. Several more follow, some of it getting into your mouth while the rest covers your cheeks and eye lids.'

+ 1 - 1
locations/flash.qsrc

@@ -564,4 +564,4 @@ if $ARGS[0] = 'exhibitionism':
 	if pcs_exhib > 100: pcs_exhib = 100
 end
 
---- flash ---------------------------------
+--- flash ---------------------------------

+ 1 - 1
locations/foto_practice.qsrc

@@ -711,4 +711,4 @@ if $ARGS[0] = 'nude':
 		end
 	end
 end
---- foto_practice ---------------------------------
+--- foto_practice ---------------------------------

+ 1 - 1
locations/garfather.qsrc

@@ -335,7 +335,7 @@ if pcs_horny > 50 and npc_sex['A28'] ! 0:
 						sexpartkno = 1
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						gs 'stat'
 						gar_rand1 = rand(0,100)
 						if gar_rand1 < 49:'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial0,<<rand(0,8)>>.jpg"></center>'

+ 9 - 9
locations/gdksex.qsrc

@@ -558,7 +558,7 @@ if $ARGS[0] = 'kissing':
 											if boynumBlock = 0: guy += 1
 											if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0: guy += 1
 
-											facial += 1
+											
 											spafinloc = 11
 											gs 'cum_manage'
 											spafinloc = 7
@@ -1899,7 +1899,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
@@ -1936,7 +1936,7 @@ if $ARGS[0] = 'hotelsex':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
-					facial += 1
+					
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 					'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 					if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -1960,7 +1960,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 						if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2017,7 +2017,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 								'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2085,7 +2085,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2151,7 +2151,7 @@ if $ARGS[0] = 'hotelsex':
 						*clr & cla
 						spafinloc = 11
 						gs 'cum_manage'
-						facial += 1
+						
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 						'You keep sucking his dick for a while longer, before his breathing starts to quicken and you hear him making soft grunts. Looking up at him with your lips clasped around his member, you can see his eyes are closed in pleasure. You watch him closely, sucking harder and speeding up, making him twitch and moan before you suddenly feel a hot jet of liquid coat your tongue.'
 						'You quickly pull back, letting his member pop out of your mouth and smile up at him happily when you feel another jet of sperm immediately land on your forehead. You close your eyes in pleasure and let him cover the rest of your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
@@ -2185,7 +2185,7 @@ if $ARGS[0] = 'hotelsex':
 							*clr & cla
 							spafinloc = 11
 							gs 'cum_manage'
-							facial += 1
+							
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 							'After he fucks your ass for a while, you look him in the eyes and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 							if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'
@@ -2209,7 +2209,7 @@ if $ARGS[0] = 'hotelsex':
 								*clr & cla
 								spafinloc = 11
 								gs 'cum_manage'
-								facial += 1
+								
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/hotel/messyfacial.jpg"></center>'
 								'After he fucks your ass for a while, you turn to look over your shoulder and say "I want you to cum on my face." He grins and pulls his dick out of your hole before you slide off the bed and onto your knees. Not wasting any time, you start jerking him off and within seconds his load bursts out. You smile up at him happily, eyes closed as the first jet of sperm lands on your forehead. It takes a surprisingly long time for him to cover your face with his load, which <<$npc_firstname[$boy]>> does with great enthusiasm.'
 								if $ARGS[1] = 'paid': gs 'arousal', 'hj', 10, 'prostitution'

+ 1 - 618
locations/gdktoilet_womens.qsrc

@@ -17,629 +17,12 @@ if $ARGS[0] = 'womens':
 	'You walk in to the women''s restroom. You see some sinks and <a href="exec:gt ''mirror'', ''start''">mirrors</a>. You notice the last stall has its door wide open.'
 
 	act 'Leave': gt 'gdktoilet', 'start'
-	act 'Go to the last stall': gt 'gdktoilet_womens', 'emptystall'
+	act 'Go to the last stall': gt 'gloryhole', 'start'
 	
 	dynamic $tampon
 	dynamic $quickwash
 	dynamic $basin		
 end
 
-if $ARGS[0] = 'emptystall':
-	*clr & cla
-	minut +=5
-	menu_off = 1
-	gs 'stat'
-	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sitting.jpg"></center>'
-	if stat['bj'] = 0:
-		gs 'stat'
-		'You walk down to the last stall and sit down, next to the toilet is a rather large almost perfectly round hole. Puzzled, you wonder how it got there and why no one has fixed it.'
-	elseif stat['bj'] >= 1:
-		pcs_horny += 10
-		gs 'stat'
-		'You walk down to the last stall. The large almost perfectly round hole is still there. You wonder how many women have used that hole. You feel a little excited as you contemplate your next move.'
-	end
-	act 'Get Up':
-		cla
-		'You decide not to look in the hole and leave.'
-		act 'Leave': gt 'gdktoilet_womens', 'womens'
-	end
-	if pcs_horny >=40:
-		gs 'willpower', 'mast', 'self'
-		if will_cost <= pcs_willpwr:				
-			act 'Caress Yourself (<<will_cost>> Willpower)':
-				if pcs_inhib < 40:inhib_exp += rand(1,3)
-				*clr & cla
-				gs 'willpower', 'mast', 'self'
-				gs 'willpower', 'pay', 'self'
-				gs 'stat'
-				picrand = rand(1,2)
-				if picrand = 1:
-					*clr & cla
-					gs 'stat'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-					'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
-					$orgasm_or = 'no'
-					gs 'arousal', 'clit_finger', 4, 'masturbate'
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet_womens', 'contmast'
-				else
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-					'Feeling a bit turned on, you close the door to the stall and you sit down exposing your pussy and begin to run your clit.'
-					$orgasm_or = 'no'
-					gs 'arousal', 'clit_finger', 4, 'masturbate'
-					gs 'stat'
-					act 'Continue': gs 'gdktoilet_womens', 'contmast'
-				end
-			end
-		else
-			act 'Caress Yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	end
-	act 'Look at the Hole': gt 'gdktoilet_womens', 'hole'
-end
-
-if $ARGS[0] = 'contmast':
-	*clr & cla
-	pcs_mood += 5
-	menu_off = 1
-	if picrand = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/caress1.mp4"></video></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
-	end
-	if pcs_horny <= 60:
-		'You are starting to feel warm and you insert your finger in your pussy.'	
-	else
-		'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
-	end
-	$orgasm_or = 'no'
-	gs 'arousal', 'clit_finger', 4, 'masturbate'
-	gs 'stat'
-	gs 'willpower', 'mast', 'self'
-	if will_cost <= pcs_willpwr:
-		act 'Stop (<<will_cost>> Willpower)':
-			cla
-			minut += 1
-			gs 'willpower', 'mast', 'self'
-			gs 'willpower', 'pay', 'self'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'You decide that you shouldn''t continue and stop yourself from finishing.'
-			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
-		end
-	else
-		act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-	end
-	if pcs_horny >= 90:
-		act 'Climax':
-			*clr & cla
-			pcs_mood += 15
-			if pcs_inhib < 40: inhib_exp += rand(1,3)
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/orgasm.mp4"></video></center>'
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'As your pussy gets wet you pulls your panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
-			gs 'arousal', 'clit_finger', 2, 'masturbate'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave Stall':gt 'gdktoilet_womens', 'womens'
-		end
-	else
-		act 'Continue': gt 'gdktoilet_womens', 'contmast'
-	end
-end
-
-if $ARGS[0] = 'hole':
-	*clr & cla
-	menu_off = 1
-	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
-	if npc_dick[$npclastgenerated] < 6: npc_dick[$npclastgenerated] = 6
-	gs 'boyStat', $npclastgenerated
-	minut +=5
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghlooking.jpg"></center>'
-	wait 700
-	if gloryhole = 0 or rand(1,5) = 5:
-		act 'Sign the wall':
-			*clr & cla
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstartled.mp4"></video></center>'
-			'While looking through the hole you decided to write something on the wall just above it. While you were focused on writing, you didn''t notice the dick poking through the hole until the tip of it nearly went into your mouth. Startled you jerk away from the offending penis.'
-			
-			act 'Quickly leave the stall ':
-				*clr & cla
-				minut += 2
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
-				act'Leave': gt 'gdktoilet_womens', 'womens'
-			end
-
-			gs 'willpower', 'bj', 'self'
-			if will_cost <= pcs_willpwr:
-				act 'Suck it (<<will_cost>> Willpower)': 
-					gs 'willpower', 'bj', 'self'
-					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet_womens', 'blowjob'
-				end
-			else
-				act 'Suck it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-			gs 'willpower', 'hj', 'self', 'easy'
-			if pcs_throat = 0 and will_cost <= pcs_willpwr:
-				act 'Touch the shaft (<<will_cost>> Willpower)':
-					gs 'willpower', 'hj', 'self'
-					gs 'willpower', 'pay', 'self'
-					gt 'gdktoilet_womens', 'virgin'
-				end
-			elseif pcs_throat = 0 and will_cost > pcs_willpwr:
-				act 'Touch the shaft (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		end
-	elseif rand(1, 10) >= 7 - (ghnow * 2):
-		*clr & cla
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseemen.jpg"></center>'
-		'You look through the hole and see several men with their backs to you, using the urinals.'
-		act 'Don''t do it':
-			cla
-			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
-			act 'Leave':gt 'gdktoilet_womens', 'womens'
-		end
-		gs 'willpower', 'bj', 'self'
-		if will_cost <= pcs_willpwr:
-			act 'Stick your finger in the hole (<<will_cost>> Willpower)':
-				*clr & cla
-				money += 100
-				minut += 10
-				gs 'willpower', 'bj', 'self'
-				gs 'willpower', 'pay', 'self'
-				gs 'stat'
-				if gloryhole = 0:
-					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
-					'You put your finger in the hole hoping to entice a man to come over...'
-					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
-					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
-				elseif gloryhole > 0:
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ready.jpg"></center>'
-					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
-					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
-					act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
-				end
-				gs 'willpower', 'bj', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Stop (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'bj', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						gs 'stat'
-						'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
-						gs 'willpower', 'bj', 'resist', 'hard'
-						if will_cost <= pcs_willpwr:
-							act 'Take his money and Leave (<<will_cost>> Willpower)':
-								gs 'willpower', 'bj', 'resist', 'hard'
-								gs 'willpower', 'pay', 'resist'
-								gs 'stat'
-								gt 'gdktoilet_womens', 'rape'
-							end
-						else
-							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-						end
-						act 'Give back the money and Leave': money -= 100 & gt 'gdktoilet_womens', 'womens'
-						act 'Blow Him': gt 'gdktoilet_womens', 'blowjob'
-					end
-				else
-					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-			end
-		else
-			act 'Stick your finger in the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	else
-		*clr & cla
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghseenomen.jpg"></center>'
-		'Looking through the hole, you can see a row of urinals on the other side. The hole must be to the men''s room next door. You don''t see any men currently in there.'
-		act 'Leave': gt 'gdktoilet_womens', 'womens'
-		act 'Wait':
-			cla
-			'You decide stay and wait for someone to come.'
-			act 'Keep looking': gs 'gdktoilet_womens', 'hole'
-		end
-	end
-end
-
-if $ARGS[0] = 'virgin':
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghvirgin1.mp4"></video></center>'
-	'You tentatively reach out and gently touch the dick, half afraid to, but also half wanting to.'
-	
-	act 'Quickly leave the stall':
-		*clr & cla
-		minut += 2
-		gs 'stat'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
-		act'Leave':gt 'gdktoilet_womens', 'womens'
-	end
-	act 'Grab it':
-		*clr & cla
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfeeling.mp4"></video></center>'
-		'Biting your lip and deciding you want to feel it some more, you reach over again and grab it. You caress it with your hand, it is harder than you expected and warm to the touch, it almost feels like it is throbbing in your hand. Unexplained feelings of excitement run through your body. You hear through the wall the guy saying, "Stop playing with it and stroke it." "Huh?" You reply, not knowing why he wants you to stroke it. He replies, "Really, you don''t know? Just grab it with your hand and slide it up and down."'
-		gs 'arousal', 'foreplay', 5, 'unknown'
-		gs 'stat'
-		gs 'willpower', 'hj', 'resist', 'hard'
-		if will_cost <= pcs_willpwr:
-			act 'Stop (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'hj', 'resist', 'hard'
-				gs 'willpower', 'pay', 'resist'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/eww.mp4"></video></center>'
-				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop...? Hello? Are you still there? What the fuck!"'
-				act 'Quickly get out': gt 'gdktoilet_womens', 'womens'
-			end
-		else
-			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Slide your hand on his penis':
-			*clr & cla
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghstroke1.mp4"></video></center>'
-			'You decide to gently slide your hand on his dick. You feel his hard penis throb as you continue to slide your hand up and down. To your surprise you are really enjoying stroking the dick, your pussy starts to itch from the experience. As you get more turned on, you grab it with both hands and stroke it.'
-			gs 'arousal', 'hj', 5, 'unknown'
-			gs 'stat'
-			act 'Continue Stroking':
-				*clr & cla
-				minut +=5
-				gs 'arousal', 'end'
-				gs 'cum_call', 'hands', 'an unknown guy from the gloryhole'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghmastcum.mp4"></video></center>'
-				'Without any warning, hot white liquid spurts out the tip of his penis. You look at your hands, watching the sperm run down the back of your hand and down onto your arm. The man panting says, "That was," he takes another breath, "That was great."'
-				'You decide to lick a bit of the white liquid off your hand curiously wanting to know what it tastes like. It''s slimy and tastes tart.'
-				act 'Continue': gt 'gdktoilet_womens', 'emptystall'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'blowjob':
-	*clr & cla
-	guy += 1
-	ghnow += 1
-	gloryhole += 1
-	temp = rand(1,3)
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
-	'You wrap your lips around his dick and take his <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock in your mouth and start to suck it, you suck the cock enthusiastically.'
-	gs 'arousal', 'bj', 5, 'unknown', 'sub'
-	gs 'stat'
-	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gdktoilet_womens', 'ghsex'
-	act 'Continue to Suck':
-		*clr & cla
-		temp = rand(1, 3)
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghbj<<temp>>.mp4"></video></center>'
-		'You suck on his dick, bobbing your head, sometimes using your hands to stroke his shaft at the same time, other times your hands massage his balls. Before to long you hear the guy moan in pleasure, "I''m cuming."'
-		gs 'arousal', 'bj', 5, 'unknown', 'sub'
-		gs 'stat'
-		act 'Swallow':
-			*clr & cla
-			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'end'
-			gs 'stat'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'swallow', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Step back (<<will_cost>> Willpower)':
-				*clr & cla
-				facial += 1
-				gs 'willpower', 'swallow', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-				'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-			end
-		else
-			act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	end
-end
-
-if $ARGS[0] = 'ghsex':
-	*clr & cla
-	gs 'stat'
-	'<center><b><font color="maroon">Empty Stall</font></b></center>'
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghundress.mp4"></video></center>'
-	'You let go of him and quickly undress, once you are naked you start stroking him again while you line yourself up with his dick. You badly want to fuck him.'
-	gs 'arousal', 'hj', 5, 'unknown', 'sub'
-	gs 'stat'
-	if stat['anal'] > 0: act 'Ass':gt 'gdktoilet_womens', 'anal'
-	if stat['vaginal'] > 0: act 'Pussy':gt 'gdktoilet_womens', 'pussy2'
-end
-
-if $ARGS[0] = 'anal':
-	*clr & cla
-	'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghintoass.mp4"></video></center>'
-	'You rub your wet pussy and get your fingers nice and wet and then rub it on your asshole, you do the same to his dick, then you guide his <<npc_dick[$npclastgenerated]>>cm <<$npc_thdick[$npclastgenerated]>> cock into your ass. You feel his dick enter your tight ass, feelings of pain and pleasure rush through you.'
-	anal_slip += 4
-	gs 'arousal', 'clit_finger', 5, 'unknown', 'sub'
-	gs 'arousal', 'anal', 5, 'unknown', 'sub'
-	minut -= 5
-	gs 'stat'
-	act 'Keep Going':
-		*clr & cla
-		gs 'stat'
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanal.mp4"></video></center>'
-
-		if pcs_ass < 10:
-			'The pain doesn''t fade and instead it starts to hurt worse after a while and the pleasure starts to fade. You fuck his dick with your ass, at first taking him deeper and deeper, as you get faster and faster. As the pleasure fades and the pain gets worse you slow down and don''t take him as deep. You start to rub your clit to help with the sensation of pleasure. You consider stopping as the pain gets worse, but you can tell by the throbbing of his dick and ragged breathing he is about to cum and decided to keep it up so he can finish.'
-		elseif pcs_ass < 20:
-			'The pain fades slowly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
-		else
-			'The pain fades quickly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
-		end
-		gs 'arousal', 'anal', 5, 'unknown', 'sub'
-		gs 'stat'
-		
-		gs 'willpower', 'anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Stop (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/analpain.jpg"></center>'
-				'The pain becomes too much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
-				act 'Leave': gt 'gdktoilet_womens', 'womens'
-			end
-		else
-			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Let him cum in your ass':
-			*clr & cla
-			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'anal', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-			
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghanalcream1.mp4"></video></center>'
-			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
-
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'cum_inside_anal', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Let him cum all over your ass (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside_anal', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'anal', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcumonass.jpg"></center>'
-				'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
-
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-			end
-		else
-			act 'Let him cum all over your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		act 'Turn around, kneel and let him cum in your mouth':
-			*clr & cla
-			gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-			'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-			gs 'arousal', 'bj', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-
-			act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'swallow', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Turn around, kneel and let him cum on your face (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'swallow', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				facial += 1
-				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-				gs 'arousal', 'hj', 10, 'unknown', 'sub'
-				minut -= 9
-				gs 'arousal', 'end'
-				gs 'stat'
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-
-				act 'Get up': gt 'gdktoilet_womens', 'emptystall'
-			end
-		else
-			act 'Turn around, kneel and let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	end
-end
-
-if $ARGS[0] = 'pussy':
-	if prezik > 0:
-		dynamic $prezik
-		protect = 1
-		if preziktype = 2:
-			sexcontra = 7
-			'You take one of your sabotaged condoms and put it on the stranger.'
-		else
-			sexcontra = 3
-			'You take a condom and put it on the stranger''s dick.'
-		end
-	else
-		sexcontra = 0
-	end
-end
-
-if $ARGS[0] = 'pussy2':
-	*clr & cla
-	gs 'stat'
-	if protect = 1:
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsexcon.mp4"></video></center>'
-	else
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghsex.mp4"></video></center>'
-	end
-	gs 'gdktoilet_womens', 'pussy'
-	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
-	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
-	gs 'stat'
-	if protect ! 1:
-		act 'Allow him to cum inside':
-			*clr & cla
-			gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghcreampie.mp4"></video></center>'
-			'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
-			gs 'cuminsidereact', 'an unknown guy from the gloryhole'
-			gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
-			minut -= 9
-			gs 'arousal', 'end'
-			gs 'stat'
-
-			act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-		end
-		gs 'willpower', 'cum_inside', 'resist'
-		if will_cost <= pcs_willpwr:
-			act 'Quickly turn around and get on your knees (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'cum_inside', 'resist'
-				gs 'willpower', 'pay', 'resist'
-				gs 'stat'
-				act 'Let him cum in your mouth':
-					*clr & cla
-					gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghswallow.mp4"></video></center>'
-					'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
-					gs 'arousal', 'bj', 10, 'unknown', 'sub'
-					minut -= 9
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-				end
-				gs 'willpower', 'swallow', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Let him cum on your face (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'swallow', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						facial += 1
-						gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
-						gs 'arousal', 'hj', 10, 'unknown', 'sub'
-						minut -= 9
-						gs 'arousal', 'end'
-						gs 'stat'
-						'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/womens/sex/ghfacial.mp4"></video></center>'
-						'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
-
-						act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-					end
-				else
-					act 'Let him cum on your face (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-			end
-		else
-			act 'Quickly turn around and get on your knees (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	else
-		if sexcontra = 4:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
-		elseif sexcontra = 5:
-			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
-		else
-			'<<$boydesc>> groaned and you realized that he came in the condom.'
-		end
-		sexcontra = 0
-		protect = 0
-
-		act 'Get dressed': gt 'gdktoilet_womens', 'emptystall'
-	end
-end
-
-if $ARGS[0] = 'rape':
-	*clr & cla
-	menu_off = 1
-	gs 'stat'
-	dick = rand(9, 25)
-	if rand(1, 20) > 12:
-		gs 'npcgeneratec', 0, 'rapist', rand(19,45)
-		gs 'boyStat', $npclastgenerated
-		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
-		'Just as you are leaving the women''s restroom a naked man storms out of the men''s restroom and grabs you by the hair and drags you inside the men''s room. He rips off your top and forces you down on your knees, shoving his dick in your mouth, forcing you to suck his dick.'
-		act 'Continue':
-			*clr & cla
-			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape4.mp4"></video></center>'
-			'You bite down his dick, which makes him pull his dick out of your mouth. "Fine you little fucking cunt, we''ll do this the hard way." He lifts you up and forces you between two urinals with your face up against the wall. He roughly shoves his cock in your ass, the only lubrication is the bit of your saliva still on his dick. It feels like he is ripping your ass open, you cry and scream. He just jackhammers your ass balls deep, while holding you by the throat.'
-			gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
-			minut -= 5
-			gs 'stat'
-			act 'Continue':
-				*clr & cla
-				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape1.mp4"></video></center>'
-				'As you scream he reaches up and clamps a hand over your mouth to muffle your screams, he continues you pound your ass balls deep with his dick. Not relenting no matter how much you struggle or cry. "You think it''s funny bitch to steal a man''s hard earned money, well you won''t think it is so funny after I am done with you. I''m going to fuck your ass till it bleeds like your cunt."'
-				'He keeps ripping your ass up with his dick, the pain is unbearable, but there is nothing you can do about it. You really wish you hadn''t taken his money and kept it.'
-				gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
-				minut -= 5
-				gs 'stat'
-				act 'Continue':
-					*clr & cla
-					rape += 1
-					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
-					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
-					'Finally he pulls the dick out of your ass and forces you back to your knees, he shoves his dick back in your mouth and you can taste your own ass on his dick. He says to you. "You fucking bite me again bitch and I will call everyone I know and we will train fuck your ass for days." Afraid he is serious you suck his dick until he finally shoots his load in your mouth.'
-					gs 'arousal', 'bj', 10, 'unknown', 'sub', 'rough'
-					minut -= 5
-					gs 'arousal', 'end'
-					gs 'stat'
-					'With that he lets go of you and walks off in disgust.'
-					'Grabbing your clothes you get up and run out of the bathroom and run all the way home, only once you are several blocks away do you stop to put your clothes back on.'
-					act 'Leave':gt 'korrPar'
-				end
-			end
-		end
-	elseif (day >= 5 and week < 7) and (hour >= 20 and hour <= 23):
-		if music_on = 1:
-			$track_loop = 'sound/komb.mp3'
-			volume = 50
-			music_loop = 1
-			pl '<a href="exec: music_on = 0 & gt $loc">Turn off the music</a>'
-		else
-			music_loop = 0
-			close all
-			pl '<a href="exec: music_on = 1 & gt $loc">Play music</a>'
-		end
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club.jpg"></center>'
-		'You run into the crowd and start dancing to blend in. You hear a man yell out, "Where''s that bitch that took my money?" He storms off and you feel like it''s your lucky day today.'
-		act 'Dance':
-			*clr & cla
-			minut +=10
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/dance.jpg"></center>'
-			'You continue to dance until the man has left.'
-			act 'Stop': gt 'pav_disco'
-		end
-	else
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
-		'You run from the community center and don''t stop until you are back in the residential area'
-		act 'Catch your breath': minut += 5 & gt 'pav_residential'
-	end
-end
-
 --- gdktoilet_womens ---------------------------------
 

+ 644 - 0
locations/gloryhole.qsrc

@@ -0,0 +1,644 @@
+# gloryhole
+
+if $ARGS[0] = 'start':
+	*clr & cla
+	minut +=5
+	menu_off = 1
+	gs 'stat'
+	'<center><b><font color="maroon">Empty Stall</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/sitting.jpg"></center>'
+	if stat['bj'] = 0:
+		gs 'stat'
+		'You walk down to the last stall and sit down, next to the toilet is a rather large almost perfectly round hole. Puzzled, you wonder how it got there and why no one has fixed it.'
+	elseif stat['bj'] >= 1:
+		pcs_horny += 10
+		gs 'stat'
+		'You walk down to the last stall. The large almost perfectly round hole is still there. You wonder how many women have used that hole. You feel a little excited as you contemplate your next move.'
+	end
+	act 'Get Up':
+		cla
+		'You decide not to look in the hole and leave.'
+		act 'Leave': gt $loc, $loc_arg
+	end
+	if pcs_horny >=40:
+		gs 'willpower', 'mast', 'self'
+		if will_cost <= pcs_willpwr:				
+			act 'Caress Yourself (<<will_cost>> Willpower)':
+				if pcs_inhib < 40:inhib_exp += rand(1,3)
+				gs 'willpower', 'mast', 'self'
+				gs 'willpower', 'pay', 'self'
+				gt 'gloryhole', 'mast'
+			end
+		else
+			act 'Caress Yourself (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+	act 'Look at the Hole': gt 'gloryhole', 'hole'
+end
+
+if $ARGS[0] = 'mast':
+	if $ARGS[1] = '':
+		*clr & cla
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/caress1.mp4"></video></center>'
+		'Feeling a bit turned on, you close the door to the stall and you behind to reach down your underwear and start rubbing your clit.'
+		$orgasm_or = 'no'
+		gs 'arousal', 'clit_finger', 4, 'masturbate'
+		gs 'stat'
+		act 'Continue': gs 'gloryhole', 'mast', 'stage2'
+	end
+
+	if $ARGS[1] = 'stage2':
+		*clr & cla
+		pcs_mood += 5
+		menu_off = 1
+		if picrand = 1:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/caress1.mp4"></video></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/mast/mastr.jpg"></center>'
+		end
+		if pcs_horny <= 60:
+			'You are starting to feel warm and you insert your finger in your pussy.'	
+		else
+			'You are starting to feel warm and you insert your finger in your pussy. You keep fingering your pussy and before long you are breathing heavily and start to moan.'
+		end
+		$orgasm_or = 'no'
+		gs 'arousal', 'clit_finger', 4, 'masturbate'
+		gs 'stat'
+		gs 'willpower', 'mast', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				cla
+				minut += 1
+				gs 'willpower', 'mast', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'You decide that you shouldn''t continue and stop yourself from finishing.'
+				act 'Leave': gt $loc, $loc_arg
+			end
+		else
+			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		if pcs_horny >= 90:
+			act 'Climax':
+				*clr & cla
+				pcs_mood += 15
+				if pcs_inhib < 40: inhib_exp += rand(1,3)
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/orgasm.mp4"></video></center>'
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'As your pussy gets wet you pulls your panties down and slip your fingers inside of yourself. You start finger fucking yourself, with in a few minutes a powerful orgasm rocks your body. Leaving you gasping and trembling as you recover.'
+				gs 'arousal', 'clit_finger', 2, 'masturbate'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Leave': gt $loc, $loc_arg
+			end
+		else
+			act 'Continue': gt 'gloryhole', 'mast', 'stage2'
+		end
+	end
+end	
+
+if $ARGS[0] = 'hole':
+	*clr & cla
+	menu_off = 1
+	gs 'npcgeneratec', 0, 'unknown guy', rand(18,40)
+	if npc_dick[$npclastgenerated] < 6: npc_dick[$npclastgenerated] = 6
+	gs 'boyStat', $npclastgenerated
+	minut +=5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/looking.jpg"></center>'
+	wait 700
+	if gloryhole = 0 or rand(1,5) = 5:
+		act 'Sign the wall':
+			*clr & cla
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghstartled.mp4"></video></center>'
+			'While looking through the hole you decided to write something on the wall just above it. While you were focused on writing, you didn''t notice the dick poking through the hole until the tip of it nearly went into your mouth. Startled you jerk away from the offending penis.'
+			
+			act 'Quickly leave the stall ':
+				*clr & cla
+				minut += 2
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
+				'You shudder in disgust at the thought that some stranger''s dick was just practically in your mouth, you get up and quickly leave.'
+				act 'Leave': gt $loc, $loc_arg
+			end
+
+			gs 'willpower', 'bj', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Suck it (<<will_cost>> Willpower)': 
+					gs 'willpower', 'bj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gt 'gloryhole', 'blowjob'
+				end
+			else
+				act 'Suck it (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+			gs 'willpower', 'hj', 'self', 'easy'
+			if pcs_throat = 0 and will_cost <= pcs_willpwr:
+				act 'Touch the shaft (<<will_cost>> Willpower)':
+					gs 'willpower', 'hj', 'self'
+					gs 'willpower', 'pay', 'self'
+					gt 'gloryhole', 'virgin'
+				end
+			elseif pcs_throat = 0 and will_cost > pcs_willpwr:
+				act 'Touch the shaft (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		end
+	elseif rand(1, 10) >= 7 - (ghnow * 2):
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/see_men.jpg"></center>'
+		'You look through the hole and see several men with their backs to you, using the urinals.'
+		act 'Don''t do it':
+			cla
+			'You move away from the hole reconsidering what you were about to do and quickly leave the stall.'
+			act 'Leave': gt $loc, $loc_arg
+		end
+		gs 'willpower', 'bj', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Stick your finger in the hole (<<will_cost>> Willpower)':
+				*clr & cla
+				money += 100
+				minut += 10
+				gs 'willpower', 'bj', 'self'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				if gloryhole = 0:
+					'<center><img <<$set_imgh>> src="images/shared/sex/gloryhole/ghfinger'+rand(1,5)+'.jpg"></center>'
+					'You put your finger in the hole hoping to entice a man to come over...'
+					'The man slips 100 <b>₽</b> into the hole, and then puts his erect cock through the hole.'
+				elseif gloryhole > 0:
+					'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/ready.jpg"></center>'
+					'You poke your finger in the hole showing that you are ready to serve a man. Then you put your face close to the hole and open your mouth.'
+					'The stranger slips 100 <b>₽</b> into the hole, and then his erect cock pokes out of the hole.'
+				end
+				act 'Suck it': gt 'gloryhole', 'blowjob'
+				
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'bj', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'Seeing the dick poke through, you reconsider what you are about to do, do you really want to suck some strange man''s dick, through a hole in the bathroom for money?'
+						gs 'willpower', 'bj', 'resist', 'hard'
+						if will_cost <= pcs_willpwr:
+							act 'Take his money and Leave (<<will_cost>> Willpower)':
+								gs 'willpower', 'bj', 'resist', 'hard'
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								!gt 'gloryhole', 'rape'
+								gt $loc, $loc_arg
+							end
+						else
+							act 'Take his money and Leave (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Give back the money and Leave': 
+							money -= 100
+							gt $loc, $loc_arg
+						end
+						act 'Blow Him': gt 'gloryhole', 'blowjob'
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+			end
+		else
+			act 'Stick your finger in the hole (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	else
+		*clr & cla
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/action/see_none.jpg"></center>'
+		'Looking through the hole, you can see a row of urinals on the other side. The hole must be to the men''s room next door. You don''t see any men currently in there.'
+		act 'Leave': gt $loc, $loc_arg
+		act 'Wait':
+			cla
+			'You decide stay and wait for someone to come.'
+			act 'Keep looking': gs 'gloryhole', 'hole'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin':
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghvirgin1.mp4"></video></center>'
+	'You tentatively reach out and gently touch the dick, half afraid to, but also half wanting to.'
+	
+	act 'Quickly leave the stall':
+		*clr & cla
+		minut += 2
+		gs 'stat'
+		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
+		'You shudder in disgust at the thought that you were just touching some stranger''s dick. You get up and quickly leave.'
+		act 'Leave': gt $loc, $loc_arg
+	end
+	act 'Grab it':
+		*clr & cla
+		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfeeling.mp4"></video></center>'
+		'Biting your lip and deciding you want to feel it some more, you reach over again and grab it. You caress it with your hand, it is harder than you expected and warm to the touch, it almost feels like it is throbbing in your hand. Unexplained feelings of excitement run through your body. You hear through the wall the guy saying, "Stop playing with it and stroke it." "Huh?" You reply, not knowing why he wants you to stroke it. He replies, "Really, you don''t know? Just grab it with your hand and slide it up and down."'
+		gs 'arousal', 'foreplay', 5, 'unknown'
+		gs 'stat'
+		gs 'willpower', 'hj', 'resist', 'hard'
+		if will_cost <= pcs_willpwr:
+			act 'Stop (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'hj', 'resist', 'hard'
+				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/eww.mp4"></video></center>'
+				'You let go of him, wondering what possessed you to grab some stranger''s dick in the first place. You quickly leave the stall, you can hear the guy. "Hey why did you stop...? Hello? Are you still there? What the fuck!"'
+				act 'Quickly get out': gt $loc, $loc_arg
+			end
+		else
+			act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Slide your hand on his penis':
+			*clr & cla
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghstroke1.mp4"></video></center>'
+			'You decide to gently slide your hand on his dick. You feel his hard penis throb as you continue to slide your hand up and down. To your surprise you are really enjoying stroking the dick, your pussy starts to itch from the experience. As you get more turned on, you grab it with both hands and stroke it.'
+			gs 'arousal', 'hj', 5, 'unknown'
+			gs 'stat'
+			act 'Continue Stroking':
+				*clr & cla
+				minut +=5
+				gs 'arousal', 'end'
+				gs 'cum_call', 'hands', 'an unknown guy from the gloryhole'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghmastcum.mp4"></video></center>'
+				'Without any warning, hot white liquid spurts out the tip of his penis. You look at your hands, watching the sperm run down the back of your hand and down onto your arm. The man panting says, "That was," he takes another breath, "That was great."'
+				'You decide to lick a bit of the white liquid off your hand curiously wanting to know what it tastes like. It''s slimy and tastes tart.'
+				act 'Continue': gt 'gloryhole', 'start'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'blowjob':
+	*clr & cla
+	guy += 1
+	ghnow += 1
+	stat['gloryhole'] += 1
+	temp = rand(1,5)
+
+	$bjVideoSource = 'images/locations/shared/gloryhole/sex/dressed'
+	'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
+	'You wrap your lips around his dick and take his <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock in your mouth and start to suck it, you suck the cock enthusiastically.'
+	gs 'arousal', 'bj', 5, 'unknown', 'sub'
+	gs 'stat'
+	if stat['vaginal'] > 0 or stat['anal'] > 0:act 'Undress':gt 'gloryhole', 'ghsex'
+	act 'Continue to Suck':
+		*clr & cla
+		'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
+		'You suck on his dick, bobbing your head, sometimes using your hands to stroke his shaft at the same time, other times your hands massage his balls. Before to long you hear the guy moan in pleasure, "I''m cuming."'
+		gs 'arousal', 'bj', 5, 'unknown', 'sub'
+		gs 'stat'
+		
+		act 'Keep sucking':
+			*clr & cla
+			'<center><video autoplay loop src="<<$bjVideoSource>>/bj<<rand(1,5)>>.mp4"></video></center>'
+			'Despite what he says you keep sucking his dick, you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth.'
+			act 'Swallow':
+				cla
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'You gather a mouthful of sperm, and then swallow it. Their sperm has a sticky and sharp taste which makes you grimace.'
+				act 'Get up': gt 'gloryhole', 'start'
+			end
+
+			act 'Spit out':
+				cla
+				gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'end'
+				gs 'stat'
+				'You decide to spit it all out.'
+				act 'Get up': gt 'gloryhole', 'start'
+			end
+		end
+		gs 'willpower', 'swallow', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'Step back (<<will_cost>> Willpower)':
+					*clr & cla
+					
+					gs 'willpower', 'swallow', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+					gs 'arousal', 'end'
+					gs 'stat'
+					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+					'You pull your mouth off his dick but keep jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+					act 'Get up': gt 'gloryhole', 'start'
+				end
+			else
+				act 'Step back (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		
+	end
+end
+
+if $ARGS[0] = 'ghsex':
+	*clr & cla
+	gs 'stat'
+	'<center><b><font color="maroon">Empty Stall</font></b></center>'
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/action/undress.mp4"></video></center>'
+	'You let go of him and quickly undress, once you are naked you start stroking him again while you line yourself up with his dick. You badly want to fuck him.'
+	gs 'arousal', 'hj', 5, 'unknown', 'sub'
+	gs 'stat'
+	if stat['anal'] > 0: act 'Ass':gt 'gloryhole', 'anal'
+	if stat['vaginal'] > 0: 
+		if prezik > 0: act "Use a condom": gt 'gloryhole', 'condom'
+
+		gs 'willpower', 'sex', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Pussy (<<will_cost>> Willpower)':
+				gs 'willpower', 'pay', 'self'
+				sexcontra = 0
+				gt 'gloryhole', 'pussy'
+			end
+		else:
+			act 'Pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+	end
+end
+
+if $ARGS[0] = 'condom':
+	*clr & cla
+	gs 'stat'
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/condom_on.mp4"></video></center>'
+	dynamic $prezik
+	protect = 1
+	if preziktype = 2:
+		sexcontra = 7
+		'You take one of your sabotaged condoms and put it on the stranger.'
+	else
+		sexcontra = 3
+		'You take a condom and put it on the stranger''s dick.'
+	end
+	act 'Continue': gt 'gloryhole', 'pussy'
+end
+
+if $ARGS[0] = 'pussy':
+	*clr & cla
+	gs 'stat'
+
+	temp = rand(1,5)
+	if rand(0,2) > 0:
+		'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/sex<<temp>>.mp4"></video></center>'
+	else:
+		if protect = 1:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/vagcon<<temp>>.mp4"></video></center>'
+		else:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/vag<<temp>>.mp4"></video></center>'
+		end
+	end
+	
+	'You turn around and back up to the hole, you use one hand to guide his dick into your pussy. The <<npc_dick[$npclastgenerated]>>cm long <<$npc_thdick[$npclastgenerated]>> cock slides easily into your wet pussy, causing you to moan in pleasure as you move your hips back and forth. You start humping his dick with fast movements, taking the full length of him balls deep into you, which causes him to moan loudly. After several minutes, you hear him on the other side of the wall yell out, "I''m gonna cum."'
+	gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+	gs 'stat'
+	if protect ! 1:
+		gs 'dinSex', 'std_trigger'
+		
+		if tabletkicheck  = 0:
+			gs 'willpower', 'cum_inside', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Allow him to cum inside (<<will_cost>> WillPower)':
+					*clr & cla
+					gs 'willpower', 'pay', 'resist'
+					gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghcreampie.mp4"></video></center>'
+					'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
+					gs 'cuminsidereact', 'an unknown guy from the gloryhole'
+					gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+					minut -= 9
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Get dressed': gt 'gloryhole', 'start'
+				end
+			else
+				act 'Allow him to cum inside (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else:
+			act 'Allow him to cum inside':
+				*clr & cla
+				gs 'cum_call', 'vaginal', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghcreampie.mp4"></video></center>'
+				'Instead of pulling away, you moan "Inside me, please," and push yourself hard against the opening in the wall. You feel his hot sperm fill your pussy in spurt after spurt. When you finally pull yourself off him, you can feel the sperm leaking out of your pussy.'
+				gs 'cuminsidereact', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'vaginal', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+		end
+		
+		act 'Quickly turn around and get on your knees':
+			*clr & cla
+			gs 'stat'
+			act 'Let him cum in your mouth':
+				*clr & cla
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
+				'Once down on your knees you take his dick into your mouth and start sucking him. You are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+				gs 'arousal', 'bj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+			act 'Let him cum on your face':
+				*clr & cla
+				
+				gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+				gs 'arousal', 'hj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+				'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+				act 'Get dressed': gt 'gloryhole', 'start'
+			end
+		end
+	else
+		if sexcontra = 4:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom burst."'
+		elseif sexcontra = 5:
+			'You pull off of <<$boydesc>> and look at his dick and think, "Oh shit! The condom is missing!"'
+		else
+			'<<$boydesc>> groaned and you realized that he came in the condom.'
+		end
+		sexcontra = 0
+		protect = 0
+
+		act 'Get dressed': gt 'gloryhole', 'start'
+	end
+end
+
+if $ARGS[0] = 'anal':
+	*clr & cla
+	'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghintoass.mp4"></video></center>'
+	'You rub your wet pussy and get your fingers nice and wet and then rub it on your asshole, you do the same to his dick, then you guide his <<npc_dick[$npclastgenerated]>>cm <<$npc_thdick[$npclastgenerated]>> cock into your ass. You feel his dick enter your tight ass, feelings of pain and pleasure rush through you.'
+	anal_slip += 4
+	gs 'arousal', 'clit_finger', 5, 'unknown', 'sub'
+	gs 'arousal', 'anal', 5, 'unknown', 'sub'
+	minut -= 5
+	gs 'stat'
+	act 'Keep Going':
+		*clr & cla
+		gs 'stat'
+		temp = rand(1,5)
+		if rand(0,2) > 0:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/sex<<temp>>.mp4"></video></center>'
+		else:
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/anal<<temp>>.mp4"></video></center>'
+		end
+		if pcs_ass < 10:
+			'The pain doesn''t fade and instead it starts to hurt worse after a while and the pleasure starts to fade. You fuck his dick with your ass, at first taking him deeper and deeper, as you get faster and faster. As the pleasure fades and the pain gets worse you slow down and don''t take him as deep. You start to rub your clit to help with the sensation of pleasure. You consider stopping as the pain gets worse, but you can tell by the throbbing of his dick and ragged breathing he is about to cum and decided to keep it up so he can finish.'
+		elseif pcs_ass < 20:
+			'The pain fades slowly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
+		else
+			'The pain fades quickly and soon all you feel pleasure. You fuck his dick with your ass, taking him deeper and deeper, as you get faster and faster, you start to rub your clit as you feel yourself getting close to climax. You can tell by the throbbing of his dick and ragged breathing he is about to cum.'
+		end
+		gs 'arousal', 'anal', 5, 'unknown', 'sub'
+		gs 'stat'
+		
+		if pcs_ass < 10:
+				if will_cost <= pcs_willpwr:
+					act 'Stop (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'anal', 'resist'
+						gs 'willpower', 'pay', 'resist'
+						gs 'arousal', 'end'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/analpain.jpg"></center>'
+						'The pain becomes too much and you can''t take it anymore, on the verge of tears you stop and pull your ass off his dick. You quickly get dressed and leave, you wonder if it was supposed to hurt that much. You can hear the guy yelling at you for having stopped before he finished.'
+						act 'Leave': gt $loc, $loc_arg
+					end
+				else
+					act 'Stop (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+		end
+		gs 'willpower', 'anal', 'resist'
+		
+
+		act 'Let him cum in your ass':
+			*clr & cla
+			gs 'cum_call', 'anus', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+			
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghanalcream1.mp4"></video></center>'
+			'You feel his dick throb as he shoots his load of sperm deep in your ass, filling it up. When you pull your ass off his dick, you feel the hot sperm spilling out of your gaping asshole.'
+
+			act 'Get up': gt 'gloryhole', 'start'
+		end
+
+		act 'Let him cum all over your ass':
+			*clr & cla
+			gs 'cum_call', 'butt', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+			
+			'<center><img <<$set_imgh>> src="images/locations/shared/gloryhole/sex/ghcumonass.jpg"></center>'
+			'You pull your ass away, feeling his cock slip out of your asshole, just as you feel hot splashing of cum landing on your butt, coating your cheeks and running down the crack of your ass.'
+
+			act 'Get up': gt 'gloryhole', 'start'
+		end
+
+		gs 'willpower', 'swallow', 'resist'
+		if will_cost <= pcs_willpwr:
+			act 'Turn around, kneel and let him cum in your mouth (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'swallow', 'resist'
+				gs 'willpower', 'pay', 'resist'
+				gs 'cum_call', 'mouth_swallow', 'an unknown guy from the gloryhole'
+				'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghswallow.mp4"></video></center>'
+				'Once down on your knees you take his dick into your mouth and start sucking him, tasting your own ass on his dick. But you are looking forward to him filling your mouth up with his tasty sperm. Moments later hot spurts of cum fill your mouth, you savor the taste of it in your mouth, before you swallow it all down.'
+				gs 'arousal', 'bj', 10, 'unknown', 'sub'
+				minut -= 9
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				act 'Get up': gt 'gloryhole', 'start'
+			end
+		else
+			act 'Turn around, kneel and let him cum in your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+
+		act 'Turn around, kneel and let him cum on your face':
+			*clr & cla
+			
+			gs 'cum_call', 'face', 'an unknown guy from the gloryhole'
+			gs 'arousal', 'hj', 10, 'unknown', 'sub'
+			minut -= 9
+			gs 'arousal', 'end'
+			gs 'stat'
+			'<center><video autoplay loop src="images/locations/shared/gloryhole/sex/ghfacial.mp4"></video></center>'
+			'You put your face near his dick and start jerking him off, shortly later, hot spurts of cum start flying and covering your face.'
+
+			act 'Get up': gt 'gloryhole', 'start'
+		end
+
+	end
+end
+
+!{if $ARGS[0] = 'rape':
+	*clr & cla
+	menu_off = 1
+	gs 'stat'
+	dick = rand(9, 25)
+	if rand(1, 20) > 12:
+		gs 'npcgeneratec', 0, 'rapist', rand(19,45)
+		gs 'boyStat', $npclastgenerated
+		'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape3.mp4"></video></center>'
+		'Just as you are leaving the women''s restroom a naked man storms out of the men''s restroom and grabs you by the hair and drags you inside the men''s room. He rips off your top and forces you down on your knees, shoving his dick in your mouth, forcing you to suck his dick.'
+		act 'Continue':
+			*clr & cla
+			'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape4.mp4"></video></center>'
+			'You bite down his dick, which makes him pull his dick out of your mouth. "Fine you little fucking cunt, we''ll do this the hard way." He lifts you up and forces you between two urinals with your face up against the wall. He roughly shoves his cock in your ass, the only lubrication is the bit of your saliva still on his dick. It feels like he is ripping your ass open, you cry and scream. He just jackhammers your ass balls deep, while holding you by the throat.'
+			gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
+			minut -= 5
+			gs 'stat'
+			act 'Continue':
+				*clr & cla
+				'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/mensrape1.mp4"></video></center>'
+				'As you scream he reaches up and clamps a hand over your mouth to muffle your screams, he continues you pound your ass balls deep with his dick. Not relenting no matter how much you struggle or cry. "You think it''s funny bitch to steal a man''s hard earned money, well you won''t think it is so funny after I am done with you. I''m going to fuck your ass till it bleeds like your cunt."'
+				'He keeps ripping your ass up with his dick, the pain is unbearable, but there is nothing you can do about it. You really wish you hadn''t taken his money and kept it.'
+				gs 'arousal', 'anal', 10, 'unknown', 'sub', 'rough'
+				minut -= 5
+				gs 'stat'
+				act 'Continue':
+					*clr & cla
+					rape += 1
+					gs 'cum_call', 'mouth', 'an unknown guy from the gloryhole'
+					'<center><video autoplay loop src="images/locations/pavlovsk/community/bathroom/mens/sex/cumspit.mp4"></video></center>'
+					'Finally he pulls the dick out of your ass and forces you back to your knees, he shoves his dick back in your mouth and you can taste your own ass on his dick. He says to you. "You fucking bite me again bitch and I will call everyone I know and we will train fuck your ass for days." Afraid he is serious you suck his dick until he finally shoots his load in your mouth.'
+					gs 'arousal', 'bj', 10, 'unknown', 'sub', 'rough'
+					minut -= 5
+					gs 'arousal', 'end'
+					gs 'stat'
+					'With that he lets go of you and walks off in disgust.'
+					'Grabbing your clothes you get up and run out of the bathroom and run all the way home, only once you are several blocks away do you stop to put your clothes back on.'
+					act 'Leave':gt 'korrPar'
+				end
+			end
+		end
+	else
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
+		'You run from the community center and don''t stop until you are back in the residential area'
+		act 'Catch your breath': minut += 5 & gt 'pav_residential'
+	end
+end}
+
+--- gloryhole ---------------------------------

+ 1 - 1
locations/gopnew.qsrc

@@ -733,7 +733,7 @@ if $ARGS[0] = 'tf':
 		act 'Continue':
 			cla & *clr
 			minut += 3
-			facial += 1
+			
 			gs 'boyStat', 'A102'
 			spafinloc = 11
 			gs 'cum_manage'

+ 3 - 3
locations/gopskver.qsrc

@@ -668,7 +668,7 @@ if $ARGS[0] = 'BjBeerDouble':
 	pcs_throat = pcs_throat + 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'
@@ -741,7 +741,7 @@ if $ARGS[0] = 'BjBeerPhone':
 	pcs_throat += 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'
@@ -782,7 +782,7 @@ if $ARGS[0] = 'BjBeerPalevo':
 	pcs_throat = pcs_throat + 1
 	spafinloc = 11
 	gs 'cum_manage'
-	facial += 1
+	
 	minut += 10
 	if pcs_makeup > 1: pcs_makeup = 0
 	gs 'stat'

+ 2 - 2
locations/grades.qsrc

@@ -1,4 +1,4 @@
-#grades
+# grades
 
 !!For handling the grades for classes in school, university adn other places the main character teke classes.
 
@@ -320,4 +320,4 @@ if $ARGS[0] = 'grade above':
 end
 
 
---- grades ---------------------------------
+--- grades ---------------------------------

+ 3 - 3
locations/gschool_chats.qsrc

@@ -1,5 +1,5 @@
 # gschool_chats
-!2021/05/02
+!!2021/05/02
 
 if $ARGS[0] = 'nerds':
 	*clr & cla
@@ -44,10 +44,10 @@ if $ARGS[0] = 'nerds':
 				if soniaPS > 0: gs 'npc_relationship', 'modify', 'A25', 'like'
 				gs 'npc_relationship', 'modify', 'A159', 'like'
 				if grupTipe = 3:
-					'You go to the classroom that you and your fellow nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects, as usual. Several of them look up at you as you walk in. A couple of the boys, especially Feofan, Artem and Petka look at you longer than the rest and Julia''s eyes also seem to linger on you for just a bit longer.'
+					'You enter the classroom that you and your fellow nerds like to hang out. You find them, as usual, all gathered around a table talking and engaging in various hobby projects. Few of them look up just as you walk closer. A couple of the boys, Feofan and Artem, are struggling to conceal their disapproving stares about your choosen uniform. Julia''s eyes also seem to linger on your attire for just a bit longer and you don''t feel her gaze is all that welcoming either.'
 					'Artem, Petka, Julia, Natasha, Zinaida, Evgeny, Feofan and Gerasim are sitting around some tables they''ve moved together.'
 				else
-					'You go to one of the classrooms that the nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects. Several of them look up at you as you walk in. A couple of the boys, especially Feofan, Artem and Petka look at you longer than the rest and Julia''s eyes also seem to linger on you for just a bit longer.'
+					'You go to the classrooms that the nerdy students like to hang out. You find them, as always, all nerding around a table talking and engaging in various personal projects. Several of them look up just as you walk closer. A couple of the boys, Artem and Petka, both seem to be struggling to hide their judgmental stares about your choice of uniform. You don''t find the look Julia has in her eyes all that comforting either.'
 				end
 				*nl
 				gs 'gschool_groups', 'nerds'

Some files were not shown because too many files changed in this diff