1
0

130 Commits 91425bcb16 ... 64ac6c1e23

Autor SHA1 Mensagem Data
  Thavus 64ac6c1e23 Added therapist hairstyle event. há 2 anos atrás
  Thavus 915c672202 Merge https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Kevin_Smarts 0ed711a688 Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Kevin_Smarts 88c41aed9a [added] some new school gossip from nutluck há 2 anos atrás
  Vengeance11 045c32ff07 Proofreading and hornguy's addition to Albina chat. há 2 anos atrás
  Kevin_Smarts 28529dedff Merge remote-tracking branch 'Gwen/master' há 2 anos atrás
  bgkjdgbizgblzdgbr 9a10f9b001 [fixed] The time for bieng late for the Threesome with Anya and Roman are more consistant and Roman does not disapear the moment you interact with the door but stays untill 18. há 2 anos atrás
  Vengeance11 d0a6104513 Updated Sveta perving on Albina so it sounds less stiff há 2 anos atrás
  Kevin_Smarts 6c50a9871b [changed] Unlocked a whole bunch of things that were school girl start only including grandparents stuff in the village. Parent's home still locked though há 2 anos atrás
  Kevin_Smarts ca2536646f [fixed] Best make sure you own the dog too há 2 anos atrás
  Kevin_Smarts 01e2ccb68f [fixed] Rex variables in village where still old ones from the mod which created an endless loop há 2 anos atrás
  Gwen 22cbdab94f Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Gwen fc018edd28 [Changed] edited clothing description há 2 anos atrás
  Kevin_Smarts af5c0ec24c [changed] Renamed scandalicious to newer format há 2 anos atrás
  Kevin_Smarts 3d5ec4b7e8 Merge remote-tracking branch 'Gwen/master' há 2 anos atrás
  Kevin_Smarts c5740257b1 [changed] Number of dresses as per instruction from Gwen há 2 anos atrás
  Gwen 6ca1820e18 Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Gwen ac3ff43a08 [Changed] new addition items for Scandalicious há 2 anos atrás
  Kevin_Smarts 58534c8db1 [fixed] Better checks for magic start or not to prevent magic bleedthrough in to non-magic world há 2 anos atrás
  Kevin_Smarts aaffa45776 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts 0b7f1918e3 Merge remote-tracking branch 'Anya/master' há 2 anos atrás
  bgkjdgbizgblzdgbr f403dbabe7 [fixed] Typo in varibale name blocked progression of Katja's quest. há 2 anos atrás
  ADCSux 20fc8cdf23 Removed unnecessary Appearance call in intro_initialization há 2 anos atrás
  ADCSux 922d199aa8 Merge branch 'master' into working há 2 anos atrás
  ADCSux 22dcb730eb Added partially skin feature (need testing) há 2 anos atrás
  Anya 8d32b2ce6f [fixed] typo and a tweak. Not supposed to be a question. há 2 anos atrás
  bgkjdgbizgblzdgbr 41323facb5 [fixed] Somebody updated Katja's talk about blow jobs using variable that have been replaced since 8.5. Also did not actaully but the important increase of katja hornyness for talking about blowjobs a second time and hence removing an inportant part of the way you get her to engage in sexual acts. há 2 anos atrás
  bgkjdgbizgblzdgbr cdaa4c775b Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Kevin_Smarts 7915d1b662 [fixed] redundant end há 2 anos atrás
  Kevin_Smarts a049a7b259 Merge remote-tracking branch 'hornguy6/master' há 2 anos atrás
  Kevin_Smarts 25ce9f39c1 [fixed] Wrong file name in gotos for party event há 2 anos atrás
  hornguy6 37504c3555 [added] better blowjob talk with Katja há 2 anos atrás
  Kevin_Smarts 6740655ba0 Merge remote-tracking branch 'hornguy6/master' há 2 anos atrás
  hornguy6 1706e82f08 [fixed] blocked something that should have been blocked há 2 anos atrás
  Kevin_Smarts a06f673ca4 [fixed] Gad start showing Pav image for SG TG start há 2 anos atrás
  Vengeance11 0145037ccd Proofreading há 2 anos atrás
  Kevin_Smarts c522a514eb [fixed] Blocked off extra rooms at talent agency as they are not in use yet há 2 anos atrás
  rachels a17805ef16 fix typo há 2 anos atrás
  Kevin_Smarts 6b8f3d2028 [fixes] Setting all group values for custom option and some fixes to the sg_tg start relating to customization há 2 anos atrás
  Kevin_Smarts 10f4909976 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  bgkjdgbizgblzdgbr 3fb7c0d906 Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  bgkjdgbizgblzdgbr cc43beca6d [fixed/added] Fixed it so that Katja will send you home at 20. Added an energy drink to beverages, still no places it is used yet. há 2 anos atrás
  Kevin_Smarts 692383a809 [fixed] Could keep having hookup sex to try and get orgasm when under hypno curse to make it hard to cum so removed option if cursed há 2 anos atrás
  Kevin_Smarts 4b35c5da3f Merge remote-tracking branch 'Anya/master' há 2 anos atrás
  Kevin_Smarts 2a9fee2433 [fixed] Action was pointing nowhere so merged it with the one that went to correct place há 2 anos atrás
  Kevin_Smarts 6dd967507e [fixed] Appearance set before starting clothing now so hip size is set and SG_TG can do more than one customisation há 2 anos atrás
  Anya 1526e18d39 [Changed] Jocks chats updated há 2 anos atrás
  bgkjdgbizgblzdgbr aa42c0ac56 [fixed] The return locations for the mirror was not set at the bathroom at Rex party. há 2 anos atrás
  Vengeance11 3f5954acc7 Gave the city mistress files a clean up há 2 anos atrás
  Kevin_Smarts 1c28d0c237 [fixed] unclosed string in a comment há 2 anos atrás
  Kevin_Smarts bb1cdeb1af Merge remote-tracking branch 'Anya/master' há 2 anos atrás
  Kevin_Smarts 5f019991e3 [fixed] Bad image path spotted by itslydiabxtch há 2 anos atrás
  Anya 0e508145ee [fixed] minor typo há 2 anos atrás
  Kevin_Smarts aa25d1f58e [fixed] Setting for starting week and time plus removed overwrite of birthday info, thanks to Jimmybob há 2 anos atrás
  Kevin_Smarts 973bd2dcb9 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts 99baeff5d4 Merge remote-tracking branch 'Gwen/master' há 2 anos atrás
  Kevin_Smarts dac4bfaeec [removed] old variables that are not used anywhere há 2 anos atrás
  bgkjdgbizgblzdgbr a0510f9142 [fixed] The order of the clauses were wrong wich could make the university start a week early is the 21 of Agust is a Monday. há 2 anos atrás
  Kevin_Smarts e1e2e69a27 [changed] Number of outfits increase as per Gwen's request há 2 anos atrás
  Kevin_Smarts 6e384f0626 [moved] counter for missing work at Kats to same place as message warning you in hope that it'll work better than the old single test that was claerly not doing it right há 2 anos atrás
  Gwen ea44d5a48e Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Gwen 1f66bb9b8e [Changed] re-revamp of the Scandalicious outfits and values for new leotards in Danilovich há 2 anos atrás
  Kevin_Smarts fabec3d574 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts fff56716ba [fixed] Not sure how but this seems to get itself not set back to 0 in intro for some. Belt and braces time. há 2 anos atrás
  Kevin_Smarts 3035a00b41 [fixed] Text not updated when pay changed há 2 anos atrás
  bgkjdgbizgblzdgbr 8b5517121a [text edites] Fixed some typos in the universodt files reported on the forum. há 2 anos atrás
  Kevin_Smarts c13c9965a8 Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife há 2 anos atrás
  Kevin_Smarts b00fe636ef [fixed] Reading the notice in the lift in pav complex didn't track current floor so you always ended up on the ground floor. há 2 anos atrás
  rachels 8904f83f27 Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife.git há 2 anos atrás
  rachels c87c41ff5d put the nerd games in the action há 2 anos atrás
  Kevin_Smarts c604032fd7 [added] Uni TG intro which uses much of the regular uni intro so might not behave as intended há 2 anos atrás
  bgkjdgbizgblzdgbr 93a7f124ce [fixed] The variable for allowing sex after homework was wrong, so you could do it before sha is actaully trained in licking pussy. há 2 anos atrás
  bgkjdgbizgblzdgbr 0fc877c4bb [fixed] Natashas school break forced sex only checke if you had lend her money, not if she actally had to pay them back yet. há 2 anos atrás
  Netuttki 88066b8fbb Fixed an issue with the computer used at other locations há 2 anos atrás
  Netuttki 5277566083 Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  ADCSux 1092192304 Merge branch 'master' into working há 2 anos atrás
  Kevin_Smarts 484a0e32b6 [added] new metro events from nutluck and Piggie há 2 anos atrás
  Netuttki 662a23427e Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  Kevin_Smarts f587c92257 [fixed] Terminology correction as my skirt length expertise is offensively bad há 2 anos atrás
  Kevin_Smarts e0357711fd Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts 94a1c4ba09 [fixed] Set return locations wrong way around há 2 anos atrás
  Kevin_Smarts 384fea00d1 [fixed] Phone can only ring if the menu is on so it can't interupt events há 2 anos atrás
  bgkjdgbizgblzdgbr 55a3898a66 [changed] Chenged the Katja Ivan school scene to be an anal only scene. New sexscene by nutluck. há 2 anos atrás
  Kevin_Smarts 52a5d1d9f3 [fixed] Tidied up the tables in the intro customisation há 2 anos atrás
  Kevin_Smarts ccf48e20bc [fixed] Use of $loc_arg in customisation overwriting return code há 2 anos atrás
  Kevin_Smarts d74be4f19b [fixed] Additional gt messing up city starts há 2 anos atrás
  Kevin_Smarts 67bc51be9f [fixed] Casting file not on .qproj há 2 anos atrás
  Kevin_Smarts 2a33dc28d4 [changed] Increased number of purses in Nerdvana as per request from Gwen há 2 anos atrás
  Kevin_Smarts 55541747b9 [changed] Just neateed up and sped up the tailor, plus made both tailors aware of you current clothing if it already fits well há 2 anos atrás
  bgkjdgbizgblzdgbr dff852a1b9 [changed] Changed the running at the school sport facility to use the proper exercise gosub. há 2 anos atrás
  Kevin_Smarts 0931d1820f [fixed] Cum eater was using old swallow variable and not stat['swallow'] há 2 anos atrás
  Kevin_Smarts def72d2493 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts b510cc911b Merge remote-tracking branch 'netuttki/master' há 2 anos atrás
  Kevin_Smarts 2a576b6f33 [changed] Small cosmetic change in sg_tg intro há 2 anos atrás
  bgkjdgbizgblzdgbr 5e0a877c7d [chenged] Change some images that weren't appropriate. (Chois of images by nutluck) há 2 anos atrás
  bgkjdgbizgblzdgbr 98e5ae9eda [fixxed] Missung *clr & cla há 2 anos atrás
  Netuttki 8dfaddf7a9 Fixed the remaining storyline ! 0 check for Uncle Misha há 2 anos atrás
  Netuttki ce0367d225 Made the 'work_floor' part more sensible há 2 anos atrás
  Netuttki 71663951a1 Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  Kevin_Smarts 6baa0da387 [fixed] redundant end and missing colon há 2 anos atrás
  Netuttki 6057638937 Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  Anya c83d5aa4e2 [Changed] Made the Mom relationship choice in the new intros a little more obvious há 2 anos atrás
  Kevin_Smarts c174ec786f Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Vengeance11 2c8dfaec33 Minor text edits há 2 anos atrás
  Netuttki 91f3624ebb Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  bgkjdgbizgblzdgbr 5e76bc62b7 [fixed] Missing *clr & cla could lead to multiple pictures being showen on the screen. há 2 anos atrás
  Kevin_Smarts 4635cf8262 [fixed] Uses of old check for swimwear purged with fire!!! há 2 anos atrás
  Netuttki 8adbf64b4b Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  Kevin_Smarts 06c8b5744d Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  Kevin_Smarts 3321c39519 [fixed] Couldn't do sg_m start as I hadn't added split and was overwriting the start type há 2 anos atrás
  bgkjdgbizgblzdgbr 7d8217db3b [fixed/added] Some grade combinantions fell between the descriptions of how you are doing and gave impressions of the player doing worse than the were. So added some more descriptions to close these gabs. há 2 anos atrás
  bgkjdgbizgblzdgbr 6c2a662b6d [fixed] Some fixes to the Katja journal quest discription and a missing > which meant that the Katja Ivan lake scene was not repeateble, which it should be. há 2 anos atrás
  Kevin_Smarts f25ba2b667 [fixed] Image filename mismatch há 2 anos atrás
  Kevin_Smarts 01a500d502 Merge branch 'master' of https://git.catrenelle.com/Vengeance_11/glife há 2 anos atrás
  Vengeance11 8004e1c6eb Text edits to intros há 2 anos atrás
  Netuttki c8ce571cff Merge remote-tracking branch 'upstream/master' há 2 anos atrás
  Kevin_Smarts a717ef9a7e [fixed] SG_TG start wasn't initialised so lots of things were broken, the sg specific option in customisation were not set to display in menu correctly and the $loc_args was being overwritten in relationship customisation há 2 anos atrás
  Kevin_Smarts 9487457c6e [fixed] Appearnce value was starting way too high and system now re-initialises to correct for this há 2 anos atrás
  Kevin_Smarts 147743ad8c [fixed] Re-ordered the hair customisation to exactly match the face_image function as it had a 2pt error in it through terrible maths há 2 anos atrás
  Kevin_Smarts 63117ad8f2 Merge remote-tracking branch 'bgkjdgbizgblzdgbr/master' há 2 anos atrás
  rachels 34fa698689 use the standing variable name há 2 anos atrás
  bgkjdgbizgblzdgbr ce6156c43b [fixed] Somebosy can't read the file there are editing and henc get the links wrong. há 2 anos atrás
  Vengeance11 9614ccb8ce Proofreading há 2 anos atrás
  Kevin_Smarts a7a93b2ff5 [changed] City start school group options with updated text and code by nutluck and Vengeance11 há 2 anos atrás
  Kevin_Smarts f6369ce0fc [fixed] A number of other uses of storyline variable updated to new starting variable check há 2 anos atrás
  Kevin_Smarts 5c6102faaf [added] Additional release so Sveta can orgasm if very horny even if she has built up to it. há 2 anos atrás
  Kevin_Smarts f822cbc78e [changed] Setting for school starts in itros changed by nutluck (should have been this and not the last file which will get redone) há 2 anos atrás
  Kevin_Smarts 88c3b336be [changed] Updated data for school option for city starts from nutluck há 2 anos atrás
  ADCSux c079c5d9a2 [Changed] Removed face and vidage bonus from base appearance calculations há 2 anos atrás
  ADCSux 2b4dd377ca [Changed] Removed killvar for local variables in appearance system for debugging há 2 anos atrás
100 ficheiros alterados com 4666 adições e 3322 exclusões
  1. 2 1
      glife.qproj
  2. 2 38
      locations/ApperanceSystem.qsrc
  3. 24 23
      locations/Cheatmenu_din.qsrc
  4. 90 15
      locations/KatjaHomeTalk.qsrc
  5. 4 4
      locations/Komp.qsrc
  6. 1 1
      locations/MartinSex.qsrc
  7. 7 7
      locations/_attributes_danilovich_outfits.qsrc
  8. 2 2
      locations/_attributes_fashionista.qsrc
  9. 595 283
      locations/_attributes_scandalicious_dress.qsrc
  10. 138 71
      locations/_attributes_scandalicious_outfits.qsrc
  11. 1 1
      locations/_body_image.qsrc
  12. 157 172
      locations/abduction.qsrc
  13. 136 160
      locations/abductionCustomer.qsrc
  14. 8 8
      locations/albina_chat.qsrc
  15. 70 37
      locations/albina_lazar_sex.qsrc
  16. 3 3
      locations/albina_mother_events.qsrc
  17. 1 1
      locations/albina_school_sex.qsrc
  18. 4 1
      locations/arousal.qsrc
  19. 1 1
      locations/arturRinok.qsrc
  20. 17 14
      locations/barbershop.qsrc
  21. 41 0
      locations/bed2.qsrc
  22. 1 0
      locations/begin.qsrc
  23. 31 0
      locations/beverage.qsrc
  24. 44 6
      locations/body.qsrc
  25. 1 1
      locations/body_desc.qsrc
  26. 2 2
      locations/budilnik.qsrc
  27. 0 8
      locations/city_apt_building.qsrc
  28. 2 2
      locations/city_industrial.qsrc
  29. 12 7
      locations/city_market.qsrc
  30. 1 0
      locations/city_nightclub.qsrc
  31. 1 1
      locations/clothing_QV.qsrc
  32. 3 3
      locations/clothing_descriptions.qsrc
  33. 1 1
      locations/cum_call.qsrc
  34. 96 81
      locations/din_bad.qsrc
  35. 15 5
      locations/din_van.qsrc
  36. 10 2
      locations/ender.qsrc
  37. 1 1
      locations/fight.qsrc
  38. 8 11
      locations/gaddvor.qsrc
  39. 1 1
      locations/gadfield.qsrc
  40. 7 7
      locations/gadforest.qsrc
  41. 8 8
      locations/gadforestlost.qsrc
  42. 1 1
      locations/gadriver.qsrc
  43. 7 21
      locations/gadroad.qsrc
  44. 5 19
      locations/gadukino.qsrc
  45. 1 1
      locations/gdksport.qsrc
  46. 32 24
      locations/gkafe.qsrc
  47. 1 1
      locations/gopnew.qsrc
  48. 1 1
      locations/grigory.qsrc
  49. 1 2
      locations/gschool_chats.qsrc
  50. 3 2
      locations/gschool_events1.qsrc
  51. 2 2
      locations/gschool_gopnik_chats.qsrc
  52. 59 14
      locations/gschool_gossip.qsrc
  53. 7 9
      locations/gschool_grounds.qsrc
  54. 625 209
      locations/gschool_jock_chats.qsrc
  55. 4 0
      locations/gschool_lessons.qsrc
  56. 1 1
      locations/gschool_nerd_chats.qsrc
  57. 50 61
      locations/gschool_sex.qsrc
  58. 8 6
      locations/hookup_talk.qsrc
  59. 8 8
      locations/hunters.qsrc
  60. 1 1
      locations/huntersex.qsrc
  61. 32 32
      locations/intro_city.qsrc
  62. 207 298
      locations/intro_city_select.qsrc
  63. 109 187
      locations/intro_city_tg.qsrc
  64. 57 50
      locations/intro_customization.qsrc
  65. 0 2
      locations/intro_initialization.qsrc
  66. 7 6
      locations/intro_initialization_city.qsrc
  67. 14 10
      locations/intro_sg.qsrc
  68. 44 55
      locations/intro_sg_m.qsrc
  69. 218 188
      locations/intro_sg_select.qsrc
  70. 70 43
      locations/intro_sg_select_custom.qsrc
  71. 114 96
      locations/intro_sg_tg.qsrc
  72. 68 62
      locations/intro_uni.qsrc
  73. 520 2
      locations/intro_uni_tg.qsrc
  74. 4 0
      locations/journal.qsrc
  75. 4 6
      locations/journal_quests.qsrc
  76. 2 2
      locations/katjaEvDin.qsrc
  77. 1 1
      locations/katja_lake.qsrc
  78. 24 22
      locations/katja_sex.qsrc
  79. 1 1
      locations/kuhrPar.qsrc
  80. 263 366
      locations/lesbidomhouse.qsrc
  81. 203 251
      locations/lesbisubhouse.qsrc
  82. 83 7
      locations/metro_events.qsrc
  83. 1 1
      locations/miroslavahome.qsrc
  84. 90 62
      locations/mirror.qsrc
  85. 27 70
      locations/mitka.qsrc
  86. 2 2
      locations/mitkasex.qsrc
  87. 3 3
      locations/natbelapt.qsrc
  88. 1 1
      locations/nerd_game_night.qsrc
  89. 1 1
      locations/npcstatic1.qsrc
  90. 29 29
      locations/obj_din.qsrc
  91. 42 36
      locations/office.qsrc
  92. 13 13
      locations/pav_aptcourtev.qsrc
  93. 1 1
      locations/pav_beach_chat.qsrc
  94. 2 2
      locations/pav_clinic.qsrc
  95. 1 1
      locations/pav_commercial.qsrc
  96. 3 7
      locations/pav_complex.qsrc
  97. 2 2
      locations/pav_complexb2.qsrc
  98. 2 2
      locations/pav_complexb3.qsrc
  99. 30 25
      locations/pav_discoev1.qsrc
  100. 5 4
      locations/pav_factory.qsrc

+ 2 - 1
glife.qproj

@@ -780,6 +780,7 @@
 		<Location name="city_library"/>
 		<Location name="fit"/>
 		<Location name="talent_agency"/>
+		<Location name="casting"/>
 		<Location name="tatiana_lab"/>
 		<Location name="tatiana_missions"/>
 		<Location name="alexandriaHome"/>
@@ -792,7 +793,7 @@
 		<Location name="hairsalon"/>
 		<Location name="shopdacha"/>
 		<Location name="sportShop"/>
-		<Location name="scandalicious"/>
+		<Location name="shop_scandalicious"/>
 		<Location name="torgcentr"/>
 		<Location name="yarik"/>
 		<Location name="zoomagazine"/>

+ 2 - 38
locations/ApperanceSystem.qsrc

@@ -34,29 +34,13 @@ if $args[0] = 'UpdateBaseAppearnce':
 			vidage, skin, body shape (fat and strength), face (lip size, eyes size, and eyelashes)
 			attributes (endurance and agility)
 	}
-	faceBonus = func($this, 'CalcFaceBonus')
 	attributeBonus = func($this, 'CalcAttributeBonus')
-
-	!!	Setting vidageBonus
-	if vidage < 20: 
-		vidageBonus = 60 + (2 * vidage)
-	elseif vidage > 30: 
-		vidageBonus = 160 - (2 * vidage)
-	else
-		vidageBonus = 100
-	end
-
-	skinBonus = (pcs_skin * 2 / 5)
+	skinBonus = pcs_skin / 10
 	bodyShapeBonus = func($this, 'SetBodyShapeBonus')
 
 	! Calculte base appearance
-	pcs_apprncbase = (vidageBonus * (skinBonus + bodyShapeBonus + faceBonus + attributeBonus) / 100) + supnatvnesh
+	pcs_apprncbase = skinBonus + bodyShapeBonus + attributeBonus + supnatvnesh
 
-	killvar 'vidageBonus'
-	killvar 'skinBonus'
-	killvar 'bodyShapeBonus'
-	killvar 'faceBonus'
-	killvar 'attributeBonus'
 end 
 
 if $ARGS[0] = 'CalcFaceBonus':
@@ -106,9 +90,6 @@ if $ARGS[0] = 'CalcFaceBonus':
 
 	result = eyelashesBonus + eyeSizeBonus + lipBonus
 
-	killvar 'eyelashesBonus'
-	killvar 'eyeSizeBonus'
-	killvar 'lipBonus'
 end
 
 if $ARGS[0] = 'CalcAttributeBonus':
@@ -230,10 +211,6 @@ if $ARGS[0] = 'CalcAccessoriesBonus':
 
 	result = coatQualityBonus + shoesQualityBonus + pantyBonus + braBonus
 
-	killvar 'coatQualityBonus'
-	killvar 'shoesQualityBonus'
-	killvar 'pantyBonus'
-	killvar 'braBonus'
 end
 
 if $ARGS[0] = 'CalcGroomingBonus':
@@ -260,11 +237,6 @@ if $ARGS[0] = 'CalcGroomingBonus':
 	!result = tempGroomingBonus
 	result = func($this, 'AdjustFromBMI', tempGroomingBonus)
 
-	killvar 'lipBalmBonus'
-	killvar 'makeupBonus'
-	killvar 'hairBonus'
-	killvar 'breathBonus'
-	killvar 'tempGroomingBonus'
 end
 
 if $ARGS[0] = 'CalcGroomingPenalty':
@@ -311,12 +283,6 @@ if $ARGS[0] = 'CalcGroomingPenalty':
 
 	result = sweatPenalty + glassesPenalty + hairDyePenalty + buzzCutPenalty + legPenalty
 
-
-	killvar 'sweatPenalty'
-	killvar 'glassesPenalty'
-	killvar 'hairDyePenalty'
-	killvar 'buzzCutPenalty'
-	killvar 'legPenalty'
 end
 
 
@@ -331,8 +297,6 @@ if $ARGS[0] = 'CalcAppearance':
 	!Any super natural bonuses are allowed to go above the max scale
 	result = temp_apprnc + superNaturalBonus
 	
-	killvar 'superNaturalBonus'
-	killvar 'temp_apprnc'
 end
 
 if $ARGS[0] = 'ConvertToHotcat':

+ 24 - 23
locations/Cheatmenu_din.qsrc

@@ -1272,30 +1272,31 @@ $cheatmenu['reputation'] = {
 	'<center>If they exceed this limit they will be reset overnight.</center>'
 	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
 	'<tr><td width="50%" cellpadding="10" valign="top">'
-	if mid($start_type,1,2) = 'sg':
-		*nl
-		'Relationships in Pavlovsk'
-		*nl
-		'<font color="blue"><b>Family</b></font>'
-		if Enable_reputation_family = 0:
-			'<a href="exec:Enable_reputation_family = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_family = 1:
-			'<a href="exec:Enable_reputation_family = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'Stepfather: <<npc_rel[''A28'']>>	<a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A28''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'Mother: <<npc_rel[''A29'']>>	<a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A29''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'Sister: <<npc_rel[''A33'']>>	<a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A33''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'Brother: <<npc_rel[''A34'']>>	<a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A34''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
+	*nl
+	'Relationships in Pavlovsk'
+	*nl
+	'<font color="blue"><b>Family</b></font>'
+	if Enable_reputation_family = 0:
+		'<a href="exec:Enable_reputation_family = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+	end
+	if Enable_reputation_family = 1:
+		'<a href="exec:Enable_reputation_family = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+		'Stepfather: <<npc_rel[''A28'']>>	<a href="exec:npc_rel[''A28''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A28''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'Mother: <<npc_rel[''A29'']>>	<a href="exec:npc_rel[''A29''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A29''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'Sister: <<npc_rel[''A33'']>>	<a href="exec:npc_rel[''A33''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A33''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'Brother: <<npc_rel[''A34'']>>	<a href="exec:npc_rel[''A34''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A34''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+	end
 
-		'Your dog: '+iif($status['dog'] = 'active', '<b>Active</b>', '<a href="exec: $status[''dog''] = ''active'' & gt $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & gt $cheatmenu[''reputation'']">Blocked</a>')
-		if $status['dog'] ! 'blocked':
-			'Set the relationship and love of your dog to always be at maximum: '+iif(cheat['dog_rel'] = 0, '<a href="exec: cheat[''dog_rel''] = 1 & gt $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & gt $cheatmenu[''reputation'']">Currently On</a>')
-			'You need to feed your dog <<rex[''count_feed_base'']>> per day: '+iif(rex['count_feed_base'] > 1, '<a href="exec: rex[''count_feed_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
-			'You need to walk your dog <<rex[''count_walk_base'']>> per day: '+iif(rex['count_walk_base'] > 1, '<a href="exec: rex[''count_walk_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
-			'You need to bath your dog <<rex[''count_bath_base'']>> per week: '+iif(rex['count_bath_base'] > 1, '<a href="exec: rex[''count_bath_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
-		end
-		*nl
+	'Your dog: '+iif($status['dog'] = 'active', '<b>Active</b>', '<a href="exec: $status[''dog''] = ''active'' & gt $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & gt $cheatmenu[''reputation'']">Blocked</a>')
+	if $status['dog'] ! 'blocked':
+		'Set the relationship and love of your dog to always be at maximum: '+iif(cheat['dog_rel'] = 0, '<a href="exec: cheat[''dog_rel''] = 1 & gt $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & gt $cheatmenu[''reputation'']">Currently On</a>')
+		'You need to feed your dog <<rex[''count_feed_base'']>> per day: '+iif(rex['count_feed_base'] > 1, '<a href="exec: rex[''count_feed_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
+		'You need to walk your dog <<rex[''count_walk_base'']>> per day: '+iif(rex['count_walk_base'] > 1, '<a href="exec: rex[''count_walk_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
+		'You need to bath your dog <<rex[''count_bath_base'']>> per week: '+iif(rex['count_bath_base'] > 1, '<a href="exec: rex[''count_bath_base''] -= 1 & gt $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & gt $cheatmenu[''reputation'']">+1</a>'
+	end
+	*nl
+
+	if mid($start_type,1,2) = 'sg':
 		'<font color="blue"><b>School</b></font>'
 		'<i>Popular Kids</i>'
 		if Enable_reputation_popular = 0:

+ 90 - 15
locations/KatjaHomeTalk.qsrc

@@ -130,6 +130,8 @@ if $ARGS[0] = '':
 		!!Friday and Sturday evening Katja goes to the disco, if the player is talking to when this happens she asks them to go with. Alternatively the can just leave.
 		'"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 locat['katja'] = 9:
+		'Katja notices how late it is and politely asks you to leave.'
 	else
 		if pcs_sweat >= 20:
 			!katja doesn''t like stinky people so if the player is sveaty she will ask the player to take a bath. The player can leave instead.
@@ -139,7 +141,7 @@ if $ARGS[0] = '':
 		else
 			!!not sweaty
 
-			if katjaQW['QWstage'] = 6 and katjaQW['anal_ques'] >= 3 and katjaQW['slut'] > 100 and katjaQW['horny'] > 60:
+			if katjaQW['QWstage'] = 6 and katjaQW['anal_quest'] >= 3 and katjaQW['slut'] > 100 and katjaQW['horny'] > 60:
 				!!If Katja have had sex with both marcus and Ivan and have been corrupted enough. Then she will when she is horny ask about trying sex with other boys. 
 				gt 'KatjaHomeTalk', 'random_park_sex_talk'
 			
@@ -876,16 +878,7 @@ if $ARGS[0] = 'Sextalk':
 		end
 
 		if stat['bj'] > 0:
-			act 'Talk about blowjobs':
-				cls
-				katjaQW['horny'] += 5
-				katjaQW['knows_BJ'] = 1
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'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
+			gs'KatjaHomeTalk','bj_talk1'
 		else
 			act 'You''ve never given a blowjob':
 				cls
@@ -914,11 +907,11 @@ if $ARGS[0] = 'Sextalk':
 				act 'Further':minut += 15 & gt 'KatjaHomeTalk'
 			end
 		else
-			act 'You''re a virgin':
+			act 'No':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'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!"'
+				'You tell Katja that you''ve never had sex with a guy, and 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
@@ -999,11 +992,11 @@ if $ARGS[0] = 'Sextalk':
 				end
 			end
 		else
-			act 'Tell Katja that you have never had sex with a girl':
+			act 'No':
 				cls
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-				'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.'
+				'You tell Katja that you''ve never gone down on a 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
@@ -1073,6 +1066,88 @@ if $ARGS[0] = 'Sextalk':
 	end
 end
 
+if $ARGS[0] = 'bj_talk1':
+	if katjaQW['knows_BJ'] > 0:
+		'"<<$pcs_nickname>>!" she says, a sparkle in her eye. "Tell me what it''s like to sucking dick again."'
+	elseif katjaQW['knows_BJ']= 0:
+		'"<<$pcs_nickname>>, have you ever given a guy a blowjob?"'
+	end
+
+	if stat['bj'] > 0:
+		if katjaQW['knows_BJ'] = 0:
+			act 'No (lie)':
+				cla & *clr
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+				'"No," you shake your head before shamelessly lying through your teeth. "I''ve never given a blowjob before."'
+				'"Oh." She sits back, looking disappointed for some reason.'
+				act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+			end
+			act'Yes':
+				cla & *clr
+				katjaQW['horny'] += 5
+				katjaQW['knows_BJ'] = 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+				'"Yeah. I''ve given a few," you admit.'
+				'"What''s it like?" Katja asks, eyes wide with excitement.'
+				gs'KatjaHomeTalk','bj_talk2'
+			end
+		elseif stat['bj'] > 0:
+			katjaQW['horny'] += 5
+			gs'KatjaHomeTalk','bj_talk2'
+		end
+	else
+		act 'No':
+			cla & *clr
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+			'"No," you shake your head. "I''ve never given a blowjob before."'
+			'"Oh." She sits back, looking disappointed for some reason. "Guess we''re both clueless then, huh?"'
+			act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+		end
+		!!act'I''ve given a few (lie)':
+	end
+end
+
+if $ARGS[0] = 'bj_talk2':
+	act'It tastes funny':
+		cla & *nl
+		'"It tastes funny," you wrinkle your nose. "It''s like, kinda salty? But also sort of... musty? I don''t think I mind the act itself that much, but dick has a weird flavor."'
+		'Katja seems taken aback, almost disappointed. You guess this isn''t the answer she was hoping for.'
+		act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+	end
+	
+	act'It''s fun':
+		cla & *nl
+		'"It''s fun!" you grin. "I''m not really sure what it is, but something about having a dick in your mouth is really entertaining. It''s like, totally alive! And you can feel it making all these tiny movements when it''s on your tongue. I really like giving head."'
+		'Katja hangs on your every word, nodding excitedly for you to keep describing your experiences with oral sex to her.'
+		act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+	end
+	
+	act'It''s whatever':
+		cla & *nl
+		'"I don''t mind doing it but I don''t love it either," you say. "Dick doesn''t really taste like anything if it''s clean. Kinda salty if it isn''t. I don''t know. It''s whatever I guess."'
+		'You shrug.'
+		'Katja seems taken aback, almost disappointed. You guess this isn''t the answer she was hoping for.'
+		act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+	end
+	
+	act'It''s boring':
+		cla & *nl
+		'"It''s boring," you roll your eyes. "You have to keep sucking the whole time and after a while my jaw just starts to ache with the motion. It''s a dick in your mouth, I don''t know what to tell you.'
+		'Katja seems taken aback, looking almost worried. You guess you just shattered some impressions she had about giving head.'
+		act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+	end
+	
+	act'It turns me on':
+		cla & *nl
+		'"It turns me on so much," you admit, biting your lip in a lusty smile. "When someone''s in your mouth, you can make them feel <i>really</i> good. And they''ll respond to what you do. If you take their whole length, they''ll squirm. If you lick the head, it''ll twitch under your touch. Just knowing you can make someone else feel that way... Ugh, just <i>thinking</i> about it gets me wet!"'
+		'Katja hangs on your every word, nodding along with wide eyes as you describe what it is you love so much about giving head. A faint blush also comes to her cheeks and you notice her unconsciously rubbing her thighs together.'
+		act 'Continue':minut += 15 & gt 'KatjaHomeTalk'
+	end	
+end
+
 if $ARGS[0] = 'hornykiss':
 	'Katja brings her face so close to yours that you can feel her hot breath on your skin.'
 

+ 4 - 4
locations/Komp.qsrc

@@ -398,7 +398,7 @@ if $ARGS[0] = 'rabota':
 		'<center><img <<$set_imgh>> src="images/pc/items/accessories/computer/eror.jpg"></center>'
 		'You have no prepaid internet access remaining. You need to buy more, before you can go online again.'
 
-		act 'Close the browser':gt 'komp','start'
+		act 'Close the browser':gt 'komp','brows'
 	else
 		minut += 60
 		internet -= 1
@@ -1784,7 +1784,7 @@ if $ARGS[0] = 'bank':
 			act 'Continue': gt 'komp', 'bank'
 		end
 	end
-	act 'Close your browser':gt 'komp', 'start'
+	act 'Close your browser':gt 'komp', 'brows'
 end
 
 if $ARGS[0] = 'fuckornot':
@@ -1808,7 +1808,7 @@ if $ARGS[0] = 'fuckornot':
 		if $view_location = 'school':
 			gt 'gschool_lessons', 'short_break'
 		else
-			gt 'komp', 'start'
+			gt 'komp', 'brows'
 		end
 	end
 end
@@ -1834,7 +1834,7 @@ if $ARGS[0] = 'hotornot':
 		if $view_location = 'school':
 			gt 'gschool_lessons', 'short_break'
 		else
-			gt 'komp', 'start'
+			gt 'komp', 'brows'
 		end
 	end
 end

+ 1 - 1
locations/MartinSex.qsrc

@@ -167,7 +167,7 @@ if $ARGS[0] = '':
 					'"Fine, you know what? Fuck this." You turn around, walking towards the door, barely able to contain your anger.'
 					'"<<$pcs_firstname>>," Martin begins, his voice taking on his most calming tone, but instead of calming you, it is the pinprick needed to set you off.'
 					*nl
-					'In the blink of an eye, you are face to face with him again, yelling at him unrestrainedly. "No! Apparently, you think I''m too young and too dumb to know what I want, so you don''t get to ''<<$pcs_firstname>>'' me! I don''t need ' + iif(StoryLine > 0,'another','a') + ' stepdad who knows what''s best for me!"'
+					'In the blink of an eye, you are face to face with him again, yelling at him unrestrainedly. "No! Apparently, you think I''m too young and too dumb to know what I want, so you don''t get to ''<<$pcs_firstname>>'' me! I don''t need another stepdad who knows what''s best for me!"'
 					'Before Martin could utter even another word, you had stormed out of the bar, livid at his paternalism and, deep down, below the layers of fury, wounded by his rejection.'
 
 					act 'Get out of the bar': gt 'city_industrial'

+ 7 - 7
locations/_attributes_danilovich_outfits.qsrc

@@ -1,5 +1,5 @@
 # $attributes_danilovich_outfits
-!!2022/01/11
+!!2022/02/28
 !!Quality range is 2-5. 3 for casual short-and-shorts, 4 for clothing specially designed for exercise, 5 is more designed for looks than exercise.
 
 if ARGS[1] = 1:
@@ -908,33 +908,33 @@ elseif ARGS[1] = 150:
 	CloPantsShortness = 1
 	
 elseif ARGS[1] = 151:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 4
 	CloBra = 1
 	CloPanties =1
 	
 elseif ARGS[1] = 152:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 4
 	CloBra = 1
 	CloPanties =1
 	
 elseif ARGS[1] = 153:
-	CloQuality = 3
+	CloQuality = 5
 	CloThinness = 4
 	CloTopCut = 1
 	CloPantsShortness = 6
 	CloOnePiece = 1
 	
 elseif ARGS[1] = 154:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 4
 	CloTopCut = 2
 	CloPantsShortness = 1
 	CloOnePiece = 1
 	
 elseif ARGS[1] = 155:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 2
 	CloTopCut = 2
 	CloPantsShortness = 6
@@ -948,7 +948,7 @@ elseif ARGS[1] = 156:
 	CloOnePiece = 1
 	
 elseif ARGS[1] = 157:
-	CloQuality = 4
+	CloQuality = 5
 	CloThinness = 4
 	CloTopCut = 2
 	CloPantsShortness = 6

+ 2 - 2
locations/_attributes_fashionista.qsrc

@@ -1,5 +1,5 @@
 # $attributes_fashionista
-!2021/09/20
+!2022/03/03
 !prince range from 4 to 6, please avoid adding too many 4s
 
 if ARGS[1] = 1:
@@ -1114,7 +1114,7 @@ elseif ARGS[1] = 151:
 elseif ARGS[1] = 152:
 	CloQuality = 5
 	CloThinness = 4
-	CloTopCut = 1
+	CloTopCut = 3
 	CloSkirtShortness = 4
 	CloDress = 1
 	

Diff do ficheiro suprimidas por serem muito extensas
+ 595 - 283
locations/_attributes_scandalicious_dress.qsrc


+ 138 - 71
locations/_attributes_scandalicious_outfits.qsrc

@@ -1,154 +1,221 @@
 # $attributes_scandalicious_outfits
-!2021/05/08
-!price range from 2 to 3, please avoid adding too many outside of that range
+!2022/02/28
+!price range from 2 to 5, please avoid adding too many 5''s
 
 if ARGS[1] = 1:
-	CloQuality = 2
+	CloQuality = 5
 	CloThinness = 5
-	CloTopCut = 2
+	CloTopCut = 4
 	CloPantsShortness = 1
-	CloStyle = 4
+	CloOnePiece = 1
 
 elseif ARGS[1] = 2:
-	CloQuality = 2
+	CloQuality = 3
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 1
+	CloTopCut = 4
+	CloPantsShortness = 6
+	CloOnePiece = 1
 	CloBimbo = 1
-	CloStyle = 4
 	
 elseif ARGS[1] = 3:
-	CloQuality = 2
-	CloThinness = 5
-	CloBra = 1
-	CloPantsShortness = 1
-	CloBimbo = 1
+	CloQuality = 3
+	CloThinness = 6
+	CloTopCut = 3
+	CloPantsShortness = 6
+	CloOnePiece = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 4:
 	CloQuality = 3
-	CloThinness = 6
-	CloBra = 1
-	CloPantsShortness = 4
-	CloStyle = 4
+	CloThinness = 5
+	CloTopCut = 4
+	CloPantsShortness = 1
 	
 elseif ARGS[1] = 5:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 2
-	CloPantsShortness = 5
+	CloTopCut = 4
+	CloPantsShortness = 6
+	CloOnePiece = 1
 
 elseif ARGS[1] = 6:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
-	CloStyle = 4
+	CloTopCut = 4
+	CloPantsShortness = 6
+	CloOnePiece = 1
 	
 elseif ARGS[1] = 7:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
+	CloTopCut = 4
+	CloPantsShortness = 6
+	CloOnePiece = 1
+	CloBimbo = 1
 	
 elseif ARGS[1] = 8:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
-	CloStyle = 4
+	CloTopCut = 4
+	CloPantsShortness = 6
+	CloOnePiece = 1
+	CloBimbo = 1
 	
 elseif ARGS[1] = 9:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
-	CloBimbo = 1
+	CloBra = 1
+	CloPanties = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 10:
-	CloQuality = 3
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
+	CloBra = 1
+	CloPanties = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 11:
-	CloQuality = 3
-	CloThinness = 4
-	CloTopCut = 3
-	CloPantsShortness = 5
-	CloDress = 1
-	CloBimbo = 1
+	CloQuality = 4
+	CloThinness = 5
+	CloBra = 1
+	CloPanties = 1
+	CloStyle = 4
 	
 elseif ARGS[1] = 12:
-	CloQuality = 2
+	CloQuality = 4
 	CloThinness = 5
-	CloTopCut = 3
-	CloPantsShortness = 5
-	CloDress = 1
-	CloBimbo = 1
+	CloBra = 1
+	CloPanties = 1
+	CloStyle = 4
 	
 elseif ARGS[1] = 13:
-	CloQuality = 2
+	CloQuality = 4
 	CloThinness = 5
 	CloBra = 1
-	CloPantsShortness = 5
+	CloPanties = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 14:
-	CloQuality = 2
+	CloQuality = 3
 	CloThinness = 5
-	CloBra = 1
+	CloTopCut = 3
 	CloPantsShortness = 5
-	CloBimbo = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 15:
-	CloQuality = 3
-	CloThinness = 4
+	CloQuality = 5
+	CloThinness = 5
 	CloTopCut = 4
 	CloPantsShortness = 5
+	CloOnePiece = 1
 	CloBimbo = 1
 	CloStyle = 4
 	
 elseif ARGS[1] = 16:
 	CloQuality = 3
-	CloThinness = 4
-	CloBra = 1
+	CloThinness = 5
+	CloTopCut = 3
 	CloPantsShortness = 5
 	CloStyle = 4
 	
 elseif ARGS[1] = 17:
-	CloQuality = 4
+	CloQuality = 5
 	CloThinness = 5
-	CloTopCut = 2
-	CloPantsShortness = 6
-	CloOnePiece = 1
+	CloTopCut = 4
+	CloPantsShortness = 5
 	CloStyle = 4
 	
 elseif ARGS[1] = 18:
-	CloQuality = 3
+	CloQuality = 5
 	CloThinness = 5
 	CloTopCut = 4
-	CloPantsShortness = 6
-	CloOnePiece = 1
+	CloPantsShortness = 5
 	CloStyle = 4
 	
 elseif ARGS[1] = 19:
-	CloQuality = 2
+	CloQuality = 5
 	CloThinness = 5
+	CloTopCut = 4
+	CloPantsShortness = 5
+	CloStyle = 4
+	
+elseif ARGS[1] = 20:
+	CloQuality = 5
+	CloThinness = 5
+	CloTopCut = 4
+	CloPantsShortness = 5
+	CloBimbo = 1
+	CloStyle = 4
+
+elseif ARGS[1] = 21:
+	CloQuality = 5
+	CloThinness = 4
 	CloTopCut = 3
 	CloPantsShortness = 6
-	CloOnePiece = 1
+	
+elseif ARGS[1] = 22:
+	CloQuality = 3
+	CloThinness = 5
+	CloTopCut = 3
+	CloPantsShortness = 5
 	CloStyle = 4
 	
-elseif ARGS[1] = 20:
+elseif ARGS[1] = 23:
 	CloQuality = 2
 	CloThinness = 5
+	CloTopCut = 3
+	CloPantsShortness = 5
+	CloStyle = 4
+	
+elseif ARGS[1] = 24:
+	CloQuality = 4
+	CloThinness = 4
 	CloTopCut = 4
-	CloPantsShortness = 6
-	CloOnePiece = 1
+	CloPantsShortness = 5
+	
+elseif ARGS[1] = 25:
+	CloQuality = 2
+	CloThinness = 5
+	CloTopCut = 4
+	CloPantsShortness = 5
+	CloStyle = 4
+	
+elseif ARGS[1] = 26:
+	CloQuality = 2
+	CloThinness = 5
+	CloTopCut = 4
+	CloPantsShortness = 5
+	CloStyle = 4
+	
+elseif ARGS[1] = 27:
+	CloQuality = 4
+	CloThinness = 5
+	CloBra = 1
+	CloPanties = 1
+	CloStyle = 4
+	
+elseif ARGS[1] = 28:
+	CloQuality = 5
+	CloThinness = 5
+	CloBra = 1
+	CloPantsShortness = 5
+	CloBimbo = 1
+	CloStyle = 4
+	
+elseif ARGS[1] = 29:
+	CloQuality = 4
+	CloThinness = 5
+	CloBra = 1
+	CloPanties = 1
+	CloStyle = 4
+	
+else
+	CloQuality = 4
+	CloThinness = 5
+	CloBra = 1
+	CloPanties = 1
+	CloBimbo = 1
 	CloStyle = 4
 	
 end

+ 1 - 1
locations/_body_image.qsrc

@@ -74,7 +74,7 @@ if $ARGS[0] = 'clothes':
 		$RESULT = FUNC('$clothing_image', $clothingworntype, clothingwornnumber)
 		$body_image_msg += 'You are wearing ' + FUNC('$short_description', $clothingworntype) + '<<clothingwornnumber>>.'
 		if PClobimbo = 1:$body_image_msg += '<br>You are dressed like a bimbo.'
-		if $clothingworntype ! 'coat' and $clothingworntype ! 'swimwear':
+		if $clothingworntype ! 'coat' and PCloswimwear = 0:
 			gs 'clothing_attributes', $clothingworntype, clothingwornnumber
 			gs 'clothing_descriptions'
 			$body_image_msg += '<br><<$description>>'

+ 157 - 172
locations/abduction.qsrc

@@ -10,7 +10,7 @@ if $ARGS[0] = 'start':
 	menu_off = 1
 	i = rand(1, 2)
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/girltocar<<i>>.jpg"></center>'
-	'You suddenly hear what sounds like someone coming up to you from behind, but before you can turn and look, you feel something hit your head hard. You stumble as your vision goes black...'
+	'You suddenly hear what sounds like someone rushing up behind you, but before you can turn and look, you feel something hit your head hard. You stumble as your vision goes black...'
 	act 'Pass out':gt 'abduction', 'abdCarTrunk'
 end
 
@@ -18,16 +18,16 @@ if $ARGS[0] = 'abdCarTrunk':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/trunkint1.jpg"></center>'
 	'You wake up in a very tight, dark place. You quickly realize that you''re in the trunk of a moving car.'
-	'You try to kick the walls with your feet, but after a while you can see it''s pointless.'
+	'You try to kick the walls with your feet, but after a while you can see that it''s pointless.'
 	act 'Continue':gt 'abduction', 'abdRoomFirstEntry'
 end
 
 if $ARGS[0] = 'abdRoomFirstEntry':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/downstairs1.jpg"></center>'
-	'The car stops and you hear the sound of someone walking outside. Suddenly... the trunk opens up.'
+	'The car stops and you hear the sound of someone walking outside before the trunk opens up.'
 	'Before your eyes adjust to the bright flow of daylight, you''re hoisted up by a strong man and carried into a house.'
-	'He''s carrying you downstairs.'
+	'He carries you downstairs into the basement.'
 	act 'Continue':gt 'abduction', 'abdRoomFirstChaining'
 end
 
@@ -36,14 +36,14 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	i = rand(1, 5)
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/shackled<<i>>.jpg"></center>'
 	'You''re thrown onto a dirty bed. The man forcibly undresses you before shackling your wrists and ankles. He then slaps a collar around your neck before chaining you to the wall.'
-	'"You must have really pissed someone off girl." he says.'
+	'"You must have really pissed the wrong person off girl," he says.'
 	'"What is this place? What are you going to do to me?" you ask.'
 	'"This is where girls are brought to be trained as sex slaves!"'
-	'"... but... how... no..."'
-	'"Shut up slut. Usually, we torture you for fun and for as long as we want. Once you break, we sell you to the highest bidder."'
-	'"You cannot do this to me! It''s illegal!'
-	'"Ha! Who do you think are our best customers? Politicians, police officers, businessmen... We have our cover, so you should shut up and get used to it!"'
-	'The man leaves without saying another word as you tearfully sob and yell for him to come back...'
+	'"... But... How... No..."'
+	'"Shut up, slut! Usually, we torture you for fun and for as long as we want. Once you break, we sell you to the highest bidder."'
+	'"You can''t do this to me! It''s illegal!"'
+	'"Ha! Who do you think our best customers are? Slimy politicians, corrupt police officers, sleazy businessmen... We have our cover, so you should shut up and get used to it!"'
+	'The man leaves without saying another word as you tearfully sob and yell for him to come back.'
 	gs 'underwear', 'remove'
 	painkiller_bak = painkiller
 	prezik_bak = prezik
@@ -88,8 +88,8 @@ if $ARGS[0] = 'abdRoom':
 	menu_off = 0
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/basement1.jpg"></center>'
-	'You are in a dark basement that has only one window and some lights. You are chained to the wall like a dog, a collar wrapped tightly around your neck while cold metal shackles also dig painfully into your wrists and ankles.'
-	'You can only move a few meters from the wall to reach several things left for you by your abductors.'
+	'You''re in a dark basement that has only one window and some lights. You''re chained to the wall like a dog, a collar wrapped tightly around your neck while cold metal shackles dig painfully into your wrists and ankles.'
+	'You can only move a few meters from the wall to reach several things left for you by your captors.'
 
 	act 'Look around':gt 'abduction', 'abdFood'
 
@@ -107,14 +107,13 @@ if $ARGS[0] = 'abdSomeoneComing':
 	minut += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/downstairs2.jpg"></center>'
-	'You hear the sounds of footsteps that get louder with every step that comes closer to you. Their sound begins at the top of the stairs.'
+	'You hear the sounds of footsteps that gradually get louder before they reach the top of the stairs.'
 
 	if pcs_leghair > 3 or pcs_pubes > 3:
 		minut += 20
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/shave1.jpg"></center>'
 		'You are forced to shave yourself.'
-		'Obviously, your captors do not fancy women with body hair.'
-		'You are watched the whole time, probably so you don''t cut your arteries or something similar.'
+		'You''re watched the whole time, probably so you don''t cut yourself or something similar.'
 		pcs_pubes = 0
 		pcs_leghair = 0
 		pcs_horny += 5
@@ -122,15 +121,15 @@ if $ARGS[0] = 'abdSomeoneComing':
 
 	if broken = 0 and rapeCount = 0 and tortureCount = 0 and examed = 0:
 		*nl
-		'The man comes up to you. He grabs your chain and forcibly puts a blindfold on your head to cover your eyes.'
+		'The man comes up to you. He grabs your chain and forcibly wraps a blindfold around your head to cover your eyes.'
 		'He leads you up the stairs as you feel a breath of fresh air that sensually caresses your bare skin.'
 		act 'Continue':gt 'abduction', 'abdExamStart'
 	else
 		if broken = 0:
-			'You fearfully back away from the man and curl up against the wall, your body trembling in fear of what is going to happen next.'
+			'You fearfully back away from the man and curl up against the wall, your body trembling in fear of what''s going to happen next.'
 			act 'Cower in fear':gt 'abduction', 'abdRape'
 			
-			if rapeCount >= 5: act 'Plead that you cannot take any more':gt 'abduction', 'abdBreak1'
+			if rapeCount >= 5: act 'Plead that you can''t take any more':gt 'abduction', 'abdBreak1'
 		else
 		
 		end
@@ -143,9 +142,9 @@ if $ARGS[0] = 'abdSomeoneComing':
 			painkillerChance = rand(1,100)
 			buyoutChanceRand = rand(1,100)
 			if broken < 10:
-				act 'Welcome back, Master.':gt 'abduction', 'abdBrokenAsk'
+				act 'Welcome back, Master':gt 'abduction', 'abdBrokenAsk'
 			elseif (broken >= 10 and abdTools = 0):
-				act 'Welcome back, Master.':gt 'abduction', 'abdBrokenGiveTools'
+				act 'Welcome back, Master':gt 'abduction', 'abdBrokenGiveTools'
 			else
 				if customerChance <= 50:
 					act 'Welcome back, Master':gt 'abductionCustomer', 'abdCustomerGate'
@@ -154,7 +153,7 @@ if $ARGS[0] = 'abdSomeoneComing':
 					act 'Welcome back, Master':gt 'abductionCustomer', 'abdCustomerGateBuyout'
 				else
 					if abdCustomerCount > 5 and saleChanceRand <= (2 * saleChance):
-						'Master: "I have some good news for you slave."'
+						'"I have some good news for you slave."'
 						act 'Yes Master?':gt 'abduction', 'abdBeSold'
 					else
 						if painkillerChance <= 30:
@@ -174,8 +173,8 @@ if $ARGS[0] = 'abdExamStart':
 	menu_off = 1
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/examroom.jpg"></center>'
-	'Your blindfold is removed. You find yourself in a small room that''s painted white. The light is very bright and blinds you to the point where you can barely see.'
-	'As your eyes adjust, you can see that it is some kind of examination room. It distinctly reminds you of a gynecologist''s office.'
+	'Your blindfold is removed and you find yourself in a small room that''s painted white. The light is very bright and blinds you to the point that you can barely see.'
+	'As your eyes adjust, you see that it''s some kind of examination room. It distinctly reminds you of a gynecologist''s office.'
 	'"Sit." the man sternly orders.'
 	
 	gs 'willpower', 'misc', 'resist', 'hard'
@@ -196,11 +195,11 @@ if $ARGS[0] = 'abdExamResist':
 	*clr & cla
 	menu_off = 1
 	'<center><video autoplay loop src="images/locations/shared/abduction/examslap.mp4"></video></center>'
-	'Terrified of what they''ll do, you start yelling and clawing at your collar, trying desperately to escape.'
+	'Terrified of what they''ll do, you start screaming for help and clawing at your collar, trying desperately to escape.'
 	'However, your captor''s strength, along with your tightly adjusted cuffs, make your attempt to escape futile.'
-	'He yanks roughly on your chain, which pulls you to the ground in front of him. He slaps your face hard and leaves it stinging with a red handmark across your cheek.'
-	'"You''re only making it harder bitch!!" he yells in your face, before effortlessly picking you up and slamming you into the chair. He removes your shackles before tightly restraining you.'
-	'He then calmly sits down in a chair over in the far corner of the room.'
+	'He yanks roughly on your chain, your collar choking you as he pulls you to the ground in front of him. He slaps your face hard and leaves it stinging with a red handmark across your cheek.'
+	'"You''re only making it harder bitch!" he yells in your face before effortlessly picking you up and slamming you into the chair, winding you. He removes your shackles before tightly restraining you.'
+	'He then calmly sits down in a chair in the far corner of the room.'
 	act 'Continue':gt 'abduction', 'abdExam1'
 end
 
@@ -208,9 +207,9 @@ if $ARGS[0] = 'abdExamObey':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/examsit.jpg"></center>'
-	'Like the obdient slave you obviously have just become, you willingly climb up onto the chair and sit there. You wonder what perverse things are going to happen to you.'
+	'Like an obdient slave, you willingly climb up onto the chair as you wonder what perverse things are going to happen to you.'
 	'The man ties you up anyway, probably to make sure you don''t try to escape after they start. This makes you even more nervous. He also removes your shackles.'
-	'He then calmly sits down in a chair over in the far corner of the room.'
+	'He then calmly sits down in a chair in the far corner of the room.'
 	act 'Continue':gt 'abduction', 'abdExam1'
 end
 
@@ -220,22 +219,21 @@ if $ARGS[0] = 'abdExam1':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/exam1.jpg"></center>'
 	'A man enters the room dressed like a doctor, wearing a lab coat and suit with a stethoscope around his neck. He walks as if he''s unconcerned about you.'
 	'Obviously, he doesn''t speak to you, but rather to the man sitting in the chair. "Wow, a nice catch indeed." the doctor exclaims.'
-	'The doctor puts on a pair of rubber gloves then sits down on a small chair in front of you. He looks at your spread legs and what''s between them.'
+	'The doctor puts on a pair of rubber gloves and sits down on a small chair in front of you. He looks at your spread legs and what''s between them.'
 	*nl
-	'He continues to speak to the man: "She''s about <<age>> years old."'
+	'He continues to speak to the man. "She''s about <<age>> years old."'
 	if age < 18:
-		'"Geez, you like them really young don''t you?"'
-		'"Sure Doctor, who wants to fuck some old meat? The customers just love how the young ones squeal."'
-		'"Heh, I see..."'
-		'He continues with the usual report of his findings.'
+		'"Geez, you like them young, don''t you?"'
+		'"Who wants to fuck some old meat? The customers just love how the young ones squeal." the man replies.'
+		'"Heh, I see..." He continues with the usual report of his findings.'
 	end
 	'He continues to examine every inch of you. "Regarding her usage levels:"'
-	'He shines a light in your mouth and says, "Her throat is <<$throattipe>>."'
+	'He shines a light in your mouth. "Her throat is <<$throattipe>>."'
 	'Next, he prods a finger around in your ass. "And her ass is <<$anustipe>>."'
 	'He pulls his finger out of your ass and finally reaches for your pussy.'
 	if pcs_vag = 0:
 		'"Oh, you''ll like this. Her pussy is fresh. We have a virgin here."'
-		'"Looks like we hit the jackpot once again dear Doctor." says the man with a happy smile.'
+		'"Looks like we hit the jackpot once again dear Doctor," the man replies with a happy smile.'
 	else
 		'"And her pussy is <<$vaginatipe>>.'
 	end
@@ -248,10 +246,10 @@ if $ARGS[0] = 'abdExam2':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/exam2.jpg"></center>'
-	'"Listen here, little slave. We will make sure that you are healthy and ready to be trained."'
+	'"Listen here, little slave. We''ll make sure that you''re healthy and ready to be trained."'
 	'He quickly injects all the solutions into one of your arms. The needle pricks your skin to hit the vein in the crook of your arm.'
 	'"The examination is now over."'
-	'The doctor leaves the room. The man puts your shackles and blindfold back on then leads you back down to the basement.'
+	'The doctor leaves the room and the man puts your shackles and blindfold back on before leading you back down to the basement.'
 	gs 'medical_din','healSTDs'
 
 	examed = 1
@@ -264,10 +262,10 @@ if $ARGS[0] = 'abdBrokenGiveTools':
 	abdTools = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhoredildosbag.jpg"></center>'
-	'Your master approaches you. It looks like he is holding something big in his hands.'
-	'When he steps into the light, you can see he holds some very large dildos.'
-	'"Hello, my newly broken slave. I have a gift for you." he says.'
-	'You are rather quiet, because fearful thoughts of having these dreadfully big dildos shoved anywhere into your body make you feel like you might puke.'
+	'Your master approaches you. It looks like he''s holding something big in his hands.'
+	'When he steps into the light, you can see that he''s holding some very large dildos.'
+	'"Hello, my slave. I have a gift for you."'
+	'You remain quiet, fearful thoughts of having these dildos shoved anywhere into your body making you feel sick.'
 	'"Aren''t you glad whore? These dildos are here for you to train on, so you can perform better in a "live" situation."'
 	'"Uhmm... thank you Master."'
 	'He puts them down next to your bed and leaves without saying another word.'
@@ -275,7 +273,7 @@ if $ARGS[0] = 'abdBrokenGiveTools':
 		if breastpump = 0:breastpump = 1
 		'In the bottom of the box, under the various dildos, you also find a working breast pump.'
 		if lact_engorgement > 3:
-		 'You are relieved that you can now empty your painfully full breasts'
+		 'You''re relieved that you can now empty your painfully full breasts.'
 		end
 	end
 	act 'Continue':gt 'abduction', 'abdRoom'
@@ -287,10 +285,10 @@ if $ARGS[0] = 'abdBreak1':
 	minut += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/questioned1.jpg"></center>'
-	'"Please... please! I cannot bear this treatment anymore! I''ll do anything, just let me go!" you tearfully plead.'
-	'"You don''t understand bitch. You will only leave this place in one of two ways. Either as a sex slave - or as a corpse."'
+	'"Please... please! I can''t bear this anymore! I''ll do anything, just let me go!" you tearfully plead.'
+	'"You don''t understand bitch. You only leave this place in one of two ways. Either as a sex slave - or as a corpse."'
 	'"But..."'
-	'"You will be sold to someone as their slave. If you won''t accept that role, then you will be utilized for the more perverted needs of our customers. Those girls usually don''t survive for long.'
+	'"You''ll be sold to someone as their slave. If you won''t accept that, then you will be utilized for the more perverted needs of our customers. Those girls usually don''t survive for long.'
 	'A sense of dread washes over you as your mind races to think of what horrors might await you.'
 	'"Now, show me what a good slave you are."'
 
@@ -362,7 +360,7 @@ if $ARGS[0] = 'abdBrokenGivePainkillerNo':
 	menu_off = 1
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/pill1.mp4"></video></center>'
 	'You see anger flash across your master''s face. "Refusing a gift? It seems like this slave needs to be reminded of her place."'
-	'He ties you down on top of the table then secures your head. Some devious device is attached to your nose which pulls your head backwards. It forces you to open your mouth slightly.'
+	'He ties you down on top of the table and secures your head. Some devious device is attached to your nose which pulls your head backwards and forces you to open your mouth slightly.'
 	'Your master takes a clamp and pulls your tongue out. It tightly and painfully squeezes it. He then secures the pill on top of a dildo and pushes the tip down your throat.'
 	*nl
 	'Your gag reflex activates, causing you to gag and choke, but he doesn''t remove the dildo for as long as you try to throw up.'
@@ -381,7 +379,7 @@ if $ARGS[0] = 'abdBrokenAsk':
 	menu_off = 1
 	gs 'stat'
 	
-	'Your master responds. "Very good. What do you want me to do to you slave?"'
+	'Your master responds. "Very good. What do you want me to do to you, slave?"'
 	
 	act 'Please fuck my mouth Master':gt 'abduction', 'abdBreak2FuckB1'
 	
@@ -399,7 +397,7 @@ if $ARGS[0] = 'abdBreak2FuckA1':
 	gs 'cum_call', '', 'Master', 0,'', spot, svol
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokena1.jpg"></center>'
 	'Your tormentor unchains you and throws you onto your dirty bed.'
-	'Spreading your legs wide apart you spit on your hand and smear it on your pussy. "Come and take me, Master."'
+	'Spreading your legs wide apart, you spit on your hand and smear it on your pussy. "Come and take me, Master."'
 	'"I like my bitches restrained!" your master says and ties your hands and feet together, securing your position.'
 	'His dick penetrates your pussy easily with the saliva doing its job.'
 	gs 'arousal', 'vaginal', 15, 'sub', 'bound'
@@ -419,7 +417,7 @@ if $ARGS[0] = 'abdBreak2FuckA2':
 	'After some mouthfucking and gagging, he cums in your mouth.'
 	if broken = 1:
 		*nl
-		'"Very good, slave. You are on the path to redeem yourself." Finished with you, he releases your arms to secure you back in your usual location. He then leaves your room with the door closing behind him.'
+		'"Very good, slave. You''re on the path to redeeming yourself." Finished with you, he releases your arms to secure you back in your usual location before leaving.'
 	end
 	broken += 1
 	gs 'arousal', 'bj', 5, 'sub', 'bound'
@@ -436,9 +434,9 @@ if $ARGS[0] = 'abdBreak2FuckB1':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokenb1.jpg"></center>'
 	'Your master unchains you and leads you to a device.'
 	'You can see that it''s meant to restrain a person in a prone position with their head at the same height as someone''s crotch.'
-	'You want to please your master, so you lie down on it straight away. You dutifully await the attaching of the restraints.'
+	'You want to please your master, so you lie down on it straight away and dutifully await the attaching of the restraints.'
 	'After your master ties you up, he walks up to your head. Your already open mouth is then roughly fucked by his member.'
-	'When he''s about to cum, he pulls his dick out and points it towards your face. You welcome the flying sperm with open eyes and mouth with your tongue out.'
+	'When he''s about to cum, he pulls his dick out and points it towards your face. You stick your tongue out in anticipation. His cum soon splatters across your face and tongue.'
 	gs 'arousal', 'bj', 20, 'sub', 'bound', 'rough'
 	gs 'stat'
 
@@ -451,11 +449,11 @@ if $ARGS[0] = 'abdBreak2FuckB2':
 	pain['asshole'] += 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/brokenb2.jpg"></center>'
 	'Surprisingly, his dick is not wearing out. He moves behind you and starts to penetrate your ass.'
-	'You try to relax your anus as much as you can, so he enters you quite easily. Just a small reminder of pain goes through your muscles.'
+	'You relax your anus as much as you can, so he enters you quite easily. Just a small hint of pain pulses through you.'
 	'Fucking you furiously for some time, your master cums deep inside you.'
 	if broken = 1:
 		*nl
-		'"Very good, slave. You are on the path to redeem yourself." Finished with you, he releases your arms to secure you back in your usual location. He then leaves your room with the door closing behind him.'
+		'"Very good, slave. You''re on the path to redeeming yourself." Finished with you, he releases your arms to secure you back in your usual location before leaving.'
 	end
 	broken += 1
 	gs 'cum_call', 'anus', 'Master'
@@ -472,7 +470,7 @@ if $ARGS[0] = 'abdSleep':
 	pcs_sleep += 50
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/bed1.jpg"></center>'
-	'You have slept for several hours, but nightmares have awakened you.'
+	'You''ve slept for several hours, but nightmares have awakened you.'
 	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
@@ -480,8 +478,7 @@ if $ARGS[0] = 'abdEscape':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/cellarwindow1.jpg"></center>'
-	'You are looking at the only window in the basement.'
-	'However, there is a lock on it to prevent your escape.'
+	'Looking at the only window in the basement, you notice that there''s a lock on it to prevent your escape.'
 	minut += 5
 	gs 'stat'
 	act 'Try to break the lock':gt 'abduction', 'abdEscapeWindow1'
@@ -497,10 +494,10 @@ if $ARGS[0] = 'abdEscapeWindow1':
 	gs 'stat'
 	breakChance = rand(1, 100)
 	if breakChance <= 50:
-		'You hear someone slam a door nearby. Maybe it''s your master returning?!'
-		'You are so close to unscrewing the window! You decide to...'
+		'You hear someone slam a door nearby. Maybe it''s your master returning?'
+		'You''re close to unscrewing the window! You decide to...'
 		act 'Run back to your bed and reattach your leash to the wall':gt 'abduction', 'abdSomeoneComing'
-		act 'Try to unscrew it desperately':gt 'abduction', 'abdEscapeWindow2'
+		act 'Try to unscrew it':gt 'abduction', 'abdEscapeWindow2'
 	else
 		'No luck. The window is still screwed in very tight.'
 		act 'Go back':gt 'abduction', 'abdFood'
@@ -535,9 +532,9 @@ if $ARGS[0] = 'abdEscapeWindow3':
 	gs 'underwear', 'dispose'
 	gs 'clothing', 'wear_last_worn'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/midnowhere<<i>>.jpg"></center>'
-	'Pulling on your clothes as you run, you finally think you are far enough away and try to find your bearings.'
+	'Pulling on your clothes as you run, you finally think you''re far enough away and try to find your bearings.'
 	'Any underwear you had with you is lost, but that''s a small price to pay for your freedom.'
-	'You are in the middle of nowhere.'
+	'Looking around, you discover that you''re in the middle of nowhere.'
 	*nl
 	'Before you in the distance, you see a shimmer of something that could be water.'
 	'If you turn back, you can hear distant noise of what could be a highway.'
@@ -590,8 +587,8 @@ if $ARGS[0] = 'abdFood':
 
 	chainChance = rand(1,100)
 	if chainChance <= 20 and (rapeCount > 5 or tortureCount > 5):
-		'You spot a loose link on your chain. You try to manipulate it, and you manage to free yourself from the wall.'
-		'<a href="exec:gt ''abduction'', ''abdEscape''">Go to the window</a>'
+		'You spot a loose link on your chain. You try to manipulate it, and manage to free yourself from the wall.'
+		'<a href="exec:gt ''abduction'', ''abdEscape''">Run to the window.</a>'
 	end
 	act 'Eat dried food (0:10)':
 		*clr & cla
@@ -739,7 +736,7 @@ if $ARGS[0] = 'abdRape':
 			'<center><video autoplay loop src="images/locations/shared/abduction/sex/mouthgagblow1.mp4"></video></center>'
 		end
 		'Your hands are tied. A metal ring, fastened by a leather gag, is inside your mouth, keeping it pried open.'
-		'You have to endure a very rough mouth fuck. He knows no limits and gags you as much as he wants. He does let you breathe from time to time, but for most of the experience you feel like passing out. Your saliva is all over his dick and drips onto your tits and stomach.'
+		'You have to endure a very rough mouth fuck. He knows no limits and gags you as much as he wants. He does let you breathe from time to time, but for most of the experience you feel like you''re about to pass out. Your saliva is all over his dick and drips onto your breasts and stomach.'
 		gs 'arousal', 'bj', 30, 'sub', 'bound', 'maso'
 		gs 'stat'
 
@@ -750,7 +747,7 @@ if $ARGS[0] = 'abdRape':
 		i = rand(1,5)
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/fucktiedpussy<<i>>.jpg"></center>'
 		'Your hands are tied, and you''re bent over the bed.'
-		'The guy starts to penetrate your pussy without warning. A sharp pain goes through your abdomen because your pussy is not wet enough to receive a dick.'
+		'The guy starts to penetrate your pussy without warning. A sharp pain shoots through your abdomen because your pussy isn''t wet enough to receive a dick.'
 		gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'maso'
 		gs 'stat'
 
@@ -765,7 +762,7 @@ if $ARGS[0] = 'abdRape':
 			'<center><video autoplay loop src="images/locations/shared/abduction/sex/fucktiedanal1.mp4"></video></center>'
 		end
 		'Your hands are tied, and you''re bent over the bed.'
-		'The guy starts to penetrate your ass without warning. A sharp pain goes through your anus as your ass is neither relaxed nor wet enough to receive a dick.'
+		'The guy starts to penetrate your ass without warning. A sharp pain shoots through your anus as your ass is neither relaxed nor wet enough to receive a dick.'
 		gs 'arousal', 'anal', 30, 'sub', 'bound', 'maso'
 		gs 'stat'
 
@@ -774,9 +771,9 @@ if $ARGS[0] = 'abdRape':
 		pain['asshole'] += 8
 		pcs_ass += 1
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/fistanal'+rand(1,5)+'.jpg"></center>'
-		'Your hands and feet are tied with your ass being high above your head. This is because you are hanging upside down.'
+		'Your hands and feet are bound as you hang upside down with your ass in the air.'
 		'The guy starts trying to push his thick fist inside your anus. At least he used a bit of lubricant...'
-		'When your sphincter fails to resist anymore, you hear a loud pop as his fist quickly penetrates your insides.'
+		'When your sphincter fails to resist anymore, you hear a loud pop as his fist quickly penetrates you.'
 		'He doesn''t stop there and pushes his hand deep. You can feel your intestines expanding as he opens his fist inside you.'
 		'The pain is unbearable, but he doesn''t care.'
 		gs 'arousal', 'anal_fist', 30, 'sub', 'bound', 'maso'
@@ -791,7 +788,7 @@ if $ARGS[0] = 'abdRape':
 		'Your hands and feet are tied with your ass raised higher than your head.'
 		'The guy starts pushing his thick fist deep inside your pussy. At least he used a bit of lubricant...'
 		'Suddenly, you feel his fingers touch your cervix. He''s doing it on purpose!'
-		'He''s pinching and pressing your cervix. You cry out loudly and try to shake him off, but you are bound. There''s no hope of success...'
+		'He''s pinching and pressing your cervix. You cry out loudly and try to shake him off, but you are bound tight. There''s no hope of success...'
 		'"Do you like it, slave?" He stops pushing, but you can feel a finger still brushing up against your cervix. "Should we penetrate another hole girl?"'
 		'"No! Please... stop... Just... stop..." you plead through tears.'
 		gs 'arousal', 'vaginal_fist', 30, 'sub', 'bound', 'maso'
@@ -811,7 +808,7 @@ if $ARGS[0] = 'abdRape':
 			'<center><video autoplay loop src="images/locations/shared/abduction/sex/mouthgagblow1.mp4"></video></center>'
 		end
 		'Your hands are tied. A metal ring, fastened by a leather gag, is inside your mouth, keeping it pried open.'
-		'You have to endure a very rough mouth fuck. He knows no limits and gags you as much as he wants. He does let you breathe from time to time, but for most of the experience you feel like passing out. Your saliva is all over his dick and drips onto your tits and stomach.'
+		'You have to endure a very rough mouth fuck. He knows no limits and gags you as much as he wants. He does let you breathe from time to time, but for most of the experience you feel like you''re about to pass out. Your saliva is all over his dick and drips onto your breasts and stomach.'
 		gs 'arousal', 'bj', 30, 'sub', 'bound', 'maso'
 		gs 'stat'
 
@@ -848,10 +845,9 @@ if $ARGS[0] = 'abdTortureA1':
 	minut += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/torturea1.jpg"></center>'
-	'You are taken from your bed and led to the far side of the basement. Suspicious looking rings and straps can be seen attached to the wall.'
-	'Your hands are secured with a rope high on the wall.'
-	'Your legs are unpleasantly lifted above your head and secured as well.'
-	'Now you are hanging by your hands with your pussy and ass available for any perverted usage.'
+	'You''re dragged from your bed and led to the far side of the basement. Suspicious looking rings and straps can be seen attached to the wall.'
+	'Your hands are secured with a rope high on the wall and your legs are unpleasantly lifted above your head and secured as well.'
+	'You''re now hanging by your hands with your pussy and ass available for any perverted usage.'
 	act 'Continue':gt 'abduction', 'abdTortureA2'
 end
 
@@ -875,11 +871,11 @@ if $ARGS[0] = 'abdTortureA3':
 	pain['asshole'] += 5
 	pcs_ass += 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/torturea3.jpg"></center>'
-	'After a while, the tormentor comes back and brings a dildo that''s attached to a long stick.'
-	'"Mmmphh!" is the only sound you are able to make in protest of what''s coming towards you.'
+	'After a while, the tormentor returns with a dildo attached to a long stick.'
+	'"Mmmphh!" is the only sound you''re able to make in protest of what''s coming towards you.'
 	'Without any warning, he stuffs the dildo inside your ass. It goes so deep that you can feel it push against your intestines.'
-	'He secures the stick to the ground then leaves the room.'
-	'You swing on the rope to the left and right as you try to push it out of your ass. However, it is too deep inside of you, and the stick does not move.'
+	'He secures the stick to the ground before leaving the room.'
+	'You swing on the rope left and right trying to push the dildo out of your ass. However, it''s too deep inside you.'
 	gs 'arousal', 'anal_dildo', 30, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -891,10 +887,10 @@ if $ARGS[0] = 'abdTortureA4':
 	menu_off = 1
 	pain['tummy'] += 5
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/torturea4.jpg"></center>'
-	'After what seems like an eternity, the tormentor comes back again.'
-	'Pleased to find you with tears and saliva all over your tits and stomach, he unscrews the stick.'
-	'As a last sign of the torture, he pushes the stick even deeper inside you in a single stroke then swiftly takes it out.'
-	'You start to tremble a lot, but you know it is finally over.'
+	'After what seems like an eternity, the tormentor returns.'
+	'Pleased to find you with tears and saliva all over your breasts and stomach, he unscrews the stick.'
+	'As a last sign of the torture, he pushes the stick even deeper inside you in a single thrust before swiftly removing it.'
+	'You start to tremble, but you know it''s finally over.'
 	gs 'arousal', 'foreplay', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -907,9 +903,8 @@ if $ARGS[0] = 'abdTortureB1':
 	minut += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortureb1.jpg"></center>'
-	'You are forced to the ground to lay on your stomach.'
-	'First your hands are tied together and raised high in the air. You can feel your joints being bent to their limits. Any more bending and your shoulders would pop.'
-	'Your legs are then forced wide apart and secured on opposite sides. You cannot move an inch.'
+	'You''re forced to lay on your stomach on the cold ground.'
+	'Your hands are tied together and raised high in the air. You can feel your joints being bent to their limits. Your legs are then forced wide apart and secured on opposite sides. You can''t move an inch.'
 	act 'Continue':gt 'abduction', 'abdTortureB2'
 end
 
@@ -918,7 +913,7 @@ if $ARGS[0] = 'abdTortureB2':
 	menu_off = 1
 	pain['asscheeks'] += 10
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortureb2.jpg"></center>'
-	'You hear your tormentor coming back towards you.'
+	'You hear your tormentor returning.'
 	'"Uummmphh!" is the sound your gagged mouth makes as the cane suddenly strikes your ass.'
 	'You are given a thorough ass whipping.'
 	gs 'arousal', 'foreplay', 10, 'sub', 'bound', 'maso', 'humiliation'
@@ -934,8 +929,8 @@ if $ARGS[0] = 'abdTortureB3':
 	pain['vaginal'] += 2
 	pcs_ass += 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortureb3.jpg"></center>'
-	'As soon as the whipping stops, you feel a new source of pain in both your pussy and your ass - something is being pushed inside both of your holes.'
-	'You are given no time to adjust, and both holes are fucked viciously, fast and deep.'
+	'As soon as the whipping stops, you feel a new source of pain in both your pussy and your ass - something is being pushed inside both your holes.'
+	'You''re given no time to adjust, and both your holes are fucked viciously, fast and deep.'
 	gs 'arousal', 'vaginal_dildo', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -948,7 +943,7 @@ if $ARGS[0] = 'abdTortureB4':
 	minut += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortureb4.jpg"></center>'
-	'Finally, your pussy and anus are left alone. Whatever was inside of you has been removed.'
+	'Finally, your pussy and ass are left alone. Whatever was inside you has been removed.'
 	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
@@ -956,10 +951,9 @@ if $ARGS[0] = 'abdTortureC1':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/torturec1.jpg"></center>'
-	'Your tormentor looks angry. Your hands are tied behind your back and legs.'
-	'He attaches a rope to your feet - you are lifted like a pig to be cleaned!'
-	'After some minutes of just hanging, your tormentor comes at you with a leather whip.'
-	'He spins you around and whips whatever comes before him. Ass, back, belly, pussy, legs, tits. The whip hits your exposed flesh and leaves angry looking welts behind.'
+	'Your tormentor looks angry. Your hands are tied behind your back and legs. He attaches a rope to your feet and you''re suddenlt lifted into the air upside down.'
+	'After a few minutes where you''re left hanging, your tormentor approaches you with a leather whip.'
+	'He spins you around and whips whatever comes before him. Ass, back, stomach, pussy, legs, breasts. The whip hits your exposed flesh and leaves angry looking welts behind.'
 	gs 'arousal', 'foreplay', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -989,8 +983,7 @@ if $ARGS[0] = 'abdTortureD1':
 	minut += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortured1.jpg"></center>'
-	'Your tormentor brings a crude rope...'
-	'You tremble as you wonder what he''s going to do with it... Will he spank you or is he tired of you and just wants to hang you?'
+	'Your tormentor brings a crude rope and you tremble as you wonder what he''s going to do with it.'
 	'You almost sigh in relief when he "just" ties you up.'
 	act 'Continue':gt 'abduction', 'abdTortureD2'
 end
@@ -999,10 +992,9 @@ if $ARGS[0] = 'abdTortureD2':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortured2.jpg"></center>'
-	'You are forced down on your knees on top of some kind of weird bench. The ropes are fixed so you cannot move an inch.'
-	'Not being able to see what is going on behind you, you suddenly feel something cold touching your asshole.'
-	'With a single thrust, something is shoved really deep inside your anus.'
-	'Tears stream down your face and you cry out loudly...'
+	'You''re forced down on your knees on top of some kind of bench. The ropes are fixed so you can''t move.'
+	'Not being able to see what''s going on behind you, you suddenly feel something cold touching your asshole.'
+	'With a single thrust, something is shoved deep inside your anus. Tears stream down your face and you cry out loudly.'
 	gs 'arousal', 'anal_dildo', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -1016,7 +1008,7 @@ if $ARGS[0] = 'abdTortureD3':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortured3.jpg"></center>'
 	'Next is your tender pussy. He shoves the dildo in, not giving you any time to adjust.'
 	'Last comes your mouth. Finally, you can see what is being inserted into your every hole: dildos attached to long wooden sticks.'
-	'The sticks are fixed tightly to the device - if you move just a bit, any one of them gets shoved even deeper. It brings you even more discomfort and pain to your already abused body.'
+	'The sticks are fixed tightly to the device - if you move just a bit, any one of them gets shoved even deeper. It brings even more discomfort and pain to your already abused body.'
 	'Your tormentor walks away to leave you in this state for what feels like an eternity.'
 	gs 'arousal', 'vaginal_dildo', 60, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
@@ -1028,8 +1020,7 @@ if $ARGS[0] = 'abdTortureD4':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/tortured4.jpg"></center>'
-	'Finally he comes back.'
-	'You are unplugged, but your torture is far from over.'
+	'He finally returns and comes back. You''re unplugged, but your torture is far from over.'
 	'"Suck me and this will be over. For now..."'
 	'You have no choice but to do what he orders.'
 	gs 'arousal', 'bj', 60, 'sub', 'bound', 'maso', 'humiliation'
@@ -1048,7 +1039,7 @@ if $ARGS[0] = 'abdTortureD5':
 	gs 'cum_call', 'mouth', 'Master'
 	gs 'stat'
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/tortured5.mp4"></video></center>'
-	'Even though your head is spinning and everything is aching inside you, you are able to make him cum in just a few minutes.'
+	'Even though your head is spinning and everything is aching inside you, you''re able to make him cum in just a few minutes.'
 	'Being bound, he shows you no remorse and fucks you raw before cumming in your very sore throat.'
 	gs 'arousal', 'vaginal', 20, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'arousal', 'anal', 20, 'sub', 'bound', 'maso', 'humiliation'
@@ -1060,32 +1051,31 @@ end
 
 if $ARGS[0] = 'abdBeSold':
 	menu_off = 1
-	'"We have a buyer for you." your master says with a cruel smile.'
-	act 'I do not want to be sold':gt 'abduction', 'abdConsiderSold'
+	'"We have a buyer for you..." your master says with a cruel smile.'
+	act 'I don''t want to be sold':gt 'abduction', 'abdConsiderSold'
 	act 'I want to leave':gt 'abduction', 'abdSoldSauna'
 end
 
 if $ARGS[0] = 'abdConsiderSold':
 	menu_off = 1
-	'"Are you sure slave?" he asks, after which he says "you will stay here and continue to be used..."'
-	act 'Yes, that''s what I want':gt 'abduction', 'abdNotSold'
-	act 'On second thought, I want to leave this place':gt 'abduction', 'abdSoldSauna'
+	'"Are you sure slave?" he asks. "You''ll stay here and continue to be used..."'
+	act 'Yes':gt 'abduction', 'abdNotSold'
+	act 'Change your mind':gt 'abduction', 'abdSoldSauna'
 end
 
 if $ARGS[0] = 'abdNotSold':
 	menu_off = 1
-	'"Very well. We will see each other again soon." your master says.'
+	'"Very well. We''ll see each other again soon," your master says.'
 	act 'Continue':gt 'abduction', 'abdRoom'
 end
 
 if $ARGS[0] = 'abdSoldSauna':
 	menu_off = 1
 	'"A nice lady from an established business." he smiles.'
-	'You are blindfolded and led away to a car.'
-	'After some time, you are led through doors and finally the blindfold is removed. You are in a backroom of a brothel.'
-	'"The madame of the brothel stands before you. "I paid 8000 <b>₽</b> for you bitch. Don''t make me regret this."'
-	'"Yes, madame." you reply.'
-	'"I''m not a bad person." she continues. "If you earn me at least five times more than what I paid, I may let you go."'
+	'You are blindfolded and led away to a car. After some time, you are led through doors and the blindfold is removed. You are in a backroom of a brothel.'
+	'"The madame of the brothel stands before you. "I paid 8000 <b>₽</b> for you, bitch. Don''t make me regret this."'
+	'"Yes, madame." you obediently reply.'
+	'"I''m not a bad person," she continues. "If you earn me at least five times more than what I paid, I may let you go."'
 	'With this faint sign of hope, she leaves you alone.'
 	workDolg = 40000
 
@@ -1109,7 +1099,7 @@ if $ARGS[0] = 'abdFailedCustomer':
 	minut += 5
 	gs 'stat'
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailed.mp4"></video></center>'
-	'Angrily, your master leads you back to the basement.'
+	'Your master angrily leads you back to the basement.'
 
 	act 'Continue':gt 'abduction', 'abdFailedCustomer1'
 end
@@ -1131,7 +1121,7 @@ if $ARGS[0] = 'abdFailedCustomer2':
 	menu_off = 1
 	pain['asshole'] += 2
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailed2.mp4"></video></center>'
-	'He then forces a considerable plug into your anus with little warning. Being tied up, you cannot resist in any way.'
+	'He then forces a considerable plug into your anus with little warning. Being tied up, you can''t resist in any way.'
 	gs 'arousal', 'anal_dildo', 5, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -1145,9 +1135,8 @@ if $ARGS[0] = 'abdFailedCustomer3':
 	pain['throat'] += 10
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailed3.mp4"></video></center>'
 	'Continuing, he blindfolds you and attaches a ring gag, which stops you from closing your mouth. Now completely helpless, you hear him walking away, leaving you to wonder what he has planned next.'
-	'After some time of relative quiet, you hear someone coming. In a matter of seconds, someone grabs your head. He pushes his warm cock into your mouth and down your throat, making it impossible to breathe.'
-	'You panic and freak out, but he doesn''t let go until you are on the verge of passing out.'
-	'Only then does he stop, not letting you escape into unconsciousness.'
+	'After some time of relative quiet, you hear someone approaching. In a matter of seconds, someone grabs your head. He pushes his warm cock into your mouth and down your throat, making it impossible to breathe.'
+	'You panic, but he doesn''t let go until you''re on the verge of passing out. Only then does he stop, not letting you escape into unconsciousness.'
 	pcs_mood = 5
 	gs 'arousal', 'bj', 15, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
@@ -1169,7 +1158,7 @@ if $ARGS[0] = 'abdFailedCustomerElectro1':
 	pain['nipples'] += 20
 	pain['breasts'] += 20
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedelectro1.mp4"></video></center>'
-	'Your restraints are removed, but you are led to a wall to be chained anew to a different device.'
+	'Your restraints are removed, but you''re led to a wall to be chained anew to a different device.'
 	'This time, you can see everything - but you wish you couldn''t.'
 	'Electrodes are taped to your nipples, clitoris, and vagina.'
 	'Your master takes a few steps back and pushes a button on a remote. In that moment, an electric shock goes through your whole body, causing you to shake.'
@@ -1188,9 +1177,8 @@ if $ARGS[0] = 'abdFailedCustomerElectro2':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedelectro2.mp4"></video></center>'
 	'Your legs are pulled into the air and restrained to a wall. You hang by your hands with both of your holes fully at their disposal.'
 	'The first plug is violently taken out with a loud "SCHLOP".'
-	'However, your anus isn''t left empty for long as in a few moments a new plug is inserted. Fear grips you as you see the wires hanging out of it.'
-	'The remote button is pushed again, and this time you can feel it all inside your intestines and anus.'
-	'The sensation is very strange. It''s as if your belly was full of popping popcorn.'
+	'However, your anus isn''t left empty for long as a new plug is quickly inserted. Fear grips you as you see the wires hanging out of it.'
+	'The remote button is pushed again, and this time you can feel it inside your intestines and anus.'
 	gs 'arousal', 'anal_dildo', 30, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -1209,7 +1197,7 @@ if $ARGS[0] = 'abdFailedCustomerElectro3':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefailedelectro3.jpg"></center>'
 	'Finally, your torment is at an end.'
 	'"Remember this lesson slave. If you disappoint a customer again, a more severe punishment may be forced upon you."'
-	'"If you are found to be more trouble than you are worth, one of our more perverse customers will pay us well for the opportunity to torture you to death."'
+	'"If you''re found to be more trouble than you''re worth, one of our more perverse customers will pay us well for the opportunity to torture you to death."'
 	'You just nod that you understand and remain silent.'
 	*nl
 	'Your master leaves without another word - and you are left hanging on the wall.'
@@ -1223,8 +1211,8 @@ if $ARGS[0] = 'abdFailedCustomerHook1':
 	menu_off = 1
 	pain['asshole'] += 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedhook1.mp4"></video></center>'
-	'You are put on all fours and chained. Your ass is high in the air, showing both your holes to anyone standing behind you.'
-	'Somebody you don''t see comes up from behind to remove the buttplug with a loud "SCHLOP" and immediately after... very violently... shoves something cold inside your anus.'
+	'You''re put on all fours and chained. Your ass is high in the air, showing both your holes to anyone standing behind you.'
+	'Somebody you don''t see approaches from behind to remove the buttplug with a loud "SCHLOP" and immediately, and very violently, shoves something cold inside your anus.'
 	'You cry in both pain and surprise.'
 	gs 'arousal', 'anal_dildo', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
@@ -1239,7 +1227,7 @@ if $ARGS[0] = 'abdFailedCustomerHook2':
 	pain['clitoris'] += 20
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedhook2.mp4"></video></center>'
 	'Trying to look behind you, you see your master bring something in his hands.'
-	'He puts it up against your pussy and suddenly it starts to vibrate.'
+	'He puts it up against your pussy and it suddenly starts to vibrate.'
 	'The intensity is too much for you, and instead of bringing you pleasure, it feels like a devious mix of intense pain and orgasmic pulses.'
 	'After a while, you piss yourself while experiencing something like a very painful orgasm.'
 	$orgasm_or = 'yes'
@@ -1256,8 +1244,8 @@ if $ARGS[0] = 'abdFailedCustomerHook3':
 	pain['cervix'] += 20
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedhook3.mp4"></video></center>'
 	'Your pussy is very sensitive after the vibrator treatment, and your master knows that all too well.'
-	'He slams his dick deep inside you to hit your cervix. It seems to you that he is doing it on purpose.'
-	'You try to beg for mercy, but he just doesn''t care. He wants you to suffer - this is your punishment...'
+	'He slams his dick deep inside you to hit your cervix. It seems like he''s doing it on purpose.'
+	'You try to beg for mercy, but he doesn''t care. He wants you to suffer - this is your punishment...'
 	gs 'arousal', 'vaginal', 20, 'sub', 'bound', 'maso', 'humiliation', 'rough'
 	gs 'arousal', 'end'
 	gs 'stat'
@@ -1276,12 +1264,11 @@ if $ARGS[0] = 'abdFailedCustomerHook4':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefailedhook4.mp4"></video></center>'
 	'Finally, you faint from all the abuse.'
 	'You wake up alone in the room, but your position has been changed while you were unconscious.'
-	'You are bound on some kind of a stool, hands tied together, and most importantly, your ass is lifted in the air and hanging by the hook.'
+	'You are bound on some kind of stool, hands tied together, and most importantly, your ass is lifted in the air and hanging by the hook.'
 	*nl
 	'You start to realize the pain of hanging by your asshole, so you try to push your legs up to move your ass even higher.'
-	'However, you can only remain in that position for a little while before you get tired and relax your legs. The pain quickly returns to your hook elevated asshole.'
-	'Nobody is nearby, but you already know all too well that no one will take pity on you anyway...'
-    'You just have to wait hoping this part of your punishment will end soon.'
+	'However, you can only remain in that position for a few minutes before you get tired and are forced to relax your legs, allowing the pain to quickly return to your stretched asshole.'
+	'Nobody is nearby, but you know all too well that no one will take pity on you anyway. You just have to hope that this part of your punishment will end soon.'
 
 	act 'Wait':gt 'abduction', 'abdFailedCustomerChainedBack'
 end
@@ -1294,7 +1281,7 @@ if $ARGS[0] = 'abdFailedCustomerWhip1':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorewhip1.mp4"></video></center>'
 	'Your master removes your bondage and in anger pushes you on the ground before spreading your legs.'
 	'"You fucking whore! You''re going to learn how to be more fucking obedient!"'
-	'He starts to spank your pussy with his big hand.'
+	'He starts to spank your pussy with his hand.'
 	gs 'arousal', 'foreplay', 10, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -1309,12 +1296,11 @@ if $ARGS[0] = 'abdFailedCustomerWhip2':
 	pain['asscheeks'] += 20
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorewhip2.mp4"></video></center>'
 	'After a while, he cools down, but your pussy is already red and stinging.'
-	'He grabs you by your hair and leads you to another device. You have to lie down on your shoulders and put your ass high in the air.'
-	'He affixes you into this uncomfortable position with some straps.'
+	'He grabs you by your hair and leads you to another device. You have to lie down on your shoulders and put your ass high in the air before he affixes you into this uncomfortable position with some straps.'
 	*nl
-	'Content with how helpless and at his disposal you are, he grabs a rubber baton.'
+	'Content with how helpless you are, he grabs a rubber baton.'
 	'He hits you hard, targeting your exposed labia, causing intense pain to shoot through your body.'
-	'From time to time, he alternates, by giving your asscheeks an even harder hit.'
+	'From time to time, he alternates, giving your asscheeks an even harder hit.'
 	gs 'arousal', 'foreplay', 20, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
@@ -1330,9 +1316,9 @@ if $ARGS[0] = 'abdFailedCustomerWhip3':
 	pcs_ass += 1
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorewhip3.mp4"></video></center>'
 	'As if the baton wasn''t enough, your master reaches for a long dildo attached to a stick.'
-	'With one stroke he penetrates your dry ass and fixes the stick to the wall. The stick is not wooden... it is metal and very heavy. It''s weight is enough to push your guts aside as it presses against your intestinal walls.'
+	'With one heavy thrust, he penetrates your dry ass and fixes the stick to the wall. The metal stick''s weight is enough to push your guts aside as it presses against your intestinal walls.'
 	*nl
-	'He then picks up a different weapon - a cat-o-nine whip that''s made of leather.'
+	'He then picks up a different weapon - a leather cat-o-nine whip.'
 	'His target is the same - your now raw and heavily stinging labia and clitoris.'
 	gs 'arousal', 'anal', 20, 'sub', 'bound', 'maso', 'humiliation', 'rough'
 	gs 'stat'
@@ -1351,23 +1337,22 @@ if $ARGS[0] = 'abdFailedCustomerWhip4':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorewhip4.mp4"></video></center>'
 	'After this even rougher punishment, you are on the brink of fainting.'
 	'Your master brings another device on a stick - a vibrator with a large head.'
-	'He buries the head deep between your labia while touching your clitoris directly, your position ideal for this.'
+	'He buries the head deep between your labia while touching your clitoris directly, your position being ideal for this.'
 	*nl
 	'When the device is turned on, you realize it must be on the highest setting. It almost makes you orgasm instantly.'
-	'Your master leaves, and you are left alone with this device turned on, the anal dildo still pushing deep into your ass as well. Everything aches from this inhuman position.'
-	'You pass in and out of consciousness, every now and then having strong orgasms mixed with a lot of pain. You tremble helplessly.'
-	'The only sounds in the room are your moans and the humming of the vibrator.'
+	'Your master leaves, and you''re left alone with this device teasing you as the dildo continues pushing deep into your ass. Everything aches from this inhuman position.'
+	'You pass in and out of consciousness while having intense orgasms mixed with a lot of pain. You tremble helplessly, the only sounds in the room being your moans and the humming of the vibrator.'
 	gs 'arousal', 'vaginal_vibe', 240, 'sub', 'bound', 'maso', 'humiliation'
 	gs 'stat'
 
-	act 'Endure':gt 'abduction', 'abdFailedCustomerChainedBack'
+	act 'Endure it':gt 'abduction', 'abdFailedCustomerChainedBack'
 end
 
 if $ARGS[0] = 'abdFailedCustomerChainedBack':
 	menu_off = 1
 	minut += 5
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/chainedback.jpg"></center>'
-	'After what seems like an eternity, you''re unbound and returned to your usual place - chained to the wall.'
+	'After what seems like an eternity, you''re unbound and chained back to the wall.'
 
 	act 'Continue':gt 'abduction', 'abdRoom'
 end
@@ -1379,7 +1364,7 @@ if $ARGS[0] = 'abdTrainDildos':
 	dildoBig = 30
 	dildoHorse = 35
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhoredildos1.jpg"></center>'
-	'You take the dildos from the ground and clean them up a bit in the shower.'
+	'You take the dildos from the ground and clean them up in the shower.'
 	'There are four of them: small, regular, big, and horse sized.'
 
 	act 'Train your ass':gt 'abduction', 'abdTrainDildosAnalGate'
@@ -1424,9 +1409,9 @@ end
 if $ARGS[0] = 'abdTrainDildosSmall':
 	menu_off = 1
 	if pcs_vag > dildoSmall:
-		'You feel that your pussy can accommodate this dildo easily.'
+		'You feel that your pussy can easily accommodate this dildo.'
 	else
-		'You feel that this dildo will stretch your pussy, making it a bit deeper and wider.'
+		'This dildo will stretch your pussy, making it a bit deeper and wider.'
 	end
 	act 'Use it':gt 'abduction', 'abdTrainDildosSmallUse'
 	act 'Choose different dildo':gt 'abduction', 'abdTrainDildosVaginaGate'
@@ -1455,10 +1440,10 @@ end
 if $ARGS[0] = 'abdTrainDildosRegular':
 	menu_off = 1
 	if pcs_vag >= dildoRegular:
-		'You feel that your pussy can accommodate this dildo easily.'
+		'You feel that your pussy can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosRegularUse'
 	elseif pcs_vag <= dildoRegular and pcs_vag > dildoSmall:
-		'You feel that this dildo will stretch your pussy, making it a bit deeper and wider.'
+		'This dildo will stretch your pussy, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosRegularUse'
 	else
 		'You can clearly see that this dildo will tear your pussy apart if it''s inserted all the way in.'
@@ -1492,7 +1477,7 @@ if $ARGS[0] = 'abdTrainDildosBig':
 		'You feel that your pussy can accommodate this dildo easily.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosBigUse'
 	elseif pcs_vag <= dildoBig and pcs_vag > dildoRegular:
-		'You feel that this dildo will stretch your pussy, making it a bit deeper and wider.'
+		'This dildo will stretch your pussy, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosBigUse'
 	else
 		'You can clearly see that this dildo will tear your pussy apart if it''s inserted all the way in.'
@@ -1523,10 +1508,10 @@ end
 if $ARGS[0] = 'abdTrainDildosHorse':
 	menu_off = 1
 	if pcs_vag >= dildoHorse:
-		'You feel that your pussy can accommodate this dildo easily.'
+		'Despite its size, you feel that your pussy can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosHorseUse'
 	elseif pcs_vag <= dildoHorse and pcs_vag > dildoBig:
-		'You feel that this dildo will stretch your pussy, making it a bit deeper and wider.'
+		'This dildo will stretch your pussy, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosHorseUse'
 	else
 		'You can clearly see that this dildo will tear your pussy apart if it''s inserted all the way in.'
@@ -1558,9 +1543,9 @@ end
 if $ARGS[0] = 'abdTrainDildosAnalSmall':
 	menu_off = 1
 	if pcs_ass > dildoSmall:
-		'You feel that your anus can accommodate this dildo easily.'
+		'You feel that your anus can easily accommodate this dildo.'
 	else
-		'You feel that this dildo will stretch your anus, making it a bit deeper and wider.'
+		'This dildo will stretch your anus, making it a bit deeper and wider.'
 	end
 	act 'Use it':gt 'abduction', 'abdTrainDildosAnalSmallUse'
 	act 'Choose different dildo':gt 'abduction', 'abdTrainDildosAnalGate'
@@ -1589,10 +1574,10 @@ end
 if $ARGS[0] = 'abdTrainDildosAnalRegular':
 	menu_off = 1
 	if pcs_ass >= dildoRegular:
-		'You feel that your anus can accommodate this dildo easily.'
+		'You feel that your anus can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalRegularUse'
 	elseif pcs_ass <= dildoRegular and pcs_ass > dildoSmall:
-		'You feel that this dildo will stretch your anus, making it a bit deeper and wider.'
+		'This dildo will stretch your anus, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalRegularUse'
 	else
 		'You can clearly see that this dildo will tear your anus apart if it''s inserted all the way in.'
@@ -1623,10 +1608,10 @@ end
 if $ARGS[0] = 'abdTrainDildosAnalBig':
 	menu_off = 1
 	if pcs_ass >= dildoBig:
-		'You feel that your anus can accommodate this dildo easily.'
+		'You feel that your anus can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalBigUse'
 	elseif pcs_ass <= dildoBig and pcs_ass > dildoRegular:
-		'You feel that this dildo will stretch your anus, making it a bit deeper and wider.'
+		'This dildo will stretch your anus, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalBigUse'
 	else
 		'You can clearly see that this dildo will tear your anus apart if it''s inserted all the way in.'
@@ -1657,10 +1642,10 @@ end
 if $ARGS[0] = 'abdTrainDildosAnalHorse':
 	menu_off = 1
 	if pcs_ass >= dildoHorse:
-		'You feel that your anus can accommodate this dildo easily.'
+		'Despite its size, you feel that your anus can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalHorseUse'
 	elseif pcs_ass <= dildoHorse and pcs_ass > dildoBig:
-		'You feel that this dildo will stretch your anus making it a bit deeper and wider.'
+		'This dildo will stretch your anus, making it a bit deeper and wider.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosAnalHorseUse'
 	else
 		'You can clearly see that this dildo will tear your anus apart if it''s inserted all the way in.'
@@ -1691,9 +1676,9 @@ end
 if $ARGS[0] = 'abdTrainDildosMouthSmall':
 	menu_off = 1
 	if pcs_throat > dildoSmall:
-		'You feel that your throat can accommodate this dildo easily.'
+		'You feel that your throat can easily accommodate this dildo.'
 	else
-		'You feel that this dildo will stretch your throat, making it a bit deeper.'
+		'This dildo will stretch your throat, making it a bit deeper.'
 	end
 	act 'Use it':gt 'abduction', 'abdTrainDildosMouthSmallUse'
 	act 'Choose different dildo':gt 'abduction', 'abdTrainDildosMouthGate'
@@ -1722,10 +1707,10 @@ end
 if $ARGS[0] = 'abdTrainDildosMouthRegular':
 	menu_off = 1
 	if pcs_throat >= dildoRegular:
-		'You feel that your throat can accommodate this dildo easily.'
+		'You feel that your throat can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthRegularUse'
 	elseif pcs_throat <= dildoRegular and pcs_throat > dildoSmall:
-		'You feel that this dildo will stretch your throat, making it a bit deeper.'
+		'This dildo will stretch your throat, making it a bit deeper.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthRegularUse'
 	else
 		'You can clearly see that this dildo will tear your throat apart if it''s inserted all the way in.'
@@ -1756,10 +1741,10 @@ end
 if $ARGS[0] = 'abdTrainDildosMouthBig':
 	menu_off = 1
 	if pcs_throat >= dildoBig:
-		'You feel that your throat can accommodate this dildo easily.'
+		'You feel that your throat can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthBigUse'
 	elseif pcs_throat <= dildoBig and pcs_throat > dildoRegular:
-		'You feel that this dildo will stretch your throat, making it a bit deeper.'
+		'This dildo will stretch your throat, making it a bit deeper.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthBigUse'
 	else
 		'You can clearly see that this dildo will tear your throat apart if it''s inserted all the way in.'
@@ -1790,10 +1775,10 @@ end
 if $ARGS[0] = 'abdTrainDildosMouthHorse':
 	menu_off = 1
 	if pcs_throat >= dildoHorse:
-		'You feel that your throat can accommodate this dildo easily.'
+		'Despite its size, you feel that your throat can easily accommodate this dildo.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthHorseUse'
 	elseif pcs_throat <= dildoHorse and pcs_throat > dildoBig:
-		'You feel that this dildo will stretch your throat, making it a bit deeper.'
+		'This dildo will stretch your throat, making it a bit deeper.'
 		act 'Use it':gt 'abduction', 'abdTrainDildosMouthHorseUse'
 	else
 		'You can clearly see that this dildo will tear your throat apart if it''s inserted all the way in.'

+ 136 - 160
locations/abductionCustomer.qsrc

@@ -5,7 +5,7 @@ if $ARGS[0] = 'abdCustomerGate':
 	'Your master approaches you. "Hello, slave."'
 	'"I have a customer here who came to rent you for a while. Do whatever he asks of you."'
 	buyout = 0
-	act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
+	act 'Yes, Master':gt 'abductionCustomer', 'abdCustomerGo'
 end
 
 if $ARGS[0] = 'abdCustomerGateBuyout':
@@ -13,7 +13,7 @@ if $ARGS[0] = 'abdCustomerGateBuyout':
 	'Your master approaches you. "Hello, slave."'
 	'"I have a customer here that came to rent you for a while. Do whatever he asks of you."'
 	buyout = 1
-	act 'Yes, Master.':gt 'abductionCustomer', 'abdCustomerGo'
+	act 'Yes, Master':gt 'abductionCustomer', 'abdCustomerGo'
 end
 
 if $ARGS[0] = 'abdCustomerGo':
@@ -174,10 +174,10 @@ if $ARGS[0] = 'abdCustomer':
 		$bName = 'Leonid'
 		$bSurname = 'Nosov'
 		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel1.jpg"></center>'
-		'As you are led to the room, as usual, you see the man standing opposite of you.'
-		'Right away you can see that he is just another bastard coming here to use your <<age>> years young body.'
-		'Your master leaves you in the center of the room. You are still kneeling with the leash attached to your collar.'
-		'As the door closes behind him, the customer slowly turns, so you can finally see his face.'
+		'As you are led to the room as usual, you see the man standing opposite of you.'
+		'Right away, you can see that he is just another bastard coming here to use your body.'
+		'Your master leaves you in the center of the room, kneeling with the leash attached to your collar.'
+		'As the door closes behind him, the customer slowly turns so you can finally see his face.'
 		act 'Look at his face':gt 'abductionCustomer', 'abdCustomer-buyout1'
 	else
 		'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
@@ -196,13 +196,13 @@ if $ARGS[0] = 'abdCustomer':
 			'"That''s how I like it."'
 		else
 			'"Good number. She''s a good slut, too."'
-			'"We will see."'
+			'"We shall see."'
 		end
 		act 'Sob and wait':gt 'abductionCustomer', 'abdCustomer-virgin1'
 	else
 		if buyout = 0:
 			'He is clearly expecting you to start pleasuring him. You decide to:'
-			act 'Show him your beautiful body':gt 'abductionCustomer', 'abdCustomer-show'
+			act 'Show him your body':gt 'abductionCustomer', 'abdCustomer-show'
 			act 'Unzip his pants':gt 'abductionCustomer', 'abdCustomer-unzip'
 		end
 	end
@@ -213,7 +213,7 @@ if $ARGS[0] = 'abdCustomer-buyout1':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/leonid.jpg"></center>'
 	'As you look up at his face, a chill runs down your spine - you know him!'
 	'You remember this man from one of the parent-school conferences. It''s Dimka''s dad, <<$bName>>!'
-	'He recognizes you too. "Oh... what the? Who do we have here? Isn''t this that missing girl, <<$pcs_firstname>> <<$pcs_lastname>>?'
+	'He recognizes you too. "Oh... what the? Who do we have here? Aren''t that missing girl, <<$pcs_firstname>> <<$pcs_lastname>>?'
 	*nl
 	'With a trembling voice, only a few words leave your mouth. "Th... that''s me mister <<$bSurname>>..."'
 	'"You do realize that the police have already given up searching for you. As if they made any effort though..."'
@@ -221,8 +221,8 @@ if $ARGS[0] = 'abdCustomer-buyout1':
 	'There is a short period of silence, but despite the unexpected situation, you keep kneeling with your back straight and breasts jutting forward, as you have been trained to do.'
 	
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel2.jpg"></center>'
-	'Then suddenly, the look on <<$bName>>''s face changes from surprised to something else.'
-	'He comes up to you and gently caresses your face, "Plaything, you say? And do you like it?"'
+	'The look on <<$bName>>''s face then changes from surprised to something else.'
+	'He approaches you and gently caresses your face. "Plaything, you say? And do you like it?"'
 	'Surprised by such a question, you consider how to reply:'
 	
 	gs 'willpower', 'misc', 'self', 'hard'
@@ -242,21 +242,21 @@ end
 if $ARGS[0] = 'abdCustomer-buyout2':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
 	'"What a nice submissive slut you have become. What would your mother say about this?"'
-	'"I''d rather you didn''t let her know how I ended up." you meekly reply.'
+	'"I''d rather you didn''t let her know how I ended up..." you meekly reply.'
 	'"This establishment really gets the job done. I must commend the owner."'
 	*nl
 	'He leaves the room and you can hear the echo of a discussion between him and your master.'
-	'After a while, <<$bName>> comes back. "Let''s go <<$pcs_firstname>>." He grabs your leash and leads you outside the room into the hallway.'
-	'"B-but... where are you taking me? I have never been in this part of the house before."'
-	'"You still don''t understand, do you slut? I own you now. I''ve bought you and you are now my property. You are... my slave."'
-	'You are still naked and collared as he leads you outside to his car. You are forced to get into his trunk.'
+	'After a while, <<$bName>> returns. "Let''s go <<$pcs_firstname>>." He grabs your leash and leads you outside the room into the hallway.'
+	'"B-but... where are you taking me? I''ve never been in this part of the house before."'
+	'"You still don''t understand, do you slut? I own you now. I''ve just bought you and you are now my property. You are... my slave."'
+	'You''re still naked and collared as he leads you outside to his car. You are forced to get into the trunk.'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
 end
 if $ARGS[0] = 'abdCustomer-buyout3':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreleonid1.mp4"></video></center>'
 	'"In that case, let''s have some fun before we get straight to business."'
 	'He slaps your face so hard that you lose your balance and fall face first onto the floor.'
-	'You are taken by surprise by the blow - you had started to think that you were finally about to be saved from all of this.'
+	'You are taken by surprise by the blow - you thought you were finally about to be saved from all of this.'
 	'However, <<$bName>> seems to be as perverted as all the other men that have used you previously.'
 	'Stepping above you as you helplessly lie on the floor, he opens his zipper to pull out his dick.'
 	'You can clearly see his <<dick>> cm long <<$dick_girth>> dick swing above you in the air.'
@@ -281,18 +281,18 @@ if $ARGS[0] = 'abdCustomer-buyout4':
 	'A few minutes later, <<$bName>> comes back into the room. "I really like you <<$pcs_firstname>>."'
 	*nl
 	'He grabs your leash and leads you outside the room into the hallway.'
-	'"B-but... where are you taking me? I have never been in this part of the house."'
-	'"You still don''t understand, do you slut? I own you now. I''ve bought you and you are now my property. You are... my slave."'
-	'You are still naked and collared as he leads you outside to his car. You are forced to get into his trunk.'
+	'"B-but... where are you taking me? I''ve never been in this part of the house before."'
+	'"You still don''t understand, do you slut? I own you now. I''ve just bought you and you are now my property. You are... my slave."'
+	'You''re still naked and collared as he leads you outside to his car. You are forced to get into the trunk.'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
 end
 if $ARGS[0] = 'abdCustomer-buyoutLeave':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/garage.jpg"></center>'
-	'Stuffed inside of the trunk, you can only hear the sound of the engine and the pavement below as he drives you somewhere unknown.'
-	'After an unknown amount of time, the sound of the pavement stops, and the engine shuts off, leaving only silence.'
-	'<<$bName>> opens the trunk. Your eyes blink to adjust to the dimly lit area, and you realize that you are in an underground parking garage.'
+	'Stuffed inside the trunk, you can only hear the sound of the engine and the pavement below as he drives you somewhere unknown.'
+	'After an unknown amount of time, the engine shuts off, leaving only silence.'
+	'<<$bName>> opens the trunk. Your eyes blink to adjust to the dimly lit area, and you realize that you''re in an underground parking garage.'
 	'You climb out, still naked and collared like a dog. It seems he doesn''t care about your feelings at all.'
-	'He takes your leash and leads you on all fours up the stairs. You both exit through the stairwell door into a room that appears to be an office.'
+	'He takes your leash and leads you on all fours up the stairs. You exit through the stairwell door into a room that appears to be an office.'
 	act 'Continue':gt 'leonid', 'firstTime'
 end
 
@@ -301,10 +301,10 @@ if $ARGS[0] = 'abdCustomer-virgin1':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin1.mp4"></video></center>'
 	'Your master leaves, and your body starts to shiver.'
 	'"Don''t worry slut. This will only hurt a lot!" the customer laughs. He is clearly enjoying himself.'
-	'You run to the far corner of the room in a futile attempt to get as far away from him as you can.'
+	'You quickly back up into the far corner of the room in a futile attempt to get as far away from him as you can.'
 	'He walks up to you and grabs you by the hair. He drags you as a pained, terrified scream emits from your throat to something that looks like a bench in the center of the room.'
 	'He forcefully yanks your hair to make you climb onto the bench like structure. He punches you in the stomach, and you collapse. He then flips you over onto your back and binds your arms above your head with handcuffs. He follows with putting your legs into stirrups, with legcuffs to hold you in place. You realize that this gives him unlimited access to your virgin pussy.'
-	'Your head is bound so that you have an unobstructed view on your own pussy. This is to ensure that you watch as he tears your terrified cunt apart.'
+	'Your head is bound so that you have an unobstructed view on your own pussy. This is to ensure that you watch as he tears you apart.'
 	gs 'stat'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin2'
 end
@@ -312,7 +312,7 @@ if $ARGS[0] = 'abdCustomer-virgin2':
 	minut += 2
 	pcs_mood = 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin2.mp4"></video></center>'
-	'He starts to slowly undress, with his back to you to enhance your terror. You hear a loud clink as his pants, holding a belt, hit the concrete floor. He slowly turns around to face you, and you can finally see his naked body. His cock sways for a moment before stopping in front of your face.'
+	'He starts to slowly undress, his back turned to you to enhance your terror. You hear a loud clink as his pants, holding a belt, hit the concrete floor. He slowly turns around to face you, and you can finally see his naked body. His cock sways for a moment before stopping in front of your face.'
 	'"With renewed terror, you start to cry at the sight of his <<dick>> cm thick <<$dick_girth>> cock."'
 	gs 'stat'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin3'
@@ -320,19 +320,19 @@ end
 if $ARGS[0] = 'abdCustomer-virgin3':
 	minut += 10
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin3.jpg"></center>'
-	'He starts to jerk his cock, all the while looking at your eyes then to your bound and helpless nude body. The sight slowly makes his cock hard.'
-	'In his eyes, you can see he relishes looking at you in your despair.'
+	'He starts to jerk his cock while looking at your eyes, then to your bound and helpless nude body. The sight slowly makes his cock hard.'
+	'You can tell he relishes looking at you in your despair.'
 	gs 'stat'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin4'
 end
 if $ARGS[0] = 'abdCustomer-virgin4':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin4.jpg"></center>'
 	'He finally reaches for you and brings the tip of his dick to the entrance of your virgin pussy.'
-	'He covers his <<$dick_girth>> member in a thick layer of lube then starts to slowly press against the opening of your vagina.'
+	'He covers his <<$dick_girth>> member in a thick layer of lube and starts to slowly press against the opening of your pussy.'
 	'With his hands, he spreads your pussy lips apart to help ease the entry for his member.'
-	'"Now behold girl. You are about to become a woman." he exclaims.'
+	'"Now behold girl. You are about to become a woman!" he exclaims.'
 	'He pushes it in with a single long thrust that almost hits the bottom of your virgin cunt.'
-	'A terrible pain rips through your body, beginning where your hymen was and spreading like a fire. A trickle of blood runs down the shaft of his cock.'
+	'Pain rips through your body, spreading like a fire as a trickle of blood runs down the shaft of his cock.'
 	pcs_vag += 1
 	stat['vaginal'] += 1
 	pain['vaginal'] += 20
@@ -344,7 +344,7 @@ if $ARGS[0] = 'abdCustomer-virgin5':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin5.mp4"></video></center>'
 	'He pulls his cock back out and shows it to you, enjoying the expression you make seeing your blood coating it.'
 	'He then slams his cock back into you. The pain you feel is renewed while he grunts in pleasure.'
-	'He feels accomplishment in his handiwork and sneers at you. He brutally thrusts into your pussy over and over again. He often hits your cervix with his <<dick>> cm long thick <<$dick_girth>> dick.'
+	'He feels accomplishment in his handiwork and sneers at you as he brutally thrusts into your pussy over and over again. He often hits your cervix with his <<dick>> cm long thick <<$dick_girth>> dick.'
 	pain['vaginal'] += 10
 	pain['cervix'] += 10
 	pain['tummy'] += 10
@@ -355,8 +355,8 @@ end
 if $ARGS[0] = 'abdCustomer-virgin6':
 	minut += 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin6.mp4"></video></center>'
-	'"And now whore you will receive your first load of cum. You will become the breeder you were always supposed to be!"'
-	'As renewed tears stream down your cheeks, he spurts his <<$cumType>> amount of sperm <<dick>> cm deep inside your pussy. You can feel it hit your cervix, and you shudder at the thought of you getting pregnant from this monster.'
+	'"And now you will receive your first load of cum, whore. You will become the breeder you were always supposed to be!"'
+	'As renewed tears stream down your cheeks, he spurts his <<$cumType>> amount of sperm <<dick>> cm deep inside your pussy. You can feel it hit your cervix, and you shudder at the thought of getting pregnant from this monster.'
 	gs 'cum_call', 'pussy', 'deflowering pervert'
 	gs 'stat'
 	act 'Cry more':gt 'abductionCustomer', 'abdCustomer-virgin7'
@@ -394,7 +394,7 @@ if $ARGS[0] = 'abdCustomer-virgin9':
 	pcs_sleep += 70
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin9.jpg"></center>'
 	'Your hands still bound, you are thrown on your bed and are once again chained to the wall.'
-	'Your master leaves and you are left lying on the bed, your vagina still plugged by the <<dick>> cm long <<$dick_girth>> dildo.'
+	'Your master leaves and you are left lying on the bed, your pussy still plugged by the <<dick>> cm long <<$dick_girth>> dildo.'
 	gs 'stat'
 	act 'Try to rest':gt 'abductionCustomer', 'abdCustomer-virgin10'
 end
@@ -403,15 +403,15 @@ if $ARGS[0] = 'abdCustomer-virgin10':
 	pcs_mood = 5
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin10.mp4"></video></center>'
 	'The sound of your master coming downstairs wakes you up. You must have fallen asleep from the exhaustion.'
-    '"Kneel and stick your ass high in the air slut."'
+    '"Kneel and get that ass in the air, slut."'
 	*nl
-	'You are so desperate that you don''t even think about not doing what he orders you. You just stick your ass as high as possible.'
+	'You''re so desperate that you don''t even think about not doing what he orders you. You just stick your ass as high as possible.'
 	'It points so he has good access to both your ass and your ruthlessly plugged, deflowered pussy.'
 	'Your master kneels down to remove the duct tape with a single pull. You yelp in pain from the tiny pubic hairs that get ripped out with the tape. He puts his fingers inside you to grab the stuck dildo.'
 	*nl
-	'Slowly, he takes it out. Remnants of your virgin blood and the customer''s sperm are smeared all over it.'
-	'Your empty vagina gives you a rush of relief as the cool air flows in to fill the void.'
-	'Your master unties you then adjusts your chain. As he leaves, he tells you "Be glad that you can be deflowered only once, you silly girl."'
+	'He slowly removes it. Remnants of your blood and the customer''s sperm are smeared all over it.'
+	'Your now empty pussy gives you a rush of relief as the cool air flows in to fill the void.'
+	'Your master unties you and adjusts your chain. As he leaves, he stops and grins at you. "Be glad that you can only be deflowered once, you silly girl."'
 	gs 'stat'
 	act 'Continue':gt 'abduction', 'abdRoom'
 end
@@ -421,15 +421,15 @@ if $ARGS[0] = 'abdCustomer-unzip':
 	minut += 2
 	gs 'stat'
 	'You reach towards his crotch and slowly start to unzip his trousers.'
-	'Pressing your face underneath his crotch, you pull down his pants and a <<$dick_girth>> member falls out. It lands directly onto your face with a loud slapping sound.'
+	'Pressing your face underneath his crotch, you pull down his pants and a <<$dick_girth>> member falls out. It lands directly on your face with a loud slap.'
 	if dick > 15 and dick < 25:
 		*nl
 		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip1.mp4"></video></center>'
-		'You stare at his <<$dick_girth>> cock with respect.'
+		'You admire his <<$dick_girth>> cock.'
 	elseif dick >= 25:
 		*nl
 		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip2.mp4"></video></center>'
-		'You stare at his <<$dick_girth>> cock with horror. You imagine what terrible things this sizable dick will do to your tender body.'
+		'You stare at his <<$dick_girth>> cock in horror. You imagine what terrible things it will do to your tender body.'
 	elseif dick < 15 and pcs_throat > dick:
 		*nl
 		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip3.mp4"></video></center>'
@@ -473,8 +473,8 @@ if $ARGS[0] = 'abdCustomer-show':
 	minut += 10
 	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoretease<<i>>.mp4"></video></center>'
-	'You decide to tease the customer by showing him your sexy breasts and jiggling them.'
-	'After some time of behaving like a slut, it is obvious that he wants something more.'
+	'You decide to tease the customer by jiggling and squeezing your breasts.'
+	'After a few minutes, it''s obvious that he wants something more.'
 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-unzip'
 end
 
@@ -483,7 +483,7 @@ if $ARGS[0] = 'abdCustomer-suckTip':
 	gs 'stat'
 	i = rand(1,5)	
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip<<i>>.mp4"></video></center>'
-	'You try as best as you can to suck the head of his <<dick>> cm sized <<$dick_girth>> dick.'
+	'You try your best to suck the head of his <<dick>> cm sized <<$dick_girth>> dick.'
 	if pcs_throat < dick:
 		'It''s obvious that his <<$dick_girth>> dick is above your skill level and you know you can''t safely swallow it whole.'	
 	else
@@ -492,18 +492,17 @@ if $ARGS[0] = 'abdCustomer-suckTip':
 
 	if $charType = 'sadistic':
 		if buyout = 1:
-			'<<$bName>> is starting to get very grumpy. He''s obviously not happy that all you can do is suck the tip of his cock.'
+			'<<$bName>> is starting to get annoyed. He''s obviously not happy that all you can do is suck the tip of his cock.'
 		else
-			'Your customer is starting to get very grumpy. He''s obviously not happy that all you can do is suck the tip of his cock.'
+			'Your customer is starting to get annoyed. He''s obviously not happy that all you can do is suck the tip of his cock.'
 		end
 		'Suddenly, without any warning, he takes a step back, which pulls his <<$dick_girth>> member out of your mouth.'
-		'With an angry look in his eyes, he slaps your face very hard, which knocks you to the cold floor.'
-		'He jumps on top of your chest, and with a piece of rope, he ties you up.'
+		'With an angry look in his eyes, he slaps your face very hard, which knocks you to the cold floor. He then jumps on top of you and ties you up with some rope.'
 		'"Even here, one must train the slaves himself!" he shouts at you. He forces his <<$dick_girth>> dick all the way down your throat.'
-		'With your hands tied up, you are unable to resist. All you can do is struggle to avoid suffocating as best you can...'
+		'With your hands tied, you''re unable to resist. All you can do is struggle to avoid suffocating as best you can.'
 		act 'Endure':gt 'abductionCustomer', 'abdCustomer-suckForced'
 	elseif $charType = 'neutral':
-		'Your customer seems displeased by your performance. You are starting to worry about what he''ll do if you don''t satisfy him well enough...'
+		'Your customer seems displeased by your performance. You''re starting to worry about what he''ll do if you don''t satisfy him well enough...'
 		forceChance = rand(1, 100)
 		if forceChance <= 70:
 			act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-suckForced'
@@ -538,7 +537,7 @@ if $ARGS[0] = 'abdCustomer-suckTip':
 			end
 		end
 	elseif $charType = 'kind':
-		'Your customer seems pleased by your skill, so you continue to tease the tip of his <<$dick_girth>> cock. You look at him with as much sensual abandon as you can muster under the present conditions.'
+		'Your customer seems pleased with your skill, so you continue to tease the tip of his <<$dick_girth>> cock. You look at him with as much sensual abandon as you can muster under the present conditions.'
 		act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
 	end
 end
@@ -568,9 +567,9 @@ if $ARGS[0] = 'abdCustomer-suckForced':
 	else
 		'Your customer growls and suddenly pulls his cock out of your mouth.'
 	end
-	'"What kind of slave are you when you can''t swallow my <<$dick_girth>> dick?"'
+	'"What kind of slave are you when you can''t swallow my dick?"'
 	'He ties you up and forces his cock down your throat. He shows little to no concern for your wellbeing.'
-	'You start to gag as he keeps pushing his member deep inside you. Sometimes this leaves you on the brink of passing out.'
+	'You start to gag as he keeps pushing his member deep inside you, leaving you on the brink of passing out.'
 	vagOrAss = rand (0,1)
 	if buyout = 1:
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
@@ -599,19 +598,19 @@ if $ARGS[0] = 'abdCustomer-fuck':
 	gs 'stat'
 	endPunishment = 0
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorecockremoved.jpg"></center>'
-	'It seems the customer is done with fucking your mouth as he removes his dick then steps back a bit. He looks at you with a <<$charType>> appetite in his eyes.'
+	'It seems the customer is done with fucking your mouth as he removes his dick and steps back. He looks at you with a <<$charType>> appetite in his eyes.'
 	if $charType = 'sadistic':
 		'"What should I do to you next, bitch?"'
 	else
 		'"So how do you want it next, slut?"'
 	end
-	'You are not entirely sure if he means that as a rhetorical question or not.'
+	'You''re not entirely sure if he means that as a rhetorical question or not.'
 
 	if $charType = 'sadistic':
 		*nl
-		'You want to answer him, but the moment you open your mouth to talk he slaps your face very hard. This knocks you down to the cold floor. Tears erupt from your eyes in response.'
+		'You want to answer him, but the moment you open your mouth to talk he slaps your face very hard. This knocks you to the cold floor and tears erupt from your eyes in response.'
 		'"You thought I was actually interested in your opinion...<i>slave</i>?" he questions, laughing. "A bitch like you has no right to an opinion!"'
-		'You are unable to do anything except whimper like a small child. He ties you up, and you know that it''s going to get even worse now.'
+		'You''re unable to do anything except whimper like a small child. He ties you up, and you know that it''s going to get even worse now.'
 		vagOrAss = rand (0,1)
 		if vagOrAss = 0:
 			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
@@ -643,19 +642,19 @@ if $ARGS[0] = 'abdCustomer-decide':
 	vagOrAss = rand (0, 1)
 	if vagOrAss = 1:
 		if $charType = 'sadistic':
-			'"I will fuck your cunt raw, bitch!"'
+			'"I''ll fuck your cunt raw, bitch!"'
 		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
 		else
-			'"Let''s take your tender pussy!" he decides.'
+			'"Let''s take your tender pussy!"'
 		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
 		end
 	else
 		if $charType = 'sadistic':
-			'"I will fuck you deep in your ass, bitch!"'
+			'"I''ll fuck you deep in your ass, bitch!"'
 		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
 		else
-			'"I want to see how tight your ass is." he says.'
-			 act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
+			'"I want to see how tight your ass is."'
+			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
 		end		
 	end
 end
@@ -665,8 +664,8 @@ if $ARGS[0] = 'abdCustomer-beg':
 	minut += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorebeg1.jpg"></center>'
-	'Please be kind to me sir. I''m so afraid and sore... Please!'
-	if dick >= 15:'"I''m very afraid of your <<$dick_girth>> penis sir!"'
+	'Please be gentle to me, sir! I''m so sore... Please!'
+	if dick >= 15:'"I''m scared of your dick, sir!"'
 	*nl
 	bekindChance = rand(1, 100)
 	endPunishment = 0
@@ -681,7 +680,7 @@ if $ARGS[0] = 'abdCustomer-beg':
 		endPunishment = 1
 		'"A slave has no right to ask what will happen to it!"'
 		hardChance = rand(1, 100)
-		'"I will fuck you however I want, so shut up bitch!"'
+		'"I''ll fuck you however I want, so shut up bitch!"'
 		if hardChance <= 50:
 			if vagOrAss = 0:	
 				act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
@@ -736,7 +735,7 @@ if $ARGS[0] = 'abdCustomer-fuckAnalRough':
 	'What comes next is an excruciatingly rough ass fucking that clearly shows he has no regard for all the pain you have to endure.'
 	*nl
 	if assDMG <= 0 :
-		'Fortunately, his <<$dick_girth>> dick is not enough to damage your anus and intestines. No more than usual, anyway.'
+		'Fortunately, his <<$dick_girth>> dick is not enough to cause you much pain. No more than usual, anyway.'
 		if buyout = 1:
 			act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
 		else
@@ -753,8 +752,7 @@ if $ARGS[0] = 'abdCustomer-fuckAnalRough':
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
 	else
 		'His <<$dick_girth>> dick is insanely big for you.'
-		'The tip of his cock repeatedly hits your intestinal walls and stretches your anus to insane proportions.'
-		'You will probably not be able to close your anus for a while.'
+		'The tip of his cock repeatedly hits your intestinal walls and stretches your anus wide.'
 		pain['asshole'] += assDMG
 		pain['tummy'] += assDMG
 		gs 'stat'
@@ -771,15 +769,13 @@ if $ARGS[0] = 'abdCustomer-fuckAnalDeep':
 	'His member is <<$dick_girth>> and your ass is unable to accommodate it.'
 	if $charType = 'sadistic':
 		*nl
-		'But he doesn''t care, even though he is obviously aware, and he fucks you furiously hard.'
-		'"How do like my <<$dick_girth>> cock inside you bitch?"'
-		'"Is it deep enough for you, or should I push a bit more?"'
-		'Obviously, he''s enjoying this a lot. Doing this is probably the reason he came to this slave house.'
+		'He doesn''t care, even though he''s obviously aware, and fucks you furiously hard.'
+		'"How do like my <<$dick_girth>> cock inside you bitch? Is it deep enough for you, or should I push a bit more?"'
+		'He''s obviously enjoying this a lot.'
 		*nl
 	end
-	'With every stroke of his dick deep inside your intestines, you feel as if it''s your very stomach being poked by it.'
-	'A large bulge is noticeable every time he shoves it more than half the way inside you.'
-	*nl
+	'With every thrust of his dick deep inside your intestines, you feel as if it''s your very stomach being poked by it.'
+    *nl
 	if buyout = 1:
 		'After about a half an hour of deep anal banging, <<$bName>> is about to cum.'
 	else
@@ -787,7 +783,7 @@ if $ARGS[0] = 'abdCustomer-fuckAnalDeep':
 	end
 
 	if (endPunishment = 1 or $charType = 'sadistic') and buyout = 0:
-		'"Now, I will feed you my seed, you unruly anal slave."'
+		'"I''m going to feed you my cum now, you unruly anal slut!"'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
 	elseif buyout = 1:
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
@@ -803,13 +799,12 @@ if $ARGS[0] = 'abdCustomer-fuckNormal':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefucknormal<<i>>.mp4"></video></center>'
 	'The customer penetrates your pussy and fucks you.'
 	if vagDMG <= 0:
-		'He''s not gentle, but it isn''t a very rough fuck either.'
-		'You have no problems accommodating his <<$dick_girth>> dick.'
-		'At some moments, you almost seem to enjoy it.'
+		'He''s not gentle, but it isn''t very rough either.'
+		'You have no problems accommodating his <<$dick_girth>> dick. You almost seem to enjoy it.'
 		gs 'arousal', 'vaginal', 30, 'sub'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
 	elseif vagDMG <= 2:
-		'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it bumps against your vaginal walls.'
+		'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it slams against your vaginal walls.'
 		pain['vaginal'] += vagDMG
 		gs 'arousal', 'vaginal', 30, 'sub', 'rough'
 		gs 'stat'
@@ -833,7 +828,7 @@ if $ARGS[0] = 'abdCustomer-fuckRough':
 	'The man takes you by your leash and positions your body as if it''s just meat to be used.'
 	'What comes next is an excruciatingly rough fuck that clearly shows he has no regard for all the pain you have to endure.'	
 	if vagDMG <= 0:
-		'Fortunately, his <<$dick_girth>> dick is not enough to damage your vagina. No more than usual, anyway.'
+		'Fortunately, his <<$dick_girth>> dick is not enough to cause you much pain. No more than usual, anyway.'
 		gs 'arousal', 'vaginal', 30, 'sub', 'bound'
 		if $charType = 'sadistic':
 			act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
@@ -849,8 +844,7 @@ if $ARGS[0] = 'abdCustomer-fuckRough':
 	else
 		'His <<$dick_girth>> dick is insanely big for you.'
 		'The tip of his cock even penetrates your cervix, or at least it seems like it to you. The pain is almost unbearable!'
-		'He notices this too, realizing it''s why you''re groaning so loudly.'
-		'Enjoying your suffering, he pushes his dick even deeper inside, and you squeal like a pig.'
+		'He notices this too, realizing it''s why you''re groaning so loudly. Enjoying your suffering, he pushes his dick even deeper inside, and you squeal like a pig.'
 		pain['vaginal'] += vagDMG * 2
 		pain['cervix'] += vagDMG * 2
 		gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'rough'
@@ -868,20 +862,16 @@ if $ARGS[0] = 'abdCustomer-fuckDeep':
 	'His member is <<$dick_girth>> and your vagina is unable to accommodate it.'
 	if $charType = 'sadistic':
 		*nl
-		'But he doesn''t care about that, even though he is obviously aware of it, and fucks you furiously hard.'
-		'"How do like my <<$dick_girth>> cock inside you bitch?"'
-		'"Is it deep enough for you, or should I push a bit more?"'
-		'"Do you feel me entering your cervix?"'
-		'Obviously he''s enjoying this a lot. Doing this is probably the reason he came to this slave house.'
+		'He doesn''t care about that, even though he is obviously aware of it, and fucks you furiously hard.'
+		'"How do like my <<$dick_girth>> cock inside you bitch? Is it deep enough for you, or should I push a bit more? Do you feel me entering your cervix?"'
+		'He''s obviously enjoying this a lot.'
 		*nl
 	end
-	'With every stroke of his dick deep inside your vagina, you feel as if it''s your very cervix being penetrated.'
-	'A large bulge is noticeable every time he shoves it more than half the way inside you.'
-	*nl
+	'With every thrust of his dick deep inside your vagina, you feel as if it''s your very cervix being penetrated.'
 	'After about half an hour of deep vaginal banging, the man is about to cum.'
 	
 	if endPunishment = 1 or $charType = 'sadistic':
-		'"Now, I will feed you my seed, you unruly fuck slave."'
+		'"I''m going to feed you my cum now, you unruly fuck slave!"'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
 	else
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
@@ -890,21 +880,19 @@ end
 
 if $ARGS[0] = 'abdCustomer-cumGate':
 	if endPunishment = 1:
-		'"Now, I will feed you my seed, you unruly slave."'
+		'"I''m going to feed you my cum now, you unruly slave!"'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
 	elseif buyout = 1:
-		'"You will be filled with my seed for the first time, so be sure to cherish the memory of this moment!"'
+		'"You''re going to be filled with my seed for the first time, so be sure to cherish the memory of this moment!"'
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'		
 	else
 		'"So where do you want it, bitch?"'
-		
 		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
-		
-		act 'Ask him to cum on your face':gt 'abductionCustomer', 'abdCustomer-cumFace'
+		act 'On your face':gt 'abductionCustomer', 'abdCustomer-cumFace'
 		
 		gs 'willpower', 'cum_inside', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Ask him to cum inside your pussy (<<will_cost>> Willpower)':
+			act 'Inside your pussy (<<will_cost>> Willpower)':
 				gs 'willpower', 'cum_inside', 'self'
 				gs 'willpower', 'pay', 'self'
 				gs 'stat'
@@ -912,12 +900,12 @@ if $ARGS[0] = 'abdCustomer-cumGate':
 				gt 'abductionCustomer', 'abdCustomer-cumPussy'
 			end
 		else
-			act 'Ask him to cum inside your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			act 'Inside your pussy (<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', 'cum_inside_anal', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Ask him to cum inside your ass (<<will_cost>> Willpower)':
+			act 'Inside your ass (<<will_cost>> Willpower)':
 				gs 'willpower', 'cum_inside_anal', 'self'
 				gs 'willpower', 'pay', 'self'
 				gs 'stat'
@@ -925,12 +913,12 @@ if $ARGS[0] = 'abdCustomer-cumGate':
 				gt 'abductionCustomer', 'abdCustomer-cumAss'
 			end
 		else
-			act 'Ask him to cum inside your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			act 'Inside 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
 		
 		gs 'willpower', 'swallow', 'self'
 		if will_cost <= pcs_willpwr:
-			act 'Ask him to cum into your mouth (<<will_cost>> Willpower)':
+			act 'In your mouth (<<will_cost>> Willpower)':
 				gs 'willpower', 'swallow', 'self'
 				gs 'willpower', 'pay', 'self'
 				gs 'stat'
@@ -938,7 +926,7 @@ if $ARGS[0] = 'abdCustomer-cumGate':
 				gt 'abductionCustomer', 'abdCustomer-cumMouth'
 			end
 		else
-			act 'Ask him to cum into your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			act '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
 	end
 end
@@ -946,13 +934,13 @@ end
 if $ARGS[0] = 'abdCustomer-cum':
 	cumRand = rand(1,100)
 	if cumRand > 75 and cumRand <= 100:
-		'He decides to cum inside your vagina.'
+		'He decides to cum inside your pussy.'
 		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumPussy'
 	elseif cumRand > 50 and cumRand <= 75:
 		'He decides to cum inside your ass.'
 		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumAss'
 	elseif cumRand > 25 and cumRand <= 50:
-		'He decides to cum into your mouth.'
+		'He decides to cum in your mouth.'
 		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumMouth'
 	else
 		'He decides to cum on your face.'
@@ -964,32 +952,26 @@ if $ARGS[0] = 'abdCustomer-cumPussy':
 	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy<<i>>.mp4"></video></center>'
 	if vagDMG > 0:
-		'As he delivers his <<$cumType>> amount of cum inside your vagina, you can feel the tip of his <<$dick_girth>> cock at your cervix and even a bit inside it.'
-		'His bursting cum penetrates through the cervix directly into your womb, which causes a warm, yet painful sensation to flow through you.'
+		'As he pumps his cum into your vagina, you feel the tip of his <<$dick_girth>> cock at your cervix and even inside it.'
+		'His cum penetrates through the cervix directly into your womb, which causes a warm, yet painful sensation to flow through you.'
 		pain['cervix'] += vagDMG
 		gs 'stat'
 	end
 	*nl
 	if cumVol = 3:
-		'With his <<$dick_girth>> dick buried inside your pussy, the customer delivers his <<$cumType>> amount of sperm inside you.'
-		'When he pulls it out, some of the sperm drips out of your cunt.'
+		'With his <<$dick_girth>> dick buried inside your pussy, the customer pumps his cum inside you.'
+		'When he pulls out, some of it drips out of you.'
 	elseif cumVol = 4:
-		'With his <<$dick_girth>> dick buried deep inside your pussy, his tip touches your cervix.'
-		'He pumps your vagina full of his <<$cumType>> amount of sperm.'
-		'As he pulls his cock out, a large portion of the cum forcefully squirts out of you.'
+		'With his <<$dick_girth>> dick buried deep inside your pussy, his tip touches your cervix as he pumps your pussy full of his cum.'
+		'As he pulls his cock out, a large amount of the cum forcefully squirts out of you.'
 	elseif cumVol >= 5:
-		'With his <<$dick_girth>> dick buried very deep inside your pussy, his tip pushes against your cervix and even slides inside of it a bit.'
-		'Then, as he shoots his <<$cumType>> amount of cum inside you, a lot of it goes directly to your womb.'
-		'It feels painful, but the warm sensation is weird and nothing like what you have felt before.'
-		'You feel as if your inner parts are stretching from the <<$cumType>> amount of cum being pumped into you.'
-		*nl
-		'When he pulls his <<$dick_girth>> cock out the lower part of your belly bulges noticeably.'
-		'The customer looks at it with joy then punches at your bulge with his fist.'
-		'The cum bursts out of your pussy as if it shot out from an uncorked champagne bottle.'
+		'With his <<$dick_girth>> dick buried very deep inside your pussy, his tip pushes against your cervix and even slides inside a little.'
+		'As he pumps his cum inside you, a lot of it shoots directly into your womb. It feels painful, but the warm sensation is nothing like what you''ve felt before.'
+		'When he pulls his cock out, his cum squirts out of your pussy.'
 		pain['cervix'] += 20
 		pain['tummy'] += 40
 	else
-		'The customer cums inside you. When he takes his <<$dick_girth>> cock out, a small part of his <<$cumType>> amount of sperm drips out of your pussy.'
+		'The customer cums inside you. When he pulls his cock out, his cum slowly drips out of your pussy.'
 	end
 
 	pcs_vag += 1
@@ -1004,9 +986,8 @@ if $ARGS[0] = 'abdCustomer-cumAss':
 	i = rand(1,5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumass<<i>>.mp4"></video></center>'
 	if assDMG > 0:
-		'As he cums inside your ass, you can feel his <<$dick_girth>> cock slamming against your intestinal wall.'
-		'A moving bulge is visible on your otherwise flat stomach as his dick moves inside you.'
-		'His cum fills you, and it feels as if it has flowed right up to your stomach.'
+		'You can feel his <<$dick_girth>> cock slamming against your intestinal wall as he cums inside your ass.'
+		'His cum fills you, and feels as if it''s flowed right up to your stomach.'
 		pain['asshole'] += assDMG
 		gs 'stat'
 	end
@@ -1014,38 +995,35 @@ if $ARGS[0] = 'abdCustomer-cumAss':
 	if cumVol = 3:
 		'His <<$dick_girth>> member is buried in your intestines.'
 		if buyout = 1:
-			'When <<$bName>> shoots his <<$cumType>> amount of cum, you can feel the warmth spreading inside you...'
+			'As <<$bName>> shoots his load, you can feel the warmth spreading inside you...'
 		else
-			'When he shoots his <<$cumType>> amount of cum, you can feel the warmth spreading inside you...'
+			'As he shoots his load, you can feel the warmth spreading inside you...'
 		end
-		'After his dick is removed, some of the sperm drips out of your gaping hole.'
+		'He pulls out and his cum slowly drips from your gaping hole.'
 	elseif cumVol = 4:
 		'His <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, sometimes even hitting your intestinal walls.'
 		if buyout = 1:
-			'When <<$bName>> shoots his <<$cumType>> amount of cum inside, you can feel your stomach grow larger...'
+			'As <<$bName>> shoots his load, you can feel a wamth spread inside you...'
 		else
-			'When he shoots his <<$cumType>> amount of cum inside, the lower part of your belly bulges noticeably...'
+			'As he shoots his load, you can feel a warmth spread inside you...'
 		end
-		'You feel very full, even after he pulls his <<$dick_girth>> dick out of you.'
-		'After a few seconds, a large portion of his <<$cumType>> amount of cum spurts out of you, as if from a garden hose.'
+		'He pulls out and his cum squirts out of your gaping hole.'
 	elseif cumVol >= 5:
 		if buyout = 1:
-			'<<$bName>>''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each stroke hitting your intestinal walls forcefully.'
+			'<<$bName>>''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each thrust forcfully hitting your intestinal walls.'
 		else
-			'The customer''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each stroke hitting your intestinal walls forcefully.'
+			'The customer''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each thrust forcefully hitting your intestinal walls.'
 		end
-		'You feel an increasing amount of pressure and stretching pain as he pumps your intestines with a <<$cumType>> amount of cum.'
+		'You feel an increasing amount of pressure and stretching pain as he pumps your intestines full of cum.'
 		*nl
-		'When he pulls his <<$dick_girth>> cock out, the lower part of your belly bulges noticeably.'
-		'He looks at the bulge with joy then punches at it with his fist.'
-		'The cum bursts out of your anus as if it shot out from an uncorked champagne bottle.'
+		'When he pulls his cock out, cum squirts out of your ravaged anus.'
 		pain['tummy'] += 20
 		gs 'stat'
 	else
 		if buyout = 1:
-			'<<$bName>> cums inside you. When he takes his <<$dick_girth>> cock out, a small amount of his <<$cumType>> amount of sperm leaks out of your gaping anus.'
+			'<<$bName>> cums inside you. When he pulls his cock out, his cum slowly leaks out of your gaping anus.'
 		else
-			'The customer cums inside you. When he takes his <<$dick_girth>> cock out, a small amountt of his <<$cumType>> amount of sperm leaks out of your gaping anus.'
+			'The customer cums inside you. When he pulls his cock out, his cum slowly leaks out of your gaping anus.'
 		end
 	end
 
@@ -1071,27 +1049,26 @@ if $ARGS[0] = 'abdCustomer-cumMouth':
 	i = rand(1, 5)
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth<<i>>.mp4"></video></center>'
 	if throatDMG > 0:
-		'Your aching throat is penetrated again.'
-		'He buries his <<$dick_girth>> cock to the hilt inside you.'
-		'While he''s cumming directly down your gullet, you can feel the pulsing of his member. It painfully stretches your already sore throat.'
+		'Your aching throat is penetrated again as he buries his <<$dick_girth>> cock to the hilt inside you.'
+		'When he shoots his load, you feel his member painfully stretching your already sore throat.'
 		pain['throat'] += throatDMG
 		gs 'stat'
 	end
 	
 	if cumVol = 3:
-		'His <<$cumType>> amount of cum fills your gullet.'
+		'His cum fills your throat.'
 	elseif cumVol = 4:
-		'His <<$cumType>> amount of cum fills your gullet and drips down into your stomach.'
+		'His cum fills your throat and trickles down into your stomach.'
 		'You feel very full and bloated.'
 		pcs_energy += 50
 		pcs_hydra += 40
 	elseif cumVol => 5:
-		'You are being pumped like a water bag. His <<$cumType>> amount of jizz fills your stomach and gullet.'
+		'You''re being pumped full of cum like a slut. He completely fills your stomach and throat.'
 		'You probably won''t need another meal today...'
 		pcs_energy += 100
 		pcs_hydra += 90
 	else
-		'The customer shoots his <<$cumType>> amount of cum inside your mouth and down your gullet.'
+		'The customer shoots his cum into your mouth and down your throat.'
 	end
 
 	mouth += 1
@@ -1107,17 +1084,17 @@ if $ARGS[0] = 'abdCustomer-cumFace':
 	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumface<<i>>.mp4"></video></center>'
 	'He takes his <<$dick_girth>> dick and points it towards your face.'
 	if cumVol = 3:
-		'A <<$cumType>> amount of sperm lands all over your face.'
+		'A <<$cumType>> amount of cum lands all over your face.'
 	elseif cumVol = 4:
-		'A <<$cumType>> amount of sperm lands all over your face, some even lands in your eyes and hair.'
+		'A <<$cumType>> amount of cum lands all over your face. Some even lands in your hair.'
 	elseif cumVol => 5:
-		'A <<$cumType>> amount of sperm lands all over your face. In your eyes, hair, everywhere.'
-		'There is so much cum that you have a solid layer on your face, as if you were wearing a cosmetic mask.'
+		'A <<$cumType>> amount of cum lands all over your face and hair.'
+		'There''s so much that you have a solid layer covering your face.'
 	else
-		'A <<$cumType>> cum volume is spread around your mouth and cheeks.'
+		'A <<$cumType>> amount of cum is splattered across your face and in your mouth.'
 	end
 
-	'The customer seems content with his creation and looks at you with a weird satisfaction.'
+	'The customer seems content and looks at you in satisfaction.'
 
 	mouth += 1
 	gs 'cum_call', 'face', 'customer'
@@ -1129,23 +1106,22 @@ end
 
 if $ARGS[0] = 'abdCustomer-end':
 	if endPunishment = 1:
-		'The customer goes to the bathroom and then calls for your master.'
+		'The customer goes to the bathroom before calling for your master.'
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
 	elseif buyout = 1:
 		'<<$bName>> leaves you lying on the ground, his cum still dripping out of your ass, and calls for your master.'
 		act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
 	else
-		'The customer goes to the bathroom, and you are immediately lead back to the basement.'
+		'The customer goes to the bathroom, and you are immediately taken back to the basement.'
 		act 'Go back':gt 'abduction', 'abdRoom'
 	end
 end
 
 if $ARGS[0] = 'abdCustomer-endPunishment':
 	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/kneelingslave1.jpg"></center>'
-	iif(buyout = 1, $bName, 'The customer') + ' tells your master how unruly you were and that further training should be applied to you.'
-	'He then leaves.'
+	iif(buyout = 1, $bName, 'The customer') + ' tells your master how unruly you were and that further training should be applied to you before he leaves.'
 	'Kneeling, you look up at your master only to see his grim face. You can tell something bad will happen.'
-	act 'Be led back to the basement':gt 'abduction', 'abdFailedCustomer'
+	act 'Back to the basement':gt 'abduction', 'abdFailedCustomer'
 end
 
 --- abductionCustomer ---------------------------------

+ 8 - 8
locations/albina_chat.qsrc

@@ -285,14 +285,14 @@ if $ARGS[0] = 'Doggystyle':
 	act'It''s more intense':
 		cla & *nl
 		'"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."'
+		'"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 until I cum. Best night ever."'
 		gs'albina_chat','Doggystyle2'
 	end
 	
 	act'It goes deeper':
 		cla & *nl
 		'"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."'
+		'"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 cum just thinking about it."'
 		gs'albina_chat','Doggystyle2'
 	end
 	
@@ -329,14 +329,14 @@ if $ARGS[0] = 'Cowgirl':
 	act'I like being in control':
 		cla & *nl
 		'"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!"'
+		'"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 have my face stuffed into the sheets with a cock balls deep up my ass being 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 it when he grabs my boobs':
+	act'I like it when he grabs my breasts':
 		cla & *nl
 		'"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?"'
+		'"But he can still grab your tits from behind," Albina argues. "Plus, he can spank you until you''re red and wriggling too. Why choose when you can have both?"'
 		gs'albina_chat','Cowgirl2'
 	end
 end
@@ -639,13 +639,13 @@ if $ARGS[0] = 'wine_chat2':
 		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.'
+		'"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.'
+			'"But if he cums 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
 
@@ -663,7 +663,7 @@ if $ARGS[0] = 'wine_chat2':
 				'"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.'
+				'"Cuz you''re supposed to? If he cums 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

+ 70 - 37
locations/albina_lazar_sex.qsrc

@@ -84,49 +84,82 @@ if $ARGS[0] = 'peek':
 	act 'Keep watching':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz2.jpg"></center>'
-		'You keep watching as she pulls his dick out of her mouth with a loud pop, ropes of her saliva covering his shaft as she gasps for air. She stands up and wiggles out of her thong as Lazar takes the rest of his clothes off. She then pushes him down onto the bed and straddles his face so they are 69ing each other. You push the door open just a little more so you can see all the action.' 
-		'Lazar starts eagerly lapping away at her pussy as she continues to suck and deepthroat his dick.'
+		'You keep watching as she pulls his dick out of her mouth with a loud pop, ropes of her saliva covering his shaft as she gasps for air. "I love... sucking your dick. It tastes... so good! But I really... want you to... give it to me!"' 
+		'She grins up at him before standing and wiggling out of her thong. She then climbs onto the bed and gets on her back before leaning her head over the edge. You push the door open just a little more so you can see all the action.' 
+		'Albina opens her mouth wide and Lazar steps in and shoves his cock down her throat, causing her to gag before he starts face fucking her. He''s somewhat rough, yet Albina seems to be enjoying it. Despite gagging and choking, she vigoursly rubs her clit and fingers herself as he slams his cock in and out of her throat.'
+		*nl
+		'Drool dribbles out of her mouth and runs down her face, getting in her hair as he continues face fucking her. He only stops when it looks like Albina is about to pass out. He pulls out and she splutters a large amount of drool down her face as she gasps for air.'
 		gs 'arousal', 'voyeur', 5
 		gs 'stat'
 		act 'Keep watching':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz3.jpg"></center>'
-			'"I want you to ride me." he says as he slaps her ass hard.'
-			'You see a glimpse of an aroused smile on her face before she slides herself down. She teases him by grinding her wet pussy over his shaft before she grabs his dick and slowly lowers herself down onto it, moaning softly as it slides into her pussy. She leans back onto her hands and starts riding him reverse cowgirl style, slowly picking up speed and fucking him harder and faster before she falls forwards onto her hands and he grabs her hips, slamming her up and down on his dick.' 
-			'After a few minutes of this, she stops and turns around, swinging her leg over him and riding him cowgirl style, letting him his hands roam all over her body.'
-			'"Fuck, your pussy is so damn tight!" he grunts and she giggles as she starts riding him harder, her ass loudly slapping against his thighs.'
+			'You see a glimpse of an aroused smile on Albina''s face as she wipes her face and slowly jerks his drool coated cock in her hands. "Okay, enough foreplay. I need this thing inside me <i>now</i>." All Lazar can do is grin as Albina sucks on her fingers, getting a taste of her now wet pussy.' 
+			'He climbs on the bed and gets on his back as Albina crawls over to him. She straddles him and guides his cock into her slit before slowly lowering herself down, taking his full length into her pussy. She slowly rides him before he grabs her hips and starts slamming her up and down on his dick as they both grunt and moan in pleasure.' 
+			'"Fuck, your pussy is so damn tight!" he grunts and lets go of her. She giggles and starts riding him harder, her bubble butt loudly slapping against his thighs as she lets his hands roam all over her curvy body.'
 			gs 'arousal', 'voyeur_sex', 5
 			gs 'stat'
 			act 'Keep watching':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz4.jpg"></center>'
 				'He takes her by surprise when he grabs her by the hips and rolls her over onto her back, making her giggle. He then starts fucking her missionary style, causing her to moan loudly as she wraps her legs tightly around his back. He starts fucking her harder as a result and she wraps her arms around his neck, pulling him down and making out with him as he keeps thrusting in and out of her ever wetter hole.' 
-				'After a few minutes, they stop and she smiles at him. "I like your dick stretching my pussy, but I want it in my ass now." He pulls out of her and waits as she leans over and opens her nightstand, pulling out a bottle of lube and motioning for him to stand at the edge of the bed.'
+				'After a few minutes, they stop and she smiles at him. "I like your dick stretching my pussy, but I''d <i>love</i> it stretching my ass." He pulls out of her and waits as she leans over and opens her nightstand, pulling out a bottle of lube and motioning for him to sit back on the bed.'
 				gs 'arousal', 'voyeur_sex', 5
 				gs 'stat'
 				act 'Keep watching':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz5.jpg"></center>'			
-					'You keep watching as she sits up on her knees and opens the bottle, squirts a plentiful amount of its contents onto her fingers and starts rubbing it into her asshole. When she feels she''s ready, she passes the bottle to him and backs up to him on all fours. Lazar lubes his shaft up and throws the bottle aside before he gives her ass a few hard smacks.' 
-					'He then moves in behind her and pushes his dick gently into her ass, which elicits a soft moan from her as a look of pleasure washes over her face. He''s fairly slow and doesn''t go too deep at first, but once she starts moaning loudly and begging him to go faster, he starts fucking her backdoor a lot harder, slamming himself balls deep into her asshole. She grips the sheets tightly before she falls forward and buries her face in the sheets, partially muffling her cries of pleasure.' 
+					'You keep watching as she sits up on her knees and opens the bottle, squirts a plentiful amount of its contents onto her fingers and starts rubbing it into her asshole. When she feels she''s ready, she throws the bottle aside and Lazar squeezes her ass as she climbs back on top of him.' 
+					'She moans softly in pleasure as his dick slowly penetrates her ass. Once it''s inside, she slowly starts riding him, gradually taking him deeper with each thrust as they both grunt and moan in pleasure. This continues for a few minutes until his dick suddenly slides out of her ass.' 
 					gs 'arousal', 'voyeur_sex', 5
 					gs 'stat'
 					act 'Keep watching':
 						*clr & cla
-						'<center><video autoplay loop  src="images/shared/sex/cum/facial/facial0,3.mp4"></center>'
-						'She writhes in pleasure before him, and once her orgasm passes, she turns and quickly takes his dick into her mouth. She sucks it for a few seconds before turning around and wiggling her ass at him. He slides his dick back into her ass and starts fucking her again as she tells him to slap her ass and pull her hair while she reaches back and plays with her clit. He does just that and after few minutes, it sounds like she''s on the verge of cumming again.'
-                        'A hard smack on the ass is enough to send her over the edge and a powerful orgasm overwhelms her entirely, leaving her shuddering on the bed.'
-						'Lazar starts quickly jerking his dick and once she recovers, Albina quickly slides off the bed and kneels in front of him, sticking her tongue out. A few seconds later, Lazar groans as a stream of cum starts splattering all over her face. When he finishes, she takes his dick into her mouth and sucks and licks it clean before smiling up at him.' 
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz6.jpg"></center>'
+						'Albina crawls down and takes his dick back into her mouth, sucking it for a few seconds before she gets on all fours and wiggles her ass at Lazar, who gets on his knees behind her and slides his dick back into her ass.'
+						'He''s rather slow with his thrusts, which annoys Albina. "You <i>finally</i> get me bent over and this is all you can do? Go harder! Spank me, pound my tight little ass and make me fucking cum!" He spanks her ass several times as he starts fucking her harder. She squeals in delight and tightly grips the sheets between her fingers before burying her head in them to muffle her loud cries of pleasure.'
 						gs 'arousal', 'voyeur_sex', 5
 						gs 'stat'
-						act 'Finished':
-							*clr & cla
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz6.jpg"></center>'
-							'Lazar lies down at the top of the bed as Albina wipes her face clean before crawling up to him and snuggling into him. They sit quietly in each other''s embrace before Lazar gently kisses her forehead, gets up off the bed and gathers his clothes up. He starts getting dressed and you quickly close the door and walk away before you''re spotted.'
-                            'You wait on the top stairs until you hear the door open and walk up like you were just heading to the room. He looks a little surprised to see you, but smiles.'
-							'"Oh hey <<$pcs_nickname>>, Albina''s in her room if you''re looking for her. I need to get going, got to hit the gym today." he explains as he flexes and walks past you. "See you around."'
-							'With that, he walks down the stairs and you hear him bidding farewell to Zoya. You walk up to Albina''s door, deciding not to say anything about what you just saw.'
-							act 'Go to her room': gt 'albina_lazar_sex', 'go_to_bedroom'
+						if AlbinaQW['Lazar_Sex'] = 0:
+							act 'Keep watching'
+								*clr & cla
+								'<center><video autoplay loop src="images/locations/city/redlight/studio_porn/porncp2.mp4"></center>'
+								'Another few hard smacks on her now bright red ass is enough to send her over the edge and a powerful orgasm overwhelms her entirely. Lazar''s dick slides out of her ass as she falls forwards and shudders and pants on the bed, the sheets soaked with her juices.'
+								'Once she recovers, Albina sits up on the bed. "I bet you''re close to cumming..." she says with a sly grin, but shushes him before he can reply. "I want you to finish inside me."' 
+								'Lazar is stunned. "Are you sure? You don''t have to-"'
+								'She nods. "Yes, I''m sure. I know what I said before, but I''ve been thinking about it a lot and... I trust you Lazar. I want this..." Lazar gently pushes her onto her back and she spreads her legs before he moves in and starts fucking her still sensitive pussy. "Yes, yes! Fuck. My. Tight. Little. Pussy!" is all Albina can say before Lazar starts grunting and groaning as he blows his load inside her.'
+								'Albina moans softly at the sensation before Lazar pulls out and they start kissing. You feel a warmth between your legs as you watch his cum trickle out of her soaking wet pussy.'						
+								gs 'arousal', 'voyeur_sex', 5
+								gs 'stat'
+								act 'Finished':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz6.jpg"></center>'
+									'Albina cleans herself up before crawling up to Lazar and snuggling into him. They sit quietly in each other''s embrace before Lazar gently kisses her forehead, gets up off the bed and gathers his clothes up. He starts getting dressed and you quickly close the door and hurry away before you''re spotted.'
+									'You wait on the top stairs until you hear the door open and walk up like you were just heading to the room. He looks a little surprised to see you, but smiles.'
+									'"Oh hey <<$pcs_nickname>>, Albina''s in her room if you''re looking for her. I need to get going, got to hit the gym today." he explains as he flexes and walks past you. "See you around."'
+									'With that, he walks down the stairs and you hear him bidding farewell to Zoya. You walk up to Albina''s door, deciding not to say anything about what you just saw.'
+									act 'Go to her room': gt 'albina_lazar_sex', 'go_to_bedroom'
+								end
+						    end
+						else
+							act 'Keep watching'
+								*clr & cla
+								'<center><video autoplay loop src="images/shares/sex/cum/facial/facial0,3.mp4"></center>'
+								'Another few hard smacks on her now bright red ass is enough to send her over the edge and a powerful orgasm overwhelms her entirely. Lazar''s dick slides out of her ass as she falls forwards and shudders and pants on the bed, the sheets soaked with her juices.'
+								'Lazar continues jerking off as Albina recovers on the bed before saying he''s close. Albina quickly slides off the bed and onto her knees in front of him. He groans loudly as his cum starts splattering across Albina''s face. Once he''s finished, Albina looks up at him with a satisfied grin as his cum trickles down her face and drips from her chin.'
+								'"Damn, your pretty little face looks even better with my cum all over it!" he pants with a smile.'
+								gs 'arousal', 'voyeur_sex', 5
+								gs 'stat'
+								act 'Finished':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/alblaz6.jpg"></center>'
+									'Albina cleans herself up before crawling up to Lazar and snuggling into him. They sit quietly in each other''s embrace before Lazar gently kisses her forehead, gets up off the bed and gathers his clothes up. He starts getting dressed and you quickly close the door and hurry away before you''re spotted.'
+									'You wait on the top stairs until you hear the door open and walk up like you were just heading to the room. He looks a little surprised to see you, but smiles.'
+									'"Oh hey <<$pcs_nickname>>, Albina''s in her room if you''re looking for her. I need to get going, got to hit the gym today." he explains as he flexes and walks past you. "See you around."'
+									'With that, he walks down the stairs and you hear him bidding farewell to Zoya. You walk up to Albina''s door, deciding not to say anything about what you just saw.'
+									act 'Go to her room': gt 'albina_lazar_sex', 'go_to_bedroom'
+								end
+						    end
 						end
 					end
 					act 'Go and masturbate': gt 'albina_lazar_sex', 'masturbate'
@@ -146,32 +179,32 @@ if $ARGS[0] = 'join':
 	gs 'boyStat', 'A149'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/sex/spy/join/walkin3.jpg"></center>'
-	'It''s too much for you. You have to be part of this, so you walk in and close the door. They''re too busy to hear you entering and you manage to walk all the way over to the bed before Lazar finally notices you, his dick loudly popping out of Albina''s mouth as he stumbles back a little in surprise. A puzzled Albina looks up at him, and then at you. "What the fuck <<$pcs_nickname>>? Can''t you knock?" she asks in a somewhat confused tone as she slowly jerks Lazar''s dick in her hand.'
+	'It''s too much for you. You have to be part of this, so you walk in and close the door, startling the two of them before a puzzled Albina glares at you. "What the fuck, <<$pcs_nickname>>?! Can''t you knock?" she asks in a somewhat confused tone.'
 	if AlbinaQW['Lazar_Threesome'] = 1:
-		'"You guys looked like you were having fun, so I thought I could join in as well?"'
+		'"You guys sounded like you were having fun, so I thought I could join in as well?"'
 		'Lazar just grins widely. "Getting to fuck you two babes at the same time again? Fuck yeah, I''m down with that!" and Albina smiles in return. "If it''s anything like our last threesome, then I look forward to both of you making me cum again."'
 	else
-		'"You guys looked like you were having fun, so I thought I could join in as well?"'
-		'Lazar just grins widely. "Getting to fuck you two babes at the same time? Fuck yeah, I''m down for that. How about you?" he asks as he looks down at Albina, who just shrugs in indifference. "Whatever. As long as you make me cum."'
+		'"You guys sounded like you were having fun, so I thought I could join in as well?"'
+		'Lazar just grins widely. "Getting to fuck you two babes at the same time? Fuck yeah, I''m down for that. How about you?" he asks as he looks at Albina, who just shrugs in indifference. "Whatever. As long as you make me cum."'
 	end
 	act 'Suck his cock':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some1.jpg"></center>'
-		'You strip naked as Albina resumes sucking his dick. Once you come over to join them, she pulls his dick out of her mouth and offers it to you. You take it into your mouth and start sucking it while she strokes it with her hand and sucks his balls.' 
+		'You strip naked as Albina sucks Lazar''s dick. Once you come over to join them, she pops his dick out of her mouth and offers it to you. You take it into your mouth and start sucking it while she licks and sucks his balls.' 
 		'You swap his cock back and forth between each other before she stops and pushes you onto the bed. She bends over and buries her head into your crotch as Lazar moves in behind her and slides his dick back into her pussy. He starts fucking her as she licks and sucks on your clit, her moans adding to the pleasure.'
 		gs 'arousal', 'bj', 5, 'group'
 		gs 'stat'
 		act 'Get eaten out':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some2.jpg"></center>'	
-			'She licks and sucks on your clit for a while before you reach down, grab the back of her head and pull her face tighter against you. You''re soaking wet, and her tongue easily slides inside your pussy. You start to rock and ride against her face, smearing it with your wetness, but just as you''re about to cum, she is pulled away from your crotch by Lazar, who moves in between your legs and grinds the tip of his dick between your labia.'
+			'She licks and sucks on your clit for a while before you reach down, grab the back of her head and pull her face tighter against you. You''re soaking wet, and her tongue easily slides inside your pussy. You start to rock and ride against her face, smearing it with your wetness, but just as you''re about to cum, she is pulled away by Lazar, who moves in between your legs and grinds the tip of his dick between your labia.'
 			gs 'arousal', 'cuni', 5, 'group'
 			gs 'stat'
 			act 'Lie on your back':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some3.jpg"></center>'
 				vaginal_slip = 8
-				'Albina climbs onto the bed as you spread your legs and Lazar slowly penetrates your pussy and starts fucking you. Albina watches him fuck you for a few minutes before she straddles you and sits right on your face, her soaking wet pussy driping into your mouth. You start licking and sucking her pussy and clit and occassionaly tongue fuck her while she plays with your tits, kneading them in her hands and squeezing your nipples. She soon starts rocking her hips over your face, smearing you with her sticky wetness as Lazar starts fucking you even harder, his balls deep thrusts bottoming out inside you.'  
+				'Albina climbs onto the bed as you spread your legs and Lazar slowly penetrates your pussy and starts fucking you. Albina watches him fuck you for a few minutes before she straddles you and sits right on your face, her soaking wet pussy dripping into your mouth. You start licking and sucking her pussy and clit and occassionaly tongue fuck her while she plays with your tits, kneading them in her hands and squeezing your nipples. She soon starts rocking her hips over your face, smearing you with her sticky wetness as Lazar starts fucking you even harder, his balls deep thrusts bottoming out inside you.'  
 				gs 'arousal', 'vaginal', 5, 'group'
 				gs 'stat'
 				act 'Join in sucking his dick':
@@ -185,7 +218,7 @@ if $ARGS[0] = 'join':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some4.jpg"></center>'
 						'All lubed up, she squats above him reverse cowgirl style and guides the tip of his dick to her asshole. She relaxes and slowly slides down, moaning softly as his dick easily penetrates her backdoor. Once he''s inside her, she starts riding him, her ass slapping off his hips as she picks up speed. Lazar then grabs her knees and pulls her legs back before he really starts hammering her ass, causing her eyes to roll back in her head in pleasure.' 
-						'After a few minutes of this, he pulls out of her, leaving her looking a little disappointed. "Okay, your turn <<$pcs_nickname>>." he says as he reaches over and gives your ass a firm squeeze.'
+						'After a few minutes of this, he pulls out of her, leaving her looking a little disappointed. "Okay, your turn <<$pcs_nickname>>," he says as he reaches over and gives your ass a firm squeeze.'
 						gs 'arousal', 'voyeur_sex', 5, 'group'
 						gs 'stat'
 						act 'No anal':
@@ -199,15 +232,15 @@ if $ARGS[0] = 'join':
 							act 'Climax':
 								*clr & cla
 								'<center><video autoplay loop  src="images/locations/city/redlight/studio_porn/sex/mff4.mp4"></center>'
-								'He grabs hold of her hips and a few seconds later, groans loudly in pleasure as he cums deep in her ass. She gasps and moans at the sensation as he unloads inside her. When he finally finishes, he motions for you to slide underneath him as he spreads Albina''s cheeks with his hands. You do as you''re told and when he pulls out, a steady stream of thick cum flows out of Albina''s anus and down her pussy, where it drips onto your face and into your open mouth.
-								When it finally stops, Albina turns around and takes his dick deep into her mouth and sucks it clean before she smiles down at you. She then leans down and starts licking up the cum on your face, not stopping until every last drop is in her mouth. She then pulls you up onto your knees and the two of you swallow Lazar''s cum in front of him, a wide grin appearing on his face when you stick out your clean tongues. He collapses back on the bed, satisfied, and you and Albina crawl over and join him. You all bask in the afterglow of your threesome.'
+								'He grabs hold of her hips and a few seconds later, groans loudly in pleasure as he cums deep in her ass. She moans and giggles at the sensation as he unloads inside her. When he finally finishes, he motions for you to slide underneath him as he spreads Albina''s cheeks with his hands. You do as you''re told and when he pulls out, a steady stream of thick cum flows out of Albina''s anus and down her pussy, where it drips onto your face and into your open mouth.
+								When it finally stops, Albina turns around, takes his dick deep into her mouth and sucks it clean before she smiles down at you. She then leans down and starts licking up the cum on your face, not stopping until every last drop is in her mouth. She then pulls you up onto your knees and the two of you swallow Lazar''s cum in front of him, a wide grin appearing on his face when you stick out your clean tongues. He collapses back on the bed, satisfied, and you and Albina crawl over and join him. You all bask in the afterglow of your threesome.'
 								gs 'arousal', 'bj', 5, 'group'
 								gs 'cum_call', 'mouth_swallow', $boy, 1
 								gs 'stat'
 								act 'Get dressed':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some5.jpg"></center>'
-									'After a few minutes, Lazar gets up. "I need to get going girls." he says and starts getting dressed. Once he finishes, he leans over and gives Albina a kiss on the forehead. "See you around. This was a blast, we should do again sometime." he says and points at both of you with a smirk. Albina teases him by licking your pussy as he leaves, causing him to grin. Once he leaves, you both clean up and get dressed.'
+									'After a few minutes, Lazar gets up. "I need to get going girls," he says and starts getting dressed. Once he finishes, he leans over and gives Albina a kiss on the forehead. "See you around. This was a blast, we should do again sometime," he says and points at both of you with a smirk. Albina teases him by licking your pussy as he leaves, causing him to grin. Once he leaves, you both clean up and get dressed.'
 									cumspclnt = 12
 									gs 'cum_cleanup'
 									gs 'arousal', 'end'
@@ -222,7 +255,7 @@ if $ARGS[0] = 'join':
 							'You stare at the size of Lazar''s dick and bite your lip. "Yeah, I want you in my ass, now." you say teasingly and bend over on all fours, giving him a good wiggle of your ass. You look back and see Albina squirting a good amount of lube onto her fingers and gasp when you feel the cold liquid touch your asshole as she starts rubbing it in. You moan softly when two of her fingers slide into you and she slowly fingers you, stretching you out for Lazar''s dick.'
 							anal_slip = 8
 							'Once she thinks you''re ready, she pulls her fingers out and you feel the tip of Lazar''s dick pressing against your hole.'
-							'You relax, and thanks to the lube, his dick easily pushes into your ass, causing to groan a little as it does. He goes slow at first to let you adjust, but as you moan louder in pleasure, he starts picking up the pace and is soon pounding your backdoor, his hips slapping off your ass with every thrust.'
+							'You relax, and thanks to the lube, his dick easily pushes into your ass, causing you to groan a little as it does. He goes slow at first to let you adjust, but as you moan louder in pleasure, he starts picking up the pace and is soon pounding your backdoor, his hips slapping off your ass with every thrust.'
 							'Albina isn''t willing to be left out, however, and gets on all fours in front of your face, presenting her wet holes to you. She wiggles her hips, expecting you to get to work.'
 							gs 'arousal', 'anal_finger', -5, 'group'
 							gs 'arousal', 'anal', 5, 'group'
@@ -245,7 +278,7 @@ if $ARGS[0] = 'join':
 									act 'Get dressed':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/lazar/laz3some5.jpg"></center>'
-										'After a few minutes, Lazar gets up. "I need to get going girls." he says and starts getting dressed. Once he finishes, he leans over and gives Albina a kiss on the forehead. "See you around. This was a blast, we should do again sometime." he says and points at both of you with a smirk. Albina teases him by licking your pussy as he leaves, causing him to grin. Once he leaves, you both clean up and get dressed.'
+										'After a few minutes, Lazar gets up. "I need to get going girls," he says and starts getting dressed. Once he finishes, he leans over and gives Albina a kiss on the forehead. "See you around. This was a blast, we should do again sometime," he says and points at both of you with a smirk. Albina teases him by licking your pussy as he leaves, causing him to grin. Once he leaves, you both clean up and get dressed.'
 										cumspclnt = 3
 										gs 'cum_cleanup'
 										gs 'arousal', 'end'
@@ -281,9 +314,9 @@ if $ARGS[0] = 'go_to_bedroom':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/nudealbina.jpg"></center>'
 	'You walk down the hall and knock on her door, a somewhat surprised sounding Albina asking who it is. When she hears that it''s you, she warmly greets you and lets you enter. You walk into her room and are stunned by the sight of her sprawled out on her bed in the nude, her soaking wet pussy on display to you.'
-	'She laughs at your reaction. "There''s no way you didn''t see him on your way here. Yes, Lazar and I just had sex. Some <i>really</i> good fucking sex... I''m surprised Mama didn''t hear or walk in on us. The look on her face would be priceless."'
-	'You raise a brow. "Your mother is fine with you having sex?" you ask, puzzled.'
-	'She just casually shrugs. "Yeah, she knows I''m already active and keeps encouraging me to "be safe" and use condoms. I hate the feeling of them though, plus I''m on the pill, so I just go bareback." She climbs off the bed and gathers her clothes up. "Give me a few minutes to clean up and we can do something." she says before disappearing into her en-suite bathroom. You hear the sound of her shower running before she reappears and smiles at you.'
+	'She smiles at you. "Hey <<$pcs_nickname>>.... How are you?" She''s still coming down from her orgasm. "I just had some <i>really</i> good fucking sex... I''m surprised Mama didn''t hear or walk in on me. The look on her face would have been priceless."'
+	'You just smile at her, not wanting to give away that you were spying on her. "I bet that would have been awkward," you reply and she laughs.'
+	'"She would just nag at me for not using protection. She knows I''m active and so keeps encouraging me to "be safe" and use condoms. I hate the feeling of them though, plus I''m on the pill, so I just go bareback." She climbs off the bed and gathers her clothes up. "Give me a few minutes to clean up and we can do something," she says before disappearing into her en-suite bathroom. You hear the sound of her shower running before she reappears and smiles at you before getting dressed.'
 	act 'Continue':
 		gs 'arousal', 'end'
 		gs 'stat'

+ 3 - 3
locations/albina_mother_events.qsrc

@@ -118,7 +118,7 @@ if $ARGS[0] = 'zoya_sunbathing_albina':
 		act 'Go with her':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-			'You follow Albina to her room, where she pulls the strings on her bikini thong and letting it fall to her ankles before kicking it aside.'
+			'You follow Albina to her room, where she pulls the strings on her bikini thong and lets it fall around her ankles before kicking it aside.'
 			'"I need to take a shower and wash all this lotion and sweat off. Care to join me?" She smiles playfully at you.'
 			minut +=6
 			gs 'stat'
@@ -131,7 +131,7 @@ if $ARGS[0] = 'zoya_sunbathing_albina':
 				'"No thanks. But I wouldn''t mind talking while you do."'
 				'"Suit yourself," she shrugs. Albina heads into her personal bathroom, leaving the door open for you to follow her in. You sit down on the edge of her bath while she steps into the shower.'
 				'"So you and your mother sunbathe together?"'
-				'"When we can," her voice echos back off the glass and tile. "Sometimes I''m busy, sometimes she''s busy. I wish she''d let me go full nude to avoid pantylines, but topless is the most she lets me get away with. Says I shouldn''t be worrying about those kinds of tanlines anyways. It doesn''t stop me swimming naked when she''s not home though." she adds with a small laugh.'
+				'"When we can," her voice echos back off the glass and tile. "Sometimes I''m busy, sometimes she''s busy. I wish she''d let me go full nude to avoid pantylines, but topless is the most she lets me get away with. Says I shouldn''t be worrying about those kinds of tanlines anyways. I sneak in a few nude sessions when she''s not home though." she adds with a small laugh.'
 				if motherKnowWhore > 0:
 					'"Pff. Better than my mother. Ever since she found out I''ve been having sex, she doesn''t even call me by my name anymore. Usually just ''whore'' or ''slut''. It fucking blows."'
 					'The tap squeaks off and Albina steps out of the shower, grabbing a towel to dry herself off.'
@@ -218,7 +218,7 @@ if $ARGS[0] = 'Doing yoga with Albina':
 		'"No thanks. But I wouldn''t mind talking while you do."'
 		'"Suit yourself," she shrugs. Albina heads into her personal bathroom, leaving the door open for you to follow her in. You sit down on the edge of her bath while she steps into the shower.'
 		'"So you and your mother work out together?"'
-		'"When we can," her voice echos back off the glass and tile. "Sometimes I''m busy, sometimes she''s busy. She says I should always try and keep myself in shape and use yoga to calm myself and my mind. Says it''ll ''do me a world of good.''" The tap squeaks off and Albina steps out of the shower, grabbing a towel to dry herself off.'
+		'"When we can," her voice echos back off the glass and tile. "Sometimes I''m busy, sometimes she''s busy. She says I should always try and keep myself in shape and use yoga to calm myself and my mind. Says it''ll ''do me a world of good'', whatever the hell that means." The tap squeaks off and Albina steps out of the shower, grabbing a towel to dry herself off.'
 		'You follow her into her room and sit down on her bed, continuing to chat while she gets dressed.'
 
 		minut +=6

+ 1 - 1
locations/albina_school_sex.qsrc

@@ -1,6 +1,6 @@
 # albina_school_sex
 
-!! If AlbQW['Friend'] = 2 and npc_sex[A23] > 0 when the player tries speaking to Albina during break, then there is the random chance that they will get this event instead. This should only happen once or twice a week and be somwhat uncommon.
+!! If AlbinaQW['Friend'] = 2 and npc_sex[A23] > 0 when the player tries speaking to Albina during break, then there is the random chance that they will get this event instead. This should only happen once or twice a week and be somwhat uncommon.
 
 if $ARGS[0] = 'break_fun_1':
 	menu_off = 1

+ 4 - 1
locations/arousal.qsrc

@@ -773,9 +773,12 @@ if $ARGS[0] ! 'end' and $ARGS[0] ! 'checks' and $ARGS[0] ! 'count' and $ARGS[0]
 		end
 	end
 
-!!This is release is Sveta is so horny and pent up that she can cum with minimal stimulation
+!!This is release is Sveta is so pent up that she can cum with minimal stimulation
 	if $orgasm_or ! 'no' and orgasm_buildup >= 300 and pcs_horny >= 60: gs 'orgasm', $ARGS[0]
 
+!!This is release is Sveta is so horny that she can cum if directly stimulated
+	if $orgasm_or ! 'no' and orgasm_buildup >= 50 and pcs_horny >= 300 and orgasm_flag['trigger'] ! 0: gs 'orgasm', $ARGS[0]
+
 !!Clearing temporary variables with orgasm as a gs this will catch anything there too
 	killvar 'temp_dick'
 	killvar 'temp_unaware'

+ 1 - 1
locations/arturRinok.qsrc

@@ -140,7 +140,7 @@ if $ARGS[0] = 'work_1':
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/arturqw_4.jpg"></center>'
-				'Arthur comes up behind you and firmly grabs a handful of your ass. "<<$pcs_nickname>>, here you go, you earned this." He hands you 5000 <b>₽</b>.'
+				'Arthur comes up behind you and firmly grabs a handful of your ass. "<<$pcs_nickname>>, here you go, you earned this." He hands you 1250 <b>₽</b>.'
 				'"I like helping you very much, thank you very much Arturik." You look at him with grateful eyes and take the money.'
 				'"Well, you know, the sight of your beautiful eyes nearly overwhelm me every time I see them. So does your tight ass." He says, smiling lecherously at you'
 				'You turn and give him a quick shake of your rump before departing.'

+ 17 - 14
locations/barbershop.qsrc

@@ -65,19 +65,22 @@ if $ARGS[0] = 'start':
 	end
 
 	*nl
-
-	if pcs_hairlng <= 80:
-		'Your hair is not long enough to be curled.'
-	else
-		'<a href=' + iif(money >= 1500, '"exec:gt ''barbershop'', ''perm''"','') + '>Curl your hair - 1500 <b>₽</b></a>'
-	end
+	if hypnoHairStyle ! 1:
+		if pcs_hairlng <= 80:
+			'Your hair is not long enough to be curled.'
+		else
+			'<a href=' + iif(money >= 1500, '"exec:gt ''barbershop'', ''perm''"','') + '>Curl your hair - 1500 <b>₽</b></a>'
+		end
 	
-	*nl
-
-	if pcs_hairlng <= 80:
-		'Your hair is not long enough to be straightened.'
+		*nl
+	
+		if pcs_hairlng <= 80:
+			'Your hair is not long enough to be straightened.'
+		else
+			'<a href=' + iif(money >= 1500, '"exec:gt ''barbershop'', ''perm2''"', '') + '>Straighten your hair - 1500 <b>₽</b></a>'
+		end
 	else
-		'<a href=' + iif(money >= 1500, '"exec:gt ''barbershop'', ''perm2''"', '') + '>Straighten your hair - 1500 <b>₽</b></a>'
+
 	end
 	
 	*nl
@@ -188,7 +191,7 @@ if $ARGS[0] = 'cuthair':
 	'You look at your yourself in the mirror then ask Mr. Syomin if you can get your hair cut.'
 	'"Of course, how would you like your hair cut?", he asks you.'
 
-	if pcs_hairlng > 10:
+	if pcs_hairlng > 10 and hypnoHairStyle ! 1:
 		act 'Very short':
 			cla
 			*clr
@@ -210,7 +213,7 @@ if $ARGS[0] = 'cuthair':
 		end
 	end
 
-	if pcs_hairlng > 31:
+	if pcs_hairlng > 31 and hypnoHairStyle ! 1:
 		act 'Short, but not too short':
 			cla
 			*clr
@@ -267,7 +270,7 @@ if $ARGS[0] = 'cuthair':
 		end
 	end
 
-	if pcs_hairlng > 81:
+	if pcs_hairlng > 81 and hypnoHairStyle ! 1:
 		act 'About chin-line length':
 			cla
 			*clr

+ 41 - 0
locations/bed2.qsrc

@@ -280,6 +280,7 @@ if $ARGS[0] = 'sleep':
 	if pcs_makeup > 1 and cosmetic_tattoo = 0:
 		pcs_makeup = 0
 		vidageday -= 1
+		gs 'body', 'SkinLoss', 'MakeUpSleep'
 		*nl
 		'You went to bed wearing your makeup, which will smear your face as you sleep; your skin will age faster from this!'
 	end
@@ -549,6 +550,14 @@ if $ARGS[0] = 'wake':
 			minut += 15
 			gs 'wardrobe', 'school_outfit'
 			gs 'bed2', 'end'
+			if hscrunchw ! 2 and hypnoHairStyle = 1:
+				''
+				'You fix your hair into pigtails. You feel it''s only natural to keep your hair this way.'
+				hpingripw = 0
+				hscrunchw = 2
+				hpigtail = 1
+				''
+			end
 		end
 	end
 
@@ -562,6 +571,14 @@ if $ARGS[0] = 'wake':
 				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
 			end
 			gs 'bed2', 'end'
+			if hscrunchw ! 2 and hypnoHairStyle = 1:
+				''
+				'You fix your hair into pigtails. You feel it''s only natural to keep your hair this way.'
+				hpingripw = 0
+				hscrunchw = 2
+				hpigtail = 1
+				''
+			end
 		end
 	end
 	if enfullmorrout = 1 and hour >= 4 and hour < 12:
@@ -575,6 +592,14 @@ if $ARGS[0] = 'wake':
 				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
 			end
 			gs 'bed2', 'end'
+			if hscrunchw ! 2 and hypnoHairStyle = 1:
+				''
+				'You fix your hair into pigtails. You feel it''s only natural to keep your hair this way.'
+				hpingripw = 0
+				hscrunchw = 2
+				hpigtail = 1
+				''
+			end
 		end
 		if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 4 and hour < 9 and suspended['on'] ! 1:
 			act 'Full morning routine for School (01:00)':
@@ -582,6 +607,14 @@ if $ARGS[0] = 'wake':
 				minut += 15
 				gs 'wardrobe', 'school_outfit'
 				gs 'bed2', 'end'
+				if hscrunchw ! 2 and hypnoHairStyle = 1:
+					''
+					'You fix your hair into pigtails. You feel it''s only natural to keep your hair this way.'
+					hpingripw = 0
+					hscrunchw = 2
+					hpigtail = 1
+					''
+				end
 			end
 		end
 	end
@@ -590,6 +623,14 @@ if $ARGS[0] = 'wake':
 		minut += 10
 		slept_in = 0
 		gs 'bed2', 'end'
+		if hscrunchw ! 2 and hypnoHairStyle = 1:
+			''
+			'You fix your hair into pigtails. You feel it''s only natural to keep your hair this way.'
+			hpingripw = 0
+			hscrunchw = 2
+			hpigtail = 1
+			''
+		end
 	end
 end
 

+ 1 - 0
locations/begin.qsrc

@@ -7,6 +7,7 @@ if $ARGS[0] = 'start':
 	timerEndM = 0
 	timer = 6
 	timerM = 30
+	settingmode = 0
 
 	gs 'Cheatmenu_din'
 	showstat 1

+ 31 - 0
locations/beverage.qsrc

@@ -181,6 +181,37 @@ if $ARGS[0] = 'bev_tea':
 	end
 end
 
+if $ARGS[0] = 'bev_energy_drink':
+	*clr & cla
+	frost = 1
+	if alko > 0: alko -= 1
+	minut += 5
+	money -= val($_drink['<<args[1]>>,price'])
+	pcs_health += 10
+	pcs_mood += 20
+	pcs_energy += 20
+	fat += 3
+	if pcs_hydra >= 100:
+		pcs_hydra += 25
+	else
+		pcs_hydra += 50
+	end
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+	gs 'beverage', 'afterdrink'
+	'<center><img <<$set_imgh>> src="images/shared/drinks/energy_drink.jpg"></center>'
+	'You enjoy an energy drink, and<<$mtxt>>'
+	gs 'stat'
+	killvar '$_drink'
+
+	if food_loc = 1:
+		act 'Finish': gt 'food_menu'
+	else
+		act 'Finish':gt $loc, $loc_arg
+	end
+end
+
 if $ARGS[0] = 'bev_vod':
 	if pcs_health > 20:
 		*clr & cla

+ 44 - 6
locations/body.qsrc

@@ -34,12 +34,9 @@ if $ARGS[0] = 'RegularUpdate':
 		pcs_weight = func($this, 'CalcWeight')
 		pcs_bmi = func($this, 'CalcBMI')
 	end
-
-	if pcs_skin > 100:
-		pcs_skin = 100
-	elseif pcs_skin < 0:
-		pcs_skin = 0
-	end
+	
+	!!Since "musle" is used all over the place
+	musle = strenbuf
 end
 
 if $ARGS[0] = 'DailyUpdate':
@@ -138,6 +135,23 @@ if $ARGS[0] = 'DailyUpdate':
 	end
 	
 	if age < 18 and rand (0,2) = 0 and pcs_leghair > 0: pcs_leghair -= 1
+
+	if pcs_skin <= 200:
+		pcs_skin += min(skinDailyGain * 2, 20) - skinDailyPenalty - 1
+	elseif pcs_skin <= 400:
+		pcs_skin += min(skinDailyGain, 10) - skinDailyPenalty - 1
+	elseif pcs_skin <= 600:
+		pcs_skin += min(skinDailyGain/2, 5) - skinDailyPenalty - 1
+	elseif pcs_skin <= 800:
+		pcs_skin += min(skinDailyGain/3, 3) - skinDailyPenalty - 1
+	elseif pcs_skin <= 900:
+		pcs_skin += min(skinDailyGain/5, 2) - skinDailyPenalty - 1
+	end
+
+	!skin variable reset
+	killvar 'moisturizerDailyCount'
+	killvar 'skinDailyGain'
+	killvar 'skinDailyPenalty'
 end
 
 if $ARGS[0] = '':
@@ -463,6 +477,30 @@ if $ARGS[0] = 'CalcBMI':
 	result = 10000 * (30 + salo / 2 + (pcs_hgt - 170) * 7 / 10) / (pcs_hgt * pcs_hgt)
 end
 
+if $ARGS[0] = 'SkinGain':
+	if $ARGS[1] = 'CleanSelf' and lastShowerSkinGain ! daystart:
+		lastShowerSkinGain = daystart
+		skinDailyGain += 5
+		if bathLuffa = 1: skinDailyGain += 3
+	end
+
+	if $ARGS[1] = 'Moisturizer':
+		moisturizerDailyCount += 1
+		if moisturizerDailyCount <= 2: skinDailyGain += 3
+	end
+end
+
+if $ARGS[0] = 'SkinLoss':
+	if $ARGS[1] = 'Smoke' and lastSmokeSkinPenalty ! daystart:
+		lastSmokeSkinPenalty = daystart
+		skinDailyPenalty += 1
+	end
+
+	if $ARGs[1] = 'MakeUpSleep':
+		skinDailyPenalty += 10
+	end
+end
+
 if $ARGS[0] = 'softreset':
 	!!This is for use in immediately updating shape if something has caused a large change in salo, primarily fat burners and plastic surgery
 	sftrstflag = 1

+ 1 - 1
locations/body_desc.qsrc

@@ -412,7 +412,7 @@ if $ARGS[0] = 'butt':
 	elseif pcs_butt <= 8:
 		$pcs_butt = 'You have an average, feminine looking <a href="exec:view''images/pc/body/ass/2.jpg''">ass</a>. While it''s not flat, it''s nothing special either.'
 	elseif pcs_butt <= 12:
-		$pcs_butt = 'Your tight <a href="exec:view''images/pc/body/ass/3.jpg''">ass</a> is a little bigger, rounder and firmer than average. You often draw the stares of guys around you.'
+		$pcs_butt = 'Your tight <a href="exec:view''images/pc/body/ass/3.jpg''">ass</a> is bigger, rounder and firmer than average. You often draw the stares of guys around you.'
 	elseif pcs_butt <= 16:
 		$pcs_butt = 'You have a large and natural bubble <a href="exec:view''images/pc/body/ass/4.jpg''">butt</a> that jiggles and sways as you walk. Guys hungrily fixate on you with their tongues hanging out and other girls are often envious of your booty.'
 	end

+ 2 - 2
locations/budilnik.qsrc

@@ -24,9 +24,9 @@ if $ARGS[0] = 'start':
 	'<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:
+	if mid($start_type,1,2) = 'sg' and alarm_holiday = 0:
 		'<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:
+	elseif mid($start_type,1,2) = 'sg' and alarm_holiday = 1:
 		'<center><b>Use weekend alarm for holidays - <a href="exec:  alarm_holiday = 0 & gt ''budilnik'', ''start''">ON</a></b></center>'
 	end
 

+ 0 - 8
locations/city_apt_building.qsrc

@@ -323,14 +323,6 @@ if $ARGS[0] = 'lift':
 	killvar 'res_lift_ev'
 end
 
-if $ARGS[0] = 'elev_objava':
-		*clr & cla
-		minut += 1
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/stairs/elevator_ob'+rand(1,2)+'.jpg"></center>'
-	act 'Continue': gt 'city_apt_building','lift'
-end
-
 if $ARGS[0] = 'pod_objava':
 		*clr & cla
 		minut += 1

+ 2 - 2
locations/city_industrial.qsrc

@@ -100,9 +100,9 @@ if $ARGS[0] = '':
 		'The community centre is currently closed. It''s only open during the week between 09:00 and 17:00.'
 	end
 
-	if hour >= 9 and hour <= 17 and (mid($start_type,1,2) = 'sg' and SchoolAtestat = 0) or bumtolik > 3: 
+	if hour >= 9 and hour <= 17 and (mid($start_type,1,2) ! 'sg' or SchoolAtestat = 0) or bumtolik > 3: 
 		'<a href="exec: gt ''buklinik'',''start''">Mercy clinic</a> is open.'
-	elseif (hour < 9 or hour > 17) and (mid($start_type,1,2) = 'sg' and SchoolAtestat = 0) or bumtolik > 3:
+	elseif (hour < 9 or hour > 17) and (mid($start_type,1,2) ! 'sg' or SchoolAtestat = 0) or bumtolik > 3:
 		'Mercy clinic is closed.'
 	end
 	if hour >= 8 and hour <= 20:

+ 12 - 7
locations/city_market.qsrc

@@ -248,19 +248,24 @@ if $ARGS[0] = 'tailor':
 			'"So <<$pcs_nickname>>. Do you need any clothing adjusted?"'
 
 			if money >= 500:
-				act 'Take in the clothes you are wearing (500 <b>₽</b>)':
-					cla
-					*clr
-					minut += 15
+				act 'Resize the clothes you''re wearing (500 <b>₽</b>)':
+					*clr & cla
+					minut += 10
 					if CloStyle = 5 or $clothingworntype = 'danilovich_outfits':
-						'"What are you wasting my time for? This does not need to be resized!"'
+						'The tailor is looking irritatingly at you, "Why are you wasting my time with exercise clothing? That type of clothing does not need to be resized..."'
+					elseif dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') = pcs_hips:
+						'The tailor is looking irritatingly at you, "Is this joke? Your clothes could not fit you better if they had been made for you. I have no time for such foolishness."'
+					elseif (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') > pcs_hips + 4) or (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') < pcs_hips - 4):
+						'The tailor is looking irritatingly at you, "Why are you wasting my time? Your clothing does not need to be resized. It might not be perfect but it is still fine."'
 					else
 						money -= 500
 						dynamic '<<$clothingworntype>>_b[<<clothingwornnumber>>] = pcs_hips'
-						'You undress and give your clothes to Jacob. Fifteen minutes pass before he returns.'
+						'You are handed a t-shirt and shorts as you undress and give the clothes to the tailor for adjustment.'
+						'Jacob quickly measures your waist and hips, then only takes a few minutes to adjust your outfit.'
+						'You are handed your clothes back and quickly get dressed. You''re pleased with the job that the tailor has done.'
 					end
 
-					act 'Leave': minut += 10 & gt 'city_residential'
+					act 'Continue': minut += 10 & gt 'city_market', 'tailor'
 				end
 
 				act 'Take in different clothes':gt 'clothing', 'view_clothing_list', 'resize'

+ 1 - 0
locations/city_nightclub.qsrc

@@ -172,6 +172,7 @@ if $ARGS[0] = 'inside':
 
 	if (hour < 1 or hour >= 18) and clubwork = 1:
 		act 'Find Erik for work':
+			menu_off = 1
 			*clr & cla
 			minut += 5
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'

+ 1 - 1
locations/clothing_QV.qsrc

@@ -1132,7 +1132,7 @@ if $ARGS[0] = 'clothing_list':
 			if (clothingfilter['quality'] = 0 and CloQuality = clo_i) or (clothingfilter['inhibition'] = 0 and CloInhibit = clo_i) or clothingfilter['number'] = 0:
 				if clothingfilter['inc'] = 1 and clothingfilter['only'] = 1 and clothingfilter['sport_only'] = 0:
 					if CloInhibit <= pcs_inhib:
-						if materinstvo_dress_s[i] = 0 and materinstvo_dress_h[i] > 0:*p '<a href="exec:gt ''clothing_QV'', ''change'', ''materinstvo_dress'', <<i>>"><img src="images/pc/items/materinstvo/<<i>>.jpg" 	height="250" /></a>'
+						if materinstvo_dress_s[i] = 0 and materinstvo_dress_h[i] > 0:*p '<a href="exec:gt ''clothing_QV'', ''change'', ''materinstvo_dress'', <<i>>"><img src="images/pc/items/mommy/<<i>>.jpg" 	height="250" /></a>'
 					end
 				end
 			end

+ 3 - 3
locations/clothing_descriptions.qsrc

@@ -37,11 +37,11 @@ else
 end
 
 if CloThinness = 1:
-	$description += ', which completely obscures your figure'
+	$description += ', which obscures your figure'
 elseif CloThinness = 2:
 	$description += ', which somewhat obscures your figure'
 elseif CloThinness = 3:
-	$description += ', which shows your figure somewhat'
+	$description += ', which somewhat shows your figure'
 elseif CloThinness = 4:
 	$description += ', which shows your figure well'
 elseif CloThinness = 5:
@@ -174,7 +174,7 @@ elseif CloSkirtShortness > 0:
 	elseif CloSkirtShortness = 2:
 		$description += ' and a knee-length skirt.'
 	elseif CloSkirtShortness = 3:
-		$description += ' and a fairly standard skirt.'
+		$description += ' and an above knee length skirt.'
 	elseif CloSkirtShortness = 4:
 		$description += ' and a rather short skirt.'
 	elseif CloSkirtShortness = 5:

+ 1 - 1
locations/cum_call.qsrc

@@ -4,7 +4,7 @@
 'labia' - 'pantyfront' - 'anus' - 'butt' - 'pantyrear' - 'clothes_hidden' - 'clothes' - 'back' - 'legs'
 'arms' - 'face' - 'mouth' - 'hands' - 'stomach' - 'breasts' - 'hair' - 'internalcondom' - 'precum' - 'mouth_swallow'
 	'precum' - is for whenever Sveta has unprotected vaginal sex. It will automatically set the volume to 1.
-	'mouth_swallow' does the same as mouth but increaments swallow for the cum eater trait
+	'mouth_swallow' does the same as mouth but increments swallow for the cum eater trait
 	'feet' redirects to 'legs'
 	'anal' redirects to 'anus' (prevents further errors)
 $ARGS[1] is for the name of the sexual partner

+ 96 - 81
locations/din_bad.qsrc

@@ -1,81 +1,83 @@
 # din_bad
 !2021/05/02
 $mobile_check = {
-	gs 'stat'
-	if vladimirday ! daystart and hour >= 15 and hour <= 17:
-		if vladimirQW = 20:
-			'<b><font color="red">Your phone is ringing</font></b>'
-			$caller = 'Vladimir'
-			$callerid = 'images/characters/city/vladimir/001.jpg'
-			gs 'telefon','phone_ring'
-			pl'<center><a href="exec:gt ''qwloc'',''2''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
-		elseif vladimirQW = 25 and week = 6:
+	if menu_off = 0:
+		gs 'stat'
+		if vladimirday ! daystart and hour >= 15 and hour <= 17:
+			if vladimirQW = 20:
+				'<b><font color="red">Your phone is ringing</font></b>'
+				$caller = 'Vladimir'
+				$callerid = 'images/characters/city/vladimir/001.jpg'
+				gs 'telefon','phone_ring'
+				pl'<center><a href="exec:gt ''qwloc'',''2''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
+			elseif vladimirQW = 25 and week = 6:
+				'<b><font color="red">Your phone is ringing</font></b>'
+				$caller = 'Vladimir'
+				$callerid = 'images/characters/city/vladimir/001.jpg'
+				gs 'telefon','phone_ring'
+				pl'<center><a href="exec:gt ''qwloc'',''3''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
+			elseif vladimirQW = 35 and week = 6:
+				'<b><font color="red">Your phone is ringing</font></b>'
+				$caller = 'Vladimir'
+				$callerid = 'images/characters/city/vladimir/001.jpg'
+				gs 'telefon','phone_ring'
+				pl'<center><a href="exec:gt ''qwloc'',''4''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
+			end
+		end
+
+		if leonidSlaveDay = daystart and hour >= 6 and hour <= 10 and leonidVisit = 0:
 			'<b><font color="red">Your phone is ringing</font></b>'
-			$caller = 'Vladimir'
-			$callerid = 'images/characters/city/vladimir/001.jpg'
+			$caller = 'Leonid Vostov'
+			$callerid = 'images/characters/pavlovsk/resident/leonid/leonidphone.jpg'
 			gs 'telefon','phone_ring'
-			pl'<center><a href="exec:gt ''qwloc'',''3''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
-		elseif vladimirQW = 35 and week = 6:
+			pl'<center><a href="exec:gt ''leonid'', ''call''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:leonidSlaveDay = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
+		end
+
+		if QWdogreiqTimer = 0 and QWdogReiq = 2 and week = 7 and qwdogiventday ! daystart and hour >= 12:
 			'<b><font color="red">Your phone is ringing</font></b>'
-			$caller = 'Vladimir'
-			$callerid = 'images/characters/city/vladimir/001.jpg'
+			$caller = 'Margaret'
+			$callerid = ''
 			gs 'telefon','phone_ring'
-			pl'<center><a href="exec:gt ''qwloc'',''4''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:vladimirday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			pl''
+			'<center><a href="exec:gt ''qwlocdog''"><img src="images/system/phone/call_accept.png"></a>			 <a href="exec:qwdogiventday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
 		end
-	end
-
-	if leonidSlaveDay = daystart and hour >= 6 and hour <= 10 and leonidVisit = 0:
-		'<b><font color="red">Your phone is ringing</font></b>'
-		$caller = 'Leonid Vostov'
-		$callerid = 'images/characters/pavlovsk/resident/leonid/leonidphone.jpg'
-		gs 'telefon','phone_ring'
-		pl'<center><a href="exec:gt ''leonid'', ''call''"><img src="images/system/phone/call_accept.png"></a>		<a href="exec:leonidSlaveDay = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
-	end
 
-	if QWdogreiqTimer = 0 and QWdogReiq = 2 and week = 7 and qwdogiventday ! daystart and hour >= 12:
-		'<b><font color="red">Your phone is ringing</font></b>'
-		$caller = 'Margaret'
-		$callerid = ''
-		gs 'telefon','phone_ring'
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		pl''
-		'<center><a href="exec:gt ''qwlocdog''"><img src="images/system/phone/call_accept.png"></a>			 <a href="exec:qwdogiventday = daystart & gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
-	end
-
-	!! iterating all lovers
-	lover_number = 0
-	:loverloop
-	if pcs_lovers[lover_number] = 1 and loverday[lover_number] ! daystart and hour > 5 and hour < 20 and ringA = 0 and rand(1,7) > 5:
-		if pcs_apprnc < vneshlover[lover_number]:
-			loverrelation[lover_number] -= 1
-			if loverrelation[lover_number] = 0:
-				'<b><font color="red">Your lover hasn''t been calling you lately, they''ve probably grown tired of you.</font></b>'
+		!! iterating all lovers
+		lover_number = 0
+		:loverloop
+		if pcs_lovers[lover_number] = 1 and loverday[lover_number] ! daystart and hour > 5 and hour < 20 and ringA = 0 and rand(1,7) > 5:
+			if pcs_apprnc < vneshlover[lover_number]:
+				loverrelation[lover_number] -= 1
+				if loverrelation[lover_number] = 0:
+					'<b><font color="red">Your lover hasn''t been calling you lately, they''ve probably grown tired of you.</font></b>'
+				else
+					'Your lover <<$loverdesc[lover_number]>> has not called you.'
+				end
 			else
-				'Your lover <<$loverdesc[lover_number]>> has not called you.'
+				ring = 1
+				ringA = 1
+				'<b><font color="red">Your phone is ringing</font></b>'
+				PLAY 'sound/old_phone.mp3',30
+				$caller = '<<$loverdesc[lover_number]>>'
+				$callerid = 'images/characters/shared/headshots_generic/'+lover_picture[lover_number]+'.jpg'
+				gs 'telefon','phone_ring'
+				pl'<center><a href="exec:gt ''telefon'', ''lover'', <<lover_number>>"><img src="images/system/phone/call_accept.png"></a>			 <a href="exec:gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
 			end
-		else
-			ring = 1
-			ringA = 1
-			'<b><font color="red">Your phone is ringing</font></b>'
-			PLAY 'sound/old_phone.mp3',30
-			$caller = '<<$loverdesc[lover_number]>>'
-			$callerid = 'images/characters/shared/headshots_generic/'+lover_picture[lover_number]+'.jpg'
-			gs 'telefon','phone_ring'
-			pl'<center><a href="exec:gt ''telefon'', ''lover'', <<lover_number>>"><img src="images/system/phone/call_accept.png"></a>			 <a href="exec:gt $loc, $loc_arg"><img src="images/system/phone/decline.png"></a></center>'
 		end
-	end
-	lover_number += 1
-	if lover_number < arrsize('pcs_lovers'): jump 'loverloop'
+		lover_number += 1
+		if lover_number < arrsize('pcs_lovers'): jump 'loverloop'
 
-	killvar 'lover_number'
+		killvar 'lover_number'
+	end
 }
 
 $d_salf = {
@@ -146,22 +148,35 @@ if $ARGS[0] = 'd_bag':
 	end
 !! Hair options
 	*nl
-	if (compact_mirror = 1 or greben = 1) and pcs_hairbsh = 0: 
-		'There''s a hairbrush in your purse. <a href="exec:pcs_hairbsh = 1 & gs ''stat'' & gs ''din_bad'', ''d_bag''">Brush your hair</a>'
-	elseif (compact_mirror = 1 or greben = 1) and pcs_hairbsh = 1: 
-		'There''s a hairbrush in your purse. Your hair doesn''t need brushing right now.'
-	end
-	if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
-		if hscrunchw = 0 and hpingripw = 0: 'As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''din_bad'', ''d_bag''">ponytail</a>. You have <<hscrunch>> scrunchies left.'
-		if hscrunchw = 1: 'Remove the <a href="exec:hscrunchw = 0 & gs ''din_bad'', ''d_bag''">scrunchie</a> to get rid of the ponytail.'
-	end
-	if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
-		if hscrunchw = 0 and hpingripw = 0: 'You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''din_bad'', ''d_bag''">updo your hair</a>. You have <<hpingrip>> hair accessories at your disposal.'
-		if hpingripw = 1: 'Let your hair <a href="exec:hpingripw = 0 & gs ''din_bad'', ''d_bag''">flow free</a>.'
-	end
-	if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
-		if hscrunchw = 0 and hpingripw = 0: 'You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''din_bad'', ''d_bag''">pigtails</a>.'
-		if hscrunchw = 2: '<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''din_bad'', ''d_bag''">Remove</a> your scrunchies and let your hair flow free again.'
+	if hypnoHairStyle ! 1:
+		if (compact_mirror = 1 or greben = 1) and pcs_hairbsh = 0: 
+			'There''s a hairbrush in your purse. <a href="exec:pcs_hairbsh = 1 & gs ''stat'' & gs ''din_bad'', ''d_bag''">Brush your hair</a>'
+		elseif (compact_mirror = 1 or greben = 1) and pcs_hairbsh = 1: 
+			'There''s a hairbrush in your purse. Your hair doesn''t need brushing right now.'
+		end
+		if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
+			if hscrunchw = 0 and hpingripw = 0: 'As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''din_bad'', ''d_bag''">ponytail</a>. You have <<hscrunch>> scrunchies left.'
+			if hscrunchw = 1: 'Remove the <a href="exec:hscrunchw = 0 & gs ''din_bad'', ''d_bag''">scrunchie</a> to get rid of the ponytail.'
+		end
+		if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
+			if hscrunchw = 0 and hpingripw = 0: 'You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''din_bad'', ''d_bag''">updo your hair</a>. You have <<hpingrip>> hair accessories at your disposal.'
+			if hpingripw = 1: 'Let your hair <a href="exec:hpingripw = 0 & gs ''din_bad'', ''d_bag''">flow free</a>.'
+		end
+		if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
+			if hscrunchw = 0 and hpingripw = 0: 'You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''din_bad'', ''d_bag''">pigtails</a>.'
+			if hscrunchw = 2: '<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''din_bad'', ''d_bag''">Remove</a> your scrunchies and let your hair flow free again.'
+		end
+	else
+		if hscrunchw ! 2:
+			hpingripw = 0
+			hscrunchw = 2
+			hpigtail = 1
+			gs 'din_bad', 'd_bag'
+			''
+			'You notice your hair is all messed up, so you fix it into pigtails.'
+		else
+			'You think your hair looks perfect the way it is! There''s no reason to change it.'
+		end
 	end
 	
 	*nl

+ 15 - 5
locations/din_van.qsrc

@@ -29,6 +29,7 @@ $showerdin = {
 	else
 		killvar 'noShampoo'
 	end
+	gs 'body', 'SkinGain', 'CleanSelf'
 	if false_lashes >= 1:
 		if rand(0,4) <= 2:
 			'You''re careful enough that your false lashes make it through relatively unscathed.'
@@ -212,11 +213,7 @@ $bath = {
 		noShampoo_tmp = noShampoo
 		dynamic $showerdin
 
-		if bath_daystart ! daystart:
-			bath_daystart = daystart
-			pcs_skin += rand(1,2)
-			pcs_willpwr += 1
-		end
+		gs 'body', 'SkinGain', 'Bath'
 
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash4.jpg"></center>'
@@ -292,6 +289,17 @@ $bath = {
 	killvar 'noShampoo_tmp'
 }
 
+$SkinCare = {
+	if item_moisturizer ! 0:
+		act 'Apply Moisturizer':
+		! Add Description here
+
+		gs 'body', 'SkinGain', 'Moisturizer'
+		gs 'stat'
+		end
+	end
+}
+
 $brit = {
 	if shave_menu = 1 and stanok > 1:
 		if pcs_leghair > 3 or (pubestyle > 0 and pcs_pubes >= shave_trigger):
@@ -1027,6 +1035,8 @@ if $ARGS[0] = 'private':
 		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
 	end
 
+	dynamic $SkinCare
+
 	if painkiller > 0:
 		'You have <b><<painkiller>></b> painkiller'+iif(painkiller > 1, 's.', '.')
 		if pain['total'] > 0 and pain['killer'] = 0:

+ 10 - 2
locations/ender.qsrc

@@ -19,7 +19,11 @@ if $ARGS[0] = 'loss':
 
 		'You fall to the floor and feel your consciousness slipping away.'
 
-		act 'Further': gt 'intro_city_tg', 'tatianaPRE'
+		if $start_type = 'uni_tg':
+			act 'Further': gt 'intro_uni_tg', 'tatianaPRE'
+		else
+			act 'Further': gt 'intro_city_tg', 'tatianaPRE'
+		end
 		exit
 	elseif fightEnding = 2:
 		if autocombat_surrender = 0 or pcs_health < 100: pcs_health = 100
@@ -777,7 +781,11 @@ if $ARGS[0] = 'surrender':
 		'He ignores your pleas and hits you with a huge upper cut.'
 		'You fall to the floor and feel your consciousness slipping away.'
 
-		act 'Further': gt 'intro_city_tg', 'tatianaPRE'
+		if $start_type = 'uni_tg':
+			act 'Further': gt 'intro_uni_tg', 'tatianaPRE'
+		else
+			act 'Further': gt 'intro_city_tg', 'tatianaPRE'
+		end
 		exit
 	elseif fightEnding = 2:
 		if pcs_health < 100: pcs_health = 100

+ 1 - 1
locations/fight.qsrc

@@ -670,7 +670,7 @@ if $ARGS[0] = 'player':
 
 	!! If this is the Player character
 	if ARGS[2] = 0:
-		if pcs_magik > 0:
+		if $start_type[1] = 'magic':
 			act 'Cast a Spell': gs 'fight', 'spellcast'
 		end
 		if func('fight', 'AvailableTargets', 'opp') > 0:

+ 8 - 11
locations/gaddvor.qsrc

@@ -13,11 +13,8 @@ if $ARGS[0]='':
 	CLOSE ALL
 	gs 'gadukino_event', 'sound'
 
-	if mid($start_type,1,2) = 'sg':
-		'<center><h4>Your grandparents'' yard</h4></center>'
-	else
-		'<center><h4>Old couple''s yard</h4></center>'
-	end
+	'<center><h4>Your grandparents'' yard</h4></center>'
+
 	if month >= 4 and month <= 10:
 		if hour >= 6 and hour < 22:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/dvor.jpg"></center>'
@@ -41,15 +38,15 @@ if $ARGS[0]='':
 		act 'Enter the banya':minut += 1 & gt 'gadbana'
 	else
 		if grandmaQW['chore_feed_chickens'] = 1 or (hour >= 6 and hour < 20 and month >= 4 and month <= 10):'In the yard there are several <a href="exec:gt ''gaddvor'',''chickens''">chickens</a> running around.'
-		if curr_home = 14 and hour > 7 and hour < 20:
-			if swl_rex['status'] = 0:
+		if curr_home = 14 and hour > 7 and hour < 20 and rex['owned'] = 1:
+			if $status['dog'] = '':
 				gt 'pet_dog', 'name'
 			else
-				if swl_rex['gadukino_day'] ! daystart:
-					swl_rex['relationship'] += 2
-					swl_rex['gadukino_day'] = daystart
+				if rex['gadukino_day'] ! daystart:
+					rex['relationship'] += 2
+					rex['gadukino_day'] = daystart
 				end
-				'<br><a href="exec: gt ''pet_dog'', ''gadukino''"><<$swl_rex[''name'']>></a> is running around in the garden.'
+				'<br><a href="exec: gt ''pet_dog'', ''gadukino''"><<$rex[''name'']>></a> is running around in the garden.'
 			end
 		end
 	end

+ 1 - 1
locations/gadfield.qsrc

@@ -29,7 +29,7 @@ if $ARGS[0] = 'field':
 		else
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield_night.jpg"></center>'
 		end
-		if hour >= 9 and hour <= 17 and npc_qw['A221'] = 0 and mid($start_type,1,2) = 'sg': gs 'grigory', 'meet' & exit
+		if hour >= 9 and hour <= 17 and npc_qw['A221'] = 0: gs 'grigory', 'meet' & exit
 	else
 		if hour >= 8 and hour < 18:
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadfield_winter.jpg"></center>'

+ 7 - 7
locations/gadforest.qsrc

@@ -188,15 +188,15 @@ if $ARGS[0] = 'forest_edge':
 			if gadforest_clothestorn = 1:
 				gadforest_clothestorn = 0
 				'Your clothes were torn to shreds in the woods, leaving you with no choice but to head back home naked.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			! clothes are here
 			elseif clothesAtLocation = 1:
 				'You decide to leave your clothes behind and sneak home naked, purely for the thrill of it.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			! no clothes here
 			elseif clothesAtLocation = 0:
 				'You seem to have misplaced your clothes, leaving you with no choice but to head back home naked. You wonder where you might have left your clothes.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			end
 			! Allow schoolgirl player to leave naked but go straight back home
 			! Non-schoolgirls will just find a random sweatshirt to put on - it is the same everytime but walking around naked in the village is not implemented yet
@@ -207,7 +207,7 @@ if $ARGS[0] = 'forest_edge':
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				if mid($start_type,1,2) = 'sg' and grandaQW['block'] = 0:
+				if grandaQW['block'] = 0:
 					if hour >= 10 and hour < 16 and month >= 4 and month <= 10:
 						forestcaughtrand = rand(4,10)
 					elseif hour >= 6 and hour < 20 and month >= 4 and month <= 10:
@@ -782,9 +782,9 @@ if $ARGS[0] = 'walking':
 					gt 'gadforest_event', 'find_meadow'
 				else
 					if month >= 4 and month <= 10:
-						if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest0.'+rand(1,2)+'.jpg"></center>'
-						if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype ! 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest1.'+rand(1,3)+'.jpg"></center>'
-						if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear') and $pantyworntype = 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest_tanga0.'+rand(1,2)+'.jpg"></center>'
+						if ($clothingworntype ! 'nude' and PCloswimwear = 0) and CloSkirtShortness = 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest0.'+rand(1,2)+'.jpg"></center>'
+						if ($clothingworntype ! 'nude' and PCloswimwear = 0) and $pantyworntype ! 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest1.'+rand(1,3)+'.jpg"></center>'
+						if ($clothingworntype ! 'nude' and PCloswimwear = 0) and $pantyworntype = 'none' and CloSkirtShortness > 0:'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest_tanga0.'+rand(1,2)+'.jpg"></center>'
 						if $clothingworntype = 'nude':'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gulforest_nude0.'+rand(1,4)+'.jpg"></center>'
 						*nl
 						'You spend an hour walking through the woods, enjoying the sounds of the forest and the fresh air.'

+ 8 - 8
locations/gadforestlost.qsrc

@@ -25,7 +25,7 @@ if $ARGS[0] = 'forest_outskirts':
 	foresteventrand = rand(1,40)
 	if foresteventrand <= (2+(bonfire*5)) and daystart >= forest_lostday and month >= 6 and month <= 9 and hour >= 8 and hour <= 16 and mushroom_pickersday ! daystart: mushroom_pickers = 2 & gt 'gadforestlost', 'rescue', 'pickers', 'forest_outskirts'
 	if foresteventrand <= (4+(bonfire*5)) and daystart > forest_lostday and month >= 4 and month <= 10 and ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)) and daystart > forest_lostday + 1: gt 'gadforestlost', 'rescue', 'hunters', 'forest_outskirts'
-	if foresteventrand <= (6+(bonfire*5)) and mid($start_type,1,2) = 'sg' and daystart > forest_lostday: gt 'gadforestlost', 'rescue', 'ranger', 'forest_outskirts'
+	if foresteventrand <= (6+(bonfire*5)) and daystart > forest_lostday: gt 'gadforestlost', 'rescue', 'ranger', 'forest_outskirts'
 	if foresteventrand <= (8-(bonfire*5)) and (hour < 6 or hour > 22): gt 'gadforestlost', 'wolves', 'forest_outskirts'
 
 	gs 'gadforestlost', 'wander'
@@ -57,7 +57,7 @@ if $ARGS[0] = 'forest_center':
 	! having a bonfire increases chances of being rescued and decreases chances of wolves attacking
 	foresteventrand = rand(1,40)
 	if foresteventrand <= (1+(bonfire*2)) and daystart > forest_lostday and month >= 4 and month <= 10 and ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)) and daystart > forest_lostday: gt 'gadforestlost', 'rescue', 'hunters', 'forest_center'
-	if foresteventrand <= (3+(bonfire*2)) and mid($start_type,1,2) = 'sg' and daystart > forest_lostday + 1: gt 'gadforestlost', 'rescue', 'ranger', 'forest_center'
+	if foresteventrand <= (3+(bonfire*2)) and daystart > forest_lostday + 1: gt 'gadforestlost', 'rescue', 'ranger', 'forest_center'
 	if foresteventrand <= (8-(bonfire*2)) and (hour < 6 or hour > 22): gt 'gadforestlost', 'wolves', 'forest_center'
 
 	gs 'gadforestlost', 'wander'
@@ -152,12 +152,12 @@ if $ARGS[0] = 'relax':
 		foresteventrand = rand(1,30)
 		if foresteventrand <= (2+(bonfire*5)) and daystart >= forest_lostday and month >= 6 and month <= 9 and hour >= 8 and hour <= 16 and mushroom_pickersday ! daystart: mushroom_pickers = 2 & gt 'gadforestlost', 'rescue', 'pickers', $forest_args1
 		if foresteventrand <= (4+(bonfire*5)) and daystart > forest_lostday and month >= 4 and month <= 10 and ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)): gt 'gadforestlost', 'rescue', 'hunters', $forest_args1
-		if foresteventrand <= (6+(bonfire*5)) and mid($start_type,1,2) = 'sg' and daystart > forest_lostday+1: gt 'gadforestlost', 'rescue', 'ranger', $forest_args1
+		if foresteventrand <= (6+(bonfire*5)) and daystart > forest_lostday+1: gt 'gadforestlost', 'rescue', 'ranger', $forest_args1
 	elseif $forest_args1 = 'forest_center':
 		! having a bonfire increases chances of being rescued and decreases chances of wolves attacking
 		foresteventrand = rand(1,40)
 		if foresteventrand <= (1+(bonfire*5)) and daystart > forest_lostday and month >= 4 and month <= 10 and ((hour >= 8 and hour < 12) or (hour >= 14 and hour < 18)): gt 'gadforestlost', 'rescue', 'hunters', $forest_args1
-		if foresteventrand <= (3+(bonfire*5)) and mid($start_type,1,2) = 'sg' and daystart > forest_lostday+1: gt 'gadforestlost', 'rescue', 'ranger', $forest_args1
+		if foresteventrand <= (3+(bonfire*5)) and daystart > forest_lostday+1: gt 'gadforestlost', 'rescue', 'ranger', $forest_args1
 	end
 
 	'<center><H4>Somewhere in the forest</H4></center>'
@@ -493,7 +493,7 @@ if $ARGS[0] = 'rescue':
 	bushcraft_exp += rand(1,5)
 	lost_girl = 0
 	if swamp_clothes = 1:
-		'You remove the terrible excuse for clothing the hunters gave you. You''re sure you can find something better to wear'+iif(StoryLine=1,' at your grandparents house.','.')
+		'You remove the terrible excuse for clothing the hunters gave you. You''re sure you can find something better to wear at your grandparents house.'
 		gs 'clothing', 'strip', 'gadforest'
 		gs 'clothing', 'swamp_clothes', 0
 	end
@@ -504,7 +504,7 @@ if $ARGS[0] = 'rescue':
 		*nl
 		'Suddenly you hear the sounds of people approaching. A group of pickers from the village appear out of the bushes.'
 		if bonfire = 1:'They notice your fire and praise you, "When lost, it''s very smart if you stay in one place and make a fire. It will keep you warm, and make you visible to others."'
-		if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
+		if grandmaQW['block'] = 0:
 			'They walk up to you and say, "Your grandparents are very worried about you. They asked us to keep an eye out for you. Follow us, we will lead you back '+iif($clothingworntype ! 'nude','to their house."','to the edge of the forest."')
 			if $clothingworntype ! 'nude':
 				if $ARGS[2] = 'forest_outskirts':
@@ -540,7 +540,7 @@ if $ARGS[0] = 'rescue':
 		*nl
 		'Suddenly you hear the sounds of people approaching. '+iif(hunters_were_met=1,'The hunters from the swamp ','A group of hunters ')+'appear out of the bushes.'
 		if bonfire = 1:'They notice your fire and praise you, "When lost, it''s very smart if you stay in one place and make a fire. It will keep you warm, and make you visible to others."'
-		if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
+		if grandmaQW['block'] = 0:
 			'They walk up to you and say, "Your grandparents are very worried about you. They asked us to keep an eye out for you. Follow us, you can stay at our camp for the time being until someone can take you back."'
             if $ARGS[2] = 'forest_outskirts':
                 act 'Continue': minut += 45 & gt 'hunter_interactions', 'meet_hunters_after_rescue'
@@ -560,7 +560,7 @@ if $ARGS[0] = 'rescue':
 		*nl
 		'Suddenly you hear the sound of a person approaching. A man you vaguely recognize from the village appears out of the bushes.'
 		if bonfire = 1:'They notice your fire and praise you, "When lost, it''s very smart if you stay in one place and make a fire. It will keep you warm, and make you visible to others."'
-		if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
+		if grandmaQW['block'] = 0:
 			'He walks up to you and says, "Your grandparents are very worried about you. They asked me to keep an eye out for you. Follow me, I will lead you back '+iif($clothingworntype ! 'nude','to their house."','to the edge of the forest."')
 			if $clothingworntype ! 'nude':
 				if $ARGS[2] = 'forest_outskirts':

+ 1 - 1
locations/gadriver.qsrc

@@ -1233,7 +1233,7 @@ if $ARGS[0] = 'fishing':
 
 				act 'Leave':gt $loc, $loc_arg
 			end
-			if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
+			if grandmaQW['block'] = 0:
 				act 'Bring a fish to Boniface':
 					cla
 					*clr

+ 7 - 21
locations/gadroad.qsrc

@@ -108,28 +108,14 @@ if $ARGS[0] = 'drinking_invite':
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 	'You quickly catch up to the boys who have already started drinking.'
-	!School girl Sveta
-	if mid($start_type,1,2) = 'sg':
-		! Sveta has never been drinking with Mitka before
-		if mitka_first_drink = 1:
-			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
-			'Kolyamba and Vasyan nod in agreement as they look you over.'
-			'"We know this great spot in the woods to hang out. No one ever bothers us there."'
-		else
-			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
-			'Kolyamba and Vasyan nod in agreement as they look you over.'
-		end
-	! Transformation or New In Town Sveta
+	! Sveta has never been drinking with Mitka before
+	if mitka_first_drink = 1:
+		'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+		'Kolyamba and Vasyan nod in agreement as they look you over.'
+		'"We know this great spot in the woods to hang out. No one ever bothers us there."'
 	else
-		if mitka_first_drink = 1:
-			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
-			'"These are my two best friends, Kolyamba and Vasyan. We have grown up in this village our whole lives and do just about everything together."'
-			'Kolyamba and Vasyan quickly introduce themselves and look you over.'
-			'"We know this great spot in the woods to hang out. No one ever bothers us there."'
-		else
-			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
-			'Kolyamba and Vasyan nod in agreement as they look you over.'
-		end
+		'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+		'Kolyamba and Vasyan nod in agreement as they look you over.'
 	end
 	'Mitka asks, "Are you ready to go?"'
 

+ 5 - 19
locations/gadukino.qsrc

@@ -24,15 +24,7 @@ if $ARGS[0] = '':
 		gs 'stat'
 		'<center><b><font color = maroon>Mitka Shkvoryen</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big63.jpg"></center>'
-		if mid($start_type,1,2) = 'sg':
-			'As you walk through the village, you are approached by Mitka, your childhood friend.'
-		else
-			if npc_rel['A63'] = 0:
-				'In the village you are approached by a boy about your age.'
-			else
-				'In the village you are approached by Mitka.'
-			end
-		end
+		'As you walk through the village, you are approached by Mitka, your childhood friend.'
 
 		act 'Say hello':gt 'mitka'
 	else
@@ -99,10 +91,8 @@ if $ARGS[0] = '':
 		*nl
 		'A small village with many old wooden houses and even more in various states of disrepair. It has certainly seen better times.'
 		if car > 0 and cardrive = 23: '<a href="exec:GS ''carF'',''start''">Your <<$car>></a> is close by.'
-		if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
-			'Several small farms are scattered around the outskirts of the village, one of which belongs to <a href="exec:minut += 5 & gt ''gaddvor''">your grandparents</a>.'
-			act 'Go to your grandparent''s house': minut += 5 & gt 'gaddvor'
-		end
+		'Several small farms are scattered around the outskirts of the village, one of which belongs to <a href="exec:minut += 5 & gt ''gaddvor''">your grandparents</a>.'
+		act 'Go to your grandparent''s house': minut += 5 & gt 'gaddvor'
 		if curr_home = 12 or curr_home = 14:
 			if vladimirday = daystart and vladimirQW = 30 and hour >= 16 and week = 6:'<a href="exec:gt ''qwmeet'',''2''">There''s an Audi parked in the street, and standing beside it, you notice Vladimir</a>.'
 			if vladimirday = daystart and vladimirQW = 40 and hour >= 16 and week = 6:'<a href="exec:gt ''qwmeet'',''3''">There''s an Audi parked in the street, and standing beside it, you notice Vladimir</a>.'
@@ -118,7 +108,7 @@ if $ARGS[0] = '':
 			end
 		end
 		if npc_rel['A60'] > 0 and metmira = 1:
-			'Just down the road '+iif(StoryLine=1,'from your grandparents house ','')+'is <a href="exec:minut += 5 & gt ''miroslavahome'', ''start''">Mira''s house</a>.'
+			'Just down the road from your grandparents house is <a href="exec:minut += 5 & gt ''miroslavahome'', ''start''">Mira''s house</a>.'
 			act 'Go to Mira''s house': minut += 5 & gt 'miroslavahome', 'start'
 		end
 		*nl
@@ -327,11 +317,7 @@ if $ARGS[0] = 'mira_events':
 			'You decide to lend a hand to help the girl with the calf. You are lonely in the village, and maybe this girl, if you get to know her, could make your trips to Gadukino less boring. You walk over to the girl and introduce yourself and ask if she wants help. She nods and resumes pulling on the rope, while you walk over behind the calf and give it a load slap on the rump. The calf is surprised and immediately moves forward away from you. The girl smiles in thanks and tells you her name is Miroslava, but everyone calls her Mira.'
 			'Together you are able to guide the calf back into its pen. Mira turns out to be quite a sociable girl and conversationalist. You learn that her family was recently forced to move to the village from the city. Her father''s huge gambling debts to some questionable men forced him to eventually sell the family''s property in the city to pay them back. Mira is having a rough time adjusting to the life in a small village. She misses the apartment in the center of the city and the money to buy nice dresses and makeup with. After selling everything and paying off the debt, her father was told to leave the city "or else...".'
 			'They were left quite poor and could only afford to buy a house in this run-down, dust-covered village.'
-			if mid($start_type,1,2) = 'sg':
-				'You walk with her and chat until you reach her house, which turns out to be just down the road from your grandparent''s place. Mira invites you to come and visit her any time. She is just as bored in the village as you are.'
-			else
-				'You walk with her and chat until you reach her house, which is close by to the center of the village. Mira invites you to come and visit her at any time. She is just as bored in the village as you are.'
-			end
+			'You walk with her and chat until you reach her house, which turns out to be just down the road from your grandparent''s place. Mira invites you to come and visit her any time. She is just as bored in the village as you are.'
 
 			act 'Finish your walk': gt 'gadukino'
 		end

+ 1 - 1
locations/gdksport.qsrc

@@ -269,7 +269,7 @@ if $ARGS[0] = 'dance2':
 
 		act 'Leave':
 			if rand (0,4) = 0:
-				if AlbinaQW['StarletsJoined'] = 0 and AlbinaQW['StarletsShutDown'] = 0 and StoryLine ! 0 and ( month < 10 or ( month = 10 and day < 18 )):
+				if AlbinaQW['StarletsJoined'] = 0 and AlbinaQW['StarletsShutDown'] = 0 and mid($start_type,1,2) = 'sg' and ( month < 10 or ( month = 10 and day < 18 )):
 					if alterstrtimg = 13:
 						gt 'albina_starlets', 'albina3'
 					elseif grupTipe = 1 or grupTipe = 2:

+ 32 - 24
locations/gkafe.qsrc

@@ -75,43 +75,51 @@ if $ARGS[0] = '':
 			
 			gs 'gkafe', 'menu'
 
-			if StoryLine > 0 and home_owned[2] = 1 and SchoolBlock = 0:
-				'Since your <<$npc_nickname[''A29'']>> works here, you can eat-in for free.'
-			elseif StoryLine > 0 and home_owned[2] = 0 and SchoolBlock = 0:
-				'Since your <<$npc_nickname[''A29'']>> kicked you out, you can no longer eat here for free.'
-			elseif StoryLine > 0 and home_owned[2] = 1 and SchoolBlock = 0:
-				'Since you got kicked out of school, you can no longer eat here for free. Your <<$npc_nickname[''A29'']>> wants you to earn a living.'
-			elseif StoryLine > 0 and home_owned[2] = 0 and SchoolBlock = 1:
-				'Since you were expelled from school and your <<$npc_nickname[''29'']>> kicked you out, you can no longer eat here for free.'
+			if mid($start_type,1,2) = 'sg':
+				if SchoolBlock = 0:
+					if home_owned[2] = 1: 
+						'Since your <<$npc_nickname[''A29'']>> works here, you can eat-in for free.'
+					elseif home_owned[2] = 0:
+						'Since you left home, you can no longer eat here for free.'
+					end
+				else
+					if home_owned[2] = 1:
+						'Since you got kicked out of school, you can no longer eat here for free. Your <<$npc_nickname[''A29'']>> wants you to earn a living.'
+					elseif home_owned[2] = 0:
+						'Since you were expelled from school and left home, you can no longer eat here for free.'
+					end
+				end
+			else
+				'Your <<$npc_nickname[''A29'']>> works here and when you were a kid you used to be able to eat for free.'
 			end
 
 			if week < 6:
-				if hour >= 6 and hour < 16 and StoryLine > 0:
+				if hour >= 6 and hour < 16:
 					'Your <a href="exec:gt ''mother''">mother</a> is currently working at the cafe, taking orders behind the counter.'
 				else
 					'The bar owner <a href="exec:gt ''gkafe'', ''boris''">Borislav</a> is currently taking orders at the counter. Most people call him Slava.'
 				end
 			end
 
-				razvrand = rand(1, 10)
+			razvrand = rand(1, 10)
 
-				! WD: Allpw event to trigger even after talking to <<$npc_nickname[''A29'']>> about fucking her boss
-				! SM: Change event to trigger once Misha has seen Sveta with cum on face in public at least once
-				if razvrand > 7 and hour > 16 and hour < 20 and age < 18 and dyadyamishaevent = 0 and sosedknow = 1:
-					''
-					'A male figure walks closely by your table. You look up and recognize him as Misha, your neighbor. He stops when he recognizes you as well and sits down next to you, giving you a friendly smile. "Oh hello <<$pcs_nickname>>. Listen, me and your stepfather were working late in the garage yesterday, and went for a nightcap at my place when we were finished. When your stepfather left, he accidentally left some of his tools behind. I''m fairly sure he needs them again today, and I could use a hand bringing them back to the garage. Could you help me out? I''ll give you money for your troubles."'
+			! WD: Allpw event to trigger even after talking to <<$npc_nickname[''A29'']>> about fucking her boss
+			! SM: Change event to trigger once Misha has seen Sveta with cum on face in public at least once
+			if razvrand > 7 and hour > 16 and hour < 20 and age < 18 and dyadyamishaevent = 0 and sosedknow = 1:
+				''
+				'A male figure walks closely by your table. You look up and recognize him as Misha, your neighbor. He stops when he recognizes you as well and sits down next to you, giving you a friendly smile. "Oh hello <<$pcs_nickname>>. Listen, me and your stepfather were working late in the garage yesterday, and went for a nightcap at my place when we were finished. When your stepfather left, he accidentally left some of his tools behind. I''m fairly sure he needs them again today, and I could use a hand bringing them back to the garage. Could you help me out? I''ll give you money for your troubles."'
 
-					act 'Help Misha':gs 'boyStat', 'A54' & sexpartkno = 1 & gt 'gevent', '1'
-				elseif razvrand > 7 and hour > 16 and hour < 20 and dyadyamishaevent = 1 and dmishaday ! daystart:
-					''
-					'A man suddenly slides into the seat next to you as you eat your meal. You look up and see that it''s Misha. He has a greedy look in his eyes, the kind that is already stripping you naked in his thoughts. His eyes are fixated on your breasts as he speaks. "Hey, <<$pcs_nickname>>. Would you like to join me for some tea at my place? We can have a bit of fun just like last time, and you can earn some more money..."'
+				act 'Help Misha':gs 'boyStat', 'A54' & sexpartkno = 1 & gt 'gevent', '1'
+			elseif razvrand > 7 and hour > 16 and hour < 20 and dyadyamishaevent = 1 and dmishaday ! daystart:
+				''
+				'A man suddenly slides into the seat next to you as you eat your meal. You look up and see that it''s Misha. He has a greedy look in his eyes, the kind that is already stripping you naked in his thoughts. His eyes are fixated on your breasts as he speaks. "Hey, <<$pcs_nickname>>. Would you like to join me for some tea at my place? We can have a bit of fun just like last time, and you can earn some more money..."'
 
-					act '"Drink tea" with Misha':gs 'boyStat', 'A54' & sexpartkno = 1 & gt 'gevent', '1-1'
-				end
+				act '"Drink tea" with Misha':gs 'boyStat', 'A54' & sexpartkno = 1 & gt 'gevent', '1-1'
 			end
-			if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
-				if (sunWeather = 0 or temper <= 0) and (hour >= 18 and hour < 20 and week < 6) or (week >= 6 and hour >= 9 and hour < 20):
-					'<a href="exec:minut += 3 & gt ''gopskver''">Vitek, Dan and Vasily</a> are sitting at a table in the far corner.'
+		end
+		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
+			if (sunWeather = 0 or temper <= 0) and (hour >= 18 and hour < 20 and week < 6) or (week >= 6 and hour >= 9 and hour < 20):
+				'<a href="exec:minut += 3 & gt ''gopskver''">Vitek, Dan and Vasily</a> are sitting at a table in the far corner.'
 			end
 		end
 	end

+ 1 - 1
locations/gopnew.qsrc

@@ -537,7 +537,7 @@ if $ARGS[0] = 'bazar':
 	'Vasan roughly shakes you by the shoulders and says: "Well? What do you say?"'
 
 	! WD: Uninitialised ~ 'magic' use 'magik'
-	if pcs_magik > 0:'You sense a vague evil and powerful magic, that suppresses your own magical powers. You can''t use your spells against the Gopniks.'
+	if $start_type[1] = 'magic':'You sense a vague evil and powerful magic, that suppresses your own magical powers. You can''t use your spells against the Gopniks.'
 	act 'Agree to their demands':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/city/residential/street/gopnews.jpg"></center>'

+ 1 - 1
locations/grigory.qsrc

@@ -1046,7 +1046,7 @@ if $ARGS[0] = 'romantic_event':
 			'"Where were you thinking?" You ask.'
 			'"I can walk you back to your Grandparent''s home, or you could come back to mine," He looks you in the eye, a hopeful look on his face.'
 			
-			if mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
+			if grandmaQW['block'] = 0:
 				act 'Grandparents Home':
 					'"I should probably get back to my Grandparent''s place," You say.'
 					'You see a rueful smile cross Grigory''s face, "Ok," Standing, he gives you a little hug, your feet dangling off the ground, before he lowers you to stand on your own two feet again.'

+ 1 - 2
locations/gschool_chats.qsrc

@@ -231,8 +231,7 @@ if $ARGS[0] = 'cooljocks':
 			gs 'arousal', 'end'
 			gs 'stat'
 		end
-		act 'Ignore it and talk to the cool kids': gt 'gschool_chats', 'popular'
-		act 'Ignore it and talk to the cool kids': gt 'gschool_chats', 'jocks'
+		act 'Ignore it and talk to the cool kids and jocks': gt 'gschool_chats', 'cooljocks'
 		act 'Identify the perpetrator': gt 'gschool_events1', 'butt_grab'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/chat/cooljocks.jpg"></center>'

+ 3 - 2
locations/gschool_events1.qsrc

@@ -199,6 +199,7 @@ if $ARGS[0] = 'butt_grab':
 				act 'Take his cock out of his pants': gt 'gschool_sex', 'rand_bj'
 			end
 			act 'Take him to the old school building':
+				*clr & cla
 				grupvalue[1] -= 5
 				grupvalue[2] -= 5
 				grupvalue[3] -= 5
@@ -218,7 +219,7 @@ if $ARGS[0] = 'butt_grab':
 					grupvalue[4] -= 1
 					gs 'fame', 'pav', 'sex', 5
 					gs 'npc_relationship', 'modify', 'A8', 'love'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
 					'You remember the back room that Katja showed you. When you tell Svyatoslav about it, he takes your hand and tells you to take him there. As soon as you close the door behind you, Svyatoslav pounces on you and begins to kiss you.'
 					gs 'arousal', 'kiss', 2
 					gs 'stat'
@@ -371,7 +372,7 @@ if $ARGS[0] = 'butt_grab':
 					grupvalue[3] -= 5
 					gs 'fame', 'pav', 'sex', 5
 					gs 'npc_relationship', 'modify', 'A6', 'like'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/shared/sex/kiss/kiss.jpg"></center>'
 					'You remember the back room that Katja showed you. You take Petka by the hand and lead him off, you can feel his sweaty palm, you can tell he is nervous. As soon as you close the door you turn towards him and start to kiss him. He shy and awkward at first but then starts to get into it, though he isn''t a very good kisser.'
 					gs 'arousal', 'kiss', 2
 					gs 'stat'

+ 2 - 2
locations/gschool_gopnik_chats.qsrc

@@ -14,7 +14,7 @@ if $ARGS[0] = 'vitek':
 			npc_rel[$static_num] = 0
 			kotovLoveQW = -1
 			gs 'stat'
-			'You start yelling at Vitek that he has fucked other girls. Vitek starts yelling at you and suddenly, there is a ringing in your head and your vision goes blurry. You find you''re on the floor with Vitek standing over you. Your cheek burns with pain and it takes you a few moments to understand what happened. It seems he slapped you so hard it knocked you off your feet. "Stay away from me you fucking whore! It''s over between us!"'
+			'You start yelling at Vitek about him fucking other girls. Vitek starts yelling at you in return before there is a sudden ringing in your head and your vision goes blurry. You find you''re on the floor with Vitek standing over you. Your cheek burns with pain and it takes you a few seconds to understand what happened. It seems he slapped you so hard it knocked you off your feet. "Stay away from me, you fucking whore! It''s over between us!"'
 
 			act 'Continue': gt 'gschool_lessons', 'short_break'
 		end
@@ -27,7 +27,7 @@ if $ARGS[0] = 'vitek':
 				if fame['pav_sex'] > 75: gs 'fame', 'pav', 'sex', -75
 				if fame['pav_prostitute'] > 75: gs 'fame', 'pav', 'prostitute', -75
 				gs 'stat'
-				'It takes a bit, but you convince him that all this was just gossip and none of it was true. He frowns. "I''ll knock their teeth out if they whisper one more word about you then. Don''t worry baby. I will shut their yapping mouths."'
+				'It takes a while, but you convince him that all this was just gossip and none of it was true. He frowns. "I''ll knock their teeth out if they whisper one more word about you then. Don''t worry baby. I will shut their yapping mouths."'
 
 				act 'Continue': gt 'gschool_lessons', 'short_break'
 			end

+ 59 - 14
locations/gschool_gossip.qsrc

@@ -1,7 +1,8 @@
 # gschool_gossip
 
 if $ARGS[0] = 'morning':
-!!going to class
+!!will need the code for the new sonia gossip here in the morning
+	if soniafall['gossip'] ! soniafall and soniafall > 0 and soniafall < 8: gs 'gschool_gossip', 'sonia_disco_gossip'
 	if sveta_dyke_rumor = 30 or sveta_dyke_rumor = 24 or sveta_dyke_rumor = 18 or sveta_dyke_rumor = 12 or sveta_dyke_rumor = 6 or sveta_dyke_rumor = 1:
 		gs 'gschool_gossip', 'sveta_dyke_rumors', 'picture'
 	else
@@ -10,26 +11,21 @@ if $ARGS[0] = 'morning':
 end
 
 if $ARGS[0] = 'skipping':
-!!skipping lunch
 	'On your way to hang out with your friends during lunch, you pass by small knots of your fellow students engaged in their own conversations. As you do, you overhear them talking about a variety of things, including some juicy gossip.'
 	gs 'gschool_gossip', 'gossip'
 end
 
 if $ARGS[0] = 'bagged':
-!!bag lunch
 	'You take your bagged lunch to one of the tables with an empty seat and sit there. While you are eating your lunch, you can''t help but overhear some of the conversations going on around you. Your fellow students are talking about a variety of things, including some juicy gossip.'
 	gs 'gschool_gossip', 'gossip'
 end
 
 if $ARGS[0] = 'buying':
-!!buy lunch
 	'You stand in line to buy your lunch. While waiting in line, you chat to a few of your fellow students until you make your purchase. You then take your lunch tray and sit at one of the empty tables. While you are eating your lunch, you can''t help but overhear some of the conversations going on around you. Your fellow students are talking about a variety of things, including some juicy gossip.'
 	gs 'gschool_gossip', 'gossip'
 end
 
 if $ARGS[0] = 'gym':
-!!leaving gym
-!!maybe add in a version where you leave the boys locker room
 	'Exiting the girls locker room, you pass by some of your fellow students, as they are leaving the gym as well. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 	gs 'gschool_gossip', 'girls'
 end
@@ -41,6 +37,7 @@ end
 
 if $ARGS[0] = 'gossip':
 	if $ARGS[1] = 'picture':
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boys_gossip.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl
@@ -145,7 +142,8 @@ end
 
 if $ARGS[0] = 'mixed':
 	if $ARGS[1] = 'picture':
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/join_cool.jpg"></center>'
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl
 	end
@@ -421,17 +419,14 @@ if $ARGS[0] = 'mixed':
 		'"Just get Gerasim to do it. That''s what I do."'
 		'"Do I need to pay him or something?"'
 		'"Nah, just act like you really need it done and he''ll say yes. It''s almost annoying how nice he is to everyone, but I haven''t gotten a bad grade yet from him, so…"'
-!!Vitek + relationship 45 and above + sveta is not a gopnik
 	elseif chat_rand = 79 and npc_rel['A9'] >= 45 and grupTipe ! 4:
 		'"Have you noticed <<$pcs_nickname>> hanging out with Vitek lately?"'
 		'"You think she''s a gopnik now? Oh god, maybe she''s fucking him!"'
 		'"Ew, I didn''t need that mental image!"'
-!!Vitek + relationship 45 and above + sveta is a gopnik
 	elseif chat_rand = 80 and npc_rel['A9'] >= 45 and grupTipe = 4:
 		'"Even for a gopnik, <<$pcs_nickname>> has been hanging around Vitek a lot more lately."'
 		'"You know, I heard he sells drugs… you think he''s selling some to her?"'
 		'"Pfft, obviously! I mean they''re both gopniks, so of course all they do is drink, be loud and do drugs."'
-!!Vasily + relationship 25 and below + sveta is not a gopnik
 	elseif chat_rand = 81 and npc_rel['A11'] <= 25 and grupTipe ! 4:
 		'"Aren''t <<$pcs_nickname>> and Vasily childhood friends?"'
 		'"More like were. They''re not close anymore."'
@@ -508,7 +503,7 @@ if $ARGS[0] = 'mixed':
 		gs 'gschool_gossip', 'mixed', $ARGS[1]
 	end
 
-	if dimaRevenge = 4 and dimaRevChoice = 2 and hour >= 13:
+	if dimaRevenge = 4 and dimaRevChoice = 2 and hour >= 13 and $loc_arg = 'watercooler':
 		!!in hallway!!
 		*nl
 		'You find Natasha in the hallway and have a little chat. Dimka is nowhere to be seen. A few other seats are empty as well. You smile thinking about what that means.'
@@ -517,6 +512,7 @@ end
 
 if $ARGS[0] = 'boys':
 	if $ARGS[1] = 'picture':
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boys_gossip.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl
@@ -785,6 +781,7 @@ end
 
 if $ARGS[0] = 'girls':
 	if $ARGS[1] = 'picture':
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/girls_gossip1.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl
@@ -909,6 +906,13 @@ if $ARGS[0] = 'girls':
 		'"Well, what if he is? It would explain so much."'
 		'"You''re just pissed he shot you down when you flirted with him."'
 		'"And why would he have done that if he wasn''t gay? I''m telling you, something''s wrong with him."'
+		if fedorKozlovQW >= 20:
+			act 'Get outraged':
+				cla
+				'"What are you talking about? You know we''re dating, don''t you?" you cut it on the conversation. "Trust me, I assure you, he''s not. And you better not be talking shit about my boyfriend, especially behind his back."'
+				act 'Continue': gt $menu_loc, $menu_arg
+			end
+		end
 	elseif chat_rand = 31 and fedorKozlovQW <= -10:
 		'"It''s such a shame what happened to Fedor."'
 		'"I know. He was so cute. I was thinking of asking him out."'
@@ -924,7 +928,6 @@ if $ARGS[0] = 'girls':
 		'"You''re right, I haven''t really been thinking about it, but I''ve heard he sits down while peeing, just like a girl."'
 		'The two girls laugh and continue gossiping as you move away from them.'
 	elseif chat_rand = 33 and igor_DimaNos > 1:
-!!this one needs a trigger so it only shows up if the Igor story has progressed to Dimka going on a date with Igor
 		if igor_DimaNos >= 3:
 			'"Have you seen the girl Dimka has been seen with lately?" asks one girl.'
 			'"Yeah, I saw them holding hands in town. They''re quite cute together." adds another one.'
@@ -999,6 +1002,7 @@ end
 
 if $ARGS[0] = 'Lizaveta':
 	if $ARGS[1] = 'picture':
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/girls_gossip2.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl
@@ -1105,7 +1109,48 @@ if $ARGS[0] = 'Lizaveta':
 	end
 end
 
-!!this is the gossip stuff I pulled from gschoo_events. no point having gossip in several locations. So I put it here. I don''t know how it would be best to add it to the above options so just leaving it here and you can add the code.
+!!I am adding this as a event that should happen each monday this number goes up, it should only trigger once ever at each stage and then never again. soniafall is set in soniadisco file
+if $ARGS[0] = 'sonia_disco_gossip':
+	if soniafall = 1:
+		'"You should have seen Sonia at the disco."'
+		'"What? What happened?"'
+		'"She kept getting drinks from the gopniks all night, as she went out and danced on the dance floor, grinding on anyone and everyone that wanted to dance with her, she got totally wasted. Then one of the girls screwed it all up and took her home."'
+		'"Damn! I can''t believe I missed that."'
+	elseif soniafall = 2:
+		'"Sonia was at it again at the disco."'
+		'"What? Again? When?"'
+		'"Right after you left. She kept getting drinks from the gopniks all night again, while dancing on the dance floor, grinding on anyone and everyone that wanted to dance with her, she got totally wasted again. Then one of the girls screwed it all up again and took her home."'
+		'"Damn! I can''t believe I missed that... again."'
+	elseif soniafall = 3:
+		'"Sonia went off with some of the gopniks then game back totally wasted with one of her tits hanging out."'
+		'"Are you kidding me?"'
+		'"Nope it was really amazing, of course some girl had to eventually ruin it but until then it was amazing to see her tit bouncing all over."'
+		'"Why does all of this keep happening when I''m not there?"'
+	elseif soniafall = 4:
+		'"Sonia went off with some of the gopniks at the disco and got totally wasted with them and took off her top flashing them all her tits."'
+		'"No way, how you would you know?"'
+		'"It''s true, Paulina took a video of her, I seen it."'
+		'"Shit I need to go ask Paulina for a copy of that video."'
+	elseif soniafall = 5:
+		'"Sonia went off with some of the gopniks at the disco and got totally wasted with them and took off her panties flashing them all her pussy."'
+		'"Fuck are you serious? I honestly can''t believe even Sonia would go that far. I know she has been acting kinda slutty lately but damn."'
+		'"Yeah no shit, I always thought she was one of those good girls like Katja but now she is worse than Vicky."'
+		'"Paulina record it again."'
+		'Laughs. "Yeah, she has a nice pussy."'
+		'"Fuck how do you always find out about this first? I need to see that video."'
+	elseif soniafall = 6:
+		'"Sonia went off with some of the gopniks at the disco and got totally wasted with them and gave Vitek a blowjob."'
+		'"Fuck are you serious? Lucky bastard, I guess she really is turning into a slut."'
+		'"Totally, shame she was such a nice girl and now such a slut... "Looking at his friend, he sighs." Yes Paulina recorded it."'
+		'"I didn''t... well if everyone has seen it, I should as well I guess."'
+	elseif soniafall = 7:
+		'You see Sonia walking down the hall ahead of you, with her head down. Everyone is looking at her, some are laughing, many are jeering at her, and more than a few are calling her a slut. When they are not doing that they are on their phones watching something. Just then you get a ping on your phone. You stop and pull out your phone, it is a message from Paulina, a mass message to every student in school, with a video attached. You open up the video and to your shock you see Sonia getting gangbanged by a bunch of gopniks, happy as can be. When they all finish on her face, then drag her back to the disco. Where she is paraded around like some prize with cumming dripping off her face. She seems to eventually realize what is going on and flees the disco, with everyone laughing as she does.'
+		*nl
+		'You know her reputation is over, one mistake, granted a big one and her life as she knew it is totally over. The cool kids will dump her after this and no one will take her in, she will be a outcast whore from now on. The only people that will talk to her is boys trying to use her sexually now. You sigh and put your phone away.'
+	end
+	soniafall['gossip'] = soniafall
+end
+		
 if $ARGS[0] = 'gosip':
 	if soniaPS > 0 and soniaPS < 4 and rand(0,2) = 0:
 		if soniaPS = 1:
@@ -1129,7 +1174,6 @@ if $ARGS[0] = 'gosip':
 			'"Oh it''s nothing. I used to like her a lot, but back in the ninth grade she was such a prude, she wouldn''t even go on a date with me!"'
 		end
 	else
-		!!a place to talk about the sexual adventures of Svetlana
 		if fame['pav_sex'] < 50:
 		*nl
 		'"Did you know <<$pcs_nickname>> is a huge tease? I heard she just undressed right in front of someone lately!"'
@@ -1177,6 +1221,7 @@ end
 
 if $ARGS[0] = 'sveta_dyke_rumors':
 	if $ARGS[1] = 'picture':
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boys_gossip.jpg"></center>'
 		'Walking down the halls, you barely notice the poor state of the school anymore, having grown used to it. Approaching your locker, you see several of your classmates who you wave to. As you do, you overhear some of them talking about a variety of things, including some juicy gossip.'
 		*nl

+ 7 - 9
locations/gschool_grounds.qsrc

@@ -24,7 +24,7 @@ if $ARGS[0] = 'main':
 	'Pavlovsk''s only school, where all the local children go for their education. Next to the school is the athletic field and a parking lot for the teachers, with a large grove of trees just beyond them.' 
 	'Hidden behind these trees is the old school building, which was supposed to be renovated and used for advance classes after the new one was built, but budget cuts meant the project was cancelled and now the old building stands empty and abandoned. It''s a popular spot for students to skip class or hang out outside of school.'
 
-	if ((hour = 6 and minut >= 30) or (hour >= 7 and hour < 18)) and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and suspended['on'] ! 1:
+	if ((hour = 6 and minut >= 30) or (hour >= 7 and hour < 18)) and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and suspended['on'] ! 1:
 		'With the school open you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
 	end
 
@@ -142,7 +142,7 @@ if $ARGS[0] = 'main':
 
 !!	act 'Go to the Principals Office': gt
 
-	if week < 6 and hour >= 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and SchoolBlock = 0 and suspended['on'] ! 1:
+	if week < 6 and hour >= 6 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and SchoolBlock = 0 and suspended['on'] ! 1:
 		if PCloStyle2 = 4 or Enable_sforma = 1:
 			if hour = 6:
 				if minut < 30:
@@ -189,7 +189,7 @@ if $ARGS[0] = 'main':
 
 	if joint > 0 and jointhigh = 0: act 'Smoke a joint behind the school building': gs 'drugs', 'joint' & gt $loc, $loc_arg
 
-	if week = 6 and hour = 8 and StoryLine > 0 and SchoolAtestat = 0 and detention_set = 1 and SchoolBlock = 0: act 'Go to detention': gt 'gschool_detention', 'start'
+	if week = 6 and hour = 8 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and detention_set = 1 and SchoolBlock = 0: act 'Go to detention': gt 'gschool_detention', 'start'
 
 	if christinaQW['dompath'] = 4: gt 'gschool_grounds', 'KristinaFight'
 
@@ -349,11 +349,9 @@ if $ARGS[0] = 'sports':
 		act 'Go for a run (1 hour)':
 			*clr & cla
 			menu_off = 1
-			minut += 60
-			schoolrunday = daystart
-			fat -= rand(2, 7)
-			run_exp += rand(0, 2)
-			gs 'sweat', 'add', 20
+			gs 'exercise', 'tier1', 60, 'run_exp'
+			fat -= rand(0,4)
+			gs 'sweat', 'add', 5
 			gs 'stat'
 			if month > 2 and month < 9:
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/grounds/runsummer.jpg"></center>'
@@ -368,7 +366,7 @@ if $ARGS[0] = 'sports':
 		'You could go for a run here if you were wearing sports clothes and shoes.'
 	end
 
-	if hour >= 9 and hour < 18 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0: 'With the school open, you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
+	if hour >= 9 and hour < 18 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0: 'With the school open, you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
 
 	if week = 6 and SchoolSorev = 2 and hour = 10 and SchoolBlock = 0:
 		*nl

Diff do ficheiro suprimidas por serem muito extensas
+ 625 - 209
locations/gschool_jock_chats.qsrc


+ 4 - 0
locations/gschool_lessons.qsrc

@@ -368,6 +368,10 @@ if $ARGS[0] = 'grade_check':
 		'You''re only getting top marks in some of your classes, but only a few of your grades are bad and you''re not failing any classes. You should have no trouble getting into university, but improving your grades wouldn''t hurt.'
 	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_70'] > 10: 
 		'You''re only getting top marks in a few of your classes and are failing others. You should improve your grades if you want to get into university.'
+	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] = 13: 
+		'You''re only getting top marks in some of your classes and a lot of bad grades, but you''re not failing any classes. You need to improve your bad grades if you want to get into university.'
+	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] > 10: 
+		'You''re getting top marks in a few of your classes, but are failing some of the others. You should improve your grades if you want to get into university.'
 	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] > 6: 
 		'You''re getting top marks in a few of your classes, but are failing a lot of the others. You should improve your grades if you want to get into university.'
 	elseif class['school_grades_above_90'] > 0: 

+ 1 - 1
locations/gschool_nerd_chats.qsrc

@@ -168,7 +168,7 @@ if $ARGS[0] = 'natasha':
 			'You approach Natasha and explain how you''re struggling in school and could really use her help studying. She thinks it over for a second, but happily agrees: "Sure <<$pcs_nickname>>, that could be fun!"'
 			act 'Time for the next class': gt 'gschool_lessons', 'short_break'
 		end
-	elseif NatbelQW['QWstage'] >= 8 and NatbelQW['Debt'] > 0:
+	elseif NatbelQW['QWstage'] >= 8 and NatbelQW['Debt'] > 0 and NatbelQW['DebtDay'] <= daystart:
 		act 'Come to the bathroom with me':
 			*clr & cla
 			minut += 5

+ 50 - 61
locations/gschool_sex.qsrc

@@ -119,85 +119,74 @@ if $ARGS[0] = 'afterschool':
 	menu_off = 1
 	gs 'boyStat', 'A3'
 	ivan_afterschool = 0
-	pcs_horny += 10
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/afterschool.jpg"></center>'
-	'You go back to where you and Katja made out with Ivan and find both of them already there talking. As soon as they see you, they both stop talking.'
-	'Katja has a suspicious grin on her face while you can already see the bulge of Ivan''s cock straining against his pants as he looks at you hungrily.'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan0.jpg"></center>'
+	'As school end you go and find Katja and the two of you head to the English classroom you told Ivan to meet you in. Once inside you close the door and take seats at the some of the desks and the two you start talking as you wait for Ivan to show up. As you wait Katja pulls out a small bottle of lube from her purse, which makes you both giggle.'
+	'It doesn''t take to long until the door opens and there is Ivan. He see''s the two of you and grins, he closes the door and strides over to the two of you. You can already see the bulge of Ivan''s cock straining against his pants as he looks at you both hungrily.'
 	*nl
-	'You can tell by Katja''s look that she planned something with Ivan and you find yourself eager to find out what it is as Katja waves you over. "Well what took you? We''ve been waiting for a few minutes, come on." Before you can even respond, she takes you both by the hand and leads you down the least used wing of the school to one of the classrooms that barely sees any activity.'
-	*nl
-	'Katja pulls you into the room as Ivan stops for a moment and looks back down the hall before coming in and closing the door.' 
+	'"Well what took you? We''ve been waiting for a few minutes, come on." Katja says to him.' 
 	act 'Continue':
 		*clr & cla
-		pcs_horny += 10
 		if dick > npc_throat['A14']: npc_throat['A14'] += 1
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/doublebj.jpg"></center>'
-		'You and Katja begin kissing and pulling each other''s clothes off and within moments, you''re both naked. Breaking your kiss, you both look at Ivan, cheek to cheek. He stands there with his <<dick>>cm <<$dick_girth>> cock in his hand, stroking it as he watches the two of you.'
-		*nl
-		'Katja wastes no time. She walks over to him, pulling you along, and drops to her knees in front of him. She pulls his pants the rest of the way off as you kneel down beside her.'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan1.jpg"></center>'
+		'Katja gets out of the desk as Ivan stops next to the two of you, she drops down to her knees and starts unzipping his pants. You quickly join her, just in time to see his <<dick>>cm <<$dick_girth>> cock spring free, Katja starts stroking it once, as he looks down at the two of you.'
 		*nl
-		'She pulls his hand away and takes his <<dick>>cm <<$dick_girth>> cock into her mouth. He moans at once, even louder once she starts sucking him off, quickly offering you a turn. Licking your lips, you take Ivan''s cock into your mouth as well.'
-		'The two of you trade his cock back and forth between you.'
-		gs 'arousal', 'bj', 10, 'group'
-		act 'Katja wants more':
+		'She takes his cock into her mouth. He moans at once, even louder once she starts sucking him off, quickly offering you a turn. Licking your lips, you take Ivan''s cock into your mouth as well. The two of you trade his cock back and forth between you.'
+		gs 'arousal', 'bj', 3, 'group'
+		gs 'stat'
+		act 'Ivan fucks you':
 			*clr & cla
-			pcs_horny += 10
-			if npc_vag['A14'] < dick: npc_vag['A14'] += 1
-			if npc_vag['A14']*2 < dick: npc_vag['A14'] += 1
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/cowgirlmissionary.jpg"></center>'
-			'Pulling away from Ivan, Katja lays down on her back. She pulls you on top of her and you are straddling her face, looking down towards her legs. Her tongue immediately begins to lap at your pussy and you feel yourself getting wet.'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan2.jpg"></center>'
+			'Pulling away from Ivan, Katja lays down on her back on the teachers desk, with her legs spread wide. Ivan gets the idea and pulls you up, shoving your face in her pussy. Your tongue immediately begins to lap at her pussy and you feel her getting wet.'
 			*nl
-			'She spreads and lifts her legs up, inviting Ivan in and he wastes no time. Lowering himself between her legs, he slides his <<dick>>cm <<$dick_girth>> dick into her pussy and starts fucking her. You and Ivan start kissing while he fucks Katja and her tongue teases your wet pussy.'
-			'You and Katja are both moaning in pleasure as Ivan looks into your eyes and says "I want to fuck you now."'
-			gs 'arousal', 'cuni', 10, 'group'
-			act 'Ivan fucks you':
+			'Ivan grabs the bottle of lube, lubing up his dick and rubbing some of it on your asshole, as you keep eating Katja out. He rubs the tip of his lubed dick against your butthole making it slippery, then he slides his <<dick>>cm <<$dick_girth>> dick into your ass and starts fucking your butt. Several minutes of this goes by, Ivan isn''t to rough, he adjust his speed and depth based on your moans, making it feel good the whole time. You and Katja are both moaning in pleasure as she looks into his eyes and says "I want you to fuck me now."'
+			gs 'arousal', 'cuni_give', 3, 'group', 'lesbian'
+			gs 'arousal', 'anal', -3, 'group'
+			gs 'stat'
+			act 'Ivan fucks Katja':
 				*clr & cla
-				pcs_horny += 10
+				if npc_ass['A14'] < dick: npc_ass['A14'] += 1
+				if npc_ass['A14']*2 < dick: npc_ass['A14'] += 1
+				if katjaQW['anal_quest'] = 2: katjaQW['anal_quest'] = 3
 				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/69doggy.jpg"></center>'
-				'Ivan pulls out of Katja and gets up. You lean forward and begin to lick Katja''s soaking wet pussy, your tongue easily sliding inside her in place of Ivan''s dick. Ivan walks around and kneels down behind you, near Katja''s head.'
-				'Within seconds, you feel Ivan''s <<dick>>cm <<$dick_girth>> cock slide inside your wet pussy and he starts pounding you balls deep as Katja sucks his balls. Ivan fucks you for several more minutes while you eat Katja out. Her body begins to convulse as she starts having an orgasm.'
-				'Hearing her cum, Ivan beings to grunt and pick up the pace.'
-				gs 'arousal', 'cuni_give', 10, 'group'
-				gs 'arousal', 'vaginal', 10, 'group'
-				minut -= 10
-				act 'Surprise':
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan3.jpg"></center>'
+				'Ivan pulls out of you and pulls you from Katja, then he slides her off the desk as he flips her over effortlessly, until she is facing away bent over the desk. You kneel down next to them and hold Katja''s butt cheeks apart as Ivan lubes up her butt, then wasting no time he slides his dick up her ass as well. She hisses a bit and then moans deeply in pleasure. He fucks her butt for several more minutes before he pulls out and says. "Both of you up on the desk, lay on your backs."'
+				gs 'arousal', 'voyeur_sex', 3, 'group'
+				gs 'stat'
+				act 'Get on the desk':
 					*clr & cla
 					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/anal.jpg"></center>'
-					'After her orgasm, Katja slides under you. You''re face to face and laying on her stomach, your breasts squeezed together, as she begins to kiss you.'
-					*nl
-					'Ivan starts to pant. It sounds like he is starting to get close himself. Katja reaches up with both her hands and grabs your ass, pulling your cheeks as far apart as she can. Grunting as he fucks you, Ivan understands the invitation.'
-				    'Pulling out of your pussy and slipping his <<dick>>cm <<$dick_girth>> cock into your ass, he hardly misses a beat. In a single stroke, he plunges his <<dick>>cm <<$dick_girth>> dick balls deep into your ass. You gasp and moan in a mixture of surprise, pain and pleasure.'
-					*nl
-					'Looking down at Katja, your eyes lock and you realize now this is what she and Ivan had been talking about when you approached them earlier. You begin to pant while rubbing your clit.'
-					'Katja slides out from under you, kneels down next to you and watches Ivan roughly hammer your ass. You begin to cry out as your body spasms in an intense orgasm.'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan4.jpg"></center>'
+					'You both climb on the desk laying on your backs side by side with your legs spread wide for Ivan. He walks up and you feel his <<dick>>cm <<$dick_girth>> cock slide back into your ass, he picks up the pace and starts fucking you a little harder and faster this time. You glance over and see Katja staring at him as he fucks your ass and rubbing her own clit. Ivan keeps looking to her as she plays with herself.'
 					anal_slip += 4
-					gs 'arousal', 'anal', 10, 'group'
-					gs 'arousal', 'vaginal', 10, 'group'
-					minut -= 10
+					gs 'arousal', 'anal', 3, 'group'
 					act 'Happy ending':
 						*clr & cla
-						katjaQW['slut'] += 2
-						katjaQW['Horny'] = 0
-						sexpartkno = 1
-						spafinloc = 12
-						gs 'cum_manage'
-						orgasm += 1
-						gs 'arousal', 'end'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan5.jpg"></center>'
+						'He suddenly pulls out of you, leaving your ass filling empty suddenly. Within seconds, Ivan''s shoves cock slide inside Katja''s gapping asshole, she moans loudly as he starts fucking her again. You reach over and start rubbing her clit as he keeps fucking her. Ivan fucks her for several more minutes while you rub Katja''s clit. Her body begins to convulse as she starts having an orgasm.'
+						'Hearing her cum, Ivan beings to grunt and pick up the pace. Ivan starts to pant. It sounds like he is starting to get close himself. Katja reaches up with both her hands and grabs your ass, pulling your cheeks as far apart as she can. Grunting as he fucks you, Ivan understands the invitation.'
+						gs 'arousal', 'voyeur_sex', 3, 'group'
+						gs 'arousal', 'vaginal_finger_give', -3, 'group', 'lesbian'
 						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katjacumkiss.jpg"></center>'
-						'Feeling you orgasm, Ivan redoubles his efforts and within minutes, he pulls out of you and begins shooting spurts of cum all over your ass and Katja''s face.'
-						'Ivan sits back on his heels, sweating as he catches his breath and watches Katja lick all his cum off your ass. Once she is done, you sit up next to her. Seeing the cum running down her face, you lean over and lick it up. You then kiss each other with your cum coated tongues, sharing Ivan''s sperm between you.'
-						'Watching this, Ivan only says one word. "Damn!"'
-						*nl
-						'You all start getting dressed and Ivan looks at the two of you. "Girls, we''ve got to do this again some time! What do you say?"'
-						'You look at each other and start giggling before Katja turns to look at him. "If you''re a good boy maybe. We''ll see." You both give him a look that promises, right or wrong, you want another go as badly as he does.'
-						'"I''m always good." he says with a laugh. He quickly finishes dressing and leaves, likely late for practice. Once he is gone, you and Katja look at each other and giggle, then leave as well.'
-						act 'Leave': gt 'gschool_grounds', 'main'
+						act 'Happy ending':
+							*clr & cla
+							katjaQW['slut'] += 2
+							katjaQW['Horny'] = 0
+							gs 'stat'
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/katja_ivan6.jpg"></center>'
+							'Ivan redoubles his efforts and within minutes, he pulls out of her ass. Katja slides off the desk first, you follow suit as he starts jerking off, soon you are both kneeling in front of him, just as he begins shooting spurts of cum all over your Katja''s tits and your own.'
+							'Once he finishes cumming Ivan sits in the teachers chair, sweating as he catches his breath and watches the two of you. Ivan only says one word. "Damn!"'
+							*nl
+							'You all start getting dressed and Ivan looks at the two of you. "Girls, we''ve got to do this again some time! What do you say?"'
+							'You look at each other and start giggling before Katja turns to look at him. "If you''re a good boy maybe. We''ll see." You both give him a look that promises, right or wrong, you want another go as badly as he does.'
+							'"I''m always good." he says with a laugh. He quickly finishes dressing and leaves, likely late for practice. Once he is gone, you and Katja look at each other and giggle, then leave as well.'
+							gs 'cum_call', 'breasts', 'A3', 1
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Leave': gt 'gschool_grounds', 'main'
+						end
 					end
 				end
 			end

+ 8 - 6
locations/hookup_talk.qsrc

@@ -279,12 +279,14 @@ if $ARGS[0] = 'sex_review':
 							gt'hookup_after','pre'
 						end
 						
-						act'If you''re offering...':
-							cla & *clr
-							$npc_apt_bedroom[$npclastsaved]
-							'"Well... if you''re seriously offering..."'
-							'<<$npc_firstname[$npclastsaved]>> smiles at you and slinks down the bed, pushing your legs open and dipping his head between them.'
-							act'Get eaten out':gt'hookup','lick_pussy'
+						if hypnoHardToCum = 0:
+							act'If you''re offering...':
+								cla & *clr
+								$npc_apt_bedroom[$npclastsaved]
+								'"Well... if you''re seriously offering..."'
+								'<<$npc_firstname[$npclastsaved]>> smiles at you and slinks down the bed, pushing your legs open and dipping his head between them.'
+								act'Get eaten out':gt'hookup','lick_pussy'
+							end
 						end
 					else
 						act'It was just boring':

+ 8 - 8
locations/hunters.qsrc

@@ -532,15 +532,15 @@ if $ARGS[0] = 'start':
 				*clr & cla
 				gs 'cum_call', 'face', $boy, 1
 				if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-				if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+				if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 				gs 'boyStat', 'A174'
 				gs 'cum_call', 'face', $boy, 1
 				if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-				if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+				if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 				gs 'boyStat', 'A172'
 				gs 'cum_call', 'face', $boy, 1
 				if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-				if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+				if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 				huntersKnowSlut = 2
 				huntslutsex += rand(9,12)
 				gs 'stat'
@@ -2129,7 +2129,7 @@ if $ARGS[0]='huntersgroupOia':
 	minut += 5
 	pose = 1
 	gs 'cum_call', 'face', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'): gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0): gs 'cum_call', 'clothes_hidden', $boy, 1
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/hantersgroupo1.'+rand(0,1)+'.jpg"></center>'
 	'You''re kneeling down eagerly awaiting the men to finish, hoping they''ll cover your face with their sprem. The men cum simultaneously, grunting loudly, shooting their spunk all over your face. They leave you behind sitting on a blanket craving for more...'
@@ -2145,7 +2145,7 @@ if $ARGS[0]='huntersgroupOsa':
 	minut += 5
 	pose = 1
 	gs 'cum_call', 'face', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):
 		gs 'cum_call', 'clothes_hidden', $boy, 1
 	else
 		gs 'cum_call', 'stomach', $boy, 1
@@ -2419,7 +2419,7 @@ if $ARGS[0]='huntersgroupOsend':
 	if forest_gopsex = 3:gs 'boyStat', 'A61'
 	gs 'cum_call', 'face', $boy, 1
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/hantersgroupoend1.'+rand(0,2)+'.jpg"></center>'
 	'Not wanting to get you pregnant, <<$boydesc>> starts jerking off his cock in front of you...'
 
@@ -2442,7 +2442,7 @@ if $ARGS[0]='huntersgroupOaend':
 	if forest_gopsex = 3:gs 'boyStat', 'A63'
 	gs 'cum_call', 'face', $boy, 1
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/hantersgroupoend1.'+rand(0,2)+'.jpg"></center>'
 	'Making you kneel down, <<$boydesc>> starts masturbating in front of your face...'
 
@@ -2464,7 +2464,7 @@ if $ARGS[0]='huntersgroupOiend':
 	if forest_gopsex = 3:gs 'boyStat', 'A62'
 	gs 'cum_call', 'face', $boy, 1
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/hantersgroupoend1.'+rand(0,2)+'.jpg"></center>'
 	'<<$boydesc>> tells you that he wants you kneeling down, cause he wants to cover your face with his spunk...'
 

+ 1 - 1
locations/huntersex.qsrc

@@ -1018,7 +1018,7 @@ if $ARGS[0] = 'doubleloveOralCum12':
 	gs 'cum_call', 'face', $boy, 1
 	lubonus = 0
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/doubleloveoralcum12.'+rand(1,3)+'.jpg"></center>'
 	'You are on your knees in front of the boys with an open mouth.'

+ 32 - 32
locations/intro_city.qsrc

@@ -63,7 +63,7 @@ if $ARGS[0] = 'start':
 	pcs_sleep = 100
 	willpowermax = 100
 
-	gs 'set_home', 1 & gt 'korr'
+	gs 'set_home', 1
 	
 	gt 'intro_city', 'city_intro'
 end
@@ -76,7 +76,7 @@ if $ARGS[0] = 'city_intro':
 	pcs_hairlng = 100
 	*clr & cla
 	!!pic of apartment or Gazelle?
-	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to the big city of St. Petersburg. Today is the day you move into your own apartment and start this new phase of your life.'
+	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to St. Petersburg. Today is the day you move into your own apartment and start this new phase of your life.'
 	'You think back to your school days and what kind of student you were...'
 
 	act 'Continue': gt 'intro_city_select', 'start'
@@ -87,7 +87,7 @@ if $ARGS[0] = '2':
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
 	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'
-	'As you look in the mirror, your face comes into focus. Some aspects of your appearance are already set, you can define the others now.'
+	'As you look in the mirror, your face comes into focus. While some aspects of your appearance are already set, you can define the others now.'
 	'You are fairly tall.'
 	*nl
 	'<center>Customize your:</center>'
@@ -103,7 +103,7 @@ if $ARGS[0] = 'vlad_intro':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big28.jpg"></center>'
 	!!basic desc of Vlad, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
-	'Having spent almost an hour in the cramped truck, you jump out as soon as you arrive. Vlad gets out and stretches a bit, before heading to the back of the Gazelle to start unloading your stuff.'
+	'Having spent almost an hour in the cramped truck, you jump out as soon as you arrive. Vladimir gets out and stretches before heading to the back of the Gazelle to start unloading your stuff.'
 
 	act 'Check Kolka': gt 'intro_city', 'kolka_intro'
 end
@@ -113,8 +113,8 @@ if $ARGS[0] = 'kolka_intro':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big34.jpg"></center>'
 	!!basic desc of Kolka, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
-	'Your brother, caught up in the excitement of seeing the city, tries to slide past Vlad unnoticed but is called back to help unload. He sighs and shuffles his feet a bit before turning around to help his dad get your stuff.'
-	'Giving him a smile to encourage him, you thank him for helping. Your effort pays off, his chest puffs out a bit as he starts to help his father.'
+	'Your brother, caught up in the excitement of seeing the city, tries to slide past Vladimir unnoticed, but is called back to help unload. He sighs and shuffles his feet before turning around to help.'
+	'Giving him an encouraging smile, you thank him for helping. Your effort pays off, his chest puffing out as he starts to help his father.'
 
 	act 'Head inside': gt 'intro_city', 'anya_intro'
 end
@@ -125,7 +125,7 @@ if $ARGS[0] = 'anya_intro':
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big33.jpg"></center>'
 	!!basic desc of Anya, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
 	'Your sister comes up to you, links her arm with yours, and pulls you forward. "Come on, <<$pcs_nickname>>! I want to see this place."'
-	'Already knowing the answer, you ask anyway "Why don''t you have your own apartment then?"'
+	'Already knowing the answer, you ask anyway. "Why don''t you have your own apartment then?"'
 	'"I''m comfortable where I am right now. When I''m ready, maybe I will."'
 	'Rolling your eyes, you let her keep pulling on your arm.'
 
@@ -140,9 +140,9 @@ if $ARGS[0] = 'apartment_intro':
 	!! Intro to apartment
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr.jpg"></center>'
-	'Once you get inside you look around, already trying to decide where things should go. Anya sees this, and laughing, drags you through each room to check them out.'
-	'By the time you''re done Kolka and Vladimir have started bringing boxes in. "Your <<$npc_nickname[''A29'']>> is staying outside for a bit to keep an eye on your stuff. I don''t think she likes the neighborhood much," he says with a shrug.'
-	'Both you and Anya pick up the boxes they set down and take them to the rooms they were labeled for, while your brother and stepfather bring it all inside.'
+	'Once inside you look around, already trying to decide where things should go. Anya sees this, and laughing, drags you through each room to check them out.'
+	'By the time you''re done, Kolka and Vladimir have started bringing boxes in. "Your <<$npc_nickname[''A29'']>> is staying outside to keep an eye on your stuff. I don''t think she likes the neighborhood much," he says with a shrug.'
+	'You and Anya pick up the boxes they set down and take them to the rooms they were labeled for while your brother and stepfather bring it all inside.'
 
 	act 'Greet <<$npc_nickname[''A29'']>>': gt 'intro_city', 'mom_intro'
 end
@@ -151,32 +151,32 @@ if $ARGS[0] = 'mom_intro':
 	!! Intro to Mom - answer sets relationship level
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-	'Your <<$npc_nickname[''A29'']>> comes inside finally, carrying food she made ahead of time to feed everybody.'
-	'"<<$pcs_nickname>>, this is a pretty rough neighborhood. You need to be really careful of those boys outside. The sooner University starts the better, so you can get out of here. I don''t know why you couldn''t just wait until summer ended to move to the city."'
-	act 'I will be fine (neutral response)':
+	'Your <<$npc_nickname[''A29'']>> finally comes inside, carrying food she made ahead of time for everyone.'
+	'"<<$pcs_nickname>>, this is a pretty rough neighborhood. You need to be really careful of those boys outside. The sooner university starts and you can get out of here, the better. I don''t know why you couldn''t just wait until summer ended to move to the city."'
+	act 'Tell her what she wants to hear':
 		gs 'npc_relationship', 'set', 'A29', '50'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"Everything will be fine, <<$npc_nickname[''A29'']>>. I will look into university prices and decide then."'
-		'She gives you a hug before going to the kitchen to start setting up everybody with a plate of food.'
+		'"Everything will be fine, <<$npc_nickname[''A29'']>>. I''ll look into university prices and decide then."'
+		'She gives you a hug before going to the kitchen to start preparing lunch.'
 
 		act 'Have lunch': gt 'intro_city', 'lunch_break'
 	end
-	act 'Give it a rest (angry response)':
+	act 'Snap at her':
 		gs 'npc_relationship', 'set', 'A29', '30'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"Just stop <<$npc_nickname[''A29'']>>! I''m an adult now, and I will do whatever I want with who I want!"'
-		'Her eyes flash in anger, but she doesn''t say anything. She goes to the kitchen to start setting up everybody with a plate of food.'
+		'"Just stop <<$npc_nickname[''A29'']>>! I''m an adult now, and I''ll do whatever I want with whoever I want!"'
+		'Her eyes flash in anger, but she doesn''t say anything. She then heads into the kitchen to prepare lunch.'
 
 		act 'Have lunch': gt 'intro_city', 'lunch_break'
 	end
-	act 'Don''t worry (loving response)':
+	act 'Appreciate her concern':
 		gs 'npc_relationship', 'set', 'A29', '70'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"I know, don''t worry so much <<$npc_nickname[''A29'']>>. I will be very careful, I promise. It''s only for a few months."'
-		'She gives you a big hug before going to the kitchen to start setting up everybody with a plate of food.'
+		'"I know, don''t worry so much <<$npc_nickname[''A29'']>>. I''ll be very careful, I promise. It''s only for a few months."'
+		'She gives you a hug before going to the kitchen to prepare lunch.'
 
 		act 'Have lunch': gt 'intro_city', 'lunch_break'
 	end
@@ -188,12 +188,12 @@ if $ARGS[0] = 'lunch_break':
 	if npc_rel['A29'] >= 60:
 		'<<$npc_nickname[''A29'']>> hands you a plate with a big smile as you all sit down at your kitchen table.'
 	elseif npc_rel['A29'] <= 30:
-		'Lunch is a little tense at first, but for the most part everybody is used to you and your <<$npc_nickname[''A29'']>> fighting.'
+		'Lunch is a little tense at first, but everyone is used to you and your <<$npc_nickname[''A29'']>> fighting.'
 	else
-		'<<$npc_nickname[''A29'']>> hands plates of food as you all sit down at your kitchen table.'
+		'<<$npc_nickname[''A29'']>> hands out plates of food as you all sit down at your kitchen table.'
 	end
-	'Before long, you are all laughing and joking with each other as you eat. You are still looking forward to being on your own, but you know times like this meal will become pretty rare once they head home.'
-	'Once the meal is done and <<$npc_nickname[''A29'']>> cleans up the mess, everybody stands up to say goodbye.'
+	'Before long, you''re all laughing and joking with each other as you eat. You''re still looking forward to being on your own, but you know times like this will become pretty rare once they head home.'
+	'Once everyone is finished and <<$npc_nickname[''A29'']>> clears up, they all prepare to say goodbye.'
 
 	act 'Say goodbye to your family': gt 'intro_city', 'family_goodbye'
 end
@@ -202,17 +202,17 @@ if $ARGS[0] = 'family_goodbye':
 	!! Say goodbye to your family
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/home/korr.jpg"></center>'
-	'Anya gives a big hug, congratulates you on getting your own place, and then steps back to give the rest of your family room to do the same. Your brother gives you an awkward hug and whispers to text him what it''s like before stepping back too.'
-	'Vladimir comes over and hugs you too, tells you how proud he is to be your stepfather and to call if you need anything.'
+	'Anya gives a hug and congratulates you on getting your own place. Your brother gives you an awkward hug and whispers to text him what it''s like living on your own.'
+	'Vladimir then comes over and hugs you too, telling you how proud he is to be your stepfather and to call if you need anything.'
 	if npc_rel['A29'] >= 60:
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over, tears in her eyes. Wrapping you in a big hug, she reminds you again to stay away from the boys outside, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and comes over, tears in her eyes. Wrapping you in a hug, she again reminds you to stay away from the boys outside before joining the rest of the family by the door.'
 	elseif npc_rel['A29'] <= 30:
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over and gives you an awkward hug, saying she is sorry for fighting with you on your big day, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and gives you an awkward hug, apologising for fighting with you before joining the rest of the family by the door.'
 	else
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over and gives you a hug and reminds you to stay away from the boys outside, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and comes over and gives you a hug, again reminding you to stay away from the boys outside before joining the rest of the family by the door.'
 	end
 	*nl
-	'They all wave and head out, leaving you alone for the first time. You spend some time unpacking your stuff, before you stop and stretch, deciding you can finish later.'
+	'They all wave and head out, leaving you alone for the first time. You spend some time unpacking your stuff before you stop and stretch, deciding you can finish later.'
 
 	act 'Continue': gt 'intro_city', 'welcome_intro'
 end
@@ -227,7 +227,7 @@ if $ARGS[0] = 'welcome_intro':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/5_city/city_start.jpg"></center>'
 	'Welcome to Girl Life. You are finally free of your parents and ready to face all the freedoms and challenges that entails. Your options are nearly unlimited and now it''s time to go out and discover them all.'
-	'Don''t forget to enroll in university during August, if that''s a goal you want to pursue.'
+	'Don''t forget to enroll in university during August if that''s a goal you want to pursue.'
 
 	act 'Start the game': gt 'korr'
 end

Diff do ficheiro suprimidas por serem muito extensas
+ 207 - 298
locations/intro_city_select.qsrc


+ 109 - 187
locations/intro_city_tg.qsrc

@@ -9,37 +9,36 @@ if $ARGS[0] = 'start':
 	menu_off = 1
 	'<center><b><font color="maroon">Apartment</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/1.jpg"></center>'
-	'You wake up to the sound of your alarm clock. You hear Luda, your wife, mumbling next to you, "Don''t want to, it''s too early." She pulls her blanket up and rolls over. You reach over and turn the clock off.'
+	'You wake up to the sound of your alarm clock and hear Luda, your wife, mumbling next to you. "Don''t want to, it''s too early." She pulls her blanket up and rolls over. You reach over and turn the clock off.'
 	*nl
-	'<i>There are days when I just want to keep on sleeping</i>, you think to yourself. <i>But I can''t, not today.</i>'
+	'<i>There are days when I just want to keep sleeping,</i> you think to yourself. <i>But I can''t, not today.</i>'
 	act 'Go to the bathroom':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/mikhail_2.jpg"></center>'
-		'Quietly, so that you don''t wake up your daughter, you go to the bathroom and take care of your morning routine.'
+		'Being careful not to wake up your daughter, you head to the bathroom and take care of your morning routine.'
 		act 'Leave the apartment':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/3.jpg"></center>'
-			'In a parking lot near your house sits your car. You unlock it with the remote key and climb in.'
+			'Your car sits in a parking lot near your house. You unlock it with the remote key and climb in.'
 			act 'Go to work':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/4.jpg"></center>'
-				'You turn the key and the engine roars to life. As you drive to work the roads are filled with traffic, but it''s the morning rush hour, so it''s no surprise. You drive for what feels like an eternity, give or take an hour, but you eventually reach the office. The music on the radio was pleasant, at least.'
+				'You turn the key and the engine roars to life. The morning rush hour means that the roads are filled with traffic as you head to work. You drive for what feels like an eternity, but you eventually reach the office. The music on the radio was pleasant, at least.'
 				act 'Park at the office':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/5.jpg"></center>'
-					'You pull into a parking lot near the building and manage to find a good spot. You greet the security guard on your way in to the building, and then go upstairs to your office. Shortly after you sit down at your desk and boot up your computer, your boss''s secretary comes in and hands you a folder with several travel documents.'
+					'You pull into a parking lot near the building and manage to find a good spot. You greet the security guard on your way in before heading upstairs to your office. Shortly after you sit down at your desk and boot up your computer, your boss''s secretary comes in and hands you a folder with several travel documents.'
 					*nl
-					'"Am I going on a business trip or something?" you ask her.'
+					'"Am I going on a business trip or something?" you inquire.'
 					*nl
-					'"Yes, the director said it had something to do with a construction project, out in the middle of nowhere, but that''s pretty much all I know," Oksana says.'
+					'"Yes, the director said it had something to do with a construction project out in the middle of nowhere. That''s pretty much all I know," she replies.'
 					*nl
 					'After she leaves, you read over the travel documents and fill them out. Time to go to the director.'
 					act 'Go and see your boss':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
 						'You head into the directors'' office, greet him and hand him the papers to sign. The director, Roman Gromov, scans through the text before signing off on it with a broad, sweeping stroke.'
-						*nl
-						'"Ms. Glavbukh is in her office. Go get some travel money while I make a few calls. We''ll discuss your trip when you get back."'
+						'"Ms. Glavbukh is in her office. Get some travel money while I make a few calls. We''ll discuss your trip when you get back."'
 						act 'Go to the chief accountant':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_marina.jpg"></center>'
@@ -47,21 +46,17 @@ if $ARGS[0] = 'start':
 							act 'Return to the director':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
-								'Roman is busy talking on the phone when you re-enter the his office, he gestures for you to sit down on one of the chairs across from him.'
-								*nl
-								'"Yes, I understand... yes. I will send Mikhail over ASAP, he''ll represent me... Yes... Tell your men to work on some other parts of the project in the meantime. Have Igor guard the pit and let no one make any fuss, and make sure nobody gets wind of this and, you know, try to halt the construction... Okay, we''ll keep in touch."'
+								'Roman is busy talking on the phone when you re-enter the his office. He gestures for you to sit down on one of the chairs across from him.'
 								*nl
-								'Roman hangs up and turns to you.'
-								*nl
-								'"Last night, while excavating for the foundations, the workers stumbled upon something; one of the excavators dug into a hollow space of some sort. Luckily Igor was on site and he halted the excavation.'
+								'"Yes, I understand... yes. I''ll send Mikhail over ASAP, he''ll represent me... Yes... Tell your men to work on some other parts of the project in the meantime. Have Igor guard the pit and let no one make any fuss, and make sure nobody gets wind of this and, you know, try to halt the construction... Okay, we''ll keep in touch."'
 								*nl
+								'Roman hangs up and turns to you. "Last night, while excavating for the foundations, the workers stumbled upon something; one of the excavators dug into a hollow space of some sort. Luckily, Igor was on site and halted the excavation.'
 								'"It''s not clear what exactly it is, yet. Maybe an abandoned bunker or a cave. But in any case, if there are any more chambers under the foundation, we might not be able to build on the land. So what I want you to do, is to go to the construction site, figure out exactly what the problem is and solve this whole mess as quickly as possible."'
 								act 'Remind him of the correct procedures':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
-									'"Firstly we need to talk to..." you start to say, but are quickly interrupted by your boss.'
-									*nl
-									'"Mikhail, do you realize what''s at stake here? We''re near the end of our credit line, we still have unfinalized agreements on the project''s contract, and we already have guys digging the pit. If there is a too big hole under the foundation, and we can''t build on the site, that could bankrupt the company. So this mysterious structure must be addressed immediately and I have to hold the fort here and keep a lid on things."'
+									'"Firstly we need to talk to..." you start to say, but are quickly interrupted.'
+									'"Mikhail, do you realize what''s at stake here? We''re near the end of our credit line, we still have unfinalized agreements on the project''s contract, and we already have guys digging the pit. If there''s a huge hole under the foundation and we can''t build on the site, that could bankrupt the company. So this mysterious structure must be addressed immediately and I have to hold the fort here and keep a lid on things."'
 									act 'Doesn''t look like you have a choice': gt 'intro_city_tg', 'roadPRE'
 								end
 							end
@@ -77,82 +72,62 @@ if $ARGS[0] = 'roadPRE':
 	music_loop = 0
 	CLOSE ALL
 	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/4.jpg"></center>'
-	'You leave the office and from your car phone your wife Luda. You explain the situation to her and as soon as you finish the call, you drive off to the construction site.'
+	'You leave the office and phone Luda in your car. You explain the situation to her and drive off to the construction site.'
 	act 'Drive':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
-		'You''ve been on the highway for hours before you arrive at the town near the site, leaving you feeling tired. But before you can check into a hotel and get some sleep, you need to get an understanding of the magnitude of the problem you''re dealing with. You follow the directions to the site. Igor calls on the way and tells you that you won''t have to go through a security check.'
-		*nl
-		'You arrive and park your car at the site. You see Igor waving at you from a distance and you walk up to him.'
+		'You''re on the highway for hours before you arrive at the town near the site, leaving you feeling tired. Before you can check into a hotel and get some sleep, you need to get an understanding of the magnitude of the problem you''re dealing with. You follow the directions to the site, Igor calling on the way and telling you that you won''t have to go through a security check.'
+		'You arrive and park your car at the site. You see Igor waving at you from a distance and walk up to him.'
 		act 'Greet Igor':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_igor.jpg"></center>'
-			'Igor greets you. He is obviously concerned about the situation and without delay leads you to the pit''s fenced-off entrance. It rained earlier so the ground is all muddy, you''re going to have to clean your shoes when you get back to the hotel.'
-			*nl
+			'Igor greets you. He''s obviously concerned about the situation and leads you to the pit''s fenced-off entrance without delay. It rained earlier, so the ground is soft and muddy.'
 			'"The ladder''s over there," Igor informs you, while pointing to your left.'
-			*nl
 			'You reach the hole in the ground and peek inside using the small flashlight from your keychain. "There seems to be a floor about 5 meters down."'
-			*nl
-			'"Well, what do you think Mikhail? Shall we go down?" Igor says with a faint glimmer of adventure in his eyes.'
+			'"Well, what do you think Mikhail? Shall we go down?" Igor asks with a faint glimmer of adventure in his eyes.'
 			act 'Descend':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_1.jpg"></center>'
-				'Igor hands you a powerful flashlight and tells the guard to get the ladder over here. Igor is the first one to go down, once he reaches the bottom, he holds the ladder so you can safely climb down as well.'
-				*nl
-				'The cave smells musty and looks all gloomy, but you can breathe freely and the light from your flashlight illuminates the walls. You shoot a beam of light into the corridor and in the distance see something that resembles a door.'
-				*nl
-				'"Damn. If any historians hear about this, they''ll be all over this construction site." Igor mutters.'
-				*nl
+				'Igor hands you a powerful flashlight and tells the guard bring a ladder over. Igor heads down first and you quickly follow him.'
+				'The cave smells musty and looks gloomy, but you can breathe freely and the light from your flashlight illuminates the walls. You shoot a beam of light into the corridor and see something that resembles a door in the distance.'
+				'"Damn. If any historians hear about this, they''ll be all over this place!" Igor mutters.'
 				'You walk up to the door and see drawings on it. Most of them resemble people, but with other stick figures as well.'
 				act 'Open the door':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_3.jpg"></center>'
-					'You lean against the door, it''s stiff but you manage to push it open.'
-					*nl
-					'"Oh shit...! Take a look over there. Human bones." Igor says nervously.'
-					*nl
+					'You lean against the door. It''s stiff, but you manage to push it open.'
+					'"Oh shit! Take a look over there!" Igor exclaims nervously.'
 					'You take a look at what Igor is pointing at and see a pile of human bones with a skull on top.'
-					*nl
-					'"A tomb, I suppose." Igor mutters looking apprehensive.'
-					*nl
-					'"Probably", you nod. "We can''t rule anything out just yet."'
+					'"A tomb, I suppose..." he mutters while looking apprehensive.'
+					'"Probably," you nod. "We can''t rule anything out just yet."'
 					act 'Go further':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_5.jpg"></center>'
-						'Further into the cave, you reach a room that resembles some kind of archive, filled with dozens of old, dusty scrolls inside of racks built into the walls.'
-						*nl
-						'Igor takes one of the scrolls and carefully unrolls it. "What the hell? Look at this, it must be some kind of ancient language," Igor says. "I''ll take one with me, and see what I can find out about these, maybe I can get it deciphered. So we''ll know what we are dealing with."'
-						*nl
-						'Looking around, you notice another door on the other side of the chamber, you walk over and open it.'
+						'Further into the cave, you reach a room that resembles some kind of archive, filled with dozens of old, dusty scrolls inside racks built into the walls.'
+						'Igor takes one of the scrolls and carefully unrolls it. "What the hell? Look at this, it must be some kind of ancient language," he says. "I''ll take one with me and see what I can find out about these. Maybe I can get it deciphered so we know what we''re dealing with."'
+						'Looking around, you notice another door on the other side of the chamber and walk over and open it.'
 						act 'Enter the room':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
-							'There''s an altar in the center of the room, on it there are various pots, several gold amulets and even some stone figures. You continue looking around the room curiously, trying to figure out what it''s purpose was.'
-							*nl
-							'Looking closely at the altar, you notice a strange little amulet placed at the very top.'
+							'There''s an altar in the center of the room with pots, several gold amulets and even stone figures scattered around it. You continue looking around the room curiously, trying to figure out what it''s purpose was.'
+							'Looking closely at the altar, you notice a strange little amulet placed at the top.'
 							act 'Examine the amulet':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/item_amulet.jpg"></center>'
-								'You pick up the strange amulet and examine it. <i>This is clearly very old</i>, you think to yourself.'
-								*nl
-								'While holding the amulet, you realize that it''s getting warm, almost hot. Suddenly you feel heat coursing through your entire body. You feel a surge of strength inside you. It''s like you just finished a long jog, but without the fatigue.'
-								*nl
-								'Igor enters the room with one of the scrolls in his hands. "Huh. Interesting little room.", he says, glancing over the altar. "Well, we have to make a decision: either we fill the catacombs up to the brink with cement or we let someone into these rooms. Who knows what all this stuff is, maybe it''s worth more than it looks."'
+								'You pick up the strange amulet and examine it. <i>This is clearly very old</i> you think to yourself.'
+								'While holding the amulet, you realize that it''s getting warm, almost hot, before you feel heat coursing through your entire body and feel a surge of strength inside you. It''s like you just finished a long jog, but without the fatigue.'
+								'Igor enters the room with one of the scrolls in his hands. "Huh. Interesting little room," he observes while glancing over the altar. "Well, we have to make a decision: either we fill these catacombs up with cement or we let someone in to study them. Who knows what all this stuff is. Maybe it''s worth more than it looks?"'
 								act 'Consult you boss':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
-									'"I''ve got to think about it and consult the director before we do anything." You reply and without thinking about it, you put the small amulet into your pocket.'
-									*nl
-									'"Well, one thing''s for sure, you won''t get reception down here. Let''s go outside." Igor tells you.'
+									'"I''ve got to think about it and consult the director before we do anything," you reply and, without thinking about it, stuff the small amulet in your pocket.'
+									'"Well, one thing''s for sure. You won''t get reception down here. Let''s head outside," Igor replies while motioning for you to leave.'
 									act 'Go back to the surface':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
-										'You walk together with Igor out of the strange chambers and up the ladder, back to the surface.'
-										*nl
-										'"We must have been down there longer than I thought, it''s already late. There will only be security on site now so there''s nothing we can do here until the morning, you should go to the hotel." Igor says.'
-										*nl
-										'With a hasty goodbye to Igor, you make your way back to your car.'
-										'<i>Damn</i>, you think, <i>tomorrow''s going to be a stressful day.</i>'
+										'You walk out of the strange chambers and climb back up the ladder to the surface.'
+										'"We must have been down there longer than I thought, it''s already late. There will only be security on site now, so there''s nothing we can do here until morning. You should go to the hotel." Igor informs you.'
+										'With a hasty goodbye, you make your way back to your car. <i>Damn!</i> you think. <i>Tomorrow''s going to be a stressful day.</i>'
 										act 'Go to the hotel': gt 'intro_city_tg', 'otelPRE'
 									end
 								end
@@ -168,84 +143,64 @@ end
 if $ARGS[0] = 'otelPRE':
 	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/6.jpg"></center>'
 	'Your trip to the hotel is quite uneventful compared to your tomb raiding adventure.'
-	*nl
-	'You park your car and go to the receptionist to get a room. There are only double rooms available, but it''s going on the company card, so that just means you''ll get a bigger room. You swipe your company card and take your room key.'
+	'You park your car and go to the receptionist to get a room. There are only double rooms available, but it''s going on the company card, so that just means you''ll get a bigger room. You swipe the card and take your room key.'
 	act 'Head upstairs to your room':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
-		'Lying down on one of the beds, you start to wonder just who built that crypt and what it''s purpose was. Your thoughts drift to that amulet you found. The way that thing you touched half an hour ago is still making you feel wonderful baffles you.'
+		'Lying down on one of the beds, you start to wonder just who built that crypt and what it''s purpose was as your thoughts drift to the amulet you found. The way that thing is still making you feel wonderful baffles you.'
 		act 'Call the director':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
-			'You dial Romans'' number and after a few rings, he picks up. You report to him the details of what you found at the site with Igor: an ancient tomb, human bones, scrolls in a mysterious language and the altar in that room.'
-			*nl
-			'The director stays silent while you give your report. A few moments later, he decides that it would be best to stop the construction. He tells you to stay and keep watch over the site until further notice.'
-			*nl
-			'You put the phone away. <i>Looks like this trip is going to last longer than expected</i>, you think to yourself.'
+			'You dial Roman''s number and after a few rings, he picks up. You inform him of what you found at the site: an ancient tomb, human bones, scrolls in a mysterious language and a strange altar.'
+			'Roman stays silent while you give your report. He decides that it would be best to stop the construction and tells you to stay and keep watch over the site until further notice.'
+			'You put the phone down. <i>Looks like this trip is going to last longer than expected,</i> you think to yourself.'
 			act 'Go to bed':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
 				'It doesn''t take you long to drift off to sleep'
 				*nl
-				'Images begin to form in your mind and you soon find yourself in a middle of a dream. The amulet stands before you and out of it comes a ghost of some sort. Before you even realize what you are doing, you find yourself staring deep into the ghost''s eyes which then turn into two planet earths.'
-				*nl
+				'Images begin to form in your mind and you soon find yourself in a middle of a dream. The amulet stands before you and out of it comes a ghost of some sort. Before you even realize what you are doing, you find yourself staring deep into the ghost''s eyes, which turn into two Earths.'
 				'"Looking at the world most just see the mundane, but there is more to it, much more and now you see that too. You have the potential to shape it all, but first, you have company."'
 				*nl
-				'Suddenly your senses return and you are aware of the hotel room around you, you can tell you are not alone.'
+				'You suddenly return to your senses and become aware of not only the room around you, but that you''re not alone.'
 				act 'Open your eyes':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_reinhold.jpg"></center>'
-					'As you open your eyes, you see a man standing in your room. He is wearing a long black coat and his face looks weary; he is unshaven and reminds you of most police detectives in Hollywood films.'
-					*nl
-					'"Where is the amulet?" he approaches you.'
+					'As you open your eyes, you see a man standing in your room. He is wearing a long black coat and his face looks weary; he is unshaven and reminds you of scruffy Hollywood police detectives.'
+					'"Where is the amulet?" he asks as he approaches you.'
 					act 'Ask who he is':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_reinhold.jpg"></center>'
-						'"Who are you?" you ask puzzledly. The man''s sudden appearance and a sense you never knew you had tell you something about him, that he is not of the world you know.'
-						*nl
-						'"Listen, don''t cause any problems now. Give me the amulet, close the construction site, and all will be fine. After all that place belongs to us," he says in a firm voice.'
-						*nl
+						'"Who are you?" you ask, puzzled. The man''s sudden appearance and a sense you never knew you had tells you something about him; that he is not of this world.'
+						'"Don''t cause any problems now. Give me the amulet, close the construction site and all will be fine. After all, that place belongs to us," he says in a firm voice.'
 						'<i>Belongs to us?</i> His response leaves you bewildered, wondering who he is and what this is all about.'
-						*nl
-						'"Well, how about I give you a small taste of my power." the man says, and out of nowhere comes a burning desire to give him the amulet.'
+						'"Well, how about I give you a small taste of my power?" the man asks, and out of nowhere comes a burning desire to give him the amulet.'
 						act 'Give him the amulet':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
-							'You get out of the bed and give him the stone figure you had put in your pocket earlier. The man takes it, steps back, and without warning, something in his eyes begins to spin like a whirlwind, causing your own eyes to blur as if he was hypnotizing you. A few seconds later your vision clears with the man having somehow disappeared into thin air.'
-							*nl
-							'You rub your eyes, "What the hell is going on here? Was that a dream?. No, it can''t be. I wouldn''t walk around in a dream. I think." You say to no one in particular then check your pocket, the amulet is indeed gone. You sit down on the bed trying to make sense of what just happened.'
-							*nl
+							'You get out of the bed and give him the stone figure you had put in your pocket earlier. The man takes it, steps back, and without warning, something in his eyes begins to spin like a whirlwind, causing your own eyes to blur as if he was hypnotizing you. A few seconds later, your vision clears with the man having somehow disappeared into thin air.'
+							'You rub your eyes. "What the hell is going on here? Was that a dream? No, it can''t be. I wouldn''t walk around in a dream. I think," you say to yourself before checking your pocket. The amulet is indeed gone. You sit down on the bed, trying to make sense of what just happened.'
 							'While lost in thought, you hear a knock on the door. You get up to open the door, not even thinking why you would have visitors this late at night.'
-							'"...Who''s there?", you ask, still confused.'
 							*nl
-							'A woman''s voice responds that she''s the hotel receptionist and that she needs to talk to you on an urgent matter.'
+							'"...Who''s there?" you ask, still confused.'
+							'A woman''s voice responds that she''s the hotel receptionist and that she needs to talk to you about an urgent matter.'
 							act 'Answer the door':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 								'You open the door, but don''t recall the woman in front of you being at the reception desk; the woman from earlier didn''t have red hair and glasses. After entering the room she quickly examines the place, before locking her eyes on you.'
-								*nl
-								'"Mikhail, right?" You nod.'
-								*nl
-								'"Last night you went to a certain place and took out something very valuable and powerful." the woman speaks to you.'
+								'"Mikhail, right?" she asks and you nod.'
+								'"You went to a certain place last night and took something very valuable, and very powerful..." she continues.'
 								act 'Another one?':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-									'<i>Again?</i>'
-									*nl
-									'You sigh, irritated that not only have you been disturbed in the middle of the night, but these idiots apparently cannot even agree among themselves which one of them should disturb you.'
-									*nl
+									'You sigh, irritated that not only have you been disturbed in the middle of the night, but these idiots apparently can''t even agree amongst themselves which one should be disturbing you.'
 									'"Listen, you''re starting to bother me. That other guy already showed up asking for the damn amulet."'
-									*nl
 									'She looks at you with surprise. "What? Someone already came here? Who was it?"'
 									act 'Tell her':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-										'"It was some man in a navy cloak with ginger hair and a light beard, he didn''t tell me his name. He already took the amulet." You answer.'
-										*nl
-										'The girl''s face drops. "Damn it!" She looks into your eyes. "Okay... Mikhail, we have to go somewhere else, there are too many people that might get hurt here. Gustav, come here!" The girl calls out to the corridor.'
-										*nl
-										'A tall man enters the room'
-										StoryLine = 0
+										'"It was some guy in a navy cloak with ginger hair and a light beard. He didn''t tell me his name. He already took the amulet."'
+										'The girl''s face drops. "Damn it!" She looks into your eyes. "Okay... Mikhail, we have to go somewhere else. There are too many people that might get hurt here. Gustav, come here!" The girl calls out to the corridor and a tall man enters the room.'
 										MagikDostup = 0
 										$pcs_firstname = 'Mikhail'
 										$pcs_lastname = 'Ivanov'
@@ -282,7 +237,7 @@ if $ARGS[0] = 'otelPRE':
 										act 'Prepare to fight':
 											*clr & cla
 											'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_gustav.jpg"></center>'
-											'The man has a large tattoo across the left side of his face. He too has red hair'
+											'The man has a large tattoo across the left side of his face. He too has red hair.'
 											$boy = 'Gustav'
 											gs 'fight','initFight',1
 
@@ -307,92 +262,66 @@ if $ARGS[0] = 'tatianaPRE':
 	$pcs_lastname = '<<$temp_lastname>>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 	'You wake up in an unfamiliar room. Standing near you is the same red-haired girl that entered your hotel room.'
-	*nl
-	'"Ah, you''re awake," she chirps. "I told this jerk Gustav that he should have treated you more carefully, but he''s bad at listening. As a result I had to use some magic to stabilize you, he almost knocked you out permanently."'
-	*nl
-	'"While you were unconscious I did some research on you. Turns out the Amulet of Power passed to you. Must have happened when you touched it. Unfortunately, Reinhold, the guy in your room, he''s probably realized by now that the amulet no longer has the power and now he''s out to hunt you down."'
+	'"Ah, you''re awake," she chirps. "I told this jerk Gustav that he should have treated you more carefully, but he''s bad at listening. As a result, I had to use some magic to stabilize you. He almost knocked you out permanently."'
+	'"While you were unconscious, I did some research on you. Turns out the Amulet of Power passed to you. Must have happened when you touched it. Unfortunately, Reinhold, the guy in your room, he''s probably realized by now that the amulet no longer has the power and now he''s out to hunt you down."'
 	act 'What''s going on?':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 		'"What the hell is going on?" you respond. You try to move your hands, but you''re tied to the bed.'
+		'"I''ll start from the beginning," the girl says. "Magic exists and is real. Millenia ago, the world was not the same. The fae creatures who possess natural magic lived in balance, but the succubus were free to breed with whomever they wished."'
+		'"They bred with humans, and with that human magicians were born. The Sidhe, as the most powerful of the fae, feared the increasing number of human magicians and cast a very powerful spell to bind the succubus to them. This prevented either from being able to reproduce without the other."'
+		'"All magicians have some of that original fae blood in there bodies and it is through that that they are able to connect with the world of magic." The redhead adjusts her glasses. "Most of the world simply ignores magic or are protected from it by magic''s natural desire to remain hidden."'
+		'"But last night, there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search. That source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
 		*nl
-		'"Um, okay, I''ll start from the beginning," the girl says. "Magic exists and is real. Ages ago the world was not the same, the fae creatures who possess natural magic lived in balance but the succubus were free to breed with whom ever they wished."'
-		*nl
-		'"They breed with humans with that human magicians were born. The Sidhe as the most powerful of the fae feared the increasing numbers of human magicians and cast a very powerful spell to bind the succubus to them, this prevented either from being able to reproduce without the other."'
-		*nl
-		'"All magicians have some of that original fae blood in there bodies and it is through that that they are able to connect with the world of magic."'
-		*nl
-		'The redhead adjusts her glasses. "Most of the world simply ignore magic or are protected from it by magic''s natural desire to remain hidden."'
-		*nl
-		'"But last night there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search, that source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
-		*nl
-		'She stops for a few seconds for you process that information. It seems really far fetched.'
-		*nl
+		'She stops for a few seconds for you process the information. It seems really far fetched.'
 		'"As you can figure out, Reinhold wanted to prevent the amulet being misused, but he was not very thorough and didn''t check you over."'
 		act 'So, the whole world is just an illusion?':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-			'"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?" You ask.'
-			*nl
-			'The girl nods. "Yes. You''re a quick study. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
-			*nl
-			'"Hence such things as little green men, UFOs, poltergeists, spontaneous combustion, are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can not cope with the spell they witness, they can be driven crazy and then no one believes them."'
+			'"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?"'
+			'The girl nods. "Yes. You''re a quick study. Machines, apartments, television and the Internet. All this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
+			'"Hence such things as little green men, UFOs, poltergeists and spontaneous combustion are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can''t cope with the spell they witness, they can be driven insane."'
 			act 'And who are you?':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 				'"And who are you?" you ask.'
-				*nl
-				'The girl smiled. "Me? I''m Tatiana, a young mage with an keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant, his mutation is due to magical exposure and it gives him unmatched physical strength and he is a great tracker."'
-				*nl
+				'The girl smiles. "Me? I''m Tatiana, a young mage with a keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant due to magical exposure. It gives him unmatched physical strength and he is a great tracker."'
 				'"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
-				act 'What do you want form me?':
+				act 'What do you want from me?':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-					'"What do you want form me?" you ask.'
-					*nl
-					'"Hmm, well... the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study but Reinhold got to you first. The amulet will now be pretty much useless anyway, as its power passed on to you."'
-					*nl
-					'"But this is not good for you. You may think that since you have the amulets'' power, you can do anything. But in reality, you''re helpless without the skill to use it. Reinhold easily overpowered your will and forced you to obey, and Gustav beat you like a puppy."'
-					act 'What is this amulet? Where did it come from?':
+					'"What do you want from me?" you ask.'
+					'"Well, the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study, but Reinhold got to you first. The amulet will now be pretty much useless anyway, as its power passed on to you."'
+					'"But this is not good for you. You may think that since you have the amulet''s power, you can do anything. But in reality, you''re helpless without the skill to use it. Reinhold easily overpowered your will and forced you to obey, and Gustav beat you like a puppy."'
+					act 'What is this amulet?':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 						'"And what is this amulet? Where did it come from?" you ask.'
-						'Tatiana thinks about it for a few moments. "It was made by the trickster Rikudo, one of the most powerful ancient magicians before he died, he taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
+						'Tatiana thinks about it for a few seconds. "It was made by the trickster Rikudo, one of the most powerful ancient magicians before he died, he taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
+						'"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb. Hang on! I''m not a mage, so how could the power be transferred to me?"'
 						*nl
-						'"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb. Hang on I''m not a mage, how could the power be transferred to me?"'
-						*nl
-						'"It seems that its long time underground has caused it to malfunction and its power has entered your body. The bad news is it is far too powerful and will kill you." At this you are filled with fear and start to struggle against your bindings.'
-						*nl
-						'"You are lucky Reinhold didn''t realize this, he would have stopped you from accidentally wielding the power and killing yourself and who knows how many others by killing you in that hotel room. I have another way to save you, but you''re not going to like it."'
-						*nl
-						'You don''t say anything, so she continues, "I can feel the aura of power emanating from you, by drawing from that I can perform a powerful magic spell that will transform you into someone who is protected from the masculine alignment of the power."'
-						act 'Uh, I do not understand, what are you suggesting?':
+						'"It seems that its long time underground caused it to malfunction and its power has entered your body. The bad news is it is far too powerful and will kill you." Her words fill you with fear and you start to struggle against your bindings.'
+						'"You''re lucky Reinhold didn''t realize this. He would have stopped you from accidentally wielding the power and killing yourself and who knows how many others by killing you in that hotel room. I have another way to save you, but you''re not going to like it."'
+						'You don''t say anything, so she continues. "I can feel the aura of power emanating from you. By drawing from that, I can perform a powerful magic spell that will transform you into someone who is protected from the masculine alignment of the power."'
+						act 'I don''t understand':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-							'"Uh, I do not understand, what are you suggesting?" you ask her.'
-							*nl
-							'Tatiana runs a hand through her hair and giggles. "I''ll make you a pretty, young girl and the power will lie dormant saving you from blowing up a city or something."'
+							'"Uh, I do not understand. What are you suggesting?"'
+							'Tatiana runs a hand through her hair and giggles. "I''ll make you a pretty, young girl and the power will lie dormant, saving you from blowing up a city or something."'
 							*nl
-							'Your eyes widen in shock.'
-							*nl
-							'"Well, there is another way, I can just stop your heart and let your power dissolve into nature, but you will die. I''m not Reinhold, I can take this risk and I don''t want to kill you. Maybe with more time doing research I can work out another solution, but I cannot leave you like this."'
+							'Your eyes widen in shock. "Well, there is another way. I can just stop your heart and let your power dissolve into nature, but you will die. I''m not Reinhold, I can take this risk and I don''t want to kill you. Maybe with more time doing research, I can work out another solution, but I can''t leave you like this."'
 							act 'What about your family?':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-								'"Hey, I do not want to be a woman. I have a family, a wife, a daughter", you tell her, afraid.'
-								*nl
-								'Tatiana smiles. "Well the choice is simple, either you die or live without a penis for the time being."'
-								*nl
-								'"As for your family, not to worry. I''ll arrange everything. We will fabricate your death to get Reinhold off your back. To make your transition easier I''ll cover your memory of the family, they will only be ghostly memories, you won''t even remember where you lived. Don''t worry, I won''t erase your entire memory and leave you a useless vegetable."'
+								'"Hey, I don''t want to be a woman. I have a family! A wife and daughter!" you protest.'
+								'Tatiana smiles. "Well the choice is simple. You either die or live without a penis for the time being. As for your family, not to worry. I''ll arrange everything. We''ll fabricate your death to get Reinhold off your back. To make your transition easier, I''ll cover your memory of your family. They will only be ghostly memories, you won''t even remember where you lived. Don''t worry, I won''t erase your entire memory and leave you a useless vegetable."'
 								act 'There must be another way!':
 									$loc = 'intro_city_tg'
 									$loc_arg = 'custom'
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-									'"There must be another way!" you panic. You tug at the restraints on the bed.'
-									*nl
-									'Tatiana''s face becomes serious. "Do not argue. It is the only way available to me. You will need a to use a new name, think it over in your dreams and tell me when you wake up, otherwise I will give you a pretty name. Now go to sleep." Says Tatiana as she puts her hand on your chest. Your vision immediately fades and you dream about a girl you never knew and what she did at school...'
-									
+									'"There must be another way!" you panic while tugging at the restraints on the bed.'
+									'Tatiana''s face turns serious. "Do not argue. It''s the only way available to me. You''ll need to use a new name, so think it over in your dreams and tell me when you wake up, otherwise I''ll give you a pretty name. Now go to sleep." She puts her hand on your chest and your vision immediately fades. You dream about a girl you never knew and what she did at school...'
 									act 'Dream': gt 'intro_city_select', 'start'
 								end
 							end
@@ -410,7 +339,7 @@ if $ARGS[0] = 'custom':
 !!	This is to bypass the next part if the avatar system was used
 !!	It will be changed to bypass the head options, once more body options are added
 
-!!	Just hair and eye color here for now; the dialog will be update as more options are added
+!!	Just hair and eye color here for now; the dialog will be updated as more options are added
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'
 	'As you drift in unconsciousness, an impression of a woman forms in your mind. Many aspects of her appearance are indistinct, but there are some things you can make out.'
@@ -427,52 +356,45 @@ end
 if $ARGS[0] = 'sleepPRE':
 	killobj
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-	'"You''re awake?." Tatiana says looking into your eyes.'
+	'"You''re awake?" Tatiana asks while looking into your eyes.'
 	act 'Look at yourself':
 		cla
 		*clr
 		clr
 		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/8.jpg"></center>'
 		'"Fuck," you say and immediately shut your mouth again. Your voice... it''s so feminine. Tatiana giggles.'
+		'"This is the first time I''ve changed someone''s gender, therefore I just <i>had</i> to see your reaction. Totally worth it. But you turned out beautiful. For a first try anyway. I miscalculated something. Due to the sharp hormonal change, you have bad acme on your face and I failed to change your eyes and lips. On the bright side, your body will change much faster than one of a natural born woman. That means it will be easier to gain and lose weight and change facial features. All in all, you turned quite well."' 
+		'"By the way, your new ''equipment'' down there is fully functional, so if you don''t want to be a mother, you should think about using contraceptives."'
 		*nl
-		'"This is the first time I changed the gender of a person, therefore I just HAD to see your reaction. Totally worth it. But you turned out beautiful. For a first try that is of course. I miscalculated something, for example due to sharp hormonal change you have bad acme on your face and I failed to change your eyes and lips. On the bright side, your body will change much faster than one of a natural born woman. That means it will be easier to gain and lose weight and change facial features. All in all you turned quite well. By the way, your new ''equipment'' down there is fully functional, so if you don''t want to be a mother, you should think about using contraceptives."'
-		*nl
-		'You angrily look at Tatiana, "So you think I''m a complete woman? On the outside I''ll look like one, but guess what, I''m still the 34-years-old me."'
-		*nl
-		'"Well, yes. I won''t argue about that." Tatiana agrees. "It''s your life and you decide what you do with it, but for the time being, you cannot go back to your old life, so deal with it. On a side note, I already took care of an alibi. Today Mikhail crashed his car into the pit and died, it''s on the news." With these words, Tatiana picked up the remote and turned on the TV.'
+		'You angrily glare at Tatiana. "So that makes me a woman now? On the outside maybe, but guess what? I''m still a 34 year old man on the inside!"'
+		'"Well, yes. I won''t argue about that." Tatiana agrees. "It''s your life and you decide what you do with it, but for the time being, you can''t go back to your old life, so deal with it. On a side note, I already took care of an alibi. Mikhail crashed his car into the pit and died, it''s on the news." Tatiana picks up a remote and turns on the TV.'
 
 		act 'Watch TV':
 			cla
 			*clr
 			clr
 			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/9.jpg"></center>'
-			'On TV there is a news report about a businessman, who drove his car into a hole at a construction site. The man died later in hospital without regaining consciousness.'
-			*nl
-			'You look at Tatiana, with a bewildered look. She has an enigmatic smile, "Well, I''m still a magician and that''s something that I can do. Reinhold has definitely lost the trail. The body that ''died'' behind the wheel of the BMW was a perfect copy of your old self, from your absorbed amulet energy down to the placement of every single hair."'
+			'There is a news report about a businessman who drove his car into a hole at a construction site. He died in hospital without regaining consciousness.'
+			'You look at Tatiana, bewildered. She has an enigmatic smile on her face. "Well, I''m still a magician and that''s something that I can do. Reinhold has definitely lost the trail. The body in that car was a perfect copy of your old self, from your absorbed amulet energy down to the placement of every single hair."'
+			'"Anyways, here are your new legal documents, including a new passport. Starting today, you are <<$pcs_nickname>> <<$pcs_lastname>>, an 18 year old girl who lives in the city. Nobody knows you, but you at least have an apartment to call home. This is a gift to you from Gustav. Here are the keys. Now get up, you''ve got to go to your new home and start a new life."'
 			*nl
-			'"Anyways, here are your new legal documents, including a new passport. Starting today, you are <<$pcs_nickname>> <<$pcs_lastname>>, 18 years old, female and live in the city. Nobody knows you, but you at least have an apartment to call home. This is a gift to you from Gustav. Here are the keys to it. Now get up, you''ve got to go to your new home and start a new life."'
-			*nl
-			'Gustav, the redhead with a tattoo on his face enters the room. He looks at you and says, "I''ll take you."'
+			'Gustav, the redhead with a tattoo on his face, enters the room. He looks at you. "Come on, I''ll take you."'
 			act 'Go with Gustav':
 				cla
 				*clr
 				clr
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_gustav.jpg"></center>'
-				'Gustav silently takes you to the garage and you enter the black jeep. Gustav gets behind the wheel and drives you into the city. You silently speculate about what to do now.'
-				*nl
-				'After a few minutes, while keeping his eyes on the road, Gustav speaks. "I''m sorry I beat you up. I have trouble controlling myself during a fight. You had a large build and for a second I thought you might be dangerous for me, so I ended up hitting you with my full force."'
-				*nl
-				'You look at him. "Forget it. Listen Gustav... what do I do now?"'
-				*nl
-				'Gustav nods and says, "Well, I would advise you to start by buying food, all sorts of washing powders, laundry detergents and dishes. There are very few supplies already in the apartment, but they''ll only last you a day or two. There''s no TV either. Then get a job. Not far from your new home is a small café, if I remember correctly there was a vacant waitress position not too long ago. You should talk to the owner of the café about the job. Don''t forget to monitor your health, keep your mood up and have a clear mind."'
-				*nl
-				'"Now your mind is very weak, if you don''t take care of yourself you will go crazy. You need to eat well, sleep regularly, have fun, do not generally become depressive or else you end up in a madhouse. Don''t go looking for Tatiana, you will not find her anyway, and secondly, if we need to contact you, we will find you."'
+				'Gustav silently takes you to the garage and you enter his black jeep. Gustav gets behind the wheel and drives you into the city. You silently speculate about what to do now.'
+				'After a few minutes, while keeping his eyes on the road, Gustav speaks. "I''m sorry I beat you up. I have trouble controlling myself during a fight. You had a large build and for a second I thought you might be dangerous, so I ended up hitting you with my full force."'
 				*nl
-				'You arrived at some five-story Khrushchev era buildings. Gustav stops the car and points a finger at the entrance. "Your apartment number 69, Tatiana already gave you the key. Now go. Remember don''t just give up, not everyone gets an entirely new chance at life. Tatiana and me will keep an eye out for you."'
+				'You look at him. "Forget it. Listen Gustav... What do I do now?"'
+				'Gustav nods. "Well, I would advise you to start by buying food, all sorts of washing powders, laundry detergent and dishes. There are a few supplies already in the apartment, but they''ll only last you a day or two. There''s no TV either. Then get a job. Not far from your new home is a small café. If I remember correctly, there was a vacant waitress position there not too long ago. You should talk to the owner about the job. Don''t forget to monitor your health, keep your mood up and have a clear mind."'
+				'"Your mind is very weak. If you don''t take care of yourself you will go crazy. You need to eat well, sleep regularly and have fun. Don''t become depressed or else you''ll end up in a madhouse. Don''t go looking for Tatiana; you won''t find her. Secondly, if we need to contact you, we will find you."'
 				*nl
-				'Also, you might want to steer clear of those Gopnik, they might just look like petty criminals having a drink, but they have connections and you''re just a pretty young girl now.'
+				'You arrive at some old Soviet era buildings. Gustav stops the car and points a finger at the entrance. "You''re in apartment 69. Tatiana already gave you the key, so go. Don''t just give up. Not everyone gets an entirely new chance at life. Tatiana and I will keep an eye out for you."'
+				'"Also, you might want to steer clear of those gopniks. They might just look like petty criminals having a drink, but they have connections and you''re just a pretty young girl now.'
 
-				act 'Out of the car':
+				act 'Get out of the car':
 					gs 'intro_initialization_city'
 					cla
 					showstat 1
@@ -481,7 +403,7 @@ if $ARGS[0] = 'sleepPRE':
 					cla
 					*clr
 					'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/start_tf.jpg"></center>'
-					'Welcome to the Transformation start! Although you have lost your masculinity and your old life, but new possibilities are opening up before your eyes, not least aided in your newfound knowledge of the magical nature of the world!'
+					'Welcome to the Transformation start! Although you''ve lost your masculinity and your old life, new possibilities are opening up before your eyes, not least aided in your newfound knowledge of the magical nature of the world!'
 					act 'Begin': gt 'city_residential'
 				end
 			end

+ 57 - 50
locations/intro_customization.qsrc

@@ -7,12 +7,10 @@ if $ARGS[0] = 'start':
 	!act 'Set attributes': gt 'intro_customization','modatt'
 	!act 'Set skills': gt 'intro_customization','modskl'
 	act 'Set appearance':gt 'intro_customization','modapp'
-	act 'Set relationships': gt 'intro_customization','modrel'
 	act 'Set purse': gt 'intro_customization','modpur'
 	act 'Set items': gt 'intro_customization','modite'
 	act 'Set money (<<money>>₽)': money = input 'Set Cash Amount' & gt'intro_customization','start'
-	if custom_csb ! 1: act 'Return to preset character menu': gt 'intro_sg_select', 'charselect'
-	if start < 10:
+	if mid($start_type,1,2) = 'sg':
 		gs 'intro_sg_select_custom', 'start'
 	else
 		act 'Confirm these options':
@@ -158,14 +156,14 @@ if $ARGS[0] = 'modrel_setup2':
 	dynamic 'if <<$ARGS[1]>> < 0: <<$ARGS[1]>> = 0'
 	dynamic 'if <<$ARGS[1]>> > 100: <<$ARGS[1]>> = 100'
 	dynamic 'x = <<$ARGS[1]>>'
-	'<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/100)</TD><TD><a href="exec:<<$ARGS[1]>> = 0 & gt ''intro_customization'', $loc_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> -= 10 & gt ''intro_customization'', $loc_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $loc_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $loc_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 10 & gt ''intro_customization'', $loc_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 100 & gt ''intro_customization'', $loc_arg">100</a></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/100)</TD><TD><a href="exec:<<$ARGS[1]>> = 0 & gt ''intro_customization'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> -= 10 & gt ''intro_customization'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 10 & gt ''intro_customization'', $locM_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 100 & gt ''intro_customization'', $locM_arg">100</a></TD>'
 end
 
 if $ARGS[0] = 'modrel_setup3':
 	dynamic 'if <<$ARGS[1]>> < 50: <<$ARGS[1]>> = 50'
 	dynamic 'if <<$ARGS[1]>> > 200: <<$ARGS[1]>> = 200'
 	dynamic 'x = <<$ARGS[1]>>'
-	'<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/200)</TD><TD><a href="exec:<<$ARGS[1]>> = 0 & gt ''intro_customization'', $loc_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> -= 10 & gt ''intro_customization'', $loc_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $loc_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $loc_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 10 & gt ''intro_customization'', $loc_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 200 & gt ''intro_customization'', $loc_arg">200</a></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/200)</TD><TD><a href="exec:<<$ARGS[1]>> = 0 & gt ''intro_customization'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> -= 10 & gt ''intro_customization'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  += 10 & gt ''intro_customization'', $locM_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 200 & gt ''intro_customization'', $locM_arg">200</a></TD>'
 end
 
 !!Values reversed just for inhib use
@@ -173,31 +171,31 @@ if $ARGS[0] = 'modrel_setup4':
 	dynamic 'if <<$ARGS[1]>> < 0: <<$ARGS[1]>> = 0'
 	dynamic 'if <<$ARGS[1]>> > 100: <<$ARGS[1]>> = 100'
 	dynamic 'x = 100-<<$ARGS[1]>>'
-	'<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/100)</TD><TD><a href="exec:<<$ARGS[1]>> = 100 & gt ''intro_customization'', $loc_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> += 10 & gt ''intro_customization'', $loc_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $loc_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $loc_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  -= 10 & gt ''intro_customization'', $loc_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 0 & gt ''intro_customization'', $loc_arg">100</a></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD><<$ARGS[2]>> (<<x>>/100)</TD><TD><a href="exec:<<$ARGS[1]>> = 100 & gt ''intro_customization'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>> += 10 & gt ''intro_customization'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:<<$ARGS[1]>>  += 5 & gt ''intro_customization'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  -= 5 & gt ''intro_customization'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:<<$ARGS[1]>>  -= 10 & gt ''intro_customization'', $locM_arg">plus 10</a></TD><TD><a href="exec:<<$ARGS[1]>>  = 0 & gt ''intro_customization'', $locM_arg">100</a></TD>'
 end
 
 if $ARGS[0] = 'modite_cos':
-	$loc_arg = 'modite_cos'
+	$locM_arg = 'modite_cos'
 	'<center><b>Cosmetic items</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'kosmetica', 'Cosmetics'
 	gs 'intro_customization', 'modrel_setup2', 'stanok', 'Razors (number of shaves)'
 	gs 'intro_customization', 'modrel_setup2', 'krem', 'Sunblock'
 	gs 'intro_customization', 'modrel_setup2', 'hscrunch', 'Hair scrunchies'
 	gs 'intro_customization', 'modrel_setup2', 'hpingrip', 'Hair pins'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	!act 'Shampoo (<<shampoo>>/100)': gs 'intro_customization','setval3' & shampoo = nstat & gt 'intro_customization','modite_cos'
 	act 'Return': gt'intro_customization','modite'
 end
 
 if $ARGS[0] = 'modite_pha':
-	$loc_arg = 'modite_pha'
+	$locM_arg = 'modite_pha'
 	'<center><b>Pharmaceutical items</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'prezik', 'Condoms'
 	gs 'intro_customization', 'modrel_setup2', 'pregtest', 'Pregnancy tests'
 	gs 'intro_customization', 'modrel_setup2', 'tabletki', 'Birth control pills'
@@ -210,19 +208,22 @@ if $ARGS[0] = 'modite_pha':
 	gs 'intro_customization', 'modrel_setup2', 'fatdel', 'Weight loss pills'
 	gs 'intro_customization', 'modrel_setup2', 'tampon', 'Tampons'
 	gs 'intro_customization', 'modrel_setup2', 'sanpad', 'Sanitary napkins'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt'intro_customization','modite'
 end
 
 if $ARGS[0] = 'modite_mis':
-	$loc_arg = 'modite_mis'
+	$locM_arg = 'modite_mis'
 	'<center><b>Misc items</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'siga', 'Cigarettes'
 	gs 'intro_customization', 'modrel_setup2', 'dur', 'Cocaine'
 	gs 'intro_customization', 'modrel_setup2', 'pranik', 'Tea Biscuits'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_customization','modite'
 end
@@ -405,12 +406,10 @@ end
 
 if $ARGS[0] = 'modatt':
 	*clr & cla
-	$loc_arg = 'modatt'
+	$locM_arg = 'modatt'
 	'<center><b>Attributes</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
-	gs 'intro_customization', 'modrel_setup3', 'willpowermax', 'Willpower'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_stren', 'Strength'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_agil', 'Agility'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_vital', 'Endurance'
@@ -423,6 +422,9 @@ if $ARGS[0] = 'modatt':
 	gs 'intro_customization', 'modrel_setup2', 'pcs_grades', 'Grades'
 	gs 'intro_customization', 'modrel_setup4', 'pcs_inhib', 'Inhibition'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_heels', 'Heels'
+	gs 'intro_customization', 'modrel_setup3', 'willpowermax', 'Willpower'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -443,15 +445,16 @@ end
 
 if $ARGS[0] = 'modskl_men':
 	*clr & cla
-	$loc_arg = 'modskl_men'
+	$locM_arg = 'modskl_men'
 	'<center><b>Mental Skills</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	if MagikDostup = 0: gs 'intro_customization', 'modrel_setup2', 'pcs_splcstng', 'Spell Casting'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_humint', 'People skills'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_persuas', 'Persuasion'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_observ', 'Observation'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -462,11 +465,10 @@ end
 
 if $ARGS[0] = 'modskl_spo':
 	*clr & cla
-	$loc_arg = 'modskl_spo'
+	$locM_arg = 'modskl_spo'
 	'<center><b>Sport Skills</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_jab', 'Jabs'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_punch', 'Power Strikes'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_kick', 'Kicks'
@@ -480,6 +482,8 @@ if $ARGS[0] = 'modskl_spo':
 	gs 'intro_customization', 'modrel_setup2', 'pcs_chess', 'Chess'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_icesktng', 'Ice Skating'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_gaming', 'Gaming'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -490,17 +494,18 @@ end
 
 if $ARGS[0] = 'modskl_bea':
 	*clr & cla
-	$loc_arg = 'modskl_bea'
+	$locM_arg = 'modskl_bea'
 	'<center><b>Beauty skills</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_makupskl', 'Makeup Skills'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_danc', 'Modern Dancing'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_dancero', 'Erotic Dancing'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_dancpol', 'Pole Dancing'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_cheer', 'Cheerleading'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_mdlng', 'Modelling'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -511,16 +516,17 @@ end
 
 if $ARGS[0] = 'modskl_art':
 	*clr & cla
-	$loc_arg = 'modskl_art'
+	$locM_arg = 'modskl_art'
 	'<center><b>Artistic Skills</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_vokal', 'Singing'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_instrmusic', 'Instrumental Music'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_photoskl', 'Photography'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_artskls', 'Artistic Skills'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_perform', 'Performance'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -531,17 +537,18 @@ end
 
 if $ARGS[0] = 'modskl_job':
 	*clr & cla
-	$loc_arg = 'modskl_job'
+	$locM_arg = 'modskl_job'
 	'<center><b>Job Skills</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_compskl', 'Computer Skills'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_comphckng', 'Hacking'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_hndiwrk', 'Handy-work'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_sewng', 'Tailoring'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_servng', 'Serving'
 	gs 'intro_customization', 'modrel_setup2', 'pcs_medcn', 'Medicine'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display
 	'</table></center>'
 	nl
 
@@ -567,24 +574,24 @@ if $ARGS[0] = 'hair':
 
 	*nl
 
-	if pcs_hairlng <= 1:
-		$hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''intro_customization'', ''hair''">very short</a> hair,'
-	elseif pcs_hairlng <= 31:
-		$hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''intro_customization'', ''hair''">short</a> hair,'
-	elseif pcs_hairlng <= 81:
-		$hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''intro_customization'', ''hair''">chin length</a> hair,'
-	elseif pcs_hairlng <= 161:
-		$hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''intro_customization'', ''hair''">shoulder length</a> hair,'
-	elseif pcs_hairlng <= 261:
-		$hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''intro_customization'', ''hair''">breast length</a> hair,'
-	elseif pcs_hairlng <= 401:
-		$hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''intro_customization'', ''hair''">back length</a> hair,'
-	elseif pcs_hairlng <= 601:
-		$hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''intro_customization'', ''hair''">hip length</a> hair,'
-	elseif pcs_hairlng <= 801:
+	if pcs_hairlng > 1000:
+		$hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''intro_customization'', ''hair''">extremely long</a> hair,'
+	elseif pcs_hairlng > 800:
 		$hair = 'You have <a href="exec:pcs_hairlng = 1001 & gs ''intro_customization'', ''hair''">ass length</a> hair,'
+	elseif pcs_hairlng > 600:
+		$hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''intro_customization'', ''hair''">hip length</a> hair,'
+	elseif pcs_hairlng > 400:
+		$hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''intro_customization'', ''hair''">back length</a> hair,'
+	elseif pcs_hairlng > 260:
+		$hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''intro_customization'', ''hair''">breast length</a> hair,'
+	elseif pcs_hairlng > 160:
+		$hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''intro_customization'', ''hair''">shoulder length</a> hair,'
+	elseif pcs_hairlng > 80:
+		$hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''intro_customization'', ''hair''">chin length</a> hair,'
+	elseif pcs_hairlng > 30:
+		$hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''intro_customization'', ''hair''">short</a> hair,'
 	else
-		$hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''intro_customization'', ''hair''">extremely long</a> hair,'
+		$hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''intro_customization'', ''hair''">very short</a> hair,'
 	end
 
 	*nl

+ 0 - 2
locations/intro_initialization.qsrc

@@ -62,8 +62,6 @@ $month = $monthName[month]
 
 gs 'telefon', 'setup'
 
-VersionCheck = 5030
-
 pcs_dob = birthyear * 10000
 pcs_dob += (birthmonth * 100)
 pcs_dob += birthday

+ 7 - 6
locations/intro_initialization_city.qsrc

@@ -3,14 +3,12 @@
 !!	Final Initializations
 !!	Top area for things that need to be done before setting the variables for either start
 
+hour = 13
 day = 21
+week = 1
 month = 8
 year = 2017
 
-birthyear = 1999
-birthmonth = 4
-birthday = 1
-	
 BDSMfilm = 0
 pornstudio = 0
 pfilmSTOP = 0
@@ -69,8 +67,6 @@ $month = $monthName[month]
 
 gs 'telefon', 'setup'
 
-VersionCheck = 5030
-
 pcs_dob = birthyear * 10000
 pcs_dob += (birthmonth * 100)
 pcs_dob += birthday
@@ -95,6 +91,11 @@ oldsavepcs_haircol = 1
 
 gs 'body', 'initial'
 
+!!re-initialize appearance to get correct values
+gs 'AppearanceSystem', 'UpdateBaseAppearnce'
+gs 'body', 'RegularUpdate'
+gs 'AppearanceSystem'
+
 !! Adding underwear and default shoes and assigning them
 
 cheap_panties[1] = 1

+ 14 - 10
locations/intro_sg.qsrc

@@ -1,17 +1,19 @@
 # intro_sg
 
 gs 'themes', 'indoors'
-killvar '$start_type'
-$start_type = 'sg'
-$start_type[1] = 'nomagic'
+if $start_type ! 'sg_m':
+	killvar '$start_type'
+	$start_type = 'sg'
+	$start_type[1] = 'nomagic'
+end
 
 if $ARGS[0] = 'start':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_5.jpg"></center>'
 	'You were born in the small town of Pavlovsk near the city of St Petersburg. You have an older sister, Anya, who is two years older than you.'
-	'Your mother is Natasha. You don''t know much about your biological father... your mother never wants to talk about him, or why he left you and Anya with her.'
+	'Your mother is Natasha. You don''t know much about your biological father; your mother never wants to talk about him, or why he left you and Anya with her.'
 	'Your mother met another man not too long after her and your biological father got divorced, Vladimir. Together they had your little brother Kolka. Even though he''s not your real father, Vladimir has always treated you and Anya as if you were his own children.'
-	act 'Continue': gt 'intro_sg', 'Two'
+	act '<center><b>Continue</b></center>': gt 'intro_sg', 'Two'
 end
 
 if $ARGS[0] = 'Two':
@@ -24,10 +26,8 @@ if $ARGS[0] = 'Three':
 	$loc = 'intro_sg'
 	$loc_arg = 'four'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_7.jpg"></center>'
-	'Like it does for most girls, you reached the milestone of puberty when you were 13 years old. You had your first period, which sucked... but that was just the start of your changes.'
-	*nl
-	'Your chest then felt strange and you discovered your breasts were growing! This excited you: how big will they be when you grow up? Hair also began to grow in at your armpits and pubic area, and at the same time you felt things... intimate things. Over time you learned to appreciate these feelings, and how to manage your developing body. Your troublesome skin complexion remains an issue though.'
-	*nl
+	'Like it does for most girls, you reached the milestone of puberty when you were 13 years old. You had your first period, which sucked, but that was just the start of your changes.'
+	'Your chest felt strange and you discovered your breasts were growing! This excited you: how big will they be when you grow up? Hair also began to grow in your armpits and pubic area, and at the same time you felt things... intimate things. Over time you learned to appreciate these feelings, and how to manage your developing body. Your troublesome skin complexion remains an issue though.'
 	'When you finished 9th grade, you decided to continue with your secondary education. You completed the first one, only one more year of school to go, but first: What type of student are you?'
 	act '<center><b>Time to choose</b></center>': gt 'intro_sg_select', 'start'
 end
@@ -44,7 +44,11 @@ if $ARGS[0] = 'four':
 	'<center>Customize your:</center>'
 	'<center><a href="exec:gs ''intro_customization'', ''hair''"><img src="images/system/1_openings/shared/icon_hair.png"></a> <a href="exec:gs ''intro_customization'', ''eyes''"><img src="images/system/1_openings/shared/icon_eye.png"></a></center>'
 
-	act '<center><b>Done</b></center>': gt 'intro_sg', 'five'
+	if $start_type = 'sg_m':
+		act '<center><b>Done</b></center>': gt 'intro_sg_m', 'four'
+	else
+		act '<center><b>Done</b></center>': gt 'intro_sg', 'five'
+	end
 end
 
 if $ARGS[0] = 'five':

+ 44 - 55
locations/intro_sg_m.qsrc

@@ -8,20 +8,21 @@ if $ARGS[0] = 'four':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
-	'After your second to last year of school you go on summer holiday with your parents to your grandparents farm in the village of Gadukino. There is nothing to do here but watch animals graze and help your grandparents, which does earn you some extra cash but is very tedious.'
+	'After your second to last year of school, you go on summer holiday with your parents to your grandparents farm in the village of Gadukino. There is nothing to do here but watch animals graze and help your grandparents, which does earn you some extra cash, even if it''s very tedious.'
 	act 'Take a walk':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_woods.jpg"></center>'
-		'You decide to get away from things and have a walk through the forest spending most of the time on your phone'
-		'Your phone signal drops meaning you''ve gone too far from the village, looking up you don''t recognise anything and suddenly realize that you are lost.'
+		'You decide to get away from things and have a walk through the forest, spending most of the time on your phone.'
+		'Your phone signal then drops, meaning you''ve strayed too far from the village. Looking up, you don''t recognise anything and suddenly realize that you are lost.'
 		act 'Find a way back':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_ruin.jpg"></center>'
-			'You try to find your way back but the only thing you manage to do is get more lost. After hours of wandering around you come across an old ruin.'
+			'You try to find your way back, but the only thing you manage to do is get even more lost. After hours of wandering around, you come across an old ruin.'
 			act 'Take a break':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_1.jpg"></center>'
-				'You sit down on a large stone in the ruins and take a breath. You are starting to get hungry. If it''s not one thing it''s another. You stomp your foot in frustration and the floor gives way. You desperately try to hold on to something but everything in reach comes loose and falls down the hole with you. You feel slightly dazed but after a quick check you seem to be uninjured. You seem to be in an underground chamber of some sort. Looking up you see that climbing out is not an option, there is an old gate here but it''s either locked or rusted shut. Looks like the only way out is the tunnel on the other side of the chamber.'
+				'You sit down on a large stone in the ruins and take a breath. You''re starting to get hungry, and stomp your foot in frustration. The floor suddenly gives way and you desperately try to hold on to something, but everything in reach comes loose and falls down the hole with you. You feel slightly dazed, but after a quick check you seem to be uninjured. You seem to be in an underground chamber of some sort and looking up, you see that climbing out is not an option.' 
+				'You spot an old gate, but it''s either locked or rusted shut. The only way out seems to be the tunnel on the other side of the chamber. You pull out your phone and turn on the flashlight before heading into the tunnel.'
 				act 'Follow the tunnel':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_2.jpg"></center>'
@@ -29,11 +30,12 @@ if $ARGS[0] = 'four':
 					act 'Further':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
-						'At the end of the tunnel you find a dead end. Or at least it seems so. You can see light coming through the cracks in the wall so you do your best to knock it down. Suddenly the wall crumbles and you find yourself in another chamber filled with old pottery and baubles. Opposite you is another tunnel, hopefully it leads out. In the center of the room is an altar and on it is what seems to be centerpiece of this room, a strange amulet.'
+						'Reaching the end of the tunnel, you find a dead end. Or at least it seems so. You can see light coming through the cracks in the wall, so you do your best to knock it down. The wall crumbles and you find yourself in another chamber filled with old pottery and baubles. Opposite you is another tunnel, which hopefully leads outside. In the center of the room is an altar and on it is what seems to be centerpiece of this room; a strange amulet.'
 						act 'Examine amulet':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/item_amulet.jpg"></center>'
-							'You take the amulet in your hands and notice it''s much lighter than it looks and unusually warm for a piece of metal. It''s shaped like an antique oil lamp and... is that a penis? As you are about to pocket it, the amulet grows even hotter and zaps you. Oww. You drop it. Screw this, you are out of here.'
+							'You take the amulet in your hands and notice it''s much lighter than it looks and is unusually warm for a piece of metal. It''s shaped like an antique oil lamp and... is that a penis?' 
+							'As you''re about to pocket it, the amulet grows even hotter and zaps you, forcing you to drop it. You decide that it''s best to try and find a way out.'
 							act 'Find a way out':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
@@ -41,7 +43,7 @@ if $ARGS[0] = 'four':
 								act 'Sneak out':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_road.jpg"></center>'
-									'The workers shift has long since finished so sneaking out is not too hard. The site is on the highway so hopefully you can make it back before your mother starts freaking out. As you start walking back you feel a sudden rush of heat and find yourself falling...'
+									'The workers shift has long since finished, so sneaking out is not too hard. The site is on the highway so hopefully you can make it back before your mother starts freaking out. As you start walking back, you feel a sudden rush of heat and find yourself falling...'
 									act 'Continue': gt 'intro_sg_m','five'
 								end
 							end
@@ -57,68 +59,65 @@ if $ARGS[0] = 'five':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 	'You wake up in an unfamiliar room. Standing near you is a red-haired girl.'
-	'"Ah, you woke up," she chirped. "We found you half-dead, you know. You almost didn''t make it. You shouldn''t be fondling ancient amulets you know nothing about."'
-	'"I did some research on what happened to you. Turns out the Amulet of Power passed to you, which should only happen if touched by a male mage. Unfortunately, I got some bad news for you. Reinhold, who''s a really powerful mage. He''s been tracking down this amulet for a while now and if he realizes that the amulet''s power has passed to you he might think you pose a risk."'
+	'"Ah, you woke up," she chirps. "We found you half-dead, you know. You almost didn''t make it. You shouldn''t be fondling ancient amulets you know nothing about."'
+	'"I did some research on what happened to you. Turns out the Amulet of Power passed to you, which should only happen if touched by a male mage. Unfortunately, I''ve got some bad news for you. Reinhold, a really powerful mage, has been tracking down this amulet for a while now and if he realizes that the amulet''s power has passed to you, he might think you pose a risk."'
 
 	act 'What''s going on?':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 		'"What the hell is going on?" you respond. You try to move your hands, but you''re tied to the bed.'
-		'"Um, okay, I''ll start from the beginning," the girl says. "Magic exists and is real. Ages ago the world was not the same, the fae creatures who possess natural magic lived in balance but the succubus were free to breed with whom ever they wished."'
-		'"They bred with humans and so human magicians were born. The Sidhe as the most powerful of the fae feared the increasing numbers of human magicians and cast a very powerful spell to bind the succubus to them, this prevented one from being able to reproduce without the other."'
+		'"I''ll start from the beginning," the girl says. "Magic exists and is real. Milennia ago, the world was not the same. The fae creatures who possess natural magic lived in balance, but the succubus were free to breed with whomever they wished."'
+		'"They bred with humans and so human magicians were born. The Sidhe, as the most powerful of the fae, feared the increasing number of human magicians and cast a very powerful spell to bind the succubus to them. This prevented one from being able to reproduce without the other."'
 		'"All magicians have some of that original fae blood in their bodies and it is through that that they are able to connect with the world of magic."'
 		*nl
-		'The redhead adjusts her glasses. "Most of the world simply ignores magic or are protected from it by magic''s natural desire to remain hidden."'
-		'"But last night there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search, that source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
-		'She stops for a few seconds for you to process that information. It seems really far fetched.'
-		'"Reinhold wants to prevent the amulet being misused, he is tasked with maintaining order and will search for you."'
+		'The redhead adjusts her glasses. "Most of the world simply ignores magic or are protected from it by magic''s natural desire to remain hidden, but last night there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search. That source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
+		'She stops for a few seconds for you to process the information. It seems really far fetched.'
+		'"Reinhold wants to prevent the amulet being misused. He is tasked with maintaining order and will search for you."'
 
 		act 'So, the whole world is just an illusion?':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-			'"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?" You ask.'
-			'The girl nods. "Yes. You''re a quick student. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
-			'"Hence such things as little green men, UFOs, poltergeists, spontaneous combustion, are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can not cope with the spell they witness, they can be driven crazy and then no one believes them."'
+			'"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?"'
+			'The girl nods. "Yes. You''re a quick student. Machines, apartments, television and the Internet. All this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
+			'"Hence such things as little green men, UFOs, poltergeists and spontaneous combustion are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can''t cope with the spell they witness, they can be driven insane."'
 
 			act 'And who are you?':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 				'"And who are you?" you ask.'
-				'The girl smiled. "Me? I''m Tatiana, a young mage with a keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant, his mutation is due to magical exposure and it gives him unmatched physical strength and he is a great tracker."'
+				'The girl smiles. "Me? I''m Tatiana, a young mage with a keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant due to magical exposure. It gives him unmatched physical strength and he is a great tracker."'
 				'"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
 
 				act 'What do you want from me?':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 					'"What do you want from me?" you ask.'
-					'"Hmm, well... the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study but the power transferred to you first. The amulet will now be pretty much useless."'
-					'"But this is not good for you. You may think that since you have the amulets'' power, you can do anything. But in reality, you''re helpless without the skill to use it. Its power already knocked you out and I had to use magic to stabilize you."'
+					'"Well, the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study, but the power transferred to you first. The amulet will now be pretty much useless."'
+					'"But this is not good for you. You may think that since you have the amulet''s power, you can do anything. But in reality, you''re helpless without the skill to use it. Its power already knocked you out and I had to use magic to stabilize you."'
 
-					act 'What is this amulet? Where did it come from?':
+					act 'What is this amulet?':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 						'"And what is this amulet? Where did it come from?" you ask.'
-						'Tatiana thinks about it for a few moments. "It was made by the trickster Rikudo, one of the most powerful ancient magicians before he died, he taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
-						'"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb. Hang on, I''m not male or a mage, how could the power be transferred to me?"'
-						'"It seems that its long time underground has caused it to malfunction and its power has entered your body."'
-						'"You are lucky to be a woman," Tatiana adds, "Rikudo''s power seems to only work if it is in a man''s body. Since you cannot harness its power you shouldn''t arouse suspicion."'
+						'Tatiana thinks about it for a few seconds. "It was made by the trickster Rikudo, one of the most powerful ancient magicians before he died. He taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
+						'"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb. Hang on! I''m not male or a mage, how could the power be transferred to me?"'
+						'"It seems that its long time underground caused it to malfunction and its power has entered your body."'
+						'"You''re lucky to be a woman," Tatiana adds. "Rikudo''s power seems to only work if it is in a man''s body. Since you can''t harness its power, you shouldn''t arouse any suspicion."'
 
 						act 'So what should I do?':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-							'"Lay low for now. Go on with your life. We will contact you if anything comes up. Gustav here will drop you off at your '+iif($month = 'June','grandparent''s','parent''s')+'."'
+							'"Lay low for now. Get on with your life. We''ll contact you if anything comes up. Gustav here will drop you off at your '+iif($month = 'June','grandparent''s','parent''s')+' place."'
 							act 'Follow Gustav':
-								gs 'intro_sg_select', 'sg_settings'
-								gs 'intro_initialization'
 								money = 5000
 
 								*clr & cla
 								if start_location = 2:
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
-									'You give Gustav directions to your grandparent''s house, half an hour later he drops you off at your grandparent''s yard in Gadukino.'
+									'You give Gustav directions to your grandparent''s house. Half an hour later, he drops you off at your grandparent''s yard in Gadukino.'
 								elseif start_location = 1:
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
-									'You give Gustav directions to your family''s apartment building, half an hour later he drops you off in front of your apartment complex in Pavlovsk.'
+									'You give Gustav directions to your family''s apartment building. Half an hour later, he drops you off in front of your apartment complex in Pavlovsk.'
 								end
 								act '<center><b>Done</b></center>': gt 'intro_sg_m', 'six'
 							end
@@ -132,29 +131,19 @@ end
 
 if $ARGS[0] = 'six':
 	*clr & cla				
-	hour = 18
-	$loc = 'intro_sg_m'
-	$loc_arg = 'six'
-	'<center><b><font color = maroon>Character Face</font></b></center>'
-	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
-	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'
-	*nl
-	'<center>Customize your:</center>'
-	'<center><a href="exec:gs ''intro_customization'', ''hair''"><img src="images/system/1_openings/shared/icon_hair.png"></a> <a href="exec:gs ''intro_customization'', ''eyes''"><img src="images/system/1_openings/shared/icon_eye.png"></a></center>'
-
-	act 'Continue':
-		showstat 1
-		showobjs 1
-		gs 'obj_din', 'old'
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/start_csg.jpg"></center>'
-		'Welcome to the Cursed Schoolgirl version! Guide <<$pcs_nickname>> through her school life, relationships and myriad of other issues that might pop up and all with the added spice of magic to keep things interesting!'
-		act 'Begin!':
-			if start_location = 2:
-				gt 'gadhouse', 'intro'
-			elseif start_location = 1:
-				gt 'bedrPar', 'intro'
-			end
+	gs 'intro_sg_select', 'sg_settings'
+	gs 'intro_initialization'
+	showstat 1
+	showobjs 1
+	gs 'obj_din', 'old'
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/start_csg.jpg"></center>'
+	'Welcome to the Cursed Schoolgirl version! Guide <<$pcs_nickname>> through her school life, relationships and myriad of other issues that might pop up, all with the added spice of magic to keep things interesting!'
+	act '<center><b>Begin!</b></center>':
+		if start_location = 2:
+			gt 'gadhouse', 'intro'
+		elseif start_location = 1:
+			gt 'bedrPar', 'intro'
 		end
 	end
 end

+ 218 - 188
locations/intro_sg_select.qsrc

@@ -14,27 +14,26 @@ if $ARGS[0] = 'start':
 
 !!	Body
 	pcs_hgt = 170
-	salo = 80
 	dick = 0
 	pcs_energy = 60
 	pcs_hydra = 60
 	pcs_sleep = 70
 !!	Stats
-	pcs_stren = 30
+	pcs_stren = 25
 	strenbuf = 10
-	pcs_agil = 30
+	pcs_agil = 25
 	agilbuf = 10
-	pcs_vital = 30
+	pcs_vital = 25
 	vitalbuf = 10
-	pcs_intel = 30
-	pcs_sprt = 30
-	pcs_react = 30
-	pcs_chrsm = 30
-	pcs_prcptn = 30
+	pcs_intel = 25
+	pcs_sprt = 25
+	pcs_react = 25
+	pcs_chrsm = 25
+	pcs_prcptn = 25
 	pcs_magik = 0
 
 	pcs_heels = 5
-	pcs_makupskl = 20
+	pcs_makupskl = 10
 	pcs_pubes = 30
 	pcs_leghair = 12
 	pcs_makeup = 1
@@ -44,26 +43,28 @@ if $ARGS[0] = 'start':
 	brothersawpirsF = 0
 	dynamic $currentpursetype + '_purses[<<currentpursenumber>>] = 1'
 
-	!!Default Names
-	$pcs_firstname = 'Svetlana'
-	$pcs_lastname = 'Lebedev'
-	$pcs_nickname = 'Sveta'
-
-	!!Player names are set here
-	$temp_firstname = '<<$pcs_firstname>>'
-	$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
-	if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
-	killvar '$temp_firstname'
-
-	$temp_lastname = '<<$pcs_lastname>>'
-	$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
-	if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
-	killvar '$temp_lastname'
-
-	$temp_nickname = '<<$pcs_nickname>>'
-	$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
-	if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
-	killvar '$temp_nickname'
+	if $start_type[1] ! 'tg':
+		!!Default Names
+		$pcs_firstname = 'Svetlana'
+		$pcs_lastname = 'Lebedev'
+		$pcs_nickname = 'Sveta'
+
+		!!Player names are set here
+		$temp_firstname = '<<$pcs_firstname>>'
+		$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
+		if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
+		killvar '$temp_firstname'
+
+		$temp_lastname = '<<$pcs_lastname>>'
+		$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
+		if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
+		killvar '$temp_lastname'
+
+		$temp_nickname = '<<$pcs_nickname>>'
+		$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
+		if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
+		killvar '$temp_nickname'
+	end
 
 	gs 'npcstatic1'
 	gs 'npcstatic2'
@@ -94,11 +95,14 @@ if $ARGS[0] = 'start':
 	gs 'grades', 'createclass', 'school', 'his', 2, 2, 'yes', 'yes', 0, 0
 
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_1.jpg"></center>'
-	'Your name is <<$pcs_firstname>> <<$pcs_lastname>>, friends and family often calling you <<$pcs_nickname>>. Your mother''s name is <<$npc_firstname[''A29'']>> and your biological father left when you were a baby. Your mother married your stepfather, <<$npc_firstname[''A28'']>>, shortly afterwards. <<$npc_firstname[''A33'']>> is your older sister. She is two years older than you and is still living at home while working at the local grocery store. She chose not to attend college and instead spends most of her free time drinking with her friends and going to parties, much to your mother''s dismay. You also have a younger half-brother, <<$npc_firstname[''A34'']>>, who is really into sports, especially football, and is shaping up to be a fine athlete. He is a year younger than you and his father is your stepfather.'
-	*nl
-	'Your <<$npc_usedname[''A30'']>> lives in the same building as you do, though you rarely see her except when you pass her in the stairwell. She is your mother''s sister. <<$npc_usedname[''A54'']>>, as everyone calls him, is best friends with your stepfather. <<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>, your childhood friend, is the same age as you and grew up living in the same apartment building on the floor above yours. His father, <<$npc_firstname[''A112'']>>, is an old friend of your mother.'
+	'Your name is <<$pcs_firstname>> <<$pcs_lastname>>, nicknamed <<$pcs_nickname>> by friends and family. Your mother''s name is <<$npc_firstname[''A29'']>> and your biological father left when you were a baby, your mother marrying your stepfather, <<$npc_firstname[''A28'']>>, shortly afterwards.' 
+	'<<$npc_firstname[''A33'']>> is your older sister, who is two years older than you but is still living at home while working at the local grocery store. She chose not to attend university and instead spends most of her free time drinking and going to parties with her friends, much to your mother''s dismay.' 
+	'You also have a younger half-brother, <<$npc_firstname[''A34'']>>, who is really into sports, especially football, and is shaping up to be a fine athlete. He is a year younger than you and his father is your stepfather.'
+	'Your <<$npc_usedname[''A30'']>> lives in the same building as you do, though you rarely see her except when you pass her in the stairwell. She is your mother''s older sister. <<$npc_usedname[''A54'']>>, as everyone calls him, is best friends with your stepfather. <<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>, your childhood friend, is the same age as you and grew up living in the same apartment building on the floor above yours. His father, <<$npc_firstname[''A112'']>>, is an old friend of your mother.'
 
-	act 'Re-enter name/s': gt 'intro_sg_select', 'start'
+	if $start_type[1] ! 'tg':
+		act 'Re-enter name(s)': gt 'intro_sg_select', 'start'
+	end
 	act 'Continue':	gt 'intro_sg_select', 'SGStart2'
 end
 
@@ -121,6 +125,7 @@ if $ARGS[0] = 'SGStart2':
 	'<a href="exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
 
 	act 'Confirm':
+		if $start_type[1] = 'tg': gt 'intro_sg_select', 'charselect'
 		cls
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_3.jpg"></center>'
 		*nl
@@ -194,7 +199,7 @@ if $ARGS[0] = 'pav_start':
 	'<center><h2>Pavlovsk</h2></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
 	*nl
-	'<center>A provincial town in a rural area of Russia, it looks much like all the other towns in the region. Population: about 15,000 inhabitants.</center>'
+	'<center>A provincial town in a rural area of Russia, which looks much like all the other towns in the region. Population: 15,000.</center>'
 	start_location = 1
 	act 'Confirm location': gt 'intro_sg_select', 'charselect'
 	act 'Change location': gt 'intro_sg_select', 'SGStart3'
@@ -205,7 +210,7 @@ if $ARGS[0] = 'gad_start':
 	'<center><h2>Gadukino</h2></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
 	*nl
-	'<center>A small farming village with many rickety wooden houses and even more ruins of houses. This village has seen better times.</center>'
+	'<center>A small farming village with just as many rickety old wooden houses dotting the landscape as ruins. The village has seen better days.</center>'
 	start_location = 2
 	act 'Confirm location': gt 'intro_sg_select', 'charselect'
 	act 'Change location': gt 'intro_sg_select', 'SGStart3'
@@ -216,19 +221,19 @@ if $ARGS[0] = 'charselect':
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_4.jpg"></center>'
 	'Select your personality/social group. Your social group will have a major defining impact upon your life in school and will determine your starting friends, starting traits and overall look. While you can always change groups later on, it takes time and effort, so choose wisely. Your five choices of social group are.'
 	*nl
-	'Nerds, geeks and good students. - These students tend to do well in school and are well liked by teachers and other adults and your parents will also be more proud of you. They tend to not have many friends outside of their own social group, however, and are also sometimes picked on or bullied. They are subpar athletically and place less value on looks and social skills than other cliques.'
+	'Nerds, geeks and good students - These students tend to do well in school and are well liked by teachers and other adults. They tend to not have many friends outside of their own social group, however, and are also sometimes picked on or bullied. They are subpar athletically and place less value on looks and social skills than other cliques.'
 	*nl
-	'Jocks and natural athletes. - These students are gifted in their chosen sport and are very athletically inclined. This means that they tend to be fit and in good shape, often making them better looking than many of the other students. They get along with other jocks and are respected by the cool kids of the school while being feared by the nerds, geeks and losers. They don''t value academic achievements and can come into conflict with the gopniks and other troublemakers.'
+	'Jocks and natural athletes - These students are gifted in their chosen sport and are very athletically inclined. This means that they tend to be fit and in good shape, often making them better looking than many of the other students. They get along with other jocks and are respected by the cool kids while being feared by the nerds and losers. They don''t value academic achievements and can come into conflict with the gopniks and other troublemakers.'
 	*nl
-	'The popular, cool and beautiful. - These students are typically socially-gifted and are often blessed with natural good looks. They are envied by many because of this, and most other kids want to be their friends. More than any of the other cliques, they have the ability to ruin someone''s reputation and make them social outcasts, which earns them the fear of many students. Being cool and good looking is all they value, so they tend to be subpar athletically and academically.'
+	'The popular, cool and beautiful - These students are typically socially-gifted and are often blessed with natural good looks. They are envied by many because of this, and most want to be their friends. More than any other clique, they have the ability to ruin someone''s reputation and make them social outcasts, which earns them the fear of many students. Being cool and good looking is all they value, so they tend to be subpar both athletically and academically.'
 	*nl
-	'Gopniks, rebels, punks and troublemakers. - These students don''t play by the rules and, in fact, will often happily piss on them if given half a chance. They are in decent shape from all of their fighting and troublemaking, but their predilection for drinking, smoking and drugs often counteracts this to a point. They are not the most well-liked students; teachers and parents alike take a dim view of them, as does the local police. Most other students fear them, either from the years of bullying or from the gopniks'' willingness to fight. Some students secretly envy their carefree attitude and apparent ability to sneer and wave off many of the social pitfalls that other students face.'
+	'Gopniks, rebels, punks and troublemakers - These students don''t play by the rules and, in fact, will often happily piss on them if given half a chance. They are in decent shape from all of their fighting and troublemaking, but their predilection for drinking, smoking and drugs often counteracts this to a point. They are not the most well-liked students; teachers and parents alike take a dim view of them, as do the local police. Most students fear them, either from the years of bullying or from the gopniks'' willingness to fight. Some students secretly envy their carefree attitude and apparent ability to sneer and wave off many of the social pitfalls that other students face.'
 	*nl
-	'Losers, teachers'' pets, sluts and the ugly. - These students are the outcasts - the kids no one likes to spend time with, other than to pick on or bully them. Perhaps they are just socially awkward and never made many friends, broke one of the unwritten social school rules, are ugly, a snitch, a slut and/or an outed gay boy. Either way, they all have one thing in common: they are easy targets to bully and mock.'
+	'Losers, teachers'' pets, sluts and the ugly - These students are the outcasts, the people no one likes to spend time with, other than to bully them. Perhaps they are just socially awkward and never made many friends, broke one of the unwritten social rules, are ugly, a snitch, a slut and/or an outed gay boy. Either way, they all have one thing in common: they are easy targets to bully and mock.'
 
 	act 'Full custom setup': gt 'intro_customization', 'start'
 
-	act 'Nerd, Geek, Student':
+	act 'Nerd':
 		*clr & cla
 		gs 'intro_sg_select', 'nerdinfo'
 		act 'I am the Queen of the Nerds!': gt 'intro_sg_select', 'nerdqueen'
@@ -238,7 +243,7 @@ if $ARGS[0] = 'charselect':
 
 	end
 
-	act 'Athlete, Jock':
+	act 'Jock':
 		*clr & cla
 		gs 'intro_sg_select', 'jockinfo'
 		act 'Avid volleyball player': gt 'intro_sg_select', 'volleyball'
@@ -247,7 +252,7 @@ if $ARGS[0] = 'charselect':
 		act 'Avid football player.': gt 'intro_sg_select', 'football'
 	end
 
-	act 'Popular, Cool, Beautiful':
+	act 'Popular':
 !!if we can do school uniforms gets an appropriate or borderline uniform.
 		*clr & cla
 		gs 'intro_sg_select', 'popularinfo'
@@ -255,7 +260,7 @@ if $ARGS[0] = 'charselect':
 		act 'I am beautiful': gt 'intro_sg_select', 'beautiful'
 	end
 
-	act 'Gopnik, Rebel, Punk, Troublemaker':
+	act 'Gopnik':
 !!If you can do uniforms then they can choose inappropriate or borderline
 !!can pick 1-3 tattoos at start
 		*clr & cla
@@ -266,7 +271,7 @@ if $ARGS[0] = 'charselect':
 		act 'An alternative, party girl or rebel': gt 'intro_sg_select', 'alternative'
 	end
 
-	act 'Outcast, Loser, Goth, Ugly':
+	act 'Outcast':
 		*clr & cla
 		gs 'intro_sg_select', 'outcastinfo'
 		act 'I have no friends': gt 'intro_sg_select', 'friendless'
@@ -364,38 +369,37 @@ end
 if $ARGS[0] = 'nerdinfo':
 	'<center><h4><font color="maroon">Nerd</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/nerd_0.jpg"></center>'
-	'While you were growing up, you spent virtually all of your free time at home, pursuing various cerebral pursuits. These might have included reading comics, fantasy or sci-fi books, learning about chess or computers or playing cards, board games, or RPGs with the other nerds in addition to faithfully going to school. While you have gained a huge amount of knowledge from this, your lack of interest in exercising as a child has left your body a little frail.'
-	*nl
-	'The long nights of trying to read in poor light have taken a toll on your eyesight as well, and you now need glasses to be able to read. Your cerebral pursuits have also had somewhat of a negative impact on your friendship with <<$npc_firstname[''A11'']>>: as you grew up. He became a gopnik and the two of you slowly started hanging out less and less, although you still consider each other to be friends. On the plus side, doing well in school has made your parents happy and has left you with some extra spending money as a reward for your hard work. Now...'
+	'Growing up, you spent virtually all of your free time at home, pursuing various cerebral pursuits. These might have included reading comics, fantasy or sci-fi books, learning about chess or computers or playing cards, board games and RPGs with the other nerds, in addition to faithfully going to school. While you have gained a huge amount of knowledge from this, your lack of interest in exercising as a child has left your body a little frail.'
+	'The long nights of trying to read in poor light have also taken a toll on your eyesight and you now require glasses. Your cerebral pursuits also had somewhat of a negative impact on your friendship with <<$npc_firstname[''A11'']>> as you grew up. He became a gopnik and the two of you slowly started hanging out often, although you still consider each other to be friends. On the plus side, doing well in school has made your parents happy and has left you with some extra spending money as a reward for your hard work. Now...'
 	*nl
 end
 
 if $ARGS[0] = 'jockinfo':
 	'<center><h4><font color="maroon">Jock</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/jock_0.jpg"></center>'
-	'While you were growing up, you spent virtually all of your free time outdoors. You loved playing sports, running, biking, horseback riding, hiking and most other outdoor activities. This has kept you in fairly good shape as well as decently socially active in a variety of team sports over the years. Doing this, however, negatively impacted your friendship with <<$npc_firstname[''A11'']>> somewhat. As you grew up, he became a gopnik and the two of you slowly started hanging out less and less, though you still consider each other to be friends. From all the sports available, you are an...'
+	'While you were growing up, you spent virtually all of your free time outdoors. You loved playing sports, running, biking and hiking. This has kept you in fairly good shape, as well as socially active in a variety of team sports over the years. Doing this, however, negatively impacted your friendship with <<$npc_firstname[''A11'']>>. As you grew up, he became a gopnik and the two of you slowly started hanging out less often, although you still consider each other to be friends. From all the sports available, you are an...'
 	*nl
 end
 
 if $ARGS[0] = 'popularinfo':
 	'<center><h4><font color="maroon">Popular</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/popular_0.jpg"></center>'
-	'You spent most of your childhood outdoors, playing with other girls and boys. As a result, you''re quite healthy. You''re also pretty strong verbally, with a keen understanding about how to get yourself out of trouble (or shifting the blame to someone else). You were never very interested in school or sports, however, and are only a sub-par student. Your popularity has negatively impacted your relationship with <<$npc_firstname[''A11'']>> somewhat, and you are not as close as you once were. Now...'
+	'You spent most of your childhood outdoors, playing with other boys and girls. As a result, you''re quite healthy and have a keen understanding about how to get yourself out of trouble (or shifting the blame to someone else). You were never very interested in school or sports, however, and are only a sub-par student. Your popularity has negatively impacted your relationship with <<$npc_firstname[''A11'']>>, and you''re not as close as you once were. Now...'
 	*nl
 end
 
 if $ARGS[0] = 'gopnikinfo':
 	'<center><h4><font color="maroon">Gopnik</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/gopnik_0.jpg"></center>'
-	'You spent most of your childhood outdoors, playing with the other girls and boys. As a result, you''re quite healthy. As you got older you lost any interest you might have once had with fitting in - now you do your own thing, and you’’re ready to tell anyone where they can stick it if they have a problem with that.'
-	'As you and <<$npc_firstname[''A11'']>> walked a similar path, your bond of friendship only deepened. This has had some repercussions on your school performance; you''re a sub-par student. It has also had some less enjoyable consequences leading you into more than your fair share of fights, into all sorts of problems at home, landing you in trouble and often punished at school, and even into a few run-ins with the local police. Now most consider you...'
+	'You spent most of your childhood outdoors, playing with the other boys and girls. As a result, you''re quite healthy. As you got older, you lost any interest you might have once had with fitting in - now you do your own thing, and you''re ready to tell anyone where they can stick it if they have a problem with that.'
+	'As you and <<$npc_firstname[''A11'']>> walked a similar path, your bond of friendship only deepened. This has had some repercussions on your school performance; you''re a sub-par student. It has also had some less than enjoyable consequences leading you into more than your fair share of fights, into all sorts of problems at home and landing you in trouble at school. You''ve even had a few run-ins with the local police. Most people now consider you...'
 	*nl
 end
 
 if $ARGS[0] = 'outcastinfo':
 	'<center><h4><font color="maroon">Outcast</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_0.jpg"></center>'
-	'You never really fit in. You’’re just one of those individuals who, by choice or circumstance, never really clicked with the other kids. As you got older things only got worse, and now you are seen as an outcast. This breaks one of the most important social rules among your peers, and you are now considered in the same vein as sluts, losers, gay boys and the like.'
+	'You never really fit in. You''re just one of those individuals who, by choice or circumstance, never really clicked with the other kids. As you got older things only got worse, and now you are seen as an outcast. This breaks one of the most important social rules among your peers, and you are now considered in the same vein as sluts, losers, gay boys and the like.'
 	'Being an outcast has also had a somewhat negative impact on your friendship with <<$npc_firstname[''A11'']>>. As you grew up, he became a gopnik and the two of you slowly started hanging out less and less, although you still consider each other to be friends - if just barely. You have no other real friends, and you get bullied and made fun of all the time because...'
 	*nl
 end
@@ -414,6 +418,11 @@ if $ARGS[0] = 'nerd':
 		pcs_lip = 1
 		pcs_lashes = 0
 	end
+	pcs_butt = 8
+	pcs_intel = 40
+	pcs_compskl = 20
+	pcs_chess = 20
+	pcs_gaming = 20
 	pcs_skin = 20
 	pcs_inhib = 10
 	pcs_heels = 10
@@ -424,10 +433,11 @@ if $ARGS[0] = 'nerd':
 	npc_rel['A29'] += 10
 	grupvalue[1] = 200
 	grupvalue[2] = 100
-	grupvalue[3] = 700
+	grupvalue[3] = 800
 	grupvalue[4] = 100
 	grupvalue[6] = 600
-	genbsize = 22
+	genbsize = 13 
+!!b cup for ideal bmi
 	traits['nerd_points'] = 60
 	traits['nerd_status'] = 2
 	traits['nerd_lernHome'] = 5
@@ -436,17 +446,17 @@ end
 if $ARGS[0] = 'nerdqueen':
 	'<center><h4><font color="maroon">Queen of the nerds</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/nerd_1.jpg"></center>'
-	'While you love all things nerdy or geeky, what you love the most is hanging out with your fellow nerds and doing nerdy things together. This has made you fairly social for a nerd and more general in your areas of knowledge. As you got older and started to develop as a girl, it also made you much more aware of your sexuality than most nerds are comfortable with. As such, you cultivated that awareness more than most and are now more at ease with your body than most of the other nerds. By the usual nerd standards you are confident, dynamic and attractive. This has lead to you being the leader of your group of friends, and you are more acceptable to other social groups as a result, especially the cool kids who seem to respect your social skills and looks.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'While you love all things nerdy, what you love the most is hanging out with your fellow nerds and doing nerdy things together. This has made you fairly social for a nerd and more general in your areas of knowledge. As you got older and started to develop as a woman, it also made you much more aware of your sexuality than most nerds are comfortable with. As such, you cultivated that awareness more than most and are now more at ease with your body than most of the other nerds.' 
+	'By nerd standards, you are confident, dynamic and attractive and this has led to you being the leader of your group of friends. You are more acceptable to other social groups as a result, especially the cool kids, who seem to respect your social skills and looks.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 8
-		pcs_intel = 40
 		pcs_chrsm = 40
 		pcs_sprt = 40
 		pcs_icesktng = 10
-		pcs_humint = 10
-		pcs_persuas = 10
+		pcs_humint = 20
+		pcs_persuas = 20
 		pcs_makupskl = 30
 		pcs_inhib = 20
 		pcs_heels = 25
@@ -460,7 +470,7 @@ if $ARGS[0] = 'nerdqueen':
 		npc_rel['A18'] = 1
 !!make sure this coming after the gs code above will still set christina to a 1 relationship, if I did this code correctly, if not look for this code in other spots and fix it pls
 		grupvalue[1] = 300
-		grupvalue[3] = 800
+		grupvalue[3] = 900
 		grupvalue[6] = 700
 		kosmetica = 10
 		stanok = 10
@@ -470,23 +480,25 @@ if $ARGS[0] = 'nerdqueen':
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 50
-		genbsize = 17
+		pcs_skin = 400
+		pcs_butt = 12
+		genbsize = 22
+!!d cup for ideal bmi
 		salo = 87
 		willpowermax = 90
-		gs 'grades', 'grade_award', 'school', 'math', 75
+		gs 'grades', 'grade_award', 'school', 'math', 85
 		gs 'grades', 'grade_award', 'school', 'rus', 90
 		gs 'grades', 'grade_award', 'school', 'lit', 80
 		gs 'grades', 'grade_award', 'school', 'art', 75
-		gs 'grades', 'grade_award', 'school', 'bio', 75
-		gs 'grades', 'grade_award', 'school', 'pe', 70
-		gs 'grades', 'grade_award', 'school', 'eng', 80
-		gs 'grades', 'grade_award', 'school', 'geo', 75
-		gs 'grades', 'grade_award', 'school', 'sci', 75
+		gs 'grades', 'grade_award', 'school', 'bio', 80
+		gs 'grades', 'grade_award', 'school', 'pe', 60
+		gs 'grades', 'grade_award', 'school', 'eng', 85
+		gs 'grades', 'grade_award', 'school', 'geo', 80
+		gs 'grades', 'grade_award', 'school', 'sci', 80
 		gs 'grades', 'grade_award', 'school', 'shop', 55
-		gs 'grades', 'grade_award', 'school', 'comp', 75
+		gs 'grades', 'grade_award', 'school', 'comp', 80
 		gs 'grades', 'grade_award', 'school', 'mus', 75
-		gs 'grades', 'grade_award', 'school', 'his', 75
+		gs 'grades', 'grade_award', 'school', 'his', 80
 		gt $loc, $loc_arg
 	end
 end
@@ -494,8 +506,9 @@ end
 if $ARGS[0] = 'goodstudent':
 	'<center><h4><font color="maroon">Good student</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/nerd_2.jpg"></center>'
-	'You just love school, and your grades are more than good enough to attend the university of your choosing after graduation - all you have to do is not let your grades slip. You have always tried to absorb every bit of knowledge possible and have done everything you could to excel in school. While this attitude has gained you a lot of respect from the other nerds, it did not earn you a lot of friends and you never found the time for sports. You are often asked to be a tutor and sometimes find yourself forced to do others'' homework for them. You have excellent grades, and your mother is very proud of you. She has shown her appreciation for your hard work by rewarding you with money.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You just love school, and your grades are more than good enough to attend the university of your choosing after graduation - all you have to do is not let them slip. You have always tried to absorb every bit of knowledge possible and have done everything you can to excel in school. While this attitude has gained you a lot of respect from the other nerds, it didn''t earn you a lot of friends and you never found the time for sports.' 
+	'You are often asked to be a tutor and sometimes find yourself forced to do others'' homework for them. You have excellent grades, and your mother is very proud of you. She has shown her appreciation for your hard work by rewarding you with money.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		traits['nerd_points'] = 100
@@ -506,9 +519,11 @@ if $ARGS[0] = 'goodstudent':
 		pcs_instrmusic = 10
 		pcs_artskls = 10
 		money += 2000
-		pcs_skin = 20
-		salo = 115
-		grupvalue[3] = 750
+		pcs_skin = 200
+		salo = 108
+		genbsize = 18
+!!c cup for ideal bmi
+		grupvalue[3] = 850
 		grupvalue[6] = 700
 		gs 'npc_relationship', 'socialgroup_setting', 0, 0, 5, 0, 0, 0
 		npc_rel['A29'] += 20
@@ -534,19 +549,20 @@ end
 if $ARGS[0] = 'computergeek':
 	'<center><h4><font color="maroon">Computer geek</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/nerd_3.jpg"></center>'
-	'You were always into computers, whether it be by playing video games, taking computers apart or learning programing and even hacking. You love everything about computers, but this passion left you little time to make friends - real-life friends, at least. You have managed to befriend many online players that you talk to while you play various video games, however, and you rarely spend any time outdoors, nor money on clothes or other girly stuff. You are far more interested in saving your money for a better computer in order to play even better games. You have considered hosting a web series of video games or vlogs - you even took the time to learn how to video edit - but you aren’’t sure if you want to put yourself out there like that.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You were always into computers, whether it be by playing video games, taking computers apart or learning programing and even hacking. You love everything about computers, but this passion left you little time to make friends - real-life friends, at least. You have managed to befriend many online players that you talk to while you play various video games, however, and you rarely spend any time outdoors, nor money on clothes or other girly stuff. You are far more interested in saving your money for a better computer in order to play even better games.' 
+	'You''ve considered hosting a web series of video games or vlogs - you even took the time to learn how to video edit - but you aren''t sure if you want to put yourself out there like that.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 10
 		if glass < 1 : glass = 1
-		pcs_intel = 55
+		pcs_intel = 45
 		pcs_compskl = 40
 		pcs_comphckng = 20
 		pcs_gaming = 30
 		internet = 20
-		pcs_skin = 30
-		salo = 38
+		pcs_skin = 200
+		salo = 33
 		pcs_inhib = 20
 		npc_rel['A152'] += 10
 		npc_rel['A153'] += 10
@@ -575,17 +591,18 @@ end
 if $ARGS[0] = 'chessplayer':
 	'<center><h4><font color="maroon">Avid chess player</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/nerd_4.jpg"></center>'
-	'You were always into chess as a child, and you have studied all the great chess masters. You can even name them all as well as their favorite strategies! You find nothing more interesting than matching your wits against someone else’’s in a game of chess. It has left you with the ability to often see the consequences of your actions better than most as you are used to looking several moves ahead. All of this has left you with little time to make many friends, and you rarely spend any time outdoors.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You were always into chess as a child, and have studied all the great chess masters. You can name them all, as well as their favorite strategies! You find nothing more interesting than matching your wits against someone else''s in a game of chess. It has left you with the ability to often see the consequences of your actions better than most as you are used to looking several moves ahead.' 
+	'All of this has left you with little time to make many friends, and you rarely spend any time outdoors.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 11
-		pcs_intel = 55
+		pcs_intel = 45
 		pcs_prcptn = 40
 		pcs_react = 40
 		pcs_chess = 40
-		pcs_skin = 35
-		salo = 120
+		pcs_skin = 250
+		salo = 105
 		pcs_inhib = 15
 		chessyear = year
 		chessmonth = month
@@ -615,7 +632,10 @@ if $ARGS[0] = 'jock':
 	pcs_vital = 40
 	pcs_react = 40
 	pcs_agil = 40
-	genbsize = 17
+	genbsize = 12
+!!b cup for ideal bmi
+	pcs_skin = 400
+	pcs_butt = 12
 	kosmetica = 10
 	stanok = 10
 	shampoo = 20
@@ -638,7 +658,7 @@ if $ARGS[0] = 'jock':
 	fashionista_purses[11] = 1
 	bag = 1
 	grupvalue[1] = 400
-	grupvalue[2] = 700
+	grupvalue[2] = 800
 	grupvalue[3] = 100
 	grupvalue[4] = 300
 	grupvalue[6] = 200
@@ -664,16 +684,15 @@ if $ARGS[0] = 'volleyball':
 	'<center><h4><font color="maroon">Volleyball player</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/jock_1.jpg"></center>'
 	'Ever since the first time you played volleyball, you have been in love with the sport. You spent a lot of your free time trying to improve your ability, and it paid off; you''re actually quite good now! Your obsession with volleyball, however, has had some repercussions on your school performance. You''re a sub-par student, and you haven''t made many friends other than your fellow jocks. You are especially close with <<$npc_firstname[''A13'']>> and your coach.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 12
-		pcs_react = 50
-		pcs_vital = 50
-		pcs_stren = 45
-		pcs_agil = 50
-		pcs_skin = 50
-		salo = 68
+		pcs_react = 45
+		pcs_agil = 45
+		genbsize = 17
+!!c cup for ideal bmi
+		salo = 80
 		pcs_vball = 50
 		gsAboVolley += 30
 		npc_rel['A13'] += 10
@@ -700,31 +719,28 @@ end
 if $ARGS[0] = 'dancer':
 	'<center><h4><font color="maroon">Avid dancer</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/jock_2.jpg"></center>'
-	'You fell in love with dancing at an early age and never looked back. You spent a lot of your free time trying to improve your skills, and it paid off; you''re actually quite good now! <<$npc_firstname[''A11'']>> helpfully pointed out that an added benefit of dance was a greater increase in your flexibility (that is, of course, typical of <<$npc_firstname[''A11'']>>). Your obsession with dancing, however, has had some repercussions on your school performance. You''re a sub-par student, and you haven''t made many friends other than your fellow jocks.'
+	'You fell in love with dancing at an early age and never looked back. You spent a lot of your free time trying to improve your skills, and it paid off; you''re actually quite good now!' 
+	'<<$npc_firstname[''A11'']>> helpfully pointed out that an added benefit of dance was a greater increase in your flexibility (that is, of course, typical of <<$npc_firstname[''A11'']>>). Your obsession with dancing, however, has had some repercussions on your school performance. You''re a sub-par student, and you haven''t made many friends other than your fellow jocks.'
 	*nl
 	'You are particularly close with <<$npc_firstname[''A23'']>>, who is just as passionate about dancing as you are. You trained a lot together as children and have a mutual respect for each other''s abilities.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 13
 		pcs_sprt = 45
-		pcs_vital = 50
-		pcs_react = 50
-		pcs_agil = 55
+		pcs_agil = 50
 		pcs_chrsm = 35
 		pcs_perform = 35
 		pcs_makupskl = 40
-		pcs_skin = 80
+		pcs_skin = 500
 		pcs_tan = 5
-		salo = 50
-		genbsize = 12
+		salo = 60
 		if player_avatar = 0:
 			pcs_hairlng = 200
 			pcs_eyesize = 2
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 60
 		pcs_danc = 50
 		pcs_heels = 30
 		pcs_inhib = 25
@@ -756,18 +772,15 @@ end
 if $ARGS[0] = 'runner':
 	'<center><h4><font color="maroon">Track runner</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/jock_3.jpg"></center>'
-	'Ever since you first tried track, you have been in love with the sport. When youre running, the rest of the world fades away and you experience a natural high like no other. You spent a lot of your free time trying to get better at it, and it paid off; you''re actually quite good now! Your obsession with running, however, has had some repercussions on your school performance. You''re a sub-par student, and you haven''t made many friends other than your fellow jocks and your coach.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'Ever since you first tried track, you have been in love with the sport. When you''re running, the rest of the world fades away and you experience a natural high like no other. You spent a lot of your free time trying to get better at it, and it paid off; you''re actually quite good now! Your obsession with running, however, has had some repercussions on your school performance. You''re a sub-par student, and you haven''t made many friends other than your fellow jocks and your coach.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 14
-		pcs_vital = 60
+		pcs_vital = 50
 		pcs_agil = 50
-		pcs_stren = 45
 		pcs_inhib = 25
-		salo = 58
-		pcs_skin = 40
-		genbsize = 12
+		salo = 60
 		pcs_run = 50
 		gsAboBeg += 30
 		npc_rel['A3'] += 10
@@ -775,7 +788,7 @@ if $ARGS[0] = 'runner':
 		npc_rel['A8'] += 5
 		npc_rel['A18'] = 1
 		npc_rel['A131'] += 10
-		grupvalue[2] = 750
+		grupvalue[2] = 850
 		willpowermax = 140
 		school_clothing = 7
 		gs 'grades', 'grade_award', 'school', 'math', 55
@@ -799,21 +812,22 @@ if $ARGS[0] = 'football':
 	'<center><h4><font color="maroon">Football player</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/jock_4.jpg"></center>'
 	'Ever since your first football game, you have been in love with the sport. You spent a lot of your free time trying to get better at it, and it paid off; you''re actually quite good now! Your obsession with football has had some repercussions on your school performance, however, and you''re now a sub-par student. You haven''t made many friends other than your fellow jocks, especially <<$npc_firstname[''A149'']>> and your coach.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 15
-		pcs_stren = 50
-		pcs_react = 50
-		pcs_vital = 50
+		pcs_stren = 45
+		pcs_react = 45
+		pcs_vital = 45
 		salo = 80
-		pcs_skin = 50
+		genbsize = 17
+!!c cup for ideal bmi
 		pcs_kick = 20
 		pcs_ftbll = 50
 		npc_rel['A131'] += 10
 		npc_rel['A149'] += 10
 		npc_rel['A34'] += 10
-		grupvalue[2] = 800
+		grupvalue[2] = 900
 		willpowermax = 140
 		$currentpursetype = 'fashionista'
 		currentpursenumber = 11
@@ -851,7 +865,7 @@ if $ARGS[0] = 'cool':
 	stanok = 20
 	tampon = 20
 	money += 1000
-	grupvalue[1] = 700
+	grupvalue[1] = 800
 	grupvalue[2] = 300
 	grupvalue[3] = 100
 	grupvalue[4] = 200
@@ -868,7 +882,8 @@ if $ARGS[0] = 'cool':
 		pcs_lip = 2
 		pcs_lashes = 1
 	end
-	pcs_skin = 50
+	pcs_skin = 500
+	pcs_butt = 16
 	pcs_tan = 5
 	npc_rel['A33'] += 10
 	grupTipe=1
@@ -877,15 +892,17 @@ end
 if $ARGS[0] = 'socialite':
 	'<center><h4><font color="maroon">Sociable</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/popular_1.jpg"></center>'
-	'You have a ton of friends! You''re friends with all of the important kids at school, anyways, which is what really matters. You were very social growing up and enjoyed being around others, often becoming the center of attention. You have always had a knack of knowing the right thing to say at the right moment, which led to many other students wanting to be your friend. You can with a little work get along with nearly anyone if you put your mind to it.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You''re friends with all of the important kids at school, which is what really matters. You were very social growing up and enjoyed being around others, often becoming the center of attention.' 
+	'You''ve always had a knack for knowing the right thing to say at the right moment, which led to many other students wanting to be your friend. You can, with a little work, get along with nearly anyone if you put your mind to it.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'cool'
 		alterstrtimg = 16
 		pcs_chrsm = 45
-		genbsize = 32
+		genbsize = 18
+!!c cup for ideal bmi
 		pcs_humint = 40
-		pcs_makupskl = 35
+		pcs_makupskl = 40
 		pcs_heels = 30
 		pcs_perform = 20
 		pirsC = 1
@@ -897,7 +914,7 @@ if $ARGS[0] = 'socialite':
 		school_clothing = 6
 		if player_avatar ! 1: pcs_hairlng = 200
 		npc_rel['A140'] += 10
-		salo = 68
+		salo = 80
 		willpowermax = 110
 		gs 'grades', 'grade_award', 'school', 'math', 65
 		gs 'grades', 'grade_award', 'school', 'rus', 90
@@ -919,8 +936,9 @@ end
 if $ARGS[0] = 'beautiful':
 	'<center><h4><font color="maroon">Beautiful</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/popular_2.jpg"></center>'
-	'You might not be the smartest and you might not be the most social or have the toughest attitude - but what you do have are natural good looks. That’s not something you can earn! You blossomed earlier than most girls and the boys took note, especially <<$npc_firstname[''A11'']>>, who started acting differently around you. You know he is attracted to you, but who can blame him? After all, you''re fairly certain that all of the boys (and even some of the girls) lust after you either openly or secretly. As you got older your looks only improved, and you are often considered one of the best looking girls in the room wherever you go. You are especially popular with the cool kids and jocks.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You might not be the smartest, be the most social or have the toughest attitude - but what you do have is natural good looks. You blossomed earlier than most girls and the boys took note, especially <<$npc_firstname[''A11'']>>, who started acting differently around you. As you got older your looks only improved, and you are often considered one of the best looking girls wherever you go.' 
+	'You are especially popular with the cool kids and jocks.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'cool'
 		alterstrtimg = 17
@@ -934,9 +952,10 @@ if $ARGS[0] = 'beautiful':
 			pcs_lashes = 2
 		end
 		school_clothing = 6
-		pcs_skin = 70
+		pcs_skin = 600
 		pcs_tan = 50
-		genbsize = 37
+		genbsize = 22
+!!d cup for ideal bmi
 		pcs_inhib = 25
 		kosmetica = 50
 		falselashesplain = 10
@@ -952,8 +971,8 @@ if $ARGS[0] = 'beautiful':
 		pirsC = 2
 		PirsC2_owned = 1
 		gs 'npc_relationship', 'socialgroup_setting_boys', 10, 10, 10, 10, 10, 0
-		salo = 63
-		grupvalue[1] = 800
+		salo = 80
+		grupvalue[1] = 900
 		grupvalue[4] = 300
 		gs 'fame', 'pav', 'sex', 20
 		willpowermax = 110
@@ -980,7 +999,8 @@ if $ARGS[0] = 'gopnik':
 	pcs_vital = 35
 	pcs_react = 35
 	pcs_agil = 35
-	genbsize = 22
+	genbsize = 13
+!!b cup for ideal bmi
 	pcs_inhib = 25
 	pcs_heels = 10
 	pcs_makupskl = 25
@@ -994,7 +1014,7 @@ if $ARGS[0] = 'gopnik':
 	grupvalue[1] = 100
 	grupvalue[2] = 300
 	grupvalue[3] = 100
-	grupvalue[4] = 700
+	grupvalue[4] = 800
 	grupvalue[6] = 100
 	gs 'npc_relationship', 'socialgroup_setting', 0, 0, -10, 25, 0, 0
 	npc_rel['A129'] -= 30
@@ -1011,9 +1031,10 @@ if $ARGS[0] = 'gopnik':
 		pcs_lip = 2
 		pcs_lashes = 1
 	end
-	pcs_skin = 40
+	pcs_skin = 400
 	pcs_vag = 1
 	pcs_throat = 1
+	pcs_butt = 8
 	stat['hj'] = 10
 	stat['bj'] = 5
 	stat['vaginal'] = 1
@@ -1025,8 +1046,9 @@ end
 if $ARGS[0] = 'gopnikstart':
 	'<center><h4><font color="maroon">Gopnik</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/gopnik_1.jpg"></center>'
-	'You are a gopnik. While you are still low in the gopnik pecking order, you have already proven yourself to them and most fully accept you as an equal. You have problems at home and school due to your antisocial behavior. This is especially true with your mother and stepfather, who see you going down the wrong path. The teachers and the police all know you''re one of the local gopniks. The jocks have a not so friendly rivalry with you and the other gopniks, while you don''t get along much, have some mutal respect for you.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You are a gopnik. While you''re still low in the gopnik pecking order, you''ve already proven yourself to them and most of them accept you as an equal. You have problems at home and school due to your antisocial behavior. This is especially true with your mother and stepfather, who see you going down the wrong path.' 
+	'The jocks have a not so friendly rivalry with you and the other gopniks. While you don''t get along, some of them have mutal respect for you.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'gopnik'
 		gs 'npc_relationship', 'socialgroup_setting', -10, -10, -10, 20, -10, 0
@@ -1037,7 +1059,7 @@ if $ARGS[0] = 'gopnikstart':
 		pcs_punch = 35
 		pcs_kick = 35
 		pcs_def = 35
-		salo = 80
+		salo = 100
 		school_clothing = 5
 		npc_rel['A9'] += 10
 		npc_rel['A10'] += 10
@@ -1049,7 +1071,7 @@ if $ARGS[0] = 'gopnikstart':
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
 		npc_rel['A34'] -= 10
-		grupvalue[4] = 800
+		grupvalue[4] = 900
 		willpowermax = 130
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1071,8 +1093,9 @@ end
 if $ARGS[0] = 'troublemaker':
 	'<center><h4><font color="maroon">Troublemaker</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/gopnik_2.jpg"></center>'
-	'You are a troublemaker. Nothing makes you happier than causing problems, whether it be petty larceny, getting into fights or vandalism. You live for the thrill of breaking the rules. You get along fairly well with the gopniks and they accept you as a kindred spirit. They seem to love your willingness to jump head first into any and all trouble you run across - and if you can''t find any, you will happily make your own, which keeps things lively. You have problems at home and school due to your antisocial behavior. This is especially true with your mother and stepfather, who see you going down the wrong path. The teachers and the police all know who you are.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You are a troublemaker. Nothing makes you happier than causing problems, whether it be petty larceny, getting into fights or vandalism. You live for the thrill of breaking the rules. You get along fairly well with the gopniks and they accept you as a kindred spirit, loving your willingness to jump head first into any and all trouble you run across - and if you can''t find any, you will happily make your own, which keeps things lively.' 
+	'You have problems at home and school due to your antisocial behavior. This is especially true with your mother and stepfather, who see you going down the wrong path. You are well known to both your teachers and the police.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		traits['nerd_points'] = -50
 		gs 'intro_sg_select', 'gopnik'
@@ -1085,8 +1108,7 @@ if $ARGS[0] = 'troublemaker':
 		pcs_def = 20
 		pcs_humint = 10
 		pcs_persuas = 10
-		pcs_skin = 40
-		salo = 75
+		salo = 65
 		pirsD = 4
 		PirsD4_owned = 1
 		$currentpursetype = 'dolls'
@@ -1106,7 +1128,6 @@ if $ARGS[0] = 'troublemaker':
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
 		npc_rel['A34'] -= 10
-		grupvalue[4] = 750
 		willpowermax = 120
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1129,8 +1150,8 @@ if $ARGS[0] = 'vitekgf':
 	'<center><h4><font color="maroon">Vitek''s girlfriend</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/gopnik_3.jpg"></center>'
 	'You are <<$npc_nickname[''A9'']>>''s girlfriend. You love the thrill and danger of hanging out with the gopniks, even if you lack the true attitude yourself. You met <<$npc_nickname[''A9'']>> after he and <<$npc_firstname[''A11'']>> became friends. There was something about his bad boy attitude that drew you in, and you soon found yourself falling for him.'
-	'As you developed, he started to take an interest in you as well. Soon thereafter the two of you started dating. You''re not technically a gopnik - you are considered more of a wannabe - but the rest of the gopniks seem to accept you anyways. You’’re not sure what would happen if you ever broke up with <<$npc_nickname[''A9'']>>, however, as being his girlfriend and hanging out with the other gopniks has cost you any real, close friends outside of their group.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'As you developed, he started to take an interest in you as well and you soon started dating. You''re not technically a gopnik - you are considered more of a wannabe - but the rest of the gopniks seem to accept you anyways. You’’re not sure what would happen if you ever broke up with <<$npc_nickname[''A9'']>>, however, as being his girlfriend and hanging out with the other gopniks has cost you any real, close friends outside of their group.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		traits['nerd_points'] = -10
 		gs 'intro_sg_select', 'gopnik'
@@ -1142,6 +1163,7 @@ if $ARGS[0] = 'vitekgf':
 		pcs_agil = 30
 		pcs_chrsm = 40
 		genbsize = 32
+!!e cup for ideal bmi
 		pcs_humint = 20
 		pcs_makupskl = 30
 		pcs_heels = 30
@@ -1162,14 +1184,14 @@ if $ARGS[0] = 'vitekgf':
 		npc_rel['A28'] -= 10
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
-		grupvalue[4] = 600
+		grupvalue[4] = 700
 		if player_avatar = 0:
 			pcs_hairlng = 200
 			pcs_eyesize = 2
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 50
+		pcs_skin = 500
 		pcs_tan = 5
 		pcs_vag = 1
 		pcs_throat = 1
@@ -1205,9 +1227,9 @@ if $ARGS[0] = 'alternative':
 !!can choose two more starting tattoo''s
 	'<center><h4><font color="maroon">Alternative</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/gopnik_4.jpg"></center>'
-	'You march to your own tune. You’’re not a follower - you’’re a leader! You just have no desire to actually lead anything. You do what you want when you want and you do it with a fuck-it-all attitude. The local gopniks respect you and for the most part you get along with them. You''re not one of them, however, but rather a kindred spirit looking to walk your own path and raise a little hell along the way.'
-	*nl
-	'Unlike the gopniks, you have far less interest in fighting or causing problems, instead just looking for a good time - you love to party more than anything else. The cool kids don''t completely look down their nose at you. Even if they don''t approve of your clothes, they respect your love of looking nice and having a good time. You have problems at home and school due to your behavior. This is especially true with your mother and stepfather, who see you going down the wrong path.'
+	'You march to your own tune. You do what you want when you want, and do it with a fuck-it-all attitude. The gopniks respect you and for the most part you get along with them. You''re not one of them, however, but rather a kindred spirit looking to walk your own path and raise a little hell along the way.'
+	'Unlike the gopniks, you have far less interest in fighting or causing problems, you''re just looking for a good time - you love to party more than anything else. The cool kids don''t completely look down their nose at you. Even if they don''t approve of your clothes, they respect your love of looking nice and having a good time.' 
+	'However, you have problems at home and school due to your behavior. This is especially true with your mother and stepfather, who see you going down the wrong path.'
 	act 'Select another': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		traits['nerd_points'] = -20
@@ -1220,7 +1242,9 @@ if $ARGS[0] = 'alternative':
 		pcs_vital = 40
 		pcs_agil = 40
 		pcs_react = 40
-		salo = 50
+		genbsize = 18
+!!c cup for ideal bmi
+		salo = 75
 		pcs_chrsm = 35
 		pcs_humint = 20
 		pcs_persuas = 10
@@ -1243,7 +1267,7 @@ if $ARGS[0] = 'alternative':
 			pcs_lashes = 1
 		end
 		school_clothing = 4
-		pcs_skin = 60
+		pcs_skin = 500
 		pcs_tan = 5
 		pcs_inhib = 35
 		pcs_vag = 1
@@ -1268,8 +1292,7 @@ if $ARGS[0] = 'alternative':
 		npc_rel['A28'] -= 10
 		npc_rel['A29'] -= 10
 		npc_rel['A33'] += 10
-		grupvalue[1] = 200
-		grupvalue[2] = 400
+		grupvalue[1] = 300
 		willpowermax = 120
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1289,7 +1312,6 @@ if $ARGS[0] = 'alternative':
 end
 
 if $ARGS[0] = 'outcast':
-	pcs_prcptn = 35
 	pcs_inhib = 10
 	pcs_makupskl = 0
 	grupvalue[1] = 100
@@ -1311,6 +1333,7 @@ if $ARGS[0] = 'outcast':
 		pcs_lashes = 0
 	end
 	pcs_skin = 0
+	pcs_butt = 4
 	pcs_tan = 0
 	grupTipe=5
 	shampoo = 20
@@ -1319,16 +1342,17 @@ end
 if $ARGS[0] = 'friendless':
 	'<center><h4><font color="maroon">Friendless</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_1.jpg"></center>'
-	'You were never very social and never learned how to make friends. You were often made fun of or bullied by the other kids as you grew up. As such, you naturally shielded away from them, an action that only served to isolate you even further. Now, years later, you have yet to make any real friends - even Vasily, who is your closest friend, wouldn''t be considered a particularly close one. In public, he scorns you like all the rest, but is a little nicer in private.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You were never very social and never learned how to make friends. You were often made fun of or bullied by the other kids as you grew up. As such, you naturally shielded away from them, an action that only served to isolate you even further. Now, years later, you have yet to make any real friends - even Vasily, your closest friend, wouldn''t be considered a particularly close one. In public, he scorns you like all the rest, but is a little nicer in private.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'outcast'
 		gs 'npc_relationship', 'socialgroup_setting', -10, -10, -10, -10, -10, 0
 		alterstrtimg = 22
-		genbsize = 17
+		genbsize = 12
+!!b cup for ideal bmi
 		pcs_chrsm = 20
 		pcs_observ = 20
-		pcs_skin = 10
+		pcs_skin = 100
 		pcs_makupskl = 10
 		npc_rel['A11'] -= 20
 		grupvalue[1] = 50
@@ -1355,10 +1379,10 @@ end
 if $ARGS[0] = 'uglyduckling':
 	'<center><h4><font color="maroon">Ugly duckling</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_2.jpg"></center>'
-	'Some girls blossom early and some have natural good looks... you got neither. In fact, you seem to have been cursed with an androgynous face and body. You have been mistaken for a boy more times than you would care to admit. You have never learned to use makeup, but maybe you should. It might help make people realize you are indeed a girl.'
-	*nl
-	'Your body seemed to have grown out of sync, leaving you looking odd and, at best, unattractive for most of your life. Now in your teens, your body is starting to even out in growth but you are still very androgynous and you are still considered by most to be ugly. Your lack of good looks has made you a social pariah. Nobody seems to like you or want to spend time with you unless they are making fun of you.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'Some girls blossom early and others have natural good looks - you got neither. In fact, you seem to have been cursed with an androgynous face and body, and have been mistaken for a boy more times than you would care to admit.'
+	'Your body seems to have grown out of sync, leaving you looking odd and, at best, unattractive for most of your life. Now in your teens, your body is starting to even out in growth, but you''re still very androgynous and still considered ugly.' 
+	'Your lack of good looks has made you a social pariah. Nobody seems to like you or want to spend time with you unless they are making fun of you.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'outcast'
 		gs 'npc_relationship', 'socialgroup_setting_boys', -10, -10, -10, -10, 0, 0
@@ -1366,7 +1390,8 @@ if $ARGS[0] = 'uglyduckling':
 		uglyduck_flag = 1
 		alterstrtimg = 23
 		if glass < 1 : glass = 1
-		genbsize = 2
+		genbsize = 28
+!!e cup for ideal bmi
 		pcs_inhib = 5
 		pcs_skin = 1
 		if player_avatar = 0:
@@ -1375,7 +1400,7 @@ if $ARGS[0] = 'uglyduckling':
 			pcs_lashes = 2
 		end
 		school_clothing = 3
-		salo = 210
+		salo = 125
 		willpowermax = 70
 		gs 'grades', 'grade_award', 'school', 'math', 55
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1397,8 +1422,9 @@ end
 if $ARGS[0] = 'goodgirl':
 	'<center><h4><font color="maroon">Good girl</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_3.jpg"></center>'
-	'You are a good girl. The kind parents, teachers and adults love, but the other kids hate. You always reminded the teacher to give out homework and you would tell on anyone for doing anything. You love the attention you get from adults, and while you can feel lonely at times, you are still pretty happy knowing you''re a good girl. You also regularly attend church just like any good girl should. The nerds seem to tolerate you the most, probably because they almost never misbehave and always do their homework anyways.'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You are a good girl. The kind parents, teachers and adults love, but the other kids hate. You always reminded the teacher to give out homework and would snitch on anyone for doing anything. You also regularly attend church.' 
+	'You love the attention you get from adults, and while you can feel lonely at times, you''re pretty happy knowing you''re a good girl. The nerds seem to tolerate you the most, likely because they almost never misbehave and always do their homework anyways.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		traits['nerd_points'] = 100
 		traits['nerd_status'] = 3
@@ -1417,7 +1443,7 @@ if $ARGS[0] = 'goodgirl':
 		pcs_makupskl = 10
 		money += 1000
 		shampoo = 10
-		pcs_skin = 30
+		pcs_skin = 200
 		$currentpursetype = 'gm'
 		currentpursenumber = 6
 		dolls_purses[6] = 1
@@ -1430,7 +1456,8 @@ if $ARGS[0] = 'goodgirl':
 		end
 		school_clothing = 3
 		salo = 48
-		genbsize = 17
+		genbsize = 13
+!!b cup for ideal bmi
 		willpowermax = 150
 		gs 'grades', 'grade_award', 'school', 'math', 80
 		gs 'grades', 'grade_award', 'school', 'rus', 80
@@ -1452,12 +1479,10 @@ end
 if $ARGS[0] = 'slut':
 	'<center><h4><font color="maroon">Slut</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_4.jpg"></center>'
-	'You were the first girl at your age to lose her virginity, to your childhood friend Vasily. You became curious about sex far sooner than other kids your age and started masturbating long before the others in your year. You also found a desire for pornography and would masturbate to it. You loved the sensation so much that you wanted to find out how good sex would feel. Once you tried it, you learned that you loved it - you really love everything about it.'
-	*nl
-	'The boys took advantage of your sexual needs and made you give them handjobs, which then led to blowjobs under the bleachers during recess and after school (sometimes they would return the favour by fingering you or a few times even eating you out) You always savored swallowing their cum, and you even love how it tastes. The only thing you like more than sucking cock and swallowing cum is getting fucked by a huge cock while sucking on another one.'
-	*nl
-	'However, your sex addiction has made you a social pariah. The girls all despise you and the boys publicly mock you, although they don''t mind using you. The nerds completely avoid you, while the gopniks seem to tolerate you the most (likely because they enjoy your blowjobs)'
-	act 'Select another': gt 'intro_sg_select', 'charselect'
+	'You became curious about sex far sooner than other kids your age. You started masturbating long before the others in your year and loved the sensation so much that you wanted to find out how good sex would feel, becoming the first girl in your year to lose your virginity.'
+	'Boys took advantage of your sexual needs and made you give them handjobs, which then led to blowjobs under the bleachers during recess and after school. You always savored swallowing their cum, loving how it tastes.'
+	'However, your sex addiction has made you a social pariah. The girls all despise you and the boys publicly mock you, although they don''t mind using you. The nerds completely avoid you, while the gopniks seem to tolerate you the most, likely because they enjoy taking advantage of you.'
+	act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		trait['commando_lvl'] = 2
 		trt_cumeater = 1 and cumeater_cheat = 1
@@ -1478,9 +1503,11 @@ if $ARGS[0] = 'slut':
 		grupvalue[3] = 50
 		grupvalue[4] = 100
 		alterstrtimg = 25
-		pcs_makupskl = 50
+		pcs_makupskl = 30
+		pcs_danc = 20
 		pcs_heels = 50
-		genbsize = 32
+		genbsize = 22
+!!d cup for ideal bmi
 		kosmetica = 30
 		falselashesplain = 20
 		$currentpursetype = 'cats'
@@ -1504,11 +1531,12 @@ if $ARGS[0] = 'slut':
 		end
 		school_clothing = 2
 		pcs_perform = 20
-		pcs_skin = 60
+		pcs_skin = 400
 		pcs_tan = 20
 		pcs_vag = 10
 		pcs_ass = 10
 		pcs_throat = 10
+		pcs_butt = 8
 		pcs_inhib = 60
 		gs 'fame', 'pav', 'sex', 600
 		GspravkaT = 2
@@ -1551,10 +1579,10 @@ end
 if $ARGS[0] = 'goth':
 	'<center><h4><font color="maroon">Goth</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/2_sg/outcast_5.jpg"></center>'
-	'There is always an oddball, the weirdo at every school and at yours, it seems you are the one. You have always felt different, like a person standing outside looking in at the world. You never felt like you fit in, at least until you watched some American movies, saw some goths and suddenly you felt like you belonged. You quickly used all the allowance you had to buy new clothes and makeup so you could finally feel good about yourself. Your family doesn''t approve, hell no one seems to approve but you don''t care.'
-	*nl
-    'You are the school''s resident Goth. The Dark Temptress that all the boys secretly dream of, weaver of bad poetry and suicide covenants... Yep, people have too much imagination. Most adults think that you are going to sacrifice their children. In fact, everyone seems to think you are going to sacrifice someone or commit suicide. The school''s kids aren''t better, with the so-called "cool girls" leading an ostracism campaign against you... Sigh... Fortunately, not everyone is a brainwashed sheep happily following all along, a few think for themselves. The nerds like your reading proclivity and that you are into some of the same things they are; you think they might even invite you to their game one day. A couple of the Gopniks like your party attitude, specifically the kids in the band Pizdá Buysto, who seem to respect your artistic disposition. Or maybe their lead singer just wants to get in your panties, it''s hard to tell.'
-    act 'Select another': gt 'intro_sg_select', 'charselect'
+	'Every school has their oddball, in your case - You. You never felt like you fit in, at least until you watched some American movies, saw some goths and suddenly felt like you belonged. You quickly used all the allowance you had to buy new clothes and makeup so you could finally feel good about yourself. Your family and classmates don''t approve, but you don''t care.'
+	'You''re the school''s resident Goth. The Dark Temptress that all the boys secretly dream of, weaver of bad poetry and suicide covenants. Everyone seems to think you''re going to sacrifice someone or commit suicide, and your classmates aren''t much better, with the so-called "cool girls" leading an ostracism campaign against you.'
+	'Fortunately, not everyone listens to them. The nerds like your reading proclivity and that you are into some of the same things they are; you think they might even invite you to their game night one day. A few of the gopniks like your party attitude, specifically those in the band, who seem to respect your artistic disposition. Or their lead singer just wants to get in your panties. It''s hard to tell.'
+    act 'Select another option': gt 'intro_sg_select', 'charselect'
 	act 'Confirm this option':
 		traits['nerd_points'] = -10
 		gs 'intro_sg_select', 'outcast'
@@ -1567,17 +1595,19 @@ if $ARGS[0] = 'goth':
 		npc_rel['A155'] += 5
 		grupvalue[4] = 300
         alterstrtimg = 28
-		genbsize = 17
-		salo = 45
+		genbsize = 13
+!!b cup for ideal bmi
+		salo = 55
 		pcs_chrsm = 35
 		pcs_intel = 35
 		pcs_sprt = 45
 		pcs_observ = 5
 		pcs_heels = 30
 		pcs_makupskl = 50
-		pcs_artskls = 10
+		pcs_danc = 10
+		pcs_artskls = 20
 		pcs_sewng = 20
-		pcs_skin = 50
+		pcs_skin = 500
 	    pcs_inhib = 25
 		willpowermax = 100
 		if player_avatar = 0:
@@ -1629,7 +1659,7 @@ if $ARGS[0] = 'sg_settings':
 	hcolfatherremember = pcs_haircol
 	hcolfronce = 1
 
-	!!Setting Kolkas birthday based off the PCs
+	!!Setting Kolkas birthday based off the player''s
 	koldobtmp_d = rand(1,28)
 	koldobtmp_y = birthyear
 	koldobtmp_m = birthmonth + 11

+ 70 - 43
locations/intro_sg_select_custom.qsrc

@@ -97,36 +97,57 @@ end
 if $ARGS[0] = 'modgrup':
 	*clr & cla
 	'Your current social group is <<$soc_grup>>.'
-	act 'Nerd, Geek, Student':
+	act 'Nerd':
 		killvar 'grupvalue'
 		$soc_grup = 'Nerd'
-		grupvalue[3] = 600
+		grupvalue[1] = 200
+		grupvalue[2] = 100
+		grupvalue[3] = 800
+		grupvalue[4] = 100
+		grupvalue[6] = 600
 		grupTipe = 3
 		gt 'intro_sg_select_custom','modgrup'
 	end
-	act 'Athlete, Jock':
+	act 'Jock':
 		killvar 'grupvalue'
 		$soc_grup = 'Jock'
-		grupvalue[2] = 600
+		grupvalue[1] = 400
+		grupvalue[2] = 800
+		grupvalue[3] = 100
+		grupvalue[4] = 200
+		grupvalue[6] = 400
 		grupTipe = 2
 		gt 'intro_sg_select_custom','modgrup'
 	end
-	act 'Popular, Cool, Beautiful':
+	act 'Popular':
 		killvar 'grupvalue'
 		$soc_grup = 'Cool'
-		grupvalue[1] = 600
+		grupvalue[1] = 800
+		grupvalue[2] = 400
+		grupvalue[3] = 200
+		grupvalue[4] = 100
+		grupvalue[6] = 400
 		grupTipe = 1
 		gt 'intro_sg_select_custom','modgrup'
 	end
-	act 'Gopnik, Rebel, Punk, Troublemaker':
+	act 'Gopnik':
 		killvar 'grupvalue'
 		$soc_grup = 'Gopnik'
-		grupvalue[4] = 600
+		grupvalue[1] = 200
+		grupvalue[2] = 300
+		grupvalue[3] = 100
+		grupvalue[4] = 800
+		grupvalue[6] = 100
 		grupTipe = 4
 		gt 'intro_sg_select_custom','modgrup'
 	end
-	act 'Outcast, Loser, Goth, Ugly':
+	act 'Outcast':
 		killvar 'grupvalue'
+		grupvalue[1] = 200
+		grupvalue[2] = 200
+		grupvalue[3] = 200
+		grupvalue[4] = 200
+		grupvalue[6] = 200
 		$soc_grup = 'Outcast'
 		grupTipe = 5
 		gt 'intro_sg_select_custom','modgrup'
@@ -274,15 +295,14 @@ end
 if $ARGS[0] = 'modrel_setup':
 	if npc_rel['<<$ARGS[1]>>'] < 0: npc_rel['<<$ARGS[1]>>'] = 0
 	if npc_rel['<<$ARGS[1]>>'] > 100: npc_rel['<<$ARGS[1]>>'] = 100
-	'<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''intro_sg_select_custom'', $loc_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''intro_sg_select_custom'', $loc_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''intro_sg_select_custom'', $loc_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''intro_sg_select_custom'', $loc_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''intro_sg_select_custom'', $loc_arg">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''intro_sg_select_custom'', $loc_arg">100</a></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''intro_sg_select_custom'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''intro_sg_select_custom'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''intro_sg_select_custom'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''intro_sg_select_custom'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''intro_sg_select_custom'', $locM_arg">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''intro_sg_select_custom'', $locM_arg">100</a></TD>'
 end
 
 if $ARGS[0] = 'modrel_pop':
-	$loc_arg = 'modrel_pop'
+	$locM_arg = 'modrel_pop'
 	'<center><b>Popular kids relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A1'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A4'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A14'
@@ -295,18 +315,19 @@ if $ARGS[0] = 'modrel_pop':
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A25'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A139'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A140'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 1, nstat & gt ''intro_sg_select_custom'',''modrel_pop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 1, nstat & gt ''intro_sg_select_custom'',''modrel_pop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 1, nstat & gt ''intro_sg_select_custom'',''modrel_pop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 1, nstat & gt ''intro_sg_select_custom'',''modrel_pop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 if $ARGS[0] = 'modrel_ath':
-	$loc_arg = 'modrel_ath'
+	$locM_arg = 'modrel_ath'
 	'<center><b>Jocks relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A3'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A5'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A8'
@@ -317,18 +338,19 @@ if $ARGS[0] = 'modrel_ath':
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A149'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A150'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A141'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 2, nstat & gt ''intro_sg_select_custom'',''modrel_ath''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 2, nstat & gt ''intro_sg_select_custom'',''modrel_ath''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 2, nstat & gt ''intro_sg_select_custom'',''modrel_ath''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 2, nstat & gt ''intro_sg_select_custom'',''modrel_ath''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 if $ARGS[0] = 'modrel_ner':
-	$loc_arg = 'modrel_ner'
+	$locM_arg = 'modrel_ner'
 	'<center><b>Nerds relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A2'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A6'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A12'
@@ -337,18 +359,19 @@ if $ARGS[0] = 'modrel_ner':
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A152'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A153'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A142'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 3, nstat & gt ''intro_sg_select_custom'',''modrel_ner''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 3, nstat & gt ''intro_sg_select_custom'',''modrel_ner''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 3, nstat & gt ''intro_sg_select_custom'',''modrel_ner''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 3, nstat & gt ''intro_sg_select_custom'',''modrel_ner''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 if $ARGS[0] = 'modrel_gop':
-	$loc_arg = 'modrel_gop'
+	$locM_arg = 'modrel_gop'
 	'<center><b>Gopnik kids relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A9'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A10'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A11'
@@ -363,33 +386,35 @@ if $ARGS[0] = 'modrel_gop':
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A143'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A144'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A145'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 4, nstat & gt ''intro_sg_select_custom'',''modrel_gop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 4, nstat & gt ''intro_sg_select_custom'',''modrel_gop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 4, nstat & gt ''intro_sg_select_custom'',''modrel_gop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 4, nstat & gt ''intro_sg_select_custom'',''modrel_gop''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 
 if $ARGS[0] = 'modrel_out':
-	$loc_arg = 'modrel_out'
+	$locM_arg = 'modrel_out'
 	'<center><b>Outcast kids relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A7'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A159'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 5, nstat & gt ''intro_sg_select_custom'',''modrel_out''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-!!	'<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 5, nstat & gt ''intro_sg_select_custom'',''modrel_out''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all boys in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 5, nstat & gt ''intro_sg_select_custom'',''modrel_out''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+!!	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all girls in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 5, nstat & gt ''intro_sg_select_custom'',''modrel_out''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 if $ARGS[0] = 'modrel_tea':
-	$loc_arg = 'modrel_tea'
+	$locM_arg = 'modrel_tea'
 	'<center><b>Teacher relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A26'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A128'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A129'
@@ -402,20 +427,22 @@ if $ARGS[0] = 'modrel_tea':
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A136'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A137'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A138'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all men in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 6, nstat & gt ''intro_sg_select_custom'',''modrel_tea''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
-	'<TR bgcolor=#ffffff><TD>Set relationship level for all women in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 6, nstat & gt ''intro_sg_select_custom'',''modrel_tea''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all men in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 0, 6, nstat & gt ''intro_sg_select_custom'',''modrel_tea''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display += '<TR bgcolor=#ffffff><TD>Set relationship level for all women in this group</TD><TD><a href="exec: gs ''intro_sg_select_custom'',''setval2'' & gs ''intro_sg_select_custom'', ''pol_grup_set'', 1, 6, nstat & gt ''intro_sg_select_custom'',''modrel_tea''">set value</a></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>'
+	$table_display
 	'</table></center>'
 	act 'Return': gt 'intro_sg_select_custom','modrel'
 end
 
 if $ARGS[0] = 'modrel_oth':
-	$loc_arg = 'modrel_oth'
+	$locM_arg = 'modrel_oth'
 	'<center><b>Others relationship levels</b></center>'
 	*nl
-	*nl
-	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
+	killvar '$table_display'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A69'
 	gs 'intro_sg_select_custom', 'modrel_setup', 'A112'
+	'<center><table border=0 cellspacing=0 cellpadding=25  bgcolor=#808080><TH></TH><TH>Set to zero</TH><TH>Minus 10</TH><TH>Minus 5</TH><TH>Plus 5</TH><TH>Plus 10</TH><TH>Set to 100</TH>'
 	'</table></center>'
 	!!Volleyball Coach is here because it wasnt being controlled by grup6 the teachers/coaches.
 	act 'Return': gt 'intro_sg_select_custom','modrel'

+ 114 - 96
locations/intro_sg_tg.qsrc

@@ -11,7 +11,7 @@ if $ARGS[0] = 'start':
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_ivan.jpg"></center>'
 	'You are Mikhail Ivanov.'
 	'<<$startdob>>'
-	'Your parents died shortly after you were born. Your only remaining relative, your great uncle Ivan, took you in. Your uncle has always made it clear that he took you in as a courtesy to your parents, not to become one himself. You two never became close, causing a lonely childhood.'
+	'Your parents died shortly after you were born and your only remaining relative, your great uncle Ivan, took you in. Your uncle has always made it clear that he took you in as a courtesy to your parents, not to become one himself. You never became close, resulting in a lonely childhood.'
 	act 'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/1.jpg"></center>'
@@ -19,15 +19,15 @@ if $ARGS[0] = 'start':
 		act 'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/2.jpg"></center>'
-			'Your teenage years were beset by the same changes as the rest of the boys your age: You got taller and gained some muscle weight, your shoulders widened, your voice squeaked until it deepened, and hair sprouted from everywhere on your body.'
-			'You spent most of the last few years in a near-constant state of arousal, set off by as little as a suggestively shaped vegetable. Thankfully the awkward changes and acne have started to subside, leaving you looking like the young man you will become.'
+			'Your teenage years were beset by the same changes as other boys your age: You got taller and gained some muscle, your shoulders widened, your voice deepened and hair sprouted from everywhere on your body.'
+			'You spent most of the last few years in a near-constant state of arousal, set off by as little as a suggestively shaped vegetable. Thankfully, the awkward changes and acne have started to subside, leaving you looking like the young man you will become.'
 			*nl
-			'But… But you are lonely. Maybe a little horny… who are you kidding? You are <b>very</b> horny. A horny 16 year old teen: that is the age when male sexuality peaks, according to the textbooks. Sadly your overflowing sex drive is not getting cared for by a loving girlfriend, instead you just walk around with a hardon almost every day, non stop.'
-			'You need a girlfriend, someone to talk to, to flirt with, to slowly but surely lure out of her various layers of clothing… a girlfriend. You would settle for a friend with benefits; it sounded hot in the tv show you saw at one point. Or even just some school sex, but the girls in your class won''t give you any attention, at least the ones that aren''t utterly ugly. Most ignore you, or when they do acknowledge you exist, they don''t take pity on you and instead often mock your awkwardness. You never learned how to talk to girls and because your mother died you''ve never had a female to help you understand girls. Now that is making your life, among other things, very hard.'
+			'But you are lonely. Lonely and extremely horny. Unfortunately, your overflowing sex drive is not getting cared for by a loving girlfriend and you walk around with an erection almost every day, non stop.'
+			'You need a girlfriend, someone to talk to, to flirt with, to slowly but surely lure out of her various layers of clothing. You would settle for a friend with benefits; it sounded hot in the TV show you saw. Or even just some casual sex, but the girls in your class won''t give you any attention, at least the ones that aren''t utterly ugly. Most ignore you, or when they do acknowledge you, don''t take pity on you and instead mock your awkwardness. You never learned how to talk to girls and because your mother died, you''ve never had a female to help you understand girls. Now that is making your life, among other things, very hard.'
 			act 'Continue':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/3.jpg"></center>'
-				'Only recently your loneliness and your natural tendency for peeping resulted in calamity: you took a peek at the girls locker room at school. They were so beautiful, well most of them anyways. You got so horny watching them get undressed and then showering you couldn''t help yourself, you don''t know what came over you. You pulled out your dick and started to masturbate, trying to stay out of sight, but apparently you made too much noise. When two girls come over to investigate, they caught you and started screaming. You tried to run, but were caught and taken the Headmaster who called your uncle and told him what you had done. Since then the girls at school haven''t stopped making cruel jokes about you being a pervert, or apparently how small a cock you supposedly have. You are not small! You are average, right?!'
+				'Only recently your loneliness and natural tendency for peeping resulted in calamity - You peeked into the girls locker room at school. They were so beautiful, well most of them anyways. You got so horny watching them get undressed and then showering you couldn''t help yourself, you don''t know what came over you. You pulled out your dick and started to masturbate, trying to stay out of sight, but apparently made too much noise. When two girls came over to investigate, they caught you and started screaming. You tried to run, but were caught and taken the Headmaster, who called your uncle and told him what you had done. Since then, girls haven''t stopped making cruel jokes about you being a pervert, or how small your cock supposedly is.'
 				'Everyone you knew quickly turned on you and nothing you could say worked to change their minds. You became an outcast and received regular beatings from the other guys.'
 				act 'Continue': gt 'intro_sg_tg', 'intro_2_name'
 			end
@@ -38,9 +38,9 @@ end
 if $ARGS[0] = 'intro_2_name':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/4.jpg"></center>'
-	'Now your reputation is in tatters. You''ve become the school outcast and no girl will give you the time of day, let alone agree to sleep with you. Out of horny desperation and loneliness you turn to the Internet to make friends. While on a forum for a mobile game you happened to meet a girl from the nearby town of Pavlovsk. You both liked the game and quickly hit it off and started talking almost every day.'
+	'Your reputation was in tatters and no girl would give you the time of day, let alone agree to sleep with you. Out of horny desperation and loneliness, you turn to the Internet to make friends. While on a forum for a mobile game, you happened to meet a girl from the nearby town of Pavlovsk. You both liked the game and quickly hit it off, talking almost every day.'
 
-	act 'Her name is ...':
+	act 'Her name was ...':
 		$pcs_firstname = 'Svetlana'
 		$pcs_lastname = 'Lebedev'
 		$pcs_nickname = 'Sveta'
@@ -68,12 +68,12 @@ end
 if $ARGS[0] = 'intro_3':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/17.jpg"></center>'
-	'Her name is <<$pcs_firstname>> "<<$pcs_nickname>>" <<$pcs_lastname>>. She was born on the same day as you. You don''t know why but she seems to like you, maybe she doesn''t have many friends either. You can''t believe your luck; this might be your saving grace.'
-	'You spend the next few weeks messaging back and forth. <<$pcs_nickname>> tells you all about her life as well as her likes and dislikes.'
+	'Her name was <<$pcs_firstname>> <<$pcs_lastname>>, "<<$pcs_nickname>> for short. You don''t know why, but she seemed to liked you. Maybe she was as lonely as you were. You couldn''t believe your luck.'
+	'You spent the next few weeks messaging back and forth. <<$pcs_nickname>> told you all about her life, as well as her likes and dislikes.'
 
 	act 'Continue': gt 'intro_sg_tg', 'intro_4'
 
-	act 'Re-enter her names':
+	act 'Re-enter her name(s)':
 		$pcs_firstname = 'Svetlana'
 		$pcs_lastname = 'Lebedev'
 		$pcs_nickname = 'Sveta'
@@ -101,14 +101,14 @@ end
 if $ARGS[0] = 'intro_4':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
-	'You find out about her mother Natasha, and how her biological father left when she was a baby. Her mother remarried shortly afterwards to a man called Vladimir.'
-	'She has a sister named Anya who is a year older than her. Anya chose to live at home instead of going to college, working at the local grocery in the day and partying at night.'
-	'<<$pcs_nickname>> has a half-brother Kolka, who is a year younger than her and really into football.'
+	'You found out about her mother Natasha, and how her biological father left when she was a baby. Her mother remarried shortly afterwards to a man called Vladimir.'
+	'She had a sister named Anya who was a few years older than her. Anya chose to live at home instead of going to college, working at the local grocery during the day and partying at night.'
+	'She also had a half-brother Kolka, who was a year younger than her and really into football.'
 	'Her mother''s sister, Aunt Luda, lives on the top floor of the same building as her. Her stepfather''s best friend is called Uncle Misha, who lives across the hall. Her mother''s old friend Sergey Shulgin lives on the floor above them, and <<$pcs_nickname>>''s old childhood friend Vasily is his son.'
 	*nl
-	'Her great grandparents live in a nearby village, where she occasionally spends a weekend. Apparently her mother''s parents are both dead.'
-	'You listen to her complaining about her extended family and about how she and Vasily drifted apart, comforting her as best you can. Yet you can''t help but feel a little jealous at how many caring relatives she has, given that your only relation is a great uncle who is about to kick you onto the streets for the sake of his own reputation.'
-	'You do the best you can to repress any resentment towards <<$pcs_nickname>> about how little she appreciates what she has.'
+	'Her great grandparents live in a nearby village, where she occasionally spent a weekend. Apparently, her mother''s parents are both dead.'
+	'You listened to her complaining about her extended family and about how she and Vasily drifted apart, comforting her as best you could. Yet you can''t help but feel a little jealous at how many caring relatives she has, given that your only relation is a great uncle who is about to kick you onto the streets for the sake of his own reputation.'
+	'You did the best you could to repress any resentment towards <<$pcs_nickname>> about how little she appreciated what she had.'
 
 	act 'When she talks about her mother, she calls her ...':
 
@@ -127,25 +127,25 @@ if $ARGS[0] = 'intro_5':
 	*clr & cla
 	if $month = 'August': $cbpre_text1 = ' the end of'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/6.jpg"></center>'
-	'A couple months pass. You and <<$pcs_nickname>> continue to talk, and you learn even more about her life. As<<$cbpre_text1>> summer break approaches, you bring up the idea of meeting up. <<$pcs_nickname>> is excited at the prospect and you agree to meet at the café where her mother works.'
+	'A few months passed. You and <<$pcs_nickname>> continued to talk, and you learned even more about her life. As<<$cbpre_text1>> summer break approaches, you bring up the idea of meeting up. <<$pcs_nickname>> was excited at the prospect and you agreed to meet at the café where her mother works.'
 
 	killvar '$cbpre_text1'
 	act 'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/7.jpg"></center>'
-		'Things at home haven''t been doing so well during this time.'
-		'Instead of the rumors dying, they have kept escalating over time. You''ve had to plan your routes home from school to avoid spots where you will be cornered and beaten. You spend quite some time with chatting with her, and when the summer break comes and you finally get out of school you wonder whether you can finally meet your chat buddy -and maybe make her your girl...'
+		'Things at home haven''t been going so well during this time.'
+		'Instead of the rumors dying, they kept escalating. You''ve had to plan your routes home from school to avoid spots where you''ll be cornered and beaten. You spend quite some time chatting with her, and when the summer break comes and you finally get out of school, you wonder whether you can finally meet your chat buddy - and maybe make her your girl...'
 		act 'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/8.jpg"></center>'
-			'The morning you have agreed to meet her, you pack up condoms and some spare cash into a backpack, heading off to the train station in the hopes of getting a girl friend or at least getting laid.'
+			'The morning you agreed to meet her, you pack condoms and some spare cash into a backpack before heading off to the train station in the hopes of getting a girlfriend, or at least getting laid.'
 			'On the train ride to Pavlovsk, you get a message from <<$pcs_nickname>>. Her parents have taken her to spend time with her grandparents in Gadukino. She was unable to get out of the trip, since her mother has been upset at how she has been spending so much time on her phone and not with her family.'
 			'With no other choice, you buy a second ticket to meet her at Gadukino.'
 			act 'Travel to Gadukino':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg"></center>'
-				'You get off the train next to a small road in the middle of nowhere. A dirt road leads to a small village made up of rickety wooden houses and even more ruined ones. Unsure of which house belongs to <<$pcs_nickname>>''s family, you pull out your phone to text her that you have arrived.'
-				'A few minutes later, an excited teenage girl comes rushing down one of the dirt roads. You double-check a picture of <<$pcs_nickname>> on your phone, as this is the first time you have seen her with your own eyes.'
+				'You get off the train next to a small road in the middle of nowhere. A dirt road leads to a small village made up of rickety wooden houses and even more ruined ones. Unsure which house belongs to <<$pcs_nickname>>''s family, you pull out your phone to text her.'
+				'A few minutes later, an excited teenage girl comes rushing down one of the dirt roads. You double-check a picture of <<$pcs_nickname>> on your phone, as this is the first time you''ve seen her with your own eyes.'
 				act 'Take a look at her picture': gt 'intro_sg_tg', 'settings'
 			end
 		end
@@ -153,6 +153,8 @@ if $ARGS[0] = 'intro_5':
 end
 
 if $ARGS[0] = 'settings':
+	$locM = 'intro_sg_tg'
+	$locM_arg = 'intro_6_looks'
 	*clr & cla
 
 	ml_update_1 = 1
@@ -277,17 +279,18 @@ if $ARGS[0] = 'settings':
 		$startdob = 'Your birthday: <B><<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
 	end
 
-	*nl
+	'<a href= "exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
+	
 	gt 'intro_sg_tg', 'intro_6_looks'
 end
 
 if $ARGS[0] = 'intro_6_looks':
 	$loc = 'intro_sg_tg'
-	$loc_arg = 'intro_7'
+	$loc_arg = 'intro_6_looks'
 	*clr & cla
 	if player_avatar = 1:
 		'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-		'She looks exactly like the picture she sent you, use to match fixed profile picture.'
+		'She looks exactly like the picture she sent you.'
 	else
 		'<center><b><font color = maroon>Character Face</font></b></center>'
 		'<center><b>Allows you to alter hair and eyes.</b></center>'
@@ -299,31 +302,30 @@ if $ARGS[0] = 'intro_6_looks':
 
 	
 	act 'Meet her': gt 'intro_sg_tg', 'intro_7'
-	act 'Customise Sveta': gt 'intro_customization', 'start'
+	act 'Customise <<$pcs_firstname>>': gt 'intro_customization', 'start'
 end
 
 
 if $ARGS[0] = 'intro_7':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-	'She''s shorter than you but rather tall for a woman, with a body that is neither too fat nor especially skinny. On her chest rest a pair of decently-sized breasts. Her <<$curly>><<$pcdesc_hairlength>> hair is <<$pcs_haircol>>.'
-	'She has <<$pcs_eyecol>> eyes with <<$pcs_lashes>>'+iif(glass > 0, ' hidden behind a pair of cheap glasses.', '.')
-	'She looks like she has spent some time in front of the mirror trying to pretty herself up, and her clothes are very clean. Despite that, she still looks rather average. Like she is the type of girl that would be a background character in another person''s life.'
+	'You couldn''t tell from her photo, but although shorter than you, she is rather tall for a girl.' 
+	'She looks like she''s spent some time in front of the mirror trying to pretty herself up, and her clothes are very clean. Despite that, she still looks rather average. Like she is the type of girl that would be a background character in another person''s life.'
 
 	act 'Go for a walk':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
-		'You both walk along a dirt road heading through grain fields and towards a forest. <<$pcs_nickname>> is holding your hand and keeps babbling on, asking you question after question.'
+		'You both walk along a dirt road heading through grain fields towards a forest. <<$pcs_nickname>> holds your hand and keeps babbling on, asking you question after question.'
 
 		act 'Keep walking':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_ruin.jpg"></center>'
-			'You end up being dragged into her pace, getting lost in the conversation between you two. Before long you look up and realize that while you were talking you ended up somewhere in the forest. Just ahead of you is an old ruin.'
+			'You end up being dragged into her pace, getting lost in the conversation. Before long, you look up and realize that, while you were talking, you''ve ended up somewhere in the forest. Just ahead of you is an old ruin.'
 
 			act 'Take a rest and make a move':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/9.jpg"></center>'
-				'You see a large stone at the ruins where you and <<$pcs_nickname>> decide to sit down. Being this close to a girl has given you a hardon, you pull out your shirt and do your best to hide it. Then she turns and looks at you and you feel this is your moment, you lean in to kiss her when suddenly...'
+				'You see a large stone at the ruins where you and <<$pcs_nickname>> decide to sit down. Being this close to a girl has given you a hardon, so you pull out your shirt and do your best to hide it. She turns and looks at you and you feel this is your moment, so you lean in to kiss her when...'
 
 				act 'What''s that sound?':
 					*clr & cla
@@ -333,26 +335,26 @@ if $ARGS[0] = 'intro_7':
 					lcolor = rgb(106, 90, 205)
 
 					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_1.jpg"></center>'
-					'A loud crack runs through the ruins. The ground gives way beneath you, sending both of you tumbling down into a dark hole. Miraculously you both manage to land with only minor scrapes and bruises. You curse and look around at your surroundings.'
-					'You seem to be in an underground chamber of some sort. Looking up you see that climbing out is not an option. There is also an old gate on one side of the chamber, but it''s either locked or rusted shut. Looks like the only way out is the tunnel on the other side of the chamber.'
-					'Thoughts of getting a kissing picture have been thoroughly broken. You have more immediate concerns of survival. You pull your backpack back onto your shoulders, turn on the flashlight on your phone, and lead <<$pcs_nickname>> out the only way you can.'
+					'A loud crack runs through the ruins and the ground gives way beneath you, sending you both tumbling down into the dark. Miraculously, you both manage to land with only minor scrapes and bruises. You curse and look around at your surroundings.'
+					'You seem to be in an underground chamber of some sort. Looking up, you see that climbing out is not an option. There is also an old gate on one side of the chamber, but it''s either locked or rusted shut. Looks like the only way out is the tunnel on the other side of the chamber.'
+					'Thoughts of getting a kissing picture have been thoroughly broken. You have more immediate concerns, so you pull your backpack back onto your shoulders, turn on the flashlight on your phone, and lead <<$pcs_nickname>> out the only way you can.'
 
 					act 'Follow the tunnel':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_tunnel_2.jpg"></center>'
-						'The tunnel goes on for what feels like miles. You start to worry that your phone battery will die.'
+						'The tunnel goes on for what feels like miles. You start to worry about your phone''s battery dying.'
 
 						act 'Keep going':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
-							'At the end of the tunnel you find a dead end. Or at least it seems so. <<$pcs_nickname>> notices light coming through the cracks in the wall. You do your best to knock it down.'
-							'After a few good hits the wall crumbles and you find yourself in another chamber filled with old pottery and baubles. Opposite you is another tunnel, that hopefully leads out. In the center of the room is an altar and on it is what seems to be the centerpiece of this room, a strange amulet.'
+							'Reaching the end of the tunnel, you find a dead end. Or at least it seems to be. <<$pcs_nickname>> notices light coming through the cracks in the wall. You do your best to knock it down.'
+							'After a few good hits, the wall crumbles and you find yourself in another chamber filled with old pottery and baubles. Opposite you is another tunnel that hopefully leads out. In the center of the room is an altar and on it is what seems to be the centerpiece of this room; a strange amulet.'
 
 							act 'Examine the amulet':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/item_amulet.jpg"></center>'
-								'You pick up the strange amulet and examine it. You notice it''s much lighter than it looks, and unusually warm for a piece of metal. It''s shaped like an antique oil lamp and... is that a penis? This is clearly very old, you think to yourself.'
-								'While holding the amulet, you realize that it''s getting warmer, to the point of being almost hot. Suddenly you feel heat coursing through your entire body. You feel a surge of strength inside you. It''s like you just finished a long jog, but without the fatigue.'
+								'You pick up the strange amulet and examine it. You notice it''s much lighter than it looks, and unusually warm for a piece of metal. It''s shaped like an antique oil lamp and... is that a penis? This is clearly very old.'
+								'While holding the amulet, you realize that it''s getting warmer, to the point of being almost hot. You suddenly feel heat coursing through your entire body and feel a surge of strength inside you. It''s like you just finished a long jog, but without the fatigue.'
 								'<<$pcs_nickname>> touches your arm, asking what you found. "Just some old junk," you reply as you pocket the amulet. "Come on, let''s get going."'
 
 								act 'Find a way out':
@@ -364,7 +366,7 @@ if $ARGS[0] = 'intro_7':
 									act 'Sneak out':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_road.jpg"></center>'
-										'The workers shift has long since finished so sneaking out isn''t too hard. The site is on a highway so hopefully you can make it back before people notice that <<$pcs_nickname>> is missing. It''s already late in the afternoon, you''re hoping you can get back before dark.'
+										'The workers shift has long since finished, so sneaking out isn''t too hard. The site is on a highway, so hopefully you can make it back before people notice that <<$pcs_nickname>> is missing. It''s already late in the afternoon and you''re hoping you can get back before dark.'
 
 										act 'Walk towards Gadukino':
 											*clr & cla
@@ -377,8 +379,7 @@ if $ARGS[0] = 'intro_7':
 											'You and <<$pcs_nickname>> walk along the road for several hours. The sun has started to set and the trees cast long shadows across the road. <<$pcs_nickname>> is lagging behind, getting tired.'
 											'You stick your hands in your pockets, slowing down to let her catch up. You feel a hard object and pull out the amulet to look at it.'
 											'It still looks kind of funny, but holding it is sending a pleasant rush of heat and energy through you. There''s something about it that...'
-											'Suddenly, <<$pcs_nickname>> grabs your arm.'
-											'"Who''s that?"'
+											'Suddenly, <<$pcs_nickname>> grabs your arm. "Who''s that?"'
 
 											act 'Look up': gt 'intro_sg_tg', 'intro_8'
 										end
@@ -401,12 +402,12 @@ if $ARGS[0] = 'intro_8':
 	lcolor = rgb(106, 90, 205)
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/10.jpg"></center>'
 	'You look up to see a dark figure in a long coat. The shadows cast by the setting sun obscure his figure, but you can see him striding purposefully towards you.'
-	'All of a sudden a cold chill of fear run through you. Two teenagers alone, in the dark, on the side of a road, in the middle of nowhere, being approached by a tall figure cloaked in shadows? There are dozens of horror stories that begin this way, and you don''t want to stick around to find out how it ends.'
+	'All of a sudden, a cold chill of fear run through you. Two teenagers alone, in the dark, on the side of a road, in the middle of nowhere, being approached by a tall figure cloaked in shadows? There are dozens of horror stories that begin this way, and you don''t want to stick around to find out how it ends.'
 
 	act 'Run':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_reinhold.jpg"></center>'
-		'<<$pcs_nickname>> seems to share your thoughts, and she grabs your hand and dashes into the woods, pulling you along with her. Amidst the panic the amulet slips from your hands and lands in the grass, giving off a slight glow that briefly illuminates the face of the man who was following you. Your long legs allow you to take the lead, dragging <<$pcs_nickname>> behind you into the forest.'
+		'<<$pcs_nickname>> seems to share your thoughts, and she grabs your hand and dashes into the woods, pulling you along with her. Amidst the panic, the amulet slips from your hands and lands in the grass, giving off a slight glow that briefly illuminates the face of the man who was following you. Your long legs allow you to take the lead, dragging <<$pcs_nickname>> behind you into the forest.'
 
 		act 'Keep running':
 			*clr & cla
@@ -416,32 +417,31 @@ if $ARGS[0] = 'intro_8':
 			lcolor = rgb(106, 90, 205)
 
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforestlost_night0.4.jpg"></center>'
-			'You drag <<$pcs_nickname>> along in a mad dash to escape the dark figure. You twist and turn, trying to lose him in the woods. After a few minutes you feel <<$pcs_nickname>>''s hand rip out of your grasp. You look back to see her collapsing on the ground, panting in exhaustion. There''s no sign of the man anywhere. You sigh in relief, you must have lost him.'
+			'You drag <<$pcs_nickname>> along in a mad dash to escape the dark figure. You twist and turn, trying to lose him in the woods. After a few minutes, you feel <<$pcs_nickname>>''s hand rip out of your grasp. You look back to see her collapsing on the ground, panting in exhaustion. There''s no sign of the man anywhere, and you sigh in relief.'
 
 			act 'Continue':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/howl.jpg"></center>'
-				'Suddenly your hear a terrifying howl close behind you. Another jolt of adrenaline passes through you. Wolves?!'
+				'Suddenly, you hear a terrifying howl close behind you. Another jolt of adrenaline passes through you. Wolves?!'
 
 				act 'Run away':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/run_wolf.jpg"></center>'
-					'You turn to help <<$pcs_nickname>> just in time to see a wolf knock her down, its fangs clamped down on her neck. A gush of crimson blood sprays the jaws of the wolf as you look on in shock. You hear the sound of rustling brush and in panic try to escape, but almost immediately you feel something heavy crash into you from behind and knock you down.'
+					'You turn to help <<$pcs_nickname>> just in time to see a wolf knock her to the ground. She screams in fear and reaches out to you before the wolf sinks its fangs into her throat, blood spraying over the wolf and pouring down her neck as she helplessly gurgles and chokes on it. You look on in shock before trying to escape, but almost immediately feel something heavy crash into you from behind and knock you down.'
 					act 'Lash out':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/wolf.jpg"></center>'
-						'You panic and lash backwards with your hands, causing the wolf attacking you to spring backwards out of range. Yet another wolf rushes in from the side, tearing into your shoulder.'
+						'You panic and lash out with your hands, causing the wolf attacking you to spring backwards out of range. Yet another wolf rushes in from the side, tearing into your shoulder.'
 
 						act 'Scream in pain':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/gadforest_night2.jpg"></center>'
-							'You let out a scream of pain, every thought being buried under the wild panic of adrenaline. You try to get up to run, but a pair of jaws bites deep into your thigh, sending you to the ground.'
+							'You let out a scream of pain, every thought being buried under the wild panic of adrenaline. You try to get up to run, but a pair of jaws bites deep into your thigh, sending you to the ground. You catch a brief glimpse of the blood soaked wolf and other members of the pack tearing into <<$pcs_nickname>>''s corpse. There is a look of immense terror in her now dead eyes.'
 
 							act 'Oh god...':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/11.jpg"></center>'
-								'Shock and blood loss set in, causing your vision to start to black out. So this is how you die. Moments before you pass out, you swear you can hear the sound crunching bones from above you and see a flash of red hair.'
-
+								'Shock and blood loss set in, causing your vision to start to black out. So this is how you die. Moments before you pass out, you swear you can hear the sound of crunching bones and see a flash of bright red hair.'
 								act '...am I dying?': gt 'intro_sg_tg', 'intro_9'
 							end
 						end
@@ -454,20 +454,25 @@ end
 
 if $ARGS[0] = 'intro_9':
 	*clr & cla
+	!!background : black
+	bcolor = rgb (0,0,0)
+	lcolor = rgb (106, 90, 205)
+	fcolor = rgb (255, 255, 255)
+	
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/11.jpg"></center>'
-	'...'
+	'<center>...</center>'
 	wait 1500
 	*nl
-	'...'
+	'<center>...</center>'
 	wait 1500
 	*nl
-	'...'
+	'<center>...</center>'
 	wait 1500
 	*nl
-	'...'
+	'<center>...</center>'
 	wait 1500
 	*nl
-	'Darkness consumes your thoughts for some time. Eventually, images begin to form in your mind and you soon find yourself in the middle of a dream. The strange amulet stands before you and out of it comes a ghost of some sort. Before you even realize what you are doing, you find yourself staring deep into the ghost''s eyes, which then turn into two planet earths.'
+	'Darkness consumes your thoughts for some time. Eventually, images begin to form in your mind and you soon find yourself in the middle of a dream. The strange amulet stands before you and out of it comes a ghost of some sort. Before you even realize what you are doing, you find yourself staring deep into the ghost''s eyes, which turn into two Earths.'
 	'"Most who look at the world see only the mundane, but there is more to it. Much more. Now you see that too. You have the potential to shape it all, but first, you have company."'
 
 	act 'Wake up':
@@ -478,39 +483,38 @@ if $ARGS[0] = 'intro_9':
 		fcolor = rgb(0, 0, 0)
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 		'You open your eyes to see you are in a hospital room. Next to you is an unfamiliar red-haired girl.'
-		'"Ah, you woke up," she chirped. "We found you half-dead, you know. You almost didn''t make it. There wasn''t anything that I could do for the girl though. Those wolves really did a number on the two of you. Running half-exhausted through the forest must have made you a pretty tempting target. Then again, given how you picked up that amulet, you probably wouldn''t have lasted much longer even if you had managed to get away."'
+		'"Ah, you woke up," she chirps. "We found you half-dead, you know. You almost didn''t make it. There was nothing I could do for the girl though, poor thing was ripped to pieces before I could get to you. Running half-exhausted through the forest made you a pretty tempting target for that pack. Then again, given how you picked up that amulet, you probably wouldn''t have lasted much longer, even if you had managed to get away."'
 
 		act 'What? Who? Where?':
 			*clr & cla
-
 			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-			'You try to ask her all the questions running through your mind right now. Unfortunately all that comes out of your mouth is a croaking groan. Your tongue feels half-numb, as does the rest of your body. Your head is too fuzzy at the moment to think straight.'
+			'You try to ask her all the questions running through your mind right now. Unfortunately all that comes out of your mouth is a croaking groan. Your tongue feels half-numb, as does the rest of your body. Your head is too fuzzy to think straight.'
 			'"I''d take it easy right now. I managed to save you, but your body still needs to get used to the change."'
 
 			act 'What change?':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 				'"What change?" You manage to get those words out, though your voice sounds a lot higher than normal.'
-				'The girl points at your chest, "Take a look for yourself."'
+				'The girl points at your chest. "Take a look for yourself."'
 
 				act 'Look down':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/12.jpg"></center>'
 					'You look down, hair longer than it was yesterday shifting in front of your eyes. The covers of the hospital bed lie flat over your body, but they cover a far different shape than you are used to.'
-					'You whip back the covers and the front-open hospital gown to discover a pair of naked breasts in front of your face. Past them lie the smooth curves of a teenage girl. An empty feeling between your legs informs you that your old friend has gone missing.'
+					'You whip back the covers and the front-open hospital gown to discover a pair of naked breasts and the smooth curves of a teenage girl. An empty feeling between your legs informs you that your old friend has gone missing.'
 					'You hastily recover your body in a panic, turning to the girl at your bedside.'
 
 					act 'What did you do to me?!':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-						'The girl frowns at your tone. "<i´>I</i> saved your life. Twice, even. You shouldn''t run off into the woods at night, let alone be fondling ancient amulets you know nothing about. Especially something like the Amulet of Power. Turns out that it passed to you. Must have happened when you touched it."'
+						'The girl frowns at your tone. "<i>I</i> saved your life. Twice, even. You shouldn''t run off into the woods at night, let alone be fondling ancient amulets you know nothing about. Especially something like the Amulet of Power. Turns out that it passed to you. Must have happened when you touched it."'
 
 						act 'What''s going on?':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 							'"What the hell is going on?" you respond. "What does that have to do with turning me into a girl?!"'
-							'"Hold on, I''ll get around to that. Let me start from the beginning," the girl says. "Magic exists and is real. Ages ago the world was not the same, the fae creatures who possess natural magic lived in balance but the succubus were free to breed with whom ever they wished."'
-							'"They bred with humans and with that human magicians were born. The Sidhe, the most powerful of the fae, feared the increasing numbers of human magicians and cast a very powerful spell to bind the succubus to them, preventing either from being able to reproduce without the other."'
+							'"Hold on, I''ll get to that. Let me start from the beginning," the girl says. "Magic exists and is real. Millenia ago, the world was not the same. The fae creatures who possess natural magic lived in balance, but the succubus were free to breed with whomever they wished."'
+							'"They bred with humans, and with that human magicians were born. The Sidhe, the most powerful of the fae, feared the increasing number of human magicians and cast a very powerful spell to bind the succubus to them, preventing either from being able to reproduce without the other."'
 							'"All magicians have some of that original fae blood in their bodies. It is through that that they are able to connect with the world of magic."'
 							'The redhead adjusts her glasses. "Most of the world simply ignores magic, or are protected from it by magic''s natural desire to remain hidden."'
 
@@ -518,29 +522,29 @@ if $ARGS[0] = 'intro_9':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 								'"But last night there was a powerful burst of magical energy, strong enough to be clearly felt by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search. That source of power is desired by many, but it is extremely dangerous and in the wrong hands could cause untold horrors."'
-								'She stops for a few moments for you to process that information. It seems really far fetched.'
+								'She stops for a few seconds for you to process that information. It seems really far fetched.'
 								'"A man named Reinhold wanted to prevent the amulet being misused, so he went out to find it. Of course, the moment you saw him, you dropped the amulet and bolted into the woods. He picked it up but didn''t bother to check you over. Unfortunately, he''s probably realized by now that the amulet no longer has the power and now he''ll be out to hunt you down."'
 
 								act 'So, the whole world is just an illusion?':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-									'"So magic exists and is used by all these people and creatures. But the rest of us just don''t see it, or we convince ourselves it didn''t happen?" You ask.'
-									'The girl nods. "Yes. You''re a quick study. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot a flamethrower. The average human mind can''t process magic, so it blocks it out as a way to protect the person from going crazy."'
-									'"Hence such things as little green men, UFOs, poltergeists, and spontaneous combustion are from when people encounter a difficult-to-hide phenomenon and their minds come to a flawed conclusion. In some cases, a person''s mind can''t cope with the spell they witness and they are driven so crazy that no one believes them."'
+									'"So magic exists and is used by all these people and creatures. But the rest of us just don''t see it, or we convince ourselves it didn''t happen?"'
+									'The girl nods. "Yes. You''re a quick study. Machines, apartments, television and the Internet. All this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot a flamethrower. The average human mind can''t process magic, so it blocks it out as a way to protect the person from going crazy."'
+									'"Hence such things as little green men, UFOs, poltergeists and spontaneous combustion are from when people encounter a difficult-to-hide phenomenon and their minds come to a flawed conclusion. In some cases, a person''s mind can''t cope with the spell they witness and they are driven insane."'
 
 									act 'And who are you?':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 										'"And who are you?" you ask.'
-										'The girl smiled. "Me? I''m Tatiana, a young mage with an keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant due to magical exposure. It gives him unmatched physical strength, plus he''s a great tracker."'
+										'The girl smiles. "Me? I''m Tatiana, a young mage with a keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant due to magical exposure. It gives him unmatched physical strength, plus he''s a great tracker."'
 										'"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
 
 										act 'What do you want from me?':
 											*clr & cla
 											'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 											'"And what is this amulet? Where did it come from?" you ask.'
-											'Tatiana thinks about it for a few moments. "It was made by the trickster Rikudo, one of the most powerful ancient magicians. He taunted the only living mage who could control its immense power by cursing him to be stuck in a female form, yet making it only activate for a male mage."'
-											'"I''m not a mage though, how could the power be transferred to me? And what does that have to do with turning me into a girl?"'
+											'Tatiana thinks about it for a few seconds. "It was made by the trickster Rikudo, one of the most powerful ancient magicians. He taunted the only living mage who could control its immense power by cursing him to be stuck in a female form, yet making it only activate for a male mage."'
+											'"I''m not a mage though. How could the power be transferred to me? And what does that have to do with turning me into a girl?"'
 											'"Well as for how the power was transferred, it seems that its long time underground caused it to malfunction and its power to enter your body. It was far too powerful for your body and would have ended up killing you and who knows how many others. Which is where the ''turning you into a girl'' part comes in."'
 
 											act 'Continue':
@@ -553,43 +557,54 @@ if $ARGS[0] = 'intro_9':
 												act 'Continue':
 													*clr & cla
 													'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-													'"Of course there was another way. I could have just stopped your heart and let your power dissolve into nature. You would have died though. Reinhold might be the kind of person to kill you to save others, but I didn''t want to kill you right after saving you. Plus with my magic I was able to take this risk. Sure, maybe with more time doing research I could have worked out another solution, but I didn''t have a lot of time."'
-													'"Of course I couldn''t just leave a newly teenage girl without parents or a home. So I decided to kill two birds with one stone. Instead of just turning you into the girl version of you, I turned you into that girl you were with."'
+													'"Of course there was another way. I could have just stopped your heart and let your power dissolve into nature. You would have died though. Reinhold might be the kind of person to kill you to save others, but I didn''t want to kill you right after saving you. Plus, with my magic, I was able to take this risk. Sure, maybe with more time doing research I could have worked out another solution, but I didn''t have a lot of time."'
+													'"Of course I couldn''t just leave a newly created teenage girl without parents or a home. So I decided to kill two birds with one stone. Instead of just turning you into any old girl, I turned you into the girl you were with."'
 
 													act 'What?':
 														*clr & cla
 														'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
-														'Startled, you reach up to your face, tracing out the features. You didn''t get a chance to become familiar with her face, but it feels about right. This whole time, the death of <<$pcs_nickname>> didn''t feel real, like she was still around somehow. Maybe it''s because you now "are" <<$pcs_nickname>>, but even now you don''t feel a sense of loss or guilt.'
+														'Startled, you reach up to your face, tracing out the features. You didn''t get a chance to become familiar with her face, but it feels about right. This whole time, <<$pcs_nickname>>''s death didn''t feel real, like she was still around somehow. Maybe it''s because you now <i>are<i> <<$pcs_nickname>>, but even now you don''t feel a sense of loss or guilt.'
 														'"Having a template to work off of really helped. Not even a geneticist could tell you two apart; you are identical from your fingerprints down to your DNA. Of course, that means your new ''equipment'' down there is fully functional as well, so if you don''t want to be a mommy, you should start thinking about contraceptives. You should probably also stay away from any male relatives if you don''t want to end up with a kid with eleven toes or something."'
-														'You angrily look at Tatiana, "So you think I''m a complete woman? On the outside I''ll look like one, but guess what, I''m still a man!"'
+														'You angrily glare at Tatiana. "So you think I''m a girl now? On the outside maybe, but guess what? I''m still a boy on the inside!"'
 														'"Well, yes. I won''t argue about that." Tatiana agrees. "You can decide what you want to do with your life, but you might want to play the part of <<$pcs_firstname>> until graduation at least. On a side note, I already took care of an alibi. Yesterday, "<<$pcs_firstname>>" was found half-dead on the edge of the woods while the leftovers of Mikhail''s body were found deeper in. It''s in the news." With these words, she tosses a newspaper onto the bed, an article circled out.'
 
 														act 'Read the newspaper':
 															*clr & cla
 															'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/13.jpg"></center>'
 															'There is a news report about a teenage boy, whose remains were found by a group of hunters half-eaten by wolves.'
-															'You give Tatiana a bewildered look. She has an enigmatic smile, "Well, I am a magician. That''s something that I can do. Reinhold has definitely lost the trail; there''s no reason he should suspect the power been passed to a girl. You took <<$pcs_firstname>>''s place, and she took yours. The body that ''died'' in the woods was a perfect copy of your old self, from your absorbed amulet energy down to the placement of every single hair."'
-															'"Anyways, your ''mother'' will be by in a couple hours to pick you up; she thinks that you''ve got some amnesia from a head injury and mental trauma from seeing your ''boyfriend'' get eaten alive by wolves, so you should probably be covered for any slip-ups. Just play the part of the traumatized little schoolgirl and it should be all good. Have fun."'
-															'She gets up and heads to the door, opening it up to reveal a tall man with red hair and face tattoos. "Come on, Gustav, let''s go." The pair disappears into the hall, leaving you with your thoughts.'
+															'You give Tatiana a bewildered stare. She has an enigmatic smile on her face. "Well, I am a magician. That''s something that I can do. Reinhold has definitely lost the trail; there''s no reason he should suspect the power been passed to a girl. You took <<$pcs_firstname>>''s place, and she took yours. The body in the woods was a perfect copy of your old self, from your absorbed amulet energy down to the placement of every single hair."'
+															'"Anyways, your ''mother'' will be by in a few hours to pick you up; she thinks that you''ve got some amnesia from a head injury and mental trauma from seeing your ''boyfriend'' get eaten alive by wolves, so you should probably be covered for any slip-ups. Just play the part of the traumatized little schoolgirl and it should be all good. Have fun."'
+															'She gets up and heads to the door, opening it up to reveal a tall man with red hair and face tattoos. "Come on, Gustav, let''s go." The pair disappear into the hall, leaving you with your thoughts.'
 
 															act 'Think about your situation':
 																*clr & cla
 																'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/14.jpg"></center>'
 																'You aren''t sure what to think.'
 																'On the one hand, you''ve lost your manhood forever. You''ll have to deal with skirts and periods and makeup and babies and all other sorts of girly things.'
-																'On the other hand, you''ve been granted a clean slate. No more beatings, no threats of becoming homeless, and you are gaining the family you never had. Plus, you''re going to be able to spy on girls in the locker rooms with out girls screaming this time.'
+																'On the other, you''ve been granted a clean slate. No more beatings, no threats of becoming homeless, and you''re gaining the family you never had. Plus, you''re going to be able to spy on girls in the locker room without them screaming this time.'
 																'Whining about the situation isn''t going to change it, so you resolve to deal with it one day at a time, living your new life as <<$pcs_firstname>> "<<$pcs_nickname>>" <<$pcs_lastname>>.'
+																!! default start
+																act 'Start at the end of August':
+																	month = 8
+																	$month = 'August'
+																	grandmaQW['last_month_paid'] = month
+																	day = 26
+																	week = 5
+																	hour = 9
+																	kanicont = 6
+																	gt 'intro_sg_tg', 'intro_end'
+																end
 
-																act 'Continue':
-																	*clr & cla
-																	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/start_csb.jpg"></center>'
-																	'Welcome to the Cursed Schoolboy version! You may have lost your masculinity and your old life, but you''ve gained new possibilities in return! Will you try to live your new life as a mere schoolgirl, or do you have grander aspirations with your newfound knowledge of magic? The choice is yours!'
-																	!!'Now, would you like to dive right into the action? Or would you rather take some time to get used to your new body and life?'
-
-																	act 'Start main game!': gt 'intro_sg_tg', 'intro_end'
-
-																	!! [Will lead into the prologue, which is currently WIP]
-																	!! act 'Let''s keep this intro going!':
+																act 'Start at the beginning of June':
+																	month = 6
+																	$month = 'June'
+																	grandmaQW['last_month_paid'] = month
+																	day = 1
+																	week = 3
+																	kanicont = 92
+																	Gspassed = 1
+																	dostupindorf = 1
+																	gt 'intro_sg_tg', 'intro_end'
 																end
 															end
 														end
@@ -625,7 +640,7 @@ if $ARGS[0] = 'pav_start':
 	'<center><h2>Pavlovsk</h2></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
 	*nl
-	'<center>A provincial town in a rural area of Russia, it looks much like all the other towns in the region. Population: about 15000 inhabitants.</center>'
+	'<center>A provincial town in a rural area of Russia, which looks much like all the other towns in the region. Population: 15000.</center>'
 
 	act 'Continue': $starting_location = 'pavlovsk' & gt 'intro_sg_tg', 'game_start'
 	act 'Change location': gt 'intro_sg_tg', 'gad_start'
@@ -634,9 +649,9 @@ end
 if $ARGS[0] = 'gad_start':
 	*clr & cla
 	'<center><h2>Gadukino</h2></center>'
-	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_gadukino.jpg"></center>'
 	*nl
-	'<center>A small farming village with many rickety wooden houses and even more ruins of houses. This village has seen better times.</center>'
+	'<center>A small farming village with just as many rickety wooden houses dot the landscape as ruins. The village has seen better days.</center>'
 
 	act 'Continue': $starting_location = 'gadukino' & gt 'intro_sg_tg', 'game_start'
 	act 'Change location': gt 'intro_sg_tg', 'pav_start'
@@ -645,7 +660,7 @@ end
 if $ARGS[0] = 'game_start':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/mother.jpg"></center>'
-	'Shortly after Tatiana left, your new mother showed up to take you to your new home. You met your new family and did the best you could to fit in, afraid of them figuring out that you are not <<$pcs_firstname>>. They seem to have bought Tatiana''s explanation of amnesia and mental trauma, going out of their way to reintroduce you to your new life.'
+	'Shortly after Tatiana left, your new mother showed up to take you to your new home. You met your new family and did the best you could to fit in, afraid of them figuring out that you''re not <<$pcs_firstname>>. They seem to have bought Tatiana''s explanation of amnesia and mental trauma, going out of their way to reintroduce you to your new life.'
 
 	act 'Continue':
 		*clr & cla
@@ -664,9 +679,11 @@ if $ARGS[0] = 'game_start':
 
 			act 'Continue':
 				cla
+				gs 'intro_sg_select', 'sg_settings'
+				gs 'intro_initialization'
 				showstat 1
 				showobjs 1
-
+				gs 'obj_din', 'old'
 				!!Stuff from the backpack, phone
 				prezik = 3
 				pornMagazine = 40
@@ -680,6 +697,7 @@ if $ARGS[0] = 'game_start':
 				gs 'stat'
 
 				act 'Start your new life':
+					music_loop = 0
 					if $starting_location = 'pavlovsk': gt 'bedrPar'
 					if $starting_location = 'gadukino': gt 'gadhouse', 'start'
 				end

+ 68 - 62
locations/intro_uni.qsrc

@@ -16,8 +16,8 @@ if $ARGS[0] = 'start':
 	$loc_arg = 'custom'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/uni_day.jpg"></center>'
-	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to the big city of St. Petersburg. Today is the day you move into the University dorms to start this new phase of your life.'
-	'As you approach the city you thing back to your school days and recall what type of kid you were...'
+	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to St. Petersburg. Today is the day you move into the university dorms to start this new phase of your life.'
+	'As you approach the city, you think back to your school days and recall what type of kid you were...'
 
 	act 'Continue': gt 'intro_city_select', 'start'
 end
@@ -30,7 +30,7 @@ if $ARGS[0] = 'custom':
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
 	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'
-	'As you look in the mirror, your face comes into focus. Some aspects of your appearance are already set, you can define the others now.'
+	'As you look in the mirror, your face comes into focus. While some aspects of your appearance are already set, you can define the others now.'
 	'You are fairly tall.'
 	*nl
 	'<center>Customize your:</center>'
@@ -44,8 +44,8 @@ if $ARGS[0] = 'vlad_intro':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big28.jpg"></center>'
 	!!basic desc of Vlad, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
-	'Having spent almost an hour in the cramped truck, you jump out as soon as you arrive. Vlad gets out, stretches a bit, then tells you to take your sister and find out where you''re staying, while the rest of the family unloads your stuff from the back of the truck.'
-	'Looking around, you see many people doing the same, the younger ones heading inside while the families unload the future students belongings to be taken inside.'
+	'Having spent almost an hour in the cramped truck, you jump out as soon as you arrive. Vladimir gets out and stretches before telling you to take your sister and find out where you''re staying while the rest of the family unloads your stuff.'
+	'Looking around, you see many people doing the same.'
 
 	act 'Check Kolka': gt 'intro_uni', 'kolka_intro'
 end
@@ -55,7 +55,7 @@ if $ARGS[0] = 'kolka_intro':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big34.jpg"></center>'
 	!!basic desc of Kolka, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
-	'Your brother, caught up in the excitement of opening day, tries to slide past Vlad unnoticed but is called back to help unload. He sighs and shuffles his feet a bit before turning around to help his dad get your stuff. You feel a bit bad for him, but he will be able to get a better look around next year, when he graduates secondary school and starts here.'
+	'Your brother, caught up in the excitement of opening day, tries to slide past Vlad unnoticed but is called back to help unload. He sighs and shuffles his feet before turning around to help. You feel bad for him, but he''ll be able to get a better look around next year when he graduates secondary school and starts here.'
 
 	act 'Head inside': gt 'intro_uni', 'anya_intro'
 end
@@ -66,24 +66,24 @@ if $ARGS[0] = 'anya_intro':
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big33.jpg"></center>'
 	!!basic desc of Anya, maybe a preset is used somewhere in game already? If not already in the intro (I think it is.)
 	'Your sister comes up to you, links her arm with yours, and pulls you forward. "Come on, <<$pcs_nickname>>! I want to see this place."'
-	'Already knowing the answer, you ask anyway "Why aren''t you enrolled then?"'
+	'Already knowing the answer, you ask anyway. "Why aren''t you enrolled then?"'
 	'"I''m comfortable where I am right now. When I''m ready, maybe I will."'
 	'Rolling your eyes, you let her keep pulling on your arm.'
 
-	act 'Enter the University': gt 'intro_uni', 'diane_intro'
+	act 'Enter the university': gt 'intro_uni', 'diane_intro'
 end
 
 if $ARGS[0] = 'diane_intro':
 	!! Going into Uni quad to get escort - meeting Diane(Rex older sister)
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big253.jpg"></center>'
-	'Joining the crowd heading inside, you and Anya go into the main courtyard where the new students are being greeted by the older students.'
+	'Joining the crowd heading inside, you head into the main courtyard where the new students are being greeted by the older students.'
 	'A (color undecided)-haired girl comes up and introduces herself. "Welcome, I am Diane Borisyuk... Anya?"'
-	'Anya squeals with joy and runs to her and gives her a big hug. "Diane! I haven''t seen you in a long time. <<$pcs_nickname>>, this is Diane, Rex''s sister. She used to buy us booze for our parties when we were younger."'
-	'Diane laughs and says "that <b>was</b> a long time ago. So this is your sister? Nice to meet you. You''re going to have a lot of fun here. Let''s get you your dorm keys and get you set up!"'
+	'Anya squeals with joy before running to her and giving her a hug. "Diane! I haven''t seen you in a long time. <<$pcs_nickname>>, this is Diane, Rex''s sister. She used to buy us booze for our parties when we were younger."'
+	'Diane laughs. "That <b>was</b> a long time ago. So this is your sister? Nice to meet you. You''re going to have a lot of fun here. Let''s get you your dorm keys and get you set up!"'
 	'"By the way, what are you studying?"'
 
-	act 'Go get your key': gt 'intro_uni', 'degree_choice'
+	act 'Get your key': gt 'intro_uni', 'degree_choice'
 end
 
 if $ARGS[0] = 'degree_choice':
@@ -97,7 +97,7 @@ if $ARGS[0] = 'degree_choice':
 	gs 'set_home', 11
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/6_uni/degree_choice.jpg"></center>'
-	'This is where you decide your degree. For now this is just a placeholder to be expanded once we add in more degrees to choose from.'
+	'This is where you decide what degree you wish to study. For now, Teaching is the only option, but more will be added in the future.'
 	
 	act 'Teaching':
 		!!variables for teaching degree
@@ -117,23 +117,23 @@ if $ARGS[0] = 'dorm_intro':
 	!! Going to the dorm to get the keys
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'
-	'You follow Diane into the dorms building into the main hallway. An older woman, with a very unpleasant and judgmental look on her face sits in a room just off the main hallway.'
-	'Diane goes up to her and says "I need <<$pcs_firstname>> <<$pcs_lastname>>''s room key, please."'
-	'The woman looks your name up on her computer then finds your dorm key and hands it to you.'
+	'You follow Diane into the dorm building where an older woman with a very unpleasant and judgmental look on her face sits in a room just off the main hallway.'
+	'Diane walks up to her. "I need <<$pcs_firstname>> <<$pcs_lastname>>''s room key, please."'
+	'The woman looks your name up on her computer before finding your dorm key and handing it to you.'
 	'"Come on <<$pcs_nickname>>, I want to see your room." Anya drags you towards the elevators, with a smiling Diane following you.'
 
-	act 'Check your room': gt 'intro_uni', 'vika_intro'
+	act 'Check out your room': gt 'intro_uni', 'vika_intro'
 end
 
 if $ARGS[0] = 'vika_intro':
 	!! Visiting dorm room - meeting Vika
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big220.jpg"></center>'
-	'Getting out of the elevator on the tenth floor, you follow the number on your key to the door with the same number. Inside you find a blonde haired girl sitting on one of the two beds in the room. Looking around, you see there is a desk for each of you and a large wardrobe for your clothes.'
-	'The girl gets up and comes to greet you. "Hi, I''m Vika Kirilova. I guess one of you is my new roommate?" She looks between you and Anya, not sure which it is.'
-	'"Hello, Vika. I am <<$pcs_firstname>> <<$pcs_lastname>>. I''m your roommate, this is my sister, Anya." Anya gives her a smile and say hello, mostly checking out your room.'
-	'Diane kind of stays in the doorway, though you do notice a strange look she gives Vika before saying, "We should let your parents know which room you''re in so they can bring in your stuff, while I show you around the campus."'
-	'Once you get back out into the hallway, you ask why she doesn''t like your roommate. "There are a lot of nasty rumors about her. I am not exactly a prude or anything, but if any of those rumors are true, then she makes me look like a virgin living under a rock my whole life."'
+	'Arriving on the tenth floor, you check the number on your key and approach the matching door. You find a blonde haired girl inside sitting on one of the two beds in the room. Looking around, you see there is a desk for each of you and a large wardrobe for your clothes.'
+	'The girl gets up and comes to greet you. "Hi, I''m Vika Kirilova. I guess one of you is my new roommate?" She looks between you and Anya, not sure who it is.'
+	'"Hello, Vika. I''m <<$pcs_firstname>> <<$pcs_lastname>>, but you can call me <<$pcs_nickname>>. I''m your roommate and this is my sister, Anya." Anya gives her a smile, but is mostly occupied with checking out your room.'
+	'Diane stays in the doorway, though you do notice the strange look she gives Vika. "We should let your parents know which room you''re in so they can drop off your stuff while I show you around the campus."'
+	'Once you get back out into the hallway, you ask why she doesn''t like your roommate. "There are a lot of nasty rumors about her. I''m not exactly a prude or anything, but if any of those rumors are true, then she makes me look like a virgin that''s been living under a rock my whole life."'
 
 	act 'Find your parents': gt 'intro_uni', 'mom_intro'
 end
@@ -142,37 +142,39 @@ if $ARGS[0] = 'mom_intro':
 	!! Back outside Intro to Mom - answer sets relationship level
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-	'Once you get back outside, you find your family standing around the piles of boxes with your stuff, surrounded by people coming and going. You tell your father which room and give him the key before your <<$npc_nickname[''A29'']>> pulls you to one side. Anya and Diane step away to catch up a bit and give you some privacy.'
+	'Once you get back outside, you find your family standing around the piles of boxes with your stuff, surrounded by people coming and going. You tell your father which room you''re in and give him the key before your <<$npc_nickname[''A29'']>> pulls you to one side. Anya and Diane step away to catch up and give you some privacy.'
 	'"Big day! Are you excited? I know I am." She gives you a proud look.'
-	'"Yeah, <<$npc_nickname[''A29'']>>! There is so much to do and see here."'
-	'"Well don''t forget to stay focused on your studies, and stay away from boys for now. There is plenty of time after you have finished school to think about that stuff."'
+	'"Yeah, <<$npc_nickname[''A29'']>>! There''s so much to do and see here."'
+	'"Well don''t forget to stay focused on your studies, and stay away from boys for now. There will be plenty of time after you''ve finished studying to think about that stuff."'
 	
-	act 'I will be fine (neutral response)':
-		gs 'npc_relationship', 'set', 'A29', '50'
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"Everything will be fine, <<$npc_nickname[''A29'']>>. You got me here, I will do the rest."'
-		'She gives you a hug before going to stand over your pile of stuff to keep an eye on it.'
-		
-		act 'Go on tour': gt 'intro_uni', 'tour_intro'
+	if $start_type[1] ! 'tg':
+		act 'Tell her what she wants to hear':
+			gs 'npc_relationship', 'set', 'A29', '50'
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
+			'"Everything will be fine, <<$npc_nickname[''A29'']>>. You got me here, I will do the rest."'
+			'She gives you a hug before going to stand over at your pile of stuff to keep an eye on it.'
+			
+			act 'Go on tour': gt 'intro_uni', 'tour_intro'
+		end
+		act 'Snap at her':
+			gs 'npc_relationship', 'set', 'A29', '30'
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
+			'"Just stop <<$npc_nickname[''A29'']>>! I''m an adult now, and I''ll do whatever I want with whoever I want!"'
+			'Her eyes flash in anger, but she doesn''t say anything. She goes and stands next to your pile to keep an eye on it.'
+			
+			act 'Go on tour': gt 'intro_uni', 'tour_intro'
+		end
 	end
-	act 'Give it a rest (angry response)':
-		gs 'npc_relationship', 'set', 'A29', '30'
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"Just stop <<$npc_nickname[''A29'']>>! I''m an adult now, and I will do whatever I want with who I want!"'
-		'Her eyes flash in anger, but she doesn''t say anything. She goes and stands next to your pile to keep an eye on it.'
-		
-		act 'Go on tour': gt 'intro_uni', 'tour_intro'
-	end
-	act 'Don''t worry (loving response)':
+	act 'Appreciate her concern':
 		gs 'npc_relationship', 'set', 'A29', '70'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big29.jpg"></center>'
-		'"I know, don''t worry so much <<$npc_nickname[''A29'']>>. You got me here, I will do the rest."'
-		'She gives you a big hug before going to stand over your pile of stuff to keep an eye on it.'
+		'"I know, I know. Don''t worry so much <<$npc_nickname[''A29'']>>. You got me here. I''ll do the rest."'
+		'She gives you a hug before going to stand over your pile of stuff to keep an eye on it.'
 
-		act 'Go on tour': gt 'intro_uni', 'tour_intro'
+		act 'Go on a tour': gt 'intro_uni', 'tour_intro'
 	end
 end
 
@@ -180,14 +182,14 @@ if $ARGS[0] = 'tour_intro':
 	!! Taking a short tour - can be expanded as more buildings are added - sports arena/pool etc
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/uni_day.jpg"></center>'
-	'You rejoin Anya and Diane, who begins to point out the main areas of the University.'
-	'"Right now you''re in the main courtyard. Most places can be found starting here. You already know where the dorms are, and I imagine you been to the admin building already, where you enrolled. Any paperwork stuff, or trouble you get into will be handled there, it has all the offices."'
+	'You rejoin Anya and Diane, who begins to point out the main areas of the university.'
+	'"Right now you''re in the main courtyard. It''s basically the main hub of the university. You already know where the dorms are, and I imagine you''ve been to the admin building already. It has all the main offices, so any paperwork or trouble you get into will be handled there."'
 	*nl
-	'She takes you to the front of what must be the largest building on campus. "Most of your starting classes will be here, finding your way around inside is pretty easy despite its size, there are signs everywhere in there."'
+	'She takes you to the front of what must be the largest building on campus. "This is the main building, where most of your classes will be held. Finding your way around inside is pretty easy despite its size. It''s signposted like crazy in there."'
 	*nl
-	'She takes you up to another large building, and says "This is the library. Most students without a computer come here to study. You can find me inside a lot, I''m studying to be a teacher and I would be happy to help if you need it."'
+	'She takes you up to another large building. "This is the library. Most students without a computer come here to study. You can find me here almost all the time and I''m always willing to help if you need it. I''m studying to be a teacher, so offering you assistance would help me as much as it helps you."'
 	*nl
-	'"Well that''s the basic tour, the rest you will find as you go."'
+	'"Well, that''s the basic tour. The rest you will learn as you go."'
 
 	act 'End the tour': gt 'intro_uni', 'tour_end'
 end
@@ -196,9 +198,9 @@ if $ARGS[0] = 'tour_end':
 	!! End tour
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big253.jpg"></center>'
-	'The three of you walk back to the dorms, with you taking in the sights while Anya and Diane chat about Rex and the old days.'
+	'The three of you walk back to the dorms. You take in the sights while Anya and Diane chat about Rex and the old days.'
 	'Once you get there, Diane reminds you to look for her in the library if you need anything before hugging Anya goodbye and heading back into the crowd of new students.'
-	'Not seeing your <<$npc_nickname[''A29'']>> or your pile of stuff, you head up to your room on the tenth floor.'
+	'Not seeing your <<$npc_nickname[''A29'']>> or your pile of stuff, you head up to your room.'
 
 	act 'Say goodbye to your family': gt 'intro_uni', 'family_goodbye'
 end
@@ -207,20 +209,24 @@ if $ARGS[0] = 'family_goodbye':
 	!! Say goodbye to your family
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm_room/room.jpg"></center>'
-	'Inside you find your stuff piled on your bed and your <<$npc_nickname[''A29'']>> putting the last of your clothes into the wardrobe. You don''t see Vika, she must have left to give privacy or to avoid meeting them.'
-	'Anya gives a big hug, congratulates you on starting university, and then steps back to give the rest of your family room to do the same. Your brother gives you an awkward hug and whispers to text him what it''s like before stepping back too.'
-	'Vladimir comes over and hugs you too, tells you how proud he is to be your stepfather and to call if you need anything.'
+	'Returing to your room, you find your stuff piled on your bed and your <<$npc_nickname[''A29'']>> putting the last of your clothes into the wardrobe. You don''t see Vika, and assume she left to give you privacy or to avoid meeting your family.'
+	'Anya gives a hug and congratulates you on starting university while your brother gives you an awkward hug and whispers to text him what it''s like.'
+	'Vladimir comes over and hugs you too, telling you how proud he is to be your stepfather and to call if you need anything.'
 	if npc_rel['A29'] >= 60:
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over, tears in her eyes. Wrapping you in a big hug, she tells you how glad she is you decided to attend university and reminds you again to stay away from boys, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and comes over, tears in her eyes. Wrapping you in a tight hug, she tells you how proud she is of you for enrolling in university and again reminds you to stay away from boys before joining the rest of the family by the door.'
 	elseif npc_rel['A29'] <= 30:
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over and gives you an awkward hug, saying she is sorry for fighting with you on your big day, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and gives you an awkward hug, apologising for fighting with you on your big day before joining the rest of the family by the door.'
 	else
-		'Your <<$npc_nickname[''A29'']>> finishes what she is doing and comes over and gives you a hug, telling how happy she is that you enrolled, before joining the rest of the family by the door.'
+		'Your <<$npc_nickname[''A29'']>> finishes what she''s doing and comes over and gives you a hug, telling how happy she is that you enrolled before joining the rest of the family by the door.'
 	end
 	*nl
-	'They all wave and head out, leaving you alone in the room. You spend some time putting the rest of your stuff away or stashing under your bed for later, before deciding to explore.'
+	'They all wave at you before leaving. You spend some time putting the rest of your stuff away or stashing it under your bed before deciding to explore the grounds.'
 
-	act 'Head outside': gt 'intro_uni', 'welcome_intro'
+	if $start_type[1] = 'tg':
+		act 'Head outside': gt 'intro_uni_tg', 'welcome_intro'
+	else
+		act 'Head outside': gt 'intro_uni', 'welcome_intro'
+	end
 end
 
 if $ARGS[0] = 'welcome_intro':
@@ -232,7 +238,7 @@ if $ARGS[0] = 'welcome_intro':
 	gs 'obj_din', 'old'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/6_uni/uni_start.jpg"></center>'
-	'Welcome to Girl Life. Guide <<$pcs_nickname>> through the many challenges of University life. Manage schoolwork, a job, and relationships with the people you meet on your journey.'
+	'Welcome to Girl Life. Guide <<$pcs_nickname>> through the many challenges of life at university. Manage coursework, a job and relationships with the people you meet on your journey.'
 
 	act 'Start the game': gt 'uni_grounds', 'main'
 end

+ 520 - 2
locations/intro_uni_tg.qsrc

@@ -1,13 +1,531 @@
 # intro_uni_tg
 
+!2022/01/09
+!!The TF Story Elements
 gs 'themes', 'indoors'
 killvar '$start_type'
 $start_type = 'uni_tg'
 $start_type[1] = 'tg'
 
-'Not yet available!!'
 
-act 'Return': gt 'begin', 'start'
+if $ARGS[0] = 'roomPRE':
+	menu_off = 1
+	'<center><b><font color="maroon">Apartment</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/1.jpg"></center>'
+	'You wake up to the sound of your alarm clock. You hear Luda, your wife, mumbling next to you, "Don''t want to, it''s too early." She pulls her blanket up and rolls over. You reach over and turn the clock off.'
+	*nl
+	'<i>There are days when I just want to keep on sleeping</i>, you think to yourself. <i>But I can''t, not today.</i>'
+	act 'Go to the bathroom':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/mikhail_2.jpg"></center>'
+		'Quietly, so that you don''t wake up your daughter, you go to the bathroom and take care of your morning routine.'
+		act 'Leave the apartment':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/3.jpg"></center>'
+			'In a parking lot near your house sits your car. You unlock it with the remote key and climb in.'
+			act 'Go to work':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/4.jpg"></center>'
+				'You turn the key and the engine roars to life. As you drive to work the roads are filled with traffic, but it''s the morning rush hour, so it''s no surprise. You drive for what feels like an eternity, give or take an hour, but you eventually reach the office. The music on the radio was pleasant, at least.'
+				act 'Park at the office':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/5.jpg"></center>'
+					'You pull into a parking lot near the building and manage to find a good spot. You greet the security guard on your way in to the building, and then go upstairs to your office. Shortly after you sit down at your desk and boot up your computer, your boss''s secretary comes in and hands you a folder with several travel documents.'
+					*nl
+					'"Am I going on a business trip or something?" you ask her.'
+					*nl
+					'"Yes, the director said it had something to do with a construction project, out in the middle of nowhere, but that''s pretty much all I know," Oksana says.'
+					*nl
+					'After she leaves, you read over the travel documents and fill them out. Time to go to the director.'
+					act 'Go and see your boss':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
+						'You head into the directors'' office, greet him and hand him the papers to sign. The director, Roman Gromov, scans through the text before signing off on it with a broad, sweeping stroke.'
+						*nl
+						'"Ms. Glavbukh is in her office. Go get some travel money while I make a few calls. We''ll discuss your trip when you get back."'
+						act 'Go to the chief accountant':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_marina.jpg"></center>'
+							'Marina is indeed already in her office. After filing your signed travel documents, she grumbles about antiquated systems as she counts out the money.'
+							act 'Return to the director':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
+								'Roman is busy talking on the phone when you re-enter the his office, he gestures for you to sit down on one of the chairs across from him.'
+								*nl
+								'"Yes, I understand... yes. I will send Mikhail over ASAP, he''ll represent me... Yes... Tell your men to work on some other parts of the project in the meantime. Have Igor guard the pit and let no one make any fuss, and make sure nobody gets wind of this and, you know, try to halt the construction... Okay, we''ll keep in touch."'
+								*nl
+								'Roman hangs up and turns to you.'
+								*nl
+								'"Last night, while excavating for the foundations, the workers stumbled upon something; one of the excavators dug into a hollow space of some sort. Luckily Igor was on site and he halted the excavation.'
+								*nl
+								'"It''s not clear what exactly it is, yet. Maybe an abandoned bunker or a cave. But in any case, if there are any more chambers under the foundation, we might not be able to build on the land. So what I want you to do, is to go to the construction site, figure out exactly what the problem is and solve this whole mess as quickly as possible."'
+								act 'Remind him of the correct procedures':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_roman.jpg"></center>'
+									'"Firstly we need to talk to..." you start to say, but are quickly interrupted by your boss.'
+									*nl
+									'"Mikhail, do you realize what''s at stake here? We''re near the end of our credit line, we still have unfinalized agreements on the project''s contract, and we already have guys digging the pit. If there is a too big hole under the foundation, and we can''t build on the site, that could bankrupt the company. So this mysterious structure must be addressed immediately and I have to hold the fort here and keep a lid on things."'
+									act 'Doesn''t look like you have a choice': gt 'intro_uni_tg', 'roadPRE'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'roadPRE':
+	music_loop = 0
+	CLOSE ALL
+	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/4.jpg"></center>'
+	'You leave the office and from your car phone your wife Luda. You explain the situation to her and as soon as you finish the call, you drive off to the construction site.'
+	act 'Drive':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
+		'You''ve been on the highway for hours before you arrive at the town near the site, leaving you feeling tired. But before you can check into a hotel and get some sleep, you need to get an understanding of the magnitude of the problem you''re dealing with. You follow the directions to the site. Igor calls on the way and tells you that you won''t have to go through a security check.'
+		*nl
+		'You arrive and park your car at the site. You see Igor waving at you from a distance and you walk up to him.'
+		act 'Greet Igor':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_igor.jpg"></center>'
+			'Igor greets you. He is obviously concerned about the situation and without delay leads you to the pit''s fenced-off entrance. It rained earlier so the ground is all muddy, you''re going to have to clean your shoes when you get back to the hotel.'
+			*nl
+			'"The ladder''s over there," Igor informs you, while pointing to your left.'
+			*nl
+			'You reach the hole in the ground and peek inside using the small flashlight from your keychain. "There seems to be a floor about 5 meters down."'
+			*nl
+			'"Well, what do you think Mikhail? Shall we go down?" Igor says with a faint glimmer of adventure in his eyes.'
+			act 'Descend':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_1.jpg"></center>'
+				'Igor hands you a powerful flashlight and tells the guard to get the ladder over here. Igor is the first one to go down, once he reaches the bottom, he holds the ladder so you can safely climb down as well.'
+				*nl
+				'The cave smells musty and looks all gloomy, but you can breathe freely and the light from your flashlight illuminates the walls. You shoot a beam of light into the corridor and in the distance see something that resembles a door.'
+				*nl
+				'"Damn. If any historians hear about this, they''ll be all over this construction site." Igor mutters.'
+				*nl
+				'You walk up to the door and see drawings on it. Most of them resemble people, but with other stick figures as well.'
+				act 'Open the door':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_3.jpg"></center>'
+					'You lean against the door, it''s stiff but you manage to push it open.'
+					*nl
+					'"Oh shit...! Take a look over there. Human bones." Igor says nervously.'
+					*nl
+					'You take a look at what Igor is pointing at and see a pile of human bones with a skull on top.'
+					*nl
+					'"A tomb, I suppose." Igor mutters looking apprehensive.'
+					*nl
+					'"Probably", you nod. "We can''t rule anything out just yet."'
+					act 'Go further':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_5.jpg"></center>'
+						'Further into the cave, you reach a room that resembles some kind of archive, filled with dozens of old, dusty scrolls inside of racks built into the walls.'
+						*nl
+						'Igor takes one of the scrolls and carefully unrolls it. "What the hell? Look at this, it must be some kind of ancient language," Igor says. "I''ll take one with me, and see what I can find out about these, maybe I can get it deciphered. So we''ll know what we are dealing with."'
+						*nl
+						'Looking around, you notice another door on the other side of the chamber, you walk over and open it.'
+						act 'Enter the room':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
+							'There''s an altar in the center of the room, on it there are various pots, several gold amulets and even some stone figures. You continue looking around the room curiously, trying to figure out what it''s purpose was.'
+							*nl
+							'Looking closely at the altar, you notice a strange little amulet placed at the very top.'
+							act 'Examine the amulet':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/item_amulet.jpg"></center>'
+								'You pick up the strange amulet and examine it. <i>This is clearly very old</i>, you think to yourself.'
+								*nl
+								'While holding the amulet, you realize that it''s getting warm, almost hot. Suddenly you feel heat coursing through your entire body. You feel a surge of strength inside you. It''s like you just finished a long jog, but without the fatigue.'
+								*nl
+								'Igor enters the room with one of the scrolls in his hands. "Huh. Interesting little room.", he says, glancing over the altar. "Well, we have to make a decision: either we fill the catacombs up to the brink with cement or we let someone into these rooms. Who knows what all this stuff is, maybe it''s worth more than it looks."'
+								act 'Consult you boss':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_cave_altar.jpg"></center>'
+									'"I''ve got to think about it and consult the director before we do anything." You reply and without thinking about it, you put the small amulet into your pocket.'
+									*nl
+									'"Well, one thing''s for sure, you won''t get reception down here. Let''s go outside." Igor tells you.'
+									act 'Go back to the surface':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_working.jpg"></center>'
+										'You walk together with Igor out of the strange chambers and up the ladder, back to the surface.'
+										*nl
+										'"We must have been down there longer than I thought, it''s already late. There will only be security on site now so there''s nothing we can do here until the morning, you should go to the hotel." Igor says.'
+										*nl
+										'With a hasty goodbye to Igor, you make your way back to your car.'
+										'<i>Damn</i>, you think, <i>tomorrow''s going to be a stressful day.</i>'
+										act 'Go to the hotel': gt 'intro_uni_tg', 'otelPRE'
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'otelPRE':
+	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/6.jpg"></center>'
+	'Your trip to the hotel is quite uneventful compared to your tomb raiding adventure.'
+	*nl
+	'You park your car and go to the receptionist to get a room. There are only double rooms available, but it''s going on the company card, so that just means you''ll get a bigger room. You swipe your company card and take your room key.'
+	act 'Head upstairs to your room':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
+		'Lying down on one of the beds, you start to wonder just who built that crypt and what it''s purpose was. Your thoughts drift to that amulet you found. The way that thing you touched half an hour ago is still making you feel wonderful baffles you.'
+		act 'Call the director':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
+			'You dial Romans'' number and after a few rings, he picks up. You report to him the details of what you found at the site with Igor: an ancient tomb, human bones, scrolls in a mysterious language and the altar in that room.'
+			*nl
+			'The director stays silent while you give your report. A few moments later, he decides that it would be best to stop the construction. He tells you to stay and keep watch over the site until further notice.'
+			*nl
+			'You put the phone away. <i>Looks like this trip is going to last longer than expected</i>, you think to yourself.'
+			act 'Go to bed':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
+				'It doesn''t take you long to drift off to sleep'
+				*nl
+				'Images begin to form in your mind and you soon find yourself in a middle of a dream. The amulet stands before you and out of it comes a ghost of some sort. Before you even realize what you are doing, you find yourself staring deep into the ghost''s eyes which then turn into two planet earths.'
+				*nl
+				'"Looking at the world most just see the mundane, but there is more to it, much more and now you see that too. You have the potential to shape it all, but first, you have company."'
+				*nl
+				'Suddenly your senses return and you are aware of the hotel room around you, you can tell you are not alone.'
+				act 'Open your eyes':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_reinhold.jpg"></center>'
+					'As you open your eyes, you see a man standing in your room. He is wearing a long black coat and his face looks weary; he is unshaven and reminds you of most police detectives in Hollywood films.'
+					*nl
+					'"Where is the amulet?" he approaches you.'
+					act 'Ask who he is':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_reinhold.jpg"></center>'
+						'"Who are you?" you ask puzzledly. The man''s sudden appearance and a sense you never knew you had tell you something about him, that he is not of the world you know.'
+						*nl
+						'"Listen, don''t cause any problems now. Give me the amulet, close the construction site, and all will be fine. After all that place belongs to us," he says in a firm voice.'
+						*nl
+						'<i>Belongs to us?</i> His response leaves you bewildered, wondering who he is and what this is all about.'
+						*nl
+						'"Well, how about I give you a small taste of my power." the man says, and out of nowhere comes a burning desire to give him the amulet.'
+						act 'Give him the amulet':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/7.jpg"></center>'
+							'You get out of the bed and give him the stone figure you had put in your pocket earlier. The man takes it, steps back, and without warning, something in his eyes begins to spin like a whirlwind, causing your own eyes to blur as if he was hypnotizing you. A few seconds later your vision clears with the man having somehow disappeared into thin air.'
+							*nl
+							'You rub your eyes, "What the hell is going on here? Was that a dream?. No, it can''t be. I wouldn''t walk around in a dream. I think." You say to no one in particular then check your pocket, the amulet is indeed gone. You sit down on the bed trying to make sense of what just happened.'
+							*nl
+							'While lost in thought, you hear a knock on the door. You get up to open the door, not even thinking why you would have visitors this late at night.'
+							'"...Who''s there?", you ask, still confused.'
+							*nl
+							'A woman''s voice responds that she''s the hotel receptionist and that she needs to talk to you on an urgent matter.'
+							act 'Answer the door':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+								'You open the door, but don''t recall the woman in front of you being at the reception desk; the woman from earlier didn''t have red hair and glasses. After entering the room she quickly examines the place, before locking her eyes on you.'
+								*nl
+								'"Mikhail, right?" You nod.'
+								*nl
+								'"Last night you went to a certain place and took out something very valuable and powerful." the woman speaks to you.'
+								act 'Another one?':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+									'<i>Again?</i>'
+									*nl
+									'You sigh, irritated that not only have you been disturbed in the middle of the night, but these idiots apparently cannot even agree among themselves which one of them should disturb you.'
+									*nl
+									'"Listen, you''re starting to bother me. That other guy already showed up asking for the damn amulet."'
+									*nl
+									'She looks at you with surprise. "What? Someone already came here? Who was it?"'
+									act 'Tell her':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+										'"It was some man in a navy cloak with ginger hair and a light beard, he didn''t tell me his name. He already took the amulet." You answer.'
+										*nl
+										'The girl''s face drops. "Damn it!" She looks into your eyes. "Okay... Mikhail, we have to go somewhere else, there are too many people that might get hurt here. Gustav, come here!" The girl calls out to the corridor.'
+										*nl
+										'A tall man enters the room'
+										StoryLine = 0
+										MagikDostup = 0
+										$pcs_firstname = 'Mikhail'
+										$pcs_lastname = 'Ivanov'
+										age = 33
+										vidage = 33
+										year = 2016
+										month = 5
+										week = 1
+										hour = 7
+										day = 25
+										!!body
+										pcs_hgt = 186
+										dick = 0
+										pcs_energy = 60
+										pcs_hydra = 60
+										pcs_sleep = 70
+										!!stats
+										pcs_stren = 160
+										pcs_agil = 50
+										pcs_vital = 160
+										pcs_intel = 50
+										pcs_sprt = 100
+										pcs_react = 50
+										pcs_kick = 20
+										pcs_punch = 20
+										pcs_jab = 20
+										pcs_health = pcs_vital * 10
+										pcs_willpwr = pcs_intel * 5 + pcs_sprt * 5
+										pcs_mana = (pcs_intel * pcs_magik) + pcs_vital * 5
+										birthday = 1
+										birthmonth = 4
+										birthyear = 1983
+										pcs_dob = 19830401
+										act 'Prepare to fight':
+											*clr & cla
+											'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_gustav.jpg"></center>'
+											'The man has a large tattoo across the left side of his face. He too has red hair'
+											$boy = 'Gustav'
+											gs 'fight','initFight',1
+
+											gs 'fight_npcdata', 'gustav'
+											fightEnding = 1
+
+											act 'Fight': gt 'fight', 'start'
+										end
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'tatianaPRE':
+	$pcs_firstname = '<<$temp_firstname>>'
+	$pcs_lastname = '<<$temp_lastname>>'
+	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+	'You wake up in an unfamiliar room. Standing near you is the same red-haired girl that entered your hotel room.'
+	*nl
+	'"Ah, you''re awake," she chirps. "I told this jerk he should have been more careful, but he never listens. As a result I had to use some magic to stabilize you, he almost knocked you out permanently."'
+	*nl
+	'"While you were unconscious I did some research on you. Turns out the Amulet of Power passed to you. Must have happened when you touched it. Unfortunately, Reinhold, the guy in your room, has probably realized by now that the amulet no longer has the power and now he''s out to hunt you down."'
+	act 'What''s going on?':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+		'"What the hell is going on?" you respond. You try to move your hands, but you''re tied to the bed.'
+		*nl
+		'"Um, okay, I''ll start from the beginning," the girl says. "Magic exists and is real. Ages ago the world was not the same, the fae creatures who possess natural magic lived in balance but the succubus were free to breed with whom ever they wished."'
+		*nl
+		'"They breed with humans with that human magicians were born. The Sidhe as the most powerful of the fae feared the increasing numbers of human magicians and cast a very powerful spell to bind the succubus to them, this prevented either from being able to reproduce without the other."'
+		*nl
+		'"All magicians have some of that original fae blood in there bodies and it is through that that they are able to connect with the world of magic."'
+		*nl
+		'The redhead adjusts her glasses. "Most of the world simply ignore magic or are protected from it by magic''s natural desire to remain hidden."'
+		*nl
+		'"But last night there was a powerful burst of magical energy, strong enough to be clearly seen by any with magical connections. Can you guess where this surge came from? Yeah, that cave you found. Apparently the surge occurred when you opened the seal to the archive. Anyway, that was when we started to search, that source of power is desired by many, but it is extremely dangerous and in the wrong hands could do untold horrors."'
+		*nl
+		'She stops for a few seconds for you process that information. It seems really far fetched.'
+		*nl
+		'"As you can figure out, Reinhold wanted to prevent the amulet being misused, but he wasn''t very thorough and didn''t check you over."'
+		act 'So, the whole world is just an illusion?':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+			'"So magic exists and is used by all these people and creatures, but the rest of us just don''t see it, or convince ourselves it didn''t happen?"'
+			*nl
+			'The girl nods. "Yes. You''re a quick study. Machines, apartments, television and the Internet, all this really does exist and is in the form in which people see it. But if I say, hurl a fireball, then people might see that I threw a grenade or shot from a flamethrower. The human mind can''t process magic, so it blocks it as a way to protect the person from going crazy."'
+			*nl
+			'"Hence such things as little green men, UFOs, poltergeists, spontaneous combustion, are when people encounter a difficult to hide phenomenon and the conclusion is flawed. In some cases, if someone''s mind can not cope with the spell they witness, they can be driven crazy and then no one believes them."'
+			act 'And who are you?':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+				'Trying to come to terms with your new reality, you ask "And who are you?"'
+				*nl
+				'The girl smiled. "Me? I''m Tatiana, a young mage with an keen interest in magical phenomenon. I specialize in the treatment of mutations, and magic relating to the body. I have little combat skill, so I rely on the services of Gustav to provide some muscle. He''s a Mutant, his mutation is due to magical exposure and it gives him unmatched physical strength and he is a great tracker."'
+				*nl
+				'"The two of us run a detective agency for cover and money, but our real objective is studying magic and its effects."'
+				act 'What do you want from me?':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+					'"What do you want from me?"'
+					*nl
+					'"Hmm, well... the amulet obviously," Tatiana replies. "When I looked for you, I was hoping to get that object of power to study but Reinhold got to you first. The amulet will now be pretty much useless anyway, as its power passed on to you."'
+					*nl
+					'"This isn''t good for you, though. You may think since you have the amulets'' power that you can do anything. But in reality, you''re helpless without the skill to use it. Reinhold easily overpowered your will and forced you to obey, and Gustav beat you like a puppy."'
+					act 'What is this amulet? Where did it come from?':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+						'"And what is this amulet? Where did it come from?" you ask.'
+						'Tatiana thinks about it for a few moments. "It was made by the trickster Rikudo, one of the most powerful ancient magicians. Before he died, he taunted the only living mage who could control its immense power by cursing him to be stuck in a female form and making it only activate for a male mage."'
+						*nl
+						'"Great. So I''ve been thrown into this mess by the dead owner of that ancient tomb." Still trying to absorb all this information, something occurs to you. "Hang on, I''m not a mage, how could the power be transferred to me?"'
+						*nl
+						'"It seems that its long time underground has caused it to malfunction and its power has entered your body. The bad news is it is far too powerful and will kill you." At this you are filled with fear and start to struggle against your bindings.'
+						*nl
+						'"You are lucky Reinhold didn''t realize this, he would have stopped you from accidentally wielding the power and killing yourself and who knows how many others by killing you in that hotel room. I have another way to save you, but you''re not going to like it."'
+						*nl
+						'You don''t say anything, so she continues, "I can feel the aura of power emanating from you, by drawing from that I can perform a powerful magic spell that will transform you into someone who is protected from the masculine alignment of the power."'
+						act 'Uh, I do not understand, what are you suggesting?':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+							'"Uh, I do not understand, what are you suggesting?" you ask her.'
+							*nl
+							'Tatiana runs a hand through her hair and giggles. "I''ll turn you into a young girl and the power will lie dormant, saving you from blowing up a city or something."'
+							*nl
+							'Your eyes widen in shock.'
+							*nl
+							'"Well, there is another way, I can just stop your heart and let your power dissolve into nature, but you will die. I''m not Reinhold, I can take this risk and I don''t want to kill you. Maybe with more time and research I can work out another solution, but I cannot leave you like this."'
+							act 'What about your family?':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+								'"Hey, I don''t want to be a woman. I have a family; a wife and a daughter," you tell her, afraid.'
+								*nl
+								'Tatiana smiles. "Well the choice is simple, either you die or live without a penis for the time being."'
+								*nl
+								'"As for your family, not to worry. I''ll arrange everything. We will fabricate your death to get Reinhold off your back. To make your transition easier I''ll cover your memory of the family, they will only be ghostly memories, you won''t even remember where you lived. Don''t worry, I won''t erase your entire memory and leave you a useless vegetable."'
+								act 'There must be another way!':
+									$loc = 'intro_uni_tg'
+									$loc_arg = 'custom'
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+									'Panicking, you yell out "There must be another way!" You tug at the restraints on the bed.'
+									*nl
+									'Tatiana''s face turns serious. "Do not argue. It''s the only way available to me. You''ll need to use a new name, so think it over in your dreams and tell me when you wake up, otherwise I''ll give you a pretty name. Now go to sleep." She puts her hand on your chest and your vision immediately fades. You dream about a girl you never knew and what she did at school...'
+									act 'Dream': gt 'intro_city_select', 'start'
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'custom':
+	$loc = 'intro_uni_tg'
+	$loc_arg = 'custom'
+!!	This is to bypass the next part if the avatar system was used
+!!	It will be changed to bypass the head options, once more body options are added
+
+!!	Just hair and eye color here for now; the dialog will be updated as more options are added
+	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'
+	'As you drift in unconsciousness, an impression of a woman forms in your mind. Many aspects of her appearance are indistinct, but there are some things you can make out.'
+	'She is fairly tall.'
+	*nl
+	'<center>Customize your:</center>'
+	'<center><a href="exec:gs ''intro_customization'', ''hair''"><img src="images/system/1_openings/shared/icon_hair.png"></a> <a href="exec:gs ''intro_customization'', ''eyes''"><img src="images/system/1_openings/shared/icon_eye.png"></a></center>'
+	*nl
+	'Everything else about her is fuzzy...'
+
+	act 'Done': gt 'intro_uni_tg', 'sleepPRE'
+end
+
+if $ARGS[0] = 'sleepPRE':
+	killobj
+	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
+	'"You''re awake?." Tatiana says looking into your eyes.'
+	act 'Look at yourself':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/8.jpg"></center>'
+		'"Fuck," you say and immediately shut your mouth again. Your voice... it''s so feminine. Tatiana giggles.'
+
+		!!Default Names
+		$pcs_firstname = 'Svetlana'
+		$pcs_lastname = 'Lebedev'
+		$pcs_nickname = 'Sveta'
+
+		!!Player names are set here
+		if $temp_firstname = '':
+			$temp_firstname = 'Svetlana'
+		else
+			$temp_firstname = '<<$pcs_firstname>>'
+		end
+		$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
+		if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
+		killvar '$temp_firstname'
+
+		
+		if $temp_lastname = '':
+			$temp_lastname = 'Lebedev'
+		else
+			$temp_lastname = '<<$pcs_lastname>>'
+		end
+		$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
+		if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
+		killvar '$temp_lastname'
+
+		if $temp_nickname = '':
+			$temp_nickname = 'Sveta'
+		else
+			$temp_nickname = '<<$pcs_nickname>>'
+		end
+		$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
+		if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
+		killvar '$temp_nickname'
+
+		'"This is the first time I changed the gender of a person, therefore I just HAD to see your reaction. Totally worth it. But you turned out exactly like her."'
+		'Puzzled, you ask "Like who?"'
+		'"<<$pcs_firstname>> <<$pcs_lastname>> of course. It''s the dead girl I swapped you with. I found her in the morgue, erased evidence of her death,  made her look like you, and you like her. You needed an alibi, and I needed to throw Reinhold off your trail. Today, Mikhail crashed his car into the pit and died, it''s on the news." With these words, Tatiana picked up the remote and turned on the TV.'
+		
+		act 'Watch TV':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/9.jpg"></center>'
+			'On TV there is a news report about a businessman, who drove his car into a hole at a construction site. The man died later in hospital without regaining consciousness.'
+			'You look at Tatiana, with a bewildered look. She has an enigmatic smile, "Well, I''m still a magician and that''s something that I can do. Reinhold has definitely lost the trail. The body that ''died'' behind the wheel of the BMW was a perfect copy of your old self, from your absorbed amulet energy down to the placement of every single hair."'
+			'"Anyways, here are her legal documents, including her passport. Starting today, you are <<$pcs_nickname>> <<$pcs_lastname>>, an 18 year old girl who lives in the city. Nobody knows you since she just moved here from Pavlovsk, but here is her journal in case you do run into someone she knew. You should study it, she was pretty detailed about the people in her life, including her family. Here are the keys to her dorm, she is enrolled at the University, her first year. You don''t have to attend if you don''t want to, it''s your life now."'
+			'"Some things to consider before you go. You are a girl now. That means you will get periods, and you can certainly get pregnant if you have unprotected sex."'
+			'"Just because you made me into a young girl doesn''t mean I''m not still 33 years old," you say, annoyed at her.'
+			'"Be careful, life as a girl is much harder than as a man. Protecting yourself means less about fighting and more about staying out of situations where guys can force you into things you won''t want to do."'
+			*nl
+			'"Now get up, you''ve got to go to your new home and start your new life."'
+			*nl
+			'Gustav, the redhead with a tattoo on his face enters the room. He looks at you and says, "I''ll take you."'
+
+			act 'Go with Gustav':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_gustav.jpg"></center>'
+				'Gustav silently takes you to the garage and you enter the black jeep. Gustav gets behind the wheel and drives you into the city. You silently speculate about what to do now.'
+				'After a few minutes, while keeping his eyes on the road, Gustav speaks. "I''m sorry I beat you up. I have trouble controlling myself during a fight. You had a large build and for a second I thought you might be dangerous for me, so I ended up hitting you with my full force."'
+				'You look at him. "Forget it. Listen Gustav... what do I do now?"'
+				'Gustav nods and says, "Well, I would advise you to start by buying food, laundry detergents and dishes should be covered by the university. Maybe get a job. Don''t forget to monitor your health, keep your mood up and have a clear mind."'
+				'"Right now your mind is very weak, if you don''t take care of yourself you will go crazy. You need to eat well, sleep regularly, have fun, do not generally become depressive or else you end up in a madhouse. Don''t go looking for Tatiana, you will not find her anyway, and secondly, if we need to contact you, we will find you."'
+				'You arrive at an old apartment block in the town of Pavlovsk. Gustav stops the car and points a finger at the entrance. Your parents are on the third floor, the number is on your key Tatiana gave you. Tomorrow they are going to take you to your university dorm. Act natural and get some sleep, the changes to your body took a lot of energy out of you. Remember don''t just give up, not everyone gets an entirely new chance at life. Tatiana and me will keep an eye out for you."'
+				
+				act 'Go to the apartment':
+					$loc = 'intro_uni'
+					$loc_arg = 'custom'
+					'<center><img <<$set_imgh>> src="images/locations/city/island/university/uni_day.jpg"></center>'
+					'You are exhausted and trying to take in all the strange things you''ve learnt and barely speak to anyone at home. You remember your Mom sitting you down and making you eat something before you get an early night''s sleep.'
+					'The next morning you find you already have your bags packed, you get ready and throw some wash things in your bag. Your sister then takes some back out saying they are hers and puts some other things in there. Your family all head down stairs with you and pile into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to St. Petersburg.'
+					'As you approach the city, you read through the journal you have inherited and learn about the school days and kids. You find out what type of kid ''you'' were...'
+
+					act 'Continue': gt 'intro_city_select', 'start'
+				end
+			end
+		end
+	end
+end
+
+
+if $ARGS[0] = 'welcome_intro':
+	gs 'intro_initialization_city'
+	!! Welcome to Girl Life speech
+	MagikDostup = 1
+	showstat 1
+	showobjs 1
+	gs 'obj_din', 'old'
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/start_tf.jpg"></center>'
+	'Welcome to the Transformation start! Although you have lost your masculinity and your old life, new possibilities are opening up before your eyes, aided by your newfound knowledge of the magical nature of the world!'
+	gs 'stat'
+	act 'Begin': gt 'uni_grounds', 'main'
+end
 
 --- intro_uni_tg ---------------------------------
 

+ 4 - 0
locations/journal.qsrc

@@ -448,6 +448,10 @@ if $ARGS[0] = 'school':
 		'You are only getting top marks in a few of your classes but only a few of your grades are bad and you are not failing any classes. You should probably have no trouble getting into university if you want, but improving the bad grades would not be a bad idea.'
 	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_70'] > 10: 
 		'You are only getting top marks in a few of your classes but only a few of your grades are bad and you are failing some classes. If you want to get into university you should probably try to improve the failing and bad grades.'
+	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] = 13: 
+		'You''re only getting top marks in some of your classes and a lot of bad grades, but you''re not failing any classes. You need to improve your bad grades if you want to get into university.'
+	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] > 10: 
+		'You''re getting top marks in a few of your classes, but are failing some of the others. You should improve your grades if you want to get into university.'
 	elseif class['school_grades_above_90'] > 0 and class['school_grades_above_40'] > 6: 
 		'You are getting top marks in a few of your classes but failing a lot of classes. If you want to get into university you need to do something about your failing and bad grades.'
 	elseif class['school_grades_above_90'] > 0: 

+ 4 - 6
locations/journal_quests.qsrc

@@ -393,15 +393,13 @@ if $ARGS[0] = 'start':
 						'Marcus has agreed to be Katja''s first, so I should talk with Katja at her room to set it up.'
 					end
 				end
-				
-			if katjaQW['school_kiss'] > 1 and (katjaQW['ivan_pussy'] + katjaQW['ivan_anal']) = 0:
-					'Ivan seems interested in Katja and I. Maybe I can get them to have a threesome? Kissing Katja at school should get his attention, or maybe we will run into him at the beach.' +iif(katjaQW['slut'] < 60, ' Katja needs to lose some more inhibition before she will agree.', '')+ +iif(IvanShowerQW ! 11, ' I need to have sex with Ivan first (See his quest on how to do this).', '')
-				end
 
-				if katjaQW['birth_control_start_day'] = 0 and katjaQW['QWstage'] >= 5:
+				if katjaQW['birth_control_start_day'] = 0 and katjaQW['QWstage'] >= 6:
 					'I should get Katja on birth control, then I could take her on some wilder sex adventures once she''s ready.'
-				elseif katjaQW['QWstage'] < 6 and katjaQW['anal_ques'] < 3 and katjaQW['slut'] <= 100:
+				elseif katjaQW['QWstage'] < 6 or katjaQW['anal_quest'] < 3 or katjaQW['slut'] <= 100:
 					'I should continue to corrupt Katja. There might be more things I can push her to do.'
+				elseif katjaQW['QWstage'] = 6:
+					'Katja wants to talk to me about something at her home. She needs to be somewhat horny to ask me'
 				elseif katjaQW['park_sex'] = 0:
 					'I should take Katja to the park to get her to to hook up with random guys.'
 				elseif katjaQW['park_sex'] = 1:

+ 2 - 2
locations/katjaEvDin.qsrc

@@ -451,7 +451,7 @@ if $ARGS[0] = 'sex':
 	end
 
 	!!This is for a scene of using a dildo on Katja. But such a scene is not yet written.
-	!!if (katjaQW['slut'] >= 20) and katjaQW['horny'] >= 30 and dildo > 0:
+	!!if (katjaQW['slut'] >= 30) and katjaQW['horny'] >= 30 and dildo > 0:
 	!!	act 'Grab a dildo': gt 'KatjaEvDin', 'dildo'
 	!!end
 
@@ -762,7 +762,7 @@ if $ARGS[0] = 'moron':
 		'Ivan shrugged, looking a little embarrassed. But it was obvious, he was pleased.'
 		act 'Thank Ivan':
 			*clr & cla
-			if npc_sex['A3'] = 1 and $loc ! 'pav_disco':
+			if npc_sex['A3'] > 0 and npc_sex['A14'] > 0 and $loc ! 'pav_disco' and katjaQW['slut'] >= 40 and katjaQW['Horny'] >= 40:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/whisper.jpg"></center>'
 				'Approaching Ivan, you raised up on tiptoe, and, clasping her arms round his neck, and kissed, and then whispered. "Like kissing girls?" Ivan only replied with a dumbfounded nodded, "Well, then we can show you our appreciation, right Katja?"'
 				'Katja, nods only half paying attention. Then it hit her what you said, she looked at Ivan, at you and her eyes lit up with lustful fire, "Right."'

+ 1 - 1
locations/katja_lake.qsrc

@@ -894,7 +894,7 @@ if $ARGS[0] = 'ivan_interaction':
 		act 'Walk':gt 'katja_lake','walk'
 		act 'Redress and look for something else to do':gs 'clothing', 'wear_last_worn' & gs 'underwear', 'wear' & minut += 10 & gt 'katjaEv','kathan'
 
-		if IvanShowerQW = 11 and fame['pav_slut'] <250 and katjaQW['horny'] >60 and katjaQW['anal_quest'] = 2 and npc_sex['A14'] > 0:
+		if IvanShowerQW = 11 and fame['pav_slut'] <250 and katjaQW['horny'] >60 and katjaQW['anal_quest'] >= 2 and npc_sex['A14'] > 0:
 			act '"Hey Ivan! You know, we are REALLY bored!"':
 				*clr & cla
 				gs 'boyStat', 'A3'

+ 24 - 22
locations/katja_sex.qsrc

@@ -152,7 +152,7 @@ if $ARGS[0] = 'park':
 	end
 end
 
-!!Sex with Ivan After School (should soon be redone to an anal only scene
+!!Sex with Ivan After School
 if $ARGS[0] = 'prohorov_sex':
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tease.jpg"></center>'
@@ -164,7 +164,7 @@ if $ARGS[0] = 'prohorov_sex':
 		'You pull Katja close and you begin to kiss each other, your tongues exploring each other''s mouths as your hands roam over each other''s bodies. You completely ignore Ivan.'
 		gs 'arousal', 'kiss', 1, 'lesbian'
 		gs 'stat'
-		if katjaQW['Horny'] >= 50:
+		if katjaQW['Horny'] >= 50 and katjaQW['slut'] >= 50:
 			act 'Kissing and more':
 				cls
 				katjaQW['Horny'] += 5
@@ -175,7 +175,7 @@ if $ARGS[0] = 'prohorov_sex':
 				gs 'arousal', 'foreplay_give', 2, 'lesbian'
 				minut -= 2
 				gs 'stat'
-				if katjaQW['Horny'] >= 60 and npc_sex['A14'] > 0:
+				if katjaQW['Horny'] >= 60 and katjaQW['slut'] >= 60:
 					act 'It''s getting hot':
 						katjaQW['Horny'] += 5
 						cla & *clr
@@ -191,7 +191,7 @@ if $ARGS[0] = 'prohorov_sex':
 								'You pull her face up to yours and the two of you start kissing again. While your hands caress each other''s breasts, Katja hooks one of her legs around yours and you become intertwined. You''re so distracted that you don''t even notice the heavy breathing coming from Ivan as he continues to watch.'
 								gs 'arousal', 'kiss', 1, 'lesbian'
 								gs 'stat'
-								if katjaQW['Horny'] >= 80 and katjaQW['QWstage'] = 6 and katjaQW['anal_quest'] = 2:
+								if katjaQW['Horny'] >= 80:
 									act 'Lift skirt':
 										cla
 										*clr
@@ -202,7 +202,7 @@ if $ARGS[0] = 'prohorov_sex':
 										gs 'stat'
 										
 										gs 'willpower', 'sex', 'resist', 'hard'
-										if will_cost <= pcs_willpwr:
+										if katjaQW['anal_quest'] < 2 or will_cost <= pcs_willpwr:
 											act 'Tell Ivan to just watch (<<will_cost>> Willpower)':
 												cla & *clr
 												gs 'willpower', 'pay', 'self'
@@ -219,24 +219,26 @@ if $ARGS[0] = 'prohorov_sex':
 											act 'Tell Ivan to just watch (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 										end	
 										
-										act 'Encourage Ivan':
-											cls
-											ivan_afterschool = 1
-											gs 'stat'
-											'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/letshavefun.jpg"></center>'
-											'Feeling Ivan''s finger rubbing your asshole, you reach back and put your hand on his ass, giving it a squeeze before pulling him up against you. You turn your head and begin to kiss him.'
-											'Katja quickly joins you and soon all three of you are kissing and fondling each other. At your encouragement, Ivan slips his finger into your ass, eliciting a moan of pleasure from you.'
-											'A few seconds later, the bell rings and you all break apart. "Meet me after school so we can continue this?" Ivan pleads as you and Katja get dressed.'
-											'You look at Ivan for a second and bite your lower lip in consideration. Turning to look at Katja, you find her looking at you and enthusiastically nodding. You can''t help but grin at her eagerness and nod as well.'
-											'Katja walks up to Ivan. "Meet us here after school and we''ll rock your world..." she says in a seductive tone and you watch as the biggest grin appears on his face. You turn to Katja and you both laugh as you all rush to class.'
+										if katjaQW['anal_quest'] > 1:
+											act 'Encourage Ivan':
+												cls
+												ivan_afterschool = 1
+												gs 'stat'
+												'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/letshavefun.jpg"></center>'
+												'Feeling Ivan''s finger rubbing your asshole, you reach back and put your hand on his ass, giving it a squeeze before pulling him up against you. You turn your head and begin to kiss him.'
+												'Katja quickly joins you and soon all three of you are kissing and fondling each other. At your encouragement, Ivan slips his finger into your ass, eliciting a moan of pleasure from you.'
+												'A few seconds later, the bell rings and you all break apart. "Meet me after school so we can continue this?" Ivan pleads as you and Katja get dressed.'
+												'You look at Ivan for a second and bite your lower lip in consideration. Turning to look at Katja, you find her looking at you and enthusiastically nodding. You can''t help but grin at her eagerness and nod as well.'
+												'"Meet us in the English classroom after school" you tel Ivan.'+iif(katjaQW['anal_quest']  >= 3 and katjaQW['slut']  >= 100,  ' Katja walks up to Ivan. "Meet us here after school and we''ll rock your world..." she says in a seductive tone and you watch as the biggest grin appears on his face. You turn to Katja and you both laugh as you all rush to class.', ' You noticed that Katja''s face is getting completely red before you all rush to class.')
 											
-											gs 'arousal', 'anal_finger', 3
-											gs 'arousal', 'kiss', 3, 'lesbian'
-											gs 'arousal', 'kiss', 3
-											minut -= 3
-											gs 'arousal', 'end'
-											gs 'stat'
-											act 'Continue': gt 'gschool_lessons', 'short_break'
+												gs 'arousal', 'anal_finger', 3
+												gs 'arousal', 'kiss', 3, 'lesbian'
+												gs 'arousal', 'kiss', 3
+												minut -= 3
+												gs 'arousal', 'end'
+												gs 'stat'
+												act 'Continue': gt 'gschool_lessons', 'short_break'
+											end
 										end
 									end
 								else

+ 1 - 1
locations/kuhrPar.qsrc

@@ -84,7 +84,7 @@ if (hour = 6 and minut >= 45) or (hour = 7 and minut < 15) and breakfast_day ! d
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/breakfasthome.jpg"></center>'
 			'As you sit down and join your family for breakfast, your stepfather enages you in conversation. "How are you doing in school <<$pcs_nickname>>?"'
-			if kanikuli = 0 and StoryLine > 0 and SchoolAtestat = 0 and SchoolBlock = 0:
+			if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 				if class['school_grade_average'] >= 80:
 					'You smile at him. "Really great. We were just learning something interesting the other day." You go on to talk about some of the stuff you have learned recently in school. He just nods, while your mother gives you a proud smile and Kolka rolls his eyes.'
 					'The rest of breakfast is taken up with some small talk about what everyone has been up to of late. You thoroughly enjoy your breakfast with your family.'

Diff do ficheiro suprimidas por serem muito extensas
+ 263 - 366
locations/lesbidomhouse.qsrc


Diff do ficheiro suprimidas por serem muito extensas
+ 203 - 251
locations/lesbisubhouse.qsrc


+ 83 - 7
locations/metro_events.qsrc

@@ -1,5 +1,5 @@
 # metro_events
-!2021/05/02
+!2022/02/16
 
 if $ARGS[0] = 'frot':
 	menu_off = 1
@@ -43,6 +43,7 @@ if $ARGS[0] = 'a':
 			act 'Move away (<<will_cost>> Willpower)':
 				*clr & cla
 				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
 				gs 'stat'
 				gt 'metro_events', 'fin'
 			end
@@ -60,6 +61,7 @@ if $ARGS[0] = 'a':
 				act 'Move away (<<will_cost>> Willpower)':
 					*clr & cla
 					gs 'willpower', 'pay', 'resist'
+					gs 'arousal', 'end'
 					gs 'stat'
 					gt 'metro_events', 'fin'
 				end
@@ -112,6 +114,7 @@ if $ARGS[0] = 'b':
 			act 'Move away (<<will_cost>> Willpower)':
 				*clr & cla
 				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
 				gs 'stat'
 				gt 'metro_events', 'fin'
 			end
@@ -130,6 +133,7 @@ if $ARGS[0] = 'b':
 					*clr & cla
 					gs 'willpower', 'sex', 'resist', 'medium'
 					gs 'willpower', 'pay', 'resist'
+					gs 'arousal', 'end'
 					gs 'stat'
 					gt 'metro_events', 'fin'
 				end
@@ -142,6 +146,7 @@ if $ARGS[0] = 'b':
 					*clr & cla
 					gs 'willpower', 'hj', 'resist', 'medium'
 					gs 'willpower', 'pay', 'resist'
+					gs 'arousal', 'end'
 					frot += 1
 					gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
 					gs 'stat'
@@ -167,6 +172,7 @@ if $ARGS[0] = 'b':
 					act 'Pull hand away (<<will_cost>> Willpower)':
 						*clr & cla
 						gs 'willpower', 'pay', 'resist'
+						gs 'arousal', 'end'
 						gs 'stat'
 						frot += 1
 						gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
@@ -191,6 +197,7 @@ if $ARGS[0] = 'b':
 						act 'Move away (<<will_cost>> Willpower)':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
+							gs 'arousal', 'end'
 							gs 'stat'
 							gt 'metro_events', 'fin'
 						end
@@ -253,6 +260,7 @@ if $ARGS[0] = 'c':
 			act 'Move away (<<will_cost>> Willpower)':
 				*clr & cla
 				gs 'willpower', 'pay', 'resist'
+				gs 'arousal', 'end'
 				gs 'stat'
 				gt 'metro_events', 'fin'
 			end
@@ -271,6 +279,7 @@ if $ARGS[0] = 'c':
 				act 'Move away (<<will_cost>> Willpower)':
 					*clr & cla
 					gs 'willpower', 'pay', 'resist'
+					gs 'arousal', 'end'
 					gs 'stat'
 					gt 'metro_events', 'fin'
 				end
@@ -290,6 +299,7 @@ if $ARGS[0] = 'c':
 						*clr & cla
 						gs 'willpower', 'bj', 'resist', 'medium'
 						gs 'willpower', 'pay', 'resist'
+						gs 'arousal', 'end'
 						gs 'stat'
 						gt 'metro_events', 'fin'
 					end
@@ -302,6 +312,7 @@ if $ARGS[0] = 'c':
 						*clr & cla
 						gs 'willpower', 'bj', 'resist', 'medium'
 						gs 'willpower', 'pay', 'resist'
+						gs 'arousal', 'end'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
 						'He stands firm, and once again tries to push you down, but you won''t budge. As he can''t convince you, he relaxes instead, letting you go on as you keep jerking him off. When he moans into your ear, you start stroking it more vigorously, a couple of minutes later, you feel spurts of hot cum splashing against your ass cheek. Once he is finished he pulls your panties back up over your sperm covered ass then pats you on the butt, before moving away, and disappearing in the crowd.'
@@ -323,6 +334,7 @@ if $ARGS[0] = 'c':
 						act 'Resist and keep jerking him off (<<will_cost>> Willpower)':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
+							gs 'arousal', 'end'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
 							'He stands firm, and once again tries to push you down, but you won''t budge. As he can''t convince you, he relaxes instead, letting you go on as you keep jerking him off. When he moans into your ear, you start stroking it more vigorously, a couple of minutes later, you feel spurts of hot cum splashing against your ass cheek. Once he is finished he pulls your panties back up over your sperm covered ass then pats you on the butt, before moving away, and disappearing in the crowd.'
@@ -342,6 +354,7 @@ if $ARGS[0] = 'c':
 							act 'Move away (<<will_cost>> Willpower)':
 								*clr & cla
 								gs 'willpower', 'pay', 'resist'
+								gs 'arousal', 'end'
 								gs 'stat'
 								gt 'metro_events', 'fin'
 							end
@@ -389,7 +402,7 @@ end
 
 if $ARGS[0] = 'station':
 	*clr & cla
-	metrorand = rand(1,19)
+	metrorand = rand(1,22)
 	if metrorand = 1:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/aflash1.jpg"></center>'
 		'After your ride on the metro, you leave the station, following several people up the stairs, towards the street. The backside of a women''s skirt keeps lifting up; from the draft of air. Each time it lifts up, it shows off her firm tightly ass, which draws the attention of several men and even a few of the women.'
@@ -556,8 +569,13 @@ if $ARGS[0] = 'station':
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Ignore Her':minut += 5 & gt $loc, $loc_arg
-		!!act 'Help Her':
-			!!'text'
+		act 'Help Her and pay for taxi':
+			money -= 50
+			pcs_mood += 10
+			minut += 10
+			'You notice a newspaper on one of the benches, you walk over and grab it then come back to her offering it to her. Now that you are closer you can see she is crying, she nods though and takes the newspaper and covers up as best she can. You then lead her out of the metro and call her a taxi, as you wait for the taxi you find out she made her boyfriend mad who stripped her and left her naked. Telling her she would have nothing with out him and to see how she likes it. Once the taxi arrives she thanks you for paying for it the taxi.'
+			act 'Leave': minut += 5 & gt $loc, $loc_arg
+		end
 	elseif metrorand = 10:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/nakedm1.jpg"></center>'
 		'As you head through the metro station, you see a naked man, the only thing he is wearing is a huge grin. He seems rather proud at the attention he is getting, though you have no idea why. After a quick check you notice he packs nothing special in the manhood department. He continues on his way, just as you do.'
@@ -599,7 +617,6 @@ if $ARGS[0] = 'station':
 			gs 'stat'
 		end
 		act 'Record them':
-			*clr & cla
 			photoskl_exp += 2
 			'You pull out your phone as well then start recording them. The one on all fours is going at it, and has her friend quickly moaning loudly, clutching at her hair. Moments later, she gasps loudly, and withers against her friends face, obviously having an orgasm. Once she recovers from her orgasm, they passionately kiss, then get up and straighten their clothes, before heading out.'
 			gs 'arousal', 'voyeur_sex', 3
@@ -619,7 +636,6 @@ if $ARGS[0] = 'station':
 			gt $loc, $loc_arg
 		end
 		act 'Record them':
-			*clr & cla
 			photoskl_exp += 2
 			'You pull out your phone as well then start recording them. He pounds her without mercy, but by the sounds of her moans, she is loving every moment of it. They fuck for several more minutes until he starts to grunt, and then buries himself; balls deep in her for a moment, as he is obviously cumming. Once he pulls out of her, they both quickly get dressed then move to catch a train.'
 			gs 'arousal', 'voyeur_sex', 3
@@ -717,12 +733,42 @@ if $ARGS[0] = 'station':
 				end
 			end
 		end
+	elseif metrorand = 20:
+		'<center><video autoplay loop src="images/locations/city/shared/metro/station/sex/fuck3.mp4"></video></center>'
+		'As you head through the metro station, you notice a couple having sex very obviously across the tracks. You can''t believe your eyes and despite this being a completely public place, you can''t pull your eyes away. They are either a very sexually adventurous couple or a very stupid one, as this terminal is often patrolled by police officers. Regardless, they don''t seem to be stopping anytime soon, and when the male half notices you watching, he flashes you a hand gesture, never missing a thrust.'
+		gs 'arousal', 'voyeur_sex', 3
+		gs 'stat'
+		act 'Hurry away':
+			minut += 5
+			gs 'arousal', 'end'
+			gs 'stat'
+			gt $loc, $loc_arg
+		end
+		act 'Record them':
+			photoskl_exp += 2
+			'You pull out your phone as well then start recording them. He pounds her without mercy, but by the sounds of her moans, she is loving every moment of it. They fuck for several more minutes until he starts to grunt, and then buries himself; balls deep in her for a moment, as he is obviously cumming. Once he pulls out of her, they both quickly get dressed then move to catch a train.'
+			gs 'arousal', 'voyeur_sex', 3
+			gs 'arousal', 'end'
+			gs 'stat'
+			act 'Leave': minut += 5 & gt $loc, $loc_arg
+		end
+	elseif metrorand = 21:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/caught_skirt.jpg"></center>'
+		'As you step off the metro and begin to head up the stairs toward the street above, you notice a girl trying to adjust her skirt which has gotten caught up around her waistband. But while doing so, she has accidentally exposed her bare butt to everyone behind her! Just a few moments after you notice what''s going on, a few gopniks do as well, and start to cat-call and yell at at the girl. She quickly covers up, rushing out of the terminal with bright red cheeks, clearly embarrassed.'
+		gs 'arousal', 'erotic', 3
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Leave':minut += 5 & gt $loc, $loc_arg	
+	elseif metrorand = 22:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/caught_skirt.jpg"></center>'
+		'As you head through the metro station, there''s two women standing on the the platform waiting for the metro dressed in latex body suits. Their heels are extremely high and you imagine how much muscle control it must take just to stand in them, let alone walk through the city''s streets and sidewalks.'
+		act 'Leave':minut += 5 & gt $loc, $loc_arg	
 	end
 end
 
 if $ARGS[0] = 'train':
 	*clr & cla
-	metrorand = rand(1,26)
+	metrorand = rand(1,33)
 	if metrorand = 1:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/annoyed.jpg"></center>'
 		'As you take a seat on the metro, you hear a huff. You glance up to see a woman giving you a dirty looks, like you took her seat, or something. She moves over to sit across from you, and for the rest of the ride, gives you a dirty look. You really have no idea what you did, but whatever it was it pissed her off.'
@@ -905,6 +951,36 @@ if $ARGS[0] = 'train':
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big77.jpg"></center>'
 		'You notice your neighbor <a href="exec:gt ''tryndin'', ''tryndinmetro''">Tryndin</a> in the metro car.'
 		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 27:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/dog.jpg"></center>'
+		'It seems as if some of the famous "Moscow Metro Dogs" have made their way to St. Petersburg. You heard about them on the news awhile back, but today was the first day you''ve seen one for yourself. It was pretty cute and it made you happy to see the other passengers petting it and being generally kind to the animal. Still, you don''t think the public metro is really a place for a dog to be, and wonder about taking it home with you, or at least to the local animal shelter. Before you can inspect it''s collar however, the metro doors open and the dog trots away.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 28:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/mannequin.jpg"></center>'
+		'Sitting across from you is a woman who is hauling some sort of mannequin around in a bag. You wonder what it''s for or where she''s going. Maybe she''s a clothing designer or something? No one else seems to think it''s unusual though, so you shrug it off and play on your phone for the rest of the trip. Just another day on the metro.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 29:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/mask.jpg"></center>'
+		'You honestly don''t understand how some people get to be the way they are. But such is life in the big city! You just never know what you''re going to encounter, especially on the metro. You wonder if this person is asleep under their mask as they''re sitting there as still as a statue. Another curious passenger must be thinking the same thing and walks up to him, cautiously reaching out to touch his mask. Suddenly, the masked man jumps to life and starts barking and growling at the lady who dared to touch him! She darts away into the crowd of other passengers, who are now trying to see what all the commotion is about. As soon as you reach your destination, you get up quickly and leave the bizarre scene.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 30:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/oldman_nipples.jpg"></center>'
+		'You take a seat on the metro and wait for it to head to your destination. Across from you sits an older man, who appears to be rather scruffy and dirty. You wonder if maybe he''s homeless, or just poor, and you almost feel sorry for him for a moment. That''s when he opens his jacket and reveals a very provocative women''s top, with the nipples cut out of it! A woman a few seats away shouts "oh my God!" and starts to film the man with her phone. He then starts making lewd faces at her while tweaking his nipples, clearly liking the attention.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 31:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/police.jpg"></center>'
+		'As you take your spot in the metro, you notice a police officer standing across from you, staring at you the moment you come in. You try to ignore him the best you can by looking down at your phone or around to the other passengers. Whenever you glance back up at him however, he''s still staring right at your face. You don''t think he''s even blinked once! Does he know me from somewhere or something? What''s his problem? you think to yourself.'
+		'You do your best to turn away from his creepy stare, but there''s only so much you can do. Even as the metro pulls up to your stop, you cast one more peek in his direction and he''s still staring right into your eyes.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 32:
+		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/rude.jpg"></center>'
+		'The metro is mostly empty today. A lady sits across from you and you close your eyes here and there, almost dozing off. That''s when a man enters the metro and sits right next to the woman and spreads his legs wide, pressing them into her. There is plenty of room in the metro for this guy to sit, so he''s either being intentionally rude or intentionally creepy. He has one of his hands underneath the bags he''s holding and it seems to be moving slightly...Is he touching himself? Gross! The woman doesn''t tolerate this for long and huffs loudly, sliding down the bench to get away from him. He doesn''t follow her, but continues to sit there while breathing heavily through his mouth, his arm still moving under the bag.'
+		act 'Leave': gt 'metro', 'start'
+	elseif metrorand = 33:
+		'<center><video autoplay loop src="images/locations/city/shared/metro/station/toclose.mp4"></video></center>'
+		'The metro is exceptionally packed today, with most of the younger passengers opting to stand to let the elderly take the limited seats. As the metro beings to move, a middle aged man with chiseled features stands next to you, placing his hand very near yours on the pole. You were there first and so you hold your ground, trying to not to move as the metro car twists and turns along it''s track. But the rocking of the train causes the man''s body to occasionally press up against your own.'
+		'Why is he standing so close to me? Who even does this? Is he going to try something? you think to yourself, your mind preparing for the worst. For the remainder of the trip, the stranger never says a word to you and never intentionally touches any part of your body, but he is definitely too close for comfort. When the train finally comes to a stop, you push towards the doors the second they open and get out of the station as quickly as you can.'
+		act 'Leave': gt 'metro', 'start'
 	end
 end
 

+ 1 - 1
locations/miroslavahome.qsrc

@@ -193,7 +193,7 @@ if $ARGS[0] = 'mirabrother':
 														'After a couple of minutes you feel his warm sticky cum hit the back of your throat and begin to swallow it all down. Mira''s brother stands still for a minute, his eyes closed in bliss. Finally, he takes his cock out of your mouth and zips up his pants. You put your helmets back on, get on the motorcycle once again, and he drives you back to the village...'
 
 														act 'Ask him to take you back to Mira''s house': gt 'MiroslavaHome', 'start'
-														if mid($start_type,1,2) = 'sg'  and grandaQW['block'] = 0:act 'Ask him to drop you off at your grandparents house': gt 'gaddvor'
+														if grandaQW['block'] = 0:act 'Ask him to drop you off at your grandparents house': gt 'gaddvor'
 													end
 												end
 											end

+ 90 - 62
locations/mirror.qsrc

@@ -26,51 +26,65 @@ if $ARGS[0] = 'start':
 			$serv['avatar']='<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
 		end
 		! ----- hair
-		if autohairbrush = 1 and pcs_hairbsh = 0 : xgt 'mirror', 'brush'
-
-		!!!!!!!! Maruda Hair Mod
-		if hscrunch < 1:hscrunchw = 0
-		if hpingrip < 1:hpingripw = 0
-		if hscrunch < 2:hpigtail = 0
-
-		if pcs_hairbsh = 0: $serv['hairbrush']='<a href="exec: xgt ''mirror'', ''brush''"><img src="images/system/icons/action/hairbrush.png"></a>'
-		if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
-			if hscrunchw = 0 and hpingripw = 0:
-				$serv['ponytail']='<a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''"><img src="images/system/icons/action/scrunchy.png"></a>'
-				$serv['ponytail desc']='As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''">ponytail</a>. You have <b><<hscrunch>></b> scrunchies left.'
-			end
-			if hscrunchw = 1:
-				$serv['ponytail']='<a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/ponytail.png"></a>'
-				$serv['ponytail desc']='Remove the <a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''">scrunchie</a> to get rid of the ponytail.'
+		
+		if hypnoHairStyle ! 1:
+			if autohairbrush = 1 and pcs_hairbsh = 0 : xgt 'mirror', 'brush'
+
+			!!!!!!!! Maruda Hair Mod
+			if hscrunch < 1:hscrunchw = 0
+			if hpingrip < 1:hpingripw = 0
+			if hscrunch < 2:hpigtail = 0
+
+			if pcs_hairbsh = 0: $serv['hairbrush']='<a href="exec: xgt ''mirror'', ''brush''"><img src="images/system/icons/action/hairbrush.png"></a>'
+			if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
+				if hscrunchw = 0 and hpingripw = 0:
+					$serv['ponytail']='<a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''"><img src="images/system/icons/action/scrunchy.png"></a>'
+					$serv['ponytail desc']='As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''">ponytail</a>. You have <b><<hscrunch>></b> scrunchies left.'
+				end
+				if hscrunchw = 1:
+					$serv['ponytail']='<a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/ponytail.png"></a>'
+					$serv['ponytail desc']='Remove the <a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''">scrunchie</a> to get rid of the ponytail.'
+				end
 			end
-		end
-		if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
-			if hscrunchw = 0 and hpingripw = 0:
-				$serv['bun']='<a href="exec:hpingripw = 1 & gs ''mirror'', ''start''"><img src="images/system/icons/action/clips_pins_grips.png"></a>'
-				$serv['bun desc']='You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''mirror'', ''start''">updo your hair</a>. You have <b><<hpingrip>></b> hair accessories at your disposal.'
+			if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
+				if hscrunchw = 0 and hpingripw = 0:
+					$serv['bun']='<a href="exec:hpingripw = 1 & gs ''mirror'', ''start''"><img src="images/system/icons/action/clips_pins_grips.png"></a>'
+					$serv['bun desc']='You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''mirror'', ''start''">updo your hair</a>. You have <b><<hpingrip>></b> hair accessories at your disposal.'
+				end
+				if hpingripw = 1:
+					$serv['bun']='<a href="exec:hpingripw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/bun.png"></a>'
+					$serv['bun desc']='Let your hair <a href="exec:hpingripw = 0 & gs ''mirror'', ''start''">flow free</a>.'
+				end
 			end
-			if hpingripw = 1:
-				$serv['bun']='<a href="exec:hpingripw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/bun.png"></a>'
-				$serv['bun desc']='Let your hair <a href="exec:hpingripw = 0 & gs ''mirror'', ''start''">flow free</a>.'
+			if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
+				if hscrunchw = 0 and hpingripw = 0:
+					$serv['pigtails']='<a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''"><img src="images/system/icons/action/hair_ties.png"></a>'
+					$serv['pigtails desc']='You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''">pigtails</a>.'
+				end
+				if hscrunchw = 2:
+					$serv['pigtails']='<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/pigtails.png"></a>'
+					$serv['pigtails desc']='<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''">Remove</a> your scrunchies and let your hair flow free again.'
+				end
 			end
-		end
-		if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
-			if hscrunchw = 0 and hpingripw = 0:
-				$serv['pigtails']='<a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''"><img src="images/system/icons/action/hair_ties.png"></a>'
-				$serv['pigtails desc']='You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''">pigtails</a>.'
+			if canBraidHair = 1 and hscrunch >= 1 and hBraids = 0 and (pcs_hairlng > 80 and pcs_hairlng <= 800) and hscrunchw = 0 and hpingripw = 0 and hscrunchw = 0:
+				$serv['braid']='<a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''"><img src="images/system/icons/action/braiding.png"></a>'
+				$serv['braid desc']='You can spend half an hour <a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''">braiding</a> your hair, just the way your sister taught you.'
+			elseif hbraids > 0:
+				$serv['braid']='<a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''"><img src="images/system/icons/action/braid.png"></a>'
+				$serv['braid desc']='Take half an hour removing your <a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''">braid</a>.'
 			end
-			if hscrunchw = 2:
-				$serv['pigtails']='<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''"><img src="images/system/icons/action/pigtails.png"></a>'
-				$serv['pigtails desc']='<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''">Remove</a> your scrunchies and let your hair flow free again.'
+		else
+			if hscrunchw ! 2:
+				hpingripw = 0
+				hscrunchw = 2
+				hpigtail = 1
+				gs 'mirror', 'start'
+				''
+				'You notice your hair is all messed up, so you fix it into pigtails.'
+			else
+				'You think your hair looks perfect the way it is! There''s no reason to change it.'
 			end
 		end
-		if canBraidHair = 1 and hscrunch >= 1 and hBraids = 0 and (pcs_hairlng > 80 and pcs_hairlng <= 800) and hscrunchw = 0 and hpingripw = 0 and hscrunchw = 0:
-			$serv['braid']='<a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''"><img src="images/system/icons/action/braiding.png"></a>'
-			$serv['braid desc']='You can spend half an hour <a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''">braiding</a> your hair, just the way your sister taught you.'
-		elseif hbraids > 0:
-			$serv['braid']='<a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''"><img src="images/system/icons/action/braid.png"></a>'
-			$serv['braid desc']='Take half an hour removing your <a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''">braid</a>.'
-		end
 		! ----- actions
 		$serv['back']='<a href="exec: gt ''mirror'',''fin''"><img src="images/system/icons/action/back.png"></a>'
 		! ----- lip balm and false lashes
@@ -199,35 +213,49 @@ if $ARGS[0] = 'start':
 			if dyefade > 0 and dyefade < 7: '<br>Your hair dye is beginning to fade and your roots are showing.'
 			if dyefade = 0: '<br>Your hair dye has faded and looks terrible.'
 		end
-		if autohairbrush = 1 and pcs_hairbsh = 0 : xgt 'mirror', 'brush'
+		
+		if hypnoHairStyle ! 1:
+			if autohairbrush = 1 and pcs_hairbsh = 0 : xgt 'mirror', 'brush'
 
-		!!!!!!!! Maruda Hair Mod
-		if hscrunch < 1:hscrunchw = 0
-		if hpingrip < 1:hpingripw = 0
-		if hscrunch < 2:hpigtail = 0
+			!!!!!!!! Maruda Hair Mod
+			if hscrunch < 1:hscrunchw = 0
+			if hpingrip < 1:hpingripw = 0
+			if hscrunch < 2:hpigtail = 0
 
-		if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
-			*nl
-			if hscrunchw = 0 and hpingripw = 0: 'As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''">ponytail</a>. You have <<hscrunch>> scrunchies left.'
-			if hscrunchw = 1: 'Remove the <a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''">scrunchie</a> to get rid of the ponytail.'
-		end
+			if pcs_hairlng > 80 and hscrunch >= 1 and hbraids = 0:
+				*nl
+				if hscrunchw = 0 and hpingripw = 0: 'As you have a scrunchy, you can arrange your hair into a <a href="exec:hscrunchw = 1 & gs ''mirror'', ''start''">ponytail</a>. You have <<hscrunch>> scrunchies left.'
+				if hscrunchw = 1: 'Remove the <a href="exec:hscrunchw = 0 & gs ''mirror'', ''start''">scrunchie</a> to get rid of the ponytail.'
+			end
 
-		if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
-			if hscrunchw = 0 and hpingripw = 0: 'You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''mirror'', ''start''">updo your hair</a>. You have <<hpingrip>> hair accessories at your disposal.'
-			if hpingripw = 1: 'Let your hair <a href="exec:hpingripw = 0 & gs ''mirror'', ''start''">flow free</a>.'
-		end
+			if pcs_hairlng > 80 and hpingrip >= 1 and hbraids = 0:
+				if hscrunchw = 0 and hpingripw = 0: 'You have several clips, pins and grips for you hair. Hence, you can <a href="exec:hpingripw = 1 & gs ''mirror'', ''start''">updo your hair</a>. You have <<hpingrip>> hair accessories at your disposal.'
+				if hpingripw = 1: 'Let your hair <a href="exec:hpingripw = 0 & gs ''mirror'', ''start''">flow free</a>.'
+			end
 
-		if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
-			if hscrunchw = 0 and hpingripw = 0: 'You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''">pigtails</a>.'
-			if hscrunchw = 2: '<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''">Remove</a> your scrunchies and let your hair flow free again.'
-		end
+			if pcs_hairlng > 80 and hscrunch >= 2 and hbraids = 0:
+				if hscrunchw = 0 and hpingripw = 0: 'You can use two hair ties to make yourself some <a href="exec:hpigtail = 1 & hscrunchw = 2 & gs ''mirror'', ''start''">pigtails</a>.'
+				if hscrunchw = 2: '<a href="exec:hpigtail = 0 & hscrunchw = 0 & gs ''mirror'', ''start''">Remove</a> your scrunchies and let your hair flow free again.'
+			end
 
-		if canBraidHair = 1 and hscrunch >= 1 and hBraids = 0 and (pcs_hairlng > 80 and pcs_hairlng <= 800) and hscrunchw = 0 and hpingripw = 0 and hscrunchw = 0:
-			'You can spend half an hour <a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''">braiding</a> your hair, just the way your sister taught you.'
-		end
+			if canBraidHair = 1 and hscrunch >= 1 and hBraids = 0 and (pcs_hairlng > 80 and pcs_hairlng <= 800) and hscrunchw = 0 and hpingripw = 0 and hscrunchw = 0:
+				'You can spend half an hour <a href="exec:hbraids = 15 & minut += 30 & gs ''mirror'', ''start''">braiding</a> your hair, just the way your sister taught you.'
+			end
 
-		if hbraids > 0:
-			'Take half an hour removing your <a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''">braid</a>.'
+			if hbraids > 0:
+				'Take half an hour removing your <a href="exec:hbraids = 0 & minut += 30 & gs ''mirror'', ''start''">braid</a>.'
+			end
+		else
+			if hscrunchw ! 2:
+				hpingripw = 0
+				hscrunchw = 2
+				hpigtail = 1
+				gs 'mirror', 'start'
+				''
+				'You notice your hair is all messed up, so you fix it into pigtails.'
+			else
+				'You think your hair looks perfect the way it is! There''s no reason to change it.'
+			end
 		end
 		!!!!!!!! Maruda Hair Mod
 	end

+ 27 - 70
locations/mitka.qsrc

@@ -43,45 +43,21 @@ if $ARGS[0] = '':
 		'You and Mitka are best friends.'
 	end
 	! School girl Sveta already knows Mitka
-	if mid($start_type,1,2) = 'sg':
-		$mitkaInvitation = 'Listen, we have a fresh batch of our home brew. Come drink with us at eight o''clock. We meet by the forest road outside the village. We''ll hang out with some friends, and have fun. What do you say?'
-		
-		'He is barely older than you, you remember him from your childhood. You both used to swim in the local river together.'
-		if npc_QW['A63'] = 0:
-			'You blush as you recall that you used to swim naked together when you were little.'
-			if pcs_horny >= 50: 'You bite your lip and glance down at his crotch and can''t help but wonder how much he has grown since then.'
-		end
-		*nl
-		'"Hey <<$pcs_nickname>>, how are you doing?"'
-		
-		! Mitka will ask Sveta for sex once relationship gets high enough or Mitka has already had sex with Sveta or Mitka has seen Sveta naked in the woods too many times and Sveta has not chosen to no longer be the village whore after the gadriver_gang event
-		if (npc_rel['A63'] >= 60 or npc_QW['A63'] > 0) and gadriver_gang < 3:
-			act '"I''m doing fine, thanks."': xgt 'mitka', 'sex_chat'
-		else
-			act '"I''m doing fine, thanks."': xgt 'mitka', 'normal_chat'
-		end
+	$mitkaInvitation = 'Listen, we have a fresh batch of our home brew. Come drink with us at eight o''clock. We meet by the forest road outside the village. We''ll hang out with some friends, and have fun. What do you say?'
+	
+	'He is barely older than you, you remember him from your childhood. You both used to swim in the local river together.'
+	if npc_QW['A63'] = 0:
+		'You blush as you recall that you used to swim naked together when you were little.'
+		if pcs_horny >= 50: 'You bite your lip and glance down at his crotch and can''t help but wonder how much he has grown since then.'
+	end
+	*nl
+	'"Hey <<$pcs_nickname>>, how are you doing?"'
+	
+	! Mitka will ask Sveta for sex once relationship gets high enough or Mitka has already had sex with Sveta or Mitka has seen Sveta naked in the woods too many times and Sveta has not chosen to no longer be the village whore after the gadriver_gang event
+	if (npc_rel['A63'] >= 60 or npc_QW['A63'] > 0) and gadriver_gang < 3:
+		act '"I''m doing fine, thanks."': xgt 'mitka', 'sex_chat'
 	else
-		! Transformation or New In Town Sveta has already met Mitka or started his quest
-		if npc_rel['A63'] ! 0 or npc_QW['A63'] ! 0: 
-			$mitkaInvitation = 'Listen, we have a fresh batch of our home brew. Come drink with us at eight o''clock. We meet by the forest road outside the village. We''ll hang out with some friends, and have fun. What do you say?'
-			
-			'He is barely older than you, and one of the first people you met in Gadukino.'
-			*nl
-			'"Hey <<$pcs_nickname>>, how are you doing?"'
-			
-			if (npc_rel['A63'] > 60 or npc_QW['A63'] > 0) and gadriver_gang < 3:
-				act '"I''m doing fine, thanks."': xgt 'mitka', 'sex_chat'
-			else
-				act '"I''m doing fine, thanks."': xgt 'mitka', 'normal_chat'
-			end
-		else
-			$mitkaInvitation = 'Listen, we have a fresh batch of our home brew. Come drink with us at eight o''clock. We meet by the forest road outside the village. I can introduce you to some of my friends, and have fun. What do you say?'
-			
-			'You see a boy about your age walking towards you.'
-			'As you are about to pass him by, he waves and greets you. He introduces himself as Mitka Shkvoryen.'			
-			
-			act 'Introduce yourself': xgt 'mitka', 'first_chat'
-		end
+		act '"I''m doing fine, thanks."': xgt 'mitka', 'normal_chat'
 	end
 end
 
@@ -127,40 +103,21 @@ if $ARGS[0] = 'sex_chat':
 		*nl
 		'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
 		if pcs_vag = 0:
-			if mid($start_type,1,2) = 'sg':
-				gs 'willpower', 'bj', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'I don''t know. My mother is obsessed with me staying a virgin. (<<will_cost>> Willpower)':
-						cla		
-						npc_rel['A63'] -= 1
-						gs 'willpower', 'bj', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						gs 'stat'
-						
-						*nl
-						'You turn around and walk away from Mitka. You know it would be fun, but you promised your mother...'
-						act 'Walk away': gt $loc
-					end
-				else
-					act 'I don''t know. My mother is obsessed with me staying a virgin. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			gs 'willpower', 'bj', 'resist'
+			if will_cost <= pcs_willpwr:
+				act 'I don''t know. My mother is obsessed with me staying a virgin. (<<will_cost>> Willpower)':
+					cla		
+					npc_rel['A63'] -= 1
+					gs 'willpower', 'bj', 'resist'
+					gs 'willpower', 'pay', 'resist'
+					gs 'stat'
+					
+					*nl
+					'You turn around and walk away from Mitka. You know it would be fun, but you promised your mother...'
+					act 'Walk away': gt $loc
 				end
 			else
-				gs 'willpower', 'bj', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'I don''t know. I''m still a virgin. (<<will_cost>> Willpower)':
-						cla
-						npc_rel['A63'] -= 1
-						gs 'willpower', 'bj', 'resist'
-						gs 'willpower', 'pay', 'resist'
-						gs 'stat'
-						
-						*nl
-						'You turn around and walk away from Mitka. You know it would be fun, but maybe another time...'
-						act 'Walk away': gt $loc
-					end
-				else
-					act 'I don''t know. I''m still a virgin. (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
+				act 'I don''t know. My mother is obsessed with me staying a virgin. (<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', 'bj', 'resist'

+ 2 - 2
locations/mitkasex.qsrc

@@ -2098,7 +2098,7 @@ if $ARGS[0] = 'forestCum3_3':
 	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 	mitboysex = 0
 	protect = 0
 
@@ -2124,7 +2124,7 @@ if $ARGS[0] = 'forestCum3_2':
 	swallow += 1
 	gs 'cum_call', 'face', $boy, 1
 	if $clothingworntype = 'nude':gs 'cum_call', 'stomach', $boy, 1
-	if ($clothingworntype ! 'nude' and $clothingworntype ! 'swimwear'):gs 'cum_call', 'clothes_hidden', $boy, 1
+	if ($clothingworntype ! 'nude' and PCloswimwear = 0):gs 'cum_call', 'clothes_hidden', $boy, 1
 	mitboysex = 0
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mitka/mitkaforestsexcum3.2.jpg"></center>'

+ 3 - 3
locations/natbelapt.qsrc

@@ -17,7 +17,7 @@
 !NatashaLoc = 7 (Natasha in the laundry room)
 !---------------------------------------------
 
-!!{ Natasha Quest Line
+!{ Natasha Quest Line
 NatbelQW['QWstage'] = 0:
 NatbelQW['QWstage'] = 1: You can study with Natasha after school.
 NatbelQW['QWstage'] = 2: Natasha borrowed money for the first time.
@@ -904,7 +904,7 @@ if $ARGS[0] = 'afterhomework':
 	end
 
 	gs 'willpower', 'cuni', 'force', 'easy'
-	if NatbelQW['QWstage'] >= 7 and will_cost <= pcs_willpwr:
+	if NatbelQW['QWstage'] >= 8 and will_cost <= pcs_willpwr:
 		act 'Take off your own clothes (<<will_cost>> Willpower)':
 			cla
 			gs 'willpower', 'pay', 'self'
@@ -912,7 +912,7 @@ if $ARGS[0] = 'afterhomework':
 			act 'Lie down and open your legs': gt 'natbelapt', 'openlegs'
 			act 'Straddle her face': gt 'natbelapt', 'straddleface'
 		end
-	elseif NatbelQW['QWstage'] >= 7 and will_cost > pcs_willpwr:
+	elseif NatbelQW['QWstage'] >= 8 and will_cost > pcs_willpwr:
 		act 'Take off your own clothes (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	if NatbelQW['seethrough'] = 1:

+ 1 - 1
locations/nerd_game_night.qsrc

@@ -1149,7 +1149,7 @@ if $ARGS[0] = 'summer_invite_sms':
 		$trialSMS += $SMSFrM+$VM['1a']+$SMSBkM
 		$SMSMessage[ARGS[1]] = $trialSMS
 		gs 'telefon', 'show_sms', ARGS[2]
-		nerd_game['invite_day'] = 2147483647 & ! block the event
+!!		nerd_game['invite_day'] = 2147483647 & ! block the event
 	end
 
 	if $ARGS[1] = 'V2':

+ 1 - 1
locations/npcstatic1.qsrc

@@ -229,7 +229,7 @@ gs 'npcstaticdefaults', 'group', 'gopnik'
 $npc_thdick['A<<npctemp>>'] = 'massive'
 npc_dick['A<<npctemp>>'] = 15
 npc_sexskill['A<<npctemp>>'] = rand(0,2)
-if mid($start_type,1,2) = 'sg': npc_rel['A<<npctemp>>'] = 40
+npc_rel['A<<npctemp>>'] = 40
 npc_intel['A<<npctemp>>'] = 33
 hotcat_rating['A<<npctemp>>'] = 4
 

+ 29 - 29
locations/obj_din.qsrc

@@ -10,13 +10,13 @@ if $ARGS[0] = 'chartabs':
 	!6: Renown
 	!7: Magic
 	'<center><b><table width="90%" cellspacing="0" cellpadding="0" valign="top"><tr>'
-	if menu_page = 0:'<th>Character</th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 1:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th>Skills</th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 2:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th>Statistics</th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 3:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th>Pain</th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 4:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th>Traits</th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 5:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th>Renown</th>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
-	if menu_page = 6:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif(pcs_magik = 0,'','<th>Magic</th>')+''
+	if menu_page = 0:'<th>Character</th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 1:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th>Skills</th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 2:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th>Statistics</th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 3:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th>Pain</th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 4:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th>Traits</th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 5:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th>Renown</th>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 6 & gs ''obj_din'', ''magic''">Magic</a></th>')+''
+	if menu_page = 6:'<th><a href="exec:menu_page = 0 & gs ''obj_din'', ''description''">Character</a></th><th><a href="exec:menu_page = 1 & gs ''obj_din'', ''skills''">Skills</a></th><th><a href="exec:menu_page = 2 & gs ''obj_din'', ''stats''">Statistics</a></th><th><a href="exec:menu_page = 3 & gs ''obj_din'', ''pain''">Pain</a></th><th><a href="exec:menu_page = 4 & gs ''traits'', ''menu''">Traits</a></th><th><a href="exec:menu_page = 5 & gs ''obj_din'', ''reputation''">Renown</a></th>'+iif($start_type[1] = 'nomagic','','<th>Magic</th>')+''
 	'</tr></table></b></center>'
 	act 'Exit the menu': killvar 'menu_page' & gt 'obj_din', 'menu_exit'
 end
@@ -93,20 +93,20 @@ if $ARGS[0] = 'cheattabs':
 	!12: ImageSets
 	!13: Items
 	'<center><b><table width="90%" cellspacing="0" cellpadding="10" align="center" valign="top"><tr>'
-	if menu_page = 0:'<th>Index</th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 1:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th>Recurrent</th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 2:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th>State</th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 3:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th>Appearance</th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 4:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th>Skill</th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 5:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th>Relationships</th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 6:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th>Documents</th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 7:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th>Magic</th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 8:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th>Time</th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 9:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th>NPC Editor</th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 10:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th>Pain</th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 11:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th>DNA</th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 12:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th>Image Sets</th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
-	if menu_page = 13:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif(pcs_magik = 0,'','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th>Image Sets</th></th><th>Items</th>'
+	if menu_page = 0:'<th>Index</th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 1:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th>Recurrent</th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 2:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th>State</th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 3:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th>Appearance</th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 4:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th>Skill</th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 5:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th>Relationships</th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 6:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th>Documents</th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 7:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th>Magic</th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 8:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th>Time</th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 9:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th>NPC Editor</th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 10:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th>Pain</th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 11:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th>DNA</th><th><a href="exec:menu_page = 12 & dynamic $cheatmenu[''bdimmain'']">Image Sets</a></th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 12:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th>Image Sets</th><th><a href="exec:menu_page = 13 & dynamic $cheatmenu[''items'']">Items</a></th>'
+	if menu_page = 13:'<th><a href="exec:menu_page = 0 & dynamic $cheatmenu">Index</a></th><th><a href="exec:menu_page = 1 & dynamic $cheatmenu[''permanent'']">Recurrent</a></th><th><a href="exec:menu_page = 2 & dynamic $cheatmenu[''state'']">State</a></th><th><a href="exec:menu_page = 3 & dynamic $cheatmenu[''looks'']">Appearance</a></th><th><a href="exec:menu_page = 4 & dynamic $cheatmenu[''stats'']">Skill</a></th><th><a href="exec:menu_page = 5 & dynamic $cheatmenu[''reputation'']">Relationships</a></th><th><a href="exec:menu_page = 6 & dynamic $cheatmenu[''documents'']">Documents</a></th></tr><tr>'+iif($start_type[1] = 'nomagic','','<th><a href="exec:menu_page = 7 & dynamic $cheatmenu[''magic'']">Magic</a></th>')+'<th><a href="exec:menu_page = 8 & dynamic $cheatmenu[''time'']">Time</a></th><th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th><th><a href="exec:menu_page = 10 & dynamic $cheatmenu[''pain'']">Pain</a></th><th><a href="exec:menu_page = 11 & dynamic $cheatmenu[''DNA'']">DNA</a></th><th>Image Sets</th></th><th>Items</th>'
 	'</tr></table></b></center>'
 
 	act 'Settings menu': killvar 'menu_page' & gs '$menu_setting'
@@ -114,7 +114,7 @@ if $ARGS[0] = 'cheattabs':
 	act 'Exit the menu': killvar 'menu_page' & gt 'obj_din', 'menu_exit'
 end
 
-if $ARGS[0] = 'menu_exit': gt $menu_loc, $menu_arg
+if $ARGS[0] = 'menu_exit': settingmode = 0 & gt $menu_loc, $menu_arg
 
 if $ARGS[0] = 'menu_disabled': '<font color="red"><b>Menu is disabled for this event</b></font>'
 
@@ -130,7 +130,7 @@ if $ARGS[0] = 'description':
 	'Your name is <<$pcs_firstname>> <<$pcs_lastname>>.'
 
 	!!!0.2.6 extension
-	if StoryLine > 0:
+	if mid($start_type,1,2) = 'sg':
 		'Your friends and family call you <<$pcs_nickname>>.'
 	else
 		'Your friends call you <<$pcs_nickname>>.'
@@ -290,7 +290,7 @@ if $ARGS[0] = 'skills':
 	'Reaction - <<pcs_react>> / <<react_lvl>>'
 	'Charisma - <<pcs_chrsm>> / <<chrsm_lvl>>'
 	'Perception - <<pcs_prcptn>> / <<prcptn_lvl>>'
-	if pcs_magik > 0: 'Magic - <<pcs_magik>>'
+	if $start_type[1] = 'magic': 'Magic - <<pcs_magik>>'
 	'Attractiveness - <<pcs_apprnc>>'
 	!'Speed <<speed>>' - not used
 	*nl
@@ -341,7 +341,7 @@ if $ARGS[0] = 'skills':
 	*nl
 	'<b>Other Skills</b>'
 	*nl
-	if SchoolAtestat = 0 and StoryLine > 0:
+	if SchoolAtestat = 0 and mid($start_type,1,2) = 'sg':
 		if schoolprogul > 0: 'School absenteeism - <<schoolprogul>> days'
 	end
 	'</td><td width="25%" cellspacing="0" cellpadding="10" valign="top">'
@@ -402,7 +402,7 @@ if $ARGS[0] = 'stats':
 	if opPRE = 0: 'It has been <<daystart>> days since the game started.'
 	*nl
 
-	if SchoolAtestat = 0 and StoryLine > 0:
+	if SchoolAtestat = 0 and mid($start_type,1,2) = 'sg':
 		gs 'grades', 'assing_grade_description', 'school'
 	
 		gs 'grades', 'grade above', 'school', 90
@@ -1109,9 +1109,9 @@ if $ARGS[0] = 'magic':
 	'<center><h1>Magic</h1></center>'
 	'<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
 	'<td cellspacing="0" cellpadding="0" valign="top">'
-	if pcs_magik = 0:
+	if $start_type[1] = 'nomagic':
 		'You are unable to use magic.'
-	elseif pcs_magik > 0:
+	elseif $start_type[1] = 'magic':
 		'You have <<pcs_mana>> units of mana available to you.'
 		!!' Forces Rikudo available to you <<rikudo>> units'
 		*nl
@@ -2016,7 +2016,7 @@ if $ARGS[0] = 'emergency':
 	*nl
 
 	cla
-	if mid($start_type,1,2) = 'sg':act 'Go to Pavlovsk':gt 'pav_residential'
+	act 'Go to Pavlovsk':gt 'pav_residential'
 	act 'Go to City Residental':gt 'city_residential'
 	act 'Remove all mods':
 		killqst

+ 42 - 36
locations/office.qsrc

@@ -105,46 +105,34 @@ if $ARGS[0] = 'work_floor':
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/lobby.jpg"></center>'
 	'This is the main hall for your work floor. It is nicely decorated and you can hear other people working in the office.'
 	if workSec = 1:
-		if sek['atwork'] = daystart and hour = 12:
-			act 'Go back to work station':
-				sekDay += 1
-				if hour = 12: minut += 60 - minut
-				gs 'stat'
-				gt 'office', 'work'
-			end
-		elseif hour >= 8 and hour < 17:
-			if hour = 8:
-				act 'Go to work':
-					sek['atwork'] = daystart
-					minut = 60 - minut
-					gt 'office', 'secretary_office'
-				end
-			else
-				'You''re too late for work, so you''re told to take the day off.'
-			end
-			act 'Go to the breakroom':gt 'office', 'work_floor'
-			act 'Go to restrooms':gt 'office', 'restrooms'
-		end
 		if CloStyle3 ! 4:
 			'You are not dressed according to the corporate dress code.'
 		else
 			if hour >= 8 and hour < 17:
-				act 'Resign':
-					*clr & cla
-					menu_off = 1
-					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/npc/torbica_office.jpg"></center>'
-					'You walk into Mrs Torbica''s office and tell her. "I am resigning."'
-					'"Are you sure?" She asks obviously a little surprised you are quiting.'
-					act 'Yes, I quit.':
-						*clr & cla
-						minut += 30
-						work = 0
-						workSec = 0
-						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/npc/torbica_office.jpg"></center>'
-						'"Yes I am sure." You tender your resignation and then leave.'
-						act 'Leave': minut += 15 & gt 'city_center'
+				!! If it''s 8, then go to work option
+				if hour = 8:
+					act 'Go to work':
+						sek['atwork'] = daystart	
+						minut = 60 - minut    				
+						gt 'office', 'secretary_office'
+					end
+				!! Otherwise it''s return to work if already at work
+				elseif sek['atwork'] = daystart:
+					act 'Go back to work station':
+						sekDay += 1
+						if hour = 12: minut += 60 - minut 
+						gs 'stat'
+						gt 'office', 'work'
 					end
-					act 'Nevermind': gt 'office', 'work_floor'
+				!! Except if didn''t start the day at 8
+				else
+					'You''re too late for work, so you''re told to take the day off.'
+				end
+				!! The remaining actions are always available				
+				act 'Go to the breakroom':gt 'office', 'break_room'
+				act 'Go to restrooms':gt 'office', 'restrooms'
+				act 'Resign':
+					gt 'office', 'resign'
 				end
 			end
 		end
@@ -189,7 +177,7 @@ if $ARGS[0] = 'break_room':
 	'The room is neat and clean. Across from the door is a couch along one wall with a few comfortable chairs. With a large table in the middle of the room and along one wall is a set of cabinets, with a sink, some appliances and a fridge to store your lunch in, if you bring one.'
 	dynamic $driwater
 	if buterbrod > 0 and hour = 12:
-		act 'eat brought lunch':
+		act 'Eat brought lunch':
 			*clr & cla
 			minut += 20
 			buterbrod = 0
@@ -792,4 +780,22 @@ if $ARGS[0] = 'interview':
 	end
 end
 
+if $ARGS[0] = 'resign':
+	*clr & cla
+	menu_off = 1
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/npc/torbica_office.jpg"></center>'
+	'You walk into Mrs Torbica''s office and tell her. "I am resigning."'
+	'"Are you sure?" She asks obviously a little surprised you are quiting.'
+	act 'Yes, I quit.':
+		*clr & cla
+		minut += 30
+		work = 0
+		workSec = 0
+		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/office/npc/torbica_office.jpg"></center>'
+		'"Yes I am sure." You tender your resignation and then leave.'
+		act 'Leave': minut += 15 & gt 'city_center'
+	end
+	act 'Nevermind': gt 'office', 'work_floor'
+end					
+
 --- office ---------------------------------

+ 13 - 13
locations/pav_aptcourtev.qsrc

@@ -129,7 +129,7 @@ if $ARGS[0] = 'events1':
 	end
 
 	if anushkaFirstvisit = 0 and npc_rel['A144'] > 50 and rand(0,1) = 1 and anushka_met ! daystart:
-		if storyline ! 1: jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump1'
 		if week < 6 and hour < 8: jump 'reroll_jump1'
 		*clr & cla
 		anushka_met = daystart
@@ -137,7 +137,7 @@ if $ARGS[0] = 'events1':
 		'As you walk into the building you nearly run into Anushka. "Hey <<$pcs_nickname>> whats up?"'
 		'A bit surprised to see her but not disappointed, you were just wandering around for the hell of it. "Just killing time, kinda bored you know?"'
 		'She nods a bit and finishes checking the mail. "Yeah I know how that is, hey want to come up to my place and hang out?"'
-		act 'Can''t, got to go.': minut += 1 & gt 'pav_complex', 'start'
+		act 'Can''t, got to go': minut += 1 & gt 'pav_complex', 'start'
 		act 'Sure': minut += 2 & gt 'anushapt', 'firstvisit'
 	elseif events = 0:
 		*clr & cla
@@ -155,7 +155,7 @@ if $ARGS[0] = 'events1':
 		'A boy and girl are sitting on one of the benches kissing. They are making out passionately, seemingly unaware that anyone is watching them or perhaps they just don''t care if anyone is watching them. You think you recognize the boy from smoking in the stairwell.'
 		act 'Move away':gt 'pav_complex', 'start'
 	elseif events = 2:
-		if storyline ! 1: jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump1'
 		*clr & cla
 		minut += 3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/evggkiss' + rand(1,3) + '.jpg"></center>'
@@ -205,7 +205,7 @@ if $ARGS[0] = 'events1':
 		'You notice three girls standing down near the garages, where they can see the alley. Each time a car drives down the alley they turn around and moon the car, laughing the whole time. After several times they seem to get bored with mooning cars and move off down the alley themselves.'
 		act 'Move away':gt 'pav_complex', 'start'
 	elseif events = 9:
-		if storyline ! 1 or (week = 3 and hour >= 16): jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg' or (week = 3 and hour >= 16): jump 'reroll_jump1'
 		*clr & cla
 		prcptn_exp += rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/eatu.jpg"></center>'
@@ -246,7 +246,7 @@ if $ARGS[0] = 'events1':
 		minut += 3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/sex/evbj' + rand(1,2) + '.jpg"></center>'
 		text_rand = rand(0,2)
-		if text_rand = 0 or storyline ! 1:
+		if text_rand = 0 or mid($start_type,1,2) ! 'sg':
 			'You spot an extremely happy looking guy leaning up against the wall near the storage buildings, and squatting in front of him is a girl giving him an enthusiastic blowjob. You''re not exactly sure which of the two is enjoying it more. You don''t know either of these people, but you''ve seen them around here before. After a few minutes, you hear the guy moan, his cock never leaving the girl''s mouth. She continues to milk him for another minute before standing up and the two walk off together.'
 		elseif text_rand = 1:
 			'You see, between two of the storage buildings, Lena squatting down before Lavrenti as she sucks his dick. Lena seems to be enjoying this almost as much as Lavrenti is enjoying getting the blowjob. After a few minutes, you hear him moan, his cock never leaving her mouth. She continues to milk him for another minute before standing up and the two walk off together. You wonder if Vitek is aware of what his sister is getting up to, though you definitely aren''t going to ask him, knowing his reputation, when it comes to his sister.'
@@ -261,7 +261,7 @@ if $ARGS[0] = 'events1':
 		gs 'stat'
 		act 'Move away':gt 'pav_complex', 'start'
 	elseif events = 15:
-		if storyline ! 1: jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump1'
 		*clr & cla
 		prcptn_exp += rand(1,2)
 		minut += 3
@@ -280,7 +280,7 @@ if $ARGS[0] = 'events1':
 		gs 'stat'
 		act 'Move away':gt 'pav_complex', 'start'
 	elseif events = 16:
-		if storyline ! 1 or (week = 3 and hour >= 16): jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg' or (week = 3 and hour >= 16): jump 'reroll_jump1'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/nushbench.jpg"></center>'
 		'As you walk through the courtyard you see Anushka sitting on one of the benches, she hasn''t noticed you yet.'
@@ -348,7 +348,7 @@ if $ARGS[0] = 'events1':
 			end
 		end
 	elseif events >= 18:
-		if storyline ! 1: jump 'reroll_jump1'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump1'
 		gt 'pav_complexrolan'
 	end
 end
@@ -403,7 +403,7 @@ if $ARGS[0] = 'events2':
 		minut += 3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/sex/evbjn.jpg"></center>'
 		text_rand = rand(0,2)
-		if text_rand = 0 or storyline ! 1:
+		if text_rand = 0 or mid($start_type,1,2) ! 'sg':
 			'You spot an extremely happy looking man leaned up against the wall near the storage buildings, and squatting in front of him is a girl giving him an enthusiastic blowjob. You''re not exactly sure which of the two is enjoying it more. You don''t know either of these people, but you''ve seen them around here before. After a few minutes, you hear the guy moan, his cock never leaving the girl''s mouth. She continues to milk him for another minute before standing up and the two walk off together.'
 		elseif text_rand = 1:
 			'You see, between two of the storage buildings, Lena squatting down before Lavrenti as she sucks his dick. Lena seems to be enjoying this almost as much as Lavrenti is enjoying getting the blowjob. After a few minutes, you hear him moan, his cock never leaving her mouth. She continues to milk him for another minute before standing up and the two walk off together. You wonder if Vitek is aware of what his sister is getting up to, though you definitely aren''t going to ask him, knowing his reputation, when it comes to his sister.'
@@ -421,7 +421,7 @@ if $ARGS[0] = 'events2':
 		*clr & cla
 		prcptn_exp += rand(1,2)
 		minut += 3
-		if storyline ! 1: jump 'reroll_jump2'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump2'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/sex/evgopbjn.jpg"></center>'
 		if soniaPS > 0 and rand(0,1) = 0:
 			'Between two of the storage buildings you notice Sonia squatting between Vitek, Dan and Vasily, taking turns sucking their cocks. She seems quite into the blow-jobs, almost as much as the three guys. It doesn''t take too long before the three Gopniks start jerking their dicks and cumming all over Sonia''s face.'
@@ -448,7 +448,7 @@ if $ARGS[0] = 'events2':
 		'You notice a group of gopnik boys and a girl hanging out, they are manhandling her more than a bit, and she is stripped down to only her panties. She seems to be okay with it, or at least is not putting up a fight or trying to get away. One of the guys pulls her into his lap, she takes notice of you looking, she watches you a moment with a resigned look on her face before turning her attention back to the boys. Not wishing to get the guys attention you move on.'
 		act 'Move away':gt 'pav_complex', 'start'
 	elseif nightevents = 8:
-		if storyline ! 1: jump 'reroll_jump2'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump2'
 		if week < 6 and hour < 8: jump 'reroll_jump2'
 		*clr & cla
 		if month >= 11 or month <= 3:
@@ -519,7 +519,7 @@ if $ARGS[0] = 'events2':
 			end
 		end
 	elseif nightevents = 9:
-		if storyline ! 1 or (week = 3 and hour <= 23) or (week = 5 and hour >= 20) or (week = 6 and hour >= 20): jump 'reroll_jump2'
+		if mid($start_type,1,2) ! 'sg' or (week = 3 and hour <= 23) or (week = 5 and hour >= 20) or (week = 6 and hour >= 20): jump 'reroll_jump2'
 		if week < 6 and hour < 8: jump 'reroll_jump2'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/gopgirls.jpg"></center>'
@@ -570,7 +570,7 @@ if $ARGS[0] = 'events2':
 			end
 		end
 	elseif nightevents = 10:
-		if storyline ! 1: jump 'reroll_jump2'
+		if mid($start_type,1,2) ! 'sg': jump 'reroll_jump2'
 		if week < 6 and hour < 8: jump 'reroll_jump2'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/lelepa.jpg"></center>'

+ 1 - 1
locations/pav_beach_chat.qsrc

@@ -252,7 +252,7 @@ if $ARGS[0] = 'christina':
 	minut += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/christina/beach_chat.jpg"></center>'
-	'You walk over to Christina, where she lays on the beach getting a tan. Before you can even say a word she speaks up. "I am having a good day, go away before you ruin it or I will ruin your day." You sigh, and turn around and walk away from her. It seems she will never forgive you.'
+	'You walk over to Christina as she lays on the beach getting a tan. Before you can even say a word, she speaks up. "I''m having a good day, so go away before you ruin it or I''ll ruin your day." You sigh before turning and walking away. It seems she''ll never forgive you.'
 	act 'Talk to someone else': gt 'pav_beach_chat', 'beach_hangout'
 end
 

+ 2 - 2
locations/pav_clinic.qsrc

@@ -588,7 +588,7 @@ if $ARGS[0] = '':
 			end
 		end
 
-		if narkoman = 1 and storyline > 0:
+		if narkoman = 1 and mid($start_type,1,2) = 'sg':
 			act 'Seek help for your weakness and pain':
 				*clr & cla
 				menu_off = 1
@@ -674,7 +674,7 @@ if $ARGS[0] = '':
 				end
 			end
 		end
-		if StoryLine > 0 and SchoolAtestat = 0 and Gspravka < 3 and motherKnowSpravka = 0 and home_owned[2] = 1: act 'Go to the gynaecologist for a referral': gt 'pav_clinic', 'referral'
+		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and Gspravka < 3 and motherKnowSpravka = 0 and home_owned[2] = 1: act 'Go to the gynaecologist for a referral': gt 'pav_clinic', 'referral'
 	else
 		'The clinic is closed. It''s open every day between 06:00 and 21:00.'
 	end

+ 1 - 1
locations/pav_commercial.qsrc

@@ -61,7 +61,7 @@ gs'street_event','pav_commercial', 'extras'
 if ((month = 9 and day > 16) or month >= 10) and (AlbinaQW['StarletsShutDown'] = 0 or AlbinaQW['Chernov'] = 0): 'You can see election posters on the walls all over town. They say: "Vote for Boris Barlovsky!" Wait a minute... isn''t that Albina''s father?'
 if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and AlbinaQW['Chernov'] = 0 and ((month = 11 and day > 18) or month = 12) and hour >= 14:gt 'albina_election_events', 'start'
 
-if StoryLine > 0 and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1:
+if mid($start_type,1,2) = 'sg' and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1:
 	motherWorry = 1
 end
 

+ 3 - 7
locations/pav_complex.qsrc

@@ -54,7 +54,7 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-	if StoryLine > 0 and hour < 5 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1: motherWorry = 1
+	if mid($start_type,1,2) = 'sg' and hour < 5 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1: motherWorry = 1
 
 	if ((minut + 60*(hour+daystart*24) - pavcomplexevent_time) > 60) or ((daystart+1)*1440 < pavcomplexevent_time):
 		if hour >= 8 and hour <= 20 and rand (0,2) = 0: 
@@ -66,7 +66,7 @@ if $ARGS[0] = 'start':
 		end
 	end	
 
-	if week <= 5 and cheerleaders_on = 0 and hour >= 14 and hour <= 18 and Storyline > 0 and (LariskaQW['story'] = 0 or LariskaQW['story'] = 1) and npc_rel['A13'] > 40 and lariska_ball ! daystart: 'Walking along the apartment complex, you hear a bouncing sound. Turning the corner, you see <a href="exec:gt ''lariska_storyline'', ''story_intro''">Lariska</a> hitting a volleyball against a wall.'
+	if week <= 5 and cheerleaders_on = 0 and hour >= 14 and hour <= 18 and mid($start_type,1,2) = 'sg' and (LariskaQW['story'] = 0 or LariskaQW['story'] = 1) and npc_rel['A13'] > 40 and lariska_ball ! daystart: 'Walking along the apartment complex, you hear a bouncing sound. Turning the corner, you see <a href="exec:gt ''lariska_storyline'', ''story_intro''">Lariska</a> hitting a volleyball against a wall.'
 	
 	if car > 0 and cardrive = 20: 'Your <a href="exec:gs ''carF'', ''start''"><<$car>></a> is parked in the street.'
 	
@@ -78,11 +78,7 @@ if $ARGS[0] = 'start':
 		act 'Join Rex in his car':gt 'rex_events','avto2'
 	end
 
-	if mid($start_type,1,2) = 'sg':
-		'Located in the old part of Pavlovsk, these Soviet era apartment blocks are the Five Eight Estate. Your family''s apartment is on the second floor of the nearest building'+iif(home_owned[2] = 1, '.', ', but you are no longer welcome there.')
-	else
-		'Located in the old part of Pavlovsk, these Soviet era apartment blocks are the Five Eight Estate.'
-	end
+	'Located in the old part of Pavlovsk, these Soviet era apartment blocks are the Five Eight Estate. Your family''s apartment is on the second floor of the nearest building'+iif(home_owned[2] = 1, '.', ', but you are no longer welcome there.')
 	*nl
 	'Opposite you is a meager courtyard, which has changed over the years to now include a kid''s playground, a basketball court and a small grassy area that''s mostly used to play football.'
 	'A few benches and tables surround it, and there''s a handful of small utility sheds tucked away in the corner for tenants to use if they''re willing to pay for the extra space.'

+ 2 - 2
locations/pav_complexb2.qsrc

@@ -195,7 +195,7 @@ if $ARGS[0] = 'lift':
 	minut +=1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator.jpg"></center>'
-	'<center>The elevator in the apartment building is quite old. The building supervisor does his best to keep it running, but it breaks down a lot. Someone put up a <a href="exec:gt ''pav_complexb2'',''elev_objava''">notification</a> in the elevator.</center>'
+	'<center>The elevator in the apartment building is quite old. The building supervisor does his best to keep it running, but it breaks down a lot. Someone put up a <a href="exec:gt ''pav_complexb2'',''elev_objava'',$ARGS[1]">notification</a> in the elevator.</center>'
 	act 'Push button: Floor 1': gt 'pav_complexb2','etaj_1'
 	act 'Push button: Floor 2': gt 'pav_complexb2','etaj_2'
 	act 'Push button: Floor 3': gt 'pav_complexb2','etaj_3'
@@ -228,7 +228,7 @@ if $ARGS[0] = 'elev_objava':
 		minut +=1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator_ob'+rand(1,2)+'.jpg"></center>'
-	act 'Continue': gt 'pav_complexb2','lift'
+	act 'Continue': gt 'pav_complexb2','lift',$ARGS[1]
 end
 
 !locked ads

+ 2 - 2
locations/pav_complexb3.qsrc

@@ -198,7 +198,7 @@ if $ARGS[0] = 'lift':
 	minut +=1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator.jpg"></center>'
-	'<center>The elevator in the apartment building is quite old. The building supervisor does his best to keep it running, but it breaks down a lot. Someone put up a <a href="exec:gt ''pav_complexb3'',''elev_objava''">notification</a> in the elevator.</center>'
+	'<center>The elevator in the apartment building is quite old. The building supervisor does his best to keep it running, but it breaks down a lot. Someone put up a <a href="exec:gt ''pav_complexb3'',''elev_objava'',$ARGS[1]">notification</a> in the elevator.</center>'
 	act 'Push button: Floor 1': gt 'pav_complexb3','etaj_1'
 	act 'Push button: Floor 2': gt 'pav_complexb3','etaj_2'
 	act 'Push button: Floor 3': gt 'pav_complexb3','etaj_3'
@@ -231,7 +231,7 @@ if $ARGS[0] = 'elev_objava':
 		minut +=1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator_ob'+rand(1,2)+'.jpg"></center>'
-	act 'Continue': gt 'pav_complexb3','lift'
+	act 'Continue': gt 'pav_complexb3','lift',$ARGS[1]
 end
 
 !locked ads

+ 30 - 25
locations/pav_discoev1.qsrc

@@ -1317,26 +1317,27 @@ if $ARGS[0] = 'katja_marcus_start':
 	if hour > 19: discobloc['A14'] = daystart
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_dance.jpg"></center>'
 	if katjaQW['marcus_disco'] = 0:
-		'Katja leans into you again and whisper "So the door to the corridor next to the women''s toilet is not closed, go through that door and take the first left which will lead to a staircase taking you to the maintenance basement. Down there nobody will hear us."'
-		'"I will go first telling anybody that is that is curious I am tired and going home, if you then go get Marcus and come join me." she says. It is clear that she is very serious about not letting anybody know  about her sex life, when she can come up whit such an elaborate plan in her very horny state' 
-		'You agree to doing it this way and Katja goes to leave,'+iif( discoenable['A15'] = 1, ', and when Vicky ask her where she is going she says to the toilet and then home because she is tired and Vicky seems convinced.', ' nobody stopping her on the way out.')
+		'Katja leans into you and whispers "So the door to the corridor next to the women''s toilet isn''t closed. Go through there and take the first left, which will lead to a staircase taking you to the maintenance basement. Nobody will hear us down there."'
+		'"I''ll go first, telling everyone I''m tired and going home. You get Marcus and join me." It''s clear that she''s very serious about not letting anybody know about her sex life when she can come up with such an elaborate plan in her very horny state.' 
+		'You agree to her plan and Katja '+iif( discoenable['A15'] = 1, ' tells Vicky that she''s going to the toilet before heading home because she''s tired. Vicky seems convinced.', ' heads out without anyone stopping her on the way.')
 	else
-		'Katja leans into you again and whisper "You remember how we did it last time?" You affirm that you do adn she answers "Okay then I will leave and you go get Marcus."'
-		'Katja turns and leaves'+iif( discoenable['A15'] = 1, ', and when Vicky ask her where she is going she says to the toilet and then home because she is tired Vicky seems convinced.', ' nobody stopping her on the way out.')
+		'Katja leans into you and whispers "You remember how we did it last time?" You nod and she smiles. "Okay. Go and get Marcus."'
+		'Katja turns and leaves'+iif( discoenable['A15'] = 1, ', telling Vicky that she''s going to the toilet before heading home because she''s tired. Vicky seems convinced.', ' with nobody stopping her on her way out.')
 	end
-	act 'Go get Marcus':
+	act 'Get Marcus':
 		*clr & cla
 		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/marcus_grind2.jpg"></center>'
-		'You see Marcus on the dance floor, and move over to him. Grinding yourself against him you lean in and whisper "Up for some fun with me and Katja?" His face turn into a huge grin "Always" he answers.'
+		'You see Marcus on the dance floor, and move over to him. Grinding yourself against him you lean in and whisper in his ear. "Up for some fun with me and Katja?"' 
+		'A huge grin appears on his face. "Always!"'
 		if katjaQW['marcus_disco'] = 0:
 			katjaQW['marcus_disco'] = 1
-			'You give him Katja''s directions and he says he will follow in a few minutes not to raise suspension'
+			'You give him Katja''s directions and he says he will follow you in a few minutes so he doesn''t raise any suspicion'
 		else
-			'You tell him to meet you in the same place as last ans he says he will follow in a few minutes.'
+			'You tell him to meet you in the same place as last time and he says he will follow you in a few minutes.'
 		end	
-		act 'Go to meet Katja in the basement': gt 'pav_discoev1', 'marcus_katja_disco'
+		act 'Meet Katja in the basement': gt 'pav_discoev1', 'marcus_katja_disco'
 	end
 end
 
@@ -1346,56 +1347,60 @@ if $ARGS[0] = 'marcus_katja_disco':
 	minut += 5
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks1.jpg"></center>'
-	'You go down to the basement maintenance area where you told Katja to go wait. As you turn a corner you find her waiting in a open area right where she said she would wait. "I talked to him and he said he would come down in a few minutes so it isn''t so obvious he was leaving about when we did." Katja blushes a bit, but nods and smiles.'
+	'You head down to the basement and find Katja waiting. "I talked to him. He''ll be down in a few minutes."' 
+	'Katja blushes, but nods and smiles.'
 	act 'Wait for Marcus':
 		*clr & cla
 		minut += 8
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks2.jpg"></center>'
-		'Katja and you talk a little while you wait on Marcus, it doesn''t take him to long to show up. Once he does he just smiles then says. "Come of girls get out of those clothes and show me those sexy bodies." Katja and you share a giggle at that and then start taking off each others clothes, while Marcus watches. He pulls down his pants and starts stroking his cock, it is hard before the two of you are naked. He interrupts the two of you, "Why don''t one of you come over and suck my dick."'
+		'You chat while waiting for Marcus, who doesn''t take long to show up. He smiles when he sees you. "Come on girls, get out of those clothes and show me those sexy bodies." Youand Katja giggle and start taking off each other''s clothes off while Marcus watches. He pulls down his pants and starts stroking his cock. "Why don''t you come over here and suck my dick?"'
 		act 'Give him a blowjob':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks3.jpg"></center>'
-			'You move away from Katja and drop to your knees in front of Marcus, you take his massive dick in your mouth and start sucking on it. He moans when you do, as you bob your head up and down you can feel Katja coming over to kneel next to you.'
+			'You drop to your knees in front of Marcus, take his massive dick in your mouth and start sucking on it. He moans as you bob your head up and down and Katja kneels next to you.'
 			gs 'arousal', 'bj', 2, 'group'
 			gs 'stat'
 			act 'Offer his cock to Katja':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks4.jpg"></center>'
-				'You pull his cock out of your mouth and offer it to Katja who immediately takes his dick as deeply as she can into her mouth and starts sucking him off as best she can, you can tell she is excited by how hard she is trying to suck him off. As Katja sucks him off he looks at you and says. "Get up on that stool over there." You look over to see a stool, you move over to take a seat on it. Once you do he pulls out of her mouth and comes over, grabbing your legs he spreads them wide until he is standing between them.'
+				'You pull his cock out of your mouth and offer it to Katja, who immediately takes his dick as deeply as she can into her mouth and starts sucking him off as best she can. You can tell she is excited by how hard she is trying. As Katja sucks him off, he looks at you. "Get up on that stool over there."' 
+				'You look over to see a stool and move to take a seat on it. Once you do, he pulls out of Katja''s mouth and walks over to you, grabbing your legs and spreading them wide until he is standing between them.'
 				gs 'arousal', 'voyeur_sex', 2, 'group'
 				gs 'stat'
 				act 'Get fucked':
 					*clr & cla
 					gs 'boyStat', 'A146'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks5.jpg"></center>'
-					'He rubs the tip of his dick against your wet slit, making you moan softly then he gentle slides his <<dick>>cm <<$dick_girth>> cock into your twat, filling and stretching it out. You moan loudly as he pushes in, filling you completely. Katja squats down next to you to watch as he starts slowly fucking you, but he starts picking up the pace a bit the louder you moan.'
+					'He rubs the tip of his dick against your wet slit, making you moan softly before he gently slides his <<dick>>cm <<$dick_girth>> cock into your pussy, filling and stretching it out. You moan loudly as he pushes in, filling you completely. Katja squats down next to you to watch as he starts slowly fucking you, but slowly picking up pace the louder you moan.'
 					gs 'arousal', 'vaginal', 2, 'group'
 					gs 'stat'
 					act 'Watch':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks6.jpg"></center>'
-						'Without warning he pulls out of you and turns until his cock is right in front of Katja''s face, she greedily starts sucking on his glistening wet cock. Sucking your pussy juices off it, you put your hand on the back of her head to encourage her to take his cock as deep as she can. Then he takes a step back pulling his cock out of her mouth. "Switch places girls." You get off the stool, Katja pulls off the last of her clothes and climbs on the stool spreading her legs.'
+						'Without warning, he pulls out of you and turns so his cock is in front of Katja''s face. She greedily starts sucking on his glistening wet cock, sucking your pussy juices off it as you put your hand on the back of her head to encourage her to take his cock as deep as she can.' 
+						'He then takes a step back, pulling his cock out of her mouth. "Switch places girls." You get off the stool as Katja pulls off the last of her clothes and climbs on the stool before spreading her legs.'
 						gs 'arousal', 'voyeur_sex', 1, 'group'
 						gs 'stat'
 						act 'Watch Katja get fucked':
 							*clr & cla
 							minut -= 3
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks7.jpg"></center>'
-							'You squat down where Katja just was and watch him do the same to her, he rubs the tip of his wet dick against her slit getting both even wetter then he slides it in, causing her to cry out a bit and moan loudly. He starts fucking her slowly but picks up his pace the louder she moans, you reach down with one hand and start rubbing your clit while you watch Katja get fucked.'
+							'You squat down and watch him do the same to her. He rubs the tip of his wet dick against her slit, getting both even wetter before he slides it in, causing her to cry out a little and moan loudly. He starts fucking her slowly, but picks up his pace the louder she moans as you reach down with one hand and start rubbing your clit as you watch Katja get fucked.'
 							gs 'arousal', 'clit_finger', 3, 'group', 'masturbate'
 							gs 'arousal', 'voyeur_sex', 3, 'group'
 							gs 'stat'
 							act 'Suck Marcus''s cock':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks8.jpg"></center>'
-								'Just as Katja is really starting to moan loudly he pulls out of her and turns and puts his cock right in your face. You start sucking it and you can taste Katja''s wetness on it. As you suck his dick you keep rubbing your clit. While you suck him off and play with yourself he tells Katja. "Get up and bend over the stool." She quickly does as he asks.'
+								'Just as Katja is really getting into it, he pulls out of her and shoves his cock in your face. You start sucking it, tasting Katja''s wetness on it. You keep rubbing your clit while you suck him off as he looks at Katja. "Get up and bend over the stool." She quickly does as he asks.'
 								gs 'arousal', 'bj', 1, 'group'
 								gs 'stat'
 								act 'Watch Katja get fucked again':
 									*clr & cla
 									minut -= 3
 									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks9.jpg"></center>'
-									'He pulls his dick out of your mouth and gets behind Katja, he quickly slides his dick back into her dripping wet pussy. He is soon pounding her pretty hard and fast, causing her to moan louder and louder, after a couple of minutes she starts to tremble and cryout loudly as she has a orgasm that makes her nearly fall. Only Marcus strong arms and her leaning against the stool keeps her on her feet, once her orgasm passes he pulls out of her and presents his dick back to you again.'
+									'He pulls his dick out of your mouth and moves behind Katja, quickly sliding his dick back into her dripping wet pussy. He is soon pounding her pretty hard and fast, causing her to moan louder and louder. After a few minutes, she starts to tremble and cry out loudly as she has an orgasm that makes her nearly fall over. Only Marcus''s strong arms and her leaning against the stool keeps her on her feet.'
+									'Once her orgasm passes, he pulls out of her and presents his dick to you again.'
 									gs 'arousal', 'voyeur_sex', 3, 'group'
 									gs 'arousal', 'clit_finger', 3, 'group', 'masturbate'
 									gs 'stat'
@@ -1403,20 +1408,20 @@ if $ARGS[0] = 'marcus_katja_disco':
 										*clr & cla
 										minut -= 1
 										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks10.jpg"></center>'
-										'You suck on his wet cock again, as you do you keep rubbing your clit. Katja slides off the stool and rests a bit to catch her breath after her orgasm. Almost as soon as Katja is out of the way he pulls you up and then pushes you towards the stool.'
+										'You suck on his wet cock again as you keep rubbing your clit. Katja slides off the stool and rests to catch her breath. Almost as soon as Katja is out of the way, he pulls you up and pushes you towards the stool.'
 										gs 'arousal', 'bj', 1, 'group'
 										gs 'arousal', 'clit_finger', 1, 'group', 'masturbate'
 										gs 'stat'
 										act 'Turn around':
 											*clr & cla
 											'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks11.jpg"></center>'
-											'You turn around and bend over the stool, knowing what he wants. You are barely even turned around before you feel his massive dick slide back into your soaking wet vag. You moan loudly as he fills you up again, he starts fucking you at a medium pace and start speeding up the louder you moan. As he fucks you, Katja recovers and squats down next to the two of you. With in a couple of more minutes he starts grunting and you can feel him tensing up, you can tell he is about to cum.'
+											'You turn around and bend over the stool, knowing what he wants. You''re barely even turned around before you feel his massive dick slide back into your soaking wet pussy. You moan loudly as he fills you up again and starts fucking you at a medium pace, speeding up the louder you moan. As he fucks you, Katja recovers and squats down next to you. Within a few minutes, he starts grunting and you can feel him tensing up inside you.'
 											gs 'arousal', 'vaginal', 3, 'group'
 											gs 'stat'
 											act 'Watch Katja suck Marcus':
 												*clr & cla
 												'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks12.jpg"></center>'
-												'he suddenly jerks his cock out of you, leaving your twat feeling empty suddenly. Katja starts sucking his dick and almost at once he moans loudly, you can tell he is cumming in her mouth. It doesn''t stop her, she keeps sucking his dick as he shoots his load in her mouth. You get off the stool and squat down next to Katja just as he finishes.'
+												'He suddenly pulls his cock out of you, leaving your pussy feeling empty. Katja starts sucking his dick and he moans loudly as he cums in her mouth. This doesn''t stop her, and she keeps sucking his dick as he shoots his load down her throat. You get off the stool and squat down next to Katja just as he finishes.'
 												gs 'arousal', 'voyeur_sex', 1, 'group'
 												gs 'stat'
 												act 'Share cum':
@@ -1424,10 +1429,10 @@ if $ARGS[0] = 'marcus_katja_disco':
 													minut += 10
 													katjaQW['horny'] = 0
 													'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/marcus_katja_sveta/mks13.jpg"></center>'
-													'Instead of swallowing she keeps up so she is looking down at you, at first she starts kissing you. As she does you can taste his salty coming, then as you open your mouth she opens hers and lets his cum drop from her mouth into yours. Marcus is catching his breath watching. "Fuck that is hot as hell." Once she is finished you swallow down the cum that ended up in your mouth and she does the same.'
+													'Instead of swallowing, she starts kissing you. You can taste his salty cum on her tongue before you open your mouth and she spits his cum into your mouth. Marcus is catching his breath as he watches. "Fuck, that''s hot as hell!" Once she''s finished, you swallow and she does the same.'
 													*nl
-													'Marcus starts to get dressed after that, as he does he says. "We need to do this again sometime."'
-													'You glance over at Katja who blushes bright red, but returns your look and nods. Then she quickly starts getting dressed, you turn back to him. "We would love that, we''ll let you know." He just chuckles at that, soon all three of you are dressed again. Katja leaves first, then Marcus leaves, as you finish getting dressed. Leaving you to wait a few minutes alone before you leave.'
+													'Marcus starts getting dressed after that. "We need to do this again sometime."'
+													'You glance over at Katja, who blushes bright red but returns your look and nods. She quickly starts getting dressed as you turn back to him. "We''ll let you know." He just chuckles and you all get dressed before taking turns leaving.'
 													gs 'arousal', 'kiss', 1, 'group'
 													gs 'arousal', 'end'
 													gs 'cum_call', 'mouth', 'A146', 1

+ 5 - 4
locations/pav_factory.qsrc

@@ -21,21 +21,22 @@ if $ARGS[0] = 'tailor':
 	if money >= 500:
 		act 'Resize the clothes you''re wearing (500 <b>₽</b>)':
 			*clr & cla
-			minut += 15
+			minut += 10
 			if CloStyle = 5 or $clothingworntype = 'danilovich_outfits':
 				'The tailor is looking irritatingly at you, "Why are you wasting my time with exercise clothing? That type of clothing does not need to be resized..."'
 			elseif dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') = pcs_hips:
 				'The tailor is looking irritatingly at you, "Is this joke? Your clothes could not fit you better if they had been made for you. I have no time for such foolishness."'
-			elseif (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') > pcs_hips + 8) or (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') < pcs_hips - 8):
+			elseif (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') > pcs_hips + 4) or (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') < pcs_hips - 4):
 				'The tailor is looking irritatingly at you, "Why are you wasting my time? Your clothing does not need to be resized. It might not be perfect but it is still fine."'
 			else
 				money -= 500
 				dynamic '<<$clothingworntype>>_b[<<clothingwornnumber>>] = pcs_hips'
-				'You are handed a t-shirt and shorts as you undress and give the clothes to the tailor for adjustment. The tailor is fast and only takes fifteen minutes until your clothes are ready.'
+				'You are handed a t-shirt and shorts as you undress and give the clothes to the tailor for adjustment.'
+				'He quickly measures your waist and hips, then only takes a few minutes to adjust your outfit.'
 				'You are handed your clothes back and quickly get dressed. You''re pleased with the job that the tailor has done.'
 			end
 
-			act 'Leave': minut += 5 & gt 'pav_industrial'
+			act 'Continue': gt 'pav_factory', 'tailor'
 		end
 
 		act 'Resize your other clothes':gt 'clothing', 'view_clothing_list', 'resize'

Alguns ficheiros não foram mostrados porque muitos ficheiros mudaram neste diff