Bladeren bron

Merge remote-tracking branch 'origin/master' into music-mechanics-0.8.9

netuttki 1 jaar geleden
bovenliggende
commit
e207e26c94
100 gewijzigde bestanden met toevoegingen van 11272 en 6763 verwijderingen
  1. 6 0
      glife.qproj
  2. 3493 3431
      locations/Cheatmenu_din.qsrc
  3. 15 13
      locations/DNA.qsrc
  4. 65 0
      locations/NPCFinder.qsrc
  5. 1 1
      locations/Zvereva_house_events.qsrc
  6. 60 0
      locations/_attributes_nerdvana_outfits.qsrc
  7. 550 31
      locations/albina_chat.qsrc
  8. 1 0
      locations/albina_starlets.qsrc
  9. 105 105
      locations/albinahome.qsrc
  10. 15 15
      locations/alexandriaChat.qsrc
  11. 16 16
      locations/alexandriaSex.qsrc
  12. 5 5
      locations/anushkachat.qsrc
  13. 3 3
      locations/artem_sex.qsrc
  14. 2 692
      locations/bed2.qsrc
  15. 3 3
      locations/begin.qsrc
  16. 80 30
      locations/booty_call.qsrc
  17. 242 99
      locations/booty_call_after.qsrc
  18. 19 17
      locations/booty_call_condoms.qsrc
  19. 7 7
      locations/booty_call_cowgirl.qsrc
  20. 165 46
      locations/booty_call_cum.qsrc
  21. 1 1
      locations/booty_call_doggy.qsrc
  22. 2 4
      locations/booty_call_miss.qsrc
  23. 913 149
      locations/booty_call_morning.qsrc
  24. 116 213
      locations/booty_call_pillow_talk.qsrc
  25. 753 0
      locations/booty_call_pillow_talk2.qsrc
  26. 298 4
      locations/booty_call_sex.qsrc
  27. 370 20
      locations/booty_call_shower.qsrc
  28. 3 3
      locations/booty_call_sms.qsrc
  29. 4 0
      locations/booty_call_start.qsrc
  30. 7 0
      locations/booty_call_stats.qsrc
  31. 6 5
      locations/booty_call_talk.qsrc
  32. 1 1
      locations/brother.qsrc
  33. 1586 0
      locations/brother_shower_sex.qsrc
  34. 283 421
      locations/brother_voyeur.qsrc
  35. 6 3
      locations/brother_voyeur_sex.qsrc
  36. 6 6
      locations/cikl.qsrc
  37. 12 12
      locations/city_center.qsrc
  38. 7 8
      locations/city_clinic.qsrc
  39. 1 1
      locations/city_nightclub.qsrc
  40. 3 3
      locations/city_sauna.qsrc
  41. 9 1
      locations/clothing.qsrc
  42. 96 5
      locations/clothing_QV.qsrc
  43. 1 0
      locations/dimaHome.qsrc
  44. 3 3
      locations/dimaRevenge.qsrc
  45. 67 5
      locations/din_bad.qsrc
  46. 2 2
      locations/din_van.qsrc
  47. 278 0
      locations/emp_functions.qsrc
  48. 124 0
      locations/emp_job_array.qsrc
  49. 0 1
      locations/event.qsrc
  50. 4 4
      locations/exercise.qsrc
  51. 21 15
      locations/fit.qsrc
  52. 77 5
      locations/food.qsrc
  53. 30 8
      locations/foto.qsrc
  54. 1 1
      locations/gopsex.qsrc
  55. 47 47
      locations/gschool_chats.qsrc
  56. 3 3
      locations/gschool_detention.qsrc
  57. 62 62
      locations/gschool_events.qsrc
  58. 7 0
      locations/gschool_grounds.qsrc
  59. 10 10
      locations/gschool_lessonsev1.qsrc
  60. 9 9
      locations/gschool_lessonsev2.qsrc
  61. 61 61
      locations/gschool_socialchg.qsrc
  62. 7 1
      locations/hookup.qsrc
  63. 2 2
      locations/hunter_favors.qsrc
  64. 1 0
      locations/intro_city.qsrc
  65. 0 7
      locations/intro_city_select.qsrc
  66. 10 0
      locations/intro_initialization.qsrc
  67. 7 0
      locations/intro_initialization_city.qsrc
  68. 0 7
      locations/intro_sg_select.qsrc
  69. 0 7
      locations/intro_sg_tg.qsrc
  70. 1 0
      locations/intro_uni.qsrc
  71. 12 14
      locations/journal_work.qsrc
  72. 30 30
      locations/katja_chat.qsrc
  73. 7 2
      locations/korrPar.qsrc
  74. 1 1
      locations/lact_bp.qsrc
  75. 2 2
      locations/marisha_ev.qsrc
  76. 1 1
      locations/medical_din.qsrc
  77. 10 12
      locations/metro.qsrc
  78. 117 121
      locations/metro_events.qsrc
  79. 29 29
      locations/misha.qsrc
  80. 13 13
      locations/mother_sextalk.qsrc
  81. 147 146
      locations/natbel_friend.qsrc
  82. 121 82
      locations/nichApartment.qsrc
  83. 14 14
      locations/nichBedroomServant.qsrc
  84. 1 1
      locations/nichBedroomTanja.qsrc
  85. 3 3
      locations/nichChore.qsrc
  86. 3 3
      locations/nichLivingroom.qsrc
  87. 313 355
      locations/nichTanya.qsrc
  88. 28 58
      locations/nichUtil.qsrc
  89. 5 0
      locations/npcgeneratec.qsrc
  90. 5 0
      locations/npcpreservec.qsrc
  91. 1 8
      locations/npcstatic1.qsrc
  92. 2 2
      locations/nyp_school.qsrc
  93. 6 1
      locations/obj_din.qsrc
  94. 2 0
      locations/orgasm.qsrc
  95. 8 9
      locations/pav_clinic.qsrc
  96. 0 2
      locations/pav_complex.qsrc
  97. 26 26
      locations/pav_disco_coolkids.qsrc
  98. 32 32
      locations/pav_disco_gopniks.qsrc
  99. 9 9
      locations/pav_disco_jocks.qsrc
  100. 153 153
      locations/pav_disco_sex.qsrc

+ 6 - 0
glife.qproj

@@ -460,6 +460,7 @@
 		<Location name="brother2"/>
 		<Location name="brother_voyeur"/>
 		<Location name="brother_voyeur_sex"/>
+		<Location name="brother_shower_sex"/>
 		<Location name="brother_lessons"/>
 		<Location name="seeporn"/>
 	</Folder>
@@ -558,6 +559,10 @@
 		<Location name="fbGar"/>
 		<Location name="zsoft_gopskverGorSlut"/>
 	</Folder>
+	<Folder name="Employment Systems">
+		<Location name="emp_functions"/>
+		<Location name="emp_job_array"/>
+	</Folder>
 	<Folder name="Fedor">
 		<Location name="FedorEv"/>
 		<Location name="FedorEv2"/>
@@ -657,6 +662,7 @@
 		<Location name="booty_call_miss"/>
 		<Location name="booty_call_morning"/>
 		<Location name="booty_call_pillow_talk"/>
+		<Location name="booty_call_pillow_talk2"/>
 		<Location name="booty_call_sex"/>
 		<Location name="booty_call_shower"/>
 		<Location name="booty_call_sms"/>

+ 3493 - 3431
locations/Cheatmenu_din.qsrc

@@ -1,3431 +1,3493 @@
-# Cheatmenu_din
-
-*clr & cla
-
-!All the active dynamics for the cheat menu are here
-$cheatmenu['empty'] = {
-	!Yes, intentionally empty, do not remove it
-}
-
-$cheatmenu['work'] = {
-	if cheatWork = 0:
-		cheatWork = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatWork = 1:
-		cheatWork = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['willpower'] = {
-	if cheatWillpower = 0:
-		cheatWillpower = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatWillpower = 1:
-		cheatWillpower = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['hair'] = {
-	if cheatHapri = 0:
-		cheatHapri = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatHapri = 1:
-		cheatHapri = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['enema'] = {
-	if cheatKlisma = 1:
-		cheatKlisma = 0
-		dynamic $cheatmenu['setting']
-		exit
-	elseif cheatKlisma = 0:
-		cheatKlisma = 1
-		dynamic $cheatmenu['setting']
-	end
-}
-
-$cheatmenu['nomakeup'] = {
-	if cheatNomakeup = 0:
-		cheatNomakeup = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNomakeup = 1:
-		cheatNomakeup = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['nosweat'] = {
-	if cheatNoSweat = 0:
-		cheatNoSweat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoSweat = 1:
-		cheatNoSweat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['noEat'] = {
-	if cheatNoEat = 0:
-		cheatNoEat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoEat = 1:
-		cheatNoEat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['noDrink'] = {
-	if cheatNoDrink = 0:
-		cheatNoDrink = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoDrink = 1:
-		cheatNoDrink = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['noSleep'] = {
-	if cheatNoSleep = 0:
-		cheatNoSleep = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoSleep = 1:
-		cheatNoSleep = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['noMood'] = {
-	if cheatNoMood = 0:
-		cheatNoMood = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoMood = 1:
-		cheatNoMood = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['noFat'] = {
-	if cheatNoFat = 0:
-		cheatNoFat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatNoFat = 1:
-		cheatNoFat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['health'] = {
-	if cheatHealth = 0:
-		cheatHealth = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatHealth = 1:
-		cheatHealth = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['fight'] = {
-	if fight_cheat = 0:
-		fight_cheat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif fight_cheat = 1:
-		fight_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['autocombat'] = {
-	if autocombat_cheat = 0:
-		autocombat_cheat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif autocombat_cheat = 1:
-		autocombat_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['age'] = {
-	:tooyoung
-	age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-	if ((month * 100) + day) <= pcs_dob mod 10000: age -= 1
-	if age < 15: pcs_dob -= 10000 & jump 'tooyoung'
-	dynamic $cheatmenu['looks']
-}
-
-$cheatmenu['visualage'] = {
-	vidage = input("For how many years you want to look?")
-	if vidage <= 14: vidage = 14
-	dynamic $cheatmenu['looks']
-}
-
-$cheatmenu['money'] = {
-	money = input("How much money do you want to have?")
-	if money < 0:money = 0
-	dynamic $cheatmenu['state']
-}
-
-$cheatmenu['bank_money'] = {
-	karta = input ("How much money do you want to have in the bank?")
-	if karta < 0: karta = 0
-	dynamic $cheatmenu['state']
-}
-
-$cheatmenu['bodyMod'] = {
-	*clr & cla
-	act 'Return to last menu': dynamic $cheatmenu['state']
-
-	'<center><h1>Cheat Menu - Body Modification</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	'<center><b><font color="red">WARNING!</font></b></center>'
-	'Changing body shape does not resize clothes.'
-	'May cause adverse interactions, use at your own risk!'
-	''
-	'You are currently <<$body>>.'
-	''
-	'You may select from the following sizes:'
-	''
-	if bodset ! 3:
-		'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
-		''
-		if salocatnow ! 1:
-			'<a href="exec:salo = 20 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
-			''
-		end
-		if salocatnow ! 2:
-			'<a href="exec:salo = 40 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
-			''
-		end
-		if salocatnow ! 3:
-			'<a href="exec:salo = 60 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
-			''
-		end
-		if salocatnow ! 4:
-			'<a href="exec:salo = 80 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
-			''
-		end
-		if salocatnow ! 5:
-			'<a href="exec:salo = 100 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
-			''
-		end
-		if salocatnow ! 6:
-			'<a href="exec:salo = 120 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
-			''
-		end
-		if salocatnow ! 7:
-			'<a href="exec:salo = 140 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
-			''
-		end
-	else
-		if (pregchem < 2688) = 0:
-			'<a href="exec:pregchem = 100 & pregtime = 4 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10))]>></a>'
-			''
-		end
-		if (pregchem >= 2688 and pregchem < 3192) = 0:
-			'<a href="exec:pregchem = 2688 & pregtime = 112 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
-			''
-		end
-		if (pregchem >= 3192 and pregchem < 3696) = 0:
-			'<a href="exec:pregchem = 3192 & pregtime = 133 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
-			''
-		end
-		if (pregchem >= 3696 and pregchem < 4200) = 0:
-			'<a href="exec:pregchem = 3696 & pregtime = 154 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
-			''
-		end
-		if (pregchem >= 4200 and pregchem < 4704) = 0:
-			'<a href="exec:pregchem = 4200 & pregtime = 175 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
-			''
-		end
-		if (pregchem >= 4704 and pregchem < 5208) = 0:
-			'<a href="exec:pregchem = 4704 & pregtime = 196 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
-			''
-		end
-		if (pregchem >= 5208 and pregchem < 5712) = 0:
-			'<a href="exec:pregchem = 5208 & pregtime = 217 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
-			''
-		end
-		if (pregchem >= 5712 and pregchem < 6216) = 0:
-			'<a href="exec:pregchem = 5712 & pregtime = 238 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
-			''
-		end
-		if (pregchem >= 6216) = 0:
-			'<a href="exec:pregchem = 6216 & pregtime = 259 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 8)]>></a>'
-			''
-		end
-	end
-
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['addict'] = {
-	if NarkImmune = 0:
-		NarkImmune = 1
-		smoker = 0
-		smokerNeed = 0
-		joint_count = 0
-		alcohol_count = 0
-		cocaine_count = 0
-		amphetamine_count = 0
-		SNarkTimes = 0
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif NarkImmune = 1:
-		NarkImmune = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['cheatHorny'] = {
-	if cheatHorny = 0:
-		cheatHorny = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatHorny = 1:
-		cheatHorny = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-$cheatmenu['slutshot'] = {
-	if cheatSlut = 0:
-		cheatSlut = 1
-		cycle = 6
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatSlut = 1:
-		cheatSlut = 0
-		cycle = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['cheat_NoPregnancy'] = {
-	if cheat_NoPregnancy = 1:
-		killvar 'cheat_NoPregnancy'
-		dynamic $cheatmenu['permanent']
-	else
-		cheat_NoPregnancy = 1
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['cheat_NoLactation'] = {
-	if cheat_NoLactation = 1:
-		killvar 'cheat_NoLactation'
-		dynamic $cheatmenu['permanent']
-	else
-		cheat_Nolactation = 1
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['Vibrator'] = {
-	if cheatVib = 0:
-		cheatVib = 1
-		bedvibrator = 1
-		dynamic $cheatmenu['permanent']
-	elseif cheatVib = 1:
-		cheatVib = 0
-		bedvibrator = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['BimboCloth'] = {
-	if cheatBimbo = 0:
-		cheatBimbo = 1
-		dynamic $cheatmenu['permanent']
-		bimbo = 0
-		bimbolevel = 0
-		bimbowithdrawal = 0
-	elseif cheatBimbo = 1:
-		cheatBimbo = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['SmartBimbo'] = {
-	if cheatBimbo2 = 0:
-		cheatBimbo2 = 1
-		dynamic $cheatmenu['permanent']
-		bimbostupidity = 0
-	elseif cheatBimbo2 = 1:
-		cheatBimbo2 = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['SuccuBimbo'] = {
-	if cheatBimbo3 = 0:
-		cheatBimbo3 = 1
-		dynamic $cheatmenu['permanent']
-		bimbostupidity = 0
-	elseif cheatBimbo3 = 1:
-		cheatBimbo3 = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['exhib_block'] = {
-	if exhib_cheat = 0:
-		exhib_cheat = 1
-		dynamic $cheatmenu['permanent']
-		pcs_exhib = 0
-		Exhibitionist_lvl = 0
-	elseif exhib_cheat = 1:
-		exhib_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['addictive_block'] = {
-	if addictive_cheat = 0:
-		addictive_cheat = 1
-		smoke_exp = 0
-		joint_exp = 0
-		heroin_exp = 0
-		cocaine_exp = 0
-		amphetamine_exp = 0
-		alcohol_exp = 0
-		addictive_exp = 0
-		addictive_trait_lvl = 0
-		dynamic $cheatmenu['permanent']
-	elseif addictive_cheat = 1:
-		addictive_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['cumtrait_block'] = {
-	if cumeater_cheat = 0:
-		cumeater_cheat = 1
-		dynamic $cheatmenu['permanent']
-		trait['cumeater'] = 0
-	elseif cumeater_cheat = 1:
-		cumeater_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['consolecheat'] = {
-	if cheatConsole = 0:
-		cheatConsole = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatConsole = 1:
-		cheatConsole = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['timecheat'] = {
-	if cheatTime = 0:
-		cheatTime = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif cheatTime = 1:
-		cheatTime = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['random_bf_gf'] = {
-	if random_bf_gf_cheat = 0:
-		random_bf_gf_cheat = 1
-		dynamic $cheatmenu['permanent']
-		exit
-	elseif random_bf_gf_cheat = 1:
-		random_bf_gf_cheat = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['street_robbers'] = {
-	if cheat_street_robbers = 0:
-		cheat_street_robbers = 1
-		dynamic $cheatmenu['permanent']
-	elseif cheat_street_robbers = 1:
-		cheat_street_robbers = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['street_rapists'] = {
-	if cheat_street_rapists = 0:
-		cheat_street_rapists = 1
-		dynamic $cheatmenu['permanent']
-	elseif cheat_street_rapists = 1:
-		cheat_street_rapists = 0
-		dynamic $cheatmenu['permanent']
-	end
-}
-
-$cheatmenu['permanent'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	if cheatWork = 0:$cheatWork = 'Currently OFF'
-	if cheatWork = 1:$cheatWork = 'Currently ON'
-	if cheatWillpower = 0:$cheatWillpower = 'Currently OFF'
-	if cheatWillpower = 1:$cheatWillpower = 'Currently ON'
-	if cheatHapri = 0:$cheatHapri = 'Currently OFF'
-	if cheatHapri = 1:$cheatHapri = 'Currently ON'
-	if cheatKlisma = 1:$cheatKlisma = 'Currently OFF'
-	if cheatKlisma = 0:$cheatKlisma = 'Currently ON'
-	if cheatNomakeup = 0:$cheatNomakeup = 'Currently OFF'
-	if cheatNomakeup = 1:$cheatNomakeup = 'Currently ON'
-	if cheatNoSweat = 0:$cheatNoSweat = 'Currently OFF'
-	if cheatNoSweat = 1:$cheatNoSweat = 'Currently ON'
-	if cheatNoEat = 0:$cheatNoEat = 'Currently OFF'
-	if cheatNoEat = 1:$cheatNoEat = 'Currently ON'
-	if cheatNoDrink = 0:$cheatNoDrink = 'Currently OFF'
-	if cheatNoDrink = 1:$cheatNoDrink = 'Currently ON'
-	if cheatNoSleep = 0:$cheatNoSleep = 'Currently OFF'
-	if cheatNoSleep = 1:$cheatNoSleep = 'Currently ON'
-	if cheatNoMood = 0:$cheatNoMood = 'Currently OFF'
-	if cheatNoMood = 1:$cheatNoMood = 'Currently ON'
-	if cheatNoFat = 0:$cheatNoFat = 'Currently OFF'
-	if cheatNoFat = 1:$cheatNoFat = 'Currently ON'
-	if cheatHealth = 0:$cheatHealth = 'Enabled'
-	if cheatHealth = 1:$cheatHealth = 'Disabled'
-	if NarkImmune = 0:$NarkImmune = 'Currently OFF'
-	if NarkImmune = 1:$NarkImmune = 'Currently ON'
-	if cheatSlut = 0:$cheatSlut = 'Enabled'
-	if cheatSlut = 1:$cheatSlut = 'Disabled'
-	if cheatHorny = 0:$cheatHorny = 'Currently OFF'
-	if cheatHorny = 1:$cheatHorny = 'Currently ON'
-	if bedvibrator = 0:$cheatVib = 'Currently OFF'
-	if bedvibrator = 1:$cheatVib = 'Currently ON'
-	if fight_cheat = 0:$fight_cheat = 'Currently OFF'
-	if fight_cheat = 1:$fight_cheat = 'Currently ON'
-	if autocombat_cheat = 0:$autocombat_cheat = 'Currently OFF'
-	if autocombat_cheat = 1:$autocombat_cheat = 'Currently ON'
-	if cheat_NoPregnancy = 0:$cheat_NoPregnancy = 'Enabled'
-	if cheat_NoPregnancy = 1:$cheat_NoPregnancy = 'Disabled'
-	if cheat_NoLactation = 0:$cheat_NoLactation = 'Enabled'
-	if cheat_NoLactation = 1:$cheat_NoLactation = 'Disabled'
-	if cheatBimbo = 0:$cheatBimbo = 'Enabled'
-	if cheatBimbo = 1:$cheatBimbo = 'Disabled'
-	if cheatBimbo2 = 0:$cheatBimbo2 = 'Disabled'
-	if cheatBimbo2 = 1:$cheatBimbo2 = 'Enabled'
-	if cheatBimbo3 = 0:$cheatBimbo3 = 'Disabled'
-	if cheatBimbo3 = 1:$cheatBimbo3 = 'Enabled'
-	if cumeater_cheat = 0:$cheatcumtrait = 'Enabled'
-	if cumeater_cheat = 1:$cheatcumtrait = 'Disabled'
-	if exhib_cheat = 0:$cheatexhib = 'Enabled'
-	if exhib_cheat = 1:$cheatexhib = 'Disabled'
-	if addictive_cheat = 0: $cheataddictive = 'Enabled'
-	if addictive_cheat = 1: $cheataddictive = 'Disabled'
-	if cheatConsole = 0:$cheatConsole = 'Visible'
-	if cheatConsole = 1:$cheatConsole = 'Hidden'
-	if cheatTime = 0:$cheatTime = 'Disabled'
-	if cheatTime = 1:$cheatTime = 'Enabled'
-	if random_bf_gf_cheat = 0: $random_bf_gf_cheat = 'Enabled'
-	if random_bf_gf_cheat = 1: $random_bf_gf_cheat = 'Disabled'
-	if cheat_street_robbers = 0: $cheat_street_robbers = 'Enabled'
-	if cheat_street_robbers = 1: $cheat_street_robbers = 'Disabled'
-	if cheat_street_rapists = 0: $cheat_street_rapists = 'Enabled'
-	if cheat_street_rapists = 1: $cheat_street_rapists = 'Disabled'
-
-	'<center><h1>Cheat Menu - Recurrent Cheats</h1></center>'
-	'<center><font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!</center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="450" cellspacing="0" cellpadding="20" valign="top">'
-	'More than one job is possible: <a href="exec:dynamic $cheatmenu[''work'']"><<$cheatWork>></a>'
-	'Willpower cost always zero: <a href="exec:dynamic $cheatmenu[''willpower'']"><<$cheatWillpower>></a>'
-	'Always combed: <a href="exec:dynamic $cheatmenu[''hair'']"><<$cheatHapri>></a>'
-	'Cosmetics never smeared: <a href="exec:dynamic $cheatmenu[''nomakeup'']"><<$cheatNomakeup>></a>'
-	'Never sweat: <a href="exec:dynamic $cheatmenu[''nosweat'']"><<$cheatNoSweat>></a>'
-	'Never eat: <a href="exec:dynamic $cheatmenu[''noEat'']"><<$cheatNoEat>></a>'
-	'Never drink: <a href="exec:dynamic $cheatmenu[''noDrink'']"><<$cheatNoDrink>></a>'
-	'Never sleep: <a href="exec:dynamic $cheatmenu[''noSleep'']"><<$cheatNoSleep>></a>'
-	'Never unhappy: <a href="exec:dynamic $cheatmenu[''noMood'']"><<$cheatNoMood>></a>'
-	'Never lose or gain weight: <a href="exec:dynamic $cheatmenu[''noFat'']"><<$cheatNoFat>></a>'
-	'Never get addicted: <a href="exec:dynamic $cheatmenu[''addict'']"><<$NarkImmune>></a>'
-
-	if Enable_sforma = 1:
-		'Allow any clothing for school: <a href="exec:Enable_sforma = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
-	else
-		'Allow any clothing for school: <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
-	end
-	
-	*nl
-	
-	'Random boyfriend/girlfriend events: <a href="exec:dynamic $cheatmenu[''random_bf_gf'']"><<$random_bf_gf_cheat>></a>'
-	'Random robbers in the streets: <a href="exec:dynamic $cheatmenu[''street_robbers'']"><<$cheat_street_robbers>></a>'
-	'Random rapists in the streets: <a href="exec:dynamic $cheatmenu[''street_rapists'']"><<$cheat_street_rapists>></a>'
-
-	*nl
-
-	'Enable sleeping with vibrator inserted: <a href="exec:dynamic $cheatmenu[''Vibrator'']"><<$cheatVib>></a>'
-
-	*nl
-
-	'Automatically win every fight: <a href="exec:dynamic $cheatmenu[''fight'']"><<$fight_cheat>></a>'
-	'Automatically resolve non-magical fights: <a href="exec:dynamic $cheatmenu[''autocombat'']"><<$autocombat_cheat>></a>'
-
-	*nl
-
-	'Bimbo trait and the effects of wearing bimbo clothes: <a href="exec:dynamic $cheatmenu[''BimboCloth'']"><<$cheatBimbo>></a>'
-	'Exhibitionist trait: <a href="exec:dynamic $cheatmenu[''exhib_block'']"><<$cheatexhib>></a>'
-	'Addictive personality trait: <a href="exec:dynamic $cheatmenu[''addictive_block'']"><<$cheataddictive>></a>'
-	'Cumeater trait: <a href="exec:dynamic $cheatmenu[''cumtrait_block'']"><<$cheatcumtrait>></a>'
-
-	*nl
-
-	'Who says bimbos can''t be smart? Smart bimbo mode: <a href="exec:dynamic $cheatmenu[''SmartBimbo'']"><<$cheatBimbo2>></a>'
-	'Succubus bimbo mode: <a href="exec:dynamic $cheatmenu[''SuccuBimbo'']"><<$cheatBimbo3>></a>'
-	
-	*nl
-
-	'Set arousal to always be at 50 or more: <a href="exec:dynamic $cheatmenu[''cheatHorny'']"><<$cheatHorny>></a>'
-	'Periods (and pregnancies): <a href="exec:dynamic $cheatmenu[''slutshot'']"><<$cheatSlut>></a>'
-	'Impregnation: <a href="exec:dynamic $cheatmenu[''cheat_NoPregnancy'']"><<$cheat_nopregnancy>></a>'
-	'Lactation: <a href="exec:dynamic $cheatmenu[''cheat_NoLactation'']"><<$cheat_nolactation>></a>'
-	'STDs: <a href="exec:dynamic $cheatmenu[''health'']"><<$cheatHealth>></a>'
-
-	*nl
-	if Enable_autotampon = 1:
-		'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
-	else
-		'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
-	end
-	*nl
-	if Enable_nodream > 0:
-		'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']"><<Enable_nodream>>%</a>, <a href="exec:Enable_nodream=0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
-	else
-		'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
-	end & !1.2.3 new function
-	*nl
-	'Hide Console input in objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
-	'Time Cheat in Objects window: <a href="exec:dynamic $cheatmenu[''timecheat'']"><<$cheatTime>></a>'
-	*nl
-
-	'<font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!'
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['therapist_reset'] = {
-	gs 'therapist'
-	dynamic $RestTherapyVariables
-	gs 'stat'
-	dynamic $cheatmenu['state']
-}
-
-$cheatmenu['state'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-
-	'<center><h1>Cheat Menu - Character State Changes</h1></center>'
-	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save. Cheats manipulating pregnancy or the menstrual cycle are'
-	'especially dangerous unless you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	'Set alcohol levels:'
-	'<a href="exec:alko = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Sober</a> <a href="exec:alko = 2 & dynamic $cheatmenu[''state''] & gs ''stat''">Tipsy</a> <a href="exec:alko = 4 & dynamic $cheatmenu[''state''] & gs ''stat''">Drunk</a> <a href="exec:alko = 7 & dynamic $cheatmenu[''state''] & gs ''stat''">Wasted</a> <a href="exec:alko = 11 & dynamic $cheatmenu[''state''] & gs ''stat''">Barely coherent</a>'
-	*nl
-	'<a href="exec:pcs_horny = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Max arousal</a>'
-	'<a href="exec:pcs_horny = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Min arousal</a>'
-	'<a href="exec:dynamic $cheatmenu[''bodyMod'']">Body Modification</a>'
-	*nl
-	'<a href="exec:pcs_health = pcs_vital*10 + pcs_stren*5+1000 & pcs_willpwr = pcs_intel*5 + will*5+1000 & pcs_mana = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo & vgape = 0 & agape = 0 & nippain = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Health, Mana, Reason.</a>'
-	'<a href="exec:pcs_sleep = 100 & pcs_stam = stammax & pcs_mood = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Sleep, Stamina, Mood.</a>'
-	'<a href="exec:pcs_energy = 200 & pcs_hydra = 200 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Hunger and Water.</a>'
-	'<a href="exec:dynamic $cheatmenu[''money''] & gs ''stat''">Change money</a>'
-	'<a href="exec:money = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money</a>'
-	if bankAccount = 1:
-		'<a href="exec:dynamic $cheatmenu[''bank_money''] & gs ''stat''">Change money in the bank</a>'
-		'<a href="exec: karta = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money in the bank</a>'
-	else
-		'<b>You need to open a bank account before getting access to change money in the bank</b>'
-	end
-	'<a href="exec:dynamic $cheatmenu[''std_cure''] & gs ''stat''">Cure all stds</a>'
-	'<a href="exec:vgape = 0 & agape = 0 & nippain = 0 & painpub = 0 & pirs_pain_ton = 0 & mesec = 0 & spanked = 0 & SLomka = 0 & Narkoman = 0 & strongnark = 0 & SNarkTimes = 0 & nark = 0 & fingal = 0 & mosol = 0 & frost = 0 & sick = 0 & hypnoAddict = 0 & hypnoWithdrawal = 0 & dynamic $cheatmenu[''std_cure''] & dynamic $cheatmenu[''pain_killer''] & gs ''stat''">Cure all ailments.</a>'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''force_preg''] & gs ''stat''">Force random pregnancy</a>'
-	'<a href="exec:dynamic $cheatmenu[''remove_preg''] & gs ''stat''">Remove pregnancy</a>'
-	'<a href="exec:gs''cum_cleanup'',''reset'' & dynamic $cheatmenu[''state''] & gs ''stat''">Remove all cum</a>'
-	'<a href="exec:dynamic $cheatmenu[''cycle''] & gs ''stat''">Set stage of menstrual cycle</a>'
-
-	if lactation['active'] <= 0:
-		'You are not lactating'
-		'Your current prolactinlvl is <<lactation[''prolactinlvl'']>>ng/ml.'
-		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch ON</a>'
-	else
-		'You are lactating'
-		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch OFF</a>'
-		if lactation['milkprod_type'] = 1:
-			'The milk production is <a href="exec: lactation[''milkprod_type''] = 0 & dynamic $cheatmenu[''state'']">realistic</a>. <<$pcs_firstname>> will produce breast milk based on her body resources.'
-		elseif lactation['milkprod_type'] = 0:
-			'The milk production is <a href="exec: lactation[''milkprod_type''] = 1 & dynamic $cheatmenu[''state'']">permanent</a>. <<$pcs_firstname>> will produce breast milk disregarding her condition.'
-		else
-			lactation['milkprod_type'] = 1
-		end
-		if lactation['lactaterate'] <= 0:
-			'Lactate Rate: <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
-		elseif lactation['lactaterate'] >= 600000:
-			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h'
-		else
-			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
-			if lactation['caplactaterate'] <= 0:
-				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] = 24 & dynamic $cheatmenu[''state'']">Switch ON</a>'
-			elseif lactation['caplactaterate'] >= 72:
-				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h'
-			else
-				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h <a href="exec:lactation[''caplactaterate''] += 24 & dynamic $cheatmenu[''state'']">+24h</a>'
-			end	
-			'<font color="grey">Cap lactate rate makes lactate rate stop growing if <<$pcs_firstname>> needs milking more often.</font>'
-		end
-		'Milk in Breasts: <<lactation[''breastmv'']/1000>>ml'
-		'Max Milk Storage: <<lactation[''breastmm'']/1000>>ml'
-		'<font color="grey">Maximum milk storage changes with breast size, and if <<$pcs_firstname>> went through pregnancy</font>'
-		if lactation['induced'] <= 0:
-			'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 1 & dynamic $cheatmenu[''state'']">no</a>'
-		else
-			'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 0 & dynamic $cheatmenu[''state'']">yes</a>'
-		end
-		'<font color="grey">Does <<$pcs_firstname>> know she induced lactation herself, or not? (This is only used for some events.)</font>'
-	end
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''therapist_reset'']">Reset therapist states</a>'
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['avatar_hair_set'] = {
-	$av_hair = input("Input your custom hair:")
-	if $av_hair='':exit
-	avatar_hair = 1
-	dynamic $cheatmenu['looks']
-}
-
-$cheatmenu['rename'] = {
-	!! player name is set in preSYS.qsrc
-	$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'
-}
-
-$cheatmenu['looks'] = {
-	*clr & cla
-	if pcs_hgt < 100:
-		pcs_hgt = 100
-	elseif pcs_hgt > 200:
-		pcs_hgt = 200
-	end
-	gs 'obj_din', 'cheattabs'
-	gs'stat'
-	'<center><h1>Cheat Menu - Character Appearance</h1></center>'
-	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
-	*nl
-	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
-	'<tr><td width="33%" cellpadding="20" valign="top">'
-	'<<$pcs_firstname>> <<$pcs_lastname>> (<<$pcs_nickname>>). <a href="exec:dynamic $cheatmenu[''rename'']">Rename</a>'
-	if player_avatar = 1:
-		'Custom Avatar: <a href="exec:player_avatar = 0 & dynamic $cheatmenu[''looks'']">ON</a>'
-	else
-		'Custom Avatar: <a href="exec:player_avatar = 1 & dynamic $cheatmenu[''looks'']">OFF</a>'
-	end
-	if avatar_hair = 1:
-		'<a href="exec:avatar_hair = 0 & dynamic $cheatmenu[''looks'']">Custom Hair: ON</a>'
-		'<<$av_hair>>'
-	else
-		'<a href="exec:dynamic $cheatmenu[''avatar_hair_set'']">Custom Hair: OFF</a>'
-	end
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''parameters'']">Show design parameters of body</a>'
-	'<a href="exec:dynamic $cheatmenu[''vneshpara'']">Show beauty parameters</a>'
-	*nl
-	'You are <a href="exec: pcs_dob += 10000 & dynamic $cheatmenu[''age'']">(-1)</a> <<age>> <a href="exec: pcs_dob -= 10000 & dynamic $cheatmenu[''age'']">(+1)</a> years old'
-	*nl
-	'<a href=>You look <<vidage>> years old</a>'
-	'<a href="exec:dynamic $cheatmenu[''visualage'']">Change apparent age</a>'
-	*nl
-	'<a href=>You are <<pcs_hgt>> centimetres tall</a>'
-	'<a href="exec:pcs_hgt = input(''Enter <<$pcs_nickname>>s height in centimetres<br><br>(default 170, min 100, max 200, values below 160 and above 180 will cause problems in the calculation of BMI/weight the more you deviate from the default 170)'') & dynamic $cheatmenu[''looks'']">Change <<$pcs_nickname>>''s height</a>'
-	*nl
-	'You have <<$titsize>> breasts'
-	if tits => 0 and tits < 11:'<a href="exec:silicone += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(silicone)</a>'
-	if silicone => 1:'<a href="exec:silicone -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(silicone)</a>'
-	if tits => 0 and tits < 11:'<a href="exec:nbsize += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(natural)</a>'
-	if nbsize => 1:'<a href="exec:nbsize -= 5 & titreduc = 1 & dynamic $cheatmenu[''looks'']">Shrink breasts(natural)</a>'
-	*nl
-	if pcs_butt <= 4:
-		$pcs_butt[1] = 'flat'
-	elseif pcs_butt <= 8:
-		$pcs_butt[1] = 'average'
-	elseif pcs_butt <= 12:
-		$pcs_butt[1] = 'pert'
-	else
-		$pcs_butt[1] = 'bubble'
-	end
-	'You have <<$pcs_butt[1]>> butt'
-	if pcs_butt < 20:'<a href="exec:butt_cheat += 2 & dynamic $cheatmenu[''looks'']">Enlarge butt</a>'
-	if pcs_butt > 1:'<a href="exec:butt_cheat -= 2 & dynamic $cheatmenu[''looks'']">Shrink butt</a>'
-	if butt_cheat ! 0:'<a href="exec:butt_cheat = 0 & dynamic $cheatmenu[''looks'']">Reset butt shape to default</a>'
-	if silicone_butt => 1:'<a href="exec:silicone_butt = 0 & dynamic $cheatmenu[''looks'']">Remove butt implants</a>'
-	if silicone_butt = 0:'<a href="exec:silicone_butt += 16 & dynamic $cheatmenu[''looks'']">Add butt implants</a>'
-	*nl
-	'<<$lip>>'
-	if pcs_lip < 4:'<a href="exec:pcs_lip += 1 & dynamic $cheatmenu[''looks'']">Enlarge lips</a>'
-	if pcs_lip > 0:'<a href="exec:pcs_lip -= 1 & dynamic $cheatmenu[''looks'']">Shrink lips</a>'
-	*nl
-	'<<$skin>>'
-	if pcs_skin < 900: '<a href="exec:pcs_skin += 200 & gs ''body'', ''UpdateBaseAppearnce'' & dynamic $cheatmenu[''looks'']">Improve skin</a>'
-	if pcs_skin > 0: '<a href="exec:pcs_skin -= 200 & gs ''body'', ''UpdateBaseAppearnce'' & dynamic $cheatmenu[''looks'']">Worsen skin</a>'
-	if pcs_tan >= 0:'<a href="exec:pcs_tan += 10 & dynamic $cheatmenu[''looks'']">Become tanned</a>'
-	if pcs_tan > 0:'<a href="exec:pcs_tan = 0 & dynamic $cheatmenu[''looks'']">Remove tan</a>'
-	*nl
-	'<<$pcs_throat>>'
-	if pcs_throat <= 31:'<a href="exec:pcs_throat += 5 & dynamic $cheatmenu[''looks'']">Increase throat capacity</a>'
-	if pcs_throat >= 5:'<a href="exec:pcs_throat -= 5 & dynamic $cheatmenu[''looks'']">Decrease throat capacity</a>'
-	if dounspell = 1:
-		*nl
-		'<a href="exec:dounsplkil = 2 & gs ''body'', ''hardreset''">Hard Reset body shape</a>'
-	end
-
-	'</td><td width="33%" cellpadding="20" valign="top">'
-	'<<$pcs_vag>>'
-	if pcs_vag > 0:'<a href="exec:pcs_vag = 0 & dynamic $cheatmenu[''looks'']">Reinstate virginity</a>'
-	if pcs_vag <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''vagenlarge''">Enlarge comfortable vaginal capacity</a>'
-	if pcs_vag >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''vagreduce''">Reduce comfortable vaginal capacity</a>'
-	'Your comfortable vaginal capacity will reduce by <<vshrink>> every <<vshrinkdays>> days.'
-	if vshrink < 10:'<a href="exec:vshrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
-	if vshrink > 0:'<a href="exec:vshrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
-	if vshrinkdays < 10:'<a href="exec:vshrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
-	if vshrinkdays > 1:'<a href="exec:vshrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
-	'When gaped your vagina will reduce each stage (up to 4 for maximum gape) every <<vgape[4]>> minutes.'
-	if vgape[4] < 60:'<a href="exec:vgape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
-	if vgape[4] > 5:'<a href="exec:vgape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
-	*nl
-	'<<$pcs_ass>>'
-	if pcs_ass <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''assenlarge''">Enlarge comfortable anal capacity</a>'
-	if pcs_ass >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''assreduce''">Reduce comfortable anal capacity</a>'
-	'Your comfortable anal capacity will reduce by <<ashrink>> every <<ashrinkdays>> days.'
-	if ashrink < 10:'<a href="exec:ashrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
-	if ashrink > 0:'<a href="exec:ashrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
-	if ashrinkdays < 10:'<a href="exec:ashrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
-	if ashrinkdays > 1:'<a href="exec:ashrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
-	'When gaped your anus will reduce each stage (up to 4 for maximum gape) every <<agape[4]>> minutes.'
-	if agape[4] < 60:'<a href="exec:agape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
-	if agape[4] > 5:'<a href="exec:agape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
-	*nl
-	if dounspell = 0:
-		if fat ! 0: '<a href="exec:fat = 0 & dynamic $cheatmenu[''looks'']">Zero fat</a>'
-		'Body Fat = (<<salo>>): <a href="exec:salo -= 10 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-10</a> <a href="exec:salo -= 5 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:salo -= 1 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-1</a> <a href="exec:salo += 1 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+1</a> <a href="exec:salo += 5 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:salo += 10 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+10</a>'
-		'Note: You need some Body Fat to survive, any value under 11 is clasified as "starving" and a value of 0 can lead to a Game Over.'
-	end
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''tatoo'']">Tattoo removal</a>'
-
-	'</td><td width="33%" cellpadding="20" valign="top">'
-	'<<$hair>>'
-	if pcs_haircol = 0:
-		'Your hair is now (prev) <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks''] & nathcol = pcs_haircol">(next)</a>'
-	elseif pcs_haircol > 0 and pcs_haircol < 3:
-		'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks'']" & pcs_haircol = nathcol>(next)</a>'
-	elseif pcs_haircol = 3:
-		'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> (next)'
-	else
-		'To change your natural hair color, you have to <a href="exec:pcs_haircol = nathcol & dynamic $cheatmenu[''looks'']">restore your natural hair color</a> first.'
-	end
-	if pcs_hairlng > 975:
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a>'
-	elseif pcs_hairlng > 900:
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a>'
-	elseif pcs_hairlng >= 100:
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
-	elseif pcs_hairlng >= 25:
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
-	elseif pcs_hairlng >= 5:
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
-	else
-		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
-	end
-	if hairgrowcht = 0:'<a href="exec:hairgrowcht = 1 & dynamic $cheatmenu[''looks'']">Stop hair growth</a>'
-	if hairgrowcht = 1:'<a href="exec:hairgrowcht = 0 & dynamic $cheatmenu[''looks'']">Allow hair growth</a>'
-	*nl
-	'<<$glaza>>'
-	if pcs_naturallashes < 2:'<a href="exec:pcs_naturallashes += 1 & dynamic $cheatmenu[''looks'']">Enlarge lashes</a>'
-	if pcs_naturallashes > 0:'<a href="exec:pcs_naturallashes -= 1 & dynamic $cheatmenu[''looks'']">Shrink lashes</a>'
-	if pcs_eyesize < 3:'<a href="exec:pcs_eyesize += 1 & dynamic $cheatmenu[''looks'']">Increase the size of the eye</a>'
-	if pcs_eyesize > 0:'<a href="exec:pcs_eyesize -= 1 & dynamic $cheatmenu[''looks'']">Reduce the size of the eye</a>'
-	if pcs_eyecol <= 0:
-		'Your eyes are now (prev) <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
-	elseif pcs_eyecol > 0 and pcs_eyecol < 3:
-		'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
-	elseif pcs_eyecol >= 3:
-		'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> (next)'
-	end
-	'</td></tr></table></center>'
-}
-
-if $ARGS[0] = 'vagenlarge':
-	if pcs_vag = 0:
-		pcs_vag = 5
-	elseif pcs_vag <= 5:
-		pcs_vag = 10
-	elseif pcs_vag <= 10:
-		pcs_vag = 15
-	elseif pcs_vag <= 15:
-		pcs_vag = 25
-	elseif pcs_vag <= 25:
-		pcs_vag = 35
-	end
-	dynamic $cheatmenu['looks']
-end
-
-if $ARGS[0] = 'vagreduce':
-	if pcs_vag > 25:
-		pcs_vag = 25
-	elseif pcs_vag > 15:
-		pcs_vag = 15
-	elseif pcs_vag > 10:
-		pcs_vag = 10
-	elseif pcs_vag > 5:
-		pcs_vag = 1
-	end
-	dynamic $cheatmenu['looks']
-end
-
-if $ARGS[0] = 'assenlarge':
-	if pcs_ass = 0:
-		pcs_ass = 5
-	elseif pcs_ass <= 5:
-		pcs_ass = 10
-	elseif pcs_ass <= 10:
-		pcs_ass = 15
-	elseif pcs_ass <= 15:
-		pcs_ass = 25
-	elseif pcs_ass <= 25:
-		pcs_ass = 35
-	end
-	dynamic $cheatmenu['looks']
-end
-
-if $ARGS[0] = 'assreduce':
-	if pcs_ass > 25:
-		pcs_ass = 25
-	elseif pcs_ass > 15:
-		pcs_ass = 15
-	elseif pcs_ass > 10:
-		pcs_ass = 10
-	elseif pcs_ass > 5:
-		pcs_ass = 1
-	end
-	dynamic $cheatmenu['looks']
-end
-
-$cheatmenu['parameters'] = {
-	*clr & cla
-	'<center><h1>Cheat Menu - Appearance Stats</h1></center>'
-	act 'Return to appearance menu':dynamic $cheatmenu['looks']
-	*nl
-	'Body Shape Parameters'
-	'<<pcs_bust>> - <<pcs_waist>> - <<pcs_hips>>, <<$titsize>> breasts, the difference between the hips and waist <<pcs_hips-pcs_waist>> cm'
-	'Muscularity: strenbuf = <<strenbuf>>, salo =	<<salo>>, fat = <<fat>>'
-	'Variable List:'
-	'agilbuf = <<agilbuf>>'
-	'strenbuf = <<strenbuf>>'
-	'vitalbuf = <<vitalbuf>>'
-	'BMI (pcs_bmi) = <<pcs_bmi>>'
-	'weight (pcs_weight) = <<pcs_weight>> kg'
-	'bust (pcs_bust) = <<pcs_bust>>'
-	'band (pcs_band) = <<pcs_band>>'
-	'waist (pcs_waist) = <<pcs_waist>>'
-	'hips (pcs_hips) = <<pcs_hips>>'
-	'bust - band (pcs_cupsize) = <<pcs_cupsize>>'
-	'silicone = <<silicone>>'
-	'nbsize = <<nbsize>>'
-	'magicf2b = <<magicf2b>>'
-	'genbsize = <<genbsize>>'
-	'vhips = <<vhips>>'
-	'vhtmp = <<vhtmp>>'
-	'wratio = <<wratio>>'
-	'bratio = <<bratio>>'
-	'hratio = <<hratio>>'
-	'vofat = <<vofat>>'
-	'salocatnow = <<salocatnow>>'
-	'salocatlast = <<salocatlast>>'
-	'magf2bdo = <<magf2bdo>>'
-	'mgf2bnocnt = <<mgf2bnocnt>>'
-	'magtarcup = <<magtarcup>>'
-	'normbuffpick = <<normbuffpick>>'
-	'nrmbfpckct = <<nrmbfpckct>>'
-	'btwarn = <<btwarn>>'
-	'salolast = <<salolast>>'
-}
-
-$cheatmenu['vneshpara'] = {
-	*clr & cla
-	'<center><h1>Cheat Menu - ?</h1></center>'
-	act 'Return to appearance menu':dynamic $cheatmenu['looks']
-	*nl
-	'Appearance Parameters'
-	'vidage = <<vidage>>'
-	'pcs_naturallashes = <<pcs_naturallashes>>'
-	'pcs_eyesize = <<pcs_eyesize>>'
-	'pcs_lip = <<pcs_lip>>'
-	'pcs_apprncbase = <<pcs_apprncbase>>'
-	'PXCloThinness = <<PXCloThinness>>'
-	'PXCloTopCut = <<PXCloTopCut>>'
-	'PXCloBottomShortness = <<PXCloBottomShortness>>'
-	'CloTotalBeauty = <<CloTotalBeauty>>'
-	'mopkoef = <<mopkoef>>'
-	'pcs_hairbsh = <<pcs_hairbsh>>'
-	'lipbalmKoef = <<lipbalmKoef>>'
-	'pcs_breath = <<pcs_breath>>'
-	'sweatKoef = <<sweatKoef>>'
-	'glassvnesh = <<glassvnesh>>'
-	'dyevmod = <<dyevmod>>'
-	'hairkoef = <<hairkoef>>'
-	'legkoef = <<legkoef>>'
-}
-
-$cheatmenu['tatoo'] = {
-	gs'stat'
-	*clr & cla
-	'<center><h1>Cheat Menu - Tattoos</h1></center>'
-	act 'Return to appearance menu':dynamic $cheatmenu['looks']
-	*nl
-	if tatarm = 0:'You do not have a tattoo on your arm</a>'
-	if tatarm >= 1:'<a href="exec:tattCount-=1 & tatarm = 0 & dynamic $cheatmenu[''tatoo'']">Remove your arm tattoo</a>'
-	if tatass = 0:'You do not have a tattoo on your ass</a>'
-	if tatass >= 1:'<a href="exec:tattCount-=1 & tatass = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ass tattoo</a>'
-	if tatback = 0:'You do not have a tattoo on your back</a>'
-	if tatback >= 1:'<a href="exec:tattCount-=1 & tatback = 0 & dynamic $cheatmenu[''tatoo'']">Remove your back tattoo</a>'
-	if tatblly = 0:'You do not have a tattoo on your belly</a>'
-	if tatblly >= 1:'<a href="exec:tattCount-=1 & tatblly = 0 & dynamic $cheatmenu[''tatoo'']">Remove your belly tattoo</a>'
-	if tatbrst = 0:'You do not have a tattoo on your breast</a>'
-	if tatbrst >= 1:'<a href="exec:tattCount-=1 & tatbrst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your breast tattoo</a>'
-	if tatchst = 0:'You do not have a tattoo on your chest</a>'
-	if tatchst >= 1:'<a href="exec:tattCount-=1 & tatchst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your chest tattoo</a>'
-	if tatfce = 0:'You do not have a tattoo on your face</a>'
-	if tatfce >= 1:'<a href="exec:tattCount-=1 & tatfce = 0 & dynamic $cheatmenu[''tatoo'']">Remove your face tattoo</a>'
-	if tatankle = 0:'You do not have a tattoo on your ankle</a>'
-	if tatankle >= 1:'<a href="exec:tattCount-=1 & tatankle = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ankle tattoo</a>'
-	if tatleg = 0:'You do not have a tattoo on your leg</a>'
-	if tatleg >= 1:'<a href="exec:tattCount-=1 & tatleg = 0 & dynamic $cheatmenu[''tatoo'']">Remove your leg tattoo</a>'
-	if tatlip = 0:'You do not have a tattoo on your lip</a>'
-	if tatlip >= 1:'<a href="exec:tattCount-=1 & tatlip = 0 & dynamic $cheatmenu[''tatoo'']">Remove your lip tattoo</a>'
-	if tatneck = 0:'You do not have a tattoo on your neck</a>'
-	if tatneck >= 1:'<a href="exec:tattCount-=1 & tatneck = 0 & dynamic $cheatmenu[''tatoo'']">Remove your neck tattoo</a>'
-	if tatvag = 0:'You do not have a public tattoo</a>'
-	if tatvag >= 1:'<a href="exec:tattCount-=1 & tatvag = 0 & dynamic $cheatmenu[''tatoo'']">Remove your pubic tattoo</a>'
-	if tatlech = 0:'You do not have a tattoo on your shoulder</a>'
-	if tatlech >= 1:'<a href="exec:tattCount-=1 & tatlech = 0 & dynamic $cheatmenu[''tatoo'']">Remove your shoulder tattoo</a>'
-	if tatside = 0:'You do not have a tattoo on your side</a>'
-	if tatside >= 1:'<a href="exec:tattCount-=1 & tatside = 0 & dynamic $cheatmenu[''tatoo'']">Remove your the tattoo on your side</a>'
-	if tatupb = 0:'You do not have a tramp stamp</a>'
-	if tatupb >= 1:'<a href="exec:tattCount-=1 & tatupb = 0 & dynamic $cheatmenu[''tatoo'']">Remove your tramp stamp</a>'
-	if tatunder = 0:'You do not have an under breast tattoo</a>'
-	if tatunder >= 1:'<a href="exec:tattCount-=1 & tatunder = 0 & dynamic $cheatmenu[''tatoo'']">Remove your under breast tattoo</a>'
-	if tatwrist = 0:'You do not have a tattoo on your wrist</a>'
-	if tatwrist >= 1:'<a href="exec:tattCount-=1 & tatwrist = 0 & dynamic $cheatmenu[''tatoo'']">Remove your wrist tattoo</a>'
-	if tathand = 0:'You do not have a tattoo on your hand</a>'
-	if tathand >= 1:'<a href="exec:tattCount-=1 & tathand = 0 & dynamic $cheatmenu[''tatoo'']">Remove your hand tattoo</a>'
-}
-
-$cheatmenu['setStat'] = {
-	temp_input = input("Set your <<$ARGS[1]>> level:")
-	dynamic "
-		<<$ARGS[0]>>_lvl = temp_input
-		<<$ARGS[0]>>_lvlst = temp_input
-	"
-	killvar 'temp_input'
-	dynamic $cheatmenu['stats']
-}
-
-$cheatmenu['setStat1'] = {
-	temp_input = input("Set your <<$ARGS[1]>> level:")
-	dynamic "
-		<<$ARGS[0]>>_lvl = 100 - temp_input
-		<<$ARGS[0]>>_lvlst = 100 - temp_input
-	"
-	killvar 'temp_input'
-	dynamic $cheatmenu['stats']
-}
-
-$cheatmenu['setAttrs'] = {
-	loop_index = 0
-	:set_attrs_loop
-		dynamic "
-			<<$att_name[loop_index]>>_lvl = <<ARGS[0]>>
-			<<$att_name[loop_index]>>_lvlst = <<ARGS[0]>>
-		"
-		loop_index += 1
-		! Magic is the last attribute, so if it's a non-magic game we'll end the loop one iteration early
-		if $start_type[1] ! 'nomagic' and loop_index < arrsize('$att_name'):
-			jump 'set_attrs_loop'
-		elseif loop_index < arrsize('$att_name') - 1:
-			jump 'set_attrs_loop'
-		end
-	killvar 'loop_index'
-	dynamic $cheatmenu['stats']
-}
-
-$cheatmenu['setSkills'] = {
-	loop_index = 0
-	:set_skills_loop
-		!! Inhibition (number 33) isn''t a skill so we''ll skip it
-		if loop_index ! 33:
-			dynamic "
-				<<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
-				<<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
-			"
-			loop_index += 1
-		else
-			loop_index += 1
-			dynamic "
-				<<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
-				<<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
-			"
-		end
-
-		!! The size of the array is reduced by 1 because we skipped inhibition
-		if loop_index < arrsize('$skl_name') - 1: jump 'set_skills_loop'
-	killvar 'loop_index'
-	dynamic $cheatmenu['stats']
-}
-
-$cheatmenu['printStatLinks'] = {
-	*p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & dynamic $cheatmenu[''stats'']" >Max</a>  '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+1</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+10</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-1</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-10</a>  '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & dynamic $cheatmenu[''stats'']" >Min</a>  '
-	*pl '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
-}
-
-$cheatmenu['printStatLinks1'] = {
-	*p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Max</a>  '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+1</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+10</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-1</a> '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-10</a>  '
-	*p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Min</a>  '
-	*pl '<a href="exec:dynamic $cheatmenu[''setStat1''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
-}
-
-$cheatmenu['stats'] = {
-	gs 'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-
-	!Set a floor and ceiling for all attributes and skills
-	loop_index = 0
-	:attr_trim_loop
-		dynamic "
-			if <<$att_name[loop_index]>>_lvl < 0: <<$att_name[loop_index]>>_lvl = 0
-			if <<$att_name[loop_index]>>_lvlst < 0: <<$att_name[loop_index]>>_lvlst = 0
-			if <<$att_name[loop_index]>>_lvl > 100: <<$att_name[loop_index]>>_lvl = 100
-			if <<$att_name[loop_index]>>_lvlst > 100: <<$att_name[loop_index]>>_lvlst = 100
-		"
-		loop_index += 1
-		if loop_index < arrsize('$att_name'): jump 'attr_trim_loop'
-
-	loop_index = 0
-	:skill_trim_loop
-		dynamic "
-			if <<$skl_name[loop_index]>>_lvl < 0: <<$skl_name[loop_index]>>_lvl = 0
-			if <<$skl_name[loop_index]>>_lvlst < 0: <<$skl_name[loop_index]>>_lvlst = 0
-			if <<$skl_name[loop_index]>>_lvl > 100: <<$skl_name[loop_index]>>_lvl = 100
-			if <<$skl_name[loop_index]>>_lvlst > 100: <<$skl_name[loop_index]>>_lvlst = 100
-		"
-		loop_index += 1
-		if loop_index < arrsize('$skl_name'): jump 'skill_trim_loop'
-	killvar 'loop_index'
-
-	'<center><h1>Cheat Menu - Attributes and Skills</h1></center>'
-	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
-	*nl
-	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
-	'<tr><td width="50%" cellpadding="10" valign="top">'
-	*pl'<b>Attributes</b> (values 0 - 100):'
-	*pl '<a href="exec:dynamic $cheatmenu[''setAttrs''], 100" >Max Attributes</a>    <a href="exec:dynamic $cheatmenu[''setAttrs''], 0" >Min Attributes</a>'
-	*p 'Strength (<<stren_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'stren', 'Strength'
-	*p 'Agility (<<agil_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'agil', 'Agility'
-	*p 'Endurance (<<vital_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'vital', 'Endurance'
-	*p 'Intelligence (<<intel_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'intel', 'Intelligence'
-	*p 'Reaction (<<react_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'react', 'Reaction'
-	*p 'Spirit (<<sprt_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'sprt', 'Spirit'
-	*p 'Charisma (<<chrsm_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'chrsm', 'Charisma'
-	*p 'Perception (<<prcptn_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'prcptn', 'Perception'
-	if $start_type[1] ! 'nomagic': *p 'Magic (<<magik_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'magik', 'Magic'
-	*nl
-	*pl'<b>Sexual:</b>'
-	*pl 'Inhibition level (<<100 - inhib_lvl>>): ' & dynamic $cheatmenu['printStatLinks1'], 'inhib', 'Inhibition'
-	if willpowermax > 200: willpowermax = 200
-	if willpowermax < 50: willpowermax = 50
-	*pl 'Willpower Maximum (<<willpowermax>>): <a href="exec:willpowermax = 200 & dynamic $cheatmenu[''stats'']" >Max</a>  <a href="exec:willpowermax += 1 & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:willpowermax += 10 & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:willpowermax -= 1 & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:willpowermax -= 10 & dynamic $cheatmenu[''stats'']" >-10</a>  <a href="exec:willpowermax = 50 & dynamic $cheatmenu[''stats'']" >Min</a>'
-	if workPTU > 1:*pl'<a href="exec:teachlevel += 10 & dynamic $cheatmenu[''stats'']">Reputation teacher+10: <<teachlevel>></a>'
-	if workPTU > 1:*pl'<a href="exec:teachlevel -= 10 & dynamic $cheatmenu[''stats'']">Reputation teacher-10: <<teachlevel>></a>'
-	*nl
-	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
-		*pl'<b>School:</b>'
-		if class['school_math_grade'] < 100:*pl'Math grade: <<class[''school_math_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
-		if class['school_rus_grade'] < 100:*pl'Russian grade: <<class[''school_rus_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
-		if class['school_lit_grade'] < 100:*pl'Literature grade: <<class[''school_lit_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
-		if class['school_art_grade'] < 100:*pl'Art grade: <<class[''school_art_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
-		if class['school_bio_grade'] < 100:*pl'Biology grade: <<class[''school_bio_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
-		if class['school_eng_grade'] < 100:*pl'English grade: <<class[''school_eng_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_geo_grade'] < 100:*pl'Geography grade: <<class[''school_geo_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', 10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_sci_grade'] < 100:*pl'Science grade: <<class[''school_sci_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_his_grade'] < 100:*pl'History grade: <<class[''school_his_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_shop_grade'] < 100:*pl'Shop grade: <<class[''school_shop_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_comp_grade'] < 100:*pl'Computer grade: <<class[''school_comp_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_mus_grade'] < 100:*pl'Music grade: <<class[''school_mus_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if class['school_pe_grade'] < 100:*pl'P.E. grade: <<class[''school_pe_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
-		if schoolprogul >= 0:*pl'<a href="exec:schoolprogul = 0 & dynamic $cheatmenu[''stats'']">Zero Absenteeism (School): <<schoolprogul>></a>'
-		*nl
-	end
-	*pl'<b>Skills</b> (values 0 - 100, and adjusted total by attributes):'
-	*pl '<a href="exec:dynamic $cheatmenu[''setSkills''], 100" >Max Skills</a>    <a href="exec:dynamic $cheatmenu[''setSkills''], 0" >Min Skills</a>'
-	*nl
-	*pl'<b>Others:</b>'
-	*p 'Chess (<<chess_lvl>>) - Total (<<pcs_chess>>): ' & dynamic $cheatmenu['printStatLinks'], 'chess', 'Chess'
-	*p 'Gaming (<<gaming_lvl>>) - Total (<<pcs_gaming>>): ' & dynamic $cheatmenu['printStatLinks'], 'gaming', 'Gaming'
-	*p 'Social (<<humint_lvl>>) - Total (<<pcs_humint>>): ' & dynamic $cheatmenu['printStatLinks'], 'humint', 'People Skills'
-	*p 'Persuasion (<<persuas_lvl>>) - Total (<<pcs_persuas>>): ' & dynamic $cheatmenu['printStatLinks'], 'persuas', 'Persuasion'
-	*p 'Observation (<<observ_lvl>>) - Total (<<pcs_observ>>): ' & dynamic $cheatmenu['printStatLinks'], 'observ', 'Observation'
-	*p 'Makeup (<<makupskl_lvl>>) - Total (<<pcs_makupskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'makupskl', 'Makeup'
-	*p 'Computers (<<compskl_lvl>>) - Total (<<pcs_compskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'compskl', 'Computer Skill'
-	*p 'Hacking (<<comphckng_lvl>>) - Total (<<pcs_comphckng>>): ' & dynamic $cheatmenu['printStatLinks'], 'comphckng', 'Hacking'
-	*p 'Handy-work (<<hndiwrk_lvl>>) - Total (<<pcs_hndiwrk>>): ' & dynamic $cheatmenu['printStatLinks'], 'hndiwrk', 'Handy-work'
-	*p 'Pool (<<pool_lvl>>) - Total (<<pcs_pool>>): ' & dynamic $cheatmenu['printStatLinks'], 'pool', 'Pool'
-	*p 'Heels (<<pcs_heels>>) - Total (<<pcs_heels>>): ' & dynamic $cheatmenu['printStatLinks'], 'heels', 'Heels'
-	if $start_type[1] ! 'nomagic': *p 'Spell Casting (<<splcstng_lvl>>) - Total (<<pcs_splcstng>>): ' & dynamic $cheatmenu['printStatLinks'], 'splcstng', 'Spellcasting'
-	'</td><td width="50%" cellpadding="10" valign="top">'
-	*pl'<b>Combat:</b>'
-	*p 'Jabs (<<jab_lvl>>)- Total (<<pcs_jab>>): ' & dynamic $cheatmenu['printStatLinks'], 'jab', 'Jabs'
-	*p 'Power Strikes (<<punch_lvl>>) - Total (<<pcs_punch>>): ' & dynamic $cheatmenu['printStatLinks'], 'punch', 'Power Strikes'
-	*p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
-	*p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
-	*p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
-	*p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
-	*nl
-	*pl'<b>Craft:</b>'
-	*p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'
-	*p 'Tailoring (<<sewng_lvl>>) - Total (<<pcs_sewng>>): ' & dynamic $cheatmenu['printStatLinks'], 'sewng', 'Tailoring'
-	*p 'Instruments (<<instrmusic_lvl>>) - Total (<<pcs_instrmusic>>): ' & dynamic $cheatmenu['printStatLinks'], 'instrmusic', 'Instrumental Music'
-	*p 'Photography (<<photoskl_lvl>>) - Total (<<pcs_photoskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'photoskl', 'Photography'
-	*p 'Artistic (<<artskls_lvl>>) - Total (<<pcs_artskls>>): ' & dynamic $cheatmenu['printStatLinks'], 'artskls', 'Artistic Skills'
-	*p 'Performing (<<perform_lvl>>) - Total (<<pcs_perform>>): ' & dynamic $cheatmenu['printStatLinks'], 'perform', 'Performance'
-	*p 'Music Production (<<musicprod_lvl>>) - Total (<<pcs_musicprod>>): ' & dynamic $cheatmenu['printStatLinks'], 'musicprod', 'Music Production'
-	*nl
-	*pl'<b>Dance:</b>'
-	*p 'Modern Dance (<<danc_lvl>>) - Total (<<pcs_danc>>): ' & dynamic $cheatmenu['printStatLinks'], 'danc', 'Modern Dancing'
-	*p 'Erotic Dance (<<dancero_lvl>>) - Total (<<pcs_dancero>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancero', 'Erotic Dancing'
-	*p 'Pole Dance (<<dancpol_lvl>>) - Total (<<pcs_dancpol>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancpol', 'Pole Dancing'
-	*p 'Cheerleading (<<cheer_lvl>>) - Total (<<pcs_cheer>>): ' & dynamic $cheatmenu['printStatLinks'], 'cheer', 'Cheerleading'
-	*nl
-	*pl'<b>Sport:</b>'
-	*p 'Running (<<run_lvl>>) - Total (<<pcs_run>>): ' & dynamic $cheatmenu['printStatLinks'], 'run', 'Running'
-	*p 'Volleyball (<<vball_lvl>>) - Total (<<pcs_vball>>): ' & dynamic $cheatmenu['printStatLinks'], 'vball', 'Volleyball'
-	*p 'Ice Skating (<<icesktng_lvl>>) - Total (<<pcs_icesktng>>): ' & dynamic $cheatmenu['printStatLinks'], 'icesktng', 'Ice Skating'
-	*p 'Wrestling (<<wrstlng_lvl>>) - Total (<<pcs_wrstlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'wrstlng', 'Wrestling'
-	*p 'Football (<<ftbll_lvl>>) - Total (<<pcs_ftbll>>): ' & dynamic $cheatmenu['printStatLinks'], 'ftbll', 'Football'
-	*nl
-	*pl'<b>Work:</b>'
-	*p 'Serving (<<servng_lvl>>) - Total (<<pcs_servng>>): ' & dynamic $cheatmenu['printStatLinks'], 'servng', 'Serving'
-	*p 'Modeling (<<mdlng_lvl>>) - Total (<<pcs_mdlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'mdlng', 'Modeling'
-	*p 'Medicine (<<medcn_lvl>>) - Total (<<pcs_medcn>>): ' & dynamic $cheatmenu['printStatLinks'], 'medcn', 'Medicine'
-	*p 'Cleaning (<<cleaning_lvl>>) - Total (<<pcs_cleaning>>): ' & dynamic $cheatmenu['printStatLinks'], 'cleaning', 'Cleaning'
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['reputation'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Relationships and Renown</h1></center>'
-	'<center>Relationship values are from 0 - 100.</center>'
-	'<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">'
-	*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'' & dynamic $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & dynamic $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 & dynamic $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & dynamic $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:
-			'<a href="exec:Enable_reputation_popular = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_popular = 1:
-			'<a href="exec:Enable_reputation_popular = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <<npc_rel[''A1'']>>	<a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A1''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <<npc_rel[''A4'']>>	<a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A4''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <<npc_rel[''A14'']>>	<a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A14''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <<npc_rel[''A15'']>>	<a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A15''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <<npc_rel[''A17'']>>	<a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A17''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <<npc_rel[''A22'']>>	<a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A22''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <<npc_rel[''A146'']>>  <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A146''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <<npc_rel[''A147'']>>  <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A147''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <<npc_rel[''A148'']>>  <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A148''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if soniaPS = 0:	'<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>	<a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <<npc_rel[''A139'']>>  <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A139''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <<npc_rel[''A140'']>>  <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A140''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		*nl
-		'<i>Athletes</i>'
-		if Enable_reputation_athletes = 0:
-			'<a href="exec:Enable_reputation_athletes = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_athletes = 1:
-			'<a href="exec:Enable_reputation_athletes = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <<npc_rel[''A3'']>>	<a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A3''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if fedormasha = 0:	'<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>	<a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <<npc_rel[''A8'']>>	<a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A8''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <<npc_rel[''A13'']>>	<a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A13''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>	<a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <<npc_rel[''A19'']>>	<a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A19''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <<npc_rel[''A23'']>>	<a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A23''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <<npc_rel[''A149'']>>  <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A149''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <<npc_rel[''A150'']>>  <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A150''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <<npc_rel[''A141'']>>  <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A141''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A165'']>> <<$npc_lastname[''A165'']>>: <<npc_rel[''A165'']>>  <a href="exec:npc_rel[''A165''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A165''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		*nl
-		'<i>Nerds</i>'
-		if Enable_reputation_nerds = 0:
-			'<a href="exec:Enable_reputation_nerds = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_nerds = 1:
-			'<a href="exec:Enable_reputation_nerds = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <<npc_rel[''A2'']>>	<a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A2''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <<npc_rel[''A6'']>>	<a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A6''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <<npc_rel[''A12'']>>	<a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A12''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <<npc_rel[''A16'']>>	<a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A16''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <<npc_rel[''A151'']>>  <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A151''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>>  <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>>  <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>>  <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A240'']>> <<$npc_lastname[''A240'']>>: <<npc_rel[''A240'']>>  <a href="exec:npc_rel[''A240''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A240''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		*nl
-		'<i>Gopniks</i>'
-		if Enable_reputation_gopniks = 0:
-			'<a href="exec:Enable_reputation_gopniks = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_gopniks = 1:
-			'<a href="exec:Enable_reputation_gopniks = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <<npc_rel[''A9'']>>	<a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A9''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <<npc_rel[''A10'']>>	<a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A10''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <<npc_rel[''A11'']>>	<a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A11''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <<npc_rel[''A20'']>>	<a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A20''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <<npc_rel[''A21'']>>	<a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A21''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <<npc_rel[''A24'']>>	<a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A24''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <<npc_rel[''A154'']>>  <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A154''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <<npc_rel[''A155'']>>  <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A155''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <<npc_rel[''A156'']>>  <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A156''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <<npc_rel[''A157'']>>  <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A157''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <<npc_rel[''A158'']>>  <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A158''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <<npc_rel[''A143'']>>  <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A143''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <<npc_rel[''A144'']>>  <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A144''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <<npc_rel[''A145'']>>  <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A145''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A189'']>> <<$npc_lastname[''A189'']>>: <<npc_rel[''A189'']>>  <a href="exec:npc_rel[''A189''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A189''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		*nl
-		'<i>Outcasts/Loners</i>'
-		if Enable_reputation_outcasts = 0:
-			'<a href="exec:Enable_reputation_outcasts = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_outcasts = 1:
-			'<a href="exec:Enable_reputation_outcasts = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <<npc_rel[''A7'']>>	<a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A7''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if soniaPS > 0:	'<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>	<a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			if fedormasha = 1:	'<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>	<a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <<npc_rel[''A159'']>>  <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A159''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		*nl
-		'<i>Teachers/Coaches</i>'
-		if Enable_reputation_teachers = 0:
-			'<a href="exec:Enable_reputation_teachers = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-		end
-		if Enable_reputation_teachers = 1:
-			'<a href="exec:Enable_reputation_teachers = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-			'<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <<npc_rel[''A26'']>>	<a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A26''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'Mikhail Nikolayevich: <<npc_rel[''A69'']>>	<a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A69''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <<npc_rel[''A128'']>>  <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A128''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <<npc_rel[''A129'']>>  <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A129''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <<npc_rel[''A130'']>>  <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A130''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <<npc_rel[''A131'']>>  <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A131''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <<npc_rel[''A132'']>>  <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A132''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <<npc_rel[''A133'']>>  <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A133''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <<npc_rel[''A134'']>>  <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A134''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <<npc_rel[''A135'']>>  <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A135''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <<npc_rel[''A136'']>>  <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A136''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <<npc_rel[''A137'']>>  <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A137''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-			'<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <<npc_rel[''A138'']>>  <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A138''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-	end
-	*nl
-	'<font color="blue"><b>Nicholas'' Family</b></font>'
-	'<a href="exec:gt ''nichUtil'', ''debug''">Storyline Debug Menu</a>'
-	'</td><td width="50%" cellpadding="10" valign="top">'
-	*nl
-	'Miscellaneous relationships'
-	*nl
-	'<font color="blue"><b>Others</b></font>'
-	*nl
-	if Enable_reputation_others = 0:
-		'<a href="exec:Enable_reputation_others = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
-	end
-	if Enable_reputation_others = 1:
-		'<a href="exec:Enable_reputation_others = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
-		if npc_rel['A112'] >= 0:
-			'Sergei Shulgin: <<npc_rel[''A112'']>>	<a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A112''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A219'] >= 0:
-			'Kat: <<npc_rel[''A219'']>>	<a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A219''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A220'] >= 0:
-			'Vika: <<npc_rel[''A220'']>>  <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A220''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A93'] >= 0:
-			'Irina: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A43'] >= 0:
-			'Tamara: <<npc_rel[''A43'']>>	<a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if alla >= 0:
-			'Alla: <<alla>>	<a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if masha >= 0:
-			'Masha: <<masha>>	<a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A41'] >= 0:
-			'Givi: <<npc_rel[''A41'']>>	<a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A41''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A42'] >= 0:
-			'Ashot: <<npc_rel[''A42'']>>  <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A42''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A89'] >= 0:
-			'Eugene: <<npc_rel[''A89'']>>	<a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A89''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A217'] >= 0:
-			'Pavlin: <<npc_rel[''A217'']>>	<a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A217''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if huntersAndreiQw >= 0:
-			'Hunter Andrew: <<huntersAndreiQw>>	<a href="exec:huntersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if huntersSergeiQw >= 0:
-			'Hunter Sergei: <<huntersSergeiQw>>	<a href="exec:huntersSergeiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersSergeiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if huntersIgorQw >= 0:
-			'Hunter Igor: <<huntersIgorQw>>	<a href="exec:huntersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-		if npc_rel['A217'] >= 0:
-			'Martin: <<npc_rel[''A216'']>>	<a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A216''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		end
-	end
-
-	if pcs_lovers[0] = 1:
-		*nl
-		'You are dating <<$loverdesc[0]>>.'
-		if loverrelation[0] < 0: loverrelation[0] = 0
-		if loverdays[0] < 0: loverdays[0] = 0
-		if haraklover[0] > 2: haraklover[0] = 0
-		if loverizvrat[0] > 1: loverizvrat[0] = 0
-		'Change lover''s personality: <a href="exec:haraklover[0] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[0]>></a>'
-		'Change lover''s perversion: <a href="exec:loverizvrat[0] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[0]>></a>'
-		'Relationship: <<loverrelation[0]>> <a href="exec:loverrelation[0] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[0] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		'You''ve been dating for <<loverdays[0]>> days. <a href="exec:loverdays[0] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[0] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
-	end
-	if pcs_lovers[1] = 1:
-		*nl
-		'You are dating <<$loverdesc[1]>>.'
-		if loverrelation[1] < 0: loverrelation[1] = 0
-		if loverdays[1] < 0: loverdays[1] = 0
-		if haraklover[1] > 2: haraklover[1] = 0
-		if loverizvrat[1] > 1: loverizvrat[1] = 0
-		'Change lover''s personality: <a href="exec:haraklover[1] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[1]>></a>'
-		'Change lover''s perversion: <a href="exec:loverizvrat[1] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[1]>></a>'
-		'Relationship: <<loverrelation[1]>> <a href="exec:loverrelation[1] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[1] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		'You''ve been dating for <<loverdays[1]>> days. <a href="exec:loverdays[1] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[1] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
-	end
-	if pcs_lovers[2] = 1:
-		*nl
-		'You are dating <<$loverdesc[2]>>.'
-		if loverrelation[2] < 0: loverrelation[2] = 0
-		if loverdays[2] < 0: loverdays[2] = 0
-		if haraklover[2] > 2: haraklover[2] = 0
-		if loverizvrat[2] > 1: loverizvrat[2] = 0
-		'Change lover''s personality: <a href="exec:haraklover[2] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[2]>></a>'
-		'Change lover''s perversion: <a href="exec:loverizvrat[2] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[2]>></a>'
-		'Relationship: <<loverrelation[2]>> <a href="exec:loverrelation[2] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[2] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
-		'You''ve been dating for <<loverdays[2]>> days. <a href="exec:loverdays[2] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[2] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
-	end
-	*nl
-	if fame['pav_slut'] >= 50:
-		gs 'fame'
-		'In Pavlovsk you are known as a <font color="red"><<$gnikname>></font> <a href="exec:fame[''pav_sex''] = 0 & fame[''pav_prostitute''] = 0 & gs ''fame'', ''calculateSlut'' & dynamic $cheatmenu[''reputation'']">Clear</a>'
-	end
-	*nl
-	if opusk > 0 or gnewQW > 0 or sipovka > 0:'<a href="exec:opusk = 0 & gnewQW = 0 & sipovka = 0 & dynamic $cheatmenu[''reputation'']">Clear reputation with Gopniks</a>'
-	if mid($start_type,1,2) = 'sg':
-
-		*nl
-		'<font color="red"><b>WARNING</b></font>: Clearing reputation flags with your family may cause bugs. Use at your own risk!'
-		*nl
-		if motherKnowWhore > 0:
-			'Your mother knows, that you are sexually active and considers you are a whore. <a href="exec:motherKnowWhore = 0 & motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear both reputations</a>    <a href="exec:motherKnowWhore = 0 & dynamic $cheatmenu[''reputation'']">Clear only whore reputation</a>'
-		elseif motherKnowSpravka > 0:
-			'Your mother knows that you are sexually active. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		else
-			'Your mother thinks that you are a virgin.'
-		end
-		*nl
-		if evgenQW >= 4 and fame['pav_slut'] >= 250:
-			'Your brother thinks you are a total whore. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		elseif evgenQW >= 3:
-			'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		elseif brotherknowslut = 1:
-			'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		elseif brotherknowslut >= 2:
-			'Your brother saw you in the park fucking the Gopniks. <a href="exec:brotherknowslut = 1 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		else
-			'Your brother has a good opinion of you.'
-		end
-		*nl
-		if sisterknowslut > 1 and sisboypartyQW > 1:
-			'Your sister thinks you are a slut <a href="exec:sisboypartyQW = 0 & sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		elseif sisterknowslut > 0:
-			'Your sister knows that you sleep around. <a href="exec:sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
-		else
-			'Your sister has a good opinion of you.'
-		end
-		*nl
-		if func('homes_properties', 'can_live_here', 'parents_home') = 0:
-			'<a href="exec: gs ''homes_properties'', ''give_access'', ''parents_home'' & dynamic $cheatmenu[''reputation'']">Restore</a> access to your parent''s apartment.'
-		end
-		if momKnowsKolka = 1:
-			'Your mother knows Kolka is the father. <a href="momKnowsKolka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
-		end
-		if momKnowsVladimir = 1:
-			'Your mother knows Vladimir is the father. <a href="exec:momKnowsVladimir = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
-		end
-		if SchoolBlock = 1:
-			'You''ve been expelled from school. <a href="exec:SchoolBlock = 0 & schoolPredupr = 0 & schoolprogul = 0 & pcs_grades = 50 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
-		end
-	end
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['documents'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Diplomas, Licences, and Certificates</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="300" cellspacing="0" cellpadding="20" valign="top">'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	if SchoolAtestat = 0: '<a href="exec:SchoolAtestat = 1 & dynamic $cheatmenu[''documents'']">Get School Certificate</a>'
-	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0: '<font color="red"><b>WARNING!</b></font>: This will end your school year!' & *nl
-	if SchoolAtestat = 1:'Already have a School Certificate'
-	if university['diploma'] > 0:
-		'You already have a Diploma'
-	else
-		'<a href="exec:gs ''uniutil'', ''diploma'', ''set_obtained'' & dynamic $cheatmenu[''documents'']">Get Diploma</a>'
-	end
-	if secrdiplom = 0:'<a href="exec:secrdiplom = 1 & dynamic $cheatmenu[''documents'']">Get Secretarial Diploma</a>'
-	if secrdiplom = 1:'You already have a Secretarial Diploma'
-	if masseuse['certification'] < 10:'<a href="exec:masseuse[''certification''] = 10 & dynamic $cheatmenu[''documents'']">Get Masseuse Certificate</a>'
-	if masseuse['certification'] >= 10:'You already have a Masseuse Certificate'
-	if prava = 0:'<a href="exec:prava = 1 & dynamic $cheatmenu[''documents'']">Get Driving Licence</a>'
-	if prava = 1:'You already have Driving Licence'
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['input_time'] = {
-	inputtmp = input("Enter time with 4-digit (input 0102 for 1:02)")
-	if inputtmp/100 >= 0 and inputtmp/100 <= 23:hour = inputtmp/100
-	inputtmp = inputtmp mod 100
-	if inputtmp >= 0 and inputtmp <= 59:minut = inputtmp
-	killvar 'inputtmp'
-	dynamic $cheatmenu['time']
-}
-
-$cheatmenu['time'] = {
-	gs 'daystart'
-	gs 'outdoors', 'temp_set'
-	gs 'stat'
-
-	temp_daystart = (year - 2016) * 365
-!!2016 is a leapyear so no adjustment before division
-	temp_daystart += (year - 2016) / 4
-	i=1
-	:temp_daystart
-	if temp_month > i:
-		temp_daystart += monthsend[i]
-		i += 1
-		jump 'temp_daystart'
-	end
-	temp_daystart += temp_day
-	temp_daystart -= daystart_start
-	temp_daystart += 1
-
-	if currtimecheck = 1:
-		killvar 'currtimecheck'
-		if currday ! daystart:
-			if currday < daystart:
-				week = (week + daystart - currday) mod 7
-			else
-				temp = week - ((currday - daystart) mod 7)
-				if temp <= 0: week = 7 - temp else week = temp
-			end
-			currday = daystart
-		end
-		if currhour < (daystart-1) * 24 + hour:femcycloop = (daystart-1) * 24 + hour - currhour
-		:femcycloop
-		if femcycloop > 0:gs 'femcyc' & femcycloop -= 1 & jump 'femcycloop'
-	end
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Manipulate Time and Weather</h1></center>'
-	'<center><font color="red"><b>WARNING!</b></font>: Using cheats to manipulate time can <b>easily</b> break quests and cause bugs. Do not use them unless'
-	'you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	if temp_minut > 9:
-		if temp_hour > 9: $temptime = '<b><<temp_hour>>:<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:<<temp_minut>></b>'
-	else
-		if temp_hour > 9: $temptime = '<b><<temp_hour>>:0<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:0<<temp_minut>></b>'
-	end
-	if minut > 9:
-		if hour > 9: $tempcurtime = '<b><<hour>>:<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:<<minut>></b>'
-	else
-		if hour > 9: $tempcurtime = '<b><<hour>>:0<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:0<<minut>></b>'
-	end
-
-	if temp_daystart > daystart:
-		temp = (temp_daystart - daystart) mod 7
-		if (temp + week) mod 7 = 0:temp_week = 7 else temp_week = (temp + week) mod 7
-	elseif temp_daystart < daystart:
-		temp = (daystart - temp_daystart) mod 7
-		if (week - temp) mod 7 = 0:
-			temp_week = 7
-		elseif (week - temp) mod 7 < 0:
-			temp_week = ((week - temp) mod 7) + 7
-		else
-			temp_week = week - temp
-		end
-	else
-		temp_week = week
-	end
-	killvar 'temp'
-
-	'Current time: <b><<$week[week]>></b>, <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
-	'Target time: <b><<$week[temp_week]>></b>, <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
-	'Daychange: <<temp_daystart - daystart>>'
-	*nl
-	'Year:	<a href="exec:temp_year += 1 & dynamic $cheatmenu[''time'']">+1 Year</a>	<a href="exec:temp_year -= 1 & dynamic $cheatmenu[''time'']">-1 Year</a>'
-	'Select <a href="exec:dynamic $cheatmenu[''month'']">Month</a>'
-	$daychange = '	<a href="exec:temp_day += 7 & dynamic $cheatmenu[''time'']">+7 Day</a>'
-	$daychange += '	<a href="exec:temp_day += 1 & dynamic $cheatmenu[''time'']">+1 Day</a>'
-	$daychange += '	<a href="exec:temp_day -= 1 & dynamic $cheatmenu[''time'']">-1 Day</a>'
-	$daychange += '	<a href="exec:temp_day -= 7 & dynamic $cheatmenu[''time'']">-7 Day</a>'
-	'Day:' +$daychange
-	killvar 'daychange'
-	$SS = 'Hour: '
-	if temp_hour > 0:$SS += '<a href="exec:temp_hour -= 1 & dynamic $cheatmenu[''time'']">-1</a>  ' else $SS += '	'
-	if temp_hour > 3:$SS += '<a href="exec:temp_hour -= 4 & dynamic $cheatmenu[''time'']">-4</a>  ' else $SS += '	'
-	if temp_hour ! 0:$SS += '<a href="exec:temp_hour = 0 & dynamic $cheatmenu[''time'']">0</a>	' else $SS += '	'
-	if temp_hour < 23:$SS += '<a href="exec:temp_hour += 1 & dynamic $cheatmenu[''time'']">+1</a>  ' else $SS += '	'
-	if temp_hour < 20:$SS += '<a href="exec:temp_hour += 4 & dynamic $cheatmenu[''time'']">+4</a>'
-	$SS
-	$SS = 'Minute: '
-	if temp_minut > 14:$SS += '<a href="exec:temp_minut -= 15 & dynamic $cheatmenu[''time'']">-15</a> ' else $SS += '	'
-	if temp_minut > 0:$SS += '<a href="exec:temp_minut -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += '	'
-	if temp_minut ! 0:$SS += '<a href="exec:temp_minut = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += '   '
-	if temp_minut < 59:$SS += '<a href="exec:temp_minut += 1 & dynamic $cheatmenu[''time'']">+1</a> '
-	if temp_minut < 46:$SS += '<a href="exec:temp_minut += 15 & dynamic $cheatmenu[''time'']">+15</a>'
-	$SS
-	killvar 'SS'
-	*nl
-	'Weather: <a href="exec:sunWeather=iif(sunWeather=0,1,0) & chWeather = 1 & gs ''outdoors'', ''weather'' & dynamic $cheatmenu[''time'']">'+iif(sunWeather=0,'Rain','Sunny')+'</a>'
-	*nl
-	'Temperature = <<$temperature>> - <a href="exec:temper += 1 & dynamic $cheatmenu[''time'']">+1 degree</a> - <a href="exec:temper += 5 & dynamic $cheatmenu[''time'']">+5 degrees</a> - <a href="exec:temper -= 1 & dynamic $cheatmenu[''time'']">-1 degree</a> - <a href="exec:temper -= 5 & dynamic $cheatmenu[''time'']">-5 degrees</a>'
-	*nl
-	'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Celsius')+'</a> scale'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''input_time'']">Direct input time</a>'
-	*nl
-	'<a href="exec:day = temp_day & $month = $temp_month & month = temp_month & year = temp_year & hour = temp_hour & minut = temp_minut & currtimecheck = 1 & dynamic $cheatmenu[''time'']">Accept target date & time</a>'
-	'<a href="exec:temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut & dynamic $cheatmenu[''time'']">Reset target date & time</a>'
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['week'] = {
-	gs'stat'
-	*clr & cla
-	'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
-	*nl
-	'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
-	'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
-	*nl
-	'<a href="exec:week = 1 & dynamic $cheatmenu[''time'']">Monday</a>'
-	'<a href="exec:week = 2 & dynamic $cheatmenu[''time'']">Tuesday</a>'
-	'<a href="exec:week = 3 & dynamic $cheatmenu[''time'']">Wednesday</a>'
-	'<a href="exec:week = 4 & dynamic $cheatmenu[''time'']">Thursday</a>'
-	'<a href="exec:week = 5 & dynamic $cheatmenu[''time'']">Friday</a>'
-	'<a href="exec:week = 6 & dynamic $cheatmenu[''time'']">Saturday</a>'
-	'<a href="exec:week = 7 & dynamic $cheatmenu[''time'']">Sunday</a>'
-}
-
-$cheatmenu['month'] = {
-	gs'stat'
-	*clr & cla
-	'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
-	*nl
-	'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
-	'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
-	*nl
-	'<a href="exec:temp_month = 1 & $temp_month = ''January'' & dynamic $cheatmenu[''time'']">January</a>'
-	'<a href="exec:temp_month = 2 & $temp_month = ''February'' & dynamic $cheatmenu[''time'']">February</a>'
-	'<a href="exec:temp_month = 3 & $temp_month = ''March'' & dynamic $cheatmenu[''time'']">March</a>'
-	'<a href="exec:temp_month = 4 & $temp_month = ''April'' & dynamic $cheatmenu[''time'']">April</a>'
-	'<a href="exec:temp_month = 5 & $temp_month = ''May'' & dynamic $cheatmenu[''time'']">May</a>'
-	'<a href="exec:temp_month = 6 & $temp_month = ''June'' & dynamic $cheatmenu[''time'']">June</a>'
-	'<a href="exec:temp_month = 7 & $temp_month = ''July'' & dynamic $cheatmenu[''time'']">July</a>'
-	'<a href="exec:temp_month = 8 & $temp_month = ''August'' & dynamic $cheatmenu[''time'']">August</a>'
-	'<a href="exec:temp_month = 9 & $temp_month = ''September'' & dynamic $cheatmenu[''time'']">September</a>'
-	'<a href="exec:temp_month = 10 & $temp_month = ''October'' & dynamic $cheatmenu[''time'']">October</a>'
-	'<a href="exec:temp_month = 11 & $temp_month = ''November'' & dynamic $cheatmenu[''time'']">November</a>'
-	'<a href="exec:temp_month = 12 & $temp_month = ''December'' & dynamic $cheatmenu[''time'']">December</a>'
-}
-
-$cheatmenu['magicTable'] = {
-	!Build a cheat table for spells with a given Array of spell names.
-	!	ARGS[0] = Friendly name for table
-	!	ARGS[1] = the name of the arraay to use
-
-	$SpellTabName = $ARGS[0]
-	$ThisArrName = $ARGS[1]
-	maxArrSizeC = dyneval("result=arrsize('<<$ThisArrName>>')")
-
-	! make the header for the table
-	$SpellListStr = "<center>
-		<table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
-			<tr><th colspan='4'><b><<$SpellTabName>></b></th></tr>
-			<tr>
-				<th></th>
-				<th>Spell</th>
-				<th>Mana</th>
-				<th>Description</th>
-			</tr>"
-	i = 0
-	:CheatDinSpell1
-	$ThisSpellName = dyneval("$result=<<$ThisArrName>>[<<i>>]")
-	if i < maxArrSizeC:
-		if spellKnown[$ThisSpellName] = 1:
-			$spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
-		else
-			$spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
-		end
-		$SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$spellName[$ThisSpellName]>></td><td><<spellMana[$ThisSpellName]>></td><td><<$spellDesc[$ThisSpellName]>></td></tr>"
-		i += 1
-		jump 'CheatDinSpell1'
-	end
-
-	$SpellListStr = $SpellListStr + "
-		</table>
-	</center>"
-
-	*pl func('cleanHTML',$SpellListStr)
-
-	killvar 'i'
-	killvar '$ThisSpellName'
-	killvar '$ThisArrName'
-	killvar 'maxArrSizeC'
-	killvar '$SpellTabName'
-	killvar '$spellFlipper'
-	killvar '$SpellListStr'
-}
-
-$cheatmenu['magic'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Magic</h1></center>'
-	'<center>Is magical: <a href="exec:pcs_magik += 1 & dynamic $cheatmenu[''magic'']">+1<<pcs_magik>></a></center>'
-	if succubusflag = 1:
-		'<center><a href="exec:dynamic $cheatmenu[''succubreset'']"><b>Remove & Reset Succubus status</b></a></center>'
-		'<center><font color="red"><b>WARNING!</b></font>: Removing succubus status will not restart your menstrual cycle, it will remain permanently disabled!</center>'
-		*nl
-	end
-
-	!Make sure spell list is initialized
-	if spellMana['fog'] = 0:gs 'spellList'
-
-	dynamic $cheatmenu['magicTable'], 'Combat Spells', '$combatSpells'
-	dynamic $cheatmenu['magicTable'], 'Non-Combat Spells', '$nonComSpells'
-
-	! Add in Teleport Location toggles.
-	! make the header for the table
-	$SpellListStr = "<center>
-		<table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
-			<tr><th colspan='2'><b>Known Tree Circle Locations</b></th></tr>
-			<tr><td><a href=""EXEC: spellKnown['teleport']=<<iif(spellKnown['teleport']=1,'0','1')>> & dynamic $cheatmenu['magic']""><<iif(spellKnown['teleport']=1,'[Unlearn]','[Learn]')>></a></td><td>Teleport Spell</td></tr>"
-	i = 0
-	:CheatDinTP1
-	$ThisLocation = $tpLocations[i]
-	if i < arrsize('$tpLocations'):
-		if tpKnown[$ThisLocation] = 1:
-			$spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
-		else
-			$spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
-		end
-		$SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$treeCircName[$ThisLocation]>></td></tr>"
-		i += 1
-		jump 'CheatDinTP1'
-	end
-
-	$SpellListStr = $SpellListStr + "
-		</table>
-	</center>"
-
-	*pl func('cleanHTML',$SpellListStr)
-
-	killvar 'i'
-	killvar '$ThisLocation'
-	killvar '$spellFlipper'
-	killvar '$SpellListStr'
-
-}
-
-$cheatmenu['dynamic'] = {
-	$dynamicCommand = input("Enter command to execute.")
-	if $dynamicCommand = '':exit
-	dynamic $dynamicCommand
-}
-
-$cheatmenu['std_cure'] = {
-	venera = 0
-	GerpesOnce = 0
-	Gerpes = 0
-	SifacOnce = 0
-	Sifilis = 0
-	TriperOnce = 0
-	Triper = 0
-	TriperOral = 0
-	KandidozOnce = 0
-	Kandidoz = 0
-}
-
-$cheatmenu['auto_period'] = {
-	if cyccustom = 0:
-		cyccustom = 1
-	else
-		cyccustom = 0
-	end
-	dynamic $cheatmenu['setting']
-}
-
-$cheatmenu['force_preg'] = {
-	if mesec ! 0: mesec = 0
-	if FocH ! 0: FocH = 0
-	if EggRH ! 0: EggRH = 0
-	if Ovulate ! 0: Ovulate = 0
-	if UnfertEgg ! 0: UnfertEgg = 0
-	if LutH ! 0: LutH = 0
-	if RecovH ! 0: RecovH = 0
-	preg = 1
-	cycle = 5
-	!!Setting implantation date for the due date calculation
-	lastovulation = daystart - 5
-	PregChem = 150
-	$wombthfath = 'A sperm donor'
-	babyembryo += 1
-	if fertegg = 0:
-		Nextbaby = arrsize('$ChildFath')
-		Temppolkid = rand(0,1)
-		polkid[nextbaby] = Temppolkid
-		$kidname[nextbaby] = 'unborn'
-		kidage[nextbaby] = 0
-		daykid[nextbaby] = 0
-		monthkid[nextbaby] = 0
-		yearkid[nextbaby] = 0
-		Babyptype[nextbaby] = 0
-		$ChildFath[nextbaby] = 'A sperm donor'
-		$ChildThFath[nextbaby] = 'A sperm donor'
-		hairkid[nextbaby] = rand(0, 3)
-		eyeskid[nextbaby] = rand(0, 3)
-		ChildConType[nextbaby] = 0
-		Babyptype[nextbaby] = 1
-	else
-		fertegg -= 1
-	end
-}
-
-$cheatmenu['remove_preg'] = {
-	gs 'medical_din', 'remove_preg'
-	knowpregloss = 2
-	
-	if FertEgg > 0: FertEgg = 0
-}
-
-$cheatmenu['cycle'] = {
-	*clr
-	if cycle ! 5:
-		EggRH = 0
-		LutH = 0
-		Ovulate = 0
-		UnfertEgg = 0
-		FertEgg = 0
-		RecovH = 0
-		mesec = 0
-		'<a href="exec:daylastperiod = daystart & Cycle = 0 & mesec = 96 & gs ''stat'' & dynamic $cheatmenu[''state'']">Menstration</a>'
-		'<a href="exec:Cycle = 1 & gs ''stat'' & dynamic $cheatmenu[''state'']">Follicular</a>'
-		'<a href="exec:Cycle = 2 & Ovulate = 24+rand(0,20) & EggRH = 160 + 160+rand(0, 5) & gs ''stat'' & dynamic $cheatmenu[''state'']">Ovulation</a>'
-		'<a href="exec:Cycle = 3 & gs ''stat'' & dynamic $cheatmenu[''state'']">Luteal</a>'
-	end
-}
-
-$cheatmenu['setting'] = {
-	*clr & cla
-	gs 'obj_din', 'settingtabs'
-	'<center><h1>Gameplay Settings</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td cellspacing="0" cellpadding="20" valign="top">'
-
-	if Enable_nogameover = 1:
-		'Prevent Non-Drama GAMEOVER: Currently ON - <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	else
-		'Prevent Non-Drama GAMEOVER: Currently OFF - <a href="exec:Enable_nogameover = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	end
-	if music_on = 0:
-		'Music: Currently OFF - <a href="exec:music_on = 1 & music_loop = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	else
-		'Music: Currently ON - <a href="exec:music_on = 0 & music_loop = 0 & close all & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	end
-	*nl
-
-	if disable_autosave = 1:
-		'AutoSave: Currently OFF - <a href="exec:disable_autosave = 0 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	else
-		'AutoSave: Currently ON - <a href="exec:disable_autosave = 1 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	end
-	if autohairbrush = 1:
-		'Auto brush hair on mirror visit: Currently ON - <a href="exec:autohairbrush = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	else
-		'Auto brush hair on mirror visit: Currently OFF - <a href="exec:autohairbrush = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	end
-	if enfullmorrout = 1:
-		'Full morning routine enabled: Currently ON - <a href="exec:enfullmorrout = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	else
-		'Full morning routine enabled: Currently OFF - <a href="exec:enfullmorrout = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	end
-	*nl
-	if cyccustom = 1:
-		'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn OFF</a>'
-	else
-		'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn ON</a>'
-	end
-	if cheatKlisma = 1:
-		'Enema realism: Currently ON - <a href="exec:cheatKlisma = 1 & dynamic $cheatmenu[''enema'']">Turn OFF</a>'
-	else
-		'Enema realism: Currently OFF - <a href="exec:cheatKlisma = 0 & dynamic $cheatmenu[''enema'']">Turn ON</a>'
-	end
-	if editpornname = 1:
-		'Editing of the names of the porn movies you stared enabled: Currently ON - <a href="exec:editpornname = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
-	else
-		'Renaming porn movies you star in: Currently OFF - <a href="exec:editpornname = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
-	end
-	*nl
-	'<B>Difficulty Setting</B>'
-	'At the moment it only improves rate of skill gain'
-
-	'Difficulty: Currently at <<func(''_difficulty'',''getdifficulty'')>>'
-	'<ul><li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''easy peasy'') & dynamic $cheatmenu[''setting'']">easy peasy</a></li>'
-	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''relaxed'') & dynamic $cheatmenu[''setting'']">relaxed</a></li>'
-	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''realistic'') & dynamic $cheatmenu[''setting'']">realistic</a></li>'
-	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''hardcore'') & dynamic $cheatmenu[''setting'']">hardcore</a></li></ul>'
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['display'] = {
-	*clr & cla
-	gs 'obj_din', 'settingtabs'
-	'<center><h1>Display Setting</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td cellspacing="0" cellpadding="20" valign="top">'
-	if usePopUps = 1:
-		'Allow Popup Pictures: Currently ON - <a href="exec:usePopUps = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-	else
-		'Allow Popup Pictures: Currently OFF - <a href="exec:usePopUps = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	if set_imgh > 0: set_imgw = 0
-	if set_imgw > 0: set_imgh = 0
-	if set_imgh <= 0 and set_imgw <= 0: $set_imgh = ''
-	if set_imgh > 0:
-		'Force Image Height: <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']"><<set_imgh>></a>: Currently ON - <a href="exec:set_imgh = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-		$set_imgh = 'Height = <<set_imgh>>'
-	else
-		'Force Image Height: Currently OFF - <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	if set_imgw > 0:
-		'Force Image Width: <a href="exec:set_imgh = 0 & set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']"><<set_imgw>></a>, Currently ON - <a href="exec:set_imgw=0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-		$set_imgh = 'Width = <<set_imgw>>'
-	else
-		'Force Image Width: Currently OFF - <a href="exec:set_imgh = 0 &set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	*nl
-	!night_mode 0: dynamic
-	!night_mode 1: black
-	!night_mode 2: grey
-	!night_mode 99: no theme
-	if night_mode = 0:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
-	if night_mode = 1:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | Pitch Black | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
-	if night_mode = 2:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | Modern Grey | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
-	if night_mode = 3:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | White | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
-	if night_mode = 99:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | No Theme'
-
-	'<font color="grey">Dynamic theme (default) will change colour based on the game hour. No theme will remove table backgrounds.</font>'
-	*nl
-	if Enable_tablemap = 1:
-		'List friends in table: Currently ON - <a href="exec:Enable_tablemap = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-	else
-		'List friends in table: Currently OFF - <a href="exec:Enable_tablemap = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	*nl
-	if Enable_faceturn = 1:
-		'Always show face: Currently ON - <a href="exec:Enable_faceturn = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-	else
-		'Always show face: Currently OFF - <a href="exec:Enable_faceturn = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	*nl
-	if Enable_Android = 1:
-		'Set Fontsize for Status: Unsupported'
-		'Android Mode:Currently ON - <a href="exec:Enable_Android = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
-		! 'click <a href="exec:*clr & cla & FUNC (''$menu_obnovit'')">refresh</a> to refresh status window.'
-		'click <B>refresh</B> on top of status window to renew.'
-	else
-		'Android Mode: Currently OFF - <a href="exec:Enable_Android = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
-	end
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['status'] = {
-	*clr & cla
-	gs 'obj_din', 'settingtabs'
-	gs 'stat'
-	'<center><h1>Status Window Settings</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td cellspacing="0" cellpadding="20" valign="top">'
-	if disable_LoadSave = 0:
-		'Save/Load Buttons: Currently Image - <a href="exec:disable_LoadSave = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
-	elseif disable_LoadSave = 1:
-		'Save/Load Buttons: Currently OFF - <a href="exec:disable_LoadSave = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Image</a>'
-	elseif disable_LoadSave = 2:
-		'Save/Load Buttons: Currently Text - <a href="exec:disable_LoadSave = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	end
-	*nl
-	!disabled inner thought font selection during char creation, as it breaks menu.
-	if settingmode = 0:
-		'<a href="exec:gs ''shortgs'',''fonts'', ''$cheatmenu[''''display'''']'',''$OpenInnerThought'',''$CloseInnerThought'' ">Set</a> the font style of inner thoughts'
-		$OpenInnerThought+'Oh my god, what will the neighbours think of us?'+$CloseInnerThought
-	end
-	*nl
-	'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Celsius')+'</a> scale'
-	*nl
-	'Scale Weather Banner: <a href="exec:default_wbanner = 1 & set_weatherht=input(''Weather Banner Height (Default: 72 Min: 50 Max: 100)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_weatherht>></a>, Reset to default <a href="exec:default_wbanner = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(72)</a>'
-		if set_weatherht < 50:
-			set_weatherht = 50
-		elseif set_weatherht > 100:
-			set_weatherht = 100
-		end
-	'Scale Menu Icons: <a href="exec:default_menu_icons = 1 & set_miconht=input(''Weather Banner Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_miconht>></a>, Reset to default <a href="exec:default_menu_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
-		if set_miconht < 10:
-			set_miconht = 10
-		elseif set_miconht > 75:
-			set_miconht = 75
-		end
-	if cheatStatusIcons = 0:
-		'Status icons: Click to <a href="exec:cheatStatusIcons = 1 & disable_show_icons = 1 & gs ''stat'' & dynamic $cheatmenu[''status'']">hide</a> them.'
-		'Status Icon Height: <a href="exec:default_status_icons = 1 & set_siconht=input(''Input Status Icon Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_siconht>></a>, Reset to default <a href="exec:default_status_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
-	elseif cheatStatusIcons = 1:
-		'Status icons: Click to <a href="exec: cheatStatusIcons = 0 & disable_show_icons = 0 & gs ''stat'' & dynamic $cheatmenu[''status'']">show</a> them.'
-	end
-		if set_siconht < 10:
-			set_siconht = 10
-		elseif set_siconht > 75:
-			set_siconht = 75
-		end
-	if ETOmenu = 1:
-		'Status Display mode: Currently Text - <a href="exec:ETOmenu = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Scale Bar</a>'
-	else
-		'Status Display mode: Currently Scale Bar - <a href="exec:ETOmenu = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
-	end
-
-	if Enable_scalepic = 1:
-		'Scalebar is now as <b>Image</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
-		if Enable_scalewidth > 0:
-			'Scalebar Width: <a href="exec:input(''Input Scalebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scalewidth-1>></a>, Set is currently <a href="exec:Enable_scalewidth = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
-		else
-			'Scalebar Width: Lock is currently <a href="exec:Enable_scalewidth=1+input(''InputS calebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
-		end
-		if Enable_scaleheight > 0:
-			'Scalebar Height: <a href="exec:input(''Input Scalebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scaleheight-1>></a>, Set is currently <a href="exec:Enable_scaleheight = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
-		else
-			'Scalebar Height: Lock is currently <a href="exec:Enable_scaleheight=1+input(''InputS calebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
-		end
-	elseif Enable_scalepic = 0:
-		'Scalebar is now as <b>Character</b>, you can switch to <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
-		if cheatStatusBars = 1:
-			'Set status bar size: Currently Small - <a href="exec:cheatStatusBars = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Set large</a>'
-		else
-			'Set status bar size: Currently Large - <a href="exec:cheatStatusBars = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Set small</a>'
-		end
-	elseif Enable_scalepic = 2:
-		'Scalebar is now as <b>Table</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a>'
-	end
-	if Enable_statfsize<0:Enable_statfsize=0
-	if Enable_statfsize > 0:
-		'Set Fontsize for Status: Currently ON - <a href="exec:Enable_statfsize=input(''Enter Fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_statfsize>></a>, <a href="exec:Enable_statfsize=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	else
-		'Set Fontsize for Status: Currently OFF - <a href="exec:Enable_statfsize=input(''Enter fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-	end
-	*nl
-	'<center><B>Status Window toolbar</B></center>'
-	if Enable_showattr = 1:
-		'Show More attribute: Currently ON - <a href="exec:Enable_showattr = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	else
-		'Show More attribute: Currently OFF - <a href="exec:Enable_showattr = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-	end
-	if Enable_showskill = 1:
-		'Show skill: Currently ON - <a href="exec:Enable_showskill = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	else
-		'Show skill: Currently OFF - <a href="exec:Enable_showskill = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-	end
-	if Enable_showrelation = 1:
-		'Show relations: Currently ON - <a href="exec:Enable_showrelation = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	else
-		'Show relations: Currently OFF - <a href="exec:Enable_showrelation = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-	end
-	if Enable_showstatimg = 1:
-		'Show image toolbar: Currently ON - <a href="exec:Enable_showstatimg = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-	else
-		'Show image toolbar: Currently OFF - <a href="exec:Enable_showstatimg = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-	end
-	*nl
-	if Enable_showstatimg = 1:
-		!control image toolbar position
-		'<center><B>Image Toolbar Settings</B></center>'
-		$stat_temp_text = '<br>Image toolbar position: <B>'
-		if Enable_statimg_loc = 0:
-			$stat_temp_text += 'Middle'
-		elseif Enable_statimg_loc = 1:
-			$stat_temp_text += 'Top'
-		elseif Enable_statimg_loc = 2:
-			$stat_temp_text += 'Bottom'
-		else
-			$stat_temp_text += 'ERROR! please reset it'
-		end
-		$stat_temp_text += '</B>. You can move it to '
-		if Enable_statimg_loc ! 0:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Middle</a>'
-		if Enable_statimg_loc ! 1:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=1 & dynamic $cheatmenu[''status''] & gs ''stat''">Top</a>'
-		if Enable_statimg_loc ! 2:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=2 & dynamic $cheatmenu[''status''] & gs ''stat''">Bottom</a>'
-
-
-		$stat_temp_text
-		killvar 'stat_temp_text'
-		!End control image toolbar position
-		if set_statimgh > 0: set_statimgw = 0
-		if set_statimgw > 0: set_statimgh = 0
-		if set_statimgh <= 0 and set_statimgw <= 0: $set_statimgh = ''
-		if set_statimgh > 0:
-			'Force Image toobar height: <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgh>></a>: Currently ON - <a href="exec:set_statimgh=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-			$set_statimgh = 'height = <<set_statimgh>>'
-		else
-			'Force Image toobar height: Currently OFF - <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-		end
-		if set_statimgw > 0:
-			'Force Image toobar width: <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgw>></a>: Currently ON - <a href="exec:set_statimgw=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
-			$set_statimgh = 'width = <<set_statimgw>>'
-		else
-			'Force Image toobar width: Currently OFF - <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
-		end
-	end
-
-	!<a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''status''] & gs ''stat''"><img src="images/system/phone/theme/<<$phonetheme_name[pcs_phonetheme]>>/icon_settings.png"></a>
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['theme'] = {
-	*clr & cla
-	gs 'obj_din', 'settingtabs'
-	'<center><h1>Phone Theme Menu</h1></center>'
-	'<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
-	*nl
-	if pcs_phonetheme = 0: $phoneNameTemp = 'Standard'
-	if pcs_phonetheme = 1: $phoneNameTemp = 'Bimbo'
-	if pcs_phonetheme = 2: $phoneNameTemp = 'Aluminus'
-	if pcs_phonetheme = 3: $phoneNameTemp = 'Bottlecapped'
-	if pcs_phonetheme = 4: $phoneNameTemp = 'Galactic'
-	if pcs_phonetheme = 5: $phoneNameTemp = 'Vectored'
-	if pcs_phonetheme = 6: $phoneNameTemp = 'Veneer'
-	if pcs_phonetheme = 7: $phoneNameTemp = 'Voidwalker'
-	if pcs_phonetheme = 8: $phoneNameTemp = 'Voidwalker Red'
-	if pcs_phonetheme = 9: $phoneNameTemp = 'Voidwalker Toxic'
-	if pcs_phonetheme = 10: $phoneNameTemp = 'Gopnik'
-	if pcs_phonetheme = 11: $phoneNameTemp = 'Sports'
-	if pcs_phonetheme = 12: $phoneNameTemp = 'Succubus'
-	if pcs_phonetheme = 13: $phoneNameTemp = 'Woodshop'
-	'Current theme: <b><<$phoneNameTemp>></b>'
-	*nl
-	'Choose from the available themes'
-	*nl
-	i = 0
-	:phonethemeloop
-	if phonetheme[i] = 1:'<td align="center" valign="top"><a href="exec: pcs_phonetheme = <<i>> & gs ''telefon'',''Phone_menu'' & dynamic $cheatmenu[''theme'']"><img height="100" width="100" src="images/system/phone/theme/' + $phonetheme_name[i] + '/icon_call.png"></a></td>'
-	i += 1
-	if i <= ARRSIZE('phonetheme') and i <= 3:
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i = 4:
-		'</tr><tr>'
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i > 4 and i <= 7:
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i = 8:
-		'</tr><tr>'
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i > 8 and i <= 11:
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i = 12:
-		'</tr><tr>'
-		jump 'phonethemeloop'
-	elseif i <= ARRSIZE('phonetheme') and i > 12 and i <= 15:
-		jump 'phonethemeloop'
-	end
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['pain'] = {
-	if pain['head'] < 0:pain['head'] = 0
-	if pain['hair'] < 0:pain['hair'] = 0
-	if pain['ears'] < 0:pain['ears'] = 0
-	if pain['eyebrows'] < 0:pain['eyebrows'] = 0
-	if pain['eyes'] < 0:pain['eyes'] = 0
-	if pain['cheeks'] < 0:pain['cheeks'] = 0
-	if pain['nose'] < 0:pain['nose'] = 0
-	if pain['mouth'] < 0:pain['mouth'] = 0
-	if pain['lips'] < 0:pain['lips'] = 0
-	if pain['tongue'] < 0:pain['tongue'] = 0
-	if pain['throat'] < 0:pain['throat'] = 0
-	if pain['neck'] < 0:pain['neck'] = 0
-	if pain['back'] < 0:pain['back'] = 0
-	if pain['asscheeks'] < 0:pain['asscheeks'] = 0
-	if pain['asshole'] < 0:pain['asshole'] = 0
-	if pain['hips'] < 0:pain['hips'] = 0
-	if pain['thighs'] < 0:pain['thighs'] = 0
-	if pain['legL'] < 0:pain['legL'] = 0
-	if pain['legR'] < 0:pain['legR'] = 0
-	if pain['feet'] < 0:pain['feet'] = 0
-	if pain['toes'] < 0:pain['toes'] = 0
-	if pain['shoulders'] < 0:pain['shoulders'] = 0
-	if pain['armL'] < 0:pain['armL'] = 0
-	if pain['armR'] < 0:pain['armR'] = 0
-	if pain['hands'] < 0:pain['hands'] = 0
-	if pain['fingers'] < 0:pain['fingers'] = 0
-	if pain['chest'] < 0:pain['chest'] = 0
-	if pain['breasts'] < 0:pain['breasts'] = 0
-	if pain['nipples'] < 0:pain['nipples'] = 0
-	if pain['ribs'] < 0:pain['ribs'] = 0
-	if pain['tummy'] < 0:pain['tummy'] = 0
-	if pain['pubic'] < 0:pain['pubic'] = 0
-	if pain['vaginal'] < 0:pain['vaginal'] = 0
-	if pain['clitoris'] < 0:pain['clitoris'] = 0
-	if pain['urethra'] < 0:pain['urethra'] = 0
-	if pain['cervix'] < 0:pain['cervix'] = 0
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Pain Management</h1></center>'
-	'<center><a href="exec:killvar ''pain'' & dynamic $cheatmenu[''pain'']">No pain</a></center>'
-	*nl
-	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
-	'<tr><td width="50%" cellpadding="10" valign="top">'
-	'pain[head] = <<pain[''head'']>> <a href="exec:pain[''head''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[hair] = <<pain[''hair'']>> <a href="exec:pain[''hair''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[ears] = <<pain[''ears'']>> <a href="exec:pain[''ears''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[eyebrows] = <<pain[''ears'']>> <a href="exec:pain[''eyebrows''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[eyes] = <<pain[''eyes'']>> <a href="exec:pain[''eyes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[cheeks] = <<pain[''cheeks'']>> <a href="exec:pain[''cheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[nose] = <<pain[''nose'']>> <a href="exec:pain[''nose''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[mouth] = <<pain[''mouth'']>> <a href="exec:pain[''mouth''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[lips] = <<pain[''lips'']>> <a href="exec:pain[''lips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[tongue] = <<pain[''tongue'']>> <a href="exec:pain[''tongue''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[throat] = <<pain[''throat'']>> <a href="exec:pain[''throat''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[neck] = <<pain[''neck'']>> <a href="exec:pain[''neck''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[back] = <<pain[''back'']>> <a href="exec:pain[''back''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[asscheeks] = <<pain[''asscheeks'']>> <a href="exec:pain[''asscheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[asshole] = <<pain[''asshole'']>> <a href="exec:pain[''asshole''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[hips] = <<pain[''hips'']>> <a href="exec:pain[''hips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[thighs] = <<pain[''thighs'']>> <a href="exec:pain[''thighs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[left leg] = <<pain[''legL'']>> <a href="exec:pain[''legL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[right leg] = <<pain[''legR'']>> <a href="exec:pain[''legR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'</td><td width="50%" cellpadding="10" valign="top">'
-	'pain[feet] = <<pain[''feet'']>> <a href="exec:pain[''feet''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[toes] = <<pain[''toes'']>> <a href="exec:pain[''toes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[shoulders] = <<pain[''shoulders'']>> <a href="exec:pain[''shoulders''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[left arm] = <<pain[''armL'']>> <a href="exec:pain[''armL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[right arm] = <<pain[''armR'']>> <a href="exec:pain[''armR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[hands] = <<pain[''hands'']>> <a href="exec:pain[''hands''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[fingers] = <<pain[''fingers'']>> <a href="exec:pain[''fingers''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[chest] = <<pain[''chest'']>> <a href="exec:pain[''chest''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[breasts] = <<pain[''breasts'']>> <a href="exec:pain[''breasts''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[nipples] = <<pain[''nipples'']>> <a href="exec:pain[''nipples''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[ribs] = <<pain[''ribs'']>> <a href="exec:pain[''ribs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[tummy] = <<pain[''tummy'']>> <a href="exec:pain[''tummy''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[pubic] = <<pain[''pubic'']>> <a href="exec:pain[''pubic''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[vaginal] = <<pain[''vaginal'']>> <a href="exec:pain[''vaginal''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[labia] = <<pain[''labia'']>> <a href="exec:pain[''labia''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[clitoris] = <<pain[''clitoris'']>> <a href="exec:pain[''clitoris''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[urethra] = <<pain[''urethra'']>> <a href="exec:pain[''urethra''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'pain[cervix] = <<pain[''cervix'']>> <a href="exec:pain[''cervix''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['DNA'] = {
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - DNA Generation</h1></center>'
-	'<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td cellspacing="0" cellpadding="20" valign="top">'
-	'<center>DNA string generation<br>If parents are not in game, leave the respective IDs empty</center>'
-	*nl
-	if $cheatDNAC ! '':
-		'<b>Child: <<$npc_firstname[''<<$cheatDNAC>>'']>> <<$npc_lastname[''<<$cheatDNAC>>'']>></b> (<<$cheatDNAC>>)<br><<$npc_dna[$cheatDNAC]>><br><a href="exec:killvar ''cheatDNAC'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
-		npctemp = 0
-		killvar 'cheatDNAM'
-		killvar 'cheatDNAF'
-		:npcparentfind
-			if $npc_dna['A<<npctemp>>'] ! '':
-				if mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
-					$cheatDNAM = 'A<<npctemp>>'
-				elseif mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
-					$cheatDNAF = 'A<<npctemp>>'
-				end
-			end
-			if $npc_dna['B<<npctemp>>'] ! '':
-				if mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
-					$cheatDNAM = 'B<<npctemp>>'
-				elseif mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
-					$cheatDNAF = 'B<<npctemp>>'
-				end
-			end
-			if $npc_dna['C<<npctemp>>'] ! '':
-				if mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
-					$cheatDNAM = 'C<<npctemp>>'
-				elseif mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
-					$cheatDNAF = 'C<<npctemp>>'
-				end
-			end
-		if ($npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '') and ($cheatDNAM = '' or $cheatDNAF = ''):npctemp += 1 & jump 'npcparentfind'
-		killvar 'npctemp'
-	else
-		'<a href="exec:killvar ''tempDNAC'' & dynamic $cheatmenu[''DNAC'']"><b>ID of child (if it is known)</b></a>'
-	end
-
-	if $cheatDNAM ! '':
-		'<br><b>Mother: <<$npc_firstname[''<<$cheatDNAM>>'']>> <<$npc_lastname[''<<$cheatDNAM>>'']>></b> (<<$cheatDNAM>>)<br><<$npc_dna[$cheatDNAM]>><br><a href="exec:killvar ''cheatDNAM'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
-	else
-		'<br><a href="exec:killvar ''tempDNAM'' & dynamic $cheatmenu[''DNAM'']"><b>ID of mother (if it is known)</b></a>'
-	end
-
-	if $cheatDNAF ! '':
-		'<br><b>Father: <<$npc_firstname[''<<$cheatDNAF>>'']>> <<$npc_lastname[''<<$cheatDNAF>>'']>></b> (<<$cheatDNAF>>)<br><<$npc_dna[$cheatDNAF]>><br><a href="exec:killvar ''cheatDNAF'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
-	else
-		'<br><a href="exec:killvar ''tempDNAF'' & dynamic $cheatmenu[''DNAF'']"><b>ID of father (if it is known)</b></a>'
-	end
-	*nl
-	if $cheatDNAM ! '' and $cheatDNAF ! '':
-		$cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$npc_dna[$cheatDNAF])
-	elseif $cheatDNAM ! '':
-		if $cheatDNAC ! '':
-			$tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
-		else
-			$tempDNAF = func('DNA','create')
-			$cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$tempDNAF)
-		end
-	elseif $cheatDNAF ! '':
-		if $cheatDNAC ! '':
-			$tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
-		else
-			$tempDNAM = func('DNA','create')
-			$cheatDNAgenerated = func('DNA','generate',$tempDNAM,$npc_dna[$cheatDNAF])
-		end
-	else
-		if $cheatDNAC = '':
-			$tempDNAM = func('DNA','create')
-			$tempDNAF = func('DNA','create')
-			$cheatDNAgenerated = func('DNA','generate',$tempDNAM,$tempDNAF)
-		else
-			$tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
-			$tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
-		end
-
-
-	end
-	if $cheatDNAM = '': '<br><b>Random mother DNA:</b> <<$tempDNAM>>'
-	if $cheatDNAF = '': '<br><b>Random father DNA:</b> <<$tempDNAF>>'
-	if $cheatDNAC = '': '<br><b>Random child DNA:</b> <<$cheatDNAgenerated>>'
-	'<br><a href="exec:dynamic $cheatmenu[''DNA'']">Generate again</a>'
-	if $cheatDNAC ! '':
-		npctemp = 0
-		:npcgparfind
-			if $npc_dna['A<<npctemp>>'] ! '':
-				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['A<<npctemp>>'],1,10):
-					'<br><b>Grandmother: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
-					'<br><b>Grandfather: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['B<<npctemp>>'] ! '':
-				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['B<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['B<<npctemp>>'],1,10):
-					'<br><b>Grandmother: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['B<<npctemp>>'],1,10):
-					'<br><b>Grandfather: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['C<<npctemp>>'] ! '':
-				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['C<<npctemp>>'],1,10):
-					'<br><b>Grandmother: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
-					'<br><b>Grandfather: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				end
-			end
-		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgparfind'
-	end
-	if $cheatDNAM ! '' or $cheatDNAF ! '':
-		npctemp = 0
-		:npcchildfind
-			if $npc_dna['A<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				elseif mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['B<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				elseif mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['C<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				elseif mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
-					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				end
-			end
-		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcchildfind'
-		npctemp = 0
-		:npcgchildfind
-			if $npc_dna['A<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				elseif ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['B<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				elseif ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
-				end
-			end
-			if $npc_dna['C<<npctemp>>'] ! '':
-				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				elseif ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
-					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
-				end
-			end
-		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgchildfind'
-		killvar 'npctemp'
-	end
-	killvar '$tempDNAF'
-	killvar '$tempDNAM'
-	killvar '$tempDNAC'
-	killvar 'cheatDNAgenerated'
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['DNAM'] = {
-	$cheatDNAM = input("Enter genetic mother ID (like A33, without apostrophe)")
-	if $cheatDNAM = '':exit
-	dynamic $cheatDNAM
-	dynamic $cheatmenu['DNA']
-}
-
-$cheatmenu['DNAF'] = {
-	$cheatDNAF = input("Enter genetic father ID (like A34, without apostrophe)")
-	if $cheatDNAF = '':exit
-	dynamic $cheatDNAF
-	dynamic $cheatmenu['DNA']
-}
-
-$cheatmenu['DNAC'] = {
-	$cheatDNAC = input("Enter genetic Child ID (like A34, without apostrophe)")
-	if $cheatDNAC = '':exit
-	dynamic $cheatDNAC
-	dynamic $cheatmenu['DNA']
-}
-
-$cheatmenu['fame'] = {
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Display Setting</h1></center>'
-	$table['fame'] = '<center><table width="90%" cellspacing="0" cellpadding="5" valign="top" border="1">'
-	$table['fame'] += '<th colspan="5"><b>Fame</b></th><tr>'
-	$table['fame'] += '<th></th><th>Pavlovsk</th><th>City</th><th>Pushkin</th><th>Gadukino</th><tr>'
-
-	$table['fame'] += '<td>Actor</td>'
-	$table['fame'] += '<td> <<fame[''pav_acting'']>>   <a href="exec:gs ''fame'', ''pav'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_acting'']>>   <a href="exec:gs ''fame'', ''city'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_acting'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_acting'']>>   <a href="exec:gs ''fame'', ''village'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Dancer</td>'
-	$table['fame'] += '<td> <<fame[''pav_dance'']>>   <a href="exec:gs ''fame'', ''pav'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_dance'']>>   <a href="exec:gs ''fame'', ''city'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_dance'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_dance'']>>   <a href="exec:gs ''fame'', ''village'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Glamour model</td>'
-	$table['fame'] += '<td> <<fame[''pav_modelling'']>>   <a href="exec:gs ''fame'', ''pav'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_modelling'']>>   <a href="exec:gs ''fame'', ''city'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_modelling'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_modelling'']>>   <a href="exec:gs ''fame'', ''village'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Painter</td>'
-	$table['fame'] += '<td> <<fame[''pav_painting'']>>   <a href="exec:gs ''fame'', ''pav'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_painting'']>>   <a href="exec:gs ''fame'', ''city'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_painting'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_painting'']>>   <a href="exec:gs ''fame'', ''village'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Musician</td>'
-	$table['fame'] += '<td> <<fame[''pav_music'']>>   <a href="exec:gs ''fame'', ''pav'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_music'']>>   <a href="exec:gs ''fame'', ''city'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_music'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_music'']>>   <a href="exec:gs ''fame'', ''village'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Ballet dancer</td>'
-	$table['fame'] += '<td> <<fame[''pav_ballet'']>>   <a href="exec:gs ''fame'', ''pav'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_ballet'']>>   <a href="exec:gs ''fame'', ''city'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_ballet'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_ballet'']>>   <a href="exec:gs ''fame'', ''village'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Porn actor</td>'
-	$table['fame'] += '<td> <<fame[''pav_porn'']>>   <a href="exec:gs ''fame'', ''pav'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_porn'']>>   <a href="exec:gs ''fame'', ''city'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_porn'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_porn'']>>   <a href="exec:gs ''fame'', ''village'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Stripper</td>'
-	$table['fame'] += '<td> <<fame[''pav_stripping'']>>   <a href="exec:gs ''fame'', ''pav'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_stripping'']>>   <a href="exec:gs ''fame'', ''city'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_stripping'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_stripping'']>>   <a href="exec:gs ''fame'', ''village'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Sex</td>'
-	$table['fame'] += '<td> <<fame[''pav_sex'']>>   <a href="exec:gs ''fame'', ''pav'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_sex'']>>   <a href="exec:gs ''fame'', ''city'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_sex'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_sex'']>>   <a href="exec:gs ''fame'', ''village'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Prostitution</td>'
-	$table['fame'] += '<td> <<fame[''pav_prostitute'']>>   <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_prostitute'']>>   <a href="exec:gs ''fame'', ''city'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_prostitute'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_prostitute'']>>   <a href="exec:gs ''fame'', ''village'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Kickboxer</td>'
-	$table['fame'] += '<td> <<fame[''pav_kickboxing'']>>   <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_kickboxing'']>>   <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_kickboxing'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_kickboxing'']>>   <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Runner</td>'
-	$table['fame'] += '<td> <<fame[''pav_running'']>>   <a href="exec:gs ''fame'', ''pav'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_running'']>>   <a href="exec:gs ''fame'', ''city'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_running'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_running'']>>   <a href="exec:gs ''fame'', ''village'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Volleyball player</td>'
-	$table['fame'] += '<td> <<fame[''pav_volleyball'']>>   <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_volleyball'']>>   <a href="exec:gs ''fame'', ''city'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -100 & dynamic  $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_volleyball'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_volleyball'']>>   <a href="exec:gs ''fame'', ''village'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Chess player</td>'
-	$table['fame'] += '<td> <<fame[''pav_chess'']>>   <a href="exec:gs ''fame'', ''pav'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_chess'']>>   <a href="exec:gs ''fame'', ''city'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_chess'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_chess'']>>   <a href="exec:gs ''fame'', ''village'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Teacher</td>'
-	$table['fame'] += '<td> <<fame[''pav_teaching'']>>   <a href="exec:gs ''fame'', ''pav'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_teaching'']>>   <a href="exec:gs ''fame'', ''city'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_teaching'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_teaching'']>>   <a href="exec:gs ''fame'', ''village'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<tr>'
-
-	$table['fame'] += '<td>Social media</td>'
-	$table['fame'] += '<td> <<fame[''pav_media'']>>   <a href="exec:gs ''fame'', ''pav'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''city_media'']>>   <a href="exec:gs ''fame'', ''city'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''pushkin_media'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '<td><<fame[''village_media'']>>   <a href="exec:gs ''fame'', ''village'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
-	$table['fame'] += '</table></center>'
-	
-	$table['fame']
-
-}
-
-$cheatmenu['quicktime'] = {
-	minut += ARGS[0]
-	*clr
-	gs 'daystart'
-	gs 'outdoors', 'weather'
-	gs 'stat'
-	gs 'fertility', 'cum_arrcheat'
-}
-
-$cheatmenu = {
-	gs'stat'
-	currhour = (daystart-1) * 24 + hour
-	currday = daystart
-	temp_week = week & temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Index</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	'<a href="exec:dynamic $cheatmenu[''dynamic'']">Dynamic Input Command</a>'
-	'<a href="exec:gs ''fertility'',''cum_arrcheat''">OOX Debug</a>'
-	'Right now <<$week[week]>> <<$month>> <<day>> <<year>> <<hour>>:<<minut>>'
-	'Jump forward <a href="exec:dynamic $cheatmenu[''quicktime''], 15 & dynamic $cheatmenu">+15</a> minutes'
-	*nl
-	*nl
-	'<a href="exec:gt''pav_residential''">Teleport to Pavlovsk</a>'
-	'<a href="exec:gt''liam''">Teleport to Pushkin</a>'
-	'<a href="exec:gt''city_residential''">Teleport to City</a>'
-	'<a href="exec:gt''gadukino''">Teleport to Gadukino</a>'
-	'<a href="exec:gt''dachi''">Teleport to Suburban Cooperative</a>'
-	*nl
-	'<font color="red"><b>WARNING!</b></font>: Teleporting while in an event may break your game. Use at your own risk!'
-	*nl
-	'Pregnancy speed multiplier: <a href="exec:if pregspeedcheat < 3:pregspeedcheat += 1 & dynamic $cheatmenu else pregspeedcheat = 0 & dynamic $cheatmenu"><b><<pregspeedcheat+1>></b></a>'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''vartracker'']"><b>Variable tracker</b></a>'
-	'</tr></table></b></center>'
-}
-
-$cheatmenu['vartracker'] = {
-	gs'stat'
-	*clr & cla
-	act 'Return to cheat index': dynamic $cheatmenu
-	'<center><h1>Cheat menu</h1></center>'
-	'<center>For testing purposes.<br>If reporting a bug only the lines in red are neccessary.</center>'
-	*nl
-	'$loc: <<$loc>>'
-	'$locM: <<$locM>>'
-	'<font color = red>$CURLOC: <<$CURLOC>></font>'
-	'$location_type: <<$location_type>>'
-	'$home[''current'']: <<$home[''current'']>>'
-	'$home[''town'']: <<$home[''town'']>>'
-	'$home[''name'']: <<$home[''name'']>>'
-	'daystart: <<daystart>>'
-	'daystart_start: <<daystart_start>>'
-	'month: <<month>>'
-	'week: <<week>>'
-	'$temperature: <<$temperature>>'
-	'pfilmday: <<pfilmday>>'
-	'$pfname: <<$pfname>>'
-	'modelmon: <<modelmon>>'
-	'min_arousal: <<min_arousal>>'
-	'pcs_nips: <<pcs_nips>>'
-	'clit_size: <<clit_size>>'
-	'steroid_have: <<steroid_have>>'
-	'steroid_counter: <<steroid_counter>>'
-	'steroid_dose: <<steroid_dose>>'
-	'aphrodisiac_have: <<aphrodisiac_have>>'
-	'aphrodisiac_counter: <<aphrodisiac_counter>>'
-	'aphrodisiac_timer: <<aphrodisiac_timer>>'
-	'aphrodisiac_addiction: <<aphrodisiac_addiction>>'
-	'bcream_have: <<bcream_have>>'
-	'motherQW: <<npc_QW[''A29'']>>'
-	'Anastasia quest level: <<npc_QW[''A192'']>>'
-	'sex: <<stat[''vaginal'']>>'
-	'$clothingworntype: <<$clothingworntype>>'
-	'PCloQuality: <<PCloQuality>>'
-	'Mira''s Father Quest (npc_QW[''A64'']): <<npc_QW[''A64'']>>'
-	'Mira''s Quest (npc_QW[''A60'']): <<npc_QW[''A60'']>>'
-	'mirasextimes: <<mirasextimes>>'
-	'Mira''s Relationship (npc_rel[''A60'']): <<npc_rel[''A60'']>>'
-	'Mitka''s Quest (npc_QW[''A63'']): <<npc_QW[''A63'']>>'
-	'mirabrosextime: <<mirabrosextime>>'
-	'momslut: <<momslut>>'
-	'Kirill''s Relationship (Kirill): <<Kirill>>'
-	'Kirill''s Corruption (Kirill_Crpt): <<Kirill_Crpt>>'
-	'children: <<kid>>'
-	!! BabyEmbryo is for how many unborn babies inside PC.
-	'fetus number: <<BabyEmbryo>>'
-	!! preg is your pregnancy state. 0 is not pregnant, 1 is pregnant in general, 2 is in labor. 
-	'pregnancy state: <<preg>>'
-	!! thinkpreg is if svetka thinks she is pregnant
-	'thinkpreg: <<thinkpreg>>'
-	!! knowpreg is for solid proof svetlana is pregnant, like a pregnancy test.
-	'knowpreg: <<knowpreg>>'
-	!! knowpregrecover is for Svetlanas knowledge that she just gave birth.
-	'knowpregrecover: <<knowpregrecover>>'
-	!! knowpregloss is for Svetlanas knowledge that she lost a baby. 1 is for an abortion, 2 is for a miscarrage. 
-	'knowpregloss: <<knowpregloss>>'
-	!! cycle is Svetlanas current fertility cycle. 5 is pregnant, 4 is recovering, 3 is luteal, 2 is ovulation, 1 is foccular, 0 is menstration. 
-	'cycle: <<cycle>>'
-	!! menoage is the age Svetlana will be when she goes through menopause.
-	'menoage: <<menoage>>'
-	!! age is how old Svetlana is in years.
-	'age: <<age>>'
-	!! mesec is for how many hours of bleeding Svetlana has left in her current fertility cycle
-	'mesec: <<mesec>>'
-	!! FocH is for how many hours of Foccular cycle Svetlana has gone through in her current fertility cycle. Focular starts at the end of her Luteal and contains the bleeding period in Svetkas cycle.
-	'FocH: <<FocH>>'
-	!! EggRH is for the level of egg release that Svetlana has for her ovulation event. 150 generates a single egg, higher amounts might release more.
-	'EggRH: <<EggRH>>'
-	!! Ovulate is the amount of hours remaining in Svetlanas ovulation period of her current fertility cycle. 
-	'Ovulate: <<Ovulate>>'
-	!! UnfertEgg is how many unfertilized eggs Svetlana has in her for fertilization during her Ovulation period. Unfertilized eggs are removed at the end of her Ovulation period.
-	'UnfertEgg: <<UnfertEgg>>'
-	!! FertEgg is how many unimplanted eggs Svetlana has in her. These are possible babies, but they die 330 hours after ovulation if they do not implant.
-	'FertEgg: <<FertEgg>>'
-	!! babyptype is the pregnancy type of unborn babies. they might be unimplanted 0, healthy 1, or Ectopic 2. Future pregnancy complications should use this variable
-	if FertEgg > 0:
-		i = arrpos('$kidname','unborn')
-		imax = arrsize('$kidname')-1
-		:chlp
-			'	<<i+1>>. baby''s pregnancy type: <<babyptype[i]>>'
-		if i < imax: i += 1 & jump 'chlp'
-		killvar 'i'
-		killvar 'imax'
-	end
-	!! BabyEmbryo is for implanted babies. These are solid pregnancies. 
-	'Implanted Embryos: <<BabyEmbryo>>'
-	!! ferteggage is for the time since the ovulation event. They last 330 hours before they die if not implanted.
-	'ferteggage: <<ferteggage>>'
-	!! PregChem is the level of pregnancy, measured in hour parts. 
-	'PregChem: <<PregChem>>'
-	!! pillcon is the level of birth control to prevent svetlana from getting pregnant. Higher concentrations increase effectivity until it reaches it''s ideal level.
-	'pillcon: <<pillcon>>'
-	!! believed pillcon is the level of birth control svetlana thinks she has. This may be different from the actual level due to sabotage or a bad habit of not taking your pill.
-	'Believed pillcon: <<pillcon2>>'
-	!! RecovH is the amount of recover hours before Svetlanas fertility cycle resets after having a baby.
-	'RecovH: <<RecovH>>'
-	!! daylastperiod is for Svetlanas knowledge on when she began her last period
-	'daylastperiod: <<daylastperiod>> (daystart difference: <<daystart-daylastperiod>>)'
-	!! lastmens is for the last day that Svetlana bled during her last cycle.
-	'lastmens: <<lastmens>>'
-	!! firstmens is for the first day that Svetlana bled during her last cycle. this is different than daylastperiod because this is the actual date, while daylastperiod is when Svetlana remembers it being.
-	'firstmens: <<lastmens>> (daystart difference: <<daystart-firstmens>>)'
-	'hypnoTime: <<hypnoTime>>'
-	'hypnoStrength: <<hypnoStrength>>'
-	'hypnoDay: <<hypnoDay>>'
-	'hypnoAddict: <<hypnoAddict>>'
-	'missCum: <<missCum>>'
-	'condoms/bad condoms: <<prezik>>/<<badprezik>>'
-	if tabletki > 0:
-		'pack(s) of birth control pills: <<tabletki>>'
-		if tabletkiold > 0: '	<<tabletkiold>> expired pack'
-		if tabletkifake > 0: '	<<tabletkifake>> counterfeit pack'
-		if tabletkirej > 0: '	<<tabletkirej>> factory rejected pack'
-		if tabletkifert > 0: '	<<tabletkifert>> fertility hormones pack'
-		if tabletkisug > 0: '	<<tabletkisug>> sugar pills pack'
-	end
-	if pillsleft[ptype] > 0:
-		if ptype = 0: $pilltype = 'normal '
-		if ptype = 1: $pilltype = 'expired '
-		if ptype = 2: $pilltype = 'counterfeit '
-		if ptype = 3: $pilltype = 'factory rejected '
-		if ptype = 4: $pilltype = 'sugar '
-		if ptype = 5: $pilltype = 'fertility hormone '
-		'<<pillsleft[ptype]>> <<$pilltype>>pills left of your currently used pack'
-		killvar '$pilltype'
-	end
-}
-
-$cheatmenu['bdimmain'] = {
-	gs 'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Body Image Sets</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
-	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
-	'<center><b>Body Image Controls</b></center>'
-	*nl
-	'You are currently using set: <<$bodimgsets[((bodset * 10) + 9)]>>'
-	if bdsetlock = 1:
-		'The set used is locked to current.'
-	else
-		'The set used is unlocked.'
-	end
-	*nl
-	'This is the current default and custom (if any) body image sets:'
-	*nl
-	'<a href="exec:chmbodset = 0 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[9]>></b></a>'
-	*nl
-	'<a href="exec:chmbodset = 1 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[19]>></b></a>'
-	*nl
-	'<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
-	*nl
-	if bodsetcnt >= 4:
-		'You may edit aspects of a custom image set by clicking on their folder names below.'
-		*nl
-		'<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
-		*nl
-	elseif bodsetcnt = 3:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 5:
-		'<a href="exec:chmbodset = 5 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[59]>></b></a>'
-		*nl
-	elseif bodsetcnt = 4:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 6:
-		'<a href="exec:chmbodset = 6 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[69]>></b></a>'
-		*nl
-	elseif bodsetcnt = 5:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 7:
-		'<a href="exec:chmbodset = 7 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[79]>></b></a>'
-		*nl
-	elseif bodsetcnt = 6:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 8:
-		'<a href="exec:chmbodset = 8 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[89]>></b></a>'
-		*nl
-	elseif bodsetcnt = 7:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 9:
-		'<a href="exec:chmbodset = 9 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[99]>></b></a>'
-		*nl
-	elseif bodsetcnt = 8:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	'</td></tr></table></center>'
-}
-
-$cheatmenu['bdimdisplay'] = {
-	gs 'stat'
-	*clr & cla
-	'<center><h1>Cheat menu</h1></center>'
-	*nl
-	'<center><b>Body Image Set Display</b></center>'
-	'<a href="exec:killvar ''chmbodset'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
-	*nl
-	if bdsetlock = 1 and chmbodset = fixbodset:
-		'This is the currently locked set.'
-		'<a href="exec:bdsetlock = 0 & bodset = 1 & killvar ''fixbodset'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Clear the lock.</b></a>'
-	else
-		'<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
-	end
-	*nl
-	if chmbodset <= 3:
-		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
-		'Descriptors:'
-		*nl
-		if chmbodset = 3:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
-		else
-			'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
-		end
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
-		*nl
-		if chmbodset = 3:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
-		else
-			'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
-		end
-		*nl
-		if chmbodset = 3:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
-		else
-			'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
-		end
-		*nl
-		if chmbodset = 3:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/8.jpg''"><<$bodimgsets[((chmbodset * 10) + 8)]>></a>'
-		end
-		*nl
-	else
-		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
-		'Descriptors: (Displayed as "You are:")'
-		if imgset0ovr[chmbodset] = 1:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a> -- <a href="exec:chmbddes = 0 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-			*nl
-			'You are using a <a href="exec:imgset0ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 0</a> for this set.'
-			*nl
-		else
-			'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
-			*nl
-			'You are using the <a href="exec:imgset0ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 0</a> for this set.'
-			*nl
-		end
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a> -- <a href="exec:chmbddes = 1 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a> -- <a href="exec:chmbddes = 2 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a> -- <a href="exec:chmbddes = 3 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a> -- <a href="exec:chmbddes = 4 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-		*nl
-		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a> -- <a href="exec:chmbddes = 5 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-		*nl
-		if imgset6ovr[chmbodset] = 1:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a> -- <a href="exec:chmbddes = 6 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-			*nl
-			'You are using a <a href="exec:imgset6ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 6</a> for this set.'
-			*nl
-		else
-			'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
-			*nl
-			'You are using the <a href="exec:imgset6ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 6</a> for this set.'
-			*nl
-		end
-		if imgset7ovr[chmbodset] = 1:
-			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a> -- <a href="exec:chmbddes = 7 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
-			*nl
-			'You are using a <a href="exec:imgset7ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 7</a> for this set.'
-			*nl
-		else
-			'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
-			*nl
-			'You are using the <a href="exec:imgset7ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 7</a> for this set.'
-			*nl
-		end
-		'<a href="exec:dynamic $cheatmenu[''bdimcstdel'']">Delete this set.</a>'
-	end
-}
-
-$cheatmenu['bdimcstdel'] = {
-	*clr & cla
-	'<center><b>Body Image Set Removal</b></center>'
-	'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
-	*nl
-	'This is where you remove a body image set from use, please note it does not delete anything, it just clears the custom set from this game instance/save.'
-	if klsetask = 1:
-		'<a href="exec:klsetask = 2 & dynamic $cheatmenu[''bdimcstdel'']"><b>Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</b></a>'
-	elseif klsetask = 2:
-		if chmbodset <= 2:
-			'You have encoutered error 1'
-			'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
-			exit
-		end
-		if bdsetlock = 1 and fixbodset >= chmbodset: bdsetlock = 0 & killvar 'fixbodset'
-		if bodsetcnt > chmbodset:
-			cyci1 = 0
-			cyci2 = chmbodset
-
-			:overwriter1
-
-			$bodimgsets[((cyci2 * 10) + cyci1)] = $bodimgsets[(((cyci2 + 1) * 10) + cyci1)]
-			cyci1 += 1
-			if cyci1 < 10: jump 'overwriter1'
-			imgset6ovr[cyci2] = imgset6ovr[(cyci2 + 1)]
-			imgset7ovr[cyci2] = imgset7ovr[(cyci2 + 1)]
-			cyci1 = 0
-			cyci2 += 1
-			if cyci2 < bodsetcnt: jump 'overwriter1'
-			killvar 'cyci1' & killvar 'cyci2'
-		elseif bodsetcnt < chmbodset:
-			'You have encoutered error 2'
-			'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
-			exit
-		end
-		cyci1 = 9
-
-		:poofer1
-
-		killvar 'bodimgsets', ((bodsetcnt * 10) + cyci1)
-		cyci1 -= 1
-		if cyci1 >= 0: jump 'poofer1'
-		killvar 'cyci1'
-		killvar 'imgset6ovr', bodsetcnt
-		killvar 'imgset7ovr', bodsetcnt
-		bodsetcnt -= 1
-		killvar 'klsetask'
-		dynamic $cheatmenu['bdimmain']
-	else
-		'<a href="exec:klsetask = 1 & dynamic $cheatmenu[''bdimcstdel'']">Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</a>'
-	end
-}
-
-$cheatmenu['bdimcstadd'] = {
-	*clr & cla
-	'<center><b>Body Image Set Addition</b></center>'
-	'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
-	*nl
-	'This is where you can add a new image set to a game.'
-	'To add an image set, create a folder in images/pc/body/shape/ and name it anything you want (shorter will be easier to remember). Then put in it any images you want named 1.jpg, 2.jpg, etc. up 5, 6, or 7. Just make sure it contains images 1 to 5. Once you have done that, click the link below and put in your folder name to add that set.'
-	'Note: This will only be for this instance/save of the game and you will have to redo the click the link step if you want to add the same folder to a different instance/save.'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''bdimcstaddpro'']">Add Image Set</a>'
-}
-
-$cheatmenu['bdimcstaddpro'] = {
-	$tmpstrg = input("Enter folder name, do not include ''\''")
-	if $tmpstrg = '':
-		killvar '$tmpstrg'
-		dynamic $cheatmenu['bdimcstadd']
-	else
-		bodsetcnt += 1
-		cyci1 = 0
-		:addcyc
-		$bodimgsets[((bodsetcnt * 10) + cyci1)] = $bodimgsets[(10 + cyci1)]
-		cyci1 += 1
-		if cyci1 < 9: jump 'addcyc'
-		$bodimgsets[((bodsetcnt * 10) + 9)] = $tmpstrg
-		imgset6ovr[bodsetcnt] = 0
-		imgset7ovr[bodsetcnt] = 0
-		killvar '$tmpstrg'
-		killvar 'cyci1'
-		dynamic $cheatmenu['bdimmain']
-	end
-}
-
-$cheatmenu['bdimcstdesed'] = {
-	$tmpstrg = input("Enter a new descriptor")
-	if $tmpstrg = '':
-		killvar 'chmbddes'
-		killvar '$tmpstrg'
-	else
-		$bodimgsets[((chmbodset * 10) + chmbddes)] = $tmpstrg
-		killvar 'chmbddes'
-		killvar '$tmpstrg'
-		dynamic $cheatmenu['bdimdisplay']
-	end
-}
-
-$cheatmenu['succubreset'] = {
-	*clr & cla
-	'Are you sure you want to reset your Succubus status? You will lose all levels, saved power, and succubus skill levels.'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''magic'']"><b>No, nevermind.</b></a>'
-	*nl
-	'<a href="exec:dynamic $cheatmenu[''sucresetdo'']"><b>Yes, remove & reset Succubus status</b></a>'
-}
-
-$cheatmenu['sucresetdo'] = {
-!!	Probably do not need to kill all of these, but better to unload them.
-	killvar 'scfwon'
-	killvar 'scpopt'
-	killvar '$sclocrt'
-	killvar '$scargrt'
-	killvar '$scsubloc'
-	killvar 'suceatinit'
-	killvar 'succubusflag'
-	killvar 'succubusQW'
-	killvar '$sucself1'
-	killvar 'succublvl'
-	killvar 'succubxp'
-	killvar 'sucxpsnapshot'
-	killvar 'succhungry'
-	killvar 'sucexcess'
-	killvar 'sexnutrition'
-	killvar 'suclezsex'
-	killvar 'sucabslez'
-	killvar 'sucabscum'
-	killvar '$sucabs1'
-	killvar '$sucabs2'
-	killvar '$sucabs3'
-	killvar 'succonfail'
-	killvar 'sucpowzeroed'
-	killvar 'suchuntday'
-	killvar 'sucpcinfo'
-	killvar 'karinsucsex'
-	killvar 'karinsucsexday'
-	killvar 'karinsucsexask'
-	killvar 'tatianasucsex'
-	killvar 'tatianasucsexday'
-	killvar 'tatianasucsexask'
-	killvar 'sucwalkday'
-	killvar '$sucgoloc'
-	killvar '$sucgometka'
-	killvar 'sucskill'
-	killvar 'sucstorecap'
-	killvar 'sucinfoday'
-	killvar 'sctrainprep'
-!!	This list will be updated as new variables are added
-	dynamic $cheatmenu['magic']
-}
-$cheatmenu['about'] = {
-	*clr & cla
-	gs 'obj_din', 'settingtabs'
-	gs 'stat'
-	gs 'saveg'
-	gs 'addbuilddate'
-	'<center><h1>About Window</h1></center>'
-	'<center><table cellspacing="0" cellpadding="20" valign="top">'
-	'<tr><td><h3><center>Girl Life version <<version_major>>.<<version_minor>>.<<version_revision>>.<<version_patch>></center></h3></td></tr>'
-	'<tr><td><h3><center>built on <<$builddate>></center></h3></td></tr>'
-	'<tr><td><h5><center>if loaded so it was the save from</center></h5></td></tr>'
-	'<tr><td cellspacing="0" cellpadding="20" valign="top"><center><<$version>></center></td></tr>'
-	'</table></center>'
-	killvar '$tmp'
-}
-
-$cheatmenu['items'] = {
-	gs'stat'
-	*clr & cla
-	gs 'obj_din', 'cheattabs'
-	'<center><h1>Cheat Menu - Items</h1></center>'
-
-	'<center><h4>Pharmacy items</h4>'
-	if showPharmacyItems = 0:
-		'<a href = "exec: showPharmacyItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end
-	
-	if showPharmacyItems = 1:
-		'<a href = "exec: showPharmacyItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-		*pl 'Morning after pill: <a href="exec:morning_after_pill=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<morning_after_pill>> </b></a>'
-		*pl 'Condoms: <a href="exec:prezik=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<prezik>> </b></a>'
-		*pl 'Pregnancy test: <a href="exec:pregtest=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<pregtest>> </b></a>'
-		*pl 'Birth control pills: <a href="exec:tabletki=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tabletki>> </b></a>'
-		*pl 'Antibiotics: <a href="exec:lekarstvo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lekarstvo>> </b></a>'
-		*pl 'Vitamins: <a href="exec:vitamin=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<vitamin>> </b></a>'
-		*pl 'Painkillers: <a href="exec:painkiller=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<painkiller>> </b></a>'
-		*pl 'Ointments for chafing: <a href="exec:mosolmaz=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mosolmaz>> </b></a>'
-		*pl 'Lubricants: <a href="exec:lubri=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lubri>> </b></a>'
-		*pl 'Lip balms: <a href="exec:lipbalm=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lipbalm>> </b></a>'
-		*pl 'Weight loss pill: <a href="exec:fatdel=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<fatdel>> </b></a>'
-		*pl 'Tampons: <a href="exec:tampon=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tampon>> </b></a>'
-		*pl 'Sanitary napkins: <a href="exec:sanpad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<sanpad>> </b></a>'
-
-		if klisma = 0:
-			*pl 'Enema kit: <a href="exec:klisma = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if klisma = 1:
-			*pl 'Enema kit: <a href="exec:klisma = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end
-
-		if breastpump = 0:
-			*pl 'Breast pump: <a href="exec:breastpump = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if breastpump = 1:
-			*pl 'Breast pump: <a href="exec:breastpump = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end		
-
-		*pl 'Breastmilk bottle S: <a href="exec:bpbottles=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bpbottles>> </b></a>'
-		*pl 'Breastmilk bottle M: <a href="exec:bpbottlem=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bpbottlem>> </b></a>'
-	end
-	
-	'<h4>Food items</h4>'
-	if showFoodItems = 0:
-		'<a href = "exec: showFoodItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end
-
-	if showFoodItems = 1:
-		'<a href = "exec: showFoodItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-		*pl 'Regular food: <a href="exec:eda=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<eda>> </b></a>'
-		*pl 'Diet food: <a href="exec:edad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<edad>> </b></a>'
-		*pl 'Tea biscuits: <a href="exec:pranik=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<pranik>> </b></a>'
-
-		if bag > 0:
-			if bottle = 0:
-				*pl 'Bottle of water: <a href="exec:bottle = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if bottle = 1:
-				*pl 'Bottle of water: <a href="exec:bottle = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end
-
-			if buterbrod = 0:
-				*pl 'Sandwich: <a href="exec:buterbrod = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if buterbrod = 1:
-				*pl 'Sandwich: <a href="exec:buterbrod = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end	
-
-			if wine = 0:
-				*pl 'Cheap Bottle of wine: <a href="exec:wine = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if wine = 1:
-				*pl 'Cheap Bottle of wine: <a href="exec:wine = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end	
-		end
-	end
-
-	'<h4>Cosmetics items</h4>'
-	if showCosmeticsItems = 0:
-		'<a href = "exec: showCosmeticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end
-
-	if showCosmeticsItems = 1:
-		'<a href = "exec: showCosmeticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-		*pl 'Cosmetics: <a href="exec:kosmetica=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<kosmetica>> </b></a>'
-		*pl 'Moisturiser: <a href="exec:item_moisturizer=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<item_moisturizer>> </b></a>'
-		*pl 'Lip balms: <a href="exec:lipbalm=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lipbalm>> </b></a>'
-		*pl 'Plain false lashes: <a href="exec:falselashesplain=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<falselashesplain>> </b></a>'
-		*pl 'Mink false lashes: <a href="exec:falselashesmink=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<falselashesmink>> </b></a>'
-		*pl 'Razors: <a href="exec:stanok=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<stanok>> </b></a>'
-		*pl 'Sunblock: <a href="exec:krem=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<krem>> </b></a>'
-		*pl 'Deodorant: <a href="exec:deodorant=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<deodorant>> </b></a>'
-		*pl 'Tampons: <a href="exec:tampon=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tampon>> </b></a>'
-		*pl 'Sanitary Napkins: <a href="exec:sanpad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<sanpad>> </b></a>'
-		*pl 'Shampoo: <a href="exec:shampoo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<shampoo>> </b></a>'
-		*pl 'Hair scrunchies: <a href="exec:hscrunch=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<hscrunch>> </b></a>'
-		*pl 'Hair pins: <a href="exec:hpingrip=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<hpingrip>> </b></a>'
-
-		if bag = 1:
-			*pl 'Wipes: <a href="exec:salfetka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<salfetka>> </b></a>'
-			*pl 'Portable makeup: <a href="exec:kosmetitka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<kosmetitka>> </b></a>'
-			*pl 'Mouthwash: <a href="exec:mouthwash=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mouthwash>> </b></a>'
-			
-			if greben = 0:
-				*pl 'Comb: <a href="exec:greben = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if greben = 1:
-				*pl 'Comb: <a href="exec:greben = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end	
-
-			if compact_mirror = 0:
-				*pl 'Compact mirror: <a href="exec:compact_mirror = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if compact_mirror = 1:
-				*pl 'Compact mirror: <a href="exec:compact_mirror = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end	
-		end
-	end
-
-	'<h4>Hardware items</h4>'
-	if showHardwareItems = 0:
-		'<a href = "exec: showHardwareItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end 
-	if showHardwareItems = 1:
-		'<a href = "exec: showHardwareItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-		*pl 'Dishwashing detergent: <a href="exec:fairy=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<fairy>> </b></a>'
-		*pl 'Clothing detergent: <a href="exec:poroshok=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<poroshok>> </b></a>'
-		*pl 'Plates: <a href="exec:cltarelka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<cltarelka>> </b></a>'
-		*pl 'Fabric: <a href="exec:tkan=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tkan>> </b></a>'
-	
-		if sewing_kit = 0:
-			*pl 'Sewing kit: <a href="exec:sewing_kit = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if sewing_kit = 1:
-			*pl 'Sewing kit: <a href="exec:sewing_kit = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if bag = 1:
-			if umbrella = 0:
-				*pl 'Umbrella: <a href="exec:umbrella = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-			end
-			if umbrella = 1:
-				*pl 'Umbrella: <a href="exec:umbrella = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-			end	
-		end
-	end
-
-	'<h4>Narcotics items</h4>'
-	if showNarcoticsItems = 0:
-		'<a href = "exec: showNarcoticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end
-	if showNarcoticsItems = 1:
-		'<a href = "exec: showNarcoticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-		*pl 'Cigarettes: <a href="exec:siga=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<siga>> </b></a>'
-		*pl 'Joints: <a href="exec:joint=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<joint>> </b></a>'
-		*pl 'Cocaine: <a href="exec:dur=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<dur>> </b></a>'
-		*pl 'Amphetamine: <a href="exec:amphetamine=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<amphetamine>> </b></a>'
-		*pl 'Neuroboosters: <a href="exec:mentats_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mentats_have>> </b></a>'
-		*pl 'Steroids: <a href="exec:steroid_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<steroid_have>> </b></a>'
-		*pl 'Breast cream: <a href="exec:bcream_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bcream_have>> </b></a>'
-		*pl 'Aphrodisiacs: <a href="exec:aphrodisiac_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<aphrodisiac_have>> </b></a>'
-	end
-	'<h4>Sex shop items</h4>'
-	if showSexItems = 0:
-		'<a href = "exec: showSexItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
-	end
-	if showSexItems = 1:
-		'<a href = "exec: showSexItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
-
-		if pornMagazine = 0:
-			*pl 'Porn magazine: <a href="exec:pornMagazine = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if pornMagazine = 1:
-			*pl 'Porn magazine: <a href="exec:pornMagazine = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if vibrator = 0:
-			*pl 'Vibrator: <a href="exec:vibrator = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if vibrator = 1:
-			*pl 'Vibrator: <a href="exec:vibrator = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if analplug = 0:
-			*pl 'Butt plug: <a href="exec:analplug = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if analplug = 1:
-			*pl 'Butt plug: <a href="exec:analplug = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		*pl '15cm suction dildo: <a href="exec:suction_dildo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<suction_dildo>> </b></a>'	
-	
-		if strapon = 0:
-			*pl 'Strap-on harness: <a href="exec:strapon = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if strapon = 1:
-			*pl 'Strap-on harness: <a href="exec:strapon = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if dildo = 0:
-			*pl '10cm dildo: <a href="exec:dildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if dildo = 1:
-			*pl '10cm dildo: <a href="exec:dildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end
-
-		if middildo = 0:
-			*pl '15cm dildo: <a href="exec:middildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if middildo = 1:
-			*pl '15cm dildo: <a href="exec:middildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if largedildo = 0:
-			*pl '20cm dildo: <a href="exec:largedildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if largedildo = 1:
-			*pl '20cm dildo: <a href="exec:largedildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if bigdildo = 0:
-			*pl '25cm dildo: <a href="exec:bigdildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if bigdildo = 1:
-			*pl '25cm dildo: <a href="exec:bigdildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end
-
-		if extradildo = 0:
-			*pl '30cm dildo: <a href="exec:extradildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if extradildo = 1:
-			*pl '30cm dildo: <a href="exec:extradildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end	
-
-		if superdildo = 0:
-			*pl '35cm dildo: <a href="exec:superdildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if superdildo = 1:
-			*pl '35cm dildo: <a href="exec:superdildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end
-
-		if maddildo = 0:
-			*pl '40cm dildo: <a href="exec:maddildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
-		end
-		if maddildo = 1:
-			*pl '40cm dildo: <a href="exec:maddildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
-		end
-	end
-	'</center>'
-}
-
---- Cheatmenu_din ---------------------------------
+# Cheatmenu_din
+
+*clr & cla
+
+!All the active dynamics for the cheat menu are here
+$cheatmenu['empty'] = {
+	!Yes, intentionally empty, do not remove it
+}
+
+$cheatmenu['work'] = {
+	if cheatWork = 0:
+		cheatWork = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatWork = 1:
+		cheatWork = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['willpower'] = {
+	if cheatWillpower = 0:
+		cheatWillpower = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatWillpower = 1:
+		cheatWillpower = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['hair'] = {
+	if cheatHapri = 0:
+		cheatHapri = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatHapri = 1:
+		cheatHapri = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['enema'] = {
+	if cheatKlisma = 1:
+		cheatKlisma = 0
+		dynamic $cheatmenu['setting']
+		exit
+	elseif cheatKlisma = 0:
+		cheatKlisma = 1
+		dynamic $cheatmenu['setting']
+	end
+}
+
+$cheatmenu['nomakeup'] = {
+	if cheatNomakeup = 0:
+		cheatNomakeup = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNomakeup = 1:
+		cheatNomakeup = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['nosweat'] = {
+	if cheatNoSweat = 0:
+		cheatNoSweat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoSweat = 1:
+		cheatNoSweat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['noEat'] = {
+	if cheatNoEat = 0:
+		cheatNoEat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoEat = 1:
+		cheatNoEat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['noDrink'] = {
+	if cheatNoDrink = 0:
+		cheatNoDrink = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoDrink = 1:
+		cheatNoDrink = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['noSleep'] = {
+	if cheatNoSleep = 0:
+		cheatNoSleep = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoSleep = 1:
+		cheatNoSleep = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['noMood'] = {
+	if cheatNoMood = 0:
+		cheatNoMood = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoMood = 1:
+		cheatNoMood = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['noFat'] = {
+	if cheatNoFat = 0:
+		cheatNoFat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatNoFat = 1:
+		cheatNoFat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['health'] = {
+	if cheatHealth = 0:
+		cheatHealth = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatHealth = 1:
+		cheatHealth = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['pee'] = {
+	if cheatPee = 0:
+		cheatPee = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatPee = 1:
+		cheatPee = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['fight'] = {
+	if fight_cheat = 0:
+		fight_cheat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif fight_cheat = 1:
+		fight_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['autocombat'] = {
+	if autocombat_cheat = 0:
+		autocombat_cheat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif autocombat_cheat = 1:
+		autocombat_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['age'] = {
+	:tooyoung
+	age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
+	if ((month * 100) + day) <= pcs_dob mod 10000: age -= 1
+	if age < 15: pcs_dob -= 10000 & jump 'tooyoung'
+	dynamic $cheatmenu['looks']
+}
+
+$cheatmenu['visualage'] = {
+	vidage = input("For how many years you want to look?")
+	if vidage <= 14: vidage = 14
+	dynamic $cheatmenu['looks']
+}
+
+$cheatmenu['money'] = {
+	money = input("How much money do you want to have?")
+	if money < 0:money = 0
+	dynamic $cheatmenu['state']
+}
+
+$cheatmenu['bank_money'] = {
+	karta = input ("How much money do you want to have in the bank?")
+	if karta < 0: karta = 0
+	dynamic $cheatmenu['state']
+}
+
+$cheatmenu['bodyMod'] = {
+	*clr & cla
+	act 'Return to last menu': dynamic $cheatmenu['state']
+
+	'<center><h1>Cheat Menu - Body Modification</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	'<center><b><font color="red">WARNING!</font></b></center>'
+	'Changing body shape does not resize clothes.'
+	'May cause adverse interactions, use at your own risk!'
+	''
+	'You are currently <<$body>>.'
+	''
+	'You may select from the following sizes:'
+	''
+	if bodset ! 3:
+		'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
+		''
+		if salocatnow ! 1:
+			'<a href="exec:salo = 20 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
+			''
+		end
+		if salocatnow ! 2:
+			'<a href="exec:salo = 40 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
+			''
+		end
+		if salocatnow ! 3:
+			'<a href="exec:salo = 60 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
+			''
+		end
+		if salocatnow ! 4:
+			'<a href="exec:salo = 80 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
+			''
+		end
+		if salocatnow ! 5:
+			'<a href="exec:salo = 100 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
+			''
+		end
+		if salocatnow ! 6:
+			'<a href="exec:salo = 120 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
+			''
+		end
+		if salocatnow ! 7:
+			'<a href="exec:salo = 140 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
+			''
+		end
+	else
+		if (pregchem < 2688) = 0:
+			'<a href="exec:pregchem = 100 & pregtime = 4 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10))]>></a>'
+			''
+		end
+		if (pregchem >= 2688 and pregchem < 3192) = 0:
+			'<a href="exec:pregchem = 2688 & pregtime = 112 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
+			''
+		end
+		if (pregchem >= 3192 and pregchem < 3696) = 0:
+			'<a href="exec:pregchem = 3192 & pregtime = 133 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
+			''
+		end
+		if (pregchem >= 3696 and pregchem < 4200) = 0:
+			'<a href="exec:pregchem = 3696 & pregtime = 154 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
+			''
+		end
+		if (pregchem >= 4200 and pregchem < 4704) = 0:
+			'<a href="exec:pregchem = 4200 & pregtime = 175 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
+			''
+		end
+		if (pregchem >= 4704 and pregchem < 5208) = 0:
+			'<a href="exec:pregchem = 4704 & pregtime = 196 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
+			''
+		end
+		if (pregchem >= 5208 and pregchem < 5712) = 0:
+			'<a href="exec:pregchem = 5208 & pregtime = 217 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
+			''
+		end
+		if (pregchem >= 5712 and pregchem < 6216) = 0:
+			'<a href="exec:pregchem = 5712 & pregtime = 238 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
+			''
+		end
+		if (pregchem >= 6216) = 0:
+			'<a href="exec:pregchem = 6216 & pregtime = 259 & gs ''body'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 8)]>></a>'
+			''
+		end
+	end
+
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['addict'] = {
+	if NarkImmune = 0:
+		NarkImmune = 1
+		smoker = 0
+		smokerNeed = 0
+		joint_count = 0
+		alcohol_count = 0
+		cocaine_count = 0
+		amphetamine_count = 0
+		SNarkTimes = 0
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif NarkImmune = 1:
+		NarkImmune = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['willpower'] = {
+	if InfWillpwer = 0:
+		InfWillpwer = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif InfWillpwer = 1:
+		InfWillpwer = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['cheatHorny'] = {
+	if cheatHorny = 0:
+		cheatHorny = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatHorny = 1:
+		cheatHorny = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+$cheatmenu['slutshot'] = {
+	if cheatSlut = 0:
+		cheatSlut = 1
+		cycle = 6
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatSlut = 1:
+		cheatSlut = 0
+		cycle = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['cheat_NoPregnancy'] = {
+	if cheat_NoPregnancy = 1:
+		killvar 'cheat_NoPregnancy'
+		dynamic $cheatmenu['permanent']
+	else
+		cheat_NoPregnancy = 1
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['cheat_NoLactation'] = {
+	if cheat_NoLactation = 1:
+		killvar 'cheat_NoLactation'
+		dynamic $cheatmenu['permanent']
+	else
+		cheat_Nolactation = 1
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['Vibrator'] = {
+	if cheatVib = 0:
+		cheatVib = 1
+		bedvibrator = 1
+		dynamic $cheatmenu['permanent']
+	elseif cheatVib = 1:
+		cheatVib = 0
+		bedvibrator = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['BimboCloth'] = {
+	if cheatBimbo = 0:
+		cheatBimbo = 1
+		dynamic $cheatmenu['permanent']
+		bimbo = 0
+		bimbolevel = 0
+		bimbowithdrawal = 0
+	elseif cheatBimbo = 1:
+		cheatBimbo = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['SmartBimbo'] = {
+	if cheatBimbo2 = 0:
+		cheatBimbo2 = 1
+		dynamic $cheatmenu['permanent']
+		bimbostupidity = 0
+	elseif cheatBimbo2 = 1:
+		cheatBimbo2 = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['SuccuBimbo'] = {
+	if cheatBimbo3 = 0:
+		cheatBimbo3 = 1
+		dynamic $cheatmenu['permanent']
+		bimbostupidity = 0
+	elseif cheatBimbo3 = 1:
+		cheatBimbo3 = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['exhib_block'] = {
+	if exhib_cheat = 0:
+		exhib_cheat = 1
+		dynamic $cheatmenu['permanent']
+		pcs_exhib = 0
+		Exhibitionist_lvl = 0
+	elseif exhib_cheat = 1:
+		exhib_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['addictive_block'] = {
+	if addictive_cheat = 0:
+		addictive_cheat = 1
+		smoke_exp = 0
+		joint_exp = 0
+		heroin_exp = 0
+		cocaine_exp = 0
+		amphetamine_exp = 0
+		alcohol_exp = 0
+		addictive_exp = 0
+		addictive_trait_lvl = 0
+		dynamic $cheatmenu['permanent']
+	elseif addictive_cheat = 1:
+		addictive_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['cumtrait_block'] = {
+	if cumeater_cheat = 0:
+		cumeater_cheat = 1
+		dynamic $cheatmenu['permanent']
+		pcs_traits['cumeater'] = 0
+	elseif cumeater_cheat = 1:
+		cumeater_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['consolecheat'] = {
+	if cheatConsole = 0:
+		cheatConsole = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatConsole = 1:
+		cheatConsole = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['timecheat'] = {
+	if cheatTime = 0:
+		cheatTime = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatTime = 1:
+		cheatTime = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['random_bf_gf'] = {
+	if random_bf_gf_cheat = 0:
+		random_bf_gf_cheat = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif random_bf_gf_cheat = 1:
+		random_bf_gf_cheat = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['street_robbers'] = {
+	if cheat_street_robbers = 0:
+		cheat_street_robbers = 1
+		dynamic $cheatmenu['permanent']
+	elseif cheat_street_robbers = 1:
+		cheat_street_robbers = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['street_rapists'] = {
+	if cheat_street_rapists = 0:
+		cheat_street_rapists = 1
+		dynamic $cheatmenu['permanent']
+	elseif cheat_street_rapists = 1:
+		cheat_street_rapists = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['shaveLegs'] = {
+	if cheatShaveLegs = 0:
+		cheatShaveLegs = 1
+		dynamic $cheatmenu['permanent']
+		exit
+	elseif cheatShaveLegs = 1:
+		cheatShaveLegs = 0
+		dynamic $cheatmenu['permanent']
+	end
+}
+
+$cheatmenu['permanent'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	if cheatWork = 0:$cheatWork = 'Currently OFF'
+	if cheatWork = 1:$cheatWork = 'Currently ON'
+	if cheatWillpower = 0:$cheatWillpower = 'Currently OFF'
+	if cheatWillpower = 1:$cheatWillpower = 'Currently ON'
+	if cheatHapri = 0:$cheatHapri = 'Currently OFF'
+	if cheatHapri = 1:$cheatHapri = 'Currently ON'
+	if cheatKlisma = 1:$cheatKlisma = 'Currently OFF'
+	if cheatKlisma = 0:$cheatKlisma = 'Currently ON'
+	if cheatNomakeup = 0:$cheatNomakeup = 'Currently OFF'
+	if cheatNomakeup = 1:$cheatNomakeup = 'Currently ON'
+	if cheatNoSweat = 0:$cheatNoSweat = 'Currently OFF'
+	if cheatNoSweat = 1:$cheatNoSweat = 'Currently ON'
+	if cheatNoEat = 0:$cheatNoEat = 'Currently OFF'
+	if cheatNoEat = 1:$cheatNoEat = 'Currently ON'
+	if cheatNoDrink = 0:$cheatNoDrink = 'Currently OFF'
+	if cheatNoDrink = 1:$cheatNoDrink = 'Currently ON'
+	if cheatNoSleep = 0:$cheatNoSleep = 'Currently OFF'
+	if cheatNoSleep = 1:$cheatNoSleep = 'Currently ON'
+	if cheatNoMood = 0:$cheatNoMood = 'Currently OFF'
+	if cheatNoMood = 1:$cheatNoMood = 'Currently ON'
+	if cheatNoFat = 0:$cheatNoFat = 'Currently OFF'
+	if cheatNoFat = 1:$cheatNoFat = 'Currently ON'
+	if cheatHealth = 0:$cheatHealth = 'Enabled'
+	if cheatHealth = 1:$cheatHealth = 'Disabled'
+	if cheatPee = 0:$cheatPee = 'Enabled'
+	if cheatPee = 1:$cheatPee = 'Disabled'
+	if NarkImmune = 0:$NarkImmune = 'Currently OFF'
+	if NarkImmune = 1:$NarkImmune = 'Currently ON'
+	if InfWillpwer = 0:$InfWillpwer = 'Currently OFF'
+	if InfWillpwer = 1:$InfWillpwer = 'Currently ON'
+	if cheatSlut = 0:$cheatSlut = 'Enabled'
+	if cheatSlut = 1:$cheatSlut = 'Disabled'
+	if cheatHorny = 0:$cheatHorny = 'Currently OFF'
+	if cheatHorny = 1:$cheatHorny = 'Currently ON'
+	if bedvibrator = 0:$cheatVib = 'Currently OFF'
+	if bedvibrator = 1:$cheatVib = 'Currently ON'
+	if fight_cheat = 0:$fight_cheat = 'Currently OFF'
+	if fight_cheat = 1:$fight_cheat = 'Currently ON'
+	if autocombat_cheat = 0:$autocombat_cheat = 'Currently OFF'
+	if autocombat_cheat = 1:$autocombat_cheat = 'Currently ON'
+	if cheat_NoPregnancy = 0:$cheat_NoPregnancy = 'Enabled'
+	if cheat_NoPregnancy = 1:$cheat_NoPregnancy = 'Disabled'
+	if cheat_NoLactation = 0:$cheat_NoLactation = 'Enabled'
+	if cheat_NoLactation = 1:$cheat_NoLactation = 'Disabled'
+	if cheatBimbo = 0:$cheatBimbo = 'Enabled'
+	if cheatBimbo = 1:$cheatBimbo = 'Disabled'
+	if cheatBimbo2 = 0:$cheatBimbo2 = 'Disabled'
+	if cheatBimbo2 = 1:$cheatBimbo2 = 'Enabled'
+	if cheatBimbo3 = 0:$cheatBimbo3 = 'Disabled'
+	if cheatBimbo3 = 1:$cheatBimbo3 = 'Enabled'
+	if cumeater_cheat = 0:$cheatcumtrait = 'Enabled'
+	if cumeater_cheat = 1:$cheatcumtrait = 'Disabled'
+	if exhib_cheat = 0:$cheatexhib = 'Enabled'
+	if exhib_cheat = 1:$cheatexhib = 'Disabled'
+	if addictive_cheat = 0: $cheataddictive = 'Enabled'
+	if addictive_cheat = 1: $cheataddictive = 'Disabled'
+	if cheatConsole = 0:$cheatConsole = 'Visible'
+	if cheatConsole = 1:$cheatConsole = 'Hidden'
+	if cheatTime = 0:$cheatTime = 'Disabled'
+	if cheatTime = 1:$cheatTime = 'Enabled'
+	if random_bf_gf_cheat = 0: $random_bf_gf_cheat = 'Enabled'
+	if random_bf_gf_cheat = 1: $random_bf_gf_cheat = 'Disabled'
+	if cheat_street_robbers = 0: $cheat_street_robbers = 'Enabled'
+	if cheat_street_robbers = 1: $cheat_street_robbers = 'Disabled'
+	if cheat_street_rapists = 0: $cheat_street_rapists = 'Enabled'
+	if cheat_street_rapists = 1: $cheat_street_rapists = 'Disabled'
+	if cheatShaveLegs = 0: $cheatShaveLegs = 'Currently OFF'
+	if cheatShaveLegs = 1: $cheatShaveLegs = 'Currently ON'
+
+	'<center><h1>Cheat Menu - Recurrent Cheats</h1></center>'
+	'<center><font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!</center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="450" cellspacing="0" cellpadding="20" valign="top">'
+	'More than one job is possible: <a href="exec:dynamic $cheatmenu[''work'']"><<$cheatWork>></a>'
+	'Willpower cost always zero: <a href="exec:dynamic $cheatmenu[''willpower'']"><<$cheatWillpower>></a>'
+	'Always combed: <a href="exec:dynamic $cheatmenu[''hair'']"><<$cheatHapri>></a>'
+	'Cosmetics never smeared: <a href="exec:dynamic $cheatmenu[''nomakeup'']"><<$cheatNomakeup>></a>'
+	'Never sweat: <a href="exec:dynamic $cheatmenu[''nosweat'']"><<$cheatNoSweat>></a>'
+	'Never eat: <a href="exec:dynamic $cheatmenu[''noEat'']"><<$cheatNoEat>></a>'
+	'Never drink: <a href="exec:dynamic $cheatmenu[''noDrink'']"><<$cheatNoDrink>></a>'
+	'Never sleep: <a href="exec:dynamic $cheatmenu[''noSleep'']"><<$cheatNoSleep>></a>'
+	'Never unhappy: <a href="exec:dynamic $cheatmenu[''noMood'']"><<$cheatNoMood>></a>'
+	'Never lose or gain weight: <a href="exec:dynamic $cheatmenu[''noFat'']"><<$cheatNoFat>></a>'
+	'Never get addicted: <a href="exec:dynamic $cheatmenu[''addict'']"><<$NarkImmune>></a>'
+	'Never shave legs: <a href="exec:dynamic $cheatmenu[''shaveLegs'']"><<$cheatShaveLegs>></a>'
+	'Infinite willpower: <a href="exec:dynamic $cheatmenu[''willpower'']"><<$InfWillpwer>></a>'
+
+	if Enable_sforma = 1:
+		'Allow any clothing for school: <a href="exec:Enable_sforma = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
+	else
+		'Allow any clothing for school: <a href="exec:Enable_sforma = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
+	end
+	
+	*nl
+	
+	'Random boyfriend/girlfriend events: <a href="exec:dynamic $cheatmenu[''random_bf_gf'']"><<$random_bf_gf_cheat>></a>'
+	'Random robbers in the streets: <a href="exec:dynamic $cheatmenu[''street_robbers'']"><<$cheat_street_robbers>></a>'
+	'Random rapists in the streets: <a href="exec:dynamic $cheatmenu[''street_rapists'']"><<$cheat_street_rapists>></a>'
+
+	*nl
+
+	'Enable sleeping with vibrator inserted: <a href="exec:dynamic $cheatmenu[''Vibrator'']"><<$cheatVib>></a>'
+
+	*nl
+
+	'Automatically win every fight: <a href="exec:dynamic $cheatmenu[''fight'']"><<$fight_cheat>></a>'
+	'Automatically resolve non-magical fights: <a href="exec:dynamic $cheatmenu[''autocombat'']"><<$autocombat_cheat>></a>'
+
+	*nl
+
+	'Bimbo trait and the effects of wearing bimbo clothes: <a href="exec:dynamic $cheatmenu[''BimboCloth'']"><<$cheatBimbo>></a>'
+	'Exhibitionist trait: <a href="exec:dynamic $cheatmenu[''exhib_block'']"><<$cheatexhib>></a>'
+	'Addictive personality trait: <a href="exec:dynamic $cheatmenu[''addictive_block'']"><<$cheataddictive>></a>'
+	'Cumeater trait: <a href="exec:dynamic $cheatmenu[''cumtrait_block'']"><<$cheatcumtrait>></a>'
+
+	*nl
+
+	'Who says bimbos can''t be smart? Smart bimbo mode: <a href="exec:dynamic $cheatmenu[''SmartBimbo'']"><<$cheatBimbo2>></a>'
+	'Succubus bimbo mode: <a href="exec:dynamic $cheatmenu[''SuccuBimbo'']"><<$cheatBimbo3>></a>'
+	
+	*nl
+
+	'Set arousal to always be at 50 or more: <a href="exec:dynamic $cheatmenu[''cheatHorny'']"><<$cheatHorny>></a>'
+	'Periods (and pregnancies): <a href="exec:dynamic $cheatmenu[''slutshot'']"><<$cheatSlut>></a>'
+	'Impregnation: <a href="exec:dynamic $cheatmenu[''cheat_NoPregnancy'']"><<$cheat_nopregnancy>></a>'
+	'Lactation: <a href="exec:dynamic $cheatmenu[''cheat_NoLactation'']"><<$cheat_nolactation>></a>'
+	'STDs: <a href="exec:dynamic $cheatmenu[''health'']"><<$cheatHealth>></a>'
+	'Peeing: <a href="exec:dynamic $cheatmenu[''pee'']"><<$cheatPee>></a>'
+
+	*nl
+	if Enable_autotampon = 1:
+		'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
+	else
+		'Automatic cheat on Tampon: <a href="exec:Enable_autotampon = 1 & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
+	end
+	*nl
+	if Enable_nodream > 0:
+		'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']"><<Enable_nodream>>%</a>, <a href="exec:Enable_nodream=0 & dynamic $cheatmenu[''permanent'']">Currently ON</a>'
+	else
+		'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
+	end & !1.2.3 new function
+	*nl
+	'Hide Console input in objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
+	'Time Cheat in Objects window: <a href="exec:dynamic $cheatmenu[''timecheat'']"><<$cheatTime>></a>'
+	*nl
+
+	'<font color="red"><b>WARNING!</b></font>: Disabling states may cause some events not to trigger. Use at your own risk!'
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['therapist_reset'] = {
+	gs 'therapist'
+	dynamic $RestTherapyVariables
+	gs 'stat'
+	dynamic $cheatmenu['state']
+}
+
+$cheatmenu['state'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+
+	'<center><h1>Cheat Menu - Character State Changes</h1></center>'
+	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save. Cheats manipulating pregnancy or the menstrual cycle are'
+	'especially dangerous unless you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	'Set alcohol levels:'
+	'<a href="exec:alko = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Sober</a> <a href="exec:alko = 2 & dynamic $cheatmenu[''state''] & gs ''stat''">Tipsy</a> <a href="exec:alko = 4 & dynamic $cheatmenu[''state''] & gs ''stat''">Drunk</a> <a href="exec:alko = 7 & dynamic $cheatmenu[''state''] & gs ''stat''">Wasted</a> <a href="exec:alko = 11 & dynamic $cheatmenu[''state''] & gs ''stat''">Barely coherent</a>'
+	*nl
+	'<a href="exec:pcs_horny = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Max arousal</a>'
+	'<a href="exec:pcs_horny = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Min arousal</a>'
+	'<a href="exec:dynamic $cheatmenu[''bodyMod'']">Body Modification</a>'
+	*nl
+	'<a href="exec:pcs_health = pcs_vital*10 + pcs_stren*5+1000 & pcs_willpwr = pcs_intel*5 + will*5+1000 & pcs_mana = (pcs_intel*pcs_magik) + pcs_magik*100 + pcs_vital*10 + rikudo & vgape = 0 & agape = 0 & nippain = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Health, Mana, Reason.</a>'
+	'<a href="exec:pcs_sleep = 100 & pcs_stam = stammax & pcs_mood = 100 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Sleep, Stamina, Mood.</a>'
+	'<a href="exec:pcs_energy = 200 & pcs_hydra = 200 & dynamic $cheatmenu[''state''] & gs ''stat''">Full restoration of Hunger and Water.</a>'
+	'<a href="exec:dynamic $cheatmenu[''money''] & gs ''stat''">Change money</a>'
+	'<a href="exec:money = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money</a>'
+	if bankAccount = 1:
+		'<a href="exec:dynamic $cheatmenu[''bank_money''] & gs ''stat''">Change money in the bank</a>'
+		'<a href="exec: karta = 0 & dynamic $cheatmenu[''state''] & gs ''stat''">Zero money in the bank</a>'
+	else
+		'<b>You need to open a bank account before getting access to change money in the bank</b>'
+	end
+	'<a href="exec:dynamic $cheatmenu[''std_cure''] & gs ''stat''">Cure all stds</a>'
+	'<a href="exec:vgape = 0 & agape = 0 & nippain = 0 & painpub = 0 & pirs_pain_ton = 0 & mesec = 0 & spanked = 0 & SLomka = 0 & Narkoman = 0 & strongnark = 0 & SNarkTimes = 0 & nark = 0 & fingal = 0 & mosol = 0 & frost = 0 & sick = 0 & hypnoAddict = 0 & hypnoWithdrawal = 0 & dynamic $cheatmenu[''std_cure''] & dynamic $cheatmenu[''pain_killer''] & gs ''stat''">Cure all ailments.</a>'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''force_preg''] & gs ''stat''">Force random pregnancy</a>'
+	'<a href="exec:dynamic $cheatmenu[''remove_preg''] & gs ''stat''">Remove pregnancy</a>'
+	'<a href="exec:gs''cum_cleanup'',''reset'' & dynamic $cheatmenu[''state''] & gs ''stat''">Remove all cum</a>'
+	'<a href="exec:dynamic $cheatmenu[''cycle''] & gs ''stat''">Set stage of menstrual cycle</a>'
+
+	if lactation['active'] <= 0:
+		'You are not lactating'
+		'Your current prolactinlvl is <<lactation[''prolactinlvl'']>>ng/ml.'
+		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch ON</a>'
+	else
+		'You are lactating'
+		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch OFF</a>'
+		if lactation['milkprod_type'] = 1:
+			'The milk production is <a href="exec: lactation[''milkprod_type''] = 0 & dynamic $cheatmenu[''state'']">realistic</a>. <<$pcs_firstname>> will produce breast milk based on her body resources.'
+		elseif lactation['milkprod_type'] = 0:
+			'The milk production is <a href="exec: lactation[''milkprod_type''] = 1 & dynamic $cheatmenu[''state'']">permanent</a>. <<$pcs_firstname>> will produce breast milk disregarding her condition.'
+		else
+			lactation['milkprod_type'] = 1
+		end
+		if lactation['lactaterate'] <= 0:
+			'Lactate Rate: <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
+		elseif lactation['lactaterate'] >= 600000:
+			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h'
+		else
+			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
+			if lactation['caplactaterate'] <= 0:
+				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] = 24 & dynamic $cheatmenu[''state'']">Switch ON</a>'
+			elseif lactation['caplactaterate'] >= 72:
+				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h'
+			else
+				'Cap Lactate Rate: <a href="exec:lactation[''caplactaterate''] -= 24 & dynamic $cheatmenu[''state'']">-24h</a> <<lactation[''caplactaterate'']>>h <a href="exec:lactation[''caplactaterate''] += 24 & dynamic $cheatmenu[''state'']">+24h</a>'
+			end	
+			'<font color="grey">Cap lactate rate makes lactate rate stop growing if <<$pcs_firstname>> needs milking more often.</font>'
+		end
+		'Milk in Breasts: <<lactation[''breastmv'']/1000>>ml'
+		'Max Milk Storage: <<lactation[''breastmm'']/1000>>ml'
+		'<font color="grey">Maximum milk storage changes with breast size, and if <<$pcs_firstname>> went through pregnancy</font>'
+		if lactation['induced'] <= 0:
+			'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 1 & dynamic $cheatmenu[''state'']">no</a>'
+		else
+			'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 0 & dynamic $cheatmenu[''state'']">yes</a>'
+		end
+		'<font color="grey">Does <<$pcs_firstname>> know she induced lactation herself, or not? (This is only used for some events.)</font>'
+	end
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''therapist_reset'']">Reset therapist states</a>'
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['avatar_hair_set'] = {
+	$av_hair = input("Input your custom hair:")
+	if $av_hair='':exit
+	avatar_hair = 1
+	dynamic $cheatmenu['looks']
+}
+
+$cheatmenu['rename'] = {
+	!! player name is set in preSYS.qsrc
+	$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'
+}
+
+$cheatmenu['looks'] = {
+	*clr & cla
+	if pcs_hgt < 100:
+		pcs_hgt = 100
+	elseif pcs_hgt > 200:
+		pcs_hgt = 200
+	end
+	gs 'obj_din', 'cheattabs'
+	gs'stat'
+	'<center><h1>Cheat Menu - Character Appearance</h1></center>'
+	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
+	*nl
+	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
+	'<tr><td width="33%" cellpadding="20" valign="top">'
+	'<<$pcs_firstname>> <<$pcs_lastname>> (<<$pcs_nickname>>). <a href="exec:dynamic $cheatmenu[''rename'']">Rename</a>'
+	if player_avatar = 1:
+		'Custom Avatar: <a href="exec:player_avatar = 0 & dynamic $cheatmenu[''looks'']">ON</a>'
+	else
+		'Custom Avatar: <a href="exec:player_avatar = 1 & dynamic $cheatmenu[''looks'']">OFF</a>'
+	end
+	if avatar_hair = 1:
+		'<a href="exec:avatar_hair = 0 & dynamic $cheatmenu[''looks'']">Custom Hair: ON</a>'
+		'<<$av_hair>>'
+	else
+		'<a href="exec:dynamic $cheatmenu[''avatar_hair_set'']">Custom Hair: OFF</a>'
+	end
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''parameters'']">Show design parameters of body</a>'
+	'<a href="exec:dynamic $cheatmenu[''vneshpara'']">Show beauty parameters</a>'
+	*nl
+	'You are <a href="exec: pcs_dob += 10000 & dynamic $cheatmenu[''age'']">(-1)</a> <<age>> <a href="exec: pcs_dob -= 10000 & dynamic $cheatmenu[''age'']">(+1)</a> years old'
+	*nl
+	'<a href=>You look <<vidage>> years old</a>'
+	'<a href="exec:dynamic $cheatmenu[''visualage'']">Change apparent age</a>'
+	*nl
+	'<a href=>You are <<pcs_hgt>> centimetres tall</a>'
+	'<a href="exec:pcs_hgt = input(''Enter <<$pcs_nickname>>s height in centimetres<br><br>(default 170, min 100, max 200, values below 160 and above 180 will cause problems in the calculation of BMI/weight the more you deviate from the default 170)'') & dynamic $cheatmenu[''looks'']">Change <<$pcs_nickname>>''s height</a>'
+	*nl
+	'You have <<$titsize>> breasts'
+	if tits => 0 and tits < 11:'<a href="exec:silicone += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(silicone)</a>'
+	if silicone => 1:'<a href="exec:silicone -= 5 & dynamic $cheatmenu[''looks'']">Shrink breasts(silicone)</a>'
+	if tits => 0 and tits < 11:'<a href="exec:nbsize += 5 & dynamic $cheatmenu[''looks'']">Enlarge breasts(natural)</a>'
+	if nbsize => 1:'<a href="exec:nbsize -= 5 & titreduc = 1 & dynamic $cheatmenu[''looks'']">Shrink breasts(natural)</a>'
+	*nl
+	if pcs_butt <= 4:
+		$pcs_butt[1] = 'flat'
+	elseif pcs_butt <= 8:
+		$pcs_butt[1] = 'average'
+	elseif pcs_butt <= 12:
+		$pcs_butt[1] = 'pert'
+	else
+		$pcs_butt[1] = 'bubble'
+	end
+	'You have <<$pcs_butt[1]>> butt'
+	if pcs_butt < 20:'<a href="exec:butt_cheat += 2 & dynamic $cheatmenu[''looks'']">Enlarge butt</a>'
+	if pcs_butt > 1:'<a href="exec:butt_cheat -= 2 & dynamic $cheatmenu[''looks'']">Shrink butt</a>'
+	if butt_cheat ! 0:'<a href="exec:butt_cheat = 0 & dynamic $cheatmenu[''looks'']">Reset butt shape to default</a>'
+	if silicone_butt => 1:'<a href="exec:silicone_butt = 0 & dynamic $cheatmenu[''looks'']">Remove butt implants</a>'
+	if silicone_butt = 0:'<a href="exec:silicone_butt += 16 & dynamic $cheatmenu[''looks'']">Add butt implants</a>'
+	*nl
+	'<<$lip>>'
+	if pcs_lip < 4:'<a href="exec:pcs_lip += 1 & dynamic $cheatmenu[''looks'']">Enlarge lips</a>'
+	if pcs_lip > 0:'<a href="exec:pcs_lip -= 1 & dynamic $cheatmenu[''looks'']">Shrink lips</a>'
+	*nl
+	'<<$skin>>'
+	if pcs_skin < 900: '<a href="exec:pcs_skin += 200 & gs ''body'', ''UpdateBaseAppearnce'' & dynamic $cheatmenu[''looks'']">Improve skin</a>'
+	if pcs_skin > 0: '<a href="exec:pcs_skin -= 200 & gs ''body'', ''UpdateBaseAppearnce'' & dynamic $cheatmenu[''looks'']">Worsen skin</a>'
+	if pcs_tan >= 0:'<a href="exec:pcs_tan += 10 & dynamic $cheatmenu[''looks'']">Become tanned</a>'
+	if pcs_tan > 0:'<a href="exec:pcs_tan = 0 & dynamic $cheatmenu[''looks'']">Remove tan</a>'
+	*nl
+	'<<$pcs_throat>>'
+	if pcs_throat <= 31:'<a href="exec:pcs_throat += 5 & dynamic $cheatmenu[''looks'']">Increase throat capacity</a>'
+	if pcs_throat >= 5:'<a href="exec:pcs_throat -= 5 & dynamic $cheatmenu[''looks'']">Decrease throat capacity</a>'
+	if dounspell = 1:
+		*nl
+		'<a href="exec:dounsplkil = 2 & gs ''body'', ''hardreset''">Hard Reset body shape</a>'
+	end
+
+	'</td><td width="33%" cellpadding="20" valign="top">'
+	'<<$pcs_vag>>'
+	if pcs_vag > 0:'<a href="exec:pcs_vag = 0 & dynamic $cheatmenu[''looks'']">Reinstate virginity</a>'
+	if pcs_vag <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''vagenlarge''">Enlarge comfortable vaginal capacity</a>'
+	if pcs_vag >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''vagreduce''">Reduce comfortable vaginal capacity</a>'
+	'Your comfortable vaginal capacity will reduce by <<vshrink>> every <<vshrinkdays>> days.'
+	if vshrink < 10:'<a href="exec:vshrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
+	if vshrink > 0:'<a href="exec:vshrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
+	if vshrinkdays < 10:'<a href="exec:vshrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
+	if vshrinkdays > 1:'<a href="exec:vshrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
+	'When gaped your vagina will reduce each stage (up to 4 for maximum gape) every <<vgape[4]>> minutes.'
+	if vgape[4] < 60:'<a href="exec:vgape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
+	if vgape[4] > 5:'<a href="exec:vgape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
+	*nl
+	'<<$pcs_ass>>'
+	if pcs_ass <= 25:'<a href="exec:gs ''Cheatmenu_din'', ''assenlarge''">Enlarge comfortable anal capacity</a>'
+	if pcs_ass >= 5:'<a href="exec:gs ''Cheatmenu_din'', ''assreduce''">Reduce comfortable anal capacity</a>'
+	'Your comfortable anal capacity will reduce by <<ashrink>> every <<ashrinkdays>> days.'
+	if ashrink < 10:'<a href="exec:ashrink += 1 & dynamic $cheatmenu[''looks'']">Increase amount of reduction</a>'
+	if ashrink > 0:'<a href="exec:ashrink -= 1 & dynamic $cheatmenu[''looks'']">Reduce amount of reduction</a>'
+	if ashrinkdays < 10:'<a href="exec:ashrinkdays += 1 & dynamic $cheatmenu[''looks'']">Increase number of days it takes</a>'
+	if ashrinkdays > 1:'<a href="exec:ashrinkdays -= 1 & dynamic $cheatmenu[''looks'']">Reduce number of days it takes</a>'
+	'When gaped your anus will reduce each stage (up to 4 for maximum gape) every <<agape[4]>> minutes.'
+	if agape[4] < 60:'<a href="exec:agape[4] += 5 & dynamic $cheatmenu[''looks'']">Increase time by 5 minutes</a>'
+	if agape[4] > 5:'<a href="exec:agape[4] -= 5 & dynamic $cheatmenu[''looks'']">Reduce time by 5 minutes</a>'
+	*nl
+	if dounspell = 0:
+		if fat ! 0: '<a href="exec:fat = 0 & dynamic $cheatmenu[''looks'']">Zero fat</a>'
+		'Body Fat = (<<salo>>): <a href="exec:salo -= 10 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-10</a> <a href="exec:salo -= 5 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:salo -= 1 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">-1</a> <a href="exec:salo += 1 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+1</a> <a href="exec:salo += 5 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:salo += 10 & gs ''body'', ''softreset'' & dynamic $cheatmenu[''looks'']">+10</a>'
+		'Note: You need some Body Fat to survive, any value under 11 is clasified as "starving" and a value of 0 can lead to a Game Over.'
+	end
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''tatoo'']">Tattoo removal</a>'
+
+	'</td><td width="33%" cellpadding="20" valign="top">'
+	'<<$hair>>'
+	if pcs_haircol = 0:
+		'Your hair is now (prev) <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks''] & nathcol = pcs_haircol">(next)</a>'
+	elseif pcs_haircol > 0 and pcs_haircol < 3:
+		'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> <a href="exec:pcs_haircol +=1 & dynamic $cheatmenu[''looks'']" & pcs_haircol = nathcol>(next)</a>'
+	elseif pcs_haircol = 3:
+		'Your hair is now <a href="exec:pcs_haircol -=1 & dynamic $cheatmenu[''looks'']" & nathcol = pcs_haircol>(prev)</a> <<$pcs_haircol>> (next)'
+	else
+		'To change your natural hair color, you have to <a href="exec:pcs_haircol = nathcol & dynamic $cheatmenu[''looks'']">restore your natural hair color</a> first.'
+	end
+	if pcs_hairlng > 975:
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a>'
+	elseif pcs_hairlng > 900:
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a>'
+	elseif pcs_hairlng >= 100:
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 100 & dynamic $cheatmenu[''looks'']">-100</a> <a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
+	elseif pcs_hairlng >= 25:
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 25 & dynamic $cheatmenu[''looks'']">-25</a> <a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
+	elseif pcs_hairlng >= 5:
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng -= 5 & dynamic $cheatmenu[''looks'']">-5</a> <a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
+	else
+		'Hair length (<<pcs_hairlng>>)	<a href="exec:pcs_hairlng += 5 & dynamic $cheatmenu[''looks'']">+5</a> <a href="exec:pcs_hairlng += 25 & dynamic $cheatmenu[''looks'']">+25</a> <a href="exec:pcs_hairlng += 100 & dynamic $cheatmenu[''looks'']">+100</a>'
+	end
+	if hairgrowcht = 0:'<a href="exec:hairgrowcht = 1 & dynamic $cheatmenu[''looks'']">Stop hair growth</a>'
+	if hairgrowcht = 1:'<a href="exec:hairgrowcht = 0 & dynamic $cheatmenu[''looks'']">Allow hair growth</a>'
+	*nl
+	'<<$glaza>>'
+	if pcs_naturallashes < 2:'<a href="exec:pcs_naturallashes += 1 & dynamic $cheatmenu[''looks'']">Enlarge lashes</a>'
+	if pcs_naturallashes > 0:'<a href="exec:pcs_naturallashes -= 1 & dynamic $cheatmenu[''looks'']">Shrink lashes</a>'
+	if pcs_eyesize < 3:'<a href="exec:pcs_eyesize += 1 & dynamic $cheatmenu[''looks'']">Increase the size of the eye</a>'
+	if pcs_eyesize > 0:'<a href="exec:pcs_eyesize -= 1 & dynamic $cheatmenu[''looks'']">Reduce the size of the eye</a>'
+	if pcs_eyecol <= 0:
+		'Your eyes are now (prev) <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
+	elseif pcs_eyecol > 0 and pcs_eyecol < 3:
+		'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> <a href="exec:pcs_eyecol +=1 & dynamic $cheatmenu[''looks'']">(next)</a>'
+	elseif pcs_eyecol >= 3:
+		'Your eyes are now <a href="exec:pcs_eyecol -=1 & dynamic $cheatmenu[''looks'']">(prev)</a> <<$pcs_eyecol>> (next)'
+	end
+	'</td></tr></table></center>'
+}
+
+if $ARGS[0] = 'vagenlarge':
+	if pcs_vag = 0:
+		pcs_vag = 5
+	elseif pcs_vag <= 5:
+		pcs_vag = 10
+	elseif pcs_vag <= 10:
+		pcs_vag = 15
+	elseif pcs_vag <= 15:
+		pcs_vag = 25
+	elseif pcs_vag <= 25:
+		pcs_vag = 35
+	end
+	dynamic $cheatmenu['looks']
+end
+
+if $ARGS[0] = 'vagreduce':
+	if pcs_vag > 25:
+		pcs_vag = 25
+	elseif pcs_vag > 15:
+		pcs_vag = 15
+	elseif pcs_vag > 10:
+		pcs_vag = 10
+	elseif pcs_vag > 5:
+		pcs_vag = 1
+	end
+	dynamic $cheatmenu['looks']
+end
+
+if $ARGS[0] = 'assenlarge':
+	if pcs_ass = 0:
+		pcs_ass = 5
+	elseif pcs_ass <= 5:
+		pcs_ass = 10
+	elseif pcs_ass <= 10:
+		pcs_ass = 15
+	elseif pcs_ass <= 15:
+		pcs_ass = 25
+	elseif pcs_ass <= 25:
+		pcs_ass = 35
+	end
+	dynamic $cheatmenu['looks']
+end
+
+if $ARGS[0] = 'assreduce':
+	if pcs_ass > 25:
+		pcs_ass = 25
+	elseif pcs_ass > 15:
+		pcs_ass = 15
+	elseif pcs_ass > 10:
+		pcs_ass = 10
+	elseif pcs_ass > 5:
+		pcs_ass = 1
+	end
+	dynamic $cheatmenu['looks']
+end
+
+$cheatmenu['parameters'] = {
+	*clr & cla
+	'<center><h1>Cheat Menu - Appearance Stats</h1></center>'
+	act 'Return to appearance menu':dynamic $cheatmenu['looks']
+	*nl
+	'Body Shape Parameters'
+	'<<pcs_bust>> - <<pcs_waist>> - <<pcs_hips>>, <<$titsize>> breasts, the difference between the hips and waist <<pcs_hips-pcs_waist>> cm'
+	'Muscularity: strenbuf = <<strenbuf>>, salo =	<<salo>>, fat = <<fat>>'
+	'Variable List:'
+	'agilbuf = <<agilbuf>>'
+	'strenbuf = <<strenbuf>>'
+	'vitalbuf = <<vitalbuf>>'
+	'BMI (pcs_bmi) = <<pcs_bmi>>'
+	'weight (pcs_weight) = <<pcs_weight>> kg'
+	'bust (pcs_bust) = <<pcs_bust>>'
+	'band (pcs_band) = <<pcs_band>>'
+	'waist (pcs_waist) = <<pcs_waist>>'
+	'hips (pcs_hips) = <<pcs_hips>>'
+	'bust - band (pcs_cupsize) = <<pcs_cupsize>>'
+	'silicone = <<silicone>>'
+	'nbsize = <<nbsize>>'
+	'magicf2b = <<magicf2b>>'
+	'genbsize = <<genbsize>>'
+	'vhips = <<vhips>>'
+	'vhtmp = <<vhtmp>>'
+	'wratio = <<wratio>>'
+	'bratio = <<bratio>>'
+	'hratio = <<hratio>>'
+	'vofat = <<vofat>>'
+	'salocatnow = <<salocatnow>>'
+	'salocatlast = <<salocatlast>>'
+	'magf2bdo = <<magf2bdo>>'
+	'mgf2bnocnt = <<mgf2bnocnt>>'
+	'magtarcup = <<magtarcup>>'
+	'normbuffpick = <<normbuffpick>>'
+	'nrmbfpckct = <<nrmbfpckct>>'
+	'btwarn = <<btwarn>>'
+	'salolast = <<salolast>>'
+}
+
+$cheatmenu['vneshpara'] = {
+	*clr & cla
+	'<center><h1>Cheat Menu - ?</h1></center>'
+	act 'Return to appearance menu':dynamic $cheatmenu['looks']
+	*nl
+	'Appearance Parameters'
+	*nl
+	'Base Appearance'
+	'pcs_skin = <<pcs_skin>> and skin_bonus = <<skinBonus>> (between 0 and 100)'
+	'bodyShapeBonus = <<bodyShapeBonus>> (between -158 and 70)'
+	'visableAgePenalty = <<visibleAgePenalty>> (-2.5 for every year below 20)'
+	'pcs_teeth = <<pcs_teeth>> and teethPenalty = <<teethPenalty>>  (10*(pcs_teeth +pcs_missing_teeth)'
+	'attributeBonus = <<attributeBonus>> (pcs_agil / 5) + (pcs_vital / 5)'
+	'these are adjusted by BMI if it is outside <18 and >29'
+	'pcs_apprncbase = <<pcs_apprncbase>>'
+	*nl
+	*nl
+
+	'Bonus'
+	'groomingBonus = <<func(''AppearanceSystem'',''CalcGroomingBonus'')>> (pcs_breath and makeup)'
+	'groomingPenalty = <<func(''AppearanceSystem'',''CalcGroomingPenalty'')>> '
+	'(lipbalm, hair brushed, hair length, deo, sweat, glasses, hair color fade, leg hair..)'
+	'accessoriesBonus = <<func(''AppearanceSystem'',''CalcAccessoriesBonus'')>> '
+	'CalcClothingBonus = <<func(''AppearanceSystem'',''CalcClothingBonus'')>> '
+	'((PXCloThinness + PXCloTopCut + PXCloBottomShortness)/2)/ 76 * PCloQuality'
+	*nl
+	*nl
+
+	'coatQualityBonus = <<bonusZ>>'
+	'shoesQualityBonus = <<PShoQualityZ>>'
+	'PXCloThinness = <<PXCloThinness>>'
+	'PXCloTopCut = <<PXCloTopCut>>'
+	'PXCloBottomShortness = <<PXCloBottomShortness>>'
+	'PCloQuality = <<PCloQuality>>'
+	'lipBalmPenalty = <<lipBalmPenalty>>'
+	'hairPenalty = <<hairPenalty>>'
+	'deodorantPenalty = <<deodorantPenalty>>'
+	'sweatPenalty = <<sweatPenalty>>'
+	'glassesPenalty = <<glassesPenalty>>'
+	'hairDyePenalty = <<hairDyePenalty>>'
+	'legPenalty = <<legPenalty>>'
+
+	'pcs_eyesize = <<pcs_eyesize>>'
+	'pcs_lip = <<pcs_lip>>'
+}
+
+$cheatmenu['tatoo'] = {
+	gs'stat'
+	*clr & cla
+	'<center><h1>Cheat Menu - Tattoos</h1></center>'
+	act 'Return to appearance menu':dynamic $cheatmenu['looks']
+	*nl
+	if tatarm = 0:'You do not have a tattoo on your arm</a>'
+	if tatarm >= 1:'<a href="exec:tattCount-=1 & tatarm = 0 & dynamic $cheatmenu[''tatoo'']">Remove your arm tattoo</a>'
+	if tatass = 0:'You do not have a tattoo on your ass</a>'
+	if tatass >= 1:'<a href="exec:tattCount-=1 & tatass = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ass tattoo</a>'
+	if tatback = 0:'You do not have a tattoo on your back</a>'
+	if tatback >= 1:'<a href="exec:tattCount-=1 & tatback = 0 & dynamic $cheatmenu[''tatoo'']">Remove your back tattoo</a>'
+	if tatblly = 0:'You do not have a tattoo on your belly</a>'
+	if tatblly >= 1:'<a href="exec:tattCount-=1 & tatblly = 0 & dynamic $cheatmenu[''tatoo'']">Remove your belly tattoo</a>'
+	if tatbrst = 0:'You do not have a tattoo on your breast</a>'
+	if tatbrst >= 1:'<a href="exec:tattCount-=1 & tatbrst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your breast tattoo</a>'
+	if tatchst = 0:'You do not have a tattoo on your chest</a>'
+	if tatchst >= 1:'<a href="exec:tattCount-=1 & tatchst = 0 & dynamic $cheatmenu[''tatoo'']">Remove your chest tattoo</a>'
+	if tatfce = 0:'You do not have a tattoo on your face</a>'
+	if tatfce >= 1:'<a href="exec:tattCount-=1 & tatfce = 0 & dynamic $cheatmenu[''tatoo'']">Remove your face tattoo</a>'
+	if tatankle = 0:'You do not have a tattoo on your ankle</a>'
+	if tatankle >= 1:'<a href="exec:tattCount-=1 & tatankle = 0 & dynamic $cheatmenu[''tatoo'']">Remove your ankle tattoo</a>'
+	if tatleg = 0:'You do not have a tattoo on your leg</a>'
+	if tatleg >= 1:'<a href="exec:tattCount-=1 & tatleg = 0 & dynamic $cheatmenu[''tatoo'']">Remove your leg tattoo</a>'
+	if tatlip = 0:'You do not have a tattoo on your lip</a>'
+	if tatlip >= 1:'<a href="exec:tattCount-=1 & tatlip = 0 & dynamic $cheatmenu[''tatoo'']">Remove your lip tattoo</a>'
+	if tatneck = 0:'You do not have a tattoo on your neck</a>'
+	if tatneck >= 1:'<a href="exec:tattCount-=1 & tatneck = 0 & dynamic $cheatmenu[''tatoo'']">Remove your neck tattoo</a>'
+	if tatvag = 0:'You do not have a public tattoo</a>'
+	if tatvag >= 1:'<a href="exec:tattCount-=1 & tatvag = 0 & dynamic $cheatmenu[''tatoo'']">Remove your pubic tattoo</a>'
+	if tatlech = 0:'You do not have a tattoo on your shoulder</a>'
+	if tatlech >= 1:'<a href="exec:tattCount-=1 & tatlech = 0 & dynamic $cheatmenu[''tatoo'']">Remove your shoulder tattoo</a>'
+	if tatside = 0:'You do not have a tattoo on your side</a>'
+	if tatside >= 1:'<a href="exec:tattCount-=1 & tatside = 0 & dynamic $cheatmenu[''tatoo'']">Remove your the tattoo on your side</a>'
+	if tatupb = 0:'You do not have a tramp stamp</a>'
+	if tatupb >= 1:'<a href="exec:tattCount-=1 & tatupb = 0 & dynamic $cheatmenu[''tatoo'']">Remove your tramp stamp</a>'
+	if tatunder = 0:'You do not have an under breast tattoo</a>'
+	if tatunder >= 1:'<a href="exec:tattCount-=1 & tatunder = 0 & dynamic $cheatmenu[''tatoo'']">Remove your under breast tattoo</a>'
+	if tatwrist = 0:'You do not have a tattoo on your wrist</a>'
+	if tatwrist >= 1:'<a href="exec:tattCount-=1 & tatwrist = 0 & dynamic $cheatmenu[''tatoo'']">Remove your wrist tattoo</a>'
+	if tathand = 0:'You do not have a tattoo on your hand</a>'
+	if tathand >= 1:'<a href="exec:tattCount-=1 & tathand = 0 & dynamic $cheatmenu[''tatoo'']">Remove your hand tattoo</a>'
+}
+
+$cheatmenu['setStat'] = {
+	temp_input = input("Set your <<$ARGS[1]>> level:")
+	dynamic "
+		<<$ARGS[0]>>_lvl = temp_input
+		<<$ARGS[0]>>_lvlst = temp_input
+	"
+	killvar 'temp_input'
+	dynamic $cheatmenu['stats']
+}
+
+$cheatmenu['setStat1'] = {
+	temp_input = input("Set your <<$ARGS[1]>> level:")
+	dynamic "
+		<<$ARGS[0]>>_lvl = 100 - temp_input
+		<<$ARGS[0]>>_lvlst = 100 - temp_input
+	"
+	killvar 'temp_input'
+	dynamic $cheatmenu['stats']
+}
+
+$cheatmenu['setAttrs'] = {
+	loop_index = 0
+	:set_attrs_loop
+		dynamic "
+			<<$att_name[loop_index]>>_lvl = <<ARGS[0]>>
+			<<$att_name[loop_index]>>_lvlst = <<ARGS[0]>>
+		"
+		loop_index += 1
+		! Magic is the last attribute, so if it's a non-magic game we'll end the loop one iteration early
+		if $start_type[1] ! 'nomagic' and loop_index < arrsize('$att_name'):
+			jump 'set_attrs_loop'
+		elseif loop_index < arrsize('$att_name') - 1:
+			jump 'set_attrs_loop'
+		end
+	killvar 'loop_index'
+	dynamic $cheatmenu['stats']
+}
+
+$cheatmenu['setSkills'] = {
+	loop_index = 0
+	:set_skills_loop
+		!! Inhibition (number 33) isn''t a skill so we''ll skip it
+		if loop_index ! 33:
+			dynamic "
+				<<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
+				<<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
+			"
+			loop_index += 1
+		else
+			loop_index += 1
+			dynamic "
+				<<$skl_name[loop_index]>>_lvl = <<ARGS[0]>>
+				<<$skl_name[loop_index]>>_lvlst = <<ARGS[0]>>
+			"
+		end
+
+		!! The size of the array is reduced by 1 because we skipped inhibition
+		if loop_index < arrsize('$skl_name') - 1: jump 'set_skills_loop'
+	killvar 'loop_index'
+	dynamic $cheatmenu['stats']
+}
+
+$cheatmenu['printStatLinks'] = {
+	*p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & dynamic $cheatmenu[''stats'']" >Max</a>  '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+1</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >+10</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-1</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & dynamic $cheatmenu[''stats'']" >-10</a>  '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & dynamic $cheatmenu[''stats'']" >Min</a>  '
+	*pl '<a href="exec:dynamic $cheatmenu[''setStat''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
+}
+
+$cheatmenu['printStatLinks1'] = {
+	*p '<a href="exec:<<$ARGS[0]>>_lvl = 0 & <<$ARGS[0]>>_lvlst = 0 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Max</a>  '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+1</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl -= 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >+10</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl += 1 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-1</a> '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl += 10 & <<$ARGS[0]>>_lvlst = <<$ARGS[0]>>_lvl & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >-10</a>  '
+	*p '<a href="exec:<<$ARGS[0]>>_lvl = 100 & <<$ARGS[0]>>_lvlst = 100 & <<$ARGS[0]>>_exp = 0 & dynamic $cheatmenu[''stats'']" >Min</a>  '
+	*pl '<a href="exec:dynamic $cheatmenu[''setStat1''], ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>''" >Set</a>'
+}
+
+$cheatmenu['stats'] = {
+	gs 'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+
+	!Set a floor and ceiling for all attributes and skills
+	loop_index = 0
+	:attr_trim_loop
+		dynamic "
+			if <<$att_name[loop_index]>>_lvl < 0: <<$att_name[loop_index]>>_lvl = 0
+			if <<$att_name[loop_index]>>_lvlst < 0: <<$att_name[loop_index]>>_lvlst = 0
+			if <<$att_name[loop_index]>>_lvl > 100: <<$att_name[loop_index]>>_lvl = 100
+			if <<$att_name[loop_index]>>_lvlst > 100: <<$att_name[loop_index]>>_lvlst = 100
+		"
+		loop_index += 1
+		if loop_index < arrsize('$att_name'): jump 'attr_trim_loop'
+
+	loop_index = 0
+	:skill_trim_loop
+		dynamic "
+			if <<$skl_name[loop_index]>>_lvl < 0: <<$skl_name[loop_index]>>_lvl = 0
+			if <<$skl_name[loop_index]>>_lvlst < 0: <<$skl_name[loop_index]>>_lvlst = 0
+			if <<$skl_name[loop_index]>>_lvl > 100: <<$skl_name[loop_index]>>_lvl = 100
+			if <<$skl_name[loop_index]>>_lvlst > 100: <<$skl_name[loop_index]>>_lvlst = 100
+		"
+		loop_index += 1
+		if loop_index < arrsize('$skl_name'): jump 'skill_trim_loop'
+	killvar 'loop_index'
+
+	'<center><h1>Cheat Menu - Attributes and Skills</h1></center>'
+	'<center><font color="red"><b>WARNING!</b></font>: Using cheats can cause bugs and break your save, use them with care. When reporting bugs, please mention any cheats you used.</center>'
+	*nl
+	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
+	'<tr><td width="50%" cellpadding="10" valign="top">'
+	*pl'<b>Attributes</b> (values 0 - 100):'
+	*pl '<a href="exec:dynamic $cheatmenu[''setAttrs''], 100" >Max Attributes</a>    <a href="exec:dynamic $cheatmenu[''setAttrs''], 0" >Min Attributes</a>'
+	*p 'Strength (<<stren_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'stren', 'Strength'
+	*p 'Agility (<<agil_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'agil', 'Agility'
+	*p 'Endurance (<<vital_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'vital', 'Endurance'
+	*p 'Intelligence (<<intel_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'intel', 'Intelligence'
+	*p 'Reaction (<<react_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'react', 'Reaction'
+	*p 'Spirit (<<sprt_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'sprt', 'Spirit'
+	*p 'Charisma (<<chrsm_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'chrsm', 'Charisma'
+	*p 'Perception (<<prcptn_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'prcptn', 'Perception'
+	if $start_type[1] ! 'nomagic': *p 'Magic (<<magik_lvl>>): ' & dynamic $cheatmenu['printStatLinks'], 'magik', 'Magic'
+	*nl
+	*pl'<b>Sexual:</b>'
+	*pl 'Inhibition level (<<100 - inhib_lvl>>): ' & dynamic $cheatmenu['printStatLinks1'], 'inhib', 'Inhibition'
+	if willpowermax > 200: willpowermax = 200
+	if willpowermax < 50: willpowermax = 50
+	*pl 'Willpower Maximum (<<willpowermax>>): <a href="exec:willpowermax = 200 & dynamic $cheatmenu[''stats'']" >Max</a>  <a href="exec:willpowermax += 1 & dynamic $cheatmenu[''stats'']" >+1</a> <a href="exec:willpowermax += 10 & dynamic $cheatmenu[''stats'']" >+10</a> <a href="exec:willpowermax -= 1 & dynamic $cheatmenu[''stats'']" >-1</a> <a href="exec:willpowermax -= 10 & dynamic $cheatmenu[''stats'']" >-10</a>  <a href="exec:willpowermax = 50 & dynamic $cheatmenu[''stats'']" >Min</a>'
+	if workPTU > 1:*pl'<a href="exec:teachlevel += 10 & dynamic $cheatmenu[''stats'']">Reputation teacher+10: <<teachlevel>></a>'
+	if workPTU > 1:*pl'<a href="exec:teachlevel -= 10 & dynamic $cheatmenu[''stats'']">Reputation teacher-10: <<teachlevel>></a>'
+	*nl
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
+		*pl'<b>School:</b>'
+		if class['school_math_grade'] < 100:*pl'Math grade: <<class[''school_math_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
+		if class['school_rus_grade'] < 100:*pl'Russian grade: <<class[''school_rus_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
+		if class['school_lit_grade'] < 100:*pl'Literature grade: <<class[''school_lit_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''lit'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
+		if class['school_art_grade'] < 100:*pl'Art grade: <<class[''school_art_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''art'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
+		if class['school_bio_grade'] < 100:*pl'Biology grade: <<class[''school_bio_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', 10 & dynamic $cheatmenu[''stats'']">+10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''bio'', -10 & dynamic $cheatmenu[''stats'']">-10</a>'
+		if class['school_eng_grade'] < 100:*pl'English grade: <<class[''school_eng_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''eng'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_geo_grade'] < 100:*pl'Geography grade: <<class[''school_geo_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''geo'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_sci_grade'] < 100:*pl'Science grade: <<class[''school_sci_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''sci'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_his_grade'] < 100:*pl'History grade: <<class[''school_his_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''his'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_shop_grade'] < 100:*pl'Shop grade: <<class[''school_shop_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''shop'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_comp_grade'] < 100:*pl'Computer grade: <<class[''school_comp_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''comp'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_mus_grade'] < 100:*pl'Music grade: <<class[''school_mus_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''mus'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if class['school_pe_grade'] < 100:*pl'P.E. grade: <<class[''school_pe_grade'']>> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', 10 & dynamic $cheatmenu[''stats'']"> +10</a> <a href="exec:gs ''grades'', ''grade_award'',''school'', ''pe'', -10 & dynamic $cheatmenu[''stats'']"> -10</a>'
+		if schoolprogul >= 0:*pl'<a href="exec:schoolprogul = 0 & dynamic $cheatmenu[''stats'']">Zero Absenteeism (School): <<schoolprogul>></a>'
+		*nl
+	end
+	*pl'<b>Skills</b> (values 0 - 100, and adjusted total by attributes):'
+	*pl '<a href="exec:dynamic $cheatmenu[''setSkills''], 100" >Max Skills</a>    <a href="exec:dynamic $cheatmenu[''setSkills''], 0" >Min Skills</a>'
+	*nl
+	*pl'<b>Others:</b>'
+	*p 'Chess (<<chess_lvl>>) - Total (<<pcs_chess>>): ' & dynamic $cheatmenu['printStatLinks'], 'chess', 'Chess'
+	*p 'Gaming (<<gaming_lvl>>) - Total (<<pcs_gaming>>): ' & dynamic $cheatmenu['printStatLinks'], 'gaming', 'Gaming'
+	*p 'Social (<<humint_lvl>>) - Total (<<pcs_humint>>): ' & dynamic $cheatmenu['printStatLinks'], 'humint', 'People Skills'
+	*p 'Persuasion (<<persuas_lvl>>) - Total (<<pcs_persuas>>): ' & dynamic $cheatmenu['printStatLinks'], 'persuas', 'Persuasion'
+	*p 'Observation (<<observ_lvl>>) - Total (<<pcs_observ>>): ' & dynamic $cheatmenu['printStatLinks'], 'observ', 'Observation'
+	*p 'Makeup (<<makupskl_lvl>>) - Total (<<pcs_makupskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'makupskl', 'Makeup'
+	*p 'Computers (<<compskl_lvl>>) - Total (<<pcs_compskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'compskl', 'Computer Skill'
+	*p 'Hacking (<<comphckng_lvl>>) - Total (<<pcs_comphckng>>): ' & dynamic $cheatmenu['printStatLinks'], 'comphckng', 'Hacking'
+	*p 'Handy-work (<<hndiwrk_lvl>>) - Total (<<pcs_hndiwrk>>): ' & dynamic $cheatmenu['printStatLinks'], 'hndiwrk', 'Handy-work'
+	*p 'Pool (<<pool_lvl>>) - Total (<<pcs_pool>>): ' & dynamic $cheatmenu['printStatLinks'], 'pool', 'Pool'
+	*p 'Heels (<<pcs_heels>>) - Total (<<pcs_heels>>): ' & dynamic $cheatmenu['printStatLinks'], 'heels', 'Heels'
+	if $start_type[1] ! 'nomagic': *p 'Spell Casting (<<splcstng_lvl>>) - Total (<<pcs_splcstng>>): ' & dynamic $cheatmenu['printStatLinks'], 'splcstng', 'Spellcasting'
+	'</td><td width="50%" cellpadding="10" valign="top">'
+	*pl'<b>Combat:</b>'
+	*p 'Jabs (<<jab_lvl>>)- Total (<<pcs_jab>>): ' & dynamic $cheatmenu['printStatLinks'], 'jab', 'Jabs'
+	*p 'Power Strikes (<<punch_lvl>>) - Total (<<pcs_punch>>): ' & dynamic $cheatmenu['printStatLinks'], 'punch', 'Power Strikes'
+	*p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
+	*p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
+	*p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
+	*p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
+	*nl
+	*pl'<b>Craft:</b>'
+	*p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'
+	*p 'Tailoring (<<sewng_lvl>>) - Total (<<pcs_sewng>>): ' & dynamic $cheatmenu['printStatLinks'], 'sewng', 'Tailoring'
+	*p 'Instruments (<<instrmusic_lvl>>) - Total (<<pcs_instrmusic>>): ' & dynamic $cheatmenu['printStatLinks'], 'instrmusic', 'Instrumental Music'
+	*p 'Photography (<<photoskl_lvl>>) - Total (<<pcs_photoskl>>): ' & dynamic $cheatmenu['printStatLinks'], 'photoskl', 'Photography'
+	*p 'Artistic (<<artskls_lvl>>) - Total (<<pcs_artskls>>): ' & dynamic $cheatmenu['printStatLinks'], 'artskls', 'Artistic Skills'
+	*p 'Performing (<<perform_lvl>>) - Total (<<pcs_perform>>): ' & dynamic $cheatmenu['printStatLinks'], 'perform', 'Performance'
+	*p 'Music Production (<<musicprod_lvl>>) - Total (<<pcs_musicprod>>): ' & dynamic $cheatmenu['printStatLinks'], 'musicprod', 'Music Production'
+	*nl
+	*pl'<b>Dance:</b>'
+	*p 'Modern Dance (<<danc_lvl>>) - Total (<<pcs_danc>>): ' & dynamic $cheatmenu['printStatLinks'], 'danc', 'Modern Dancing'
+	*p 'Erotic Dance (<<dancero_lvl>>) - Total (<<pcs_dancero>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancero', 'Erotic Dancing'
+	*p 'Pole Dance (<<dancpol_lvl>>) - Total (<<pcs_dancpol>>): ' & dynamic $cheatmenu['printStatLinks'], 'dancpol', 'Pole Dancing'
+	*p 'Cheerleading (<<cheer_lvl>>) - Total (<<pcs_cheer>>): ' & dynamic $cheatmenu['printStatLinks'], 'cheer', 'Cheerleading'
+	*nl
+	*pl'<b>Sport:</b>'
+	*p 'Running (<<run_lvl>>) - Total (<<pcs_run>>): ' & dynamic $cheatmenu['printStatLinks'], 'run', 'Running'
+	*p 'Volleyball (<<vball_lvl>>) - Total (<<pcs_vball>>): ' & dynamic $cheatmenu['printStatLinks'], 'vball', 'Volleyball'
+	*p 'Ice Skating (<<icesktng_lvl>>) - Total (<<pcs_icesktng>>): ' & dynamic $cheatmenu['printStatLinks'], 'icesktng', 'Ice Skating'
+	*p 'Wrestling (<<wrstlng_lvl>>) - Total (<<pcs_wrstlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'wrstlng', 'Wrestling'
+	*p 'Football (<<ftbll_lvl>>) - Total (<<pcs_ftbll>>): ' & dynamic $cheatmenu['printStatLinks'], 'ftbll', 'Football'
+	*nl
+	*pl'<b>Work:</b>'
+	*p 'Serving (<<servng_lvl>>) - Total (<<pcs_servng>>): ' & dynamic $cheatmenu['printStatLinks'], 'servng', 'Serving'
+	*p 'Modeling (<<mdlng_lvl>>) - Total (<<pcs_mdlng>>): ' & dynamic $cheatmenu['printStatLinks'], 'mdlng', 'Modeling'
+	*p 'Medicine (<<medcn_lvl>>) - Total (<<pcs_medcn>>): ' & dynamic $cheatmenu['printStatLinks'], 'medcn', 'Medicine'
+	*p 'Cleaning (<<cleaning_lvl>>) - Total (<<pcs_cleaning>>): ' & dynamic $cheatmenu['printStatLinks'], 'cleaning', 'Cleaning'
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['reputation'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Relationships and Renown</h1></center>'
+	'<center>Relationship values are from 0 - 100.</center>'
+	'<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">'
+	*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'' & dynamic $cheatmenu[''reputation'']">Active</a>')+'|'+iif($status['dog'] = 'blocked', '<b>Blocked</b>', '<a href="exec: $status[''dog''] = ''blocked'' & dynamic $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 & dynamic $cheatmenu[''reputation'']">Off</a>', '<a href="exec: cheat[''dog_rel''] = 0 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_feed_base''] += 1 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_walk_base''] += 1 & dynamic $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 & dynamic $cheatmenu[''reputation'']">-1</a>', '-1')+'|<a href="exec: rex[''count_bath_base''] += 1 & dynamic $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:
+			'<a href="exec:Enable_reputation_popular = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_popular = 1:
+			'<a href="exec:Enable_reputation_popular = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>>: <<npc_rel[''A1'']>>	<a href="exec:npc_rel[''A1''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A1''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A4'']>> <<$npc_lastname[''A4'']>>: <<npc_rel[''A4'']>>	<a href="exec:npc_rel[''A4''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A4''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>>: <<npc_rel[''A14'']>>	<a href="exec:npc_rel[''A14''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A14''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A15'']>> <<$npc_lastname[''A15'']>>: <<npc_rel[''A15'']>>	<a href="exec:npc_rel[''A15''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A15''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A17'']>> <<$npc_lastname[''A17'']>>: <<npc_rel[''A17'']>>	<a href="exec:npc_rel[''A17''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A17''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A22'']>> <<$npc_lastname[''A22'']>>: <<npc_rel[''A22'']>>	<a href="exec:npc_rel[''A22''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A22''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A146'']>> <<$npc_lastname[''A146'']>>: <<npc_rel[''A146'']>>  <a href="exec:npc_rel[''A146''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A146''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A147'']>> <<$npc_lastname[''A147'']>>: <<npc_rel[''A147'']>>  <a href="exec:npc_rel[''A147''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A147''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A148'']>> <<$npc_lastname[''A148'']>>: <<npc_rel[''A148'']>>  <a href="exec:npc_rel[''A148''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A148''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if soniaPS = 0:	'<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>	<a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A139'']>> <<$npc_lastname[''A139'']>>: <<npc_rel[''A139'']>>  <a href="exec:npc_rel[''A139''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A139''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A140'']>> <<$npc_lastname[''A140'']>>: <<npc_rel[''A140'']>>  <a href="exec:npc_rel[''A140''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A140''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		*nl
+		'<i>Athletes</i>'
+		if Enable_reputation_athletes = 0:
+			'<a href="exec:Enable_reputation_athletes = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_athletes = 1:
+			'<a href="exec:Enable_reputation_athletes = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A3'']>> <<$npc_lastname[''A3'']>>: <<npc_rel[''A3'']>>	<a href="exec:npc_rel[''A3''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A3''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if fedormasha = 0:	'<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>	<a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A8'']>> <<$npc_lastname[''A8'']>>: <<npc_rel[''A8'']>>	<a href="exec:npc_rel[''A8''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A8''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A13'']>> <<$npc_lastname[''A13'']>>: <<npc_rel[''A13'']>>	<a href="exec:npc_rel[''A13''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A13''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A18'']>> <<$npc_lastname[''A18'']>>: <<npc_rel[''A18'']>>	<a href="exec:npc_rel[''A18''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A18''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A19'']>> <<$npc_lastname[''A19'']>>: <<npc_rel[''A19'']>>	<a href="exec:npc_rel[''A19''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A19''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A23'']>> <<$npc_lastname[''A23'']>>: <<npc_rel[''A23'']>>	<a href="exec:npc_rel[''A23''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A23''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A149'']>> <<$npc_lastname[''A149'']>>: <<npc_rel[''A149'']>>  <a href="exec:npc_rel[''A149''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A149''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A150'']>> <<$npc_lastname[''A150'']>>: <<npc_rel[''A150'']>>  <a href="exec:npc_rel[''A150''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A150''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A141'']>> <<$npc_lastname[''A141'']>>: <<npc_rel[''A141'']>>  <a href="exec:npc_rel[''A141''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A141''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A165'']>> <<$npc_lastname[''A165'']>>: <<npc_rel[''A165'']>>  <a href="exec:npc_rel[''A165''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A165''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		*nl
+		'<i>Nerds</i>'
+		if Enable_reputation_nerds = 0:
+			'<a href="exec:Enable_reputation_nerds = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_nerds = 1:
+			'<a href="exec:Enable_reputation_nerds = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A2'']>> <<$npc_lastname[''A2'']>>: <<npc_rel[''A2'']>>	<a href="exec:npc_rel[''A2''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A2''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A6'']>> <<$npc_lastname[''A6'']>>: <<npc_rel[''A6'']>>	<a href="exec:npc_rel[''A6''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A6''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A12'']>> <<$npc_lastname[''A12'']>>: <<npc_rel[''A12'']>>	<a href="exec:npc_rel[''A12''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A12''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A16'']>> <<$npc_lastname[''A16'']>>: <<npc_rel[''A16'']>>	<a href="exec:npc_rel[''A16''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A16''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A151'']>> <<$npc_lastname[''A151'']>>: <<npc_rel[''A151'']>>  <a href="exec:npc_rel[''A151''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A151''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>>  <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>>  <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>>  <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A240'']>> <<$npc_lastname[''A240'']>>: <<npc_rel[''A240'']>>  <a href="exec:npc_rel[''A240''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A240''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		*nl
+		'<i>Gopniks</i>'
+		if Enable_reputation_gopniks = 0:
+			'<a href="exec:Enable_reputation_gopniks = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_gopniks = 1:
+			'<a href="exec:Enable_reputation_gopniks = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>>: <<npc_rel[''A9'']>>	<a href="exec:npc_rel[''A9''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A9''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A10'']>> <<$npc_lastname[''A10'']>>: <<npc_rel[''A10'']>>	<a href="exec:npc_rel[''A10''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A10''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>: <<npc_rel[''A11'']>>	<a href="exec:npc_rel[''A11''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A11''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A20'']>> <<$npc_lastname[''A20'']>>: <<npc_rel[''A20'']>>	<a href="exec:npc_rel[''A20''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A20''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A21'']>> <<$npc_lastname[''A21'']>>: <<npc_rel[''A21'']>>	<a href="exec:npc_rel[''A21''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A21''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A24'']>> <<$npc_lastname[''A24'']>>: <<npc_rel[''A24'']>>	<a href="exec:npc_rel[''A24''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A24''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A154'']>> <<$npc_lastname[''A154'']>>: <<npc_rel[''A154'']>>  <a href="exec:npc_rel[''A154''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A154''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A155'']>> <<$npc_lastname[''A155'']>>: <<npc_rel[''A155'']>>  <a href="exec:npc_rel[''A155''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A155''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A156'']>> <<$npc_lastname[''A156'']>>: <<npc_rel[''A156'']>>  <a href="exec:npc_rel[''A156''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A156''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A157'']>> <<$npc_lastname[''A157'']>>: <<npc_rel[''A157'']>>  <a href="exec:npc_rel[''A157''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A157''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A158'']>> <<$npc_lastname[''A158'']>>: <<npc_rel[''A158'']>>  <a href="exec:npc_rel[''A158''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A158''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A143'']>> <<$npc_lastname[''A143'']>>: <<npc_rel[''A143'']>>  <a href="exec:npc_rel[''A143''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A143''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A144'']>> <<$npc_lastname[''A144'']>>: <<npc_rel[''A144'']>>  <a href="exec:npc_rel[''A144''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A144''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A145'']>> <<$npc_lastname[''A145'']>>: <<npc_rel[''A145'']>>  <a href="exec:npc_rel[''A145''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A145''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A189'']>> <<$npc_lastname[''A189'']>>: <<npc_rel[''A189'']>>  <a href="exec:npc_rel[''A189''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A189''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		*nl
+		'<i>Outcasts/Loners</i>'
+		if Enable_reputation_outcasts = 0:
+			'<a href="exec:Enable_reputation_outcasts = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_outcasts = 1:
+			'<a href="exec:Enable_reputation_outcasts = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A7'']>> <<$npc_lastname[''A7'']>>: <<npc_rel[''A7'']>>	<a href="exec:npc_rel[''A7''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A7''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if soniaPS > 0:	'<<$npc_firstname[''A25'']>> <<$npc_lastname[''A25'']>>: <<npc_rel[''A25'']>>	<a href="exec:npc_rel[''A25''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A25''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			if fedormasha = 1:	'<<$npc_firstname[''A5'']>> <<$npc_lastname[''A5'']>>: <<npc_rel[''A5'']>>	<a href="exec:npc_rel[''A5''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A5''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A159'']>> <<$npc_lastname[''A159'']>>: <<npc_rel[''A159'']>>  <a href="exec:npc_rel[''A159''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A159''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		*nl
+		'<i>Teachers/Coaches</i>'
+		if Enable_reputation_teachers = 0:
+			'<a href="exec:Enable_reputation_teachers = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+		end
+		if Enable_reputation_teachers = 1:
+			'<a href="exec:Enable_reputation_teachers = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+			'<<$npc_firstname[''A26'']>> <<$npc_lastname[''A26'']>>: <<npc_rel[''A26'']>>	<a href="exec:npc_rel[''A26''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A26''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'Mikhail Nikolayevich: <<npc_rel[''A69'']>>	<a href="exec:npc_rel[''A69''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A69''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A128'']>> <<$npc_lastname[''A128'']>>: <<npc_rel[''A128'']>>  <a href="exec:npc_rel[''A128''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A128''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A129'']>> <<$npc_lastname[''A129'']>>: <<npc_rel[''A129'']>>  <a href="exec:npc_rel[''A129''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A129''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A130'']>> <<$npc_lastname[''A130'']>>: <<npc_rel[''A130'']>>  <a href="exec:npc_rel[''A130''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A130''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A131'']>> <<$npc_lastname[''A131'']>>: <<npc_rel[''A131'']>>  <a href="exec:npc_rel[''A131''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A131''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A132'']>> <<$npc_lastname[''A132'']>>: <<npc_rel[''A132'']>>  <a href="exec:npc_rel[''A132''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A132''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A133'']>> <<$npc_lastname[''A133'']>>: <<npc_rel[''A133'']>>  <a href="exec:npc_rel[''A133''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A133''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A134'']>> <<$npc_lastname[''A134'']>>: <<npc_rel[''A134'']>>  <a href="exec:npc_rel[''A134''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A134''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A135'']>> <<$npc_lastname[''A135'']>>: <<npc_rel[''A135'']>>  <a href="exec:npc_rel[''A135''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A135''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A136'']>> <<$npc_lastname[''A136'']>>: <<npc_rel[''A136'']>>  <a href="exec:npc_rel[''A136''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A136''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A137'']>> <<$npc_lastname[''A137'']>>: <<npc_rel[''A137'']>>  <a href="exec:npc_rel[''A137''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A137''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A138'']>> <<$npc_lastname[''A138'']>>: <<npc_rel[''A138'']>>  <a href="exec:npc_rel[''A138''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A138''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+	end
+	*nl
+	'<font color="blue"><b>Nicholas'' Family</b></font>'
+	'<a href="exec:gt ''nichUtil'', ''debug''">Storyline Debug Menu</a>'
+	'</td><td width="50%" cellpadding="10" valign="top">'
+	*nl
+	'Miscellaneous relationships'
+	*nl
+	'<font color="blue"><b>Others</b></font>'
+	*nl
+	if Enable_reputation_others = 0:
+		'<a href="exec:Enable_reputation_others = 1 & dynamic $cheatmenu[''reputation'']">Show details</a>'
+	end
+	if Enable_reputation_others = 1:
+		'<a href="exec:Enable_reputation_others = 0 & dynamic $cheatmenu[''reputation'']">Hide details</a>'
+		if npc_rel['A112'] >= 0:
+			'Sergei Shulgin: <<npc_rel[''A112'']>>	<a href="exec:npc_rel[''A112''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A112''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A219'] >= 0:
+			'Kat: <<npc_rel[''A219'']>>	<a href="exec:npc_rel[''A219''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A219''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A220'] >= 0:
+			'Vika: <<npc_rel[''A220'']>>  <a href="exec:npc_rel[''A220''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A220''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A93'] >= 0:
+			'Irina: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A43'] >= 0:
+			'Tamara: <<npc_rel[''A43'']>>	<a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if alla >= 0:
+			'Alla: <<alla>>	<a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if masha >= 0:
+			'Masha: <<masha>>	<a href="exec:masha += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:masha -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A41'] >= 0:
+			'Givi: <<npc_rel[''A41'']>>	<a href="exec:npc_rel[''A41''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A41''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A42'] >= 0:
+			'Ashot: <<npc_rel[''A42'']>>  <a href="exec:npc_rel[''A42''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A42''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A89'] >= 0:
+			'Eugene: <<npc_rel[''A89'']>>	<a href="exec:npc_rel[''A89''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A89''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A217'] >= 0:
+			'Pavlin: <<npc_rel[''A217'']>>	<a href="exec:npc_rel[''A217''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A217''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if huntersAndreiQw >= 0:
+			'Hunter Andrew: <<huntersAndreiQw>>	<a href="exec:huntersAndreiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersAndreiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if huntersSergeiQw >= 0:
+			'Hunter Sergei: <<huntersSergeiQw>>	<a href="exec:huntersSergeiQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersSergeiQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if huntersIgorQw >= 0:
+			'Hunter Igor: <<huntersIgorQw>>	<a href="exec:huntersIgorQw += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:huntersIgorQw -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+		if npc_rel['A217'] >= 0:
+			'Martin: <<npc_rel[''A216'']>>	<a href="exec:npc_rel[''A216''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A216''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		end
+	end
+
+	if pcs_lovers[0] = 1:
+		*nl
+		'You are dating <<$loverdesc[0]>>.'
+		if loverrelation[0] < 0: loverrelation[0] = 0
+		if loverdays[0] < 0: loverdays[0] = 0
+		if haraklover[0] > 2: haraklover[0] = 0
+		if loverizvrat[0] > 1: loverizvrat[0] = 0
+		'Change lover''s personality: <a href="exec:haraklover[0] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[0]>></a>'
+		'Change lover''s perversion: <a href="exec:loverizvrat[0] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[0]>></a>'
+		'Relationship: <<loverrelation[0]>> <a href="exec:loverrelation[0] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[0] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'You''ve been dating for <<loverdays[0]>> days. <a href="exec:loverdays[0] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[0] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
+	end
+	if pcs_lovers[1] = 1:
+		*nl
+		'You are dating <<$loverdesc[1]>>.'
+		if loverrelation[1] < 0: loverrelation[1] = 0
+		if loverdays[1] < 0: loverdays[1] = 0
+		if haraklover[1] > 2: haraklover[1] = 0
+		if loverizvrat[1] > 1: loverizvrat[1] = 0
+		'Change lover''s personality: <a href="exec:haraklover[1] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[1]>></a>'
+		'Change lover''s perversion: <a href="exec:loverizvrat[1] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[1]>></a>'
+		'Relationship: <<loverrelation[1]>> <a href="exec:loverrelation[1] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[1] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'You''ve been dating for <<loverdays[1]>> days. <a href="exec:loverdays[1] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[1] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
+	end
+	if pcs_lovers[2] = 1:
+		*nl
+		'You are dating <<$loverdesc[2]>>.'
+		if loverrelation[2] < 0: loverrelation[2] = 0
+		if loverdays[2] < 0: loverdays[2] = 0
+		if haraklover[2] > 2: haraklover[2] = 0
+		if loverizvrat[2] > 1: loverizvrat[2] = 0
+		'Change lover''s personality: <a href="exec:haraklover[2] += 1 & dynamic $cheatmenu[''reputation'']"><<haraklover[2]>></a>'
+		'Change lover''s perversion: <a href="exec:loverizvrat[2] += 1 & dynamic $cheatmenu[''reputation'']"><<loverizvrat[2]>></a>'
+		'Relationship: <<loverrelation[2]>> <a href="exec:loverrelation[2] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:loverrelation[2] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+		'You''ve been dating for <<loverdays[2]>> days. <a href="exec:loverdays[2] += 5 & dynamic $cheatmenu[''reputation'']">+5</a> <a href="exec:loverdays[2] -= 5 & dynamic $cheatmenu[''reputation'']">-5</a>'
+	end
+	*nl
+	if fame['pav_slut'] >= 50:
+		gs 'fame'
+		'In Pavlovsk you are known as a <font color="red"><<$gnikname>></font> <a href="exec:fame[''pav_sex''] = 0 & fame[''pav_prostitute''] = 0 & gs ''fame'', ''calculateSlut'' & dynamic $cheatmenu[''reputation'']">Clear</a>'
+	end
+	*nl
+	if opusk > 0 or gnewQW > 0 or sipovka > 0:'<a href="exec:opusk = 0 & gnewQW = 0 & sipovka = 0 & dynamic $cheatmenu[''reputation'']">Clear reputation with Gopniks</a>'
+	if mid($start_type,1,2) = 'sg':
+
+		*nl
+		'<font color="red"><b>WARNING</b></font>: Clearing reputation flags with your family may cause bugs. Use at your own risk!'
+		*nl
+		if motherKnowWhore > 0:
+			'Your mother knows, that you are sexually active and considers you are a whore. <a href="exec:motherKnowWhore = 0 & motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear both reputations</a>    <a href="exec:motherKnowWhore = 0 & dynamic $cheatmenu[''reputation'']">Clear only whore reputation</a>'
+		elseif motherKnowSpravka > 0:
+			'Your mother knows that you are sexually active. <a href="exec:motherKnowSpravka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		else
+			'Your mother thinks that you are a virgin.'
+		end
+		*nl
+		if evgenQW >= 4 and fame['pav_slut'] >= 250:
+			'Your brother thinks you are a total whore. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		elseif evgenQW >= 3:
+			'Your brother thinks you are a slut. <a href="exec:evgenQW = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		elseif brotherknowslut = 1:
+			'Your brother saw semen on your body and thinks you fuck around. <a href="exec:brotherknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		elseif brotherknowslut >= 2:
+			'Your brother saw you in the park fucking the Gopniks. <a href="exec:brotherknowslut = 1 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		else
+			'Your brother has a good opinion of you.'
+		end
+		*nl
+		if sisterknowslut > 1 and sisboypartyQW > 1:
+			'Your sister thinks you are a slut <a href="exec:sisboypartyQW = 0 & sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		elseif sisterknowslut > 0:
+			'Your sister knows that you sleep around. <a href="exec:sisterknowslut = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>'
+		else
+			'Your sister has a good opinion of you.'
+		end
+		*nl
+		if func('homes_properties', 'can_live_here', 'parents_home') = 0:
+			'<a href="exec: gs ''homes_properties'', ''give_access'', ''parents_home'' & dynamic $cheatmenu[''reputation'']">Restore</a> access to your parent''s apartment.'
+		end
+		if momKnowsKolka = 1:
+			'Your mother knows Kolka is the father. <a href="momKnowsKolka = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
+		end
+		if momKnowsVladimir = 1:
+			'Your mother knows Vladimir is the father. <a href="exec:momKnowsVladimir = 0 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
+		end
+		if SchoolBlock = 1:
+			'You''ve been expelled from school. <a href="exec:SchoolBlock = 0 & schoolPredupr = 0 & schoolprogul = 0 & pcs_grades = 50 & dynamic $cheatmenu[''reputation'']">Clear</a>.'
+		end
+	end
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['documents'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Diplomas, Licences, and Certificates</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="300" cellspacing="0" cellpadding="20" valign="top">'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	if SchoolAtestat = 0: '<a href="exec:SchoolAtestat = 1 & dynamic $cheatmenu[''documents'']">Get School Certificate</a>'
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0: '<font color="red"><b>WARNING!</b></font>: This will end your school year!' & *nl
+	if SchoolAtestat = 1:'Already have a School Certificate'
+	if university['diploma'] > 0:
+		'You already have a Diploma'
+	else
+		'<a href="exec:gs ''uniutil'', ''diploma'', ''set_obtained'' & dynamic $cheatmenu[''documents'']">Get Diploma</a>'
+	end
+	if secrdiplom = 0:'<a href="exec:secrdiplom = 1 & dynamic $cheatmenu[''documents'']">Get Secretarial Diploma</a>'
+	if secrdiplom = 1:'You already have a Secretarial Diploma'
+	if masseuse['certification'] < 10:'<a href="exec:masseuse[''certification''] = 10 & dynamic $cheatmenu[''documents'']">Get Masseuse Certificate</a>'
+	if masseuse['certification'] >= 10:'You already have a Masseuse Certificate'
+	if prava = 0:'<a href="exec:prava = 1 & dynamic $cheatmenu[''documents'']">Get Driving Licence</a>'
+	if prava = 1:'You already have Driving Licence'
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['input_time'] = {
+	inputtmp = input("Enter time with 4-digit (input 0102 for 1:02)")
+	if inputtmp/100 >= 0 and inputtmp/100 <= 23:hour = inputtmp/100
+	inputtmp = inputtmp mod 100
+	if inputtmp >= 0 and inputtmp <= 59:minut = inputtmp
+	killvar 'inputtmp'
+	dynamic $cheatmenu['time']
+}
+
+$cheatmenu['time'] = {
+	gs 'daystart'
+	gs 'outdoors', 'temp_set'
+	gs 'stat'
+
+	temp_daystart = (year - 2016) * 365
+!!2016 is a leapyear so no adjustment before division
+	temp_daystart += (year - 2016) / 4
+	i=1
+	:temp_daystart
+	if temp_month > i:
+		temp_daystart += monthsend[i]
+		i += 1
+		jump 'temp_daystart'
+	end
+	temp_daystart += temp_day
+	temp_daystart -= daystart_start
+	temp_daystart += 1
+
+	if currtimecheck = 1:
+		killvar 'currtimecheck'
+		if currday ! daystart:
+			if currday < daystart:
+				week = (week + daystart - currday) mod 7
+			else
+				temp = week - ((currday - daystart) mod 7)
+				if temp <= 0: week = 7 - temp else week = temp
+			end
+			currday = daystart
+		end
+		if currhour < (daystart-1) * 24 + hour:femcycloop = (daystart-1) * 24 + hour - currhour
+		:femcycloop
+		if femcycloop > 0:gs 'femcyc' & femcycloop -= 1 & jump 'femcycloop'
+	end
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Manipulate Time and Weather</h1></center>'
+	'<center><font color="red"><b>WARNING!</b></font>: Using cheats to manipulate time can <b>easily</b> break quests and cause bugs. Do not use them unless'
+	'you know what you''re doing. When reporting bugs, please mention any cheats you used.</center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	if temp_minut > 9:
+		if temp_hour > 9: $temptime = '<b><<temp_hour>>:<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:<<temp_minut>></b>'
+	else
+		if temp_hour > 9: $temptime = '<b><<temp_hour>>:0<<temp_minut>></b>' else $temptime = '<b>0<<temp_hour>>:0<<temp_minut>></b>'
+	end
+	if minut > 9:
+		if hour > 9: $tempcurtime = '<b><<hour>>:<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:<<minut>></b>'
+	else
+		if hour > 9: $tempcurtime = '<b><<hour>>:0<<minut>></b>' else $tempcurtime = '<b>0<<hour>>:0<<minut>></b>'
+	end
+
+	if temp_daystart > daystart:
+		temp = (temp_daystart - daystart) mod 7
+		if (temp + week) mod 7 = 0:temp_week = 7 else temp_week = (temp + week) mod 7
+	elseif temp_daystart < daystart:
+		temp = (daystart - temp_daystart) mod 7
+		if (week - temp) mod 7 = 0:
+			temp_week = 7
+		elseif (week - temp) mod 7 < 0:
+			temp_week = ((week - temp) mod 7) + 7
+		else
+			temp_week = week - temp
+		end
+	else
+		temp_week = week
+	end
+	killvar 'temp'
+
+	'Current time: <b><<$week[week]>></b>, <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
+	'Target time: <b><<$week[temp_week]>></b>, <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
+	'Daychange: <<temp_daystart - daystart>>'
+	*nl
+	'Year:	<a href="exec:temp_year += 1 & dynamic $cheatmenu[''time'']">+1 Year</a>	<a href="exec:temp_year -= 1 & dynamic $cheatmenu[''time'']">-1 Year</a>'
+	'Select <a href="exec:dynamic $cheatmenu[''month'']">Month</a>'
+	$daychange = '	<a href="exec:temp_day += 7 & dynamic $cheatmenu[''time'']">+7 Day</a>'
+	$daychange += '	<a href="exec:temp_day += 1 & dynamic $cheatmenu[''time'']">+1 Day</a>'
+	$daychange += '	<a href="exec:temp_day -= 1 & dynamic $cheatmenu[''time'']">-1 Day</a>'
+	$daychange += '	<a href="exec:temp_day -= 7 & dynamic $cheatmenu[''time'']">-7 Day</a>'
+	'Day:' +$daychange
+	killvar 'daychange'
+	$SS = 'Hour: '
+	if temp_hour > 0:$SS += '<a href="exec:temp_hour -= 1 & dynamic $cheatmenu[''time'']">-1</a>  ' else $SS += '	'
+	if temp_hour > 3:$SS += '<a href="exec:temp_hour -= 4 & dynamic $cheatmenu[''time'']">-4</a>  ' else $SS += '	'
+	if temp_hour ! 0:$SS += '<a href="exec:temp_hour = 0 & dynamic $cheatmenu[''time'']">0</a>	' else $SS += '	'
+	if temp_hour < 23:$SS += '<a href="exec:temp_hour += 1 & dynamic $cheatmenu[''time'']">+1</a>  ' else $SS += '	'
+	if temp_hour < 20:$SS += '<a href="exec:temp_hour += 4 & dynamic $cheatmenu[''time'']">+4</a>'
+	$SS
+	$SS = 'Minute: '
+	if temp_minut > 14:$SS += '<a href="exec:temp_minut -= 15 & dynamic $cheatmenu[''time'']">-15</a> ' else $SS += '	'
+	if temp_minut > 0:$SS += '<a href="exec:temp_minut -= 1 & dynamic $cheatmenu[''time'']">-1</a> ' else $SS += '	'
+	if temp_minut ! 0:$SS += '<a href="exec:temp_minut = 0 & dynamic $cheatmenu[''time'']">0</a> ' else $SS += '   '
+	if temp_minut < 59:$SS += '<a href="exec:temp_minut += 1 & dynamic $cheatmenu[''time'']">+1</a> '
+	if temp_minut < 46:$SS += '<a href="exec:temp_minut += 15 & dynamic $cheatmenu[''time'']">+15</a>'
+	$SS
+	killvar 'SS'
+	*nl
+	'Weather: <a href="exec:sunWeather=iif(sunWeather=0,1,0) & chWeather = 1 & gs ''outdoors'', ''weather'' & dynamic $cheatmenu[''time'']">'+iif(sunWeather=0,'Rain','Sunny')+'</a>'
+	*nl
+	'Temperature = <<$temperature>> - <a href="exec:temper += 1 & dynamic $cheatmenu[''time'']">+1 degree</a> - <a href="exec:temper += 5 & dynamic $cheatmenu[''time'']">+5 degrees</a> - <a href="exec:temper -= 1 & dynamic $cheatmenu[''time'']">-1 degree</a> - <a href="exec:temper -= 5 & dynamic $cheatmenu[''time'']">-5 degrees</a>'
+	*nl
+	'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''time'']">Celsius')+'</a> scale'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''input_time'']">Direct input time</a>'
+	*nl
+	'<a href="exec:day = temp_day & $month = $temp_month & month = temp_month & year = temp_year & hour = temp_hour & minut = temp_minut & currtimecheck = 1 & dynamic $cheatmenu[''time'']">Accept target date & time</a>'
+	'<a href="exec:temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut & dynamic $cheatmenu[''time'']">Reset target date & time</a>'
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['week'] = {
+	gs'stat'
+	*clr & cla
+	'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
+	*nl
+	'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
+	'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
+	*nl
+	'<a href="exec:week = 1 & dynamic $cheatmenu[''time'']">Monday</a>'
+	'<a href="exec:week = 2 & dynamic $cheatmenu[''time'']">Tuesday</a>'
+	'<a href="exec:week = 3 & dynamic $cheatmenu[''time'']">Wednesday</a>'
+	'<a href="exec:week = 4 & dynamic $cheatmenu[''time'']">Thursday</a>'
+	'<a href="exec:week = 5 & dynamic $cheatmenu[''time'']">Friday</a>'
+	'<a href="exec:week = 6 & dynamic $cheatmenu[''time'']">Saturday</a>'
+	'<a href="exec:week = 7 & dynamic $cheatmenu[''time'']">Sunday</a>'
+}
+
+$cheatmenu['month'] = {
+	gs'stat'
+	*clr & cla
+	'<center><a href="exec:dynamic $cheatmenu"><b>Cheat menu</b></a> - <a href="exec:dynamic $cheatmenu[''time'']"><b>Time</b></a></center>'
+	*nl
+	'Current time: <b><<day>></b>. day of <b><<$month>></b>, <b><<year>></b>, <<$tempcurtime>>'
+	'Target time: <b><<temp_day>></b>. day of <b><<$temp_month>></b>, <b><<temp_year>></b>, <<$temptime>>'
+	*nl
+	'<a href="exec:temp_month = 1 & $temp_month = ''January'' & dynamic $cheatmenu[''time'']">January</a>'
+	'<a href="exec:temp_month = 2 & $temp_month = ''February'' & dynamic $cheatmenu[''time'']">February</a>'
+	'<a href="exec:temp_month = 3 & $temp_month = ''March'' & dynamic $cheatmenu[''time'']">March</a>'
+	'<a href="exec:temp_month = 4 & $temp_month = ''April'' & dynamic $cheatmenu[''time'']">April</a>'
+	'<a href="exec:temp_month = 5 & $temp_month = ''May'' & dynamic $cheatmenu[''time'']">May</a>'
+	'<a href="exec:temp_month = 6 & $temp_month = ''June'' & dynamic $cheatmenu[''time'']">June</a>'
+	'<a href="exec:temp_month = 7 & $temp_month = ''July'' & dynamic $cheatmenu[''time'']">July</a>'
+	'<a href="exec:temp_month = 8 & $temp_month = ''August'' & dynamic $cheatmenu[''time'']">August</a>'
+	'<a href="exec:temp_month = 9 & $temp_month = ''September'' & dynamic $cheatmenu[''time'']">September</a>'
+	'<a href="exec:temp_month = 10 & $temp_month = ''October'' & dynamic $cheatmenu[''time'']">October</a>'
+	'<a href="exec:temp_month = 11 & $temp_month = ''November'' & dynamic $cheatmenu[''time'']">November</a>'
+	'<a href="exec:temp_month = 12 & $temp_month = ''December'' & dynamic $cheatmenu[''time'']">December</a>'
+}
+
+$cheatmenu['magicTable'] = {
+	!Build a cheat table for spells with a given Array of spell names.
+	!	ARGS[0] = Friendly name for table
+	!	ARGS[1] = the name of the arraay to use
+
+	$SpellTabName = $ARGS[0]
+	$ThisArrName = $ARGS[1]
+	maxArrSizeC = dyneval("result=arrsize('<<$ThisArrName>>')")
+
+	! make the header for the table
+	$SpellListStr = "<center>
+		<table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
+			<tr><th colspan='4'><b><<$SpellTabName>></b></th></tr>
+			<tr>
+				<th></th>
+				<th>Spell</th>
+				<th>Mana</th>
+				<th>Description</th>
+			</tr>"
+	i = 0
+	:CheatDinSpell1
+	$ThisSpellName = dyneval("$result=<<$ThisArrName>>[<<i>>]")
+	if i < maxArrSizeC:
+		if spellKnown[$ThisSpellName] = 1:
+			$spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
+		else
+			$spellFlipper = "<a href=""EXEC: spellKnown['<<$ThisSpellName>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
+		end
+		$SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$spellName[$ThisSpellName]>></td><td><<spellMana[$ThisSpellName]>></td><td><<$spellDesc[$ThisSpellName]>></td></tr>"
+		i += 1
+		jump 'CheatDinSpell1'
+	end
+
+	$SpellListStr = $SpellListStr + "
+		</table>
+	</center>"
+
+	*pl func('cleanHTML',$SpellListStr)
+
+	killvar 'i'
+	killvar '$ThisSpellName'
+	killvar '$ThisArrName'
+	killvar 'maxArrSizeC'
+	killvar '$SpellTabName'
+	killvar '$spellFlipper'
+	killvar '$SpellListStr'
+}
+
+$cheatmenu['magic'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Magic</h1></center>'
+	'<center>Is magical: <a href="exec:pcs_magik += 1 & dynamic $cheatmenu[''magic'']">+1<<pcs_magik>></a></center>'
+	if succubusflag = 1:
+		'<center><a href="exec:dynamic $cheatmenu[''succubreset'']"><b>Remove & Reset Succubus status</b></a></center>'
+		'<center><font color="red"><b>WARNING!</b></font>: Removing succubus status will not restart your menstrual cycle, it will remain permanently disabled!</center>'
+		*nl
+	end
+
+	!Make sure spell list is initialized
+	if spellMana['fog'] = 0:gs 'spellList'
+
+	dynamic $cheatmenu['magicTable'], 'Combat Spells', '$combatSpells'
+	dynamic $cheatmenu['magicTable'], 'Non-Combat Spells', '$nonComSpells'
+
+	! Add in Teleport Location toggles.
+	! make the header for the table
+	$SpellListStr = "<center>
+		<table width='90%' cellspacing='0' cellpadding='5' valign='top' border='1'>
+			<tr><th colspan='2'><b>Known Tree Circle Locations</b></th></tr>
+			<tr><td><a href=""EXEC: spellKnown['teleport']=<<iif(spellKnown['teleport']=1,'0','1')>> & dynamic $cheatmenu['magic']""><<iif(spellKnown['teleport']=1,'[Unlearn]','[Learn]')>></a></td><td>Teleport Spell</td></tr>"
+	i = 0
+	:CheatDinTP1
+	$ThisLocation = $tpLocations[i]
+	if i < arrsize('$tpLocations'):
+		if tpKnown[$ThisLocation] = 1:
+			$spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 0 & dynamic $cheatmenu['magic']"">[Unlearn]</a>"
+		else
+			$spellFlipper = "<a href=""EXEC: tpKnown['<<$ThisLocation>>'] = 1 & dynamic $cheatmenu['magic']"">[Learn]</a>"
+		end
+		$SpellListStr = $SpellListStr + " <tr><td><<$spellFlipper>></td><td><<$treeCircName[$ThisLocation]>></td></tr>"
+		i += 1
+		jump 'CheatDinTP1'
+	end
+
+	$SpellListStr = $SpellListStr + "
+		</table>
+	</center>"
+
+	*pl func('cleanHTML',$SpellListStr)
+
+	killvar 'i'
+	killvar '$ThisLocation'
+	killvar '$spellFlipper'
+	killvar '$SpellListStr'
+
+}
+
+$cheatmenu['dynamic'] = {
+	$dynamicCommand = input("Enter command to execute.")
+	if $dynamicCommand = '':exit
+	dynamic $dynamicCommand
+}
+
+$cheatmenu['std_cure'] = {
+	venera = 0
+	GerpesOnce = 0
+	Gerpes = 0
+	SifacOnce = 0
+	Sifilis = 0
+	TriperOnce = 0
+	Triper = 0
+	TriperOral = 0
+	KandidozOnce = 0
+	Kandidoz = 0
+}
+
+$cheatmenu['auto_period'] = {
+	if cyccustom = 0:
+		cyccustom = 1
+	else
+		cyccustom = 0
+	end
+	dynamic $cheatmenu['setting']
+}
+
+$cheatmenu['force_preg'] = {
+	if mesec ! 0: mesec = 0
+	if FocH ! 0: FocH = 0
+	if EggRH ! 0: EggRH = 0
+	if Ovulate ! 0: Ovulate = 0
+	if UnfertEgg ! 0: UnfertEgg = 0
+	if LutH ! 0: LutH = 0
+	if RecovH ! 0: RecovH = 0
+	preg = 1
+	cycle = 5
+	!!Setting implantation date for the due date calculation
+	lastovulation = daystart - 5
+	PregChem = 150
+	$wombthfath = 'A sperm donor'
+	babyembryo += 1
+	if fertegg = 0:
+		Nextbaby = arrsize('$ChildFath')
+		Temppolkid = rand(0,1)
+		polkid[nextbaby] = Temppolkid
+		$kidname[nextbaby] = 'unborn'
+		kidage[nextbaby] = 0
+		daykid[nextbaby] = 0
+		monthkid[nextbaby] = 0
+		yearkid[nextbaby] = 0
+		Babyptype[nextbaby] = 0
+		$ChildFath[nextbaby] = 'A sperm donor'
+		$ChildThFath[nextbaby] = 'A sperm donor'
+		hairkid[nextbaby] = rand(0, 3)
+		eyeskid[nextbaby] = rand(0, 3)
+		ChildConType[nextbaby] = 0
+		Babyptype[nextbaby] = 1
+	else
+		fertegg -= 1
+	end
+}
+
+$cheatmenu['remove_preg'] = {
+	gs 'medical_din', 'remove_preg'
+	knowpregloss = 2
+	
+	if FertEgg > 0: FertEgg = 0
+}
+
+$cheatmenu['cycle'] = {
+	*clr
+	if cycle ! 5:
+		EggRH = 0
+		LutH = 0
+		Ovulate = 0
+		UnfertEgg = 0
+		FertEgg = 0
+		RecovH = 0
+		mesec = 0
+		'<a href="exec:daylastperiod = daystart & Cycle = 0 & mesec = 96 & gs ''stat'' & dynamic $cheatmenu[''state'']">Menstration</a>'
+		'<a href="exec:Cycle = 1 & gs ''stat'' & dynamic $cheatmenu[''state'']">Follicular</a>'
+		'<a href="exec:Cycle = 2 & Ovulate = 24+rand(0,20) & EggRH = 160 + 160+rand(0, 5) & gs ''stat'' & dynamic $cheatmenu[''state'']">Ovulation</a>'
+		'<a href="exec:Cycle = 3 & gs ''stat'' & dynamic $cheatmenu[''state'']">Luteal</a>'
+	end
+}
+
+$cheatmenu['setting'] = {
+	*clr & cla
+	gs 'obj_din', 'settingtabs'
+	'<center><h1>Gameplay Settings</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td cellspacing="0" cellpadding="20" valign="top">'
+
+	if Enable_nogameover = 1:
+		'Prevent Non-Drama GAMEOVER: Currently ON - <a href="exec:Enable_nogameover = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	else
+		'Prevent Non-Drama GAMEOVER: Currently OFF - <a href="exec:Enable_nogameover = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	end
+	if music_on = 0:
+		'Music: Currently OFF - <a href="exec:music_on = 1 & music_loop = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	else
+		'Music: Currently ON - <a href="exec:music_on = 0 & music_loop = 0 & close all & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	end
+	*nl
+
+	if disable_autosave = 1:
+		'AutoSave: Currently OFF - <a href="exec:disable_autosave = 0 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	else
+		'AutoSave: Currently ON - <a href="exec:disable_autosave = 1 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	end
+	if autohairbrush = 1:
+		'Auto brush hair on mirror visit: Currently ON - <a href="exec:autohairbrush = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	else
+		'Auto brush hair on mirror visit: Currently OFF - <a href="exec:autohairbrush = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	end
+	if enfullmorrout = 1:
+		'Full morning routine enabled: Currently ON - <a href="exec:enfullmorrout = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	else
+		'Full morning routine enabled: Currently OFF - <a href="exec:enfullmorrout = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	end
+	*nl
+	if cyccustom = 1:
+		'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn OFF</a>'
+	else
+		'Automatic period tracking: <a href="exec:dynamic $cheatmenu[''auto_period'']">Turn ON</a>'
+	end
+	if cheatKlisma = 1:
+		'Enema realism: Currently ON - <a href="exec:cheatKlisma = 1 & dynamic $cheatmenu[''enema'']">Turn OFF</a>'
+	else
+		'Enema realism: Currently OFF - <a href="exec:cheatKlisma = 0 & dynamic $cheatmenu[''enema'']">Turn ON</a>'
+	end
+	if editpornname = 1:
+		'Editing of the names of the porn movies you stared enabled: Currently ON - <a href="exec:editpornname = 0 & dynamic $cheatmenu[''setting'']">Turn OFF</a>'
+	else
+		'Renaming porn movies you star in: Currently OFF - <a href="exec:editpornname = 1 & dynamic $cheatmenu[''setting'']">Turn ON</a>'
+	end
+	*nl
+	'<B>Difficulty Setting</B>'
+	'At the moment it only improves rate of skill gain'
+
+	'Difficulty: Currently at <<func(''_difficulty'',''getdifficulty'')>>'
+	'<ul><li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''easy peasy'') & dynamic $cheatmenu[''setting'']">easy peasy</a></li>'
+	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''relaxed'') & dynamic $cheatmenu[''setting'']">relaxed</a></li>'
+	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''realistic'') & dynamic $cheatmenu[''setting'']">realistic</a></li>'
+	'<li>set to <a href="exec:FUNC(''_difficulty'',''setdifficulty'',''hardcore'') & dynamic $cheatmenu[''setting'']">hardcore</a></li></ul>'
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['display'] = {
+	*clr & cla
+	gs 'obj_din', 'settingtabs'
+	'<center><h1>Display Setting</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td cellspacing="0" cellpadding="20" valign="top">'
+	if usePopUps = 1:
+		'Allow Popup Pictures: Currently ON - <a href="exec:usePopUps = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+	else
+		'Allow Popup Pictures: Currently OFF - <a href="exec:usePopUps = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	if set_imgh > 0: set_imgw = 0
+	if set_imgw > 0: set_imgh = 0
+	if set_imgh <= 0 and set_imgw <= 0: $set_imgh = ''
+	if set_imgh > 0:
+		'Force Image Height: <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']"><<set_imgh>></a>: Currently ON - <a href="exec:set_imgh = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+		$set_imgh = 'Height = <<set_imgh>>'
+	else
+		'Force Image Height: Currently OFF - <a href="exec:set_imgw = 0 & set_imgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	if set_imgw > 0:
+		'Force Image Width: <a href="exec:set_imgh = 0 & set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']"><<set_imgw>></a>, Currently ON - <a href="exec:set_imgw=0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+		$set_imgh = 'Width = <<set_imgw>>'
+	else
+		'Force Image Width: Currently OFF - <a href="exec:set_imgh = 0 &set_imgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	*nl
+	!night_mode 0: dynamic
+	!night_mode 1: black
+	!night_mode 2: grey
+	!night_mode 99: no theme
+	if night_mode = 0:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
+	if night_mode = 1:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | Pitch Black | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
+	if night_mode = 2:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | Modern Grey | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
+	if night_mode = 3:'Girl Life Theme Selection: Dynamic | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | White | <a href="exec:night_mode = 99 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">No Theme</a>'
+	if night_mode = 99:'Girl Life Theme Selection: <a href="exec:night_mode = 0 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Dynamic</a> | <a href="exec:night_mode = 1 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Pitch Black</a> | <a href="exec:night_mode = 2 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">Modern Grey</a> | <a href="exec:night_mode = 3 & dynamic $cheatmenu[''display''] & gs ''$menu_obnovit''">White</a> | No Theme'
+
+	'<font color="grey">Dynamic theme (default) will change colour based on the game hour. No theme will remove table backgrounds.</font>'
+	*nl
+	if Enable_tablemap = 1:
+		'List friends in table: Currently ON - <a href="exec:Enable_tablemap = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+	else
+		'List friends in table: Currently OFF - <a href="exec:Enable_tablemap = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	*nl
+	if Enable_faceturn = 1:
+		'Always show face: Currently ON - <a href="exec:Enable_faceturn = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+	else
+		'Always show face: Currently OFF - <a href="exec:Enable_faceturn = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	*nl
+	if Enable_Android = 1:
+		'Set Fontsize for Status: Unsupported'
+		'Android Mode:Currently ON - <a href="exec:Enable_Android = 0 & dynamic $cheatmenu[''display'']">Turn OFF</a>'
+		! 'click <a href="exec:*clr & cla & FUNC (''$menu_obnovit'')">refresh</a> to refresh status window.'
+		'click <B>refresh</B> on top of status window to renew.'
+	else
+		'Android Mode: Currently OFF - <a href="exec:Enable_Android = 1 & dynamic $cheatmenu[''display'']">Turn ON</a>'
+	end
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['status'] = {
+	*clr & cla
+	gs 'obj_din', 'settingtabs'
+	gs 'stat'
+	'<center><h1>Status Window Settings</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td cellspacing="0" cellpadding="20" valign="top">'
+	if disable_LoadSave = 0:
+		'Save/Load Buttons: Currently Image - <a href="exec:disable_LoadSave = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
+	elseif disable_LoadSave = 1:
+		'Save/Load Buttons: Currently OFF - <a href="exec:disable_LoadSave = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Image</a>'
+	elseif disable_LoadSave = 2:
+		'Save/Load Buttons: Currently Text - <a href="exec:disable_LoadSave = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	end
+	*nl
+	!disabled inner thought font selection during char creation, as it breaks menu.
+	if settingmode = 0:
+		'<a href="exec:gs ''shortgs'',''fonts'', ''$cheatmenu[''''display'''']'',''$OpenInnerThought'',''$CloseInnerThought'' ">Set</a> the font style of inner thoughts'
+		$OpenInnerThought+'Oh my god, what will the neighbours think of us?'+$CloseInnerThought
+	end
+	*nl
+	'Switch to the <a href="exec:TempUnit = '+iif(TempUnit = 0,'1 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Fahrenheit','0 & gs ''outdoors'',''weather'' & dynamic $cheatmenu[''status'']">Celsius')+'</a> scale'
+	*nl
+	'Scale Weather Banner: <a href="exec:default_wbanner = 1 & set_weatherht=input(''Weather Banner Height (Default: 72 Min: 50 Max: 100)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_weatherht>></a>, Reset to default <a href="exec:default_wbanner = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(72)</a>'
+		if set_weatherht < 50:
+			set_weatherht = 50
+		elseif set_weatherht > 100:
+			set_weatherht = 100
+		end
+	'Scale Menu Icons: <a href="exec:default_menu_icons = 1 & set_miconht=input(''Weather Banner Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_miconht>></a>, Reset to default <a href="exec:default_menu_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
+		if set_miconht < 10:
+			set_miconht = 10
+		elseif set_miconht > 75:
+			set_miconht = 75
+		end
+	if cheatStatusIcons = 0:
+		'Status icons: Click to <a href="exec:cheatStatusIcons = 1 & disable_show_icons = 1 & gs ''stat'' & dynamic $cheatmenu[''status'']">hide</a> them.'
+		'Status Icon Height: <a href="exec:default_status_icons = 1 & set_siconht=input(''Input Status Icon Height (Default: 54 Min: 10 Max: 75)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_siconht>></a>, Reset to default <a href="exec:default_status_icons = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">(54)</a>'
+	elseif cheatStatusIcons = 1:
+		'Status icons: Click to <a href="exec: cheatStatusIcons = 0 & disable_show_icons = 0 & gs ''stat'' & dynamic $cheatmenu[''status'']">show</a> them.'
+	end
+		if set_siconht < 10:
+			set_siconht = 10
+		elseif set_siconht > 75:
+			set_siconht = 75
+		end
+	if ETOmenu = 1:
+		'Status Display mode: Currently Text - <a href="exec:ETOmenu = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Scale Bar</a>'
+	else
+		'Status Display mode: Currently Scale Bar - <a href="exec:ETOmenu = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Select Text</a>'
+	end
+
+	if Enable_scalepic = 1:
+		'Scalebar is now as <b>Image</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
+		if Enable_scalewidth > 0:
+			'Scalebar Width: <a href="exec:input(''Input Scalebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scalewidth-1>></a>, Set is currently <a href="exec:Enable_scalewidth = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
+		else
+			'Scalebar Width: Lock is currently <a href="exec:Enable_scalewidth=1+input(''InputS calebar Width (default to 120)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
+		end
+		if Enable_scaleheight > 0:
+			'Scalebar Height: <a href="exec:input(''Input Scalebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_scaleheight-1>></a>, Set is currently <a href="exec:Enable_scaleheight = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">ON</a>'
+		else
+			'Scalebar Height: Lock is currently <a href="exec:Enable_scaleheight=1+input(''InputS calebar Height (default to 15)'') & dynamic $cheatmenu[''status''] & gs ''stat''">OFF</a>'
+		end
+	elseif Enable_scalepic = 0:
+		'Scalebar is now as <b>Character</b>, you can switch to <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 2 & dynamic $cheatmenu[''status''] & gs ''stat''">Table</a>'
+		if cheatStatusBars = 1:
+			'Set status bar size: Currently Small - <a href="exec:cheatStatusBars = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Set large</a>'
+		else
+			'Set status bar size: Currently Large - <a href="exec:cheatStatusBars = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Set small</a>'
+		end
+	elseif Enable_scalepic = 2:
+		'Scalebar is now as <b>Table</b>, you can switch to <a href="exec:Enable_scalepic = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Image</a> or <a href="exec:Enable_scalepic = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Character</a>'
+	end
+	if Enable_statfsize<0:Enable_statfsize=0
+	if Enable_statfsize > 0:
+		'Set Fontsize for Status: Currently ON - <a href="exec:Enable_statfsize=input(''Enter Fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<Enable_statfsize>></a>, <a href="exec:Enable_statfsize=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	else
+		'Set Fontsize for Status: Currently OFF - <a href="exec:Enable_statfsize=input(''Enter fontsize'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+	end
+	*nl
+	'<center><B>Status Window toolbar</B></center>'
+	if Enable_showattr = 1:
+		'Show More attribute: Currently ON - <a href="exec:Enable_showattr = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	else
+		'Show More attribute: Currently OFF - <a href="exec:Enable_showattr = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+	end
+	if Enable_showskill = 1:
+		'Show skill: Currently ON - <a href="exec:Enable_showskill = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	else
+		'Show skill: Currently OFF - <a href="exec:Enable_showskill = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+	end
+	if Enable_showrelation = 1:
+		'Show relations: Currently ON - <a href="exec:Enable_showrelation = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	else
+		'Show relations: Currently OFF - <a href="exec:Enable_showrelation = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+	end
+	if Enable_showstatimg = 1:
+		'Show image toolbar: Currently ON - <a href="exec:Enable_showstatimg = 0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+	else
+		'Show image toolbar: Currently OFF - <a href="exec:Enable_showstatimg = 1 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+	end
+	*nl
+	if Enable_showstatimg = 1:
+		!control image toolbar position
+		'<center><B>Image Toolbar Settings</B></center>'
+		$stat_temp_text = '<br>Image toolbar position: <B>'
+		if Enable_statimg_loc = 0:
+			$stat_temp_text += 'Middle'
+		elseif Enable_statimg_loc = 1:
+			$stat_temp_text += 'Top'
+		elseif Enable_statimg_loc = 2:
+			$stat_temp_text += 'Bottom'
+		else
+			$stat_temp_text += 'ERROR! please reset it'
+		end
+		$stat_temp_text += '</B>. You can move it to '
+		if Enable_statimg_loc ! 0:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Middle</a>'
+		if Enable_statimg_loc ! 1:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=1 & dynamic $cheatmenu[''status''] & gs ''stat''">Top</a>'
+		if Enable_statimg_loc ! 2:$stat_temp_text += ' <a href="exec:Enable_statimg_loc=2 & dynamic $cheatmenu[''status''] & gs ''stat''">Bottom</a>'
+
+
+		$stat_temp_text
+		killvar 'stat_temp_text'
+		!End control image toolbar position
+		if set_statimgh > 0: set_statimgw = 0
+		if set_statimgw > 0: set_statimgh = 0
+		if set_statimgh <= 0 and set_statimgw <= 0: $set_statimgh = ''
+		if set_statimgh > 0:
+			'Force Image toobar height: <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgh>></a>: Currently ON - <a href="exec:set_statimgh=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+			$set_statimgh = 'height = <<set_statimgh>>'
+		else
+			'Force Image toobar height: Currently OFF - <a href="exec:set_statimgw=0 & set_statimgh=input(''Enter the height of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+		end
+		if set_statimgw > 0:
+			'Force Image toobar width: <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''"><<set_statimgw>></a>: Currently ON - <a href="exec:set_statimgw=0 & dynamic $cheatmenu[''status''] & gs ''stat''">Turn OFF</a>'
+			$set_statimgh = 'width = <<set_statimgw>>'
+		else
+			'Force Image toobar width: Currently OFF - <a href="exec:set_statimgh=0 & set_statimgw=input(''Enter the width of the images'') & dynamic $cheatmenu[''status''] & gs ''stat''">Turn ON</a>'
+		end
+	end
+
+	!<a href="exec:gs ''Cheatmenu_din'' & dynamic $cheatmenu[''status''] & gs ''stat''"><img src="images/system/phone/theme/<<$phonetheme_name[pcs_phonetheme]>>/icon_settings.png"></a>
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['theme'] = {
+	*clr & cla
+	gs 'obj_din', 'settingtabs'
+	'<center><h1>Phone Theme Menu</h1></center>'
+	'<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
+	*nl
+	if pcs_phonetheme = 0: $phoneNameTemp = 'Standard'
+	if pcs_phonetheme = 1: $phoneNameTemp = 'Bimbo'
+	if pcs_phonetheme = 2: $phoneNameTemp = 'Aluminus'
+	if pcs_phonetheme = 3: $phoneNameTemp = 'Bottlecapped'
+	if pcs_phonetheme = 4: $phoneNameTemp = 'Galactic'
+	if pcs_phonetheme = 5: $phoneNameTemp = 'Vectored'
+	if pcs_phonetheme = 6: $phoneNameTemp = 'Veneer'
+	if pcs_phonetheme = 7: $phoneNameTemp = 'Voidwalker'
+	if pcs_phonetheme = 8: $phoneNameTemp = 'Voidwalker Red'
+	if pcs_phonetheme = 9: $phoneNameTemp = 'Voidwalker Toxic'
+	if pcs_phonetheme = 10: $phoneNameTemp = 'Gopnik'
+	if pcs_phonetheme = 11: $phoneNameTemp = 'Sports'
+	if pcs_phonetheme = 12: $phoneNameTemp = 'Succubus'
+	if pcs_phonetheme = 13: $phoneNameTemp = 'Woodshop'
+	'Current theme: <b><<$phoneNameTemp>></b>'
+	*nl
+	'Choose from the available themes'
+	*nl
+	i = 0
+	:phonethemeloop
+	if phonetheme[i] = 1:'<td align="center" valign="top"><a href="exec: pcs_phonetheme = <<i>> & gs ''telefon'',''Phone_menu'' & dynamic $cheatmenu[''theme'']"><img height="100" width="100" src="images/system/phone/theme/' + $phonetheme_name[i] + '/icon_call.png"></a></td>'
+	i += 1
+	if i <= ARRSIZE('phonetheme') and i <= 3:
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i = 4:
+		'</tr><tr>'
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i > 4 and i <= 7:
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i = 8:
+		'</tr><tr>'
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i > 8 and i <= 11:
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i = 12:
+		'</tr><tr>'
+		jump 'phonethemeloop'
+	elseif i <= ARRSIZE('phonetheme') and i > 12 and i <= 15:
+		jump 'phonethemeloop'
+	end
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['pain'] = {
+	if pain['head'] < 0:pain['head'] = 0
+	if pain['hair'] < 0:pain['hair'] = 0
+	if pain['ears'] < 0:pain['ears'] = 0
+	if pain['eyebrows'] < 0:pain['eyebrows'] = 0
+	if pain['eyes'] < 0:pain['eyes'] = 0
+	if pain['cheeks'] < 0:pain['cheeks'] = 0
+	if pain['nose'] < 0:pain['nose'] = 0
+	if pain['mouth'] < 0:pain['mouth'] = 0
+	if pain['lips'] < 0:pain['lips'] = 0
+	if pain['tongue'] < 0:pain['tongue'] = 0
+	if pain['throat'] < 0:pain['throat'] = 0
+	if pain['neck'] < 0:pain['neck'] = 0
+	if pain['back'] < 0:pain['back'] = 0
+	if pain['asscheeks'] < 0:pain['asscheeks'] = 0
+	if pain['asshole'] < 0:pain['asshole'] = 0
+	if pain['hips'] < 0:pain['hips'] = 0
+	if pain['thighs'] < 0:pain['thighs'] = 0
+	if pain['legL'] < 0:pain['legL'] = 0
+	if pain['legR'] < 0:pain['legR'] = 0
+	if pain['feet'] < 0:pain['feet'] = 0
+	if pain['toes'] < 0:pain['toes'] = 0
+	if pain['shoulders'] < 0:pain['shoulders'] = 0
+	if pain['armL'] < 0:pain['armL'] = 0
+	if pain['armR'] < 0:pain['armR'] = 0
+	if pain['hands'] < 0:pain['hands'] = 0
+	if pain['fingers'] < 0:pain['fingers'] = 0
+	if pain['chest'] < 0:pain['chest'] = 0
+	if pain['breasts'] < 0:pain['breasts'] = 0
+	if pain['nipples'] < 0:pain['nipples'] = 0
+	if pain['ribs'] < 0:pain['ribs'] = 0
+	if pain['tummy'] < 0:pain['tummy'] = 0
+	if pain['pubic'] < 0:pain['pubic'] = 0
+	if pain['vaginal'] < 0:pain['vaginal'] = 0
+	if pain['clitoris'] < 0:pain['clitoris'] = 0
+	if pain['urethra'] < 0:pain['urethra'] = 0
+	if pain['cervix'] < 0:pain['cervix'] = 0
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Pain Management</h1></center>'
+	'<center><a href="exec:killvar ''pain'' & dynamic $cheatmenu[''pain'']">No pain</a></center>'
+	*nl
+	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
+	'<tr><td width="50%" cellpadding="10" valign="top">'
+	'pain[head] = <<pain[''head'']>> <a href="exec:pain[''head''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''head''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[hair] = <<pain[''hair'']>> <a href="exec:pain[''hair''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hair''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[ears] = <<pain[''ears'']>> <a href="exec:pain[''ears''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ears''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[eyebrows] = <<pain[''ears'']>> <a href="exec:pain[''eyebrows''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyebrows''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[eyes] = <<pain[''eyes'']>> <a href="exec:pain[''eyes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''eyes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[cheeks] = <<pain[''cheeks'']>> <a href="exec:pain[''cheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[nose] = <<pain[''nose'']>> <a href="exec:pain[''nose''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nose''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[mouth] = <<pain[''mouth'']>> <a href="exec:pain[''mouth''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''mouth''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[lips] = <<pain[''lips'']>> <a href="exec:pain[''lips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''lips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[tongue] = <<pain[''tongue'']>> <a href="exec:pain[''tongue''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tongue''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[throat] = <<pain[''throat'']>> <a href="exec:pain[''throat''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''throat''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[neck] = <<pain[''neck'']>> <a href="exec:pain[''neck''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''neck''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[back] = <<pain[''back'']>> <a href="exec:pain[''back''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''back''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[asscheeks] = <<pain[''asscheeks'']>> <a href="exec:pain[''asscheeks''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asscheeks''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[asshole] = <<pain[''asshole'']>> <a href="exec:pain[''asshole''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''asshole''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[hips] = <<pain[''hips'']>> <a href="exec:pain[''hips''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hips''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[thighs] = <<pain[''thighs'']>> <a href="exec:pain[''thighs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''thighs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[left leg] = <<pain[''legL'']>> <a href="exec:pain[''legL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[right leg] = <<pain[''legR'']>> <a href="exec:pain[''legR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''legR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'</td><td width="50%" cellpadding="10" valign="top">'
+	'pain[feet] = <<pain[''feet'']>> <a href="exec:pain[''feet''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''feet''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[toes] = <<pain[''toes'']>> <a href="exec:pain[''toes''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''toes''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[shoulders] = <<pain[''shoulders'']>> <a href="exec:pain[''shoulders''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''shoulders''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[left arm] = <<pain[''armL'']>> <a href="exec:pain[''armL''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armL''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[right arm] = <<pain[''armR'']>> <a href="exec:pain[''armR''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''armR''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[hands] = <<pain[''hands'']>> <a href="exec:pain[''hands''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''hands''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[fingers] = <<pain[''fingers'']>> <a href="exec:pain[''fingers''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''fingers''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[chest] = <<pain[''chest'']>> <a href="exec:pain[''chest''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''chest''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[breasts] = <<pain[''breasts'']>> <a href="exec:pain[''breasts''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''breasts''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[nipples] = <<pain[''nipples'']>> <a href="exec:pain[''nipples''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''nipples''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[ribs] = <<pain[''ribs'']>> <a href="exec:pain[''ribs''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''ribs''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[tummy] = <<pain[''tummy'']>> <a href="exec:pain[''tummy''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''tummy''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[pubic] = <<pain[''pubic'']>> <a href="exec:pain[''pubic''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''pubic''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[vaginal] = <<pain[''vaginal'']>> <a href="exec:pain[''vaginal''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''vaginal''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[labia] = <<pain[''labia'']>> <a href="exec:pain[''labia''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''labia''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[clitoris] = <<pain[''clitoris'']>> <a href="exec:pain[''clitoris''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''clitoris''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[urethra] = <<pain[''urethra'']>> <a href="exec:pain[''urethra''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''urethra''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'pain[cervix] = <<pain[''cervix'']>> <a href="exec:pain[''cervix''] -= 10 & dynamic $cheatmenu[''pain'']">-10</a> <a href="exec:pain[''cervix''] += 10 & dynamic $cheatmenu[''pain'']">+10</a>'
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['DNA'] = {
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - DNA Generation</h1></center>'
+	'<center><table width="90%" cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td cellspacing="0" cellpadding="20" valign="top">'
+	'<center>DNA string generation<br>If parents are not in game, leave the respective IDs empty</center>'
+	*nl
+	if $cheatDNAC ! '':
+		'<b>Child: <<$npc_firstname[''<<$cheatDNAC>>'']>> <<$npc_lastname[''<<$cheatDNAC>>'']>></b> (<<$cheatDNAC>>)<br><<$npc_dna[$cheatDNAC]>><br><a href="exec:killvar ''cheatDNAC'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
+		npctemp = 0
+		killvar 'cheatDNAM'
+		killvar 'cheatDNAF'
+		:npcparentfind
+			if $npc_dna['A<<npctemp>>'] ! '':
+				if mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
+					$cheatDNAM = 'A<<npctemp>>'
+				elseif mid($npc_dna['A<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
+					$cheatDNAF = 'A<<npctemp>>'
+				end
+			end
+			if $npc_dna['B<<npctemp>>'] ! '':
+				if mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
+					$cheatDNAM = 'B<<npctemp>>'
+				elseif mid($npc_dna['B<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
+					$cheatDNAF = 'B<<npctemp>>'
+				end
+			end
+			if $npc_dna['C<<npctemp>>'] ! '':
+				if mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],12,10):
+					$cheatDNAM = 'C<<npctemp>>'
+				elseif mid($npc_dna['C<<npctemp>>'],1,10) = mid($npc_dna[$cheatDNAC],23,10):
+					$cheatDNAF = 'C<<npctemp>>'
+				end
+			end
+		if ($npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '') and ($cheatDNAM = '' or $cheatDNAF = ''):npctemp += 1 & jump 'npcparentfind'
+		killvar 'npctemp'
+	else
+		'<a href="exec:killvar ''tempDNAC'' & dynamic $cheatmenu[''DNAC'']"><b>ID of child (if it is known)</b></a>'
+	end
+
+	if $cheatDNAM ! '':
+		'<br><b>Mother: <<$npc_firstname[''<<$cheatDNAM>>'']>> <<$npc_lastname[''<<$cheatDNAM>>'']>></b> (<<$cheatDNAM>>)<br><<$npc_dna[$cheatDNAM]>><br><a href="exec:killvar ''cheatDNAM'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
+	else
+		'<br><a href="exec:killvar ''tempDNAM'' & dynamic $cheatmenu[''DNAM'']"><b>ID of mother (if it is known)</b></a>'
+	end
+
+	if $cheatDNAF ! '':
+		'<br><b>Father: <<$npc_firstname[''<<$cheatDNAF>>'']>> <<$npc_lastname[''<<$cheatDNAF>>'']>></b> (<<$cheatDNAF>>)<br><<$npc_dna[$cheatDNAF]>><br><a href="exec:killvar ''cheatDNAF'' & dynamic $cheatmenu[''DNA'']">Remove</a>'
+	else
+		'<br><a href="exec:killvar ''tempDNAF'' & dynamic $cheatmenu[''DNAF'']"><b>ID of father (if it is known)</b></a>'
+	end
+	*nl
+	if $cheatDNAM ! '' and $cheatDNAF ! '':
+		$cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$npc_dna[$cheatDNAF])
+	elseif $cheatDNAM ! '':
+		if $cheatDNAC ! '':
+			$tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
+		else
+			$tempDNAF = func('DNA','create')
+			$cheatDNAgenerated = func('DNA','generate',$npc_dna[$cheatDNAM],$tempDNAF)
+		end
+	elseif $cheatDNAF ! '':
+		if $cheatDNAC ! '':
+			$tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
+		else
+			$tempDNAM = func('DNA','create')
+			$cheatDNAgenerated = func('DNA','generate',$tempDNAM,$npc_dna[$cheatDNAF])
+		end
+	else
+		if $cheatDNAC = '':
+			$tempDNAM = func('DNA','create')
+			$tempDNAF = func('DNA','create')
+			$cheatDNAgenerated = func('DNA','generate',$tempDNAM,$tempDNAF)
+		else
+			$tempDNAM = func('DNA','generateM',$npc_dna[$cheatDNAC])
+			$tempDNAF = func('DNA','generateF',$npc_dna[$cheatDNAC])
+		end
+
+
+	end
+	if $cheatDNAM = '': '<br><b>Random mother DNA:</b> <<$tempDNAM>>'
+	if $cheatDNAF = '': '<br><b>Random father DNA:</b> <<$tempDNAF>>'
+	if $cheatDNAC = '': '<br><b>Random child DNA:</b> <<$cheatDNAgenerated>>'
+	'<br><a href="exec:dynamic $cheatmenu[''DNA'']">Generate again</a>'
+	if $cheatDNAC ! '':
+		npctemp = 0
+		:npcgparfind
+			if $npc_dna['A<<npctemp>>'] ! '':
+				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['A<<npctemp>>'],1,10):
+					'<br><b>Grandmother: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
+					'<br><b>Grandfather: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['B<<npctemp>>'] ! '':
+				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['B<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['B<<npctemp>>'],1,10):
+					'<br><b>Grandmother: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['A<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['B<<npctemp>>'],1,10):
+					'<br><b>Grandfather: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['C<<npctemp>>'] ! '':
+				if mid($npc_dna[$cheatDNAC],34,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],56,10) = mid($npc_dna['C<<npctemp>>'],1,10):
+					'<br><b>Grandmother: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				elseif mid($npc_dna[$cheatDNAC],45,10) = mid($npc_dna['C<<npctemp>>'],1,10) or mid($npc_dna[$cheatDNAC],67,10) = mid($npc_dna['A<<npctemp>>'],1,10):
+					'<br><b>Grandfather: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				end
+			end
+		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgparfind'
+	end
+	if $cheatDNAM ! '' or $cheatDNAF ! '':
+		npctemp = 0
+		:npcchildfind
+			if $npc_dna['A<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				elseif mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['B<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				elseif mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['C<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				elseif mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10):
+					'<br><b>Existing child: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				end
+			end
+		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcchildfind'
+		npctemp = 0
+		:npcgchildfind
+			if $npc_dna['A<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				elseif ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['A<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['A<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['A<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['A<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['A<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['A<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''A<<npctemp>>'']>> <<$npc_lastname[''A<<npctemp>>'']>></b> (A<<npctemp>>)<br><<$npc_dna[''A<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['B<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				elseif ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['B<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['B<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['B<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['B<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['B<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['B<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''B<<npctemp>>'']>> <<$npc_lastname[''B<<npctemp>>'']>></b> (B<<npctemp>>)<br><<$npc_dna[''B<<npctemp>>'']>>'
+				end
+			end
+			if $npc_dna['C<<npctemp>>'] ! '':
+				if $cheatDNAM ! '' and $cheatDNAF = '' and (mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				elseif $cheatDNAM = '' and $cheatDNAF ! '' and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				elseif ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or (mid($npc_dna['C<<npctemp>>'],12,10) = mid($npc_dna[$cheatDNAM],1,10) and (mid($npc_dna['C<<npctemp>>'],45,10) = mid($npc_dna[$cheatDNAF],1,10) or mid($npc_dna['C<<npctemp>>'],67,10) = mid($npc_dna[$cheatDNAF],1,10))) or ((mid($npc_dna['C<<npctemp>>'],34,10) = mid($npc_dna[$cheatDNAM],1,10) or mid($npc_dna['C<<npctemp>>'],56,10) = mid($npc_dna[$cheatDNAM],1,10)) and mid($npc_dna['C<<npctemp>>'],23,10) = mid($npc_dna[$cheatDNAF],1,10)):
+					'<br><b>Existing grandchild: <<$npc_firstname[''C<<npctemp>>'']>> <<$npc_lastname[''C<<npctemp>>'']>></b> (C<<npctemp>>)<br><<$npc_dna[''C<<npctemp>>'']>>'
+				end
+			end
+		if $npc_dna['A<<npctemp>>'] ! '' or $npc_dna['B<<npctemp>>'] ! '' or $npc_dna['C<<npctemp>>'] ! '':npctemp += 1 & jump 'npcgchildfind'
+		killvar 'npctemp'
+	end
+	killvar '$tempDNAF'
+	killvar '$tempDNAM'
+	killvar '$tempDNAC'
+	killvar 'cheatDNAgenerated'
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['DNAM'] = {
+	$cheatDNAM = input("Enter genetic mother ID (like A33, without apostrophe)")
+	if $cheatDNAM = '':exit
+	dynamic $cheatDNAM
+	dynamic $cheatmenu['DNA']
+}
+
+$cheatmenu['DNAF'] = {
+	$cheatDNAF = input("Enter genetic father ID (like A34, without apostrophe)")
+	if $cheatDNAF = '':exit
+	dynamic $cheatDNAF
+	dynamic $cheatmenu['DNA']
+}
+
+$cheatmenu['DNAC'] = {
+	$cheatDNAC = input("Enter genetic Child ID (like A34, without apostrophe)")
+	if $cheatDNAC = '':exit
+	dynamic $cheatDNAC
+	dynamic $cheatmenu['DNA']
+}
+
+$cheatmenu['fame'] = {
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Display Setting</h1></center>'
+	$table['fame'] = '<center><table width="90%" cellspacing="0" cellpadding="5" valign="top" border="1">'
+	$table['fame'] += '<th colspan="5"><b>Fame</b></th><tr>'
+	$table['fame'] += '<th></th><th>Pavlovsk</th><th>City</th><th>Pushkin</th><th>Gadukino</th><tr>'
+
+	$table['fame'] += '<td>Actor</td>'
+	$table['fame'] += '<td> <<fame[''pav_acting'']>>   <a href="exec:gs ''fame'', ''pav'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_acting'']>>   <a href="exec:gs ''fame'', ''city'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_acting'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_acting'']>>   <a href="exec:gs ''fame'', ''village'', ''acting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''acting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Dancer</td>'
+	$table['fame'] += '<td> <<fame[''pav_dance'']>>   <a href="exec:gs ''fame'', ''pav'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_dance'']>>   <a href="exec:gs ''fame'', ''city'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_dance'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_dance'']>>   <a href="exec:gs ''fame'', ''village'', ''dance'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''dance'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Glamour model</td>'
+	$table['fame'] += '<td> <<fame[''pav_modelling'']>>   <a href="exec:gs ''fame'', ''pav'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_modelling'']>>   <a href="exec:gs ''fame'', ''city'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_modelling'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_modelling'']>>   <a href="exec:gs ''fame'', ''village'', ''modelling'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''modelling'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Painter</td>'
+	$table['fame'] += '<td> <<fame[''pav_painting'']>>   <a href="exec:gs ''fame'', ''pav'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_painting'']>>   <a href="exec:gs ''fame'', ''city'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_painting'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_painting'']>>   <a href="exec:gs ''fame'', ''village'', ''painting'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''painting'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Musician</td>'
+	$table['fame'] += '<td> <<fame[''pav_music'']>>   <a href="exec:gs ''fame'', ''pav'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_music'']>>   <a href="exec:gs ''fame'', ''city'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_music'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_music'']>>   <a href="exec:gs ''fame'', ''village'', ''music'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''music'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''music'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''music'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Ballet dancer</td>'
+	$table['fame'] += '<td> <<fame[''pav_ballet'']>>   <a href="exec:gs ''fame'', ''pav'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_ballet'']>>   <a href="exec:gs ''fame'', ''city'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_ballet'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_ballet'']>>   <a href="exec:gs ''fame'', ''village'', ''ballet'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''ballet'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Porn actor</td>'
+	$table['fame'] += '<td> <<fame[''pav_porn'']>>   <a href="exec:gs ''fame'', ''pav'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_porn'']>>   <a href="exec:gs ''fame'', ''city'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_porn'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_porn'']>>   <a href="exec:gs ''fame'', ''village'', ''porn'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''porn'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Stripper</td>'
+	$table['fame'] += '<td> <<fame[''pav_stripping'']>>   <a href="exec:gs ''fame'', ''pav'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_stripping'']>>   <a href="exec:gs ''fame'', ''city'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_stripping'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_stripping'']>>   <a href="exec:gs ''fame'', ''village'', ''stripping'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''stripping'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Sex</td>'
+	$table['fame'] += '<td> <<fame[''pav_sex'']>>   <a href="exec:gs ''fame'', ''pav'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_sex'']>>   <a href="exec:gs ''fame'', ''city'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_sex'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_sex'']>>   <a href="exec:gs ''fame'', ''village'', ''sex'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''sex'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Prostitution</td>'
+	$table['fame'] += '<td> <<fame[''pav_prostitute'']>>   <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_prostitute'']>>   <a href="exec:gs ''fame'', ''city'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_prostitute'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_prostitute'']>>   <a href="exec:gs ''fame'', ''village'', ''prostitute'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''prostitute'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Kickboxer</td>'
+	$table['fame'] += '<td> <<fame[''pav_kickboxing'']>>   <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_kickboxing'']>>   <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_kickboxing'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_kickboxing'']>>   <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''kickboxing'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Runner</td>'
+	$table['fame'] += '<td> <<fame[''pav_running'']>>   <a href="exec:gs ''fame'', ''pav'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_running'']>>   <a href="exec:gs ''fame'', ''city'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_running'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_running'']>>   <a href="exec:gs ''fame'', ''village'', ''running'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''running'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''running'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''running'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Volleyball player</td>'
+	$table['fame'] += '<td> <<fame[''pav_volleyball'']>>   <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_volleyball'']>>   <a href="exec:gs ''fame'', ''city'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''volleyball'', -100 & dynamic  $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_volleyball'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_volleyball'']>>   <a href="exec:gs ''fame'', ''village'', ''volleyball'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''volleyball'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Chess player</td>'
+	$table['fame'] += '<td> <<fame[''pav_chess'']>>   <a href="exec:gs ''fame'', ''pav'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_chess'']>>   <a href="exec:gs ''fame'', ''city'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_chess'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_chess'']>>   <a href="exec:gs ''fame'', ''village'', ''chess'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''chess'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Teacher</td>'
+	$table['fame'] += '<td> <<fame[''pav_teaching'']>>   <a href="exec:gs ''fame'', ''pav'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_teaching'']>>   <a href="exec:gs ''fame'', ''city'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_teaching'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_teaching'']>>   <a href="exec:gs ''fame'', ''village'', ''teaching'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''teaching'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<tr>'
+
+	$table['fame'] += '<td>Social media</td>'
+	$table['fame'] += '<td> <<fame[''pav_media'']>>   <a href="exec:gs ''fame'', ''pav'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pav'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''city_media'']>>   <a href="exec:gs ''fame'', ''city'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''city'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''city'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''city'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''pushkin_media'']>>   <a href="exec:gs ''fame'', ''pushkin'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''pushkin'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '<td><<fame[''village_media'']>>   <a href="exec:gs ''fame'', ''village'', ''media'', 10 & dynamic $cheatmenu[''fame'']">+10</a> <a href="exec:gs ''fame'', ''village'', ''media'', 100 & dynamic $cheatmenu[''fame'']">+100</a> <a href="exec:gs ''fame'', ''village'', ''media'', -10 & dynamic $cheatmenu[''fame'']">-10</a> <a href="exec:gs ''fame'', ''village'', ''media'', -100 & dynamic $cheatmenu[''fame'']">-100</a> </td>'
+	$table['fame'] += '</table></center>'
+	
+	$table['fame']
+
+}
+
+$cheatmenu['quicktime'] = {
+	minut += ARGS[0]
+	*clr
+	gs 'daystart'
+	gs 'outdoors', 'weather'
+	gs 'stat'
+	gs 'fertility', 'cum_arrcheat'
+}
+
+$cheatmenu = {
+	gs'stat'
+	currhour = (daystart-1) * 24 + hour
+	currday = daystart
+	temp_week = week & temp_day = day & $temp_month = $month & temp_month = month & temp_year = year & temp_hour = hour & temp_minut = minut
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Index</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	'<a href="exec:dynamic $cheatmenu[''dynamic'']">Dynamic Input Command</a>'
+	'<a href="exec:gs ''fertility'',''cum_arrcheat''">OOX Debug</a>'
+	'Right now <<$week[week]>> <<$month>> <<day>> <<year>> <<hour>>:<<minut>>'
+	'Jump forward <a href="exec:dynamic $cheatmenu[''quicktime''], 15 & dynamic $cheatmenu">+15</a> minutes'
+	*nl
+	*nl
+	'<a href="exec:gt''pav_residential''">Teleport to Pavlovsk</a>'
+	'<a href="exec:gt''liam''">Teleport to Pushkin</a>'
+	'<a href="exec:gt''city_residential''">Teleport to City</a>'
+	'<a href="exec:gt''gadukino''">Teleport to Gadukino</a>'
+	'<a href="exec:gt''dachi''">Teleport to Suburban Cooperative</a>'
+	*nl
+	'<font color="red"><b>WARNING!</b></font>: Teleporting while in an event may break your game. Use at your own risk!'
+	*nl
+	'Pregnancy speed multiplier: <a href="exec:if pregspeedcheat < 3:pregspeedcheat += 1 & dynamic $cheatmenu else pregspeedcheat = 0 & dynamic $cheatmenu"><b><<pregspeedcheat+1>></b></a>'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''vartracker'']"><b>Variable tracker</b></a>'
+	'</tr></table></b></center>'
+}
+
+$cheatmenu['vartracker'] = {
+	gs'stat'
+	*clr & cla
+	act 'Return to cheat index': dynamic $cheatmenu
+	'<center><h1>Cheat menu</h1></center>'
+	'<center>For testing purposes.<br>If reporting a bug only the lines in red are neccessary.</center>'
+	*nl
+	'$loc: <<$loc>>'
+	'$locM: <<$locM>>'
+	'<font color = red>$CURLOC: <<$CURLOC>></font>'
+	'$location_type: <<$location_type>>'
+	'$home[''current'']: <<$home[''current'']>>'
+	'$home[''town'']: <<$home[''town'']>>'
+	'$home[''name'']: <<$home[''name'']>>'
+	'daystart: <<daystart>>'
+	'daystart_start: <<daystart_start>>'
+	'month: <<month>>'
+	'week: <<week>>'
+	'$temperature: <<$temperature>>'
+	'pfilmday: <<pfilmday>>'
+	'$pfname: <<$pfname>>'
+	'modelmon: <<modelmon>>'
+	'min_arousal: <<min_arousal>>'
+	'pcs_nips: <<pcs_nips>>'
+	'clit_size: <<clit_size>>'
+	'steroid_have: <<steroid_have>>'
+	'steroid_counter: <<steroid_counter>>'
+	'steroid_dose: <<steroid_dose>>'
+	'aphrodisiac_have: <<aphrodisiac_have>>'
+	'aphrodisiac_counter: <<aphrodisiac_counter>>'
+	'aphrodisiac_timer: <<aphrodisiac_timer>>'
+	'aphrodisiac_addiction: <<aphrodisiac_addiction>>'
+	'bcream_have: <<bcream_have>>'
+	'motherQW: <<npc_QW[''A29'']>>'
+	'Anastasia quest level: <<npc_QW[''A192'']>>'
+	'sex: <<stat[''vaginal'']>>'
+	'$clothingworntype: <<$clothingworntype>>'
+	'PCloQuality: <<PCloQuality>>'
+	'Mira''s Father Quest (npc_QW[''A64'']): <<npc_QW[''A64'']>>'
+	'Mira''s Quest (npc_QW[''A60'']): <<npc_QW[''A60'']>>'
+	'mirasextimes: <<mirasextimes>>'
+	'Mira''s Relationship (npc_rel[''A60'']): <<npc_rel[''A60'']>>'
+	'Mitka''s Quest (npc_QW[''A63'']): <<npc_QW[''A63'']>>'
+	'mirabrosextime: <<mirabrosextime>>'
+	'momslut: <<momslut>>'
+	'Kirill''s Relationship (Kirill): <<Kirill>>'
+	'Kirill''s Corruption (Kirill_Crpt): <<Kirill_Crpt>>'
+	'children: <<kid>>'
+	!! BabyEmbryo is for how many unborn babies inside PC.
+	'fetus number: <<BabyEmbryo>>'
+	!! preg is your pregnancy state. 0 is not pregnant, 1 is pregnant in general, 2 is in labor. 
+	'pregnancy state: <<preg>>'
+	!! thinkpreg is if svetka thinks she is pregnant
+	'thinkpreg: <<thinkpreg>>'
+	!! knowpreg is for solid proof svetlana is pregnant, like a pregnancy test.
+	'knowpreg: <<knowpreg>>'
+	!! knowpregrecover is for Svetlanas knowledge that she just gave birth.
+	'knowpregrecover: <<knowpregrecover>>'
+	!! knowpregloss is for Svetlanas knowledge that she lost a baby. 1 is for an abortion, 2 is for a miscarrage. 
+	'knowpregloss: <<knowpregloss>>'
+	!! cycle is Svetlanas current fertility cycle. 5 is pregnant, 4 is recovering, 3 is luteal, 2 is ovulation, 1 is foccular, 0 is menstration. 
+	'cycle: <<cycle>>'
+	!! menoage is the age Svetlana will be when she goes through menopause.
+	'menoage: <<menoage>>'
+	!! age is how old Svetlana is in years.
+	'age: <<age>>'
+	!! mesec is for how many hours of bleeding Svetlana has left in her current fertility cycle
+	'mesec: <<mesec>>'
+	!! FocH is for how many hours of Foccular cycle Svetlana has gone through in her current fertility cycle. Focular starts at the end of her Luteal and contains the bleeding period in Svetkas cycle.
+	'FocH: <<FocH>>'
+	!! EggRH is for the level of egg release that Svetlana has for her ovulation event. 150 generates a single egg, higher amounts might release more.
+	'EggRH: <<EggRH>>'
+	!! Ovulate is the amount of hours remaining in Svetlanas ovulation period of her current fertility cycle. 
+	'Ovulate: <<Ovulate>>'
+	!! UnfertEgg is how many unfertilized eggs Svetlana has in her for fertilization during her Ovulation period. Unfertilized eggs are removed at the end of her Ovulation period.
+	'UnfertEgg: <<UnfertEgg>>'
+	!! FertEgg is how many unimplanted eggs Svetlana has in her. These are possible babies, but they die 330 hours after ovulation if they do not implant.
+	'FertEgg: <<FertEgg>>'
+	!! babyptype is the pregnancy type of unborn babies. they might be unimplanted 0, healthy 1, or Ectopic 2. Future pregnancy complications should use this variable
+	if FertEgg > 0:
+		i = arrpos('$kidname','unborn')
+		imax = arrsize('$kidname')-1
+		:chlp
+			'	<<i+1>>. baby''s pregnancy type: <<babyptype[i]>>'
+		if i < imax: i += 1 & jump 'chlp'
+		killvar 'i'
+		killvar 'imax'
+	end
+	!! BabyEmbryo is for implanted babies. These are solid pregnancies. 
+	'Implanted Embryos: <<BabyEmbryo>>'
+	!! ferteggage is for the time since the ovulation event. They last 330 hours before they die if not implanted.
+	'ferteggage: <<ferteggage>>'
+	!! PregChem is the level of pregnancy, measured in hour parts. 
+	'PregChem: <<PregChem>>'
+	!! pillcon is the level of birth control to prevent svetlana from getting pregnant. Higher concentrations increase effectivity until it reaches it''s ideal level.
+	'pillcon: <<pillcon>>'
+	!! believed pillcon is the level of birth control svetlana thinks she has. This may be different from the actual level due to sabotage or a bad habit of not taking your pill.
+	'Believed pillcon: <<pillcon2>>'
+	!! RecovH is the amount of recover hours before Svetlanas fertility cycle resets after having a baby.
+	'RecovH: <<RecovH>>'
+	!! daylastperiod is for Svetlanas knowledge on when she began her last period
+	'daylastperiod: <<daylastperiod>> (daystart difference: <<daystart-daylastperiod>>)'
+	!! lastmens is for the last day that Svetlana bled during her last cycle.
+	'lastmens: <<lastmens>>'
+	!! firstmens is for the first day that Svetlana bled during her last cycle. this is different than daylastperiod because this is the actual date, while daylastperiod is when Svetlana remembers it being.
+	'firstmens: <<lastmens>> (daystart difference: <<daystart-firstmens>>)'
+	'hypnoTime: <<hypnoTime>>'
+	'hypnoStrength: <<hypnoStrength>>'
+	'hypnoDay: <<hypnoDay>>'
+	'hypnoAddict: <<hypnoAddict>>'
+	'missCum: <<missCum>>'
+	'condoms/bad condoms: <<prezik>>/<<badprezik>>'
+	if tabletki > 0:
+		'pack(s) of birth control pills: <<tabletki>>'
+		if tabletkiold > 0: '	<<tabletkiold>> expired pack'
+		if tabletkifake > 0: '	<<tabletkifake>> counterfeit pack'
+		if tabletkirej > 0: '	<<tabletkirej>> factory rejected pack'
+		if tabletkifert > 0: '	<<tabletkifert>> fertility hormones pack'
+		if tabletkisug > 0: '	<<tabletkisug>> sugar pills pack'
+	end
+	if pillsleft[ptype] > 0:
+		if ptype = 0: $pilltype = 'normal '
+		if ptype = 1: $pilltype = 'expired '
+		if ptype = 2: $pilltype = 'counterfeit '
+		if ptype = 3: $pilltype = 'factory rejected '
+		if ptype = 4: $pilltype = 'sugar '
+		if ptype = 5: $pilltype = 'fertility hormone '
+		'<<pillsleft[ptype]>> <<$pilltype>>pills left of your currently used pack'
+		killvar '$pilltype'
+	end
+}
+
+$cheatmenu['bdimmain'] = {
+	gs 'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Body Image Sets</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
+	'<td width="400" cellspacing="0" cellpadding="20" valign="top">'
+	'<center><b>Body Image Controls</b></center>'
+	*nl
+	'You are currently using set: <<$bodimgsets[((bodset * 10) + 9)]>>'
+	if bdsetlock = 1:
+		'The set used is locked to current.'
+	else
+		'The set used is unlocked.'
+	end
+	*nl
+	'This is the current default and custom (if any) body image sets:'
+	*nl
+	'<a href="exec:chmbodset = 0 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[9]>></b></a>'
+	*nl
+	'<a href="exec:chmbodset = 1 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[19]>></b></a>'
+	*nl
+	'<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
+	*nl
+	if bodsetcnt >= 4:
+		'You may edit aspects of a custom image set by clicking on their folder names below.'
+		*nl
+		'<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
+		*nl
+	elseif bodsetcnt = 3:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	if bodsetcnt >= 5:
+		'<a href="exec:chmbodset = 5 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[59]>></b></a>'
+		*nl
+	elseif bodsetcnt = 4:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	if bodsetcnt >= 6:
+		'<a href="exec:chmbodset = 6 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[69]>></b></a>'
+		*nl
+	elseif bodsetcnt = 5:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	if bodsetcnt >= 7:
+		'<a href="exec:chmbodset = 7 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[79]>></b></a>'
+		*nl
+	elseif bodsetcnt = 6:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	if bodsetcnt >= 8:
+		'<a href="exec:chmbodset = 8 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[89]>></b></a>'
+		*nl
+	elseif bodsetcnt = 7:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	if bodsetcnt >= 9:
+		'<a href="exec:chmbodset = 9 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[99]>></b></a>'
+		*nl
+	elseif bodsetcnt = 8:
+		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
+		*nl
+	end
+	'</td></tr></table></center>'
+}
+
+$cheatmenu['bdimdisplay'] = {
+	gs 'stat'
+	*clr & cla
+	'<center><h1>Cheat menu</h1></center>'
+	*nl
+	'<center><b>Body Image Set Display</b></center>'
+	'<a href="exec:killvar ''chmbodset'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
+	*nl
+	if bdsetlock = 1 and chmbodset = fixbodset:
+		'This is the currently locked set.'
+		'<a href="exec:bdsetlock = 0 & bodset = 1 & killvar ''fixbodset'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Clear the lock.</b></a>'
+	else
+		'<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
+	end
+	*nl
+	if chmbodset <= 3:
+		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
+		'Descriptors:'
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+		end
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+		end
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+		end
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/8.jpg''"><<$bodimgsets[((chmbodset * 10) + 8)]>></a>'
+		end
+		*nl
+	else
+		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
+		'Descriptors: (Displayed as "You are:")'
+		if imgset0ovr[chmbodset] = 1:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a> -- <a href="exec:chmbddes = 0 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+			*nl
+			'You are using a <a href="exec:imgset0ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 0</a> for this set.'
+			*nl
+		else
+			'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+			*nl
+			'You are using the <a href="exec:imgset0ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 0</a> for this set.'
+			*nl
+		end
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a> -- <a href="exec:chmbddes = 1 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/2.jpg''"><<$bodimgsets[((chmbodset * 10) + 2)]>></a> -- <a href="exec:chmbddes = 2 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/3.jpg''"><<$bodimgsets[((chmbodset * 10) + 3)]>></a> -- <a href="exec:chmbddes = 3 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/4.jpg''"><<$bodimgsets[((chmbodset * 10) + 4)]>></a> -- <a href="exec:chmbddes = 4 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+		*nl
+		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a> -- <a href="exec:chmbddes = 5 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+		*nl
+		if imgset6ovr[chmbodset] = 1:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a> -- <a href="exec:chmbddes = 6 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+			*nl
+			'You are using a <a href="exec:imgset6ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 6</a> for this set.'
+			*nl
+		else
+			'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+			*nl
+			'You are using the <a href="exec:imgset6ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 6</a> for this set.'
+			*nl
+		end
+		if imgset7ovr[chmbodset] = 1:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a> -- <a href="exec:chmbddes = 7 & dynamic $cheatmenu[''bdimcstdesed'']">Edit this</a>'
+			*nl
+			'You are using a <a href="exec:imgset7ovr[chmbodset] = 0 & dynamic $cheatmenu[''bdimdisplay'']">custom image 7</a> for this set.'
+			*nl
+		else
+			'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+			*nl
+			'You are using the <a href="exec:imgset7ovr[chmbodset] = 1 & dynamic $cheatmenu[''bdimdisplay'']">default image 7</a> for this set.'
+			*nl
+		end
+		'<a href="exec:dynamic $cheatmenu[''bdimcstdel'']">Delete this set.</a>'
+	end
+}
+
+$cheatmenu['bdimcstdel'] = {
+	*clr & cla
+	'<center><b>Body Image Set Removal</b></center>'
+	'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
+	*nl
+	'This is where you remove a body image set from use, please note it does not delete anything, it just clears the custom set from this game instance/save.'
+	if klsetask = 1:
+		'<a href="exec:klsetask = 2 & dynamic $cheatmenu[''bdimcstdel'']"><b>Are you sure you want to remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</b></a>'
+	elseif klsetask = 2:
+		if chmbodset <= 2:
+			'You have encoutered error 1'
+			'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
+			exit
+		end
+		if bdsetlock = 1 and fixbodset >= chmbodset: bdsetlock = 0 & killvar 'fixbodset'
+		if bodsetcnt > chmbodset:
+			cyci1 = 0
+			cyci2 = chmbodset
+
+			:overwriter1
+
+			$bodimgsets[((cyci2 * 10) + cyci1)] = $bodimgsets[(((cyci2 + 1) * 10) + cyci1)]
+			cyci1 += 1
+			if cyci1 < 10: jump 'overwriter1'
+			imgset6ovr[cyci2] = imgset6ovr[(cyci2 + 1)]
+			imgset7ovr[cyci2] = imgset7ovr[(cyci2 + 1)]
+			cyci1 = 0
+			cyci2 += 1
+			if cyci2 < bodsetcnt: jump 'overwriter1'
+			killvar 'cyci1' & killvar 'cyci2'
+		elseif bodsetcnt < chmbodset:
+			'You have encoutered error 2'
+			'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimdisplay'']"><b>Go Back</b></a>'
+			exit
+		end
+		cyci1 = 9
+
+		:poofer1
+
+		killvar 'bodimgsets', ((bodsetcnt * 10) + cyci1)
+		cyci1 -= 1
+		if cyci1 >= 0: jump 'poofer1'
+		killvar 'cyci1'
+		killvar 'imgset6ovr', bodsetcnt
+		killvar 'imgset7ovr', bodsetcnt
+		bodsetcnt -= 1
+		killvar 'klsetask'
+		dynamic $cheatmenu['bdimmain']
+	else
+		'<a href="exec:klsetask = 1 & dynamic $cheatmenu[''bdimcstdel'']">Remove set <<$bodimgsets[((chmbodset * 10) + 9)]>>?</a>'
+	end
+}
+
+$cheatmenu['bdimcstadd'] = {
+	*clr & cla
+	'<center><b>Body Image Set Addition</b></center>'
+	'<a href="exec:killvar ''klsetask'' & dynamic $cheatmenu[''bdimmain'']"><b>Go Back</b></a>'
+	*nl
+	'This is where you can add a new image set to a game.'
+	'To add an image set, create a folder in images/pc/body/shape/ and name it anything you want (shorter will be easier to remember). Then put in it any images you want named 1.jpg, 2.jpg, etc. up 5, 6, or 7. Just make sure it contains images 1 to 5. Once you have done that, click the link below and put in your folder name to add that set.'
+	'Note: This will only be for this instance/save of the game and you will have to redo the click the link step if you want to add the same folder to a different instance/save.'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''bdimcstaddpro'']">Add Image Set</a>'
+}
+
+$cheatmenu['bdimcstaddpro'] = {
+	$tmpstrg = input("Enter folder name, do not include ''\''")
+	if $tmpstrg = '':
+		killvar '$tmpstrg'
+		dynamic $cheatmenu['bdimcstadd']
+	else
+		bodsetcnt += 1
+		cyci1 = 0
+		:addcyc
+		$bodimgsets[((bodsetcnt * 10) + cyci1)] = $bodimgsets[(10 + cyci1)]
+		cyci1 += 1
+		if cyci1 < 9: jump 'addcyc'
+		$bodimgsets[((bodsetcnt * 10) + 9)] = $tmpstrg
+		imgset6ovr[bodsetcnt] = 0
+		imgset7ovr[bodsetcnt] = 0
+		killvar '$tmpstrg'
+		killvar 'cyci1'
+		dynamic $cheatmenu['bdimmain']
+	end
+}
+
+$cheatmenu['bdimcstdesed'] = {
+	$tmpstrg = input("Enter a new descriptor")
+	if $tmpstrg = '':
+		killvar 'chmbddes'
+		killvar '$tmpstrg'
+	else
+		$bodimgsets[((chmbodset * 10) + chmbddes)] = $tmpstrg
+		killvar 'chmbddes'
+		killvar '$tmpstrg'
+		dynamic $cheatmenu['bdimdisplay']
+	end
+}
+
+$cheatmenu['succubreset'] = {
+	*clr & cla
+	'Are you sure you want to reset your Succubus status? You will lose all levels, saved power, and succubus skill levels.'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''magic'']"><b>No, nevermind.</b></a>'
+	*nl
+	'<a href="exec:dynamic $cheatmenu[''sucresetdo'']"><b>Yes, remove & reset Succubus status</b></a>'
+}
+
+$cheatmenu['sucresetdo'] = {
+!!	Probably do not need to kill all of these, but better to unload them.
+	killvar 'scfwon'
+	killvar 'scpopt'
+	killvar '$sclocrt'
+	killvar '$scargrt'
+	killvar '$scsubloc'
+	killvar 'suceatinit'
+	killvar 'succubusflag'
+	killvar 'succubusQW'
+	killvar '$sucself1'
+	killvar 'succublvl'
+	killvar 'succubxp'
+	killvar 'sucxpsnapshot'
+	killvar 'succhungry'
+	killvar 'sucexcess'
+	killvar 'sexnutrition'
+	killvar 'suclezsex'
+	killvar 'sucabslez'
+	killvar 'sucabscum'
+	killvar '$sucabs1'
+	killvar '$sucabs2'
+	killvar '$sucabs3'
+	killvar 'succonfail'
+	killvar 'sucpowzeroed'
+	killvar 'suchuntday'
+	killvar 'sucpcinfo'
+	killvar 'karinsucsex'
+	killvar 'karinsucsexday'
+	killvar 'karinsucsexask'
+	killvar 'tatianasucsex'
+	killvar 'tatianasucsexday'
+	killvar 'tatianasucsexask'
+	killvar 'sucwalkday'
+	killvar '$sucgoloc'
+	killvar '$sucgometka'
+	killvar 'sucskill'
+	killvar 'sucstorecap'
+	killvar 'sucinfoday'
+	killvar 'sctrainprep'
+!!	This list will be updated as new variables are added
+	dynamic $cheatmenu['magic']
+}
+$cheatmenu['about'] = {
+	*clr & cla
+	gs 'obj_din', 'settingtabs'
+	gs 'stat'
+	gs 'saveg'
+	gs 'addbuilddate'
+	'<center><h1>About Window</h1></center>'
+	'<center><table cellspacing="0" cellpadding="20" valign="top">'
+	'<tr><td><h3><center>Girl Life version <<version_major>>.<<version_minor>>.<<version_revision>>.<<version_patch>></center></h3></td></tr>'
+	'<tr><td><h3><center>built on <<$builddate>></center></h3></td></tr>'
+	'<tr><td><h5><center>if loaded so it was the save from</center></h5></td></tr>'
+	'<tr><td cellspacing="0" cellpadding="20" valign="top"><center><<$version>></center></td></tr>'
+	'</table></center>'
+	killvar '$tmp'
+}
+
+$cheatmenu['items'] = {
+	gs'stat'
+	*clr & cla
+	gs 'obj_din', 'cheattabs'
+	'<center><h1>Cheat Menu - Items</h1></center>'
+
+	'<center><h4>Pharmacy items</h4>'
+	if showPharmacyItems = 0:
+		'<a href = "exec: showPharmacyItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end
+	
+	if showPharmacyItems = 1:
+		'<a href = "exec: showPharmacyItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+		*pl 'Morning after pill: <a href="exec:morning_after_pill=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<morning_after_pill>> </b></a>'
+		*pl 'Condoms: <a href="exec:prezik=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<prezik>> </b></a>'
+		*pl 'Pregnancy test: <a href="exec:pregtest=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<pregtest>> </b></a>'
+		*pl 'Birth control pills: <a href="exec:tabletki=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tabletki>> </b></a>'
+		*pl 'Antibiotics: <a href="exec:lekarstvo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lekarstvo>> </b></a>'
+		*pl 'Vitamins: <a href="exec:vitamin=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<vitamin>> </b></a>'
+		*pl 'Painkillers: <a href="exec:painkiller=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<painkiller>> </b></a>'
+		*pl 'Ointments for chafing: <a href="exec:mosolmaz=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mosolmaz>> </b></a>'
+		*pl 'Lubricants: <a href="exec:lubri=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lubri>> </b></a>'
+		*pl 'Lip balms: <a href="exec:lipbalm=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lipbalm>> </b></a>'
+		*pl 'Weight loss pill: <a href="exec:fatdel=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<fatdel>> </b></a>'
+		*pl 'Tampons: <a href="exec:tampon=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tampon>> </b></a>'
+		*pl 'Sanitary napkins: <a href="exec:sanpad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<sanpad>> </b></a>'
+
+		if klisma = 0:
+			*pl 'Enema kit: <a href="exec:klisma = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if klisma = 1:
+			*pl 'Enema kit: <a href="exec:klisma = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end
+
+		if breastpump = 0:
+			*pl 'Breast pump: <a href="exec:breastpump = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if breastpump = 1:
+			*pl 'Breast pump: <a href="exec:breastpump = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end		
+
+		*pl 'Breastmilk bottle S: <a href="exec:bpbottles=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bpbottles>> </b></a>'
+		*pl 'Breastmilk bottle M: <a href="exec:bpbottlem=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bpbottlem>> </b></a>'
+	end
+	
+	'<h4>Food items</h4>'
+	if showFoodItems = 0:
+		'<a href = "exec: showFoodItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end
+
+	if showFoodItems = 1:
+		'<a href = "exec: showFoodItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+		*pl 'Regular food: <a href="exec:eda=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<eda>> </b></a>'
+		*pl 'Diet food: <a href="exec:edad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<edad>> </b></a>'
+		*pl 'Tea biscuits: <a href="exec:pranik=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<pranik>> </b></a>'
+
+		if bag > 0:
+			if bottle = 0:
+				*pl 'Bottle of water: <a href="exec:bottle = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if bottle = 1:
+				*pl 'Bottle of water: <a href="exec:bottle = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end
+
+			if buterbrod = 0:
+				*pl 'Sandwich: <a href="exec:buterbrod = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if buterbrod = 1:
+				*pl 'Sandwich: <a href="exec:buterbrod = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end	
+
+			if wine = 0:
+				*pl 'Cheap Bottle of wine: <a href="exec:wine = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if wine = 1:
+				*pl 'Cheap Bottle of wine: <a href="exec:wine = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end	
+		end
+	end
+
+	'<h4>Cosmetics items</h4>'
+	if showCosmeticsItems = 0:
+		'<a href = "exec: showCosmeticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end
+
+	if showCosmeticsItems = 1:
+		'<a href = "exec: showCosmeticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+		*pl 'Cosmetics: <a href="exec:kosmetica=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<kosmetica>> </b></a>'
+		*pl 'Moisturiser: <a href="exec:item_moisturizer=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<item_moisturizer>> </b></a>'
+		*pl 'Lip balms: <a href="exec:lipbalm=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<lipbalm>> </b></a>'
+		*pl 'Plain false lashes: <a href="exec:falselashesplain=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<falselashesplain>> </b></a>'
+		*pl 'Mink false lashes: <a href="exec:falselashesmink=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<falselashesmink>> </b></a>'
+		*pl 'Razors: <a href="exec:stanok=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<stanok>> </b></a>'
+		*pl 'Sunblock: <a href="exec:krem=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<krem>> </b></a>'
+		*pl 'Deodorant: <a href="exec:deodorant=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<deodorant>> </b></a>'
+		*pl 'Tampons: <a href="exec:tampon=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tampon>> </b></a>'
+		*pl 'Sanitary Napkins: <a href="exec:sanpad=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<sanpad>> </b></a>'
+		*pl 'Shampoo: <a href="exec:shampoo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<shampoo>> </b></a>'
+		*pl 'Hair scrunchies: <a href="exec:hscrunch=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<hscrunch>> </b></a>'
+		*pl 'Hair pins: <a href="exec:hpingrip=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<hpingrip>> </b></a>'
+
+		if bag = 1:
+			*pl 'Wipes: <a href="exec:salfetka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<salfetka>> </b></a>'
+			*pl 'Portable makeup: <a href="exec:kosmetitka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<kosmetitka>> </b></a>'
+			*pl 'Mouthwash: <a href="exec:mouthwash=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mouthwash>> </b></a>'
+			
+			if greben = 0:
+				*pl 'Comb: <a href="exec:greben = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if greben = 1:
+				*pl 'Comb: <a href="exec:greben = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end	
+
+			if compact_mirror = 0:
+				*pl 'Compact mirror: <a href="exec:compact_mirror = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if compact_mirror = 1:
+				*pl 'Compact mirror: <a href="exec:compact_mirror = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end	
+		end
+	end
+
+	'<h4>Hardware items</h4>'
+	if showHardwareItems = 0:
+		'<a href = "exec: showHardwareItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end 
+	if showHardwareItems = 1:
+		'<a href = "exec: showHardwareItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+		*pl 'Dishwashing detergent: <a href="exec:fairy=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<fairy>> </b></a>'
+		*pl 'Clothing detergent: <a href="exec:poroshok=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<poroshok>> </b></a>'
+		*pl 'Plates: <a href="exec:cltarelka=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<cltarelka>> </b></a>'
+		*pl 'Fabric: <a href="exec:tkan=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<tkan>> </b></a>'
+	
+		if sewing_kit = 0:
+			*pl 'Sewing kit: <a href="exec:sewing_kit = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if sewing_kit = 1:
+			*pl 'Sewing kit: <a href="exec:sewing_kit = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if bag = 1:
+			if umbrella = 0:
+				*pl 'Umbrella: <a href="exec:umbrella = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+			end
+			if umbrella = 1:
+				*pl 'Umbrella: <a href="exec:umbrella = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+			end	
+		end
+	end
+
+	'<h4>Narcotics items</h4>'
+	if showNarcoticsItems = 0:
+		'<a href = "exec: showNarcoticsItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end
+	if showNarcoticsItems = 1:
+		'<a href = "exec: showNarcoticsItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+		*pl 'Cigarettes: <a href="exec:siga=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<siga>> </b></a>'
+		*pl 'Joints: <a href="exec:joint=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<joint>> </b></a>'
+		*pl 'Cocaine: <a href="exec:dur=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<dur>> </b></a>'
+		*pl 'Amphetamine: <a href="exec:amphetamine=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<amphetamine>> </b></a>'
+		*pl 'Neuroboosters: <a href="exec:mentats_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<mentats_have>> </b></a>'
+		*pl 'Steroids: <a href="exec:steroid_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<steroid_have>> </b></a>'
+		*pl 'Breast cream: <a href="exec:bcream_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<bcream_have>> </b></a>'
+		*pl 'Aphrodisiacs: <a href="exec:aphrodisiac_have=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<aphrodisiac_have>> </b></a>'
+	end
+	'<h4>Sex shop items</h4>'
+	if showSexItems = 0:
+		'<a href = "exec: showSexItems = 1 & dynamic $cheatmenu[''items'']">Show Details </a>'
+	end
+	if showSexItems = 1:
+		'<a href = "exec: showSexItems = 0 & dynamic $cheatmenu[''items'']">Hide Details </a>'
+
+		if pornMagazine = 0:
+			*pl 'Porn magazine: <a href="exec:pornMagazine = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if pornMagazine = 1:
+			*pl 'Porn magazine: <a href="exec:pornMagazine = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if vibrator = 0:
+			*pl 'Vibrator: <a href="exec:vibrator = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if vibrator = 1:
+			*pl 'Vibrator: <a href="exec:vibrator = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if analplug = 0:
+			*pl 'Butt plug: <a href="exec:analplug = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if analplug = 1:
+			*pl 'Butt plug: <a href="exec:analplug = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		*pl '15cm suction dildo: <a href="exec:suction_dildo=input(''Set number'') & dynamic $cheatmenu[''items'']"><b> <<suction_dildo>> </b></a>'	
+	
+		if strapon = 0:
+			*pl 'Strap-on harness: <a href="exec:strapon = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if strapon = 1:
+			*pl 'Strap-on harness: <a href="exec:strapon = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if dildo = 0:
+			*pl '10cm dildo: <a href="exec:dildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if dildo = 1:
+			*pl '10cm dildo: <a href="exec:dildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end
+
+		if middildo = 0:
+			*pl '15cm dildo: <a href="exec:middildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if middildo = 1:
+			*pl '15cm dildo: <a href="exec:middildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if largedildo = 0:
+			*pl '20cm dildo: <a href="exec:largedildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if largedildo = 1:
+			*pl '20cm dildo: <a href="exec:largedildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if bigdildo = 0:
+			*pl '25cm dildo: <a href="exec:bigdildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if bigdildo = 1:
+			*pl '25cm dildo: <a href="exec:bigdildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end
+
+		if extradildo = 0:
+			*pl '30cm dildo: <a href="exec:extradildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if extradildo = 1:
+			*pl '30cm dildo: <a href="exec:extradildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end	
+
+		if superdildo = 0:
+			*pl '35cm dildo: <a href="exec:superdildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if superdildo = 1:
+			*pl '35cm dildo: <a href="exec:superdildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end
+
+		if maddildo = 0:
+			*pl '40cm dildo: <a href="exec:maddildo = 1 & dynamic $cheatmenu[''items'']"><b>none</b></a>'
+		end
+		if maddildo = 1:
+			*pl '40cm dildo: <a href="exec:maddildo = 0 & dynamic $cheatmenu[''items'']"><b>owned</b></a>'
+		end
+	end
+	'</center>'
+}
+
+--- Cheatmenu_din ---------------------------------

+ 15 - 13
locations/DNA.qsrc

@@ -41,30 +41,32 @@ if $ARGS[0] = 'relate':
 	!!paternal grandfather ID
 	temp2[6] = $mid ($ARGS[2], 67, 10)
 	
+	killvar 'gen_relationship'
+	
 	if temp1[0] = temp2[1] or temp1[0] = temp2[2] or temp2[0] = temp1[1] or temp2[0] = temp1[2]:
-		'Parent-child relation'
+		$gen_relationship += 'Parent-child relationship. '
 		if temp1[0] = temp2[1] or temp1[0] = temp2[2]:
 			!!temp1 is the parent, temp2 is child
-			if temp2[1] = temp2[5] or temp2[2] = temp2[4]:'Child is the result of incest (parent is also grandparent)'
-			if temp2[3] = temp2[5] and temp2[4] = temp2[6]:'Child is result of incest with close family member (sibling)'
-			if temp2[3] = temp2[5] or temp2[4] = temp2[6]:'Child is result of incest with close family member (half sibling)'
+			if temp2[1] = temp2[5] or temp2[2] = temp2[4]: $gen_relationship += 'Child is the result of incest (parent is also grandparent)'
+			if temp2[3] = temp2[5] and temp2[4] = temp2[6]: $gen_relationship += 'Child is result of incest with close family member (sibling)'
+			if temp2[3] = temp2[5] or temp2[4] = temp2[6]:$gen_relationship += 'Child is result of incest with close family member (half sibling)'
 		elseif temp2[0] = temp1[1] or temp2[0] = temp1[2]:
 			!!temp2 is the parent, temp1 is child
-			if temp1[1] = temp1[5] or temp1[2] = temp1[4]:'Child is the result of incest (parent is also grandparent)'
-			if temp1[3] = temp1[5] and temp1[4] = temp1[6]:'Child is result of incest with close family member (sibling)'
-			if temp1[3] = temp1[5] or temp1[4] = temp1[6]:'Child is result of incest with close family member (half sibling)'
+			if temp1[1] = temp1[5] or temp1[2] = temp1[4]: $gen_relationship += 'Child is the result of incest (parent is also grandparent)'
+			if temp1[3] = temp1[5] and temp1[4] = temp1[6]: $gen_relationship += 'Child is result of incest with close family member (sibling)'
+			if temp1[3] = temp1[5] or temp1[4] = temp1[6]: $gen_relationship += 'Child is result of incest with close family member (half sibling)'
 		end
 	elseif temp1[0] = temp2[3] or temp1[0] = temp2[4] or temp1[0] = temp2[5] or temp1[0] = temp2[6] or temp2[0] = temp1[3] or temp2[0] = temp1[4] or temp2[0] = temp1[5] or temp2[0] = temp1[6]:
-		'Grandparent-grandchild relation'
+		$gen_relationship += 'Grandparent-grandchild relationship.'
 	elseif temp1[1] = temp2[1] or temp1[2] = temp2[2]:
-		'Sibling relation'
-		if temp1[1] = temp2[1] and temp1[2] = temp2[2]:'Full sibling'
-		if temp1[1] ! temp2[1] or temp1[2] ! temp2[2]:'Half sibling'
+		$gen_relationship += 'Sibling relation'
+		if temp1[1] = temp2[1] and temp1[2] = temp2[2]: $gen_relationship += 'Full sibling'
+		if temp1[1] ! temp2[1] or temp1[2] ! temp2[2]: $gen_relationship += 'Half sibling'
 	elseif temp1[1] ! temp2[1] and temp1[2] ! temp2[2]:
 		if temp1[3] = temp2[3] and temp1[4] = temp2[4] or temp1[3] = temp2[5] and temp1[4] = temp2[6]:
-			'first cousins'
+			$gen_relationship += 'first cousins'
 		elseif temp1[3] = temp2[3] or temp1[4] = temp2[4] or temp1[3] = temp2[5] or temp1[4] = temp2[6]:
-			'distand blood relation'
+			$gen_relationship += 'distand blood relation'
 		end
 	end
 	killvar 'temp1'

+ 65 - 0
locations/NPCFinder.qsrc

@@ -0,0 +1,65 @@
+*clr
+'<a href="exec: gt ''NPCFinder'', ''finder''">Enter the ID of the character.</a>'
+if $ARGS[0] = 'finder':
+	$looking = input ('ID (like <i>A17</i>)')
+	gt 'NPCFinder'
+end
+
+if $looking ! '':
+	'<br><br>'
+	'Found character:'
+	'<br>'
+	'<<$npc_pic[''<<looking>>'']>>'
+	'DNA string: <<$npc_dna[''<<$looking>>'']>>'
+	'Name: <<$npc_firstname[''<<$looking>>'']>> "<<$npc_nickname[''<<$looking>>'']>>" <<$npc_lastname[''<<$looking>>'']>> (<<$npc_usedname[''<<$looking>>'']>>)'
+	if npc_dob['<<$looking>>'] ! '': 'Birthday (YYYY-MM-DD): <<mid(npc_dob[''<<$looking>>''],1,4)>>-<<mid(npc_dob[''<<$looking>>''],5,2)>>-<<mid(npc_dob[''<<$looking>>''],7,2)>>'
+	'Intelligence: <<npc_intel[''<<$looking>>'']>>'
+	if npc_grupTipe['<<$looking>>'] ! '': 'Social group: <<npc_grupTipe[''<<$looking>>'']>>'
+	if npc_sexskill['<<$looking>>'] ! '': 'Sex skill: <<npc_sexskill[''<<$looking>>'']>>'
+	if npc_rep['<<$looking>>'] ! '': ' Reputation in school: <<npc_rep[''<<$looking>>'']>>'
+	if npc_haircol['<<$looking>>'] = 0:
+		'Natural hair color: black (<<npc_haircol[''<<$looking>>'']>>)'
+	elseif npc_haircol['<<$looking>>'] = 1:
+		'Natural hair color: brown (<<npc_haircol[''<<$looking>>'']>>)'
+	elseif npc_haircol['<<$looking>>'] = 2:
+		'Natural hair color: read (<<npc_haircol[''<<$looking>>'']>>)'
+	else
+		'Natural hair color: blonde (<<npc_haircol[''<<$looking>>'']>>)'
+	end
+	if hotcat_rating['<<$looking>>'] ! '': 'Hotness rating: <<hotcat_rating[''<<$looking>>'']>>'
+	'Appearance value: <<npc_apprnc[''<<$looking>>'']>>'
+	'Height: <<npc_height[''<<$looking>>'']>>'
+	if npc_gender['<<$looking>>'] = 0:
+		'Gender: male'
+		'Dick thickness: <<$npc_thdick[''<<$looking>>'']>>'
+		'Dick length: <<npc_dick[''<<$looking>>'']>>'
+		'Potential: <<npc_spermpot[''<<$looking>>'']>> (default is 10000)'
+	else
+		'Gender: female'
+		'Breast size: <<npc_bust[''<<$looking>>'']>>'
+	end
+	if npc_herpes['<<$looking>>'] > 0: $npcvendisease += 'herpes; '
+	if npc_syth['<<$looking>>'] > 0: $npcvendisease += 'syphilis; '
+	if npc_gon['<<$looking>>'] > 0: $npcvendisease += 'gonorrhea; '
+	if npc_thrush['<<$looking>>'] > 0: $npcvendisease += 'yeast infection; '
+	if $npcvendisease = '': $npcvendisease = 'none'
+	'Veneral diseases: <<$npcvendisease>>'
+	'Sexual acts with PC: <<npc_sex[''$looking'']>>'
+	'Perversion: <<npc_perv[''$looking'']>>'
+	'Notes: <<$npc_notes[''<<$looking>>'']>>'
+	''
+	'Found relationships:'
+	npctemp = 0
+	:relationshipfinder
+		gs 'DNA','relate', $npc_dna['<<$looking>>'], $npc_dna['A<<npctemp>>']
+		if $gen_relationship ! '' and 'A<<npctemp>>' ! '<<$looking>>':
+			'<br>ID: A<<npctemp>>'
+			'DNA string: <<$npc_dna[''A<<npctemp>>'']>>'
+			'Name: <<$npc_firstname[''A<<npctemp>>'']>> "<<$npc_nickname[''A<<npctemp>>'']>>" <<$npc_lastname[''A<<npctemp>>'']>> (<<$npc_usedname[''A<<npctemp>>'']>>)'
+			'Relationship type: <<$gen_relationship>>'
+		end
+	if npctemp < aarraynumber: npctemp += 1 & jump 'relationshipfinder'
+	killvar 'npctemp'
+	killvar 'npcvendisease'
+	killvar 'looking'
+end

+ 1 - 1
locations/Zvereva_house_events.qsrc

@@ -214,7 +214,7 @@ if $ARGS[0] = 'bed_chat':
 			'Giving you an appraising look, she says "Silvestr is the youngest of my older brothers and the only one of them I actually like. He taught me how to fight, and where I learned to push my body to achieve the perfection you see today."'
 			'"When will I meet him?"'
 			'"Why haven''t you already? It''s why I brought you home. What, did you think I wanted to fuck you? Get out there and say hello. He will take it from there. Remember, do what he says or else."'
-			if stat['think_virgin'] = 0:
+			if stat['think_virgin'] = 1:
 				'"But I''m a virgin. My mother makes me do regular check ups at the gynaecologist!"'
 				'Christina starts laughing. "Yeah right!"'
 				'"Really, Mistress. I don''t have a choice. If she finds out I''ve lost my virginity to your brother there will be a lot of trouble." You let the unspoken threat hang in the air.'

+ 60 - 0
locations/_attributes_nerdvana_outfits.qsrc

@@ -478,6 +478,66 @@ elseif ARGS[1] = 79:
 	CloPantsShortness = 1
 
 elseif ARGS[1] = 80:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 81:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 82:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 83:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 84:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+	
+elseif ARGS[1] = 85:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 86:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 87:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1	
+	
+elseif ARGS[1] = 88:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+	
+elseif ARGS[1] = 89:
+	CloQuality = 4
+	CloThinness = 3
+	CloTopCut = 2
+	CloPantsShortness = 1
+
+elseif ARGS[1] = 90:
 	CloQuality = 5
 	CloThinness = 3
 	CloTopCut = 1

+ 550 - 31
locations/albina_chat.qsrc

@@ -40,34 +40,34 @@ if $ARGS[0] = 'small_talk2':
 			'"I don''t want to <i>work</i> for a living," she says, sending both of you into giggles.'
 			gs 'albina_chat','small_talk'
 		end
-		!!if model
-		act 'I do modelling':
-			cla & *nl
+		!! variable for being a model here
+		!!act 'I do modelling':
+			!!cla & *nl
 			
-			gs 'albina_chat','small_talk'
-		end
+			!!gs 'albina_chat','model_talk1'
+		!!end
 		!! {
 		if film > 0:
 			act 'I do porn':
 				cla & *nl
 			
-				gs 'albina_chat','small_talk'
+				gs 'albina_chat','pornstar_talk1'
 			end
 		end
 			
-		if masseuse['jobtype'] ! 0:
-			act 'I work as a masseuse':
-				cla & *nl
+		!!if masseuse['jobtype'] ! 0:
+			!!act 'I work as a masseuse':
+				!!cla & *nl
 				
-				gs 'albina_chat','small_talk'
-			end
-		end
+				!!gs 'albina_chat','small_talk'
+			!!end
+		!!end
 		
 		if stripdancesum > 0:
 			act 'I''m a stripper':
 				cla & *nl
 			    
-				gs 'albina_chat','small_talk'
+				gs 'albina_chat','stripper_talk1'
 			end
 		end}
 
@@ -436,22 +436,28 @@ end
 if $ARGS[0] = 'sex_talk':
 	act 'Stop talking': gt 'albinahome', 'bedroom'
 	act 'Change the subject': gt 'albina_chat', 'chat'
-	act 'Ask her about her sex life instead': gt 'albina_chat', 'anal'
+	act 'Keep talking about sex': gs 'albina_chat', 'sex_talk2'
+	act 'Ask her about anal': gt 'albina_chat', 'anal'
 end
 
 if $ARGS[0] = 'sex_talk2':
-	if pcs_vag = 0:
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+	if stat['think_virgin'] = 1:
 		'Knowing that you don''t have much experience in the subject, she offers to change the topic.'
 		gs 'albina_chat','sex_talk'
 	else
-		AlbinaQW['chat_rand'] = rand(1,3)
+		AlbinaQW['chat_rand'] = rand(1,2)
 		if AlbinaQW['chat_rand'] = 1:
 			'"So what''s your favourite position?" she asks.'
 			act 'Missionary': gt 'albina_chat', 'missionary'
 			act 'Doggystyle': gt 'albina_chat', 'doggystyle'
 			act 'Cowgirl': gt 'albina_chat', 'cowgirl'
-		else
-			gs'albina_chat','sex_talk'
+			act 'Blowjobs': gt 'albina_chat', 'bj_fav'
+		elseif AlbinaQW['chat_rand'] = 2:
+			gs'albina_chat','birth_control_talk'
+!!		else
+!!			gs'albina_chat','sex_talk'
 		end
 	end
 end
@@ -472,7 +478,7 @@ if $ARGS[0] = 'missionary':
 
 	act 'It''s romantic':
 		cla & *nl
-		'"It''s romantic!" you protest. "You can look up into his eyes when you cum. Or kiss. It makes it so much better."'
+		'"It''s romantic!" you protest. "You can look up into his eyes when you come. Or kiss while he fucks you. It makes it so much better."'
 		'"Romance is for decrepit old fucks," she rolls her eyes. "Nuh uh. Give it to me <i>dirty</i>. Bend me over and spank me! Grab me by the hair and pound my ass! Doggystyle is the way to go!"'
 		gs 'albina_chat','missionary2'
 	end
@@ -567,6 +573,472 @@ if $ARGS[0] = 'cowgirl2':
 	act 'Ask her about her anal fetish': gt 'albina_chat', 'anal'
 end
 
+if $ARGS[0] = 'bj_fav':
+	gs 'stat'
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+	'"I really like giving head," you admit.'
+	'"Ugh, <i>yes!</i>" Albina says, giving you a lustful look. "I love it when guys grab me by the hair and skullfuck me. What do you like about it?"'
+	act 'I like being in control':
+		cla & *nl
+		'"It makes me feel like I''m in charge," you grin, though Albina looks back at you confused.'
+		'"In charge?" she asks. "You''re on your knees serving someone else''s needs. What about it makes you feel like you''re in charge?"'
+		'"When a dick is in my mouth, it means I''m in control of all the pleasure," you say. "I can tease him, I can edge him, I can suck him dry, I can make him beg, I choose when to make him cum. Plus, I''ve got teeth."'
+		'You flash Albina a wicked grin.'
+		'"When your cock is surrounded by my teeth, <i>I''m</i> the one in charge."'
+		'"Huh. Never thought of it like that..." she smirks back. "Still, can''t do anything about it when they cum in your mouth. I''d rather they just bend me over and blast my ass."'
+		gs 'albina_chat','spit_or_swallow'
+	end
+	
+	act 'I like being subservient':
+		cla & *nl
+		'"I think I''m just a bit of a sub," you shrug. "I like being on my knees, with his hand on my head, moving me up and down his cock."'
+		'"You''re <i>such</i> a goodie two shoes," Albina teases.'
+		'"... I like it when he calls me a good girl too," you admit and she gives a sharp bark of laughter.'
+		'"I bet. But don''t you ever get tired of swallowing?"'
+		gs 'albina_chat','spit_or_swallow'
+		act 'Good girls swallow':
+			cla & *nl
+			'"No," you reply without hesitation. "I''m a good girl. And good girls always swallow."'
+			'"Doesn''t mean you always like it," she says, twisting her mouth wistfully.'
+			gs 'albina_chat','sex_talk'
+		end
+	end
+	
+	act 'I like pleasing people':
+		cla & *nl
+		'"I like pleasing people," you shrug. "I love hearing a guy moan while I''m blowing him. It makes me feel so hot and sexy. And when he throbs in my mouth-" You stop, shivering at the thought and grin at Albina. "I could cum just thinking about it."'
+		'She smirks back at you. "I bet. But don''t you ever get tired of swallowing?"'
+		gs 'albina_chat','spit_or_swallow'
+	end
+	
+	act 'Oral fixation':
+		cla & *nl
+		'"I think I have some kind of oral fixation," you say. "The feeling of a cock in my mouth just turns me on. I can''t explain it. I like feeling it on my tongue, the taste, I think I even kind of like the way it makes my jaw ache after I''ve been blowing a guy for a long time."'
+		'"I like the ache too," Albina says. "Especially if it''s right after a rough fucking. I like feeling like a used dish rag at the end of a good fuck. But I''d still rather they just blow their load in my ass instead of in my mouth. Swallowing it gets boring."'
+		gs 'albina_chat','spit_or_swallow'
+		act 'Me too':
+			cla & *nl
+			'"Me too," you nod. "There''s something about hot cum shooting up your ass that just..."'
+			'"Exactly," she grins.'
+			gs 'albina_chat','sex_talk'
+		end
+		
+		act 'I prefer creampies':
+			cla & *nl
+			'"I prefer creampies myself," you smirk. You''re about to continue when you notice the color drain from Albina''s face. "What?"'
+			'"Nothing," she says, shrugging like she didn''t just give you a look like she''d seen a ghost. "I was just surprised was all."'
+			act 'Let it go':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+				'She seems spooked for some reason, but you don''t want to make her uncomfortable so you decide to let it go.'
+				gs 'albina_chat','sex_talk'
+			end
+			
+			act 'Pursue it':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+				'Something is off. Albina is so open about her sex life that it feels strange that she''d be surprised about anything sex related.'
+				'"No really," you insist, pressing on. "What''s so weird about liking creampies?"'
+				'"Nothing!" she snaps. "I said I was just surprised! Why can''t you accept what I tell you, you dumb fucking bitch?!"'
+				*nl
+				'Your eyes go wide in shock at her sudden flash of anger. Worried she might slap you if you say anything else, you stay silent until she starts talking to you again like nothing happened.'
+				gs 'albina_chat','sex_talk'
+			end
+		end
+	end
+	
+	act 'Everything!':
+		cla & *nl
+		if pcs_traits['cumeater'] = 1:
+			'"Everything!" you grin. "I love pleasing a man. I love hearing him moan. I love being in control of his pleasure. I love the taste of cock. I love insisting that he relax and let me take care of it. I love feeling him get harder in my mouth. I love the intimate connection that we form. And..."'
+			'You trail off, meeting Albina''s eyes.'
+			'"I <i>love</i> the taste of cum."'
+			'"Slut," she smirks.'
+			'"Cumslut," you correct and Albina gives a sharp bark of laughter.'
+			gs 'albina_chat','sex_talk'
+		else
+			'"Everything!" you grin. "I love pleasing a man. I love hearing him moan. I love being in control of his pleasure. I love the taste of cock. I love insisting that he relax and let me take care of it. I love feeling him get harder in my mouth. I love the intimate connection that we form. What''s <i>not</i> to love about sucking cock?"'
+			'"Slut," Albina snickers back. "But don''t you ever get tired of swallowing?"'
+			gs 'albina_chat','spit_or_swallow'
+		end
+		
+	end
+	
+	if arrsize('$lover') > 0:
+		act 'I do it for my boyfriend':
+			cla & *nl
+			'"I like making my boyfriend feel good," you smile. "He likes it, so I like it."'
+			'"Oh puh-leez," Albina rolls her eyes. "If I knew you were going to talk about romantic bullshit like that, I woudln''t have asked. Romance is for old decrepit fucks."'
+			'Her words come across sharp, but you can see the twinkle in her eye that lets you know she''s just kidding.'
+			'"But seriously. Don''t you ever get tired of swallowing?"'
+			gs 'albina_chat','spit_or_swallow'
+		end
+		
+		act 'I love my boyfriend':
+			cla & *nl
+			'"Because of my boyfriend," you say, involuntarily smiling as your thoughts drift towards him. "I love him so much and I love seeing the pleasure on his face when his cock is in my mouth. I want to spoil him, so I love giving him head."'
+			'"Oh puh-leez," Albina rolls her eyes. "If I knew you were going to talk about romantic bullshit like that, I woudln''t have asked. Romance is for old decrepit fucks."'
+			'Her words come across sharp, but you can see the twinkle in her eye that lets you know she''s just kidding.'
+			'"But seriously. Don''t you ever get tired of swallowing?"'
+			gs 'albina_chat','spit_or_swallow'
+		end
+	end
+end
+
+if $ARGS[0] = 'spit_or_swallow':
+	act 'I spit':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"What do you mean?" you say with a puzzled look. "I don''t swallow. I just spit?"'
+		'"What do <i>you</i> mean?" Albina asks, giving you a bemused look right back.'
+		act 'It tastes funny':
+			cla & *nl
+			'"It tastes funny," you say matter of factly. "So I just spit it out."'
+			gs 'albina_chat','swallow_why'
+		end
+		
+		act 'It tastes gross':
+			cla & *nl
+			'"Ugh! No," you grimace in disgust. "It tastes so gross. I could never swallow that swill. I just spit."'
+			gs 'albina_chat','swallow_why'
+		end
+		
+		act 'It feels weird':
+			cla & *nl
+			'"It feels weird," you shrug. "The flavor is whatever but I can''t get over the texture. It''s like swallowing a load of snot. So I just spit."'
+			gs 'albina_chat','swallow_why'
+		end
+		
+		act 'Swallowing isn''t my thing':
+			cla & *nl
+			'"Eh, swallowing just isn''t really my thing," you shrug. "Never been into it. Avoid it when I can."'
+			gs 'albina_chat','swallow_why'
+		end
+	end
+	
+	act 'Not really':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"Not really," you shrug. "It''s just part of sex. I don''t really care one way or the other. As long as it makes him happy."'
+		'"I guess," Albina sighs. "Well <i>I</i> get tired of it."'
+		gs 'albina_chat', 'sex_talk'
+	end
+	
+	act 'I got used to the taste':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"I got used to the taste after a while," you shrug. "It''s not my favorite thing in the world, but I''m  used to it."'
+		'"I guess I''m like that too," Albina sighs. "Still. It gets tiring if it''s all a guy wants to do though."'
+		gs 'albina_chat', 'sex_talk'
+	end
+	
+	act 'Spitters are quitters':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"Spitters are quitters," you smirk.'
+		'"Well you''ve got that much right," Albina laughs back.'
+		gs 'albina_chat', 'sex_talk'
+	end
+	
+	act 'I like the taste':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"I like the taste," you smile. "There''s something satisfying about the thick salty flavor of it."'
+		'"Ew!" She wrinkles her nose in disgust. "You <i>like</i> it?"'
+		'"Yeah. You don''t?"'
+		'"No! It tastes like shit!" Albina fake gags.'
+		'"Then why swallow?"'
+		'"Cause you''re <i>supposed</i> to? Duh."'
+		gs 'albina_chat', 'sex_talk'
+	end
+	
+	act 'Makes me feel sexy':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"I love swallowing," you grin. "It makes me feel sexy. Just the look on a guy''s face when you gulp down his load, nngh~! That alone is worth it."'
+		'"Different strokes I guess," Albina says wryly. "Well <i>I</i> get tired of it."'
+		gs 'albina_chat', 'sex_talk'
+	end
+end
+
+if $ARGS[0] = 'swallow_why':
+	'"What the fuck?" Albina stares at you like you just said you have a meter long cock. "You <i>never</i> spit. You always swallow."'
+	act 'Why would I do that?':
+		cla & *nl
+		'"Why would I do that?" you ask. "Why would I swallow if I don''t want to?"'
+		'"Because you''re <i>supposed</i> to," she insists. "You know what? Let''s just drop it. You''re weird."'
+		*nl
+		'<i>I''m the weird one here?</i> you think to yourself.'
+		gs 'albina_chat','sex_talk'
+	end
+	
+	act 'Do you like the taste?':
+		cla & *nl
+		'"Why?" you ask. "Do <i>you</i> like the taste?"'
+		'"No, of course I don''t like the taste!" she says wrinkling her nose. "It''s awful!"'
+		'"Then why swallow?"'
+		'"Cause you''re supposed to. <i>Duh.</i>" Albina gives you another odd look. "You know what? Let''s just drop it. You''re weird. '
+		*nl
+		'<i>I''m the weird one here?</i> you think to yourself.'
+		gs 'albina_chat','sex_talk'
+	end
+end
+
+if $ARGS[0] = 'birth_control_talk':
+	'"Do you use birth control?" Albina asks.'
+	if birth_control['think_safe'] = 0:
+		if pillcon2 > 0 and pillcon2 < 36000:
+			'"I just started the pill," you tell her. "But it''s too soon for it to start being effective yet."'
+			'"I''m on the pill too," she nods. "I hate condoms but I''m terrified of getting knocked up so I take them <i>religiously</i>."'
+			act 'I want to be extra safe':
+				cla & *nl
+				'"Me too," you say. "Not the condom part but the pregnant part. I insist every guy uses a condom, but I''m so scared it''s going to break that I''m taking the pill just to be extra safe."'
+				'"I get that," Albina replies, staring off into the corner for a few seconds before glancing back at you again.'
+				gs 'albina_chat','sex_talk'
+			end
+			
+			act 'I hate condoms too':
+				cla & *nl
+				'"Me too," you say. "I can''t <i>feel</i> anything when the guy''s wearing a rubber. I want skin on skin contact. I can''t wait to start going bareback."'
+				'"It''s way better," Albina grins. "You''re gonna love it."'
+				gs 'albina_chat','sex_talk'
+			end
+			
+			act 'I don''t want to worry':
+				cla & *nl
+				'"I just don''t want to worry about it," you sigh. "What if the guy doesn''t have one? What if I don''t have one? What if the condom breaks? He said he''s going to pull out, but what if he doesn''t? It''s too much stress. Easier to just take a pill every day."'
+				'"I would <i>never</i> let a guy to go bareback on me if I wasn''t on the pill," Albina says, looking horrified at you. "You can''t trust them with that shit. For fuck''s sake, I take it up the ass most of the time and I still don''t trust them not to cum in my pussy. You know what I mean?"'
+				gs 'albina_chat','sex_talk'
+			end
+			
+			act 'I love creampies':
+				cla & *nl
+				'"I <i>love</i> creampies," you gush. "Once the pill starts kicking in, I''ll be able to get all the creampies I want."'
+				'"Oh." Albina gulps, looking away.'
+				'"What''s with that reaction? Feeling turned on? You don''t have a creampie fetish, do you?" you snicker teasingly.'
+				*nl
+				'<b>"Fuck off!"</b> Albina shouts, whirling on you with fury in her eyes. "I don''t have a fetish for that shit so <b>shut the fuck</b> up and keep it that way."'
+				*nl
+				'You back off, stunned by her sudden explosion. What the hell was that about?'
+				gs 'albina_chat','sex_talk'
+			end
+		else
+			act 'None':
+				cla & *nl
+				'"No, I don''t use any kind of birth control." You shake your head and Albina goes visibly pale.'
+				'"What the fuck! Why not? Aren''t you afraid of getting pregnant?"'
+				act 'Don''t see the point':
+					cla & *nl
+					'"Just don''t see the point," you shrug, revealing how irresponsible your behavior is. "Taking pills is such a chore and condoms suck. Unprotected sex is more fun."'
+					'"Don''t see the point?!" Albina sputters before she sighs and shakes her head. "I don''t understand you at all."'
+					gs 'albina_chat','sex_talk'
+				end
+				
+				act 'I want to have a baby':
+					cla & *nl
+					if npc_pregtalk['A23'] = 0:
+						'"What if that''s why I don''t use any?" you smile and Albina''s jaw drops. "I kind of <i>want</i> to have a baby."'
+						if age < 18:
+							'"At our age? Seriously? You''re not even 18! You want to be a teen mom and fuck up your life?"'
+						else
+							'"Seriously? You <i>want</i> to be a teen mom and fuck up your life?"'
+						end
+						
+						act 'I''ll be a great mom':
+							cla & *clr
+							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+							'"You think I wouldn''t be a great mom?" you ask. "I do."'
+							'"That''s not the point," Albina says while shaking her head. "A kid is a lot of responsibility. They become the priority in your life. They can get in the way of dreams and other things you want to do..."'
+							*nl
+							'She trails off, looking away.'
+							*nl
+							'"Mama had to put a lot of dreams on hold because she got pregnant with me. Because of my shitbag dad too, but because of me too. I love Mama, but it wasn''t until she didn''t have to take care of me anymore that she got to actually live her life. Try to remember that before you get pregnant."'
+							gs 'albina_chat','sex_talk'
+						end
+						
+						if pcs_lover - pcs_girlfriends > 0:
+							act 'I love my boyfriend':
+								cla & *clr
+								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+								'"But I love my boyfriend so much!" you say. "He''ll be a great dad, I know it."'
+								'"That''s what Mama thought," Albina says with a disapproving look. "Just because a guy seems nice now doesn''t mean he won''t turn into a total fuckbag the moment you''re knocked up. Try to remember that before you get pregnant."'								
+								gs 'albina_chat','sex_talk'
+							end
+						end
+					else
+						'"What if that''s why I don''t use any?" Albina''s jaw drops and with a bashful smile you say, "I want another baby."'
+						'"You''re crazy," she says, shaking her head. "I can''t believe you want to push another one of those things out of your pussy. Didn''t it hurt enough the first time?"'
+						'"You''ll understand when you''re a mother," you reply haughtily. Albina gulps and looks away.'
+						'"I haven''t decided if I want kids..." she says, a slight shake in her voice.'
+						gs 'albina_chat','sex_talk'
+					end
+				end
+			end
+			
+			act 'Condoms':
+				cla & *nl
+				'"Just condoms," you shrug. "No medication though."'
+				'"Ugh, I <i>hate</i> condoms," Albina moans. "That''s why I''m on the pill. Why don''t you switch?"'
+				act 'More reliable':
+					cla & *nl
+					'"Condoms are more reliable," you say. "I can''t forget to use a condom like I can forget to take a pill."'
+					'"But condoms can still break," she argues.'
+					'"And I can get too tired and fall asleep before remembering to take my pill," you point out. "In the grand scheme of things, condoms are just safer."'
+					'"I prefer bareback," Albina says, before taking a deep breath and sighing. "But I also take my pill religiously. I set alarms and everything. I guess it''s better to use condoms if you don''t trust yourself to take the pill... Wait, why not get the shot instead?"'
+					gs 'albina_chat','sex_talk'
+				end
+				
+				gs 'albina_chat','birth_control_pill_hassle_condom_ver'
+				
+				gs 'albina_chat','birth_control_hormones'
+			end
+			
+			
+			act 'The pullout method':
+				cla & *nl
+				'"Does the pullout method count?" you grin. Albina looks at you like you just said you like fucking dogs.'
+				'"Seriously?! You would trust a guy with that shit? I take it mostly up the ass and I <i>still</i> take the pill because I don''t trust a guy not to blow his load in my pussy."'
+				act 'Condoms suck':
+					cla & *nl
+					'"But condoms are the <i>worst!</i>" you moan. "I can''t <i>feel</i> anything when the guy''s wearing a rubber. I want skin on skin contact. It''s bareback or nothing."'
+					'"I hate condoms too, but that doesn''t explain why you won''t just get on the pill?"'
+					
+					gs 'albina_chat','birth_control_pill_hassle_no_condoms'
+					
+					gs 'albina_chat','birth_control_hormones'
+				end
+				
+				gs 'albina_chat','birth_control_pill_hassle_no_condoms'
+				
+				gs 'albina_chat','birth_control_hormones'
+			end
+			
+			act 'The calendar method and condoms':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+				'"I use the calendar method," you tell her.'
+				'"The <i>what?</i>" Albina stares at you with a confused expression.'
+				'"The calendar method." You begin explaining. "You start by tracking your period and use that to figure out when your cycles are. From then, you can figure out when you''re ovulating and likely to get pregnant and when it''s safe. I go bareback on safe days and use condoms on danger days."'
+				*nl
+				'"Oh <i>god</i>, it''s the worst of both," she says, grimacing at you. "Condoms <i>and</i> still in danger of being knocked up!"'
+				'"It''s not dangerous," you protest. "Once you have your cycle down, it''s just a matter of keeping track."'
+				'"And if you''re too horny to remember what day it is?" Albina gives you a dead stare.'
+				act 'Uhh...':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+					'"Uhh..."  you say dumbly as Albina continues to stare at you.'
+					'"Yeah, that''s what I thought. Why not just start the pill?"'
+					gs 'albina_chat','birth_control_pill_hassle_condom_ver'
+					gs 'albina_chat','birth_control_hormones'
+					gs 'albina_chat','birth_control_pill_problem'
+				end
+				
+				gs 'albina_chat','birth_control_pill_problem'
+			end
+			
+			act 'The calendar method (no condoms)':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+				'"I use the calendar method," you tell her.'
+				'"The <i>what?</i>" Albina stares at you with a confused expression.'
+				'"The calendar method." You begin explaining. "You start by tracking your period and use that to figure out when your cycles are. From then, you can figure out when you''re ovulating and likely to get pregnant from sex and when it''s safe. Guys can cum inside me on safe days and I make sure to warn them if it''s a danger day so they can pull out."'
+				*nl
+				'"Seriously?! You would trust a guy with that shit?" She looks at you in bewilderment. "I take it mostly up the ass and I <i>still</i> take the pill because I don''t trust a guy not to blow his load in my pussy."'
+				act 'Condoms suck':
+					cla & *nl
+					'"But condoms are the <i>worst!</i>" you moan. "I can''t <i>feel</i> anything when the guy''s wearing a rubber. I want skin on skin contact. It''s bareback or nothing."'
+					'"I hate condoms too, but that doesn''t explain why you won''t just get on the pill?"'
+					
+					gs 'albina_chat','birth_control_pill_hassle_no_condoms'
+					gs 'albina_chat','birth_control_hormones'
+				end
+				
+				gs 'albina_chat','birth_control_pill_hassle_no_condoms'
+			end
+		end
+	else
+		'"I''m on the pill," you tell her.'
+		'"I''m on the pill too," she nods. "I hate condoms but I''m terrified of getting knocked up so I take them <i>religiously</i>."'
+		act 'I want to be extra safe':
+			cla & *nl
+			'"Me too," you say. "Not the condom part but the pregnant part. I insist every guy uses a condom, but I''m so scared it''s going to break that I take the pill just to be extra safe."'
+			'"I get that," Albina replies, staring off into the corner for a few seconds before glancing back at you again.'
+			gs 'albina_chat','sex_talk'
+		end
+		
+		act 'I hate condoms too':
+			cla & *nl
+			'"Me too," you say. "I can''t <i>feel</i> anything when the guy''s wearing a rubber. I want skin on skin contact. It''s so much better bareback."'
+			'"Damn straight," Albina grins, high-fiving you. "Condoms are fucking dumb."'
+			gs 'albina_chat','sex_talk'
+		end
+		
+		act 'I don''t want to worry':
+			cla & *nl
+			'"I just don''t want to worry about it," you sigh. "What if the guy doesn''t have one? What if I don''t have one? What if the condom breaks? He said he''s going to pull out, but what if he doesn''t? It''s too much stress. Easier to just take a pill every day."'
+			'"I would <i>never</i> let a guy to go bareback on me if I wasn''t on the pill," Albina says, looking horrified at you. "You can''t trust them with that shit. For fuck''s sake, I take it up the ass most of the time and I still don''t trust them not to cum in my pussy. You know what I mean?"'
+			gs 'albina_chat','sex_talk'
+		end
+		
+		act 'I love creampies':
+			cla & *nl
+			'"I <i>love</i> creampies," you gush. "Once the pill starts kicking in, I''ll be able to get all the creampies I want."'
+			'"Oh." Albina gulps, looking away.'
+			'"What''s with that reaction? Feeling turned on? You don''t have a creampie fetish, do you?" you snicker teasingly.'
+			*nl
+			'<b>"Fuck off!"</b> Albina shouts, whirling on you with fury in her eyes. "I don''t have a fetish for that shit so <b>shut the fuck</b> up and keep it that way."'
+			gs 'albina_chat','sex_talk'
+		end
+	end
+end
+
+if $ARGS[0] = 'birth_control_pill_hassle_condom_ver':
+	act 'Too much hassle':
+		cla & *nl
+		'"Too much hassle," you sigh. "I don''t want to remember to take a pill every day. It''s just easier to put a rubber on the guy''s cock before he fucks me. If the condom breaks, I can just get a morning after pill."'
+		'"I guess that''s fair," Albina concedes. "Just takes one missed day to get knocked up. That''s why I take mine religiously. I set alarms and everything to remind me. But you don''t know what you''re missing out on. Bareback is the best."'
+		*nl
+		'She grins a slutty grin at you.'
+		gs 'albina_chat','sex_talk'
+	end
+end
+
+if $ARGS[0] = 'birth_control_pill_hassle_no_condoms':
+	act 'Too much hassle':
+		cla & *nl
+		'"Too much hassle," you sigh. "I don''t want to remember to take a pill every day. It''s just one more annoying thing to do. I just want to have sex and enjoy it. Besides, I can always get a morning after pill."'
+		'"You''re crazy," Albina says shaking her head. "Condom or bareback, I wouldn''t fuck guys <i>at all</i> if I wasn''t on birth control... but that''s why I need to be on birth control."'
+		*nl
+		'You both erupt into laughter.'
+		gs 'albina_chat','sex_talk'
+	end
+end
+
+if $ARGS[0] = 'birth_control_hormones':
+	act 'No hormones':
+		cla & *nl
+		'"I don''t want to mess with my body like that," you say, shaking your head. "Birth control hormones stop you from getting pregnant, but they do all other kinds of other stuff to you. I hear horror stories from changing your tastes to sudden weight gain and even killing your sex drive, which sort of defeats the point of getting on the pill in the first place."'
+		'"No periods though," Albina smirks. "But I guess you have a point. Since I started the pill, I get a lot wetter than I used to. But that just made surprise buttsex better. All natural lube.'
+		*nl
+		'She grins a slutty grin at you and you both erupt into laughter.'
+		gs 'albina_chat','sex_talk'
+	end
+end
+
+if $ARGS[0] = 'birth_control_pill_problem':
+	act 'Pill has the same problem':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
+		'"The pill has the same problem with memory," you point out. "If I''m too horny to forget a condom, what if I''m too horny to remember my pill? Or too tired?"'
+		'"I guess you have a point there," Albina sighs. "My fear of getting pregnant outweighs my horniness, but I guess not every girl is like that. Some of them are just dumb like you."'
+		'"Holy shit! If your fear is greater than your horniness, then you must be constantly shitting yourself!"'
+		*nl
+		'She whips around, smacking you hard with a pillow. You cackle with glee, laughing harder as her blows pick up speed and force, but she never stops grinning so you know she''s not really mad.'
+		gs 'albina_chat','sex_talk'
+	end
+end
+
 if $ARGS[0] = 'anal':
 	menu_off = 1
 	gs 'stat'
@@ -711,7 +1183,7 @@ if $ARGS[0] = 'anal_end2':
 	gs 'albina_chat','sex_talk'
 end
 
-if $ARGS[0] = 'tell_about_generic_boyfreind':
+if $ARGS[0] = 'tell_about_generic_boyfriend':
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
 	'She grins at you. "Right, so who are you dating again?"'
@@ -858,7 +1330,7 @@ if $ARGS[0] = 'lover_conversation':
 			if NikoVolkovQW >= 5:
 				act 'Niko':
 					cla
-					'"Niko..." you tell her.'
+					'"Niko," you tell her.'
 					'Albina gives you a concerned look. "<<$pcs_nickname>>, he''s bad news. He isn''t what he seems, so just... just be careful with him, okay?"'
 					'"What do you mean?" you ask curiously, but she just dimisses the question and changes the subject.'
 					act 'Stop talking': gt 'albinahome', 'bedroom'
@@ -868,7 +1340,7 @@ if $ARGS[0] = 'lover_conversation':
 			if fedorKozlovQW >= 5:
 				act 'Fedor':
 					cla
-					'"Fedor..." you reply.'
+					'"Fedor," you reply.'
 					if npc_grupTipe['A5'] = 5:
 						'She arches her brow, obviously surprised. "Fedor? Really? He sucked Vasily''s dick in front of everyone!"'
 						'You frown at her. "He didn''t have a choice! Those criminals were going to take everything from his family and he couldn''t pay them. He''s not gay!"
@@ -885,7 +1357,7 @@ if $ARGS[0] = 'lover_conversation':
 			if kotovLoveQW = 1:
 				act 'Vitek':
 					cla
-					'"Vitek..." you reply.'
+					'"Vitek," you reply.'
 					'She is taken aback in surprise. "Really <<$pcs_nickname>>, <i>really</i>? Of all the boys in school, you go for the wannabe tough guy with tiny dick syndrome? With the amount of steriods he''s probably jacked up on, I''d be surprised if his dick hasn''t shrivelled back up inside him yet." You''re about to speak, but she scoffs in disgust and quickly changes the subject.'
 					act 'Stop talking': gt 'albinahome', 'bedroom'
 					act 'Change the subject': gt 'albina_chat', 'chat'
@@ -894,12 +1366,59 @@ if $ARGS[0] = 'lover_conversation':
 			if artemQW['bf'] = 1:
 				act 'Artem':
 					cla
-					'"Artem..." you reply. She arches a brow.'
-					'"Artem? Loser nerd Artem?" She stops and seems to consider it. "Don''t you <i>ever</i> fucking tell him I said this, but he is kind of cute. I bet you have him wrapped around your little finger and he does whatever you want, right?" she says with a sly smile.'
+                    '"Artem," you reply and she arches a brow.'
+                    '"Artem? Geeky little Artem?" She stops and seems to consider it. "Well, I guess he is kind of cute... I bet you have him wrapped around your little finger and he does whatever you want, right?" she says with a sly smile.'
 					'You shake your head. "He''s sweet, and really nice to me."'
-					'She laughs, seemingly amused by your words. "Yeah, I''m sure he is ''nice'' and ''sweet''. Does he rock your world though?" she asks with a grin."'
-					'You disregard her comment. "There''s more to life than sex you know." The amused look on her face tells you she isn''t buying it. "Okay fine, he''s pretty good at it... Good enough anyway."'
-					'She again laughs at your comment. "I''m sure that feedback will be well received. Whatever, he''s a nerd who''s getting some pussy. That makes him the alpha of that pack of losers," she says while shrugging her shoulders.' 
+					'She laughs. "Yeah, I''m sure he is ''nice'' and ''sweet''. Does he rock your world though?" she asks with a grin."'
+					if ArtemQW['sex'] = 0 or ArtemQW['anal'] = 0:	
+						'"We... haven''t had sex yet..." you reply and she frowns.'
+						'"Seriously? How far have you got?"'
+						if ArtemQW['hj'] >= 1:
+							act 'Handjobs':
+								'"I''ve only jerked him off," you reply.'
+								'"That''s a good start," she says. "You''re not leaving him with blue balls at least, but he''s going to want you to jump on his cock at some point, <<$pcs_nickname>>."'
+								'She''s unashamedly crude, but has a point.'
+							end
+						elseif ArtemQW['bj'] >= 1:	
+							act 'Blowjobs':
+								'"I''ve sucked his dick, but I''m waiting for the right time for us to actually have sex."'
+								'She smiles. "I get that, but don''t wait too long or he might think it''s never happening. You could even let him fuck you in the ass to make up for his wait," she grins.'
+								'She''s unashamedly crude, but has a point.'
+							end
+						elseif ArtemQW['dryhump'] >= 1:	
+							act 'Dry humping':	
+								'"We''ve been dry humping and he cums on my ass," you reply and she looks bewildered.'
+								'"Dry humping? You''re telling me he''s been grinding his cock against you, but never once tried to shove it in you, not even up your ass?"'
+								'Yeah, what''s wrong with that?" you ask.'
+								*nl
+								'"What''s wro-? <<$pcs_nickname>>, if a guy did that to me, my pussy would be <i>aching</i> for him to just ram it inside me. Don''t you feel the same?"'
+								'"Well yeah, but we don''t want to rush things," you admit and she gives you a dry stare.'
+								'"Rush things? You''re practically having sex already, so just bend over and let him pound that pussy already!""'
+								'She''s unashamedly crude, but has a point.'
+							end
+						else
+							act 'Nothing':
+								'"We haven''t done anything yet..." you admit and she looks genuinely surprised.'
+								'Seriously? You have a boyfriend and haven''t done <i>anything</i> sexual with him?"'
+								'"We''re just taking things slow is all," you reply and she gives you a dry stare.'
+								'"Too slow, <<$pcs_nickname>>. How big are you going to let his blue balls get before you at least jerk him off? Hell, the boy sounds like he needs a good blowjob at this point."'
+								*nl
+								'She''s unashamedly crude, but has a point. "I guess you''re right. What harm can a handjob do?" you ask and she giggles.'
+								'"You''d probably get a good facial from all the cum he''s built up."'
+							end
+						end
+					else	
+						'You disregard her comment. "There''s more to life than sex you know!" The amused look on her face tells you she isn''t buying it. "Okay fine, he''s pretty good at it... Good enough anyway."'
+						'She laughs at your comment. "I''m sure that feedback will boost his confidence. Does he fuck you in the ass at least?" she says with a grin.'
+						if ArtemQW['anal'] >= 1:
+							'You grin and nod.'
+							'"That''s my girl!" she replies and gives you a high five.'
+						else
+							'"No. Not yet at least," you reply and she grins.'
+							'"He should. It would rock his world as much as it would yours. I''ll even let you borrow some of my lube if you need it."'
+							'You both giggle at her comment.'
+						end
+					end
 					act 'Stop talking': gt 'albinahome', 'bedroom'
 					act 'Change the subject': gt 'albina_chat', 'chat'
 				end
@@ -907,7 +1426,7 @@ if $ARGS[0] = 'lover_conversation':
 			if Rex_Love = 1:
 				act 'Rex':
 					cla
-					'"Rex..." you reply.'
+					'"Rex," you reply.'
 					'She cocks her head slightly before replying. "Wait <i>Rex</i>, the guy who throws all those kick ass parties?"'
 					'You nod. "Yeah, that''s him."'
 					'She grows strangely excited. "How the fuck did you meet him? Isn''t he older than us?"'
@@ -918,7 +1437,7 @@ if $ARGS[0] = 'lover_conversation':
 			end
 			i = 0
 			:lover_looop
-			if loverGender[i] ! 1: dynamic '	act ''<<$npc_usedname["<<$lover[i]>>"]>>'': gt ''albina_chat'', ''tell_about_generic_boyfreind'', $npc_usedname["<<$lover[i]>>"]'
+			if loverGender[i] ! 1: dynamic '	act ''<<$npc_usedname["<<$lover[i]>>"]>>'': gt ''albina_chat'', ''tell_about_generic_boyfriend'', $npc_usedname["<<$lover[i]>>"]'
 			i +=1
 			if i < ARRSIZE('lover'): jump 'lover_looop'
 			Killvar 'i'
@@ -1014,7 +1533,7 @@ if $ARGS[0] = 'zoya_conversation':
 			AlbinaQW['Mom_Future'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
-			'You''re not sure how you should ask this, but you are curious about her mother. "I don''t mean to pry, but what''s the story with your mother?"'
+			'You''re not sure how you should ask this, but you''re curious about her mother. "I don''t mean to pry, but what''s the story with your mother?"'
 			'Albina glances at you, but relents. "My mother is fascinated by the human mind and wanted to become a psychiatrist, so she ended up doing modelling, a lot of it erotic, to earn enough money to go to university. She met my... my father in a nightclub and they had a one night stand. Soon after, they started dating and eventually got married. She ended becoming his trophy wife that he paraded around at every social event."'
 			act 'Continue':
 				cla & *clr

+ 1 - 0
locations/albina_starlets.qsrc

@@ -1242,6 +1242,7 @@ if $ARGS[0] = 'whore7':
 	gs 'willpower', 'drink', 'force'
 	if will_cost <= pcs_willpwr:
 		act 'Refuse':
+			gs 'willpower', 'pay'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/prostitute/bukkake2.jpg"></center>'
 			'You quietly shake your head and the man just scoffs. "Suit yourself," he says before downing the glass. Another man then starts playing some music.

+ 105 - 105
locations/albinahome.qsrc

@@ -9,19 +9,19 @@ if $ARGS[0] = 'gate':
 	act 'Leave':gt 'pav_residential'
 	
     if hour = 23 or hour < 7:
-		'Now isn''t a good time for a house call.'
+		'There are better times for a house call than right now.'
 	elseif hour < 9:
-		'You push a button on the intercom and a female voice blasts through. "What kind of ungodly hour do you call this?! Come back later for a social call!" That must have been her mother.'	
+		'You push a button on the intercom, and a female voice blasts through. "What kind of ungodly hour do you call this?! Come back later for a social call!" That must have been her mother.'	
 	elseif hour <17:
 		if (kanikuli = 0) and (week < 6):
-			'Nobody answers when you buzz the intercom a few times and you decide to leave.'
+			'Nobody answers when you buzz the intercom a few times, and you decide to leave.'
 		else
 			gt 'albinahome', 'mom answers'
 		end
 	elseif hour < 20:
 		gt 'albinahome', 'mom answers'
 	else	
-		if hour >= 9:'You push a button on the intercom and a female voice comes through asking who it is. When you say you''re here to see Albina, she tells you that Albina is currently unavailable and you should come back later.'
+		if hour >= 9:'You push a button on the intercom, and a female voice asks who it is. When you say you''re here to see Albina, she tells you that Albina is unavailable and you should come back later.'
 	end
 	gs 'stat'
 end
@@ -30,12 +30,12 @@ if $ARGS[0] = 'mom answers':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinahome.jpg"></center>'
 	if AlbinaQW['albride'] = 2:
 		AlbinaQW['albride'] = 3
-		'You push a button on the intercom and you''re surprised to hear a somewhat cautious sounding female voice crackle through the speaker as you hear Albina in the background.'
+		'You push a button on the intercom, and you''re surprised to hear a somewhat cautious-sounding female voice crackle through the speaker as you hear Albina in the background.'
 		'The strange voice asks who you are and when she says your name to Albina, Albina gleefully tells you to excuse her mother''s caution and invites you in. The voice apologizes to you as the gate slowly opens.'
 		act 'Walk up the driveway': gt 'albinahome', 'hallway'
 	else
-		'You push a button on the intercom and you hear the familiar voice of Albina''s mother on the other end. You tell her it''s you and she opens the gate.'
-		'"She really enjoys having you come round and visit her you know? It''s good for her to have such a dependable friend to rely on after everything she''s been through." she adds.'
+		'You push a button on the intercom and hear the familiar voice of Albina''s mother on the other end. You tell her it''s you, and she opens the gate.'
+		'"She enjoys having you come round and visit her, you know? It''s good for her to have such a dependable friend to rely on after everything she''s been through," she adds.'
 		act 'Walk up the driveway': gt 'albinahome', 'hallway'
 	end
 end
@@ -56,18 +56,18 @@ if $ARGS[0] = 'hallway':
 		!!First time visiting on your own after she shows you where she lives
 		AlbinaQW['visiting'] = 1
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/zoya.jpg"></center>'
-		'You walk up the long driveway to the front door and knock. It opens to reveal a woman you estimate to be in her late 30s. She''s very attractive and well dressed, wearing high heels, a pencil skirt, and a partially unbuttoned blouse that gives you a view of her substantial cleavage that bulges against the fabric.'
+		'You walk up the long driveway to the front door and knock. It opens to reveal a woman you estimate to be in her late 30s. She''s beautiful and well-dressed. She wears high heels, a pencil skirt, and a partially unbuttoned blouse that gives you a view of her substantial cleavage that bulges against the fabric.'
 		'"You must be <<$pcs_firstname>>!" she smiles. "Albina has told me quite a bit about you. All good things, I assure you," she adds with a laugh.'
-		'The woman holds out her hand for you to shake and you do so tentatively. "I''m sorry, and you are...?"'
-		'"Oh! Forgive my rudeness. I''m Albina''s mother, Zoya Petrenko." <i>Albina''s mother??</i> you think, shocked by the introduction.'
-		'"It''s a pleasure to meet you!" you blurt out. "Mrs... Ms... Uhh..." you flounder, realizing she didn''t use Albina''s surname and you''re not sure what to do.'
-		'"Doctor actually," she says, handling it with grace. "But," she continues, holding up her hand. "You can just call me Zoya."'
+		'The woman holds her hand for you to shake, and you do so tentatively. "I''m sorry, and you are...?"'
+		'"Oh! Forgive my rudeness. I''m Albina''s mother, Zoya Petrenko." <i>Albina''s mother??</i> You think, shocked by the introduction.'
+		'"It''s a pleasure to meet you!" you blurt out. "Mrs... Ms... Uhh..." you flounder, realizing she didn''t use Albina''s surname, and you''re unsure what to do.'
+		'"Doctor, actually," she says, handling it with grace. "But," she continues, holding up her hand. "You can just call me Zoya."'
 		'"Oh no! I could-"'
 		'"I insist," she smiles warmly. "Would you like to come inside?"'
 		act 'Continue':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/zoya.jpg"></center>'
-			'"Albina is in her room right now, I expect the maid has told her of your arrival already." She grabs her coat and clatters her way to the front door. "I wish I could be a more entertaining host, but I have to get to the hospital so I will just have to leave that to my daughter. If you are a frequent visitor, you might not see me a lot, but do come and say hello if I''m ever home when you visit. It was nice meeting you <<$pcs_firstname>>."'
+			'"Albina is in her room right now. I expect the maid has told her of your arrival already." She grabs her coat and clatters her way to the front door. "I wish I could be a more entertaining host, but I have to get to the hospital, so I will just have to leave that to my daughter. If you are a frequent visitor, you might not see me often, but do come and say hello if I''m ever home when you visit. It was nice meeting you, <<$pcs_firstname>>."'
 			'She gives a parting smile and closes the door behind her.'
 			act 'Continue': gt 'albinahome', 'bedroom'
 		end
@@ -110,7 +110,7 @@ if $ARGS[0] = 'hallway':
 					!! maid greeting sveta at front door
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/maid.jpg"></center>'
 					'The maid answers the door with a polite smile.'
-					'"Miss Albina is in her room and said you should meet her there." she says before motioning for you to enter and closing the door behind you before returning to her duties.'
+					'"Miss Albina is in her room and said you should meet her there," she says before motioning for you to enter and closing the door before returning to her duties.'
 					act 'Continue': gt 'albinahome', 'bedroom'
 				end
 			else
@@ -118,13 +118,13 @@ if $ARGS[0] = 'hallway':
 				if temp = 1:
 					!! Zoya greets you
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/zoya.jpg"></center>'
-					'The door opens and you see that it''s Zoya, who smiles at you.'
+					'The door opens, and you see that it''s Zoya, who smiles at you.'
 					'"Please make yourself at home <<$pcs_nickname>>. Albina is up in her room. I''m sure she''ll be thrilled to see you."'
 					act 'Continue': gt 'albinahome', 'bedroom'
 				else
 					!! Albina greets you
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
-					'The door flies open and Albina greets you with a rather tight hug.'
+					'The door flies open, and Albina greets you with a tight hug.'
 					'"<<$pcs_nickname>>! Come in, come in," she says while dragging you inside and closing the door.'
 					act 'Continue': gt 'albinahome', 'bedroom'
 				end
@@ -133,7 +133,7 @@ if $ARGS[0] = 'hallway':
 	else
 		!! For leaving the house or going to the bathroom, no random event chances
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/hallway.jpg"></center>'
-		'The foyer is well appointed with hardwood flooring, numerous arches and tasteful decor. Lighting is sunk into the exquisite staircase that features wraparound balconies on either side.'
+		'The foyer is well-appointed with hardwood flooring, numerous arches and tasteful decor. Lighting is sunk into the exquisite staircase with wraparound balconies on either side.'
 		'You have been asked not to wander around the house alone, so you''re limited in where you can go.'
 		act 'Go back to town':
 			AlbinaQW['visiting'] = 0
@@ -216,12 +216,12 @@ if $ARGS[0] = 'bedroom':
 	if AlbinaQW['albride'] = 3:
 		AlbinaQW['albride'] = 4
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
-		'You head up to Albina''s room and she smiles at you when you walk in. "So you met my mother then? Don''t worry, she''s <i>mostly</i> harmless and actually likes you. So what do you want to do?"'
+		'You head up to Albina''s room, and she smiles at you when you walk in. "So you met my mother then? Don''t worry. She''s <i>mostly</i> harmless and actually likes you. So what do you want to do?"'
 		act 'Hang out': gt $loc, $loc_arg
 	else
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-		'You are impressed at how nice Albina''s bedroom looks, the centrepiece being a large double bed covered in soft pillows. A door at the back of the room leads to her en-suite bathroom and she even has a sliding door leading to a balcony that overlooks the nearby lake. A closet full of expensive looking clothes is built into one of the walls.'
-		'By the bed is a small <a href="exec:gt ''albina_house_events'',''night_stand''">night stand</a>, and on a desk is a <a href="exec:gt ''albina_house_events'',''computer''">laptop</a>'
+		'You are impressed at how nice Albina''s bedroom looks, the centrepiece being a large double bed covered in soft pillows. A door at the back of the room leads to her en-suite bathroom, and she even has a sliding door leading to a balcony that overlooks the nearby lake. A closet full of expensive-looking clothes is built into one of the walls.'
+		'By the bed is a small <a href="exec:gt ''albina_house_events'',''night_stand''">nightstand</a>, and on a desk is a <a href="exec:gt ''albina_house_events'',''computer''">laptop</a>'
 		act 'Return to the hallway': gt 'albinahome', 'hallway'
 		act 'Chat with Albina': gt 'albina_chat', 'chat'
 		act 'Talk about video games': gt 'albinahome', 'game'
@@ -239,7 +239,7 @@ if $ARGS[0] = 'dancing':
 	if AlbinaQW['SportHome']  = 0:
 		'<center><video autoplay loop src="images/locations/pavlovsk/resident/albinahome/train.mp4"></video></center>'
 		'Albina is training in her room, doing some stretching exercises.'
-		'She''s wearing a pair of skin tight yoga pants that show off her toned body quite well.'
+		'She''s wearing skin-tight yoga pants that show off her toned body quite well.'
 		act 'Ask why she doesn''t train at the gym':
 			*clr & cla
 			AlbinaQW['SportHome']  = 1
@@ -247,8 +247,8 @@ if $ARGS[0] = 'dancing':
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
 			'"I don''t like the sweaty perverts at the gym staring at my ass, so I prefer training at home instead," she replies.'
-			'You can''t help but stare at her firm, shapely rear as she says that and she grins at you.'
-			'"Eyes up here <<$pcs_nickname>>! Anyway, I could teach you about stripping and poledancing if you want?"'
+			'You can''t help but stare at her firm, shapely rear as she says that, and she grins at you.'
+			'"Eyes up here, <<$pcs_nickname>>! Anyway, if you want, I could teach you about stripping and pole dancing?"'
 			act 'No thanks': AlbinaQW['SportDay'] = daystart & gt 'albinahome', 'bedroom'
 			act 'Teach me stripping': gt 'albinahome', 'stripping'
 			act 'Teach me poledancing': gt 'albinahome', 'poledancing'
@@ -275,7 +275,7 @@ if $ARGS[0] = 'stripping':
 		gs 'stat'
 		'"Okay, we need some space. Follow me." She leads you down to the home gym, where she teaches you how to passionately dance to the music while stripping.'
 
-		if pcs_dancero >= 100:'You didn''t learn anything new since you already know everything she can teach you.'
+		if pcs_dancero >= 100:'You don''t learn anything new since you already know everything she can teach you.'
 	else
 		gs 'exercise', 'tier3', 120, 'agil', 'danc'
 		gs 'stat'
@@ -294,21 +294,21 @@ if $ARGS[0] = 'poledancing':
 		gs 'exercise', 'tier2', 120, 'stren', 'vital', 'dancpol'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/poledance.jpg"></center>'
-		'Albina leads you down to the home gym, where she teaches you various acrobatic moves on the pole there and the two of you greatly enjoy yourselves.'
+		'Albina leads you to the home gym, where she teaches various acrobatic moves on the pole. The two of you greatly enjoy yourselves.'
 		if pcs_dancpol >= 100: 'You didn''t learn anything new since you already know everything she can teach you.'
 		gs 'albinahome', 'post_workout_shower'
 		act 'Rest':gt 'albinahome', 'bedroom'
 	elseif pcs_stren < 40 and pcs_dancero > 50:
-		'You try your best to follow Albina''s instructions, but you end up smacking your head on the pole instead and fall to the floor.'
-		'You are flat on your back and see Albina kneeling over you. "Are you okay <<$pcs_nickname>>? It looks like you''re still too weak for poledancing, so we need to develop your strength instead."'
-		'You nod at her and she pulls you to your feet before checking your head. "It might bruise, but otherwise you look fine."'
+		'You try your best to follow Albina''s instructions but end up smacking your head on the pole instead and falling to the floor.'
+		'You are flat on your back and see Albina kneeling over you. "Are you okay, <<$pcs_nickname>>? You''re still too weak for pole dancing, so we need to develop your strength instead."'
+		'You nod at her, and she pulls you to your feet before checking your head. "It might bruise, but otherwise, you look fine."'
 		act 'Develop strength (2:00)':
 			*clr & cla
 			gs 'exercise', 'tier2', 120, 'stren', 'vital'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/stren.jpg"></center>'
 			'Albina shows you how to develop your strength using various exercises.'
-			'You silently wonder if these exercises are how she has such a great looking ass.'
+			'You wonder if these exercises are how she has such a great-looking ass.'
 			gs 'albinahome', 'post_workout_shower'
 			act 'Rest':gt 'albinahome', 'bedroom'
 		end
@@ -316,13 +316,13 @@ if $ARGS[0] = 'poledancing':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/stripdance.jpg"></center>'
 		if pcs_inhib < 60:inhib_exp += rand(2,3)
-		'Albina grins. "You still can''t strip well enough for poledancing. We should practice that first."'
+		'Albina grins. "You still can''t strip well enough for pole dancing. We should practice that first."'
 		if pcs_danc >= 40:
 			gs 'exercise', 'tier2', 120, 'agil', 'dancero'
 			gs 'stat'
 			'Albina teaches you how to passionately dance to the music while stripping.'
 
-			if pcs_dancero >= 100:'You didn''t learn anything new since you already know everything she can teach you.'
+			if pcs_dancero >= 100:'You don''t learn anything new since you already know everything she can teach you.'
 		else
 			gs 'exercise', 'tier3', 120, 'agil', 'danc'
 			gs 'stat'
@@ -346,8 +346,8 @@ if $ARGS[0] = 'dressing':
 		pcs_mood += 10
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/dressing.jpg"></center>'
-		'You and Albina open her huge wardrobe and begin digging into her various clothes.'
-		'As you rummage around in her wardrobe, you are amazed by how many different clothes she owns. It feels like her wardrobe is a bottomless pit filled with dresses, skirts, leggings, jeans and all kinds of other expensive looking clothes.'
+		'You and Albina open her vast wardrobe and begin digging into her various clothes.'
+		'As you rummage around in her wardrobe, you are amazed by how many different clothes she owns. Her wardrobe seems like a bottomless pit filled with dresses, skirts, leggings, jeans and other expensive-looking clothes.'
 		'The two of you end up spending an hour trying on various different outfits.'
 		act 'Finish': gt 'albinahome', 'bedroom'
 	end
@@ -359,8 +359,8 @@ if $ARGS[0] = 'game':
 	minut += 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
-	'You notice the flat screen TV and a games console sitting in front of it. A row of various Tekken and Mortal Kombat games sit underneath them.' 
-	'"I wish I could afford a console..." you mumble out loud.'
+	'You notice the flat-screen TV and a games console sitting in front of it. A row of various Tekken and Mortal Kombat games sit underneath them.' 
+	'"I wish I could afford a console..." you mumble.'
 	'She smiles at you. "You want to play a few games?"'
 	act 'No':
 		*clr & cla
@@ -368,7 +368,7 @@ if $ARGS[0] = 'game':
 		minut += 2
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinatalk.jpg"></center>'
-		'You shake your head. "Not right now thanks. I just noticed them is all, maybe some other time."'
+		'You shake your head. "Not right now, thanks. I just noticed them, is all. Maybe some other time."'
 		'She shrugs. "Sure. If you ever want to play, all you have to do is ask."'
 		act 'Do something else': gt 'albinahome', 'bedroom'
 	end
@@ -398,7 +398,7 @@ if $ARGS[0] = 'game':
 					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					'You shake your head. "Not this time."'
-					'You can tell she is a little disappointed, but she turns her attention to the game. "You are so going to lose!" she laughs. You play games for a while, although things are a little awkward between you. Eventually, Albina stops. "Well I had fun, but there is some stuff I need to take care of." she says as she turns the console off.'
+					'She is a little disappointed but turns her attention to the game. "You are so going to lose!" she laughs. You play games for a while, although things are a little awkward between you. Eventually, Albina stops. "Well, I had fun, but there is some stuff I need to take care of," she says as she turns the console off.'
 					'Getting the hint, you get up as well. "Yeah, I should probably get going myself." You exchange a brief hug before you leave.'
 					act 'Say goodbye and go home':
 						AlbinaQW['visiting'] = 0
@@ -410,7 +410,7 @@ if $ARGS[0] = 'game':
 				act 'Refuse the bet (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 			end
 		else
-			'You and Albina lie down in front of the TV after picking one of the games. You play while chatting about various things and trash talking each other, although neither of you are giving your full attention to the game. You''re just having fun together.'
+			'You and Albina lie down in front of the TV after picking one of the games. You play while chatting about various things and trash-talking each other. However, neither of you are giving your full attention to the game. Instead, you''re just having fun together.'
 			act 'Finish playing': gt 'albinahome', 'bedroom'
 			act 'Keep playing': gt 'albinahome', 'playgame'
 		end
@@ -427,11 +427,11 @@ if $ARGS[0] = 'playgame':
 	npc_rel['A23'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/game.jpg"></center>'
-	'The two of you keep playing video games and trash talking each other, even bumping each other to try and screw each other up, but neither of you are taking it seriously. You mostly just laugh at the silly mistakes you both make while only partially paying attention to the game.'
+	'The two of you keep playing video games and trash-talking, even bumping each other to try and screw each other up. Still, neither of you are taking it seriously. Instead, you mostly just laugh at the silly mistakes you both make while only partially paying attention to the game.'
 	if hotcat >= 5:
 		'Once you finish the game, Albina turns to you instead of starting another one. "How about we see who actually <i>is</i> the better gamer?" she asks with a confident smile.'
 		'You laugh and nod. "Sure, but you''re so going down!"'
-		'She laughs in response. "You''re that sure? Then how about we make it a bit more interesting then?"'
+		'She laughs in response. "You''re that sure? So, how about we make it a bit more interesting then?"'
 		'You arch your brow curiously. "What do you have in mind?"'
 		'She grins at you, gets up and walks over to her dresser. She rummages around in it before pulling out a strapon harness with a large black dildo attached. "The winner gets to use this on the loser... However. They. Want," she says with a smirk.'
 
@@ -448,7 +448,7 @@ if $ARGS[0] = 'playgame':
 				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
 				'You shake your head. "Uhhh... I''m really not interested in doing that."'
-				'Albina puts the strapon away and you can tell she is a little disappointed as she comes back over and lies down beside you again. "You are so going to lose!" she laughs. You continue to play games for a while, although things are awkward between you. Eventually, Albina stops. "Well I had fun, but there''s some stuff I need to take care of." she says as she turns the console off.'
+				'Albina puts the strapon away, and you can tell she is a little disappointed as she comes back over and lies down beside you again. "You are so going to lose!" she laughs. You continue to play games for a while, although things are awkward between you. Eventually, Albina stops. "Well, I had fun, but there''s some stuff I need to take care of," she says as she turns the console off.'
 				'Getting the hint, you get up as well. "Yeah, I should probably get going myself." You exchange a brief hug before you leave.'
 				act 'Say goodbye and go home':
 					AlbinaQW['visiting'] = 0
@@ -480,8 +480,8 @@ if $ARGS[0] = 'game_bet':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/game.jpg"></center>'
 	'You stare at the size of the attached dildo. It''s almost as long and thick as your forearm. "Where did you get that?!" you laugh. "Whatever, you''re on. You''re so going to get fucked!"'
-	'Albina laughs as she brings the strapon over with a bottle of lube and tosses them on the bed next to you before she lies back down beside you and picks her controller up. "Please! You''re so going to lose."' 
-	'She starts the game and you both fall silent, your focus only on winning.'
+	'Albina laughs as she brings the strapon over with a bottle of lube and tosses them on the bed before she lies back beside you and picks her controller up. "Please! You''re so going to lose."' 
+	'She starts the game, and you both fall silent, your focus only on winning.'
 	act 'Play until someone wins':
 		*clr & cla
 		menu_off = 1
@@ -498,16 +498,16 @@ if $ARGS[0] = 'game_bet':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/game.jpg"></center>'
 		if albplay = 3:
-			'She doesn''t even come close to beating you. Before the game can end, she lets out an exacerbated sigh and tosses her controller down in defeat, knowing she has no chance. You give her a gloating smirk as she reaches over and grabs the strapon harness before handing it to you. You both undress and you grin as you slide the harness on.'
+			'She doesn''t even come close to beating you. Before the game can end, she lets out an exacerbated sigh and tosses her controller down in defeat, knowing she has no chance. You give her a gloating smirk as she reaches over and grabs the strapon harness before handing it to you. You both undress, and you grin as you slide the harness on.'
 			act 'Continue': gt 'albinahome', 'wear_strapon'
 		elseif albplay = 2:
-			'It''s close, but in the end you just manage to win the game. "Yes!" you exclaim triumphantly, and she laughs as she grabs the strapon harness and hands it to you. You both undress and you grin as you slide the harness on.'
+			'It''s close, but in the end, you just manage to win the game. "Yes!" you exclaim triumphantly, and she laughs as she grabs the strapon harness and hands it to you. You both undress, and you grin as you slide the harness on.'
 			act 'Continue': gt 'albinahome', 'wear_strapon'
 		elseif albplay = 1:
-			'Although you try your best, Albina proves a worthy opponent and manages to just barely defeat you. Laughing in a mocking and villianous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress and Albina slides the harness on with a smirk on her face.'
+			'Although you try your best, Albina proves a worthy opponent and barely defeats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
 			act 'Get fucked with the strapon': gt 'albinahome', 'receive_strapon'
 		elseif albplay = 0:
-			'Although you try your best, Albina simply outplays you at every turn. You stand no chance and she easily beats you. Laughing in a mocking and villianous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress and Albina slides the harness on with a smirk on her face.'
+			'Although you try your best, Albina simply outplays you at every turn. You stand no chance, and she easily beats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
 			act 'Get fucked with the strapon': gt 'albinahome', 'receive_strapon'
 		end
 		killvar 'gameresult'
@@ -518,7 +518,7 @@ if $ARGS[0] = 'game_bet':
 		menu_off = 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/game.jpg"></center>'
-		'You''re not sure why, but part of you <i>wants</i> her to use the strapon on you, so you purposefully lose the game. Albina looks at you suspiciously with a raised brow, but smiles and smacks your ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress and Albina slides the harness on with a smirk on her face.'
+		'You''re not sure why, but part of you <i>wants</i> her to use the strap-on on you, so you purposefully lose the game. Albina looks at you suspiciously with a raised brow but smiles and smacks your ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
 		act 'Get fucked with the strapon': gt 'albinahome', 'receive_strapon'
 	end
 end
@@ -527,10 +527,10 @@ if $ARGS[0] = 'wear_strapon':
 	*clr & cla
 	menu_off = 1
 	'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/albina/sex/game/spank.mp4"></video></center>'
-	'Before you can begin, Albina smirks at you while wiggling her ass. "I need to be punished for losing first. Spank me <<$pcs_nickname>>, and don''t stop until my pussy is wet and my ass is red and stinging!"'
+	'Before you can begin, Albina smirks at you while wiggling her ass. "I need to be punished for losing first. Spank me, <<$pcs_nickname>>, and don''t stop until my pussy is wet and my ass is red and stinging!"'
 	'She pushes you down onto the bed and lays across your lap before looking up at you. "Don''t make me beg, <<$pcs_nickname>>."'
-	'You smile at her before raising your hand and giving her a firm smack on the ass. "Harder!" she blurts out and you respond by delivering a hard smack that leaves both her ass and your hand red and stinging. "Oh FUCK, <i>yeeesss</i>! Do that again!" she moans in an almost orgasmic tone.'
-	'You continue spanking her as hard as you can until the stinging in your hand becomes too much and you have to stop. "That was fucking amazing <<$pcs_nickname>>! I''m so fucking wet after that!" True to her word, you can feel her juices trickling down your leg. "I need you to fuck me just as hard now. Pound me until I cum!" She climbs off of you and you stand to adjust the harness around your hips.' 
+	'You smile at her before raising your hand and giving her a firm smack on the ass. "Harder!" she blurts out, and you respond by delivering a hard smack that leaves both her ass and your hand red and stinging. "Oh FUCK, <i>yeeesss</i>! Do that again!" she moans in an almost orgasmic tone.'
+	'You continue spanking her as hard as you can until the stinging in your hand becomes too much, and you have to stop. "That was fucking amazing, <<$pcs_nickname>>! I''m so fucking wet after that!" True to her word, you can feel her juices trickling down your leg. "I need you to fuck me just as hard now. Pound me until I cum!" She climbs off of you, and you stand to adjust the harness around your hips.' 
 	gs 'arousal', 'BDSM_give', 8, 'dom', 'lesbian'
 	gs 'stat'
 
@@ -539,7 +539,7 @@ if $ARGS[0] = 'wear_strapon':
 		lesbian += 1
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
-		'With the strapon firmly in place, you stand next to the bed and pull her head down to the dildo. "Suck my dick loser!" you giggle.'
+		'With the strapon firmly in place, you stand next to the bed and pull her head down to the dildo. "Suck my dick, loser!" you giggle.'
 		'She laughs before she takes the dildo in her mouth and starts sucking while stroking the shaft with one hand. You spend several minutes making her suck on the dildo, getting it wet with her drool.'
 		gs 'arousal', 'foreplay', 5, 'lesbian'
 		gs 'stat'
@@ -548,14 +548,14 @@ if $ARGS[0] = 'wear_strapon':
 			gs 'boyStat', 'D3'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/givevag.jpg"></center>'
-			'You pull away until the dildo slides out of her mouth, climb onto the bed next to her and lie on your back. "Come and ride it cowgirl!" you laugh. She straddles you and lowers herself down until the dildo slides easily inside of her wet pussy, causing her to moan in pleasure. She starts riding you slowly, but picks up speed, moaning louder and louder.'
+			'You pull away until the dildo slides out of her mouth, climb onto the bed next to her and lie on your back. "Come and ride it, cowgirl!" you laugh. She straddles you and lowers herself down until the dildo slides easily inside her wet pussy, causing her to moan in pleasure. She starts riding you slowly but picks up speed, moaning louder and louder.'
 			gs 'arousal', 'vaginal_strap_give', 8, 'lesbian'
 			gs 'stat'
 			act 'Fuck her faster':
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/givevag.jpg"></center>'
-				'You slap her on the ass. "Come on Albina! Ride it like you mean it!" With your encouragement, she starts really riding you hard and fast, her ass slapping against your thighs as she takes the whole length inside her. She rides you for several minutes before she slides off the dildo, which glistens with her juices, and collapses on the bed next to you. She looks at you with an appreciative smile on her face before she leans over and whispers in your ear.'
+				'You slap her on the ass. "Come on, Albina! Ride it like you mean it!" With your encouragement, she starts really riding you hard and fast, her ass slapping against your thighs as she takes the whole length inside her. She rides you for several minutes before she slides off the dildo, glistens with her juices, and collapses on the bed next to you. She looks at you with an appreciative smile before she leans over and whispers in your ear.'
 				'"I want you to fuck my ass now..."' 
 				'You grin as she giggles and gets on all fours to wiggle her bubble butt at you.'
 				gs 'arousal', 'vaginal_strap_give', 7, 'lesbian'
@@ -575,18 +575,18 @@ if $ARGS[0] = 'fuck_albina_ass':
 	gs 'boyStat', 'D3'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal1.jpg"></center>'
-	'You grab the bottle of lube and squirt some onto the dildo, rubbing it up and down the shaft until it is very slick before spreading her ass cheeks and applying a generous amount onto her asshole. You grab her ass in your hand and appreciate how firms it feels in your grip.'
-	'"Like what you see?" she giggles. You kneel down behind her, line the head of the dildo up with her asshole and slowly push forward. There is little resistance, and the huge dildo slides into her ass with ease, causing her to moan in pleasure as you go deeper and faster. You look down and admit that her ass is amazing, the dildo being enveloped by her huge, firm cheeks as you thrust in and out of her back door.' 
-	'You wonder what the guys in your class would do to be in your position right now as you continue fucking her ass. After a few minutes, you pull out of her and she looks back over her shoulder at you.'
+	'You grab the bottle of lube and squirt some onto the dildo. You rub it up and down the shaft until it is very slick before spreading her ass cheeks and applying a generous amount onto her asshole. You grab her ass in your hand and appreciate how firm it feels in your grip.'
+	'"Like what you see?" she giggles. You kneel down behind her, line the head of the dildo up with her asshole and slowly push forward. There is little resistance, and the large dildo slides into her ass easily, causing her to moan as you go deeper and faster. You look down and admit that her ass is fantastic, the dildo enveloping her huge, firm cheeks as you thrust in and out of her back door.' 
+	'You wonder what the guys in your class would do to be in your position as you continue fucking her ass. Finally, after a few minutes, you pull out of her, and she looks back over her shoulder at you.'
 	gs 'arousal', 'anal_strap_give', 5, 'lesbian'
 	gs 'stat'
 	act 'Keep fucking her ass':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal2.jpg"></center>'
-		'"Come on <<$pcs_nickname>>. Put it back in and fuck me... hard," she says while wiggling her hips. You smile at her and slide the dildo back into her hole with ease, making her moan in pleasure. You grab onto her hips and start fucking her balls deep, filling her ass with the entire dildo as she reaches back and starts rubbing her clit. After several minutes, you feel her ass tighten around your fake cock and she cries out as her body is rocked by an intense orgasm and juices squirt from her pussy, soaking the sheets beneath her. You keep fucking her throughout her orgasm, only pulling out once her shudders have passed.'
-		'After you''ve pulled out, she inserts a few fingers into her gaping hole as juices continue leaking from her pussy. "Oh fuck yes <<$pcs_nickname>>! That was fucking amazing!"'
-		'"Fucking such a nice looking ass was amazing!" you reply and you both laugh.'
+		'"Come on, <<$pcs_nickname>>. Put it back in and fuck me... hard," she says while wiggling her hips. You smile at her and slide the dildo back into her hole with ease, making her moan in pleasure. Next, you grab onto her hips and start fucking her balls deep, filling her ass with the dildo as she reaches back and starts rubbing her clit. After several minutes, you feel her ass tighten around your fake cock. Finally, she cries out as her body is rocked by an intense orgasm and juices squirt from her pussy, soaking the sheets beneath her. You keep fucking her throughout her orgasm, only pulling out once her shudders have passed.'
+		'After you''ve pulled out, she inserts a few fingers into her gaping hole as juices leak from her pussy. "Oh fuck yes, <<$pcs_nickname>>! That was fucking amazing!"'
+		'"Fucking such a nice-looking ass was amazing!" you reply, and you both laugh.'
 		gs 'arousal', 'anal_strap_give', 5, 'lesbian'
 		gs 'stat'
 		act 'Finish': gt 'albinahome', 'strapon_finish'
@@ -600,8 +600,8 @@ if $ARGS[0] = 'receive_strapon':
 	lesbian += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
-	'You slide your panties off as she tightens the strapon firmly in place while standing next to the bed. You lie down next to her and she pulls your head down to the dildo. "Suck my dick loser!" she says with a giggle.'
-	'You take the dildo into your mouth and start sucking on it while stroking the shaft with one hand. "Yeah, just like that <<$pcs_nickname>>!" she moans as she reaches between the straps and gently rubs her pussy. You spend several minutes sucking on the dildo, getting it wet with your drool before she pulls it out of your mouth. "I''m so going to enjoy fucking you!"'
+	'You slide your panties off as she tightens the strapon firmly while standing next to the bed. You lie next to her, and she pulls your head down to the dildo. "Suck my dick, loser!" she says with a giggle.'
+	'You take the dildo into your mouth and start sucking on it while stroking the shaft with one hand. "Yeah, just like that, <<$pcs_nickname>>!" she moans as she reaches between the straps and gently rubs her pussy. You spend several minutes sucking on the dildo, getting it wet with your drool before she pulls it out of your mouth. "I''m so going to enjoy fucking you!"'
 	gs 'arousal', 'foreplay', 5, 'lesbian'
 	gs 'stat'
 	if stat['think_virgin'] = 1:
@@ -609,7 +609,7 @@ if $ARGS[0] = 'receive_strapon':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
-			'You blush deeply and she looks at you. "Oh, right. You haven''t done this before," she says, remembering that you''re still pure.'
+			'You blush deeply, and she looks at you. "Oh, right. You haven''t done this before," she says, remembering that you''re still pure.'
 			'You blush even more. "Yes, I''m... still a virgin..." you reply.'
 			'"Well, I can just fuck your ass if you want?" She then gives you a small smile. "Unless you want me to pop your cherry?"'
 			act 'Just fuck my ass': gt 'albinahome', 'albina_ass_fucks_you'
@@ -618,18 +618,18 @@ if $ARGS[0] = 'receive_strapon':
 				gs 'boyStat', 'D3'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
-				'You give her an awkward smile in return. "I... I want you to... take me. My... virginity, that is..." you tell her as your cheeks burn bright red.' 
-				'She smiles back. "Okay, don''t worry. I''ll be gentle since it''s your first time. Just lie on your back and spread your legs." You do as she commands and she climbs onto the bed and scoots in between your legs. She rubs your pussy with her fingers to make sure it''s wet enough, but adds some lube to the dildo anyway. You feel it rubbing against your slit before she slowly slides it into your virgin pussy.' 
-				'It''s both painful and pleasurable at the same time and you moan softly as she slowly starts to fuck you. After a few minutes, it starts to hurt less and you find yourself moaning louder.'
+				'You give her an awkward smile in return. "I... I want you to... take me. My... virginity that is..." you tell her as your cheeks burn bright red.' 
+				'She smiles back. "Okay, don''t worry. I''ll be gentle since it''s your first time. Just lie on your back and spread your legs." You do as she commands, and she climbs onto the bed and scoots between your legs. She rubs your pussy with her fingers to make sure it''s wet enough but adds some lube to the dildo anyway. You feel it rubbing against your slit before she slowly slides it into your virgin pussy.' 
+				'It''s both painful and pleasurable, and you moan softly as she starts to fuck you. After a few minutes, it starts to hurt less, and you find yourself moaning louder.'
 				*nl
-				'After a few more minutes, Albina starts growing tired and pulls out, leaving you feeling a little empty. "So how was that for your first time?" she asks with a smile.'
-				'"It was amazing! I''m glad it was you I shared it with, you were so gentle and considerate," you reply and Albina smiles even wider.'
+				'After a few more minutes, Albina starts growing tired and pulls out, leaving you empty. "So how was that for your first time?" she asks with a smile.'
+				'"It was amazing! I''m glad it was you I shared it with. You were so gentle and considerate," you reply, and Albina smiles even wider.'
 				'"I couldn''t have your first time being a shitty experience like mine...." she replies, but gasps and looks away when she realises what she said.'
 				*nl
 				'You quickly sit up next to her and give her a hug. "Hey, it''s okay. This was the best thing I could hope for when losing my virginity."'
-				'She looks at you as tears well up in her eyes, the memories of what were clearly a traumatic event flooding back to her. "Really? I wanted it to be good for you because-"'
-				'You can see this is a painful memory for her and pull her into another hug. "I know..." you gently reassure her and you both sit in silence for a few minutes before she gets up and pulls the harness off before cleaning the dildo and tossing it back in the drawer.'
-				'"This is supposed to be your happy memory and I don''t want to ruin it for you. Let''s do something fun!" She clearly needs a distraction, so you nod in agreement.'
+				'She looks at you as tears well up in her eyes, the memories of a traumatic event flooding her. "Really? I wanted it to be good for you because-"'
+				'You can see this is a painful memory for her, and pull her into another hug. "I know..." you gently reassure her, and you both sit silently for a few minutes. Finally, she gets up, takes the harness off, cleans the dildo and tosses it back in the drawer.'
+				'"This is supposed to be your happy memory, and I don''t want to ruin it for you. So let''s do something fun!" She clearly needs a distraction, so you nod in agreement.'
 				gs 'arousal', 'vaginal_strap', 5, 'lesbian'
 				gs 'stat'
 				act 'Continue': gt 'albinahome', 'bedroom'
@@ -641,14 +641,14 @@ if $ARGS[0] = 'receive_strapon':
 			gs 'boyStat', 'D3'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
-			'"Lie on your back and spread your legs." You do as she commands and she climbs onto the bed and scoots in between your legs. She rubs the head of the dildo against your pussy before she pushes it inside you. You moan as she slowly starts fucking your pussy, going a little faster the louder you moan.'
+			'"Lie on your back and spread your legs." You do as she commands, and she climbs onto the bed and scoots between your legs. She rubs the head of the dildo against your pussy before she pushes it inside you. You moan as she slowly starts fucking your pussy, going a little faster the louder you moan.'
 			gs 'arousal', 'vaginal_strap', 8, 'lesbian'
 			gs 'stat'
 			act 'Keep getting your pussy fucked':
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag2.jpg"></center>'
-				'She proceeds to fuck you hard, but not too hard, settling into a near perfect thrusting rhythm that you enjoy, feeling youself slowly getting wetter. She seems to be enjoying it as much as you, moaning softly as she fucks you. She leans in and kisses you before suddenly stopping and pulling out. "Okay, that''s enough of that, but I''m not finished with you just yet. Roll over so I can fuck that tight little ass of yours."'
+				'She proceeds to fuck you hard, but not too hard, settling into a near-perfect thrusting rhythm that you enjoy, feeling yourself slowly getting wetter. She seems to enjoy it as much as you, moaning softly as she fucks you. Finally, she leans in and kisses you before suddenly stopping and pulling out. "Okay, that''s enough, but I''m not finished with you just yet. Roll over so I can fuck that tight little ass of yours."'
 				gs 'arousal', 'vaginal_strap', 7, 'lesbian'
 				gs 'stat'
 				act 'Take it up the ass': gt 'albinahome', 'albina_ass_fucks_you'
@@ -665,7 +665,7 @@ if $ARGS[0] = 'albina_ass_fucks_you':
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-				'Thoughts race through your head as you look at the huge dildo, and Albina notices your hesitation.'
+				'Thoughts race through your head as you look at the massive dildo, and Albina notices your hesitation.'
 				'"<<$pcs_nickname>>, have you ever been fucked in the ass before?"'
 				'You shake your head as you feel your cheeks burning bright red. "Uhh... No, I haven''t..."'
 				'She places a hand on your shoulder. "Hey, it''s nothing to be embarrassed about. Plenty of girls don''t do anal."'
@@ -684,9 +684,9 @@ if $ARGS[0] = 'albina_ass_fucks_you':
 				'"<<$pcs_nickname>>, have you ever been fucked in the ass before?"'
 				'You feel your cheeks burning bright red. "Well, I''ve managed to take a fist..."'
 				*nl
-				'Albina looks at you in what you can only describe as awe. "God damn <<$pcs_nickname>>, even I''ve never taken a fist up my ass and I''m the queen of butt stuff!"'
+				'Albina looks at you in what you can only describe as awe. "God damn, <<$pcs_nickname>>, even I''ve never taken a fist up my ass, and I''m the queen of butt stuff!"'
 				'"Is it weird to do that?" you ask with concern.'
-				'"No, not at all! To be honest, I''ve always wanted to try it, but I''ve never found anyone interested in doing it. Maybe that''s about to change..."'
+				'"No, not at all! I''ve always wanted to try it, but I''ve never found anyone interested in it. But, maybe that''s about to change..."'
 				'She looks you over with lustful desire before continuing. "Practicing with a dildo makes your first butt fuck easier, but a whole fucking hand?! A cock or dildo would be a breeze for you!"'
 				'She then places a hand on your shoulder. "<<$pcs_nickname>>, be honest with me. Do you want me to fuck your ass? I''ll be as gentle as you want."'
 				act 'Yes': gt 'albinahome', 'first_anal1'
@@ -699,7 +699,7 @@ if $ARGS[0] = 'albina_ass_fucks_you':
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-				'Thoughts race through your head as you look at the huge dildo, and Albina notices your hesitation.'
+				'Thoughts race through your head as you look at the massive dildo, and Albina notices your hesitation.'
 				'"<<$pcs_nickname>>, have you ever been fucked in the ass before?"'
 				'You feel your cheeks burning bright red. "Well, I''ve used a dildo..."'
 				*nl
@@ -717,14 +717,14 @@ if $ARGS[0] = 'albina_ass_fucks_you':
 			lesbian += 1
 			gs 'boyStat', 'D3'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal1.jpg"></center>'
-			'As you get on all fours, you glance back and see her applying lube to the dildo. She squirts some on the dildo and strokes the shaft with it before she massages a generous amount into your asshole with her fingers. You and the dildo now lubed up, she moves behind you and you feel the dildo pressing against your asshole, the pressure building until the tip pops into your ass, causing you to groan slightly in pain. She slowly starts to slide the dildo up your ass, steadily working it deeper.'
+			'As you get on all fours, you glance back and see her applying lube to the dildo. She squirts some on the dildo and strokes the shaft with it before she massages a generous amount into your asshole with her fingers. You and the dildo now lubed up, she moves behind you, and you feel the dildo pressing against your asshole, the pressure building until the tip pops into your ass, causing you to groan slightly in pain. Next, she slowly slips the dildo up your ass, steadily working it deeper.'
 			gs 'arousal', 'anal_strap', 5, 'lesbian'
 			gs 'stat'
 
 			act 'Get your ass hammered':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal2.jpg"></center>'
-				'Once you''re comfortable with her in your ass, she stands up over you. "Get ready, because now I''m <i>really</i> going to fuck your ass!" she laughs before she starts slamming the full length of the dildo in and out of your ass, causing you to grip the sheets tightly. Despite this, she isn''t too rough and you start enjoying the pleasurable sensation. Albina seemingly grows more aroused the more she fucks you.' 
+				'Once you''re comfortable with her in your ass, she stands up over you. "Get ready because now I''m really going to fuck your ass!" she laughs before slamming the dildo in and out of your ass, causing you to grip the sheets tightly. Despite this, she isn''t too rough, and you start enjoying the pleasurable sensation. Albina seemingly grows more aroused the more she fucks you.' 
 				'Just as it''s starting to hurt, she lets out a loud, pleasured scream as you feel her juices spraying across your legs. You then feel the dildo slide out of you and turn to see Albina sprawled out on the bed in orgasmic bliss, her juices slowly trickling out of her soaking wet pussy as a huge wet patch soaks into the sheets. "You were such a good little buttslut, <<$pcs_nickname>>..." she says softly.'
 				'After riding through her orgasm, she pulls the harness off and tosses it aside.'
 				gs 'arousal', 'anal_strap', 10, 'lesbian'
@@ -742,28 +742,28 @@ if $ARGS[0] = 'first_anal':
 	lesbian += 1
 	gs 'boyStat', 'D3'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-	'"Y-yes, I would. Just promise you''ll be gentle," you reply and Albina smiles.'
-	'"I will. Now get on all fours and bring your ass up as high as you can."'
-	'As you get on all fours, you glance back and see her squirting lube onto her fingers. You shiver when you feel the cold liquid being applied to your asshole and Albina starts massaging it in before you feel her slowly pushing a finger inside you. You moan softly at the sensation as you feel her finger curling up inside you.'
+	'"Y-yes, I would. Just promise you''ll be gentle," you reply, and Albina smiles.'
+	'"I will. Get on all fours and bring your ass up as high as possible."'
+	'As you get on all fours, you glance back and see her squirting lube onto her fingers. You shiver when you feel the cold liquid being applied to your asshole. Albina starts massaging it before you feel her slowly pushing a finger inside you. You moan softly at the sensation as you feel her finger curling up inside you.'
 	'After spending a few minutes fingering you, she pulls her finger out. "Okay, that should be enough. Are you sure you want to do this, <<$pcs_nickname>>? Just because I''m a buttslut doesn''t mean you have to be one too."'
-	'You stare at the dildo hanging between her legs, but steel yourself and nod. "Yes, I want to do this. Just go slow please?"'
+	'You stare at the dildo hanging between her legs but steel yourself and nod. "Yes, I want to do this. Just go slow, please?"'
 	gs 'arousal', 'anal_finger', 5, 'lesbian'
 	gs 'stat'
 
 	act 'Get your ass fucked':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal1.jpg"></center>'
-		'Your heart races as you feel Albina moving in behind you. You instinctively tense up when you feel the head of the dildo pressing against your asshole. "Okay <<$pcs_nickname>>, this is going to feel strange and definitely hurt a little, but you''re going to have to try and relax as best as you can for me," Albina tells you, and you grip the sheets tightly as you do what she says.' 
-		'You feel her start slowly pushing and the pressure builds until the tip of the dildo suddenly pops into your ass, causing you to groan and grit your teeth while gripping the sheets even tighter. It''s a painful sensation and you instinctively feel the urge to pull yourself free. "You okay, <<$pcs_nickname>>? I can take it out if you want?" Albina asks as you feel a stinging pain shooting through you.'
-		'Remembering what she said, you fight the urge to pull away and try to relax. "No, I just need a second," you reply as you look back at her and she nods.'
+		'Your heart races as you feel Albina moving in behind you. You instinctively tense up when you feel the head of the dildo pressing against your asshole. "Okay, <<$pcs_nickname>>, this is going to feel strange and definitely hurt a little, but you''re going to have to try and relax as best as you can for me," Albina tells you. You grip the sheets tightly as you do what she says.' 
+		'You feel her start slowly pushing, and the pressure builds until the tip of the dildo suddenly pops into your ass, causing you to groan and grit your teeth while gripping the sheets even tighter. It''s a painful sensation, and you instinctively feel the urge to free yourself. "You okay, <<$pcs_nickname>>? I can take it out if you want?" Albina asks as you feel a stinging pain shooting through you.'
+		'Remembering what she said, you fight the urge to pull away and try to relax. "No, I just need a second," you reply as you look back at her, and she nods.'
 		*nl
-		'After taking a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the already slick dildo before placing her hands on your hips. "Okay, just keep your ass relaxed and tell me if it gets too painful. I don''t want you hurting yourself trying to impress me. Got it?"'
-		'You nod and prepare yourself as you feel Albina start slowly pushing the dildo deeper into your ass. You feel yourself being stretched out as she reaches a depth she feels you''ll be comfortable with and starts gently thrusting.'
-		'Despite the shallow depth and Albina being gentle, the pain becomes too much after a few minutes and you ask her to pull out. You sit up on your knees and clutch your ass cheeks in your hands as pain pulses through your stretched asshole.'
+		'After a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the slick dildo before placing her hands on your hips. "Okay, just keep your ass relaxed and tell me if it gets too painful. I don''t want you hurting yourself trying to impress me. Got it?"'
+		'You nod and prepare yourself as you feel Albina slowly push the dildo deeper into your ass. You feel stretched out as she reaches a depth she feels you''ll be comfortable with and starts gently thrusting.'
+		'Despite the shallow depth and Albina being gentle, the pain becomes too much after a few minutes, and you ask her to pull out. You sit on your knees and clutch your ass cheeks in your hands as pain pulses through your stretched asshole.'
 		'"You lasted longer than I thought you would. Not bad for your first go, <<$pcs_nickname>>," Albina says as she hands you some wipes to clean yourself up. "Next time you lose, maybe we can go deeper and... harder," she adds with a teasing grin as she cleans the dildo and puts it away.'
 		*nl
-		'You slowly get dressed as the stinging pain continues to pulse through your ass. Albina watches with an amused grin. "Don''t worry, it gets less painful the more you do it."'
-		'"You would know," you reply with a smirk and she laughs.'
+		'As the stinging pain continues to pulse through your ass, you slowly get dressed. Albina watches with an amused grin. "Don''t worry. It gets less painful the more you do it."'
+		'"You would know," you reply with a smirk, and she laughs.'
 		gs 'arousal', 'anal_strap', 10, 'lesbian'
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -778,22 +778,22 @@ if $ARGS[0] = 'first_anal1':
 	lesbian += 1
 	gs 'boyStat', 'D3'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
-	'"Yes, I would," you reply and Albina smiles.'
-	'"Okay, get on all fours and bring your ass up as high as you can."'
-	'As you get on all fours, you glance back and see her squirting lube onto her fingers. You shiver when you feel the cold liquid being applied to your asshole and Albina starts massaging it in before you feel her slowly pushing a finger inside you. You moan softly at the sensation as you feel her finger curling up inside you.'
+	'"Yes, I would," you reply, and Albina smiles.'
+	'"Okay, get on all fours and bring your ass up as high as possible."'
+	'As you get on all fours, you glance back and see her squirting lube onto her fingers. You shiver when you feel the cold liquid being applied to your asshole. Albina starts massaging it before you feel her slowly pushing a finger inside you. You moan softly at the sensation as you feel her finger curling up inside you.'
 	'After spending a few minutes fingering you, she pulls her finger out. "Okay, that should be enough. Are you sure you want to do this, <<$pcs_nickname>>? Just because I''m a buttslut doesn''t mean you have to be one too."'
-	'You stare at the dildo hanging between her legs, but steel yourself and nod. "Yes, I want to do this."'
+	'You stare at the dildo hanging between her legs but steel yourself and nod. "Yes, I want to do this."'
 	gs 'arousal', 'anal_finger', 5, 'lesbian'
 	gs 'stat'
 
 	act 'Get your ass fucked':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal1.jpg"></center>'
-		'Your heart is racing even though you know what to expect. Albina presses the tip of the dildo against your asshole and you feel the familiar sensation of the pressure building as she pushes forward until the tip of the dildo suddenly pops into your ass, causing you to groan. "You okay, <<$pcs_nickname>>? I can take it out if you want?" Albina asks.'
+		'Your heart is racing even though you know what to expect. Albina presses the tip of the dildo against your asshole, and you feel the familiar sensation of the pressure building as she pushes forward until the dildo suddenly pops into your ass, causing you to groan. "You okay, <<$pcs_nickname>>? I can take it out if you want?" Albina asks.'
 		*nl
-		'After taking a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the already slick dildo before placing her hands on your hips. "Okay, just tell me if it gets too painful for you."'
-		'You nod and prepare yourself as you feel Albina slowly push the dildo deeper into your ass and starts thrusting.'
-		'Having had your ass penetrated before, Albina goes a little faster and deeper than you think she normally would have. However, the sensation of actually being buttfucked is still new to you and you soon ask her to stop when it becomes too much.'
+		'After a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the slick dildo before placing her hands on your hips. "Okay, just tell me if it gets too painful for you."'
+		'You nod and prepare yourself as you feel Albina slowly push the dildo deeper into your ass and start thrusting.'
+		'Having had your ass penetrated before, Albina goes faster and deeper than you think she usually would have. However, the sensation of being buttfucked is still new to you, and you soon ask her to stop when it becomes too much.'
 		*nl
 		'"Not bad for your first go, <<$pcs_nickname>>. I bet the prior ''practice'' helped," Albina says as she hands you some wipes to clean yourself up. "Next time you lose, maybe we can go deeper and... harder," she adds with a teasing grin as she cleans the dildo and puts it away.'
 		'You slowly get dressed as Albina watches with an amused grin. "It feels great, doesn''t it? It gets better the more you do it."'
@@ -812,9 +812,9 @@ if ARGS[0] = 'anal_refuse':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinaroom.jpg"></center>'
 	'You shake your head. "No, I don''t think I''m ready for that yet."'
-	'Albina smiles. "That''s okay, but if you do want to do it with me or just want some advice, then just ask. It''s best to get help from someone with... experience on the matter," she says with a grin.'
+	'Albina smiles. "That''s okay, but if you want to do it with me or want some advice, then just ask. It''s best to get help from someone with... experience on the matter," she says with a grin.'
 	'You grin back. "I''ll be sure to ask the master buttslut for any of her wisdom."'
-	'She punches you on the arm. "Damn right you will."'
+	'She punches you in the arm. "Damn right, you will."'
 	act 'Do something else' :gt 'albinahome', 'bedroom'
 end
 
@@ -826,17 +826,17 @@ if $ARGS[0] = 'strapon_finish':
 	gs 'stat'
 	if rand(0,3) = 0:
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/aftermath.jpg"></center>'
-		'Albina pushes you down onto the bed and climbs on top of you. You spend the next few minutes passionately making out while fondling each other before she gives you a sly smile and moves into position to start scissoring you. Before she can, her phone buzzes and she looks at it before frowning in disappointment. "Sorry, but I need to go <<$pcs_nickname>>. I''ll see later?"'
+		'Albina pushes you down onto the bed and climbs on top of you. You spend the next few minutes passionately making out while fondling each other before she gives you a sly smile and moves into position to start scissoring you. Before she can, her phone buzzes, and she looks at it before frowning in disappointment. "Sorry, but I need to go, <<$pcs_nickname>>. I''ll see you later?"'
 		'You nod in understanding. "Sure, not a problem. I had fun."'
-		'You share a final kiss with each other before you both quickly get dressed. She wipes the dildo clean and shoves it back in the drawer before ushering you out of her room. She walks with you into town before leaving you to attend to her business.'
+		'You finally kiss each other before you both quickly get dressed. She wipes the dildo clean and shoves it back in the drawer before ushering you out of her room. She walks with you into town before leaving you to attend to her business.'
 		gs 'arousal', 'foreplay', 5, 'lesbian'
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Finish':gt 'pav_residential'
 	else
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/aftermath.jpg"></center>'
-		'Albina pushes you down onto the bed and climbs on top of you. You spend the next few minutes passionately making out while fondling each other before she collapses next to you and you both just lie naked on her bed in silence. She eventually gets up and cleans the dildo before shoving it back in the drawer and getting dressed.'
-		'You get dressed yourself and when you finish, she smiles at you. "Okay, what do you want to do now?" she asks.'
+		'Albina pushes you down onto the bed and climbs on top of you. You spend the next few minutes passionately making out while fondling each other before she collapses next to you, and you both just lie naked on her bed in silence. She eventually gets up and cleans the dildo before shoving it back in the drawer and getting dressed.'
+		'You get dressed, and when you finish, she smiles at you. "Okay, what do you want to do now?" she asks.'
 		gs 'arousal', 'foreplay', 5, 'lesbian'
 		gs 'arousal', 'end'
 		gs 'stat'

+ 15 - 15
locations/alexandriaChat.qsrc

@@ -643,21 +643,21 @@ end
 
 if $ARGS[0] = 'sword':
     if AlexandriaQW = 14:
-	*clr & cla
-	minut += 20
-	AlexandriaQW = 15
-	AlexandriaMissionQW + 1
-	gs 'stat'
-	'<center><b><font color="maroon">Aleksei</font></b></center>'
-	'<center><img <<$set_imgh>> src="images/characters/city/alexandria/alexandria3.jpg"></center>'
-	'"It''s seems that Mr.Kudashov, has put it in a security box and... well... sold the key to a woman called Ana, and... she had challenged me for it possession..."'
-	'You grimace as those words fill the room, and a suddenly very tense Aleksei, raise an eyelid. The next moments lengthening as you can feel the wizard''s displeasure.'
-	'"Interesting, <<$pcs_lastname>>. Please, explain to me in detail what happened."'
-	'You... follow with your <i>encounter</i> with Filipp Kudashov, his double cross, and finally Ana''s call. During it, he takes out a tablet and seems to look for something, and even when you end your tale, he takes some minutes loss in... whatever he is doing.'
-	'"Ehm... what now?"'
-	'"Sigh... <i>Mr</i>.Kudashov''s accounts are going to be audited and for that woman... Ana... Your new task is to accept the challenge and learn all you can about her... Hm... I want the saber, but now is secondary."'
-
-	act 'Continue': gt 'alexandriaHome', 'study'
+        *clr & cla
+        minut += 20
+        AlexandriaQW = 15
+        AlexandriaMissionQW += 1
+        gs 'stat'
+        '<center><b><font color="maroon">Aleksei</font></b></center>'
+        '<center><img <<$set_imgh>> src="images/characters/city/alexandria/alexandria3.jpg"></center>'
+        '"It''s seems that Mr.Kudashov, has put it in a security box and... well... sold the key to a woman called Ana, and... she had challenged me for it possession..."'
+        'You grimace as those words fill the room, and a suddenly very tense Aleksei, raise an eyelid. The next moments lengthening as you can feel the wizard''s displeasure.'
+        '"Interesting, <<$pcs_lastname>>. Please, explain to me in detail what happened."'
+        'You... follow with your <i>encounter</i> with Filipp Kudashov, his double cross, and finally Ana''s call. During it, he takes out a tablet and seems to look for something, and even when you end your tale, he takes some minutes loss in... whatever he is doing.'
+        '"Ehm... what now?"'
+        '"Sigh... <i>Mr</i>.Kudashov''s accounts are going to be audited and for that woman... Ana... Your new task is to accept the challenge and learn all you can about her... Hm... I want the saber, but now is secondary."'
+
+        act 'Continue': gt 'alexandriaHome', 'study'
 	    
 	elseif AlexandriaQW = 16:
 		*clr & cla

+ 16 - 16
locations/alexandriaSex.qsrc

@@ -6,6 +6,7 @@ $location_type = 'indoors'
 
 if $ARGS[0] = 'nice1':
 	*clr & cla
+	$orgasm_or = 'no'
 	gs 'arousal', 'foreplay', 5, 'lesbian'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/N1.jpg"></center>'
@@ -18,7 +19,7 @@ if $ARGS[0] = 'nice1':
 
 	act '"Your turn Aleksei"':
 		*clr & cla
-		gs 'arousal', 'clit_finger', 5
+		gs 'arousal', 'clit_finger', 5, 'lesbian'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/N2.jpg"></center>'
 		'He only answers with a raised eyebrow and an amused half-smile before taking your dominant hand towards his lips, lightly kissing your fingers.'
@@ -29,8 +30,9 @@ if $ARGS[0] = 'nice1':
 
 		act '"Stop teasing me!"':
 			*clr & cla
-			gs 'arousal', 'foreplay', 5
-			gs 'arousal', 'cuni', 5
+			gs 'arousal', 'foreplay', 5, 'lesbian'
+			$orgasm_or = 'yes'
+			gs 'arousal', 'cuni', 5, 'lesbian', 'no_orgasm_msg'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/N3.jpg"></center>'
 			'When you try to play with your trapped cunt, he slaps your hand and forcefully takes it away.'
@@ -53,7 +55,7 @@ if $ARGS[0] = 'nice1':
 
                 act 'It''s his turn':
 					*clr & cla
-					gs 'arousal', 'cuni_give', 10
+					gs 'arousal', 'cuni_give', 10, 'lesbian'
 					gs 'arousal', 'end'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/N5.jpg"></center>'
@@ -74,8 +76,6 @@ if $ARGS[0] = 'nice1':
 						pcs_sweat = 0
 						pcs_breath = 1
 						girl += 1
-						lesbian += 1
-						orgasm += 1
 						if succubusflag = 1:
 							scfeed = succublvl + rand(1,4)
 							sexnutrition += 100 * scfeed
@@ -103,8 +103,9 @@ end
 
 if $ARGS[0] = 'grumpy1':
 	*clr & cla
-	gs 'arousal', 'massage', 5, 'sub'
-	gs 'arousal', 'BDSM', 5, 'sub'
+	$orgasm_or = 'no'
+	gs 'arousal', 'massage', 5, 'sub', 'lesbian'
+	gs 'arousal', 'BDSM', 5, 'sub', 'lesbian'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/G1.jpg"></center>'
 	'You find yourself tied in bondage gear with a ball gag in your mouth kneeling in the center of a bare-bones room, looking directly at assorted tools that you can barely recognize. Some are piercing equipment that are used for body modification, others seem surgical and the rest look like they were taken from a toolbox.'
@@ -116,8 +117,8 @@ if $ARGS[0] = 'grumpy1':
 
 	act 'He slaps you':
 		*clr & cla
-		gs 'arousal', 'massage', 5, 'sub'
-		gs 'arousal', 'BDSM', 5, 'sub'
+		gs 'arousal', 'massage', 5, 'sub', 'lesbian'
+		gs 'arousal', 'BDSM', 5, 'sub', 'lesbian'
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/G2.jpg"></center>'
 		'You are quivering under Aleksei ministrations when the strike comes. He smacks your exposed breasts several times, turning your gagged moans into silent screams. When you instinctively try to get away from him, one of his hands darts towards your hair, locking you painfully in position.'
@@ -128,8 +129,9 @@ if $ARGS[0] = 'grumpy1':
 
 		act 'The torture continues':
 			*clr & cla
-			gs 'arousal', 'vaginal_finger', 5, 'sub'
-			gs 'arousal', 'BDSM', 5, 'sub'
+			gs 'arousal', 'BDSM', 5, 'sub', 'lesbian'
+			$orgasm_or = 'yes'
+			gs 'arousal', 'vaginal_finger', 5, 'sub', 'lesbian', 'no_orgasm_msg'
 			'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/G3.jpg"></center>'
 			'Finally, after who knows how long, Aleksei breaks away from you and stands up, looking down at you with a critical eye as he drags slowly on a cigarette, the silence eternalizing as you kneel before him.'
 			'"You have done well, my new pet."'
@@ -153,8 +155,8 @@ if $ARGS[0] = 'grumpy1':
 
                 act 'It''s his turn':
 					*clr & cla
-					gs 'arousal', 'cuni_give', 10, 'sub'
-					gs 'arousal', 'BDSM', 5, 'sub'
+					gs 'arousal', 'BDSM', 5, 'sub', 'lesbian'
+					gs 'arousal', 'cuni_give', 10, 'sub', 'lesbian'
 					gs 'arousal', 'end'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/city/alexandria/sex/G5.jpg"></center>'
@@ -180,8 +182,6 @@ if $ARGS[0] = 'grumpy1':
 						pain['wrists'] +=5
 						pain['ankles'] +=5
 						girl += 1
-						lesbian += 1
-						orgasm += 1
 						if succubusflag = 1:
 							scfeed = succublvl + rand(1,4)
 							sexnutrition += 50 * scfeed

+ 5 - 5
locations/anushkachat.qsrc

@@ -618,7 +618,7 @@ if $ARGS[0] = 'boyfriend_chat':
 					act 'Maybe':
 						*clr & cla
 						minut += 5
-						anushkaQW['fedor_3some']
+						anushkaQW['fedor_3some'] = 1
 						npc_rel['A144'] += 1
 						'<center><h4><font color="maroon">Anushka''s Room</font></h4></center>'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
@@ -632,7 +632,7 @@ if $ARGS[0] = 'boyfriend_chat':
 					act 'I will ask him':
 						*clr & cla
 						minut += 5
-						anushkaQW['fedor_3some']
+						anushkaQW['fedor_3some'] = 1
 						npc_rel['A144'] += 1
 						'<center><h4><font color="maroon">Anushka''s Room</font></h4></center>'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
@@ -698,7 +698,7 @@ if $ARGS[0] = 'boyfriend_chat':
 					*clr & cla
 					minut += 5
 					npc_rel['A144'] += 1
-					artemQW['nush3some_ask'] += 1
+					artemQW['nush3some_ask'] = 1
 					gs 'stat'
 					'<center><h4><font color="maroon">Anushka''s Room</font></h4></center>'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
@@ -713,7 +713,7 @@ if $ARGS[0] = 'boyfriend_chat':
 					*clr & cla
 					minut += 5
 					npc_rel['A144'] += 1
-					artemQW['nush3some_ask'] += 1
+					artemQW['nush3some_ask'] = 1
 					gs 'stat'
 					'<center><h4><font color="maroon">Anushka''s Room</font></h4></center>'
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
@@ -886,7 +886,7 @@ if $ARGS[0] = 'tell_about_olu':
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/nushbed.jpg"></center>'
 				'You tell her the story of your first time with Olu and what it was like. She presses you for details, obviously finding the story a big turn on, then shares her stories of Valentin, the biggest guy she has been with. You pass the time swapping stories and giggling about your sex lives.'
 				act 'Hang out in her room': gt 'anush_bedroom','anushroom'
-				act 'Talk about something else': gt 'anushapt', 'bed'
+				act 'Talk about something else': gt 'anushkachat', 'chat'
 				if npc_sex['A82'] > 0 and DjibrilQW['nush_inv'] = 0:
 					act 'Tell her about Djibril': gt 'anushkachat', 'tell_about_djibril'
 				end

+ 3 - 3
locations/artem_sex.qsrc

@@ -404,7 +404,7 @@ end
 
 if $ARGS[0] = 'anal':
 	*clr & cla
-	 artemQW['anal'] = 1
+	artemQW['anal'] = 1
 	gs 'boyStat', 'A2'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/firstanal1.jpg"></center>'
@@ -599,7 +599,7 @@ if $ARGS[0] = 'anushka_3some_oral1':
 	gs 'arousal', 'erotic_sex', 2, 'dom'
 	gs 'stat'
 	if artemQW['nushart_oral'] <= 1:
-		act 'Eat her out': gt 'artem_sex', 'anushka_3some_oral1'
+		act 'Eat her out': gt 'artem_sex', 'anushka_3some_oral2'
 	else
 		act 'Give Artem a blowjob': gt 'artem_sex', 'anushka_3some_bj'
 	end
@@ -614,7 +614,7 @@ if $ARGS[0] = 'anushka_3some_oral2':
 	gs 'arousal', 'cuni_give', 2, 'lesbian'
 	gs 'stat'
 	if artemQW['nushart_oral'] <= 1:
-		act 'Make Artem eat her out': gt 'artem_sex', 'anushka_3some_oral2'
+		act 'Make Artem eat her out': gt 'artem_sex', 'anushka_3some_oral1'
 	else
 		act 'Give Artem a blowjob': gt 'artem_sex', 'anushka_3some_bj'
 	end

+ 2 - 692
locations/bed2.qsrc

@@ -58,87 +58,10 @@ if $ARGS[0] = '':
 		else
 			$sleep_txt = 'Undress and go to bed'
 		end
-		if succubusQW = 2:
-			act '<<$sleep_txt>>':
-				if clo_flag['bed'] = 0:
-					clo_flag['bed'] = 1
-					$lastwornclothingtype['bed'] = $clothingworntype
-					lastwornclothingnumber['bed'] = clothingwornnumber
-					$lastwornpantytype['bed'] = $pantyworntype
-					lastwornpantynumber['bed'] = pantywornnumber
-					$lastwornbratype['bed'] = $braworntype
-					lastwornbranumber['bed'] = brawornnumber
-				end
-				menu_off = 1
-				if bedPanty = 2:
-					gs 'underwear', 'remove'
-				elseif bedPanty = 1:
-					gs 'underwear', 'wear'
-				end
-				if $clothingworntype ! 'nude':
-					strip_here = 1
-					gs 'clothing', 'strip'
-				end
-				gt 'bed2', 'succhoice'
-			end
-		else
-			act '<<$sleep_txt>>':
-				if clo_flag['bed'] = 0:
-					clo_flag['bed'] = 1
-					$lastwornclothingtype['bed'] = $clothingworntype
-					lastwornclothingnumber['bed'] = clothingwornnumber
-					$lastwornpantytype['bed'] = $pantyworntype
-					lastwornpantynumber['bed'] = pantywornnumber
-					$lastwornbratype['bed'] = $braworntype
-					lastwornbranumber['bed'] = brawornnumber
-				end
-				menu_off = 1
-				if bedPanty = 2:
-					gs 'underwear', 'remove'
-				elseif bedPanty = 1:
-					gs 'underwear', 'wear'
-				end
-				if disable_autosave = 0:
-					if mid($start_type,1,4) = 'city':
-						savegame 'autosave_city.sav'
-					elseif mid($start_type,1,3) = 'uni':
-						savegame 'autosave_uni.sav'
-					else
-						savegame 'autosave_sg.sav'
-					end
-				end
-				if $clothingworntype ! 'nude':
-					strip_here = 1
-					gs 'clothing', 'strip'
-				end
-				if magf2bdo = 2:
-					gt 'bed2', 'magbstchoice'
-				else
-					gt 'bed2', 'sleep'
-				end
-			end
-			killvar '$sleep_txt'
-		end
+		gs 'sleep', 'full'
 	end
 	act 'Get out of bed': killvar '$sleep_txt' & gt $loc, $loc_arg
-	act 'Take a nap (1:00)':
-		menu_off = 1
-		if pcs_sleep >= 10 and pcs_sleep <= 90:
-			pcs_sleep += 10
-			pcs_health += 5
-			minut += 60
-			gs 'stat'
-			*nl
-			'You sleep about an hour.'
-		elseif pcs_sleep < 10:
-			gt 'bed2', 'sleep'
-		else
-			minut += 5
-			gs 'stat'
-			*nl
-			'You are not tired enough to sleep, even for a short nap.'
-		end
-	end
+	gs 'sleep', 'nap'
 	gs 'events', 'read'
 
 	if $loc = 'bedrPar':
@@ -162,619 +85,6 @@ if $ARGS[0] = '':
 	end
 end
 
-if $ARGS[0] = 'sleep':
-	*clr & cla
-	menu_off = 1
-	if $clothingworntype ! 'nude':
-		'<center><img <<$set_imgh>> src="images/shared/home/bed.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
-	end
-	gs 'stat'
-	*nl
-	if budilnikOn = 1 and ((hour => timer and week + 1 < 6) or (hour < timer and week < 6)):
-		'You run through your regular nightly routine, setting your alarm for <b>'+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+'</b>, you undress, and prepare for sleep:'
-	elseif budilnikOn = 1 and alarm_holiday = 1 and (week > 5 or kanikuli > 0):
-		'You run through your regular nightly routine, setting your alarm for <b>'+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b>, you undress, and prepare for sleep:'
-	elseif budilnikOn = 1 and (week > 5):
-		'You run through your regular nightly routine, setting your alarm for <b>'+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b>, you undress, and prepare for sleep:'
-	elseif budilnikOn = 1:
-		'You run through your regular nightly routine, setting your alarm for <b>'+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+'</b>, you undress, and prepare for sleep:'
-	else
-		'You run through your regular nightly routine, not bothering to setting your alarm, you undress, and prepare for sleep:'
-	end
-	pcs_hairbsh = 0
-	pain['killer'] = 0
-	if mid($start_type,1,2) = 'sg' and $loc ! 'bedrPar' and SchoolAtestat = 0:
-		notathomesleep += 1
-	else
-		notathomesleep = 0
-	end
-
-
-	if succubusflag = 1 and sucwalkday <= daystart and (succhungry < (0 - 1 - succublvl) or pcs_willpwr < ((succublvl * willpowermax) / 13) or sucpowzeroed >= 3): gs 'succubus', 'sucwalkinginit'
-
-	if analplugIN = 1 and vibratorIN = 1:
-		if bedAnal = 1 and bedVibrator = 1:
-			analplugIN = 0
-			vibratorIN = 0
-			gs 'stat'
-			*nl
-			'You remove your butt plug and your vibrator.'
-		elseif bedAnal = 0 and bedVibrator = 0:
-			*nl
-			'You decide to leave your butt plug and vibrator in.'
-		elseif bedAnal = 1 and bedVibrator = 0:
-			vibratorIN = 0
-			gs 'stat'
-			*nl
-			'You decide to leave your butt plug in, but remove your vibrator.'
-		elseif bedAnal = 0 and bedVibrator = 1:
-			analplugIN = 0
-			gs 'stat'
-			*nl
-			'You decide to remove your butt plug, but leave your vibrator in.'
-		end
-	elseif analplugIN = 1 and vibratorIN = 0:
-		if bedAnal = 1:
-			analplugIN = 0
-			gs 'stat'
-			*nl
-			'You remove your butt plug.'
-		elseif bedAnal = 0:
-			*nl
-			'You decide to leave your butt plug in.'
-		end
-	elseif analplugIN = 0 and vibratorIN = 1:
-		if bedVibrator = 1:
-			vibratorIN = 0
-			*nl
-			'You remove your vibrator.'
-		elseif bedVibrator = 0:
-			*nl
-			'You decide to leave your vibrator in.'
-		end
-	end
-	if $shoeworntype = 'none':
-		$bed['shoetype'] = 'none'
-	else
-		$bed['shoetype'] = $shoeworntype
-		bed['shoenumber'] = shoewornnumber
-!!		gs 'shoes', 'strip'
-	end
-	if bedPanty = 1:
-		if $pantyworntype = 'none' and $braworntype = 'none':
-			*nl
-			'You put on your bra and panties.'
-		elseif $pantyworntype ! 'none' and $braworntype = 'none':
-			*nl
-			'You put on your bra.'
-		elseif $pantyworntype ! 'none' and $braworntype ! 'none':
-			*nl
-			'You put on your panties.'
-		else
-			*nl
-			'You change your bra and panties.'
-		end
-	elseif bedPanty = 2:
-		if $pantyworntype ! 'none' or $braworntype ! 'none':
-			*nl
-			'You remove your bra and panties.'
-		elseif $pantyworntype ! 'none' and $braworntype = 'none':
-			*nl
-			'You remove your panties.'
-		elseif $braworntype ! 'none':
-			*nl
-			'You remove your bra.'
-		end
-	else
-		*nl
-		'You were too tired to worry about your underwear, so for tonight you left it as is.'
-	end
-
-	if $hairstyle ! '' :
-		*nl
-		$hairstyle
-	else
-		*nl
-		'Your hair is loose and free.'
-	end
-
-	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
-	if fat > 5 and stringimplant = 1: silicone += 1 & fat -= 5
-	act 'Sleep...':
-	!!flag to stop autosave breaking my awesome clothing thingy
-		clo_flag['bed'] = 0
-		gt 'bed2', 'dream'
-	end
-end
-
-if $ARGS[0] = 'dream':
-
-	if $loc = 'nichBedroomServant':
-		gs 'nichBedroomServant', 'sleepEvents'
-	end
-
-	*clr & cla
-	menu_off = 1
-	InSleep = 1
-	gs 'stat'
-	gs 'dreams', 'start'
-	wake_up = 0
-!! to avoid sleeping the whole day I decide to calcululate the duration of the sleep in advance
-!! the quality of the sleep depends on many factors, so the time of sleep can be modify later, especially the part when the time of sleep is shortened
-
-	varsleep['time_to_full'] = (100 - pcs_sleep) * 6
-!! fully exhausted Sveta can recover in 420 minutes = 7 hours of sleep
-!! healthy Sveta can hardly sleep more then 10 hours = 600 minutes
-!! so we can add about 3 hours to time to full as a limit
-	varsleep['time_to_full'] += 150 + rand(0,60)
-
-	varsleep['time_now'] = daystart*1440 + hour * 60 + minut
-	varsleep['alarm_time_end'] = daystart*1440 + timerEnd * 60 + timerEndM
-	if varsleep['time_now'] >= varsleep['alarm_time_end']: varsleep['alarm_time_end'] += 1440
-	varsleep['alarm_time'] = daystart*1440 + timer * 60 + timerM
-	if varsleep['time_now'] >= varsleep['alarm_time']: varsleep['alarm_time'] += 1440
-	if budilnikOn = 1: 
-		varsleep['minutes to wakeup'] = min(varsleep['time_to_full'], varsleep['alarm_time'] - varsleep['time_now'])
-		varsleep['minutes to wakeup end'] = min(varsleep['time_to_full'], varsleep['alarm_time_end'] - varsleep['time_now'])
-	else 
-		varsleep['minutes to wakeup'] = varsleep['time_to_full']
-		varsleep['minutes to wakeup end'] = varsleep['time_to_full']
-	end
-	:loopson_bed
-		minut += 1
-		stime += 1
-		if recuperation = 0:pcs_health += 5
-
-		if vibratorIN = 1:
-			vtime += 1
-			if vtime >= 5:
-				pcs_horny +=1
-				vtime = 0
-			end
-
-			if pcs_horny = 100:
-				*clr & cla
-				pcs_horny = 0
-				orgasm += 1
-				minut += 5
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/shared/sex/oface/o_face.jpg"></center>'
-				*nl
-				'You abruptly wake up in the throes of an orgasm. As you recover, you check the time, <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>.'
-
-				act 'Go back to sleep':
-					*clr & cla
-					gt 'bed2', 'dream'
-				end
-
-				act 'Give up trying to sleep':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/shared/sex/oface/kotovfirst1.jpg"></center>'
-					*nl
-					'Maybe trying to sleep with a vibrator in your pussy wasn''t such a good idea.'
-					gs 'bed2', 'wake'
-				end
-
-				exit
-			end
-		!! Exclusions for succubus dreams as they set horny to 100 and will always get overridden otherwise
-		elseif pcs_horny > 80 and pcs_sleep >= 30 and rand (1,300) = 300 and succubusQW ! 1 and succubusQW ! 2:
-			gs 'stat'
-			$waketext = 'You glance at your alarm clock. It reads <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>.'
-			gt 'bed2', 'wake_horny'
-		end
-
-		if stime >= 60:
-			stime = 0
-			pcs_sleep += 15
-			if pcs_sleep >= 100:
-				pcs_condition['lack_of_sleep'] = 0
-			elseif pcs_condition['lack_of_sleep'] > 0:
-				pcs_condition['lack_of_sleep'] -= 1
-			end
-			gs 'stat'
-		end
-
-		
-		varsleep['minutes to wakeup'] -= 1
-		varsleep['minutes to wakeup end'] -= 1
-
-		if alarm_holiday = 1 and kanikuli > 0:
-		!! use weekend time alarm
-			varsleep['alarm_time'] = daystart*1440 + timerEnd * 60 + timerEndM
-			if varsleep['minutes to wakeup end'] = 0: wake_up = 1
-		elseif week > 5:
-		!! use weeken time alarm 
-			varsleep['alarm_time'] = daystart*1440 + timerEnd * 60 + timerEndM
-			if varsleep['minutes to wakeup end'] = 0: wake_up = 1
-		else 
-			varsleep['alarm_time'] = daystart*1440 + timer * 60 + timerM
-			if varsleep['minutes to wakeup'] = 0: wake_up = 1
-		end
-
-		varsleep['time_now'] = daystart*1440 + hour * 60 + minut
-
-	!! Ensuring single exit point instead of multiple ones.
-	if wake_up = 0: jump 'loopson_bed'
-
-	if stime < 300:
-	!!Worsening of skin quality if you do not sleep enough.
-		skinDailyPenalty += 2
-	elseif stime < 360:
-		skinDailyPenalty += 1
-	elseif stime < 420:
-		skinDailyPenalty += 0
-	else
-		skinDailyPenalty -= 1
-	end
-
-	gs 'stat'
-	if slept_in = 1:
-		$waketext = 'You wake up at <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>, after sleeping-in a little longer than planned, but at least you''ve had plenty of sleep.'
-	elseif pcs_sleep >= 100 and budilnikOn = 1 and varsleep['time_now'] >= varsleep['alarm_time']:
-		$waketext = 'You wake up at <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>, just before your alarm goes off. You''ve had plenty of sleep.'
-	elseif pcs_sleep >= 100:
-		$waketext = 'You wake up at <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>, no longer tired and ready to start the day with plenty of sleep.'
-	elseif budilnikOn = 1 and varsleep['time_now'] = varsleep['alarm_time']:
-		pcs_mood -= 10
-		$waketext = 'Your alarm goes off at <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>, '+iif(pcs_sleep < 90, 'but you could do with some extra sleep.', 'and you''ve had plenty of sleep.')+''
-		gs 'bed2', 'extra'
-	else
-		!! I do not think that it could go here
-		$waketext = ''
-	end
-
-	gs 'bed2', 'wake'
-	*nl
-	'<<$waketext>>'
-
-	killvar 'wake_up'
-end
-
-if $ARGS[0] = 'wake_horny':
-	cla
-	menu_off = 1
-	InSleep = 1
-	SleepHorny += 1
-	gs 'stat'
-	if $pantyworntype = 'none':
-		if SleepHorny = 1:
-			'<center><img <<$set_imgh>> src="images/shared/home/sleep_horny.jpg"></center>'
-		elseif SleepHorny = 2:
-			'<center><img <<$set_imgh>> src="images/shared/sex/mast/klit.jpg"></center>'
-		elseif SleepHorny >= 3:
-			'<center><img <<$set_imgh>> src="images/shared/sex/oface/kotovfirst1.jpg"></center>'
-		end
-	else
-		if SleepHorny = 1:
-			'<center><img <<$set_imgh>> src="images/shared/sex/mast/start.jpg"></center>'
-		elseif SleepHorny = 2:
-			'<center><img <<$set_imgh>> src="images/shared/sex/undress/kiska.jpg"></center>'
-		elseif SleepHorny >= 3:
-			'<center><img <<$set_imgh>> src="images/shared/sex/oface/kotovfirst1.jpg"></center>'
-		end
-	end
-	*nl
-	'<<$waketext>>'
-	*nl
-	if SleepHorny = 1:
-		'Your wet dream and overall horniness rouse you from your sleep. From one moment to the next, you are wide awake and very much aware that your pussy is hot and wet.'
-		*nl
-		'You could try and go back to sleep, of course, but it''s doubtful that you would find this kind of sleep very restful; not to mention the frustration that comes with ignoring your needs, but masturbating is an option, too, and not the worst one in this situation. It might take some time, but you''d be able to sleep like a baby after.'
-		*nl
-		'Of course, you could always just give up on trying to sleep and just get up.'
-	elseif SleepHorny = 2:
-		'You''re so horny that you''ve woken a second time. Your pussy is still wet and wanting attention.'
-		*nl
-		'You could try and get back to sleep again, but it''s doubtful that you will get much sleep, and continuously ignoring your needs won''t help; maybe you should masturbate, and make the most of the time that''s left.'
-		*nl
-		'Soon you will have to get up one way or another.'
-	elseif SleepHorny >= 3:
-		'Once again your horniness has roused you from your sleep. This is getting ridiculous! You are finding it very difficult to get any sleep at all.'
-		*nl
-		'Going back to sleep almost feels like a waste of time at this point;  you won''t get much rest at all, at least until you fix the problem.'
-		*nl
-		if $pantyworntype ! 'none':
-			gs 'underwear', 'remove'
-			'You''ve removed  your underwear, as your panties were soaked through.'
-			*nl
-		end
-		'Maybe you should just get up.'
-	end
-	if $loc = 'bedrPar' and sisterLesb = 6 and hour < 6:
-		*nl
-		'Or... you could wake up Anya and see if your dearest sister would be willing to help you with that.'
-	elseif $loc = 'FedorEv4':
-		*nl
-		'Or... you could wake up Fedor and see if your boyfriend can''t help you with that.'
-	elseif $loc = 'bedr' and husband > 0:
-		*nl
-		'Or... you could wake up <<$husName>> and see if your husband can''t help you with that.'
-	end
-
-	act 'Try and go back to sleep':
-		pcs_mood -= 10
-		pcs_sleep -= 5
-		gt 'bed2', 'dream'
-	end
-
-	act 'Masturbate': InSleep = 0 & gt 'selfplay', 'start'
-
-	act 'Get out of bed (0:10)':
-		minut += 10
-		gs 'bed2', 'end'
-	end
-	if strip_here = 1:
-		act 'Get out of bed and get dressed (0:15)':
-			minut += 15
-			gs 'clothing', 'wear', $lastwornclothingtype['bed'], lastwornclothingnumber['bed']
-			gs 'panties', 'wear', $lastwornpantytype['bed'], lastwornpantynumber['bed']
-			gs 'bras', 'wear', $lastwornbratype['bed'], lastwornbranumber['bed']
-			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
-			end
-			gs 'bed2', 'end'
-		end
-	end
-
-	if $loc = 'bedrPar' and sisterLesb = 6 and hour < 6:
-		act 'Wake Anya and see if she''s in the mood': strip_here = 0 & InSleep = 0 & gt 'sistersleep', 'sister_sleep'
-	elseif $loc = 'FedorEv4':
-		act 'Wake Fedor and see if he''s in the mood': strip_here = 0 & InSleep = 0 & gt 'FedorEv4', 'Bedroom 1'
-		!!Intro text doesn''t quite fit event (but doesn''t quite fit - try for baby - scenario either) - custom scene from VK?
-	elseif ($loc = 'bedr' or $loc = 'bedr2x') and husband > 0:
-		act 'Wake your husband and see if he''s in the mood': strip_here = 0 & InSleep = 0 & gt 'husbSex', 'variant'
-		!!Should be custom scene - maybe boyfriend/husband overhaul can cover this?
-	end
-end
-
-if $ARGS[0] = 'wake':
-	if mid($start_type,1,2) = 'sg' and locat['Fam_inGad'] = 0 and motherQW['bathroom_dildos'] > 0 and MarishaQW["marisha_sleepover"] = 0:gt'mother_sextalk','dildo_wakeup1'
-	menu_off = 1
-	InSleep = 1
-	gs 'stat'
-	if MarishaQW["marisha_sleepover"] = 1: gs 'marisha_ev', 'morning'
-	if daystart < 10 and $start_type[1] = 'tg':'The first thing you think as you wake up is, "Damn! It''s is not a dream, I really am a woman now."'
-	if daystart >= 10 and daystart < 30 and $start_type[1] = 'tg':'Looking at your female body, you are still a little surprised it''s actually you.'
-	if slept_in = 1 and kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 9 and hour < 14 and suspended['on'] ! 1:
-		if schoolprogul > 2 and schoolPredupr = 2:
-			pcs_mood -= 35
-			gs 'stat'
-			msg '<center>Damn it''s <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>. It''s too late to go to school now!<br><<$npc_nickname[''A29'']>> will be furious. I don''t know what she might do...</center>'
-		elseif schoolprogul > 2 and schoolPredupr = 1:
-			pcs_mood -= 30
-			gs 'stat'
-			msg '<center>Damn it''s <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>. It''s too late to go to school now!<br><<$npc_nickname[''A29'']>> will be very angry if I miss another day of school.</center>'
-		elseif schoolprogul > 2 and schoolPredupr = 0:
-			pcs_mood -= 25
-			gs 'stat'
-			msg '<center>Damn it''s <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>. It''s too late to go to school now!<br><<$npc_nickname[''A29'']>> will be angry to find out I missed a day of school.</center>'
-		else
-			pcs_mood -= 20
-			gs 'stat'
-			msg '<center>Damn it''s <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>. It''s too late to go to school now!<br><<$npc_nickname[''A29'']>> will be very upset if I''m not at school every day.</center>'
-		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:
-		if slept_in = 1 and (hour = 7 or hour = 8) and suspended['on'] ! 1:
-			pcs_mood -= 10
-			gs 'stat'
-			msg '<center>Damn it''s <b><<$mid(100+hour,2,2)>>:<<$mid(100+minut,2,2)>></b>, you''ve slept too long! You need to hurry or you''re going to be late for school!</center>'
-		end
-		act 'Get out of bed and get dressed for school (0:15)':
-			minut += 15
-			gs 'wardrobe', 'school_outfit'
-			gs 'bed2', 'end'
-		end
-	end
-
-	if strip_here = 1:
-		act 'Get out of bed and get dressed (0:15)':
-			minut += 15
-			gs 'clothing', 'wear', $lastwornclothingtype['bed'], lastwornclothingnumber['bed']
-			gs 'panties', 'wear', $lastwornpantytype['bed'], lastwornpantynumber['bed']
-			gs 'bras', 'wear', $lastwornbratype['bed'], lastwornbranumber['bed']
-			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
-			end
-			gs 'bed2', 'end'
-		end
-	end
-	if enfullmorrout = 1 and hour >= 4 and hour < 12:
-		act 'Full morning routine (01:00)':
-			minut += 15
-			fullmorrout = 1
-			gs 'clothing', 'wear', $lastwornclothingtype['bed'], lastwornclothingnumber['bed']
-			gs 'panties', 'wear', $lastwornpantytype['bed'], lastwornpantynumber['bed']
-			gs 'bras', 'wear', $lastwornbratype['bed'], lastwornbranumber['bed']
-			if bed['shoetype'] ! 'none':
-				gs 'shoes', 'wear', $bed['shoetype'], bed['shoenumber']
-			end
-			gs 'bed2', '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)':
-				fullmorrout = 1
-				minut += 15
-				gs 'wardrobe', 'school_outfit'
-				gs 'bed2', 'end'
-			end
-		end
-	end
-
-	act 'Get out of bed (0:10)':
-		minut += 10
-		slept_in = 0
-		gs 'bed2', 'end'
-	end
-end
-
-if $ARGS[0] = 'extra':
-	act '"Snooze" a few minutes more...':
-		menu_off = 1
-		slept_in = 1
-		gs 'stat'
-		gt 'bed2', 'dream'
-	end
-end
-
-if $ARGS[0] = 'end':
-	menu_off = 1
-	minut -= 1
-	InSleep = 0
-	slept_in = 0
-	strip_here = 0
-	SleepHorny = 0
-	if fullmorrout = 1 and $loc = 'bedrPar':
-		gt 'vanrPar'
-	elseif fullmorrout = 1 and $loc = 'bedr':
-		gt 'vanr'
-	else
-		gt $loc, $loc_arg
-	end
-end
-
-if $ARGS[0] = 'succhoice':
-	menu_off = 1
-	minut += 15
-	gs 'stat'
-	cla
-	if $clothingworntype ! 'nude':
-		'<center><img <<$set_imgh>> src="images/shared/home/bed.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
-	end
-	''
-	'You toss and turn for a while, but the energy that has been buzzing under your skin since that dream just won''t let you sleep.'
-	''
-	'Thinking about it you realize that you could push the energy out or pull it in!'
-	''
-	'<font color="red"><b>You also feel that both are <i>permanent</i> choices.</b></font>'
-	act 'Try to ignore it and go to sleep':
-		if disable_autosave = 0:
-			if mid($start_type,1,4) = 'city':
-				savegame 'autosave_city.sav'
-			elseif mid($start_type,1,3) = 'uni':
-				savegame 'autosave_uni.sav'
-			else
-				savegame 'autosave_sg.sav'
-			end
-		end
-		gt 'bed2', 'sleep'
-	end
-	act 'Push the Energy out for all time': gt 'bed2', 'succhoiceNO'
-	act 'Pull the Energy in and let it change you permanently': gt 'bed2', 'succhoiceYES'
-end
-
-if $ARGS[0] = 'succhoiceNO':
-	cla
-	menu_off = 1
-	if $clothingworntype ! 'nude':
-		'<center><img <<$set_imgh>> src="images/shared/home/bed.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
-	end
-	''
-	'You push the energy out of you and it dissipates.'
-	succubusQW = 3
-	pcs_horny = 0
-	minut +=5
-	gs 'stat'
-	act 'Go to sleep':
-		if disable_autosave = 0:
-			if mid($start_type,1,4) = 'city':
-				savegame 'autosave_city.sav'
-			elseif mid($start_type,1,3) = 'uni':
-				savegame 'autosave_uni.sav'
-			else
-				savegame 'autosave_sg.sav'
-			end
-		end
-		gt 'bed2', 'sleep'
-	end
-end
-
-if $ARGS[0] = 'succhoiceYES':
-	cla
-	menu_off = 1
-	if $clothingworntype ! 'nude':
-		'<center><img <<$set_imgh>> src="images/shared/home/bed.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/home/bedroom/son.jpg"></center>'
-	end
-	succubusQW = 4
-	''
-	'You pull the energy deeper into yourself and hold it there.'
-	''
-	'Then you feel pressure building...'
-	wait 450
-	minut += 5
-	gs 'stat'
-	'BUILDING...'
-	wait 450
-	minut += 5
-	gs 'stat'
-	'<b>BUILDING...</b>'
-	wait 450
-	minut += 5
-	gs 'stat'
-	'Power bursts through your body causing you to hop out of bed.'
-	act 'Continue': gt 'bed2', 'succubinit'
-end
-
-if $ARGS[0] = 'succubinit':
-	*clr & cla
-	menu_off = 1
-	minut += 10
-	gs 'stat'
-	!!Sets the succubus flag, succubus level (succublvl), Initial lesbian sex count (suclezsnapshot), initial Succubus hunger (succhungry),
-	!! & the succubus descriptor ($sucself1). The -2 on succhungry is to give th PC 2 days to get in the Succubus grove.
-	succubusflag = 1
-	succublvl = 1
-	suclezsnapshot = lesbian
-	succhungry = -2
-	sucwalkday = daystart + 2 + rand(0,5)
-	$sucself1 = 'that feeling'
-	pcs_horny = 100
-	InSleep = 0
-	slept_in = 0
-	strip_here = 0
-	'<center><img <<$set_imgh>> src="images/pc/body/succubusself.jpg"></center>'
-	*nl
-	'<font color="red">You feel the power flowing around your body for several minutes, leaking through your skin and making changes all throughout you, before fading to a presence deep in your core leaving you looking the same as before... but feeling so different! </font>'
-
-	if preg = 1:
-		gs 'medical_din', 'remove_preg'
-		RecovH = 0		
-	end
-
-	act 'Finish': gt $loc, $loc_arg
-end
-
-if $ARGS[0] = 'magbstchoice':
-	*clr & cla
-	menu_off = 1
-	tittmp = tits + 1
-	'<center><img <<$set_imgh>> src="images/pc/body/tits/t<<tittmp>>.jpg"></center>'
-	killvar 'tittmp'
-	'You have an odd dream where you are looking at your naked chest in a mirror and your breasts seem larger...'
-	'As the dream starts to drift away, you find yourself gazing at the reflection of your breasts and think:'
-	act 'Nice, I wish my breasts really would grow.':
-		magf2bdo = 1
-		magtarcup += 1
-		killvar 'mgf2bnocnt'
-		gt 'bed2', 'sleep'
-	end
-	act 'Eh, I don''t like them like that.': magf2bdo = 0 & mgf2bnocnt += 1 & gt 'bed2', 'dream'
-end
 
 --- bed2 ---------------------------------
 

+ 3 - 3
locations/begin.qsrc

@@ -141,10 +141,10 @@ if $ARGS[0] = 'real_character':
 	'<center><b><font color = maroon>CHARACTER SELECTION</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_1.jpg"></center>'
 	*nl
-	'This game has two ways to display your character''s face, either dynamically depending on your hair style or a fixed image of your choice.'
+	'This game has two ways to display your character''s face, either dynamically depending on your hair style and colour or a fixed image of your choice.'
 	'To use a fixed image, replace the image "avatar" in the "images" folder of the game with a file of the same name and format (.jpg) and select "Use a fixed image".'
-	'Please note, this choice can only be changed in the cheat menu at any time and only one custom image can be used at anytime across all saves.'
-	'Your selected image is your own personal choice, and is based on your personal preferences. By default, the game uses an avatar image from the site wikimedia.org.'
+	'Please note, this choice can be changed in the cheat menu at any time. Only one fixed image can be used at a time and will be the same across all saves.'
+	'Your fixed image is your own personal choice, and is based on your personal preferences. By default, the game uses an avatar image from the site wikimedia.org.'
 
 	*nl
 	'If you are playing with Quest player for Android, click '

+ 80 - 30
locations/booty_call.qsrc

@@ -4,46 +4,62 @@ if $ARGS[0] = 'scheduler':
 	!! clear schedule
 	killvar 'booty_call_time'
 	i = 0
-	:booty_call_time_sched_loop
-	if i < ARRSIZE('$FuckBuddy'):
-		if ((rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and (rand(1,npc_rel[$FuckBuddy[i]]) > 0)) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_big_fight[$FuckBuddy[i]] < daystart - 7:
-			if npc_start_free_time[$FuckBuddy[i]] = 0: 
-				$boy = $FuckBuddy[i]
-				gs 'saveupdater', 'npc_stat_update'
-			end
-			if npc_booty_call[$FuckBuddy[i]] = daystart:
-				npc_booty_call_time[$FuckBuddy[i]] = hour * 60 + rand(0,120)
-			elseif week = npc_day_off[$FuckBuddy[i]]:
-				booty_call_time[$FuckBuddy[i]] = 600 + rand(0,720)
-			elseif week ! npc_day_off[$FuckBuddy[i]]:
-				booty_call_time[$FuckBuddy[i]] = rand((npc_start_free_time[$FuckBuddy[i]] * 60), (npc_end_free_time[$FuckBuddy[i]] - 1) * 60)
-			else
-				booty_call_time[$FuckBuddy[i]] = 2000
-!!			elseif week < 6:
-!!				booty_call_time[$FuckBuddy[i]] = 900 + rand(0,210)
-!!			else
-!!				booty_call_time[$FuckBuddy[i]] = 600 + rand(0,720)
-			end
+	gs 'booty_call', 'scheduler2'
+end
+
+if $ARGS[0] = 'scheduler2':
+	if i <= arrsize('$FuckBuddy'):
+		gs 'booty_call', 'npc_stat_update'
+		if (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_rel[$FuckBuddy[i]] > 0 and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_big_fight[$FuckBuddy[i]] < daystart - 7:
+			gs 'booty_call', 'scheduler3'
+		else
+			npc_no_booty_call[$FuckBuddy[i]] = daystart
 		end
 		i += 1
-		jump 'booty_call_time_sched_loop'
+		gs 'booty_call', 'scheduler2'
+	end
+end
+
+
+if $ARGS[0] = 'scheduler3':
+	if npc_booty_call[$FuckBuddy[i]] = daystart:
+		booty_call_time[$FuckBuddy[i]] = ((npc_booty_call_time[$FuckBuddy[i]] * 60) + rand(0,180))
+	elseif week = npc_day_off[$FuckBuddy[i]]:
+		booty_call_time[$FuckBuddy[i]] = (600 + rand(0,720))
+	elseif week ! npc_day_off[$FuckBuddy[i]]:
+		booty_call_time[$FuckBuddy[i]] = (rand(npc_start_free_time[$FuckBuddy[i]],(npc_end_free_time[$FuckBuddy[i]] - 1)) * 60) + rand(0,180)
+	else
+		booty_call_time[$FuckBuddy[i]] = 2000
 	end
 end
 
+!!	if npc_start_free_time[$FuckBuddy[i]] = 0 or npc_day_off[$FuckBuddy[i]] = 0 or npc_end_free_time[$FuckBuddy[i]] = 0: 
+!!		$boy = $FuckBuddy[i]
+		
+!!	end
+
+!!		if ((rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and (rand(1,npc_rel[$FuckBuddy[i]]) > 0)) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_big_fight[$FuckBuddy[i]] < daystart - 7:
+
+!!			elseif week < 6:
+!!				booty_call_time[$FuckBuddy[i]] = 900 + rand(0,210)
+!!			else
+!!				booty_call_time[$FuckBuddy[i]] = 600 + rand(0,720)
+
 if $ARGS[0] = 'set_booty_call_date':
-	if booty_call['sleepover'] = 1:
+	if booty_call['invite_today'] = 1:
 		npc_booty_call[$boy] = daystart
-	else
+	elseif booty_call['invite_tomorrow'] = 1:
 		npc_booty_call[$boy] = daystart + 1
 	end
 	npc_booty_call_time[$boy] = npc_start_free_time[$boy]
 end
 
 if $ARGS[0] = 'block_booty_calls':
-	if booty_call['sleepover'] = 1:
+	if booty_call['invite_today'] = 1:
 		npc_booty_call[$boy] = 0
 		npc_no_booty_call[$boy] = daystart
-	else
+		npc_booty_call_time[$boy] = 0
+	elseif booty_call['invite_tomorrow'] = 1:
 		npc_no_booty_call[$boy] = daystart + 1
 	end
 end
@@ -51,12 +67,12 @@ end
 if $ARGS[0] = 'SMS raiser':
 	i = 0
 	:booty_call_sms_raiser_loop
-	if i < ARRSIZE('$FuckBuddy'):
-		if booty_call_time[$FuckBuddy[i]] < hour*60+minut:
-			gs 'booty_call_sms', 'start',$FuckBuddy[i]
+	if i < arrsize('$FuckBuddy'):
+		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
+			gs 'booty_call_sms', 'start', $FuckBuddy[i]
 			gs 'booty_call_sms', 'Add SMS', $FuckBuddy[i]
-			booty_call_time[$FuckBuddy[i]] = 2000
-			!! this is a bit superfluous, but it makes the code run fater.
+			booty_call_time[$FuckBuddy[i]] = 2399
+			!! this is a bit superfluous, but it makes the code run faster.
 			booty_call_time['A0'] = daystart
 		end
 		i += 1
@@ -343,4 +359,38 @@ if $ARGS[0] = 'get_invited':
 
 end
 
+!! ------------ NPC Stat Updater ------------------------
+
+if $ARGS[0] = 'npc_stat_update':
+	if npc_start_free_time[$FuckBuddy[i]] = 0 or npc_day_off[$FuckBuddy[i]] = 0:
+		if npc_finance[$FuckBuddy[i]] = 0:
+			if rand(1,3) = 1:
+				npc_start_free_time[$FuckBuddy[i]] = 9
+				npc_end_free_time[$FuckBuddy[i]] = 12
+			elseif rand(1,2) = 1:
+				npc_start_free_time[$FuckBuddy[i]] = 16
+				npc_end_free_time[$FuckBuddy[i]] = 20
+			else
+				npc_start_free_time[$FuckBuddy[i]] = 20
+				npc_end_free_time[$FuckBuddy[i]] = 23
+			end
+		elseif npc_finance[$FuckBuddy[i]] = 1:
+			if rand(1,2) = 1:
+				npc_start_free_time[$FuckBuddy[i]] = 9
+				npc_end_free_time[$FuckBuddy[i]] = 12
+			else
+				npc_start_free_time[$FuckBuddy[i]] = 20
+				npc_end_free_time[$FuckBuddy[i]] = 23
+			end
+		elseif npc_finance[$FuckBuddy[i]] = 2:
+			npc_apt_type[$FuckBuddy[i]] = 5
+			!!npc_apt_type[$npclastgenerated] = rand(5,6)
+			!! apt_type 6 is disabled until pictures are added
+			npc_occupation[$FuckBuddy[i]] = rand(14,18)
+			npc_car[$FuckBuddy[i]] = rand(0,1)
+		end
+		npc_day_off[$FuckBuddy[i]] = rand(1,7)
+	end
+end
+
 --- booty_call ---------------------------------

+ 242 - 99
locations/booty_call_after.qsrc

@@ -632,7 +632,7 @@ if $ARGS[0] = 'finish':
 		$npc_apt_bedroom[$boy]
 		'"I really can''t... keep going... <<$npc_firstname[$boy]>> huffs exhaustedly.'
 		gs'booty_call_after', 'after_sex1'
-	elseif booty_call['cum_count'] >= npc_sexdrive[$boy]:
+	elseif booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
 		booty_call['sex_end'] = 1
 		'"Yeah," <<$npc_firstname[$boy]>> pants. "I''m totally tapped out."'
 		gs'booty_call_after', 'after_sex1'
@@ -1011,10 +1011,10 @@ if $ARGS[0] = 'facial_mouth_clean':
 			gs'stat'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial24.jpg"></center>'
-			if booty_call['fuck'] = 1:
-				'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can faintly taste yourself, as well as the remenants of cum that was still inside it, drawn out your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
+			if $booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl':
+				'You lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can faintly taste yourself, as well as the remnants of cum that was still inside it, drawn out your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
 			else
-				'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can taste the remenants of cum that was still inside it, drawn out by your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
+				'Opening your mouth, you lean forward, wrapping your lips around <<$npc_firstname[$boy]>>''s cock and running them up and down to clean him off. You can taste the remnants of cum that was still inside it, drawn out by your mouth. Looking up at <<$npc_firstname[$boy]>>, you are greeted with the sight of him staring down at you.'
 			end
 			gs'booty_call_sex', 'sex_end'
 		end
@@ -1111,7 +1111,12 @@ if $ARGS[0] = 'pull_apart':
 end
 
 if $ARGS[0] = 'after_sex2':
-	if booty_call['sleep_fuck'] > 0:
+	if booty_call['sleepover'] > 0:
+		act'Get on with the morning':
+			cla & *clr
+			gs'booty_call_morning', 'wakeup2'
+		end
+	elseif booty_call['sleep_fuck'] > 0:
 		act'Go back to sleep':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/cuddle2.jpg"></center>'
@@ -1122,25 +1127,52 @@ if $ARGS[0] = 'after_sex2':
 		act'Get dressed':gt'booty_call_after', 'dressing1'
 	end
 	
-	if booty_call['relax_after'] = 0:
-		act'Relax together':
-			cla & *clr
-			if npc_smoker[$boy] < 1:
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'You and <<$npc_firstname[$boy]>> both lay back, quietly relaxing together in the still bliss of your love-making.'
+	act'Relax together':
+		cla & *clr
+		if npc_smoker[$boy] < 1:
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			'You and <<$npc_firstname[$boy]>> both lay back, quietly relaxing together in the still bliss of your love-making.'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke2.jpg"></center>'
+			'You lay back, quietly relaxing beside <<$npc_firstname[$boy]>> in the still bliss of your love-making as he puffs away on his cigarette.'
+		end
+		gs'booty_call_after', 'relax_together'
+	end
+	act'Use his bathroom':
+		cla
+		act'Use the mirror':
+			$locM = 'booty_call_after'
+			$locM_arg = 'after_sex2'
+			gt 'mirror', 'start'
+		end
+		
+		if (pcs_breath ! 1 or cumloc[12] = 1) and (travel_brush = 1 or overnight_bag[$boy] = 1):
+			menu_off = 1
+			*clr & cla
+			minut += 3
+			cumspclnt = 2
+			gs 'cum_cleanup'
+			pcs_breath = 1
+			teeth['brushed'] +=1
+			if $clothingworntype = 'nude' and $braworntype = 'none' and $pantyworntype = 'none':
+				'<center><video autoplay loop src="images/shared/home/bathroom/brushteeth.mp4"></center>'
+				play 'sound/brushteeth.mp3',100
 			else
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke2.jpg"></center>'
-				'You lay back, quietly relaxing beside <<$npc_firstname[$boy]>> in the still bliss of your love-making as he puffs away on his cigarette.'
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brushteeth.jpg"></center>'
 			end
-			gs'booty_call_after', 'relax_together'
+			*nl
+			'You brush your teeth and now they are clean and minty fresh.'
+			gs'booty_call_after', 'after_sex2'
 		end
-	end
-	
-	if booty_call['sleep_fuck'] = 0:
-		if booty_call['shower'] = 0:
-			act'Take a shower':gs'booty_call_shower', 'after_borrow_shower'
+		if booty_call['sleep_fuck'] = 0 and booty_call['wakeup_fuck'] = 0:
+			if booty_call['shower'] = 0:
+				act'Take a shower':gs'booty_call_shower', 'after_borrow_shower'
+			end
 		end
 	end
+	if booty_call['cigarette'] = 0 and (siga > 0 or npc_smoker[$boy] > 0):
+		act'Smoke a cigarette':cla & gs'booty_call_after', 'smoke_ciga1'
+	end
 
 	if $stat_cum_msg ! '':
 		if salfetka > 0:
@@ -1157,6 +1189,7 @@ if $ARGS[0] = 'after_sex2':
 		end
 	end
 	
+	gs'booty_call_after', 'cock_clean'
 	gs'booty_call_after', 'plan_b'
 	gs'booty_call_after', 'birth_control_pill_take'
 	gs'booty_call_after', 'spend_night_ask'
@@ -1167,40 +1200,12 @@ if $ARGS[0] = 'relax_together':
 	booty_call['relax_after'] = 1
 	act'Stop relaxing':cla & gs'booty_call_after', 'after_sex2'
 	
+	act'Pillow talk':gt'booty_call_pillow_talk', 'start'
+	
 	if booty_call['after_kiss'] = 0:
 		act'Kiss <<$npc_firstname[$boy]>>':gt 'booty_call_after', 'kiss'
 	end
 	
-	if booty_call['pillow_talk'] = 0:
-		act'Pillow talk':gt'booty_call_pillow_talk', 'start'
-	end
-	
-	if siga > 0 and booty_call['cigarette'] = 0 and booty_call['pillow_talk'] = 0 and booty_call['angry_after'] = 0:
-		act'Have a smoke':booty_call['cigarette'] = 1 & gt'booty_call_after', 'smoke'
-
-		act'Have a smoke and play with your phone':
-			booty_call['phone'] = 2
-			booty_call['cigarette'] = 1
-			gt'booty_call_after', 'smoke'
-		end
-	end
-
-	if npc_smoker[$boy] > 0 and booty_call['annoyed'] = 0 and booty_call['bum_cigarette'] = 0 and booty_call['cigarette'] = 0 and booty_call['pillow_talk'] = 0 and booty_call['angry_after'] = 0:
-		act'Bum a cigarette':
-			booty_call['bum_cigarette'] = 1
-			siga += 1
-			siga_bum = 1
-			gt'booty_call_after', 'smoke'
-		end
-		act'Bum a cigarette play with your phone':
-			booty_call['bum_cigarette'] = 1
-			booty_call['cigarette'] = 3
-			siga += 1
-			siga_bum = 1
-			gt'booty_call_after', 'smoke'
-		end
-	end
-	
 	if booty_call['sleep_fuck'] > 0:
 !!		gs'booty_call_pillow_talk', 'sleep_fucking_talk'
 	elseif pcs_sleep < 30 and booty_call['get_up'] = 0 and booty_call['angry_after'] = 0:
@@ -1209,6 +1214,32 @@ if $ARGS[0] = 'relax_together':
 	
 end
 
+if $ARGS[0] = 'cock_clean':
+	if booty_call['cock_cleanup'] ! 1 and booty_call['fuck'] > 0:
+		act'Clean his cock':
+			booty_call['cock_cleanup'] = 1
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+			if booty_call['no_condom'] = 1:
+				if $booty_call['last_cum'] = 'creampie':
+					'Feeling nice, you slither down between <<$npc_firstname[$boy]>>''s legs and take his cock in your mouth, running your lips across it and giving it a thorough tongue bath, cleaning it of cum and your own juices.'
+				else
+					'Feeling nice, you slither down between <<$npc_firstname[$boy]>>''s legs and take his cock in your mouth, running your lips across it and giving it a thorough tongue bath, cleaning the cum from its tip and your own juices from its shaft.'
+				end
+			elseif booty_call['condoms_used'] > 0:
+				if booty_call['cum_condom'] > 0:
+					'Feeling nice, you slither down between <<$npc_firstname[$boy]>>''s legs and take his cock in your mouth, running your lips across it and giving it a thorough tongue bath, cleaning it of the cum that stuck to it inside the condom.'
+				else
+					'Feeling nice, you slither down between <<$npc_firstname[$boy]>>''s legs and take his cock in your mouth, running your lips across it and giving it a thorough tongue bath, cleaning the cum from the tip and the condom lube from its shaft.'
+				end
+			end
+			*nl
+			'<<$npc_firstname[$boy]>> smiles at you appreciatively.'
+			gs'booty_call_after', 'after_sex2'
+		end
+	end
+end
+
 if $ARGS[0] = 'kiss':
 	cla & *clr
 	if cum_loc['face'] <= 0:
@@ -1381,7 +1412,35 @@ if $ARGS[0] = 'birth_control_pill_take':
 	end
 end
 
-if $ARGS[0] = 'smoke':
+if $ARGS[0] = 'smoke_ciga1':
+	if siga > 0 and booty_call['cigarette'] = 0 and booty_call['pillow_talk'] = 0 and booty_call['angry_after'] = 0:
+		act'One of yours':booty_call['cigarette'] = 1 & gt'booty_call_after', 'smoke_ciga2'
+
+		act'Play with your phone':
+			booty_call['phone'] = 2
+			booty_call['cigarette'] = 1
+			gt'booty_call_after', 'smoke_ciga2'
+		end
+	end
+
+	if npc_smoker[$boy] > 0 and booty_call['annoyed'] = 0 and booty_call['bum_cigarette'] = 0 and booty_call['cigarette'] = 0 and booty_call['pillow_talk'] = 0 and booty_call['angry_after'] = 0:
+		act'Bum a cigarette':
+			booty_call['bum_cigarette'] = 1
+			siga += 1
+			siga_bum = 1
+			gt'booty_call_after', 'smoke_ciga2'
+		end
+		act'Bum a cigarette and play with your phone':
+			booty_call['bum_cigarette'] = 1
+			booty_call['cigarette'] = 3
+			siga += 1
+			siga_bum = 1
+			gt'booty_call_after', 'smoke_ciga2'
+		end
+	end
+end
+
+if $ARGS[0] = 'smoke_ciga2':
 	cla & *clr
 	booty_call['cigarette'] = 1
 	cla & *clr
@@ -1536,9 +1595,13 @@ if $ARGS[0] = 'dressing1':
 		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 		gs'booty_call_after', 'not_leaving'
 		gs'booty_call_after', 'leaving_soon'
-		gs'booty_call_after', 'going_disco'
-		gs'booty_call_after', 'mom_late'
-		gs'booty_call_after', 'need_homework'
+		if booty_call['sleepover'] < 1:
+			gs'booty_call_after', 'going_disco'
+			gs'booty_call_after', 'mom_late'
+			gs'booty_call_after', 'need_homework'
+		else
+			gs'booty_call_after', 'going_school'
+		end
 	else
 		'<<$npc_firstname[$boy]>> starts getting dressed next to you.'
 	end
@@ -1576,10 +1639,20 @@ if $ARGS[0] = 'leaving_soon':
 	act'Yeah':
 		booty_call['leaving'] = 1
 		cla & *nl
-		'"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
-		gs 'booty_call_after', 'dressing2'
-		
-		gs 'booty_call_after', 'panty_gift'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
+			gs 'booty_call_after', 'dressing2'
+			gs 'booty_call_after', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+			gs'booty_call_after', 'dress_loop'
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
 	end
 end
 
@@ -1642,6 +1715,28 @@ if $ARGS[0] = 'need_homework':
 	end
 end
 
+if $ARGS[0] = 'going_school':
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
+		act'School':
+			cla & *nl
+			if booty_call['late_for_school'] = 1 and hour >= 8:
+				'"I already told you, I''m late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+			elseif booty_call['late_for_school'] = 1:
+				'"I already told you, I''m gonna be late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+			else
+				'"Gotta get to school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+			end
+			gs'booty_call_after', 'dress_loop'
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
+	end
+end
+
 if $ARGS[0] = 'panty_gift':
 	if $pantyworntype ! 'none' and $braworntype = 'none' and $clothingworntype = 'nude' and booty_call['mad'] = 0 and booty_call['fuck_count'] > 0:
 		act'Give him your panties':
@@ -1656,7 +1751,7 @@ if $ARGS[0] = 'panty_gift':
 			if npc_panty_give[$boy] = 1:
 				'"A gift?" <<$npc_firstname[$boy]>> asks curiously.'
 				*nl
-				'In one smooth motion, you slide your panties down your legs and daintily toss them into the rumpled sheets of the bed you were just fucked in.'
+				'In one smooth motion, you slide your panties down your legs and daintily toss them onto the rumpled sheets of the bed on which you fucked <<$npc_firstname[$boy]>>.'
 				gs 'booty_call_after', 'panty_gift2'
 			else
 				'"Another pair of your panties?" <<$npc_firstname[$boy]>> grins.'
@@ -1686,7 +1781,7 @@ if $ARGS[0] = 'panty_gift2':
 		end
 	end
 	
-	act'Something to remember the occassion':
+	act'Something to remember the occasion':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		if daystage > 3:
@@ -1842,11 +1937,11 @@ if $ARGS[0] = 'dress_loop':
 		end
 	elseif booty_call['dress_end'] = 1:
 		if CloDress = 1:
-			'checking your dress'
+			$booty_call['dress_describe'] = 'checking your dress'
 		elseif CloSkirtShortness > 0:
-			'smoothing your skirt'
+			$booty_call['dress_describe'] = 'smoothing your skirt'
 		else
-			'checking your clothes'
+			$booty_call['dress_describe'] = 'checking your clothes'
 		end
 	end
 	gs'stat'
@@ -1856,32 +1951,9 @@ if $ARGS[0] = 'after_sex_dressed':
 	act'Prepare to leave':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
-		'"I gotta get going."'
+		'"I gotta get going," you say'
 		'"Okay, see you later."'
-		act'Bye':
-			cla & *nl
-			'"Bye," you say with a wave and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-
-		act'See ya':
-			cla & *nl
-			'"See ya," you wink and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-		
-		act'Blow him a kiss':
-			cla & *nl
-			'"Until next time."'
-			'You give him a wink and blow him a kiss and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-		
-		act'Text me':
-			cla & *nl
-			'"Text me later," you say nonchalantly and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
+		gs'booty_call_after', 'leaving_dialogue'
 	end
 	if booty_call['leaving'] ! 1:
 		act'Hang out':msg 'Work in progress! To be continued!'
@@ -1917,8 +1989,66 @@ if $ARGS[0] = 'after_sex_dressed':
 end
 
 
+if $ARGS[0] = 'leaving_dialogue':
+	act'"Bye"':
+		$booty_call['leave_dialogue'] = 'Bye'
+		gs'booty_call_after', 'leaving_action'
+	end
+
+	act'"See ya"':
+		$booty_call['leave_dialogue'] = 'See ya'
+		gs'booty_call_after', 'leaving_action'
+	end
+	
+	act'"Toodles"':
+		$booty_call['leave_dialogue'] = 'Toodles'
+		gs'booty_call_after', 'leaving_action'
+	end
+	
+	act'"Text me"':
+		$booty_call['leave_dialogue'] = 'Text me'
+		gs'booty_call_after', 'leaving_action'
+	end
+	
+	act'"Till next time"':
+		$booty_call['leave_dialogue'] = 'Till next time'
+		gs'booty_call_after', 'leaving_action'
+	end
+	
+end
+
 if $ARGS[0] = 'leaving_action':
+	cla
+	act'Nonchalant':
+		$booty_call['leave_action'] = ' nonchalantly and head out the door without a second glance'
+		gs'booty_call_after', 'leaving_end'
+	end
+	
+	act'Wave goodbye':
+		$booty_call['leave_action'] = ', waggling your fingers at him and head out the door'
+		gs'booty_call_after', 'leaving_end'
+	end
 
+	act'Wink':
+		$booty_call['leave_action'] = ' with a wink as you close the door behind you'
+		gs'booty_call_after', 'leaving_end'
+	end
+	
+	act'Blow him a kiss':
+		$booty_call['leave_action'] = ', blowing him a kiss just before the door closes behind you'
+		gs'booty_call_after', 'leaving_end'
+	end
+	
+	act'Shake your ass':
+		$booty_call['leave_action'] = ', giving him a teasing shake of your ass just before you close the door behind you'
+		gs'booty_call_after', 'leaving_end'
+	end
+end
+
+if $ARGS[0] = 'leaving_end':
+	cla & *nl
+	'"<<$booty_call[''leave_dialogue'']>>," you say<<$booty_call[''leave_action'']>>.'
+	act'Leave':gt'booty_call_after', 'exit'
 end
 
 if $ARGS[0] = 'unsatisfied_breakup':
@@ -2191,7 +2321,7 @@ if $ARGS[0] = 'npc_booty_call_invite':
 	if booty_call['dress_talk1'] = 0:
 		booty_call['dress_talk1'] = 1
 		if npc_day_off[$boy] = week + 1:
-			booty_call['tomorrow_invite'] = 1
+			booty_call['invite_tomorrow'] = 1
 			if npc_girlfriend[$boy] = 1:
 				pc_know_npc_has_girlfriend[$boy] = 1
 				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''ll be my day off and my girlfriend won''t be around. Want to come over and do this again?"'
@@ -2199,7 +2329,7 @@ if $ARGS[0] = 'npc_booty_call_invite':
 				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''ll be my day off. Want to come by and do this again?"'
 			end
 		elseif npc_day_off[$boy] = week and (booty_call['sleepover'] = 1 or hour < 5):
-			booty_call['later_today_invite'] = 1
+			booty_call['invite_today'] = 1
 			if npc_girlfriend[$boy] = 1:
 				pc_know_npc_has_girlfriend[$boy] = 1
 				'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "Today''s my day off and my girlfriend won''t be around. Want to come over and do this again?"'
@@ -2207,7 +2337,7 @@ if $ARGS[0] = 'npc_booty_call_invite':
 				'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''s my day off. Want to come by and do this again?"'
 			end
 		else
-			booty_call['tomorrow_invite'] = 1
+			booty_call['invite_tomorrow'] = 1
 			if npc_girlfriend[$boy] = 1:
 				pc_know_npc_has_girlfriend[$boy] = 1
 				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "My girlfriend won''t be around. Want to come over and do this again?"'
@@ -2234,7 +2364,7 @@ if $ARGS[0] = 'busy_tomorrow':
 	act'I''m busy':
 		gs 'booty_call', 'block_booty_calls'
 		cla & *nl
-		if booty_call['tomorrow_invite'] = 1:
+		if booty_call['invite_tomorrow'] = 1:
 			'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I''m busy tomorrow."'
 		else
 			'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I''m busy."'
@@ -2345,14 +2475,27 @@ if $ARGS[0] = 'sleep':
 end
 
 if $ARGS[0] = 'sleep_function':
-	if rand(1,10) < npc_sexdrive[$boy] - (booty_call['cum_count']/2) and (stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0) and booty_call['sleep_fuck'] = 0:
-		booty_call['extra_cum'] += npc_sexdrive[$boy]/2
-		booty_call['sleep_time'] = rand(1,3)
-		minut += 60*booty_call['sleep_time']
-		pcs_sleep += 15*booty_call['sleep_time']
-		pcs_health += 5*booty_call['sleep_time']
-		gs'stat'
-		gt'booty_call_sex', 'sleep_sex'
+	if rand(1,10) < npc_sexdrive[$boy] - (booty_call['cum_count']/2) + npc_sleep_sex_okay[$boy] and (stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0) and booty_call['sleep_fuck'] = 0:
+		if rand(0,1) = 1:
+			booty_call['extra_cum'] += npc_sexdrive[$boy]/2
+			booty_call['sleep_time'] = rand(1,3)
+			minut += 60*booty_call['sleep_time']
+			pcs_sleep += 15*booty_call['sleep_time']
+			pcs_health += 5*booty_call['sleep_time']
+			gs'stat'
+			gt'booty_call_sex', 'sleep_sex'
+		else
+			booty_call['sleepover'] = 1
+			if alko > 6:
+				booty_call['hangover'] = 1
+				gs'sleep', 'simple'
+				gs'pain', 3, 'head', 'ache'
+			else
+				gs'sleep', 'simple'
+			end
+			booty_call['extra_cum'] += npc_sexdrive[$boy]
+			gt'booty_call_sex', 'wakeup_sex'
+		end
 	else
 		booty_call['sleepover'] = 1
 		if alko > 6:

+ 19 - 17
locations/booty_call_condoms.qsrc

@@ -630,24 +630,26 @@ if $ARGS[0] = 'npc_lets_skip_condom':
 end
 
 if $ARGS[0] = 'dont_cum_in_me':
-	act'Don''t come inside me':
-		cla & *nl
-		booty_call['promise_no_creampie'] = 1
-		if birth_control['think_safe'] ! 1 and npc_know_not_bc[$boy] = 1:
-			'"Don''t forget, I''m not on birth control," you warn him as you get into position. "So you can''t come inside me."'
-		elseif birth_control['think_safe'] ! 1 and pillcon2 > 0:
-			npc_know_not_bc[$boy] = 1
-			npc_know_bc[$boy] = 0
-			npc_know_bc_not_effective[$boy] = 1
-			'"Don''t come inside me," you warn him as you get into position. "My birth control hasn''t kicked in yet."'
-		elseif birth_control['think_safe'] ! 1:
-			npc_know_not_bc[$boy] = 1
-			npc_know_bc[$boy] = 0
-			'"Don''t come inside me," you warn him as you get into position. "I''m not on birth control."'
-		else
-			'"Don''t come inside me," you murmur as you get into position.'
+	if birth_control['think_safe'] = 0 and npc_creampie_okay[$boy] = 0:
+		act'Don''t come inside me':
+			cla & *nl
+			booty_call['promise_no_creampie'] = 1
+			if birth_control['think_safe'] ! 1 and npc_know_not_bc[$boy] = 1:
+				'"Don''t forget, I''m not on birth control," you warn him as you get into position. "So you can''t come inside me."'
+			elseif birth_control['think_safe'] ! 1 and pillcon2 > 0:
+				npc_know_not_bc[$boy] = 1
+				npc_know_bc[$boy] = 0
+				npc_know_bc_not_effective[$boy] = 1
+				'"Don''t come inside me," you warn him as you get into position. "My birth control hasn''t kicked in yet."'
+			elseif birth_control['think_safe'] ! 1:
+				npc_know_not_bc[$boy] = 1
+				npc_know_bc[$boy] = 0
+				'"Don''t come inside me," you warn him as you get into position. "I''m not on birth control."'
+			else
+				'"Don''t come inside me," you murmur as you get into position.'
+			end
+			gs 'booty_call_sex', 'position_choose'
 		end
-		gs 'booty_call_sex', 'position_choose'
 	end
 end
 

+ 7 - 7
locations/booty_call_cowgirl.qsrc

@@ -36,7 +36,7 @@ if $ARGS[0] = 'cowgirl_start':
 		act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
 
 		act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
-	elseif booty_call['initative'] ! 1:
+	elseif booty_call['initiative'] ! 1:
 		act'Continue':
 			cla & *clr
 			if $booty_call['pos_speed'] = '':
@@ -407,21 +407,21 @@ end
 if $ARGS[0] = 'cowgirl_change_pace':
 	cla
 	if booty_call['speed'] = 1:
-		act'Pick up the pace a little': gt 'booty_call_cowgirl', 'cowgirl2.1'
+		act'Pick up the pace a little': gt 'booty_call_cowgirl', 'cowgirl2'
 
-		act'Ride ''em cowgirl!': gt 'booty_call_cowgirl', 'cowgirl3.1'
+		act'Ride ''em cowgirl!': gt 'booty_call_cowgirl', 'cowgirl3'
 	end
 
 	if booty_call['speed'] = 2:
-		act'Ride him gently': gt 'booty_call_cowgirl', 'cowgirl1.1'
+		act'Ride him gently': gt 'booty_call_cowgirl', 'cowgirl1'
 
-		act'Ride ''em cowgirl!': gt 'booty_call_cowgirl', 'cowgirl3.1'
+		act'Ride ''em cowgirl!': gt 'booty_call_cowgirl', 'cowgirl3'
 	end
 
 	if booty_call['speed'] = 3:
-		act'Ride him gently': gt 'booty_call_cowgirl', 'cowgirl1.1'
+		act'Ride him gently': gt 'booty_call_cowgirl', 'cowgirl1'
 
-		act'Slow it down a little': gt 'booty_call_cowgirl', 'cowgirl2.1'
+		act'Slow it down a little': gt 'booty_call_cowgirl', 'cowgirl2'
 	end
 end
 

+ 165 - 46
locations/booty_call_cum.qsrc

@@ -24,14 +24,26 @@ if $ARGS[0] = 'miss_cum':
 			'"<i>Nmmnnghhhaaaaaaaaaa!</i>"'
 			*nl
 			if booty_call['consecutive_orgasm'] < 5:
-				'<<$npc_firstname[$boy]>> never slowed down, fucking you through your last orgasm and is still fucking you straight through another one.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'<<$npc_firstname[$boy]>> never slows down, fucking you through your last orgasm and is still fucking you straight through another one, magic bursts continuing inside you like nuclear bombs and your uncontrollable shudders their aftershocks.'
+				else
+					'<<$npc_firstname[$boy]>> never slows down, fucking you through your last orgasm and is still fucking you straight through another one.'
+				end
 			else
-				'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool all over <<$npc_firstname[$boy]>>''s hand.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool all over <<$npc_firstname[$boy]>>''s hand as the barrage of orgasmic magic continues exploding inside you.'
+				else
+					'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool all over <<$npc_firstname[$boy]>>''s hand.'
+				end
 			end
 		else
 			'<<$npc_firstname[$boy]>>''s cock pounding your insides is too good and you find yourself coming. <i>Hard</i>.'
 			*nl
-			'Your pussy clenches down on the cock inside it as your body goes into orgasmic spasms. You try to let out a moan but <<$npc_firstname[$boy]>> clamps his hand over your mouth, holding your head down. It drives you crazy and your eyes roll back in your head, unable to do anything but quiver and give muffled groans.'
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'Your pussy clenches down on the cock inside it and your body goes into spasms as orgasmic magic floods your system. Reality wobbles and suddenly it''s like experiencing your orgasm in slow motion, dragging the pleasure out so long it''s painful. You try to let out a moan but <<$npc_firstname[$boy]>> clamps his hand over your mouth, holding your head down. It drives you crazy and your eyes roll back in your head, unable to do anything but quiver and give muffled groans that feel to you like they last a lifetime.'
+			else
+				'Your pussy clenches down on the cock inside it as your body goes into orgasmic spasms. You try to let out a moan but <<$npc_firstname[$boy]>> clamps his hand over your mouth, holding your head down. It drives you crazy and your eyes roll back in your head, unable to do anything but quiver and give muffled groans.'
+			end
 		end
 	else
 		if booty_call['kiss'] = 1:
@@ -44,20 +56,36 @@ if $ARGS[0] = 'miss_cum':
 			*nl
 			if booty_call['consecutive_orgasm'] < 5:
 				'<<$npc_firstname[$boy]>> keeps hitting all the right spots inside you and you can''t help but giggle in delight as he forces your orgasm to keep going, refusing to stop fucking you for even a second.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					*nl
+					'Bursts of magic pop inside you like firecrackers with every new climax, fuelling the fire as you feel the energy course through your entire body, from your womb to the tips of your nipples.'
+				end
 			else
 				'You''ve been coming for so long now, you think you might be going insane. Or having a stroke. Or maybe a heart attack. All you know is that the pleasure is so intense that it <i>hurts</i>.'
 				*nl
-				'<i>I wonder if I''m going to die?</i> the last conscious part of your mind wonders...'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'<i>I wonder if a witch has ever literally exploded from their own magic?</i> the last thought of your delirious mind wonders...'
+				else
+					'<i>I wonder if I''m going to die?</i> the last conscious part of your mind wonders...'
+				end
 			end
 		else
 			if booty_call['kiss'] = 1:
 				'"<i>Mmmph~! Mmm~! Mmmm!</i>"'
 				*nl
-				'You keep kissing <<$npc_firstname[$boy]>> even as you come, forcing your face against his as wave after wave of orgasm washes over you. Your abs go taut and your pussy clenches down on his cock. Your toes curl in pleasure as your back arches, and you let out a wordless cry directly into <<$npc_firstname[$boy]>>''s mouth as you are finally forced to break the kiss and the release of climax courses through your entire body, quivering around the cock inside you.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'Magic erupts from your womb as you come, but it doesn''t stop you from kissing <<$npc_firstname[$boy]>>, forcing your face against his as wave after wave of magical energy washes through you, burning like fire inside your veins. Your abs go taut and your pussy clenches down on his cock. Your toes curl in pleasure as your back arches, and you let out a wordless cry directly into <<$npc_firstname[$boy]>>''s mouth as you are finally forced to break the kiss and carnal magic <i>explodes</i> from your body. <<$npc_firstname[$boy]>> remains oblivious, fucking you straight through your witchy orgasm.'
+				else
+					'You keep kissing <<$npc_firstname[$boy]>> even as you come, forcing your face against his as wave after wave of orgasm washes over you. Your abs go taut and your pussy clenches down on his cock. Your toes curl in pleasure as your back arches, and you let out a wordless cry directly into <<$npc_firstname[$boy]>>''s mouth as you are finally forced to break the kiss and the release of climax courses through your entire body, quivering around the cock inside you.'
+				end
 			else
 				'"<i>Ah~!</i> I''m-! I''m gonna-"'
 				*nl
-				'You can''t even finish the sentence before you come. Your abs go taut and your pussy clenches down on <<$npc_firstname[$boy]>>. Your toes curl in pleasure as your back arches, and you let out a wordless cry as the release of climax courses through your entire body that quivers around the cock inside you.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'You can''t even finish the sentence before you come, magic erupting from your womb as your orgasm flows through you, burning like fire inside your veins. Your abs go taut and your pussy clenches down on his cock. Your toes curl in pleasure as your back arches, and you let out a wordless cry as carnal magic <i>explodes</i> from your body. <<$npc_firstname[$boy]>> remains oblivious, fucking you straight through your witchy orgasm.'
+				else
+					'You can''t even finish the sentence before you come. Your abs go taut and your pussy clenches down on <<$npc_firstname[$boy]>>. Your toes curl in pleasure as your back arches, and you let out a wordless cry as the release of climax courses through your entire body that quivers around the cock inside you.'
+				end
 			end
 		end
 	end
@@ -72,14 +100,30 @@ if $ARGS[0] = 'doggy_cum':
 			'"<i>Nmmnnghhhaaaaaaaaaa!</i>"'
 			*nl
 			if booty_call['consecutive_orgasm'] < 5:
-				'<<$npc_firstname[$boy]>> never slowed down, fucking you through your last orgasm and is still fucking you straight through another one.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'<<$npc_firstname[$boy]>> never slows down, fucking you through your last orgasm and is still fucking you straight through another one, the magic continuing to burst inside you like nuclear bombs and your uncontrollable shudders their aftershocks.'
+				else
+					'<<$npc_firstname[$boy]>> never slows down, fucking you through your last orgasm and is still fucking you straight through another one.'
+				end
 			else
-				'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool into the bedsheets.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool all over <<$npc_firstname[$boy]>>''s hand as the barrage of orgasmic magic continues exploding inside you.'
+				else
+					'You''ve lost all conscious thought at this point and can do nothing more than spasm on cock and drool all over <<$npc_firstname[$boy]>>''s hand.'
+				end
 			end
 		else
 			'<<$npc_firstname[$boy]>> pounds you from behind, sending shockwaves of pleasure coursing through your body. It builds and builds and builds inside you and then all of a sudden, you''re coming.'
 			*nl
-			'You groan loudly as your arms give out from underneath you. Your pussy spasms around the cock inside it <<$npc_firstname[$boy]>> shoves your head down into the mattress, fucking you head down, ass up, through the entirety of your orgasm.'
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'You groan loudly as your arms give out from underneath you. Your pussy spasms around the cock inside it <<$npc_firstname[$boy]>> shoves your head down into the mattress.'
+				*nl
+				'At that moment, magic bursts from your womb.'
+				*nl
+				'Reality wobbles, and everything slows down. Your orgasm feels like it''s being dragged on for minutes, so intense it''s painful. You give a muffled scream into the mattress that lasts a lifetime and <<$npc_firstname[$boy]>> obliviously keeps pounding you through the entirety of your magical climax.'
+			else
+				'You groan loudly as your arms give out from underneath you. Your pussy spasms around the cock inside it <<$npc_firstname[$boy]>> shoves your head down into the mattress, fucking you head down, ass up, through the entirety of your orgasm.'
+			end
 		end
 	else
 		cla & *clr
@@ -87,14 +131,24 @@ if $ARGS[0] = 'doggy_cum':
 			'"<i>Nmmnnghhhaaaaaaaaaa!</i>"'
 			if booty_call['consecutive_orgasm'] < 5:
 				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					*nl
+					'Bursts of magic pop inside you like firecrackers with every new climax, fuelling the fire as you feel the energy course through your entire body, from your womb to the tips of your nipples.'
+				end
 				'<<$npc_firstname[$boy]>> keeps hitting all the right spots inside you, forcing your orgasm to keep going. You give a wordless groan, struggling to stay upright as he continues to fuck you from behind.'
 			else
 				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm_rough1.mp4"></video></center>'
 				'You''ve been coming for so long now, it''s a wonder how you''re still managing to stay on your kne-'
+				*nl
 				'Oh. That''s funny.'
+				*nl
 				'Seems your knees gave out some time ago. But <<$npc_firstname[$boy]>> never stopped fucking you, so you never stopped coming.'
 				*nl
-				'<i>I wonder if I might</i> actually <i>die?</i> the last conscious part of your mind wonders...'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'<i>I wonder if a witch has ever literally exploded from their own magic?</i> the last thought of your delirious mind wonders...'
+				else
+					'<i>I wonder if I might</i> actually <i>die?</i> the last conscious part of your mind wonders...'
+				end
 			end
 		else
 			if npc_spanker[$boy] = 1:
@@ -102,12 +156,20 @@ if $ARGS[0] = 'doggy_cum':
 				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm_spank1.mp4"></video></center>'
 				'"<i>Ah~! Ah~!</i> I''m-! I''m gonna-!"'
 				*nl
-				'You can''t even finish the sentence before you come. Your entire body convulses, barely able to breathe as your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock. Even as you shudder in orgasm, <<$npc_firstname[$boy]>> mercilessly spanks your ass, drawing cries of pain or pleasure from your lips. Which one, even you''re not completely sure.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'You can''t even finish the sentence before you come, magic erupting from your womb as your orgasm flows through you, enhancing every sensation. Your entire body convulses, barely able to breathe as your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock. Even as you shudder, <<$npc_firstname[$boy]>> mercilessly spanks your ass, drawing cries from your lips as magic amplifies the hard slaps to searing flashes of fire. It''s impossible to tell whether they''re flashes of pain or pleasure.'
+				else
+					'You can''t even finish the sentence before you come. Your entire body convulses, barely able to breathe as your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock. Even as you shudder in orgasm, <<$npc_firstname[$boy]>> mercilessly spanks your ass, drawing cries of pain or pleasure from your lips. Which one, even you''re not completely sure.'
+				end
 			else
 				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
 				'"<i>Ah~! Ah~!</i> I''m-! I''m gonna-!"'
 				*nl
-				'You can''t even finish the sentence before you come. Your entire body convulses, barely able to breathe as you shudder uncontrollably and your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock.'
+				if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+					'You can''t even finish the sentence before you come, magic erupting from your womb as your orgasm flows through you, enhancing every sensation. Your entire body convulses, barely able to breathe as you shudder uncontrollably and your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock distinctly aware .'
+				else
+					'You can''t even finish the sentence before you come. Your entire body convulses, barely able to breathe as you shudder uncontrollably and your pussy clamps down on <<$npc_firstname[$boy]>>''s <<$npc_dick_desc[$boy]>> cock.'
+				end
 			end
 		end
 	end
@@ -119,14 +181,30 @@ if $ARGS[0] = 'cowgirl_cum':
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
 	if booty_call['consecutive_orgasm'] > 1:
 		if booty_call['consecutive_orgasm'] < 5:
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'Bursts of magic pop inside you like firecrackers with every new climax, fuelling the fire as you feel the energy course through your entire body, from your womb to the tips of your nipples.'
+				*nl
+			end
 			'Your body won''t stop moving, hips won''t stop rolling, pussy won''t stop tightening. Even as you convulse on top of <<$npc_firstname[$boy]>> for what seems like the hundredth time, you can''t seem to stop grinding yourself on top of his cock and you continue to come.'
+			
 		else
-			'Saliva runs down your chin in waterfalls, streaming down your neck and glistening on your breasts. Your breathing comes in desperate gasps. Your body is caught in a never-ending cycle of orgasmic spasms, coming on <<$npc_firstname[$boy]>>''s cock so hard it <i>hurts</i>.'
-			*nl
-			'<i>I wonder if I''m going to die?</i> the last conscious part of your mind wonders...'
+			
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'Saliva runs down your chin in waterfalls, streaming down your neck and glistening on your breasts. Your breathing comes in desperate gasps. Magic continuously explodes inside you like nuclear bombs, filling you with heat and passion, coming so hard in a never-ending cycle of orgasmic spasms it <i>hurts</i>.'
+				*nl
+				'<i>I wonder if a witch has ever literally exploded from their own magic?</i> the last thought of your delirious mind wonders...'
+			else
+				'Saliva runs down your chin in waterfalls, streaming down your neck and glistening on your breasts. Your breathing comes in desperate gasps. Your body is caught in a never-ending cycle of orgasmic spasms, coming on <<$npc_firstname[$boy]>>''s cock so hard it <i>hurts</i>.'
+				*nl
+				'<i>I wonder if it''s possible to fuck myself to death?</i> the last conscious part of your mind wonders...'
+			end
 		end
 	else
-		'The buildup of pressure inside you crashes over the edge. Your body goes taut, your pussy clenches tight, and you quiver on top of <<$npc_firstname[$boy]>>''s cock as waves of orgasm wash over you.'
+		if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+			'The buildup of pressure inside you pops like a bubble. Waves of magic and pleasure come crashing through you. Your muscles goes taut, your pussy clenches tight, and you quiver on top of <<$npc_firstname[$boy]>>''s cock as magic explodes from your womb. It pours out of your every pore and orifice, carnal energy overflowing from your body that drives you into a realm of hypersensitive pleasure so intense it hurts.'
+		else
+			'The buildup of pressure inside you crashes over the edge. Your body goes taut, your pussy clenches tight, and you quiver on top of <<$npc_firstname[$boy]>>''s cock as waves of orgasm wash over you.'
+		end
 	end
 	gs'booty_call_sex', 'fuck_continue'
 end
@@ -196,6 +274,8 @@ end
 
 if $ARGS[0] = 'fuck_cum':
 	!! flags to remember what kind of fucking happened during sex
+	if booty_call['morning_after'] = 1:booty_call['morning_fuck'] = 1
+	booty_call['fuck'] = 1
 	if booty_call['speed'] = 1: booty_call['gentle_fuck'] = 1
 	if booty_call['speed'] = 2: booty_call['steady_fuck'] = 1
 	if booty_call['speed'] = 3: booty_call['rough_fuck'] = 1
@@ -241,7 +321,7 @@ if $ARGS[0] = 'fuck_cum':
 		elseif $booty_call['cum_choice'] = 'creampie':
 			booty_call['he_ask'] = 1
 			booty_call['he_ask_creampie'] = 1
-			if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0:
+			if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and npc_know_bc[$boy] < 1:
 				'"Can I come inside you? Is it safe today?" <<$npc_firstname[$boy]>> whimpers almost pleadingly.'
 			elseif booty_call['orgasm'] < orgasm:
 				'"Let''s come together," <<$npc_firstname[$boy]>> says, smiling at you.'
@@ -325,15 +405,21 @@ if $ARGS[0] = 'fuck_cum':
 		!!	end
 		else
 			!!if booty_call['orgasm'] < orgasm or pcs_horny >= 85:
-			if booty_call['orgasm'] < orgasm:
-				if booty_call['he_ask_creampie'] = 1:
-					act'Come together':booty_call['he_ask_creampie_yes'] = 1 & gs 'booty_call_cum', 'cum_together'
-				else
-					act'Let''s come together':booty_call['creampie_ask'] = 1 & gs 'booty_call_cum', 'cum_together'
-				end
-			elseif booty_call['he_ask_creampie'] = 1:
-				if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0:
-					if stat['safe_day'] = 1:
+			if booty_call['he_ask_creampie'] = 1:
+				if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and npc_know_bc[$boy] < 1:
+					if birth_control['think_safe'] = 1:
+						act'I''m on birth control':
+							cla & *nl
+							npc_know_bc[$boy] = 1
+							npc_creampie_okay[$boy] = 1
+							if tabletkishot > 0:
+								'"I''m on the shot now," you smile at him. "Go ahead."'
+							else
+								'"I''m on the pill now," you smile at him. "Go ahead."'
+							end
+							act'Continue':gt 'booty_call_cum', 'cum_inside'
+						end
+					elseif stat['safe_day'] = 1:
 						act'It''s a safe day':
 							cla & *nl
 							booty_call['safe_day'] = 1
@@ -369,6 +455,12 @@ if $ARGS[0] = 'fuck_cum':
 					
 					act'Let''s come together (fake orgasm)':gs 'booty_call_cum', 'cum_together_fake'
 				end
+			elseif booty_call['orgasm'] < orgasm:
+				if booty_call['he_ask_creampie'] = 1:
+					act'Come together':booty_call['he_ask_creampie_yes'] = 1 & gs 'booty_call_cum', 'cum_together'
+				else
+					act'Let''s come together':booty_call['creampie_ask'] = 1 & gs 'booty_call_cum', 'cum_together'
+				end
 			else
 				act'Come inside me!':
 					cla & *nl
@@ -1203,14 +1295,6 @@ if $ARGS[0] = 'cum_inside':
 				gs 'booty_call_talk', 'cum_react'
 			end
 			
-			act'Tolerate it (disgust)':
-				cla & *nl
-				'You lay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
-				act'Continue':cla & gs'booty_call_sex', 'sex_end'
-				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_talk', 'cum_react'
-			end
-			
 			act'Come with him':
 				cla & *nl
 				$orgasm_or = 'yes'
@@ -1224,6 +1308,14 @@ if $ARGS[0] = 'cum_inside':
 				gs 'booty_call_cum', 'cum_inside_pull_away'
 				gs 'booty_call_talk', 'creampie_react'
 			end
+			
+			act'Tolerate it (disgust)':
+				cla & *nl
+				'You lay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
+				act'Continue':cla & gs'booty_call_sex', 'sex_end'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs 'booty_call_talk', 'cum_react'
+			end
 		end
 	elseif $booty_call['position'] = 'doggy':
 		
@@ -1390,12 +1482,22 @@ if $ARGS[0] = 'cum_together':
 			'You just nod, unable to say anything and grab hold of him tightly. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
 		end
 	else
-		if $booty_call['position'] = 'miss':
-			'"Let''s come together," you say, smiling warmly into his eyes.'
-		elseif $booty_call['position'] = 'doggy':
-			'"Let''s come together," you say, giving him a warm smile over your shoulder.'
-		elseif $booty_call['position'] = 'cowgirl':
-			'"Let''s come together," you say, leaning down to smile warmly into his eyes.'
+		if booty_call['cum_where'] = 1:
+			if $booty_call['position'] = 'miss':
+				'"Let''s come together," you say, smiling warmly into his eyes.'
+			elseif $booty_call['position'] = 'doggy':
+				'"Let''s come together," you say, giving him a warm smile over your shoulder.'
+			elseif $booty_call['position'] = 'cowgirl':
+				'"Let''s come together," you say, leaning down to smile warmly into his eyes.'
+			end
+		else
+			if $booty_call['position'] = 'miss':
+				'"Let''s come together instead," you say, smiling warmly into his eyes.'
+			elseif $booty_call['position'] = 'doggy':
+				'"Let''s come together instead," you say, giving him a warm smile over your shoulder.'
+			elseif $booty_call['position'] = 'cowgirl':
+				'"Let''s come together instead," you say, leaning down to smile warmly into his eyes.'
+			end
 		end
 	end
 	act'Orgasm':
@@ -1643,9 +1745,6 @@ if $ARGS[0] = 'creampie_surprise':
 end
 
 if $ARGS[0] = 'creampie_surprise_react':
-	
-	gs 'booty_call_talk', 'creampie_wtf'
-	gs 'booty_call_talk', 'creampie_accident_oh_shit'
 		
 	act'Take it in stride':
 		booty_call['take_in_stride'] = 1
@@ -1673,7 +1772,13 @@ if $ARGS[0] = 'creampie_surprise_react':
 			end
 			'The sensation of cum filling your pussy is too much for you to handle and sends you over the edge.'
 			*nl
-			'Orgasmic tremors quake through your body, covering your skin in goosebumps and you moan incoherrently. You tremble, unable to do anything except quiver around the cock inside you.'
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'Right as your orgasm hits, you feel magic flood your system, ramping your senses into overdrive. You can feel every hair on your body, every bead of sweat on your skin, every single vein and contour of <<$npc_firstname[$boy]>>''s cock inside you. Somehow you can even feel each individual of the hundreds of millions of sperm pouring into your uterus. Energy courses from its origin in your womb to the tips of your nipples.'
+				*nl
+				'That same energy splashes off of <<$npc_firstname[$boy]>> and back onto you, forcing you to share in his experiences. You can <i>feel</i> his orgasm pouring into you, <i>his</i> pleasure erupting from his manhood, as if it were <i>you</i> ejaculating into your own orgasming pussy. Caught in a feedback loop between your orgasm and his, your entire body locks up, screaming a silent open-mouthed scream of ecstasy, unable to do anything but shudder uncontrollably around the cock pulsing inside you.'
+			else
+				'Orgasmic tremors quake through your body, covering your skin in goosebumps and you moan incoherently. You tremble, unable to do anything except quiver around the pulsing cock inside you.'
+			end
 			act'Continue':gt'booty_call_cum', 'creampie_surprise_cum_together'
 		end
 		act'Fake an orgasm':
@@ -1701,10 +1806,19 @@ if $ARGS[0] = 'creampie_surprise_react':
 			cla & *nl
 			'As <<$npc_firstname[$boy]>> comes inside you, you come too. Cum and warmth floods through your pussy, driving you over the edge.'
 			*nl
-			'Orgasmic tremors quake through your body, covering your skin in goosebumps and you moan incoherrently. You tremble, unable to do anything except quiver around the cock inside you.'
+			if $start_type[1] ! 'nomagic' and booty_call['magik'] < pcs_magik:
+				'Magic floods your system, ramping your senses into overdrive. Energy courses from its origin in your womb to the tips of your nipples. You can feel every hair on your body, every bead of sweat on your skin, every single vein and contour of <<$npc_firstname[$boy]>>''s cock inside you. Somehow you can even feel each individual of the hundreds of millions of sperm pouring into your uterus.'
+				*nl
+				'That same energy splashes off of <<$npc_firstname[$boy]>> and back onto you, forcing you to share in his experiences. You can <i>feel</i> his orgasm pouring into you, <i>his</i> pleasure erupting from his manhood, as if it were <i>you</i> ejaculating into your own orgasming pussy. Caught in a feedback loop between your orgasm and his, your entire body locks up, screaming a silent open-mouthed scream of ecstasy, unable to do anything but shudder uncontrollably around the cock pulsing inside you.'
+			else
+				'Orgasmic tremors quake through your body, covering your skin in goosebumps and you moan incoherently. You tremble, unable to do anything except quiver around the cock inside you.'
+			end
 			act'Continue':gt'booty_call_cum', 'creampie_surprise_cum_together'
 		end
 	end
+	
+	gs 'booty_call_talk', 'creampie_wtf'
+	gs 'booty_call_talk', 'creampie_accident_oh_shit'
 end
 
 if $ARGS[0] = 'creampie_surprise_cum_together':
@@ -1733,7 +1847,7 @@ if $ARGS[0] = 'creampie_surprise_cum_together':
 	gs'booty_call_talk', 'told_you_not_to_creampie'
 	gs'booty_call_talk', 'cum_together_kiss'
 	gs'booty_call_talk', 'cum_together_no_bc'
-	if booty_call['orgasm_count'] >= 5 or pcs_sleep < 20 and hour >= 20:
+	if (booty_call['orgasm_count'] >= 5 or pcs_sleep < 20) and hour >= 20:
 		act'Collapse':gt'booty_call_after', 'black_out'
 	end
 end
@@ -1943,6 +2057,11 @@ if $ARGS[0] = 'girl_cum_condom_react':
 
 end
 
+
+if $ARGS[0] = '2pumpchump':
+
+end
+
 if $ARGS[0] = 'orgasm_check':
 
 end

+ 1 - 1
locations/booty_call_doggy.qsrc

@@ -29,7 +29,7 @@ if $ARGS[0] = 'doggy_start':
 			'You''ve barely finished quivering when he pulls you off of him and rolls you onto your knees, pulling your hips back towards him. With one swift movement, he thrusts his cock into your still-quivering pussy. His actions earn him an involuntary gasp from your mouth before he begins fucking you again.'
 		end
 		act'Get fucked':gt 'booty_call_doggy', 'doggy<<booty_call[''speed'']>>'
-	elseif booty_call['initative'] ! 1:
+	elseif booty_call['initiative'] ! 1:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
 			cla

+ 2 - 4
locations/booty_call_miss.qsrc

@@ -26,7 +26,7 @@ if $ARGS[0] = 'missionary_start':
 			'You''ve barely finished quivering when he pulls you off of him and pushes you onto your back, immediately plunging his cock back inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again.'
 		end
 		act'Get fucked':gt 'booty_call_miss', 'miss<<booty_call[''speed'']>>'
-	elseif booty_call['initative'] ! 1:
+	elseif booty_call['initiative'] ! 1:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
 			if booty_call['condom'] = 0: booty_call['no_condom'] = 1
@@ -85,13 +85,11 @@ if $ARGS[0] = 'miss1':
 		gs 'booty_call_miss', 'miss1_start_desc'
 	end
 
-!!	:kiss_skip1
 	act'Enjoy it':
 		booty_call['orgasm'] = orgasm
 		gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 		gs 'stat'
 		cla & *nl
-!!		'You moan beneath <<$npc_firstname[$boy]>>, your breath hitching with every thrust. You love the way his cock stretches you out, how it makes you feel <i>full</i> when he''s inside you, and your hips buck every time he draws his away.'
 		gs 'booty_call_miss', 'miss1_enjoy_desc'
 		
 		if rand(0,2) = 2 and booty_call['kiss_skip'] = 1 and cum_loc['face'] <= 0:
@@ -1490,7 +1488,7 @@ if $ARGS[0] = 'miss3.2_sensation_desc':
 	elseif $npc_dick_desc[$boy] = 'skinny':
 		'You pant heavily as <<$npc_firstname[$boy]>> keeps pounding you. Your eyes roll back in your head and all you can do is gasp for breath and lose yourself in the feeling of his skinny dick violently violating your pussy.'
 	elseif $npc_dick_desc[$boy] = 'normal':
-		'Youpant heavily as <<$npc_firstname[$boy]>> keeps pounding you. Your eyes roll back in your head and all you can do is gasp for breath and lose yourself in the feeling of his dick violently violating your pussy.'
+		'You pant heavily as <<$npc_firstname[$boy]>> keeps pounding you. Your eyes roll back in your head and all you can do is gasp for breath and lose yourself in the feeling of his dick violently violating your pussy.'
 	elseif $npc_dick_desc[$boy] = 'thick':
 		'You pant heavily as <<$npc_firstname[$boy]>> keeps pounding you. Your eyes roll back in your head and all you can do is gasp for breath and lose yourself in the feeling of his thick cock violently stretching out your pussy.'
 	elseif $npc_dick_desc[$boy] = 'long':

+ 913 - 149
locations/booty_call_morning.qsrc

@@ -2,6 +2,7 @@
 
 if $ARGS[0] = 'morning':
 	if booty_call['sleep_fuck'] = 1:gt'booty_call_morning', 'sleep_fuck_wake'
+	booty_call['morning_after'] = 1
 	if (npc_earlyriser[$boy] = 1 or hour >= 7) and (npc_humor[$boy] = 2 or $npc_cum_pref[$boy] = 'facial') and (rand(1,10) < npc_sexdrive[$boy] or ($npc_cum_pref[$boy] = 'facial' and rand(1,5) < npc_sexdrive[$boy])):gt'booty_call_morning', 'cumshot_wakeup1'
 	'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
 !!{	if hangover = daystart:
@@ -35,11 +36,19 @@ if $ARGS[0] = 'morning':
 			gs'booty_call_morning', 'wakeup1'
 		end
 	end
-	if pcs_lovers > 0:act'Guilt':gt'booty_call_morning', 'guilt1'
+	if pcs_lovers - pcs_girlfriends > 0:act'Your boyfriend':$booty_call['cheat'] = 'boyfriend' & gt'booty_call_morning','guilt1'
+	if pcs_girlfriends > 0:act'Your girlfriend': $booty_call['cheat'] = 'girlfriend' & gt'booty_call_morning','guilt1'
+	
+	if pilldaychk < daystart - 1: gs'booty_call_morning','forgot_bc_pill'
 end
 
 if $ARGS[0] = 'sleep_fuck_wake':
-	'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
+	if daystage = 2:
+		'<center><video autoplay loop src="images/shared/romance/misc/wakeup1.mp4"></video></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/sleep4.jpg"></center>'
+	end
+	
 	'Your mind stirs and you slowly come to consciousness. The first thing you notice...'
 	*nl
 	if cum_loc['vagina'] > booty_call['sleep_cum_vagina']:
@@ -71,8 +80,73 @@ if $ARGS[0] = 'sleep_fuck_wake':
 !!			'<i>Was <<$npc_firstname[$boy]>> wearing a condom when you went to sleep last night?</i>'
 		end
 		
-		act'Someone had fun last night':
-		
+		act'Did you fuck me in my sleep?':
+			cla & *nl
+			'"... did you fuck me while I was sleeping last night?" you ask.'
+			act'Just wondered':
+				cla & *nl
+				'"Was just wondering," you smirk.'
+				gs'booty_call_morning', 'wakeup1'
+			end
+			
+			act'Explains the dream':
+				cla & *nl
+				'"Well that explains the weird dreams I was having," you snicker.'
+				gs'booty_call_morning', 'wakeup1'
+			end
+			if npc_sleep_sex_okay[$boy] = 0:
+				'"Yeah. Got horny while you were asleep."'
+				act'Don''t make a habit out of it':
+					cla & *nl
+					'"It was fine this time," you say rolling your eyes. "But don''t make a habit out of it."'
+					'"No promises," <<$npc_firstname[$boy]>> smirks mischievously.'
+					gs'booty_call_morning', 'wakeup1'
+				end
+				
+				act'Wake me up next time':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 1
+					'"Wake me up next time," you smirk. "Maybe I want to get some too."'
+					gs'booty_call_morning', 'wakeup1'
+				end
+				
+				act'That''s fine':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"That''s fine," you smile. "A guy''s gotta take care of his needs, doesn''t he?"'
+					gs'booty_call_morning', 'wakeup1'
+				end
+				
+				act'Sleep orgasms are the best':
+					cla & *nl
+					npc_sleep_sex_okay[$boy] = 2
+					'"Feel free to do it again," you grin. "I have the best orgasms when I''m sleeping."'
+					gs'booty_call_morning', 'wakeup1'
+				end
+			else
+				'"Yeah," he grins.'
+				if npc_sleep_sex_okay[$boy] = -1:
+					act'Get mad':
+						cla & *nl
+						'You glare daggers at him.'
+						'"If I weren''t in a rush to get up, I''d rip your head off."'
+						gs'booty_call_morning', 'wakeup1'
+					end
+					
+					act'Let it slide':
+						cla & *nl
+						'"No," you say irritably. "But I can''t do much about it now."'
+						gs'booty_call_morning', 'wakeup1'
+					end
+				else
+					act'Sleep orgasms are the best':
+						cla & *nl
+						npc_sleep_sex_okay[$boy] = 2
+						'"I love it when you fuck me in my sleep," you grin. "I have the best orgasms."'
+						gs'booty_call_morning', 'wakeup1'
+					end
+				end
+			end
 		end
 		
 		act'Someone had fun last night':
@@ -143,15 +217,7 @@ end
 
 if $ARGS[0] = 'late_for_school':
 	*nl
-	'<b><<$month>> <<day>></b>'
-	'<b><<$week>></b>'
-	if minut = 0:
-		'<b><<hour>>:00</b>'
-	elseif minut < 10:
-		'<b><<hour>>:0<<minut>></b>'
-	else
-		'<b><<hour>>:<<minut>></b>'
-	end
+	gs 'shortgs', 'calendar_display'
 	*nl
 	'"Oh <i>fuck!</i> I gotta get to school!"'
 	act'<i>Get dressed!</i>':
@@ -162,7 +228,7 @@ if $ARGS[0] = 'late_for_school':
 		'Scrambling from the bed, you start grabbing your clothes and throwing them on as fast as you can.'
 		if PCloStyle2 = 4:
 			!! you were wearing your school uniform last night
-			'You probably don''t have time for a shower, but at least you don''t have to run home and change clothes, you think gratefully to yourself as your pull on your disgarded uniform from last night.'
+			'You probably don''t have time for a shower, but at least you don''t have to run home and change clothes, you think gratefully to yourself as your pull on your discarded uniform from last night.'
 		else
 			'You need to get home and change into your uniform! You''re not sure if you have time for a shower, but you definitely <i>need</i> to get your uniform!'
 		end
@@ -199,7 +265,7 @@ if $ARGS[0] = 'late_for_school':
 					$npc_apt_bedroom[$boy]
 					'"Really?" you perk up. "That''d be great!"'
 					'"Let me just get dressed."'
-					'You collect the rest of your things while he throws on some clothes and grabs his keys, then both of you head outside and climb into his car.'
+					'You collect your things while he throws on some clothes and grabs his keys, then both of you head outside and climb into his car.'
 					'"Where do you want me to take you?" he asks'
 					act'Take me home':booty_call['give_lift'] = 1 & gt'booty_call_morning', 'give_lift'
 					act'Take me to school':booty_call['give_lift'] = 2 & gt'booty_call_morning', 'give_lift'
@@ -236,7 +302,23 @@ if $ARGS[0] = 'yawn_wake':
 	cla & *clr
 	$npc_apt_bedroom[$boy]
 	'You open your mouth wide, yawning loudly and stretching your arms back as the covers fall off of you.'
-	'Your movement causes <<$npc_firstname[$boy]>> to stir as well, blinking his eyes open. Reaching down, you grab your phone and switch on the display.'
+	*nl
+	if npc_earlyriser[$boy] = 1:
+		booty_call['npc_morning_shower'] = 1
+		if npc_apt_type[$boy] = 2:
+			'The bed next to you is empty but the bathroom door is closed. You can hear water running behind it.'
+		elseif npc_apt_type[$boy] = 3:
+			'The bed next to you is empty but you can hear water running through the wall. <<$npc_firstname[$boy]>> must be in the shower.'
+		else
+			'The bed is empty except for yourself and <<$npc_firstname[$boy]>> is nowhere to be found.'
+		end
+		*nl
+		'Checking your phone, the time reads:'
+	elseif npc_latesleeper[$boy] = 1:
+		'<<$npc_firstname[$boy]>> is still completely passed out beside you, your movement not interrupting his snoring in the slightest.'
+	else
+		'Your movement causes <<$npc_firstname[$boy]>> to stir as well, blinking his eyes open. Reaching down, you grab your phone and switch on the display.'
+	end
 	*nl
 	'<b><<$month>> <<day>></b>'
 	'<b><<$week>></b>'
@@ -251,11 +333,11 @@ if $ARGS[0] = 'yawn_wake':
 end
 
 if $ARGS[0] = 'wakeup1':
-
+	booty_call['morning_after'] = 1
 !!	if npc_earlyriser[$boy] = 1 and npc_caretaker[$boy] = 1:
 !!		making breakfast? making coffee?
 !!		gt'booty_call_morning', 'earlyriser1'
-!!	elseif npc_latesleeper = 1:
+!!	elseif npc_latesleeper[$boy] = 1:
 !!		gt'booty_call_morning', 'latesleeper'
 !!	else
 	act'Prepare to leave':gt'booty_call_morning', 'head_out'
@@ -265,14 +347,55 @@ if $ARGS[0] = 'wakeup1':
 			$npc_apt_bedroom[$boy]
 			gs 'shortgs', 'dress'
 			'You get dressed.'
-			gs'booty_call_morning', 'dressing1'
+			!!gs'booty_call_morning', 'dressing1'
+			gs'booty_call_after', 'dressing1'
 		end
 	end
 
-	if booty_call['morning_shower'] = 0:
-		act'Take a shower':gt'booty_call_morning', 'shower'
-	elseif npc_earlyriser[$boy] = 1 and booty_call['npc_morning_shower'] = 1:
-		act'Join <<$npc_firstname[$boy]>> in the shower':gt'booty_call_morning', 'shower'
+	
+	if npc_earlyriser[$boy] = 1 and booty_call['npc_morning_shower'] = 1 and booty_call['morning_shower'] = 0:
+		if npc_apt_type[$boy] = 2 or npc_apt_type[$boy] = 3:
+			act'Join <<$npc_firstname[$boy]>> in the shower':gt'booty_call_shower', 'morning_shower_join1'
+		else
+			act'Look for <<$npc_firstname[$boy]>>':gt'booty_call_shower', 'morning_look1'
+		end
+	else
+		act'Use his bathroom':
+			cla
+			act'Use the mirror':
+				$locM = 'booty_call_after'
+				$locM_arg = 'after_sex2'
+				gt 'mirror', 'start'
+			end
+			if booty_call['morning_shower'] = 0:
+				act'Take a shower (0:10)':gt'booty_call_morning', 'shower'
+			elseif booty_call['morning_shower'] > 0 and pcs_sweat > 19:
+				act'Take another shower (0:05)':gt'booty_call_morning', '2nd_shower'
+			end
+		end
+	end
+	
+	if npc_latesleeper[$boy] ! 1 and booty_call['breakfast_eat'] = 0 and booty_call['npc_morning_shower'] ! 1:
+		gs'booty_call_morning', 'want_breakfast'
+	elseif npc_latesleeper[$boy] = 1 and booty_call['breakfast_eat'] = 0:
+		act'Make breakfast':gt'booty_call_morning','pc_make_breakfast'
+	end
+	
+	if booty_call['creampie_count'] > 0 and morning_after_pill > 0 and booty_call['plan_b'] = 0 and birth_control['think_safe'] = 0:
+		act'Take a morning after pill':
+			booty_call['plan_b'] = 2
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			
+			if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+				'You reach down to your purse and pull out the morning after pill Luda gave you, popping it from the packaging and swallowing it dry.'
+			else
+				'You reach down to your purse and pull out the morning after pill you keep inside, popping it from the packaging and swallowing it dry.'
+			end
+			
+			gs 'medical_din', 'morning_after_pill_function'
+			gs'booty_call_after', 'wakeup1'
+		end
 	end
 
 !!	act'Snuggle back into bed':
@@ -280,22 +403,8 @@ if $ARGS[0] = 'wakeup1':
 end
 
 if $ARGS[0] = 'wakeup2':
-	if booty_call['morning_shower'] = 1:
-		booty_call['morning_shower'] = 3
-		booty_call['towel'] = 1
-		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/towel_wet.jpg"></center>'
-		'You leave the bathroom wrapped in a towel.'
-	elseif booty_call['morning_shower'] = 2:
-		booty_call['towel'] = 0
-		$npc_apt_bedroom[$boy]
-		'You leave the bathroom naked.'
-	elseif booty_call['morning_shower'] = 3:
-		$npc_apt_bedroom[$boy]
-		'Hair still wet from the shower, you consider what to do next.'
-	else
-		$npc_apt_bedroom[$boy]
-		'You are in <<$npc_firstname[$boy]>>''s room.'
-	end
+	$npc_apt_bedroom[$boy]
+	'You are in <<$npc_firstname[$boy]>>''s room.'
 	gs'booty_call_morning', 'wakeup1'
 end
 
@@ -303,48 +412,66 @@ if $ARGS[0] = 'shower':
 	booty_call['morning_shower'] = 1
 	$npc_apt_bathroom[$boy]
 	'You pull yourself out of bed and pad your way over to the bathroom, yawning again along the way.'
-	act'Turn on the water':
+	act'Turn on the water':gt'booty_call_morning', 'shower2'
+end
+
+if $ARGS[0] = 'shower2':
+	booty_call['morning_shower'] = 1
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
+	minut += 10
+	shampoo += 1
+	dynamic $showerdin
+	'You twist the faucet and hot water comes rushing out, pouring over you, soaking into your skin. Slowly over time, your sleepiness washes away and clarity comes back.'
+	*nl
+	'Feeling sufficiently awake, you turn off the tap and step out of the shower.'
+	act'Wrap yourself in a towel':gt'booty_call_morning', 'shower_leave'
+	act'Just dry off':booty_call['morning_shower'] = 2 & gt'booty_call_morning', 'shower_leave'
+end
+
+if $ARGS[0] = '2nd_shower':
+	$npc_apt_bedroom[$boy]
+	'"I need another shower because of you," you say, giving <<$npc_firstname[$boy]>> a look as you swagger your way to his bathroom.'
+	act'Shower':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
-		minut += 10
+		minut += 5
 		shampoo += 1
-		'You twist the faucet and hot water comes rushing out, pouring over you, soaking into your skin. Slowly over time, your sleepiness washes away and clarity comes back.'
 		dynamic $showerdin
+		'You get into <<$npc_firstname[$boy]>>''s shower for the <i>second</i> time this morning, washing the sex sweat from your body.'
 		*nl
-		'Feeling sufficiently awake, you turn off the tap and step out of the shower.'
-		act'Wrap yourself in a towel':gt'booty_call_morning', 'wakeup2'
-		act'Just dry off':booty_call['morning_shower'] = 2 & gt'booty_call_morning', 'wakeup2'
+		'You take a shorter one this time, mostly just rinsing off, before shutting the water off and getting out.'
+		act'Wrap yourself in a towel':gt'booty_call_morning', 'shower_leave'
+		act'Just dry off':booty_call['morning_shower'] = 2 & gt'booty_call_morning', 'shower_leave'
+	end
+end
+
+if $ARGS[0] = 'shower_leave':
+	if booty_call['morning_shower'] = 1:
+		booty_call['morning_shower'] = 3
+		booty_call['towel'] = 1
+		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/towel_wet.jpg"></center>'
+		'You leave the bathroom wrapped in a towel.'
+	elseif booty_call['morning_shower'] = 2:
+		booty_call['towel'] = 0
+		$npc_apt_bedroom[$boy]
+		'You leave the bathroom naked.'
+	elseif booty_call['morning_shower'] = 3:
+		$npc_apt_bedroom[$boy]
+		'Hair still wet from the shower, you consider what to do next.'
 	end
 end
 
 if $ARGS[0] = 'head_out':
 	if $clothingworntype = 'nude':
-		gt'booty_call_morning', 'dressing1'
+		!! gt'booty_call_morning', 'dressing1'
+		gt'booty_call_after', 'dressing1'
 	else
-		cla & *clr
-		$npc_apt_hall[$boy]
-		act'Bye':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Bye then."'
-			'You gather your things and give him a wave and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-
-		act'See ya':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Well, see ya."'
-			'You gather your things and give him a wave and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-
-		act'Blow him a kiss':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Until next time."'
-			'You give him a wink and blow him a kiss and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
+		if npc_latesleeper[$boy] = 1 and booty_call['boy_wakeup'] = 0:
+			'Not wanting to wake <<$npc_firstname[$boy]>>, you sneak over to the door and let yourself out, closing it as gently as you can behind you.'
+			act'Leave':gt'booty_call_after','exit'
+		else
+			gs'booty_call_after', 'leaving_dialogue'
 		end
 	end
 end
@@ -405,54 +532,41 @@ if $ARGS[0] = 'dressing1':
 	else
 		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
 	end
-	'You reach down for where you left your clothes and start to pick them up.'
-	'"You heading out?" <<$npc_firstname[$boy]>> asks.'
-	gs'booty_call_after', 'dress_loop'
-
-	act'Yeah':
-		cla & *nl
-		'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+	if npc_latesleeper[$boy] = 1 and booty_call['boy_wakeup'] = 0:
+		'You reach down for your discarded clothes and tug them on quietly, not wanting to wake <<$npc_firstname[$boy]>>.'
+		*nl
+		'Once everything is in place, you sneak over to the door and let yourself out, closing it as gently as you can behind you.'
+		act'Leave':gt'booty_call_after','exit'
+	else
+		'You reach down for where you left your clothes and start to pick them up.'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
 		gs'booty_call_after', 'dress_loop'
-		if rand(1,3) = 3:
-			gs'booty_call_morning', 'booty_call_invite_later'
-		else
-			'"No problem."'
-			gs'booty_call_morning', 'end_morning'
-		end
-	end
-	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
-		act'School':
-			cla & *nl
-			'"Gotta get to school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
-			gs'booty_call_after', 'dress_loop'
-			if rand(1,3) = 3:
-				gs'booty_call_morning', 'booty_call_invite_later'
-			else
-				'"No problem."'
-				gs'booty_call_morning', 'end_morning'
-			end
-		end
+
+		
+		
+		
+	!!	act'Talk while you dress':
+	!!		gs'booty_call_morning', 'dress_talk'
+	!!	end
 	end
-	
-!!	act'Talk while you dress':
-!!		gs'booty_call_morning', 'dress_talk'
-!!	end
 end
 
 if $ARGS[0] = 'booty_call_invite_later':
 	if npc_day_off[$boy] = week:
+		booty_call['invite_today'] = 1
 		if npc_girlfriend[$boy] = 1:
 			pc_know_npc_has_girlfriend[$boy] = 1
 			'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''s my day off and my girlfriend won''t be around. Want to come over and do this again?"'
 		else
 			'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''s my day off. Want to come by and do this again?"'
 		end
-	else
+	elseif (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1):
+		booty_call['invite_tomorrow'] = 1
 		if npc_girlfriend[$boy] = 1:
 			pc_know_npc_has_girlfriend[$boy] = 1
 			'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "My girlfriend won''t be around. Want to come over and do this again?"'
 		else
-			'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''s my day off tomorrow. Want to come by and do this again?"'
+			'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''ll be my day off. Want to come by and do this again?"'
 		end
 	end
 	
@@ -464,6 +578,7 @@ if $ARGS[0] = 'booty_call_invite_later':
 		cla & *nl
 		'"That depends," you say, <<$booty_call[''dress_describe'']>>. "What time were you thinking?"'
 		'"<<npc_start_free_time[$boy]>>?" <<$npc_firstname[$boy]>> asks.'
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'busy_time'
 		gs 'booty_call_morning', 'booty_call_plan'
 	end
@@ -471,46 +586,47 @@ end
 
 if $ARGS[0] = 'busy_today':
 	act'I''m busy':
-		npc_booty_call_time[$boy] = 2000
+		gs 'booty_call', 'block_booty_calls'
 		cla & *nl
 		'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I''m busy."'
 		'"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'end_morning'
 	end
 end
 
 if $ARGS[0] = 'busy_time':
 	act'I''m busy':
-		npc_booty_call_time[$boy] = 2000
+		gs 'booty_call', 'block_booty_calls'
 		cla & *nl
 		'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I have something to do then."'
 		'"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'end_morning'
 	end
 end
 
 if $ARGS[0] = 'booty_call_plan':
 	act'Sounds good':
-		npc_booty_call[$boy] = daystart
-		npc_booty_call_time[$boy] = npc_start_free_time[$boy]
+		gs 'booty_call', 'set_booty_call_date'
 		cla & *nl
 		'"Sounds good," you grin, <<$booty_call[''dress_describe'']>>. "I''ll see you then."'
 		'"Great," <<$npc_firstname[$boy]>> grins back.'
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'end_morning'
 	end
 	
 	act'I''ve got nothing better to do':
-		npc_booty_call[$boy] = daystart
-		npc_booty_call_time[$boy] = npc_start_free_time[$boy]
+		gs 'booty_call', 'set_booty_call_date'
 		cla & *nl
 		'"Sure," you smirk, <<$booty_call[''dress_describe'']>>. "I got nothing better to do."'
 		'"Great," <<$npc_firstname[$boy]>> grins back.'
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'end_morning'
 	end
 	
 	act'I could fit it in':
-		npc_booty_call[$boy] = daystart
-		npc_booty_call_time[$boy] = npc_start_free_time[$boy]
+		gs 'booty_call', 'set_booty_call_date'
 		cla & *nl
 		'"I think I can fit that in," you smirk, <<$booty_call[''dress_describe'']>>.'
 		if npc_humor[$boy] = 2:
@@ -518,6 +634,7 @@ if $ARGS[0] = 'booty_call_plan':
 		else
 			'"Great," <<$npc_firstname[$boy]>> grins back.'
 		end
+		gs 'booty_call_after', 'dress_loop'
 		gs 'booty_call_morning', 'end_morning'
 	end
 end
@@ -529,29 +646,7 @@ if $ARGS[0] = 'end_morning':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		'You finish <<$booty_call[''dress_describe'']>>.'
-		act'Bye':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Bye then."'
-			'You gather your things and give him a wave and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-
-		act'See ya':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Well, see ya."'
-			'You gather your things and give him a wave and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-
-		act'Blow him a kiss':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'"Until next time."'
-			'You give him a wink and blow him a kiss and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
-		end
+		gs'booty_call_after', 'leaving_dialogue'
 	end
 end
 
@@ -641,12 +736,209 @@ end
 
 !! ------------------------------------ Misc Stuff -------------------------------------------------------
 
+if $ARGS[0] = 'forgot_bc_pill':
+	act'Forgot your birth control':
+		if npc_earlyriser[$boy] ! 1:
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
+			'You bolt upright as a horrible realization jolts through your mind.'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+			'You jolt awake as a horrible realization jumps through your mind.'
+		end
+		*nl
+		'<i>I forgot to take my birth control!</i>'
+		
+		gs'booty_call_morning','wakeup1'
+		
+!!{		act'Panic':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+			'Panic begins to set in as you sit up, your breathing already at the edge of hyperventilation.'
+			*nl
+			if booty_call['creampie_count'] > 3:
+				'Not only did you forget your birth control, but <<$npc_firstname[$boy]>> came inside you last night too. <i>A lot.</i> How could you fuck up like this?'
+			elseif booty_call['creampie_count'] > 0:
+				'Not only did you forget your birth control, but <<$npc_firstname[$boy]>> came inside you last night too. How could you fuck up like this?'
+			else
+				if pharmacy_timers['birth_control'] > 0:
+					'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, but this breaks your streak. Aunt Luda said you need to take it every day or it won''t work. So if you take it now, does that mean you''re still not safe?'
+				else
+					'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, but this breaks your streak. Are you still safe if you skip a day?'
+				end
+			end
+			if morning_after_pill > 0:
+				*nl
+				if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+					'Wait, don''t you have that morning after pill Aunt Luda gave you?'
+				else
+					'Wait, don''t you have a morning after pill in your bag?'
+				end
+			end
+		end
+		
+		act'Calm down':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
+			'You sit up and start taking big deep breaths, forcing yourself to calm down, trying to approach the situation logically.'
+			*nl
+			if booty_call['creampie_count'] > 0:
+				if booty_call['creampie_count'] > 5:
+					'Okay, so <<$npc_firstname[$boy]>> came inside you last night... <i>Many</i> times. But you can still take a morning after pill. Maybe it''ll be okay.'
+				elseif booty_call['creampie_count'] > 1:
+					'Okay, so <<$npc_firstname[$boy]>> came inside you last night... More than once... A <i>few</i> times. But you can still take a morning after pill. Maybe it''ll be okay.'
+				elseif booty_call['creampie_count'] = 1:
+					'Okay, so <<$npc_firstname[$boy]>> came inside you last night... But only once. That''s not too bad, right? Maybe you can still take a morning after pill. Maybe it''ll be okay.'
+				end
+				if morning_after_pill > 0:
+					*nl
+					if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+						'Actually, you have the one Aunt Luda gave you. For emergencies she said...'
+					else
+						'Actually, you have one in your bag. You could take it right now.'
+					end
+				end
+			else
+				if pharmacy_timers['birth_control'] > 0:
+					'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, but this breaks your streak. Aunt Luda said you need to take it every day or it won''t work. So if you take it now, does that mean you''re still not safe?'
+				else
+					'<<$npc_firstname[$boy]>> didn''t come inside you yesterday, so you''re probably not in immediate danger of getting pregnant. But does this mean you''ll need to wait a few days to build up the birth control in your system again?'
+				end
+			end
+		end}
+	end
+end
+
+if $ARGS[0] = 'forgot_bc_pill2':
+	act'Continue':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		if npc_earlyriser[$boy] = 1:
+			!! for later: create option for him to burst in with breakfast in bed
+			if npc_apt_type[$boy] = 2:
+				booty_call['npc_morning_shower'] = 1
+				'The bed next to you is empty and the bathroom door is closed. You can hear the water running behind it.'
+			elseif npc_apt_type[$boy] = 3:
+				booty_call['npc_morning_shower'] = 1
+				'The bed next to you is empty but you can hear water running through the wall. <<$npc_firstname[$boy]>> must be in the shower.'
+			else
+				'The bed next to you is empty. <<$npc_firstname[$boy]>> is nowhere to be seen.'
+			end
+			gs'booty_call_morning','wakeup1'
+	!!{	elseif npc_latesleeper[$boy] = 1:
+			'<<$npc_firstname[$boy]>>, the guy from last night, is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
+			gs'booty_call_morning','wakeup1'}
+		else
+			'<<$npc_firstname[$boy]>> stirs next to you.'
+			if npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1 and rand(1,3) = 3:
+				'"Hey." He yawns, glancing over at you before blinking, a look of concern on his face. "What''s up? Something wrong?"'
+				act'Don''t tell him':
+					cla & *nl
+					'"It''s nothing," you mumble, flashing a smile to pretend like everything is fine.'
+					gs'booty_call_morning','wakeup1'
+				end
+				
+				act'Tell him':
+					cla & *nl
+					'"I forgot my birth control yesterday," you sigh. "I fucked up. I''m sorry."'
+					if npc_childfree[$boy] > 0 and (npc_argumentative[$boy] > 0 or npc_abusive[$boy] > 0) and booty_call['creampie_count'] > 0:
+						npc_rel[$boy] -= 10
+						'"What the fuck?!" <<$npc_firstname[$boy]>> exclaims. "Are you fucking kidding me? How could you forget? You better not get pregnant on me. I am <i>not</i> having your fucking kids."'
+						act'Wallow':
+							cla & *nl
+							'"I know, I know!" you moan miserably, berating yourself as much as he''s berating you. "I''m a fucking idiot. I''m sorry, I''m so sorry."'
+							gs'booty_call_morning','wakeup1'
+						end
+						
+						act'Tell him to fuck off':
+							npc_rel[$boy] -= 10
+							booty_call['angry_after'] = 1
+							cla & *nl
+							'"<i>''Your''</i> kids?" you say, glaring at him. "If I get pregnant, you''re not the one who''s gonna have to push your ugly baby out her pussy! Don''t try to make this about you. You can fuck right off!'
+							gs'booty_call_morning','wakeup1'
+						end
+						
+						if morning_after_pill > 0:
+							act'Morning after pill (sorry)':
+								gs 'medical_din', 'morning_after_pill_function'
+								cla & *nl
+								'"I know, I know!" you moan miserably, berating yourself as much as he''s berating you. "I''m sorry, I''m so sorry. I know I fucked up. But I have this at least."'
+								*nl
+								'You fish the pill out of your bag and hold it up for him to see.'
+								*nl
+								'"This ought to buy us some protection," you say, putting it in your mouth and crunching it down dry.'
+								gs'booty_call_morning','wakeup1'
+							end
+							
+							act'Morning after pill (fuck off)':
+								gs 'medical_din', 'morning_after_pill_function'
+								npc_rel[$boy] -= 10
+								booty_call['angry_after'] = 1
+								cla & *nl
+								'"<i>''Your''</i> kids?" you say, glaring at him. "You know what? You can fuck right off! I made a mistake and I admitted it. And you I have the fucking solution," you say, defiantly holding up your morning after pill.'
+								*nl
+								'"So you can fuck off!" you say again, throwing the pill in your mouth and crunching it down dry. "This is what I get for wanting to be accountable and transparent," you grumble, grinding your teeth on the bitter medicine.'
+								gs'booty_call_morning','wakeup1'
+							end
+						end
+					else
+						'"Shit," <<$npc_firstname[$boy]>> says, looking concerned. "What are you gonna do?"'
+						act'I don''t know':
+							cla & *nl
+							'"I don''t know," you say, looking back at him apologetically. "Hope we get lucky I guess?"'
+							gs'booty_call_morning','wakeup1'
+						end
+						
+						if morning_after_pill > 0:
+							act'Take your orning after pill':
+								gs 'medical_din', 'morning_after_pill_function'
+								cla & *nl
+								'"I have this," you say, fishing around in your bag to pull out your morning after pill.'
+								*nl
+								'"This ought to buy us some protection," you say, putting it in your mouth and crunching it down dry.'
+								gs'booty_call_morning','wakeup1'
+							end
+						else
+							act'Buy some plan B?':
+								cla & *nl
+								'"Buy a morning after pill?" you say, shrugging. "I don''t know. Does it still work when you''re sorta on birth control?"'
+								*nl
+								'<<$npc_firstname[$boy]>> shrugs back. Great help.'
+								gs'booty_call_morning','wakeup1'
+							end
+						end
+					end
+				end
+				
+				if morning_after_pill > 0:
+					act'Take your morning after pill':
+						cla & *nl
+						'"I forgot my birth control yesterday," you sigh, opening the packaging on your plan B and popping it into your mouth. "Don''t worry, I''m taking a morning after pill right now. I''m just mad at myself for being so stupid."'
+					end
+				end
+			else
+				'"Hey," he stretches, looking over at you. "You just wake up too?"'
+				act'Yeah':
+					cla & *nl
+					'"Yeah," you mumble, trying to keep a straight face while you shove down your shameful feelings.'
+					gs'booty_call_morning','wakeup1'
+				end
+			end
+		end
+	end
+end
+
 if $ARGS[0] = 'guilt1':
 	cla & *clr
 	booty_call['guilt'] = 1
 	if stat['bf_cheated_on'] <= 10:
-		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
-		'You bolt upright as a lance of guilt pierces through you.'
+		if npc_earlyriser[$boy] ! 1:
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
+			'You bolt upright as a lance of guilt pierces your chest.'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+			'You jolt awake as a lance of guilt pierces your chest.'
+		end
+		*nl
 		'<i>My <<$booty_call[''cheat'']>>...</i> you think.'
 		act'Wallow':
 			cla & *clr
@@ -683,9 +975,16 @@ if $ARGS[0] = 'guilt1':
 			gs'booty_call_morning','guilt_excuses'
 		end
 	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
-		'Your eyes snap open as your thoughts settle on one thing.'
-		'<i>My <<$booty_call[''cheat'']>>...</i> you think.'
+		if npc_earlyriser[$boy] ! 1:
+			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock1.mp4"></video></center>'
+			'You bolt upright as a lance of guilt pierces your chest.'
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+			'Your eyes snap open as a lance of guilt pierces your chest.'
+		end
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/after/wakeup1.jpg"></center>'
+!!		'Your eyes snap open as your thoughts settle on one thing.'
+!!		'<i>My <<$booty_call[''cheat'']>>...</i> you think.'
 		act'Wallow':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
@@ -702,14 +1001,16 @@ if $ARGS[0] = 'guilt_excuses':
 		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
 		'<i>It''s not my fault,</i> you try to rationalize. <i>I have needs. Sexual needs. He preyed on that. He seduced me. I''m a victim here...</i>'
 		*nl
-		'They ring hollow in your ears.'
+		'All your excuses ring hollow in your ears.'
 		gs'booty_call_morning','guilt2'
 	end
 	
 	act'It''s just sex':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
-		'<i>It''s just sex,</i> you try to rationalize. <i>It''s not like I''m falling in love with <<$npc_firstname[$boy]>> or anything. It''s not cheating. It''s just sex..</i>.'
+		'<i>It''s just sex,</i> you try to rationalize. <i>It''s not like I''m falling in love with <<$npc_firstname[$boy]>> or anything. It''s not cheating. It''s just sex...</i>.'
+		*nl
+		'You''re not sure whether you believe yourself.'
 		gs'booty_call_morning','guilt2'
 	end
 	
@@ -718,7 +1019,13 @@ if $ARGS[0] = 'guilt_excuses':
 		'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock3.mp4"></video></center>'
 		'You scold yourself internally, screaming insults that impale your own soul.'
 		*nl
-		'<i>You slut! Jumping any random cock that comes your way. You''re nothing but a filthy whore...</i>'
+		if arrsize('$fuckbuddy') > 5:
+			'<i>You slut! One lover isn''t enough for you. Not even two! You need to have a whole stable to satisfy you, you filthy cock-hungry whore...</i>'
+		elseif arrsize('$fuckbuddy') > 1:
+			'<i>You slut! You can''t keep your legs closed. Just how much cock do you need? You''re nothing but a filthy whore...</i>'
+		else
+			'<i>You slut! What''s wrong with you? A committed relationship isn''t enough to satisfy you? Can''t keep your legs closed? You''re nothing but a filthy whore...</i>'
+		end
 		*nl
 		if stat['bf_cheated_on'] > 10:
 			'You breathe deeply, letting the pain take its course, waiting for it to subside. It''s nothing you haven''t felt before...'
@@ -730,7 +1037,7 @@ end
 if $ARGS[0] = 'guilt2':
 	*nl
 	if stat['bf_cheated_on'] <= 10:
-		'The guilt continues to lance through you anyway.'
+		'The guilt doesn''t go away.'
 	else
 		'You breathe deeply, letting the pain take its course, waiting for it to subside. It''s nothing you haven''t felt before...'
 	end
@@ -739,21 +1046,22 @@ end
 
 if $ARGS[0] = 'guilt3':
 	'<center><video autoplay loop src="images/shared/sex/after/wakeup_shock2.mp4"></video></center>'
-!!{	if npc_earlyriser[$boy] = 1:
+	if npc_earlyriser[$boy] = 1:
 		!! for later: create option for him to burst in with breakfast in bed
 		if npc_apt_type[$boy] = 2:
+			booty_call['npc_morning_shower'] = 1
 			'The bed next to you is empty and the bathroom door is closed. You can hear the water running behind it.'
 		elseif npc_apt_type[$boy] = 3:
 			booty_call['npc_morning_shower'] = 1
-			'The bed next to you is empty but you can hear water running through the wall. He must be in the shower.'
+			'The bed next to you is empty but you can hear water running through the wall. <<$npc_firstname[$boy]>> must be in the shower.'
 		else
-			'The bed next to you is empty. The man you were with last night, nowhere to be found.'
+			'The bed next to you is empty. <<$npc_firstname[$boy]>> is nowhere to be seen.'
 		end
 		gs'booty_call_morning','wakeup1'
-	elseif npc_latesleeper[$boy] = 1:
+!!{	elseif npc_latesleeper[$boy] = 1:
 		'<<$npc_firstname[$boy]>>, the guy from last night, is still asleep next to you, completely ignorant to your internal strife, snoring softly.'
-		gs'booty_call_morning','wakeup1'
-	else}
+		gs'booty_call_morning','wakeup1'}
+	else
 		'<<$npc_firstname[$boy]>> stirs next to you.'
 		if npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1 and rand(1,3) = 3:
 			'"Hey." He yawns, glancing over at you before blinking, a look of concern on his face. "What''s up? Something wrong?"'
@@ -777,12 +1085,468 @@ if $ARGS[0] = 'guilt3':
 			act'Yeah':
 				cla & *nl
 				'"Yeah," you mumble, trying to keep a straight face while you shove down your shameful feelings.'
-				gs'booty_call_morning','wakeup'
+				gs'booty_call_morning','wakeup1'
 			end
 		end
+	end
+end
+
+if $ARGS[0] = 'want_breakfast':
+	if booty_call['breakfast_eat'] = 0:
+		act'Make you breakfast?':
+			gs'booty_call_pillow_talk', 'talk_time_add'
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			'"Hungry?" you ask. "How about I make us some breakfast?"'
+			if npc_caretaker[$boy] = 1:
+				'"You don''t have to do that," <<$npc_firstname[$boy]>> says.'
+				'"Don''t worry. I want to," you smile back and haul yourself out of bed.'
+			else
+				'"That''d be great," <<$npc_firstname[$boy]>> smiles. You smile back and haul yourself out of bed.'
+			end
+			act'Make breakfast':gt'booty_call_morning','pc_make_breakfast'
+		end
+	end
+end
+
+if $ARGS[0] = 'pc_make_breakfast':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+	minut += rand(1,2)
+	gs 'stat'
+	if npc_apt_type[$boy] = 2:
+		'You head over to <<$npc_firstname[$boy]>>''s kitchen area and look through his fridge. Opening it, you take a look inside, mulling over what you can make with what he''s got...'
+	else
+		'You head over to the kitchen and look through <<$npc_firstname[$boy]>> fridge. Opening it, you take a look inside, mulling over what you can make with what he''s got...'
+	end
+	gs'booty_call_morning','pc_make_breakfast_choices'
+end
+
+if $ARGS[0] = 'pc_make_breakfast_choices':
+!!	if booty_call['cooking_time'] = 0:
+!!		act'Give up':
+!!		
+!!		end
+!!	else
+		act'Start cooking':gt 'booty_call_morning','pc_make_breakfast_cooking'
 !!	end
+	if booty_call['coffee_make'] = 0:
+		act'Coffee':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+			'He''s got a coffee pot.'
+			act'Nah':
+				cla & *nl
+				'A little too basic. Maybe not.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+			
+			act'Yes (2 minutes)':
+				booty_call['cooking_time'] += 2
+				booty_call['coffee_make'] = 1
+				cla & *nl
+				'It''s as simple as throwing it in a toaster. Might as well.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+		end
+	end
+	
+	if booty_call['toast_make'] = 0:
+		act'Toast':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+			'He''s got bread. You could make toast?'
+			act'Nah':
+				cla & *nl
+				'A little too basic. Maybe not.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+			
+			act'Yes (2 minutes)':
+				booty_call['cooking_time'] += 2
+				booty_call['toast_make'] = 1
+				booty_call['cooking_total'] += 1
+				cla & *nl
+				'It''s as simple as throwing it in a toaster. Might as well.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+		end
+	end
+	
+	if booty_call['eggs_make'] = 0:
+		act'Fried eggs':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+			'He''s got eggs. Fried eggs?'
+			act'Nah':
+				cla & *nl
+				'Not really in the mood. Maybe skip the eggs.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+			
+			act'Yes (5 minutes)':
+				booty_call['cooking_time'] += 5
+				booty_call['eggs_make'] = 1
+				booty_call['cooking_total'] += 1
+				cla & *nl
+				'Eggs are basic. Easy as throwing them into a pan. You''ll do it.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+		end
+	end
+	
+	if booty_call['kolbasa_make'] = 0:
+		act'Kolbasa':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+			'He''s got some kolbasa sausage.'
+			act'Nah':
+				cla & *nl
+				'A little simple. A little boring.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+			
+			act'Yes (10 minutes)':
+				booty_call['cooking_time'] += 10
+				booty_call['kolbasa_make'] = 1
+				booty_call['cooking_total'] += 1
+				cla & *nl
+				'It''s quick and simple. Might as well.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+		end
+	end
+	
+	if booty_call['pancakes_make'] = 0:
+		act'Pancakes':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_fridge1.jpg"></center>'
+			'Flour? Eggs? Milk? Butter That''s everything you need to whip up some pancakes.'
+			act'Nah':
+				cla & *nl
+				'Too much work. Better do something else.'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+			
+			act'Yes (15 minutes)':
+				booty_call['cooking_time'] += 15
+				booty_call['pancakes_make'] = 1
+				booty_call['cooking_total'] += 1
+				cla & *nl
+				'Who doesn''t love pancakes in the morning? You <i>have</i> to make them!'
+				gs'booty_call_morning','pc_make_breakfast_choices'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'pc_make_breakfast_cooking':
+	minut += booty_call['cooking_time']
+	gs 'stat'
+	if booty_call['cooking_total'] = 1:
+		if booty_call['coffee_make'] = 1:
+			'<center><img <<$set_imgh>> src="images/pc/drink/nude_coffee2.jpg"></center>'
+			'You put the coffee into the machine and wait, drumming your fingers on the counter until the dark liquid is brewed.'
+		elseif booty_call['toast_make'] = 1:
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_misc1.jpg"></center>'
+			'You grab a couple slices of bread and toss them in the toaster. While the bread browns, you rifle through <<$npc_firstname[$boy]>>''s fridge and pantry, pulling out plates and butter and raspberry jam to spread.'
+		elseif booty_call['eggs_make'] = 1:
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_stove<<rand(1,3)>>.jpg"></center>'
+			'You crack eggs into the pan, sending sputters and sizzles the moment it makes contact with the hot metal. A couple minutes later, they''re plated and ready to eat.'
+		elseif booty_call['kolbasa_make'] = 1:
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_misc2.jpg"></center>'
+			'You set out some pieces of bread and take a knife to the kolbasa, cutting some decent slices'
+		elseif booty_call['pancakes_make'] = 1:
+			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_stove<<rand(1,3)>>.jpg"></center>'
+			'You start mixing batter while the pan heats up. Once hot, you spread thin layers across its surface, flipping to the other side once browned. After a short while, you have a nice stack of perfectly thin pancakes with crispy edges, taking one last stop at the fridge to pull out some butter, raspberry jam, and of course, sour cream.'
+		end
+	elseif booty_call['cooking_total'] = 5:
+		'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_misc1.jpg"></center>'
+		'With a lot to do, you start quickly, spending the next half hour or so preparing your bonanza of breakfast goodies.'
+	else
+		'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_stove<<rand(1,3)>>.jpg"></center>'
+		'You get to work preparing all of the things you planned for breakfast and a short while later, you have a nice but simple variety of things to eat.'
+	end
+	act'Continue':gt'booty_call_morning','pc_make_breakfast_done'
 end
 
+if $ARGS[0] = 'pc_make_breakfast_done':
+	if npc_apt_type[$boy] = 2:
+		$npc_apt_bedroom[$boy]
+		if booty_call['cooking_total'] = 1 and booty_call['coffee_make'] = 1:
+			if npc_latesleeper[$boy] = 1:
+				'<<$npc_firstname[$boy]>> begins to stir in bed, blearily blinking at you.'
+				'"Hey sleepyhead," you smile, turning to face him with two steaming mugs. "I made coffee."'
+			else
+				'"Coffee''s ready," you say, turning around to walk two steaming mugs back to <<$npc_firstname[$boy]>>.'
+			end
+			act'Drink your coffee':gt'booty_call_morning','eat_breakfast'
+		else
+			if npc_latesleeper[$boy] = 1:
+				'<<$npc_firstname[$boy]>> begins to stir in bed, blearily blinking at you.'
+				'"Hey sleepyhead," you say, turning to smile at him with plates in each hand. "I made breakfast."'
+			else
+				'"Food''s done," you tell <<$npc_firstname[$boy]>>, carefully carrying a few plates over to his table.'
+			end
+			gs'booty_call_morning','eat_breakfast1'
+		end
+	else
+		$npc_apt_kitchen[$boy]
+		if booty_call['cooking_total'] = 1 and booty_call['coffee_make'] = 1:
+			if npc_latesleeper[$boy] = 1:
+				'<<$npc_firstname[$boy]>> comes in right as you''re pouring it out, letting out a mighty yawn.'
+				'"Hey sleepyhead," you smile. "I made coffee."'
+			else
+				'<<$npc_firstname[$boy]>> comes in right as you''re pouring it out.'
+				'"Hey. Just finished brewing," you smile, handing him a steaming mug.'
+			end
+			act'Drink your coffee':gt'booty_call_morning','coffee_together'
+		else
+			if npc_latesleeper[$boy] = 1:
+				'<<$npc_firstname[$boy]>> comes in right as you''re pouring it out, letting out a mighty yawn.'
+				'"Hey sleepyhead," you smile. "I made breakfast."'
+			else
+				'<<$npc_firstname[$boy]>> comes in right as you start setting the table.'
+				'"Hey," you smile at him. "Just finished up. Help yourself."'
+			end
+			gs'booty_call_morning','eat_breakfast1'
+			
+		end
+	end
+end
+
+if $ARGS[0] = 'coffee_together':
+	gs 'beverage', 'coffee'
+	booty_call['breakfast_eat'] = 1
+	minut += 5
+	npc_rel[$boy] += rand(1,3)
+	'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_kitchen1.jpg"></center>'
+	'The two of you settle down at <<$npc_firstname[$boy]>>''s table and sip away at your coffee, casually chit-chatting with each other until there''s nothing but dregs left.'
+	act'Wash your mugs':gt'booty_call_morning', 'breakfast_dishes'
+end
+
+if $ARGS[0] = 'eat_breakfast1':
+	booty_call['breakfast_eat'] = 1
+	npc_rel[$boy] += rand(1,3)
+	act'Eat a small portion':gs'booty_call_morning','eat_breakfast2'
+	act'Eat a medium portion':gs'booty_call_morning','eat_breakfast3'
+	act'Eat a lot':gs'booty_call_morning','eat_breakfast4'
+		
+	if booty_call['cooking_total'] > 1:
+		if booty_call['coffee_make'] = 1:
+			act'Just drink coffee':gs'booty_call_morning','eat_breakfast_coffee'
+		end
+	end
+end
+
+if $ARGS[0] = 'eat_breakfast2':
+	cla & *clr
+	minut += 10
+	booty_call['light_breakfast'] = 1
+	gs 'food', 'only_stats_small_meal'
+	if booty_call['coffee_make'] = 1: gs 'beverage', 'coffee'
+	gs 'stat'
+	if npc_apt_type[$boy] = 2:
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_bedroom1.jpg"></center>'
+		'You settle down on <<$npc_firstname[$boy]>>''s bed while he pulls up a chair, nibbling on small bits of food as he digs in.'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_kitchen1.jpg"></center>'
+		'The two of you settle down at <<$npc_firstname[$boy]>>''s table. You nibble at small bits of food while he digs in.'
+	end
+	!! add chat section here later
+	'"Not going to eat?" he asks curiously.'
+	act'Not that hungry':
+		cla & *nl
+		'"I''m just not very hungry right now," you reply. "But you go ahead. Don''t hold back on account of me."'
+		'He nods, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+	
+	act'Not into breakfast':
+		cla & *nl
+		'"I''m not much into breakfast," you admit. "But this is for you more than me. Enjoy it."'
+		'He smiles, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+	
+	act'Dieting':
+		cla & *nl
+		'"I''m on a diet," you reply. "But you go ahead. Don''t hold back on account of me."'
+		'He nods, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+end
+
+if $ARGS[0] = 'eat_breakfast3':
+	cla & *clr
+	minut += 10
+	booty_call['medium_breakfast'] = 1
+	gs 'food', 'only_stats_medium_meal'
+	if booty_call['coffee_make'] = 1: gs 'beverage', 'coffee'
+	gs 'stat'
+	if npc_apt_type[$boy] = 2:
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_bedroom1.jpg"></center>'
+		'You settle down on <<$npc_firstname[$boy]>>''s bed while he pulls up a chair and you both dig in, casually chatting away until you''ve cleared your plates.'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_kitchen1.jpg"></center>'
+		'The two of you settle down at <<$npc_firstname[$boy]>>''s table and dig in, casually chatting away until you''ve cleared your plates.'
+	end
+	!! add chat section here later
+	gs 'stat'
+	act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+end
+
+if $ARGS[0] = 'eat_breakfast4':
+	cla & *clr
+	minut += 10
+	booty_call['big_breakfast'] = 1
+	gs 'food', 'only_stats_large_meal'
+	if booty_call['coffee_make'] = 1: gs 'beverage', 'coffee'
+	gs 'stat'
+	if npc_apt_type[$boy] = 2:
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_bedroom1.jpg"></center>'
+		'You settle down on <<$npc_firstname[$boy]>>''s bed while he pulls up a chair and you both dig in, you especially, happily stuffing your face as the two of you casually chat away until you''ve cleared your plates.'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_kitchen1.jpg"></center>'
+		'The two of you settle down at <<$npc_firstname[$boy]>>''s table and dig in, you especially, happily stuffing your face as the two of you casually chat away until you''ve cleared your plates.'
+	end
+	!! add chat section here later
+	gs 'stat'
+	act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+end
+
+if $ARGS[0] = 'eat_breakfast_coffee':
+	cla & *clr
+	booty_call['coffee_only'] = 1
+	gs 'beverage', 'coffee'
+	minut += 10
+	gs 'stat'
+	if npc_apt_type[$boy] = 2:
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_bedroom1.jpg"></center>'
+		'You settle down on <<$npc_firstname[$boy]>>''s bed while he pulls up a chair, sipping on your coffee as he digs in.'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/romance/activities/apartment/breakfast/nude_kitchen1.jpg"></center>'
+		'The two of you settle down at <<$npc_firstname[$boy]>>''s table. You nibble at small bits of food while he digs in.'
+	end
+	!! add chat section here later
+	'"Not going to eat?" he asks curiously.'
+	act'Not that hungry':
+		cla & *nl
+		'"I''m just not very hungry right now," you reply. "But you go ahead. Don''t hold back on account of me."'
+		'He nods, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+	
+	act'Not into breakfast':
+		cla & *nl
+		'"I''m not much into breakfast," you admit. "But this is for you more than me. Enjoy it."'
+		'He smiles, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+	
+	act'Dieting':
+		cla & *nl
+		'"I''m on a diet," you reply. "But you go ahead. Don''t hold back on account of me."'
+		'He nods, continuing to help himself as you casually chit chat back and forth.'
+		act'Clear your dishes':gt'booty_call_morning', 'breakfast_dishes'
+	end
+end
+
+if $ARGS[0] = 'breakfast_dishes':
+	'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_misc3.jpg"></center>'
+	if (booty_call['cooking_total'] = 1 and booty_call['coffee_make'] = 1) or booty_call['coffee_only'] = 1:
+		'"Just what I needed," you sigh, taking your used mug over to the sink.'
+		if rand(1,10) < npc_sexdrive[$boy] - ((booty_call['cum_count'] + booty_call['extra_cum']) / 2) and (stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0):
+			'"I could use something a little stronger than coffee," he says, stepping up behind you. His hands caress your hips and you can feel something hard hovering between your cheeks.'
+			gs'booty_call_morning', 'after_breakfast_sex'
+		elseif booty_call['cooking_total'] > 1:
+			'"Thanks for breakfast," he smiles, bringing his dishes over.'
+		else
+			'"Me too," he agrees, tilting his head back to drain the last drops of his cup.'
+			gs'booty_call_morning', 'wakeup1'
+		end
+	else
+		if booty_call['light_breakfast'] = 1 or booty_call['medium_breakfast'] = 1:
+			'"That was nice," you hum happily, taking your dirty dishes over to the kitchen area.'
+			if rand(1,10) < npc_sexdrive[$boy] - ((booty_call['cum_count'] + booty_call['extra_cum']) / 2) and (stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0):
+				'"I can think of something nicer," he says, stepping up behind you, hands caressing your hips and something hard poking you in the back.'
+				gs'booty_call_morning', 'after_breakfast_sex'
+			else
+				'"Thanks for breakfast," he smiles back, bringing his dishes over.'
+				gs'booty_call_morning', 'wakeup1'
+			end
+		elseif booty_call['big_breakfast'] = 1:
+			'"I''m stuffed," you sigh, taking your dirty dishes over to the kitchen area.'
+			if rand(1,10) < npc_sexdrive[$boy] - ((booty_call['cum_count'] + booty_call['extra_cum']) / 2) and (stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0):
+				'"Not yet you''re not," he says, stepping up behind you, hands caressing your hips and something hard poking you in the back.'
+				gs'booty_call_morning', 'after_breakfast_sex'
+			else
+				'"Me too," he agrees, tilting his head back to drain the last drops of his cup.'
+				gs'booty_call_morning', 'wakeup1'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'after_breakfast_sex':
+	act'"Down boy"':
+		act'Don''t have time':
+			cla & *nl
+			'"Tsk! Down boy!" you chide, rolling your eyes and taking his hands to forcibly pull them off your body. "I don''t have time for this."'
+			gs'booty_call_morning', 'wakeup1'
+		end
+		
+		act'Not in the mood':
+			cla & *nl
+			'"Tsk! Down boy!" you chide, rolling your eyes and taking his hands to forcibly pull them off your body. "I had fun earlier but I''m not in the mood right now."'
+			gs'booty_call_morning', 'wakeup1'
+		end
+	end
+	
+	act'Giggle':
+		cla
+		gs'arousal', 'foreplay', 1, 'no_orgasm_msg'
+		if booty_call['wake_fuck'] = 1:
+			booty_call['extra_cum'] += npc_sexdrive[$boy]/2
+		else
+			booty_call['extra_cum'] += npc_sexdrive[$boy]
+		end
+
+		act'You''re gonna make me late':
+			cla & *nl
+			'"You''re gonna make me late," you giggle uncontrollably as <<$npc_firstname[$boy]>> gets friskier, dragging you back to bed to do what he wants to you.'
+			gs 'booty_call_start', 'bed_start'
+		end
+		
+		act'Let him do what he wants':
+			cla & *nl
+			'You giggle uncontrollably, giving <<$npc_firstname[$boy]>> the non-verbal go ahead and you let him drag you back to the bed to do what he wants to you.'
+			gs 'booty_call_start', 'bed_start'
+		end
+		
+		if booty_call['wake_fuck'] = 1 or booty_call['morning_fuck'] = 1:
+			act'Again?!':
+				cla & *nl
+				'"Again?!" you giggle as <<$npc_firstname[$boy]>> begins groping your breast and fingering your clit. "You''re insatiable!"'
+				*nl
+				'But you don''t protest and let <<$npc_firstname[$boy]>> drag you back to the bed to do what he wants to you.'
+				gs 'booty_call_start', 'bed_start'
+			end
+		end
+		
+	end
+	
+	if booty_call['cooking_total'] ! 1 or booty_call['coffee_make'] ! 1:
+		act'Not after eating':
+			cla & *nl
+			'"Ugh!" you groan, giving <<$npc_firstname[$boy]>> a look of disgust and forcibly pulling his hands off your body. "Right when I feel all gross after eating? How can you even <i>think</i> about that right now?"'
+			gs'booty_call_morning', 'wakeup1'
+		end
+	end
+end
+
+!! ---------------------------------- OUTSIDE APARTMENT -------------------------------------------
+
 if $ARGS[0] = 'give_lift':
 	!! add in option later to give road head along the way
 	if booty_call['give_lift'] = 2:

+ 116 - 213
locations/booty_call_pillow_talk.qsrc

@@ -15,13 +15,20 @@ end
 if $ARGS[0] = 'topics':
 	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
 !!	if booty_call['angry_after'] = 0:
-!!		act'Small talk':cla & gs'booty_call_pillow_talk', 'small_talk'
+!!		act'Small talk':cla & gs'booty_call_pillow_talk2', 'small_talk'
 		act'Talk about the sex':cla & gs'booty_call_pillow_talk', 'sex_talk'
-!!		act'Play with his cock':cla & gs'booty_call_pillow_talk', 'dick_talk'
+		act'Play with his cock':cla & gs'booty_call_pillow_talk2', 'dick_talk'
 		if booty_call['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'booty_call_pillow_talk', 'free_creampies'
+		if booty_call['wake_fuck'] = 1 or booty_call['sleep_fuck'] = 1 or booty_call['morning_fuck'] = 1:
+			act'Morning sex talk':cla & gs'booty_call_pillow_talk2', 'morning_sex_talk'
+		end
 !!	end
 end
 
+if $ARGS[0] = 'talk_time_add':
+	minut += 1
+	gs 'stat'
+end
 
 !! -------------------------- SEX TALK ----------------------------
 
@@ -44,6 +51,7 @@ end
 if $ARGS[0] = 'good_for_you':
 	if booty_call['good_for_you'] = 0 and booty_call['mad'] ! 1 and booty_call['blue_ball'] ! 1:
 		act'Was it good for you?':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['good_for_you'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -73,6 +81,7 @@ end
 if $ARGS[0] = 'good_for_you_WIP':
 	if booty_call['good_for_you'] = 0 and booty_call['mad'] ! 1 and booty_call['blue_ball'] ! 1:
 		act'Was it good for you?':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['good_for_you'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -173,7 +182,6 @@ if $ARGS[0] = 'cum_mouth_favorite':
 			gs'booty_call_pillow_talk', 'pc_favorite_part'
 		end
 		
-		
 		act'Your cum is disgusting':
 			npc_gross_cum[$boy] = 1
 			npc_rel[$boy] -= 2
@@ -360,48 +368,63 @@ if $ARGS[0] = 'good_for_you_too':
 		
 		act'Dick drunk':
 			cla & *nl
-			'"I think I''m dick drunk," you giggle, rubbing your wet thighs together.'
+			'"I think I''m dick drunk," you say with a ditzy giggle, rubbing your wet thighs together.'
 			gs'booty_call_pillow_talk', 'topics'
 		end		
 	end
 	
 	if booty_call['fuck_count'] >= 5:
-		act'Won''t walk right (good)':
-			cla & *nl
-			booty_call['keep_it_up'] = 1
-			booty_call['sore_pussy_talk'] = 1
-			if booty_call['cum_count'] = npc_sexdrive[$boy]:
-				'"I might not be able to walk right for a week either," you grin, rubbing your thighs over your wonderfully sore pussy. "You might have fucked me bowlegged."'
-			else
-				'"I''m not gonna be able to walk right for a week," you grin, rubbing your thighs over your wonderfully sore pussy. "You might have fucked me bowlegged."'
+		act'Won''t walk right':
+			cla
+			act'(in a good way)':
+				cla & *nl
+				booty_call['keep_it_up'] = 1
+				booty_call['sore_pussy_talk'] = 1
+				if booty_call['cum_count'] = npc_sexdrive[$boy]:
+					'"I might not be able to walk right for a week either," you grin, rubbing your thighs over your wonderfully sore pussy. "You might have fucked me bowlegged."'
+				else
+					'"I''m not gonna be able to walk right for a week," you grin, rubbing your thighs over your wonderfully sore pussy. "You might have fucked me bowlegged."'
+				end
+				gs'booty_call_pillow_talk', 'topics'
 			end
-			gs'booty_call_pillow_talk', 'topics'
-		end
 		
-		act'Won''t walk right (bad)':
-			cla & *nl
-			booty_call['keep_it_up'] = 1
-			booty_call['sore_pussy_talk'] = 1
-			if booty_call['cum_count'] = npc_sexdrive[$boy]:
-				'"I might not be able to walk right for a week either," you wince, rubbing your thighs over your aching pussy. "You might have fucked me bowlegged."'
-			else
-				'"I''m not gonna be able to walk right for a week," you wince, rubbing your thighs over your aching pussy. "You might have fucked me bowlegged."'
+			act'(in a bad way)':
+				cla & *nl
+				booty_call['keep_it_up'] = 1
+				booty_call['sore_pussy_talk'] = 1
+				if booty_call['cum_count'] = npc_sexdrive[$boy]:
+					'"I might not be able to walk right for a week either," you wince, rubbing your thighs over your aching pussy. "You might have fucked me bowlegged."'
+				else
+					'"I''m not gonna be able to walk right for a week," you wince, rubbing your thighs over your aching pussy. "You might have fucked me bowlegged."'
+				end
+				gs'booty_call_pillow_talk', 'topics'
 			end
-			gs'booty_call_pillow_talk', 'topics'
 		end
 	elseif booty_call['fuck_count'] > 3:
-		act'Sore pussy (good)':
-			booty_call['sore_pussy_talk'] = 1
-			cla & *nl
-			'"We fucked so much my pussy hurts," you say with a half smile, rubbing your thighs together over your delightfully sore pussy. "But in a good way."'
-			gs'booty_call_pillow_talk', 'topics'
-		end
+		act'Sore pussy':
+			cla
+			act'(in a good way)':
+				booty_call['sore_pussy_talk'] = 1
+				cla & *nl
+				'"I''m a little sore," you say with a half smile, rubbing your wet thighs together over your delightfully tender sex. "But in a good way."'
+				if npc_gymrat[$boy] = 1:
+					'"Like the soreness after a workout?" <<$npc_firstname[$boy]>> asks amusedly.'
+					'"Yeah," you nod. "Something like that. But in my pussy."'
+				else
+					'"How can you feel sore in a good way?" <<$npc_firstname[$boy]>> asks amusedly.'
+					'"I just do," you shrug. "Besides, it''s your fault for fucking me so well."'
+				end
+				*nl
+				'You both grin at that.'
+				gs'booty_call_pillow_talk', 'topics'
+			end
 		
-		act'Sore pussy (bad)':
-			booty_call['sore_pussy_talk'] = 1
-			cla & *nl
-			'"We went a few more times than I would''ve liked," you say with a half smile, half grimace, rubbing your thighs together over your sore pussy. "My pussy kind of hurts."'
-			gs'booty_call_pillow_talk', 'topics'
+			act'(in a bad way)':
+				booty_call['sore_pussy_talk'] = 1
+				cla & *nl
+				'"We went a few more times than I would''ve liked," you say with a half smile, half grimace, rubbing your thighs together over your sore pussy. "My pussy kind of hurts."'
+				gs'booty_call_pillow_talk', 'topics'
+			end
 		end
 	end
 	
@@ -443,6 +466,7 @@ if $ARGS[0] = 'good_for_you_too':
 	
 	if booty_call['creampie_count'] >= 4 and cum_loc['vagina'] > 0:
 		act'I''m full (of cum)':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['creampie_pillow_talk'] = 1
 			cla & *nl
 			'"I''m all full," you smile, rubbing your belly in tired satisfaction as <<$npc_firstname[$boy]>>''s cum overflows from your snatch.'
@@ -454,6 +478,7 @@ end
 if $ARGS[0] = 'keep_it_up':
 	if booty_call['cum_count'] >= 5 and booty_call['keep_it_up'] = 0:
 		act'You can really keep it up':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			booty_call['keep_it_up'] = 1
@@ -468,6 +493,7 @@ end
 if $ARGS[0] = 'kuni_wear_out':
 	if booty_call['cuni_orgasm'] >= 5 and booty_call['pussy_psycho_talk'] ! 1:
 		act'You''re a pussyeating psycho':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['pussy_psycho_talk'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -488,6 +514,7 @@ end
 if $ARGS[0] = 'long_time':
 	if hour > booty_call['start_hour'] and booty_call['fuck_count'] > 0 and booty_call['long_time_talk'] = 0:
 		act'We were at it a long time':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['long_time_talk'] = 1
 			booty_call['keep_it_up'] = 1
 			cla & *clr
@@ -502,6 +529,7 @@ end
 if $ARGS[0] = 'ran_out_of_condoms':
 	if booty_call['out_of_condoms'] >= 1 and booty_call['used_condoms_talk'] = 0 and (booty_call['condoms_used'] + booty_call['pc_condoms_used'] >= 5):
 		act'Can''t believe we ran out of condoms':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['used_condoms_talk'] = 1
 			booty_call['keep_it_up'] = 1
 			cla & *clr
@@ -518,6 +546,7 @@ if $ARGS[0] = 'ran_out_of_condoms':
 		end
 	elseif booty_call['out_of_condoms'] >= 1 and booty_call['used_condoms_talk'] = 0 and booty_call['condoms_used'] < 3:
 		act'You need more condoms':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['used_condoms_talk'] = 1
 			$booty_call['convo'] = 'used_all_condoms'
 			cla & *clr
@@ -714,6 +743,7 @@ end
 if $ARGS[0] = 'better_without':
 	if booty_call['condom'] >= 2 and booty_call['better_without'] = 0:
 		act'It was better without the condom':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['better_without'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -990,6 +1020,7 @@ if $ARGS[0] = 'plastered':
 	
 	if booty_call['plaster_count'] > 3 and booty_call['plastered'] = 1:
 		act'You really plastered me (annoyed)':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['plastered'] = 2
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			if cum_loc['vagina'] > 0:
@@ -1052,6 +1083,7 @@ end
 if $ARGS[0] = 'ruined_makeup':
 	if pcs_makeup = 0 and booty_call['starting_makeup'] > 1 and booty_call['ruin_makeup'] = 0:
 		act'You ruined my makeup':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['ruin_makeup'] = 1
 			cla & *clr
 			$npc_apt_bedroom[$boy]
@@ -1078,6 +1110,7 @@ end
 if $ARGS[0] = 'so_many_creampies':
 	if booty_call['creampie_count'] >= 4 and booty_call['creampie_pillow_talk'] = 0:
 		act'So many creampies':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['creampie_pillow_talk'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -1103,6 +1136,7 @@ if $ARGS[0] = 'so_many_creampies':
 			gs'booty_call_pillow_talk', 'topics'
 		end
 		act'Did you have to come inside me so many times?':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['creampie_pillow_talk'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
@@ -1138,6 +1172,7 @@ end
 if $ARGS[0] = 'free_creampies':
 	if booty_call['creampie_count'] > booty_call['surprise_creampie_count']:
 		act'You don''t need to ask to come inside':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
 			'"Y''know," you say, gently looking into <<$npc_firstname[$boy]>>''s eyes. "You don''t need to ask if you want to come inside me..."'
@@ -1292,6 +1327,7 @@ end
 if $ARGS[0] = 'broken_creampie_rule':
 	if npc_boyfriend_creampie_rule[$boy] <= 2 and npc_boyfriend_creampie_rule[$boy] > 0 and booty_call['creampie_count'] > 0 and booty_call['broken_creampie_rule'] = 0 and npc_free_creampies[$boy] = 0:
 		act'Broke my creampie rule':
+			gs'booty_call_pillow_talk', 'talk_time_add'
 			booty_call['broken_creampie_rule'] = 1
 			cla			
 			if booty_call['mad'] > 0:
@@ -1394,6 +1430,7 @@ end
 !! --------------------------------------- Boy Talk ------------------------------------------
 
 if $ARGS[0] = 'high_five1':
+	gs'booty_call_pillow_talk', 'talk_time_add'
 	'"That was great," <<$npc_firstname[$boy]>> pants, grinning sideways at you.'
 	act'Yeah':
 		cla & *nl
@@ -1528,6 +1565,7 @@ end
 
 if $ARGS[0] = 'boy_broken_condom':
 	if booty_call['broken_condom_talk'] = 0 and booty_call['broken_condom'] >= 1 and npc_know_bc[$boy] = 0 and booty_call['plan_b'] = 0 and (npc_selfish[$boy] ! 1 and (npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1)):
+		gs'booty_call_pillow_talk', 'talk_time_add'
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 		if cum_loc['vagina'] > 0:
@@ -1587,6 +1625,7 @@ end
 
 if $ARGS[0] = 'boy_pube_talk':
 	if npc_like_pubestyle[$boy] > 0 and npc_like_pubestyle[$boy] ! pubestyle:gt'booty_call_pillow_talk', 'boy_pubes_changed'
+	gs'booty_call_pillow_talk', 'talk_time_add'
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 	if pcs_pubes < 3:
@@ -1655,10 +1694,10 @@ if $ARGS[0] = 'boy_pubes_response':
 			'"I was just curious," he shrugs. "Some girls shave, some don''t. Me? Pussy is pussy, I don''t care if it''s more like a kiwi or an apple," he laughs aloud.'
 			gs'booty_call_pillow_talk', 'topics'
 		elseif npc_bush_pref[$boy] = 1:
-			'"I think it''s hot," he grins. "No one likes to find a gorilla between a girl''s legs. Cleanshaven is the best."'
+			'"I think it''s hot," he grins. "No one likes to find a gorilla between a girl''s legs. Clean-shaven is the best."'
 			gs'booty_call_pillow_talk', 'boy_asks_cleanshave'
 		elseif npc_bush_pref[$boy] = 2:
-			'"Ever considered trimming it down?"'
+			'"Ever considered letting it grow out?"'
 			gs'booty_call_pillow_talk', 'boy_asks_trim'
 		elseif npc_bush_pref[$boy] = 3:
 			'"I think it''s sexy too," he grins. "Too many girls feel peer pressured into shaving it off, but I love a nice full bush."'
@@ -1717,7 +1756,7 @@ end
 
 if $ARGS[0] = 'shave_for_you':
 	act'I''ll think about it':
-		npc_shave_for_think[$boy] = 1
+		npc_shave_think[$boy] = daystart
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/after/pillow_talk3.mp4"></video></center>'
 		'"I''ll think about it," you chuckle. "But no promises."'
@@ -1725,7 +1764,7 @@ if $ARGS[0] = 'shave_for_you':
 	end
 	
 	act'For you':
-		npc_shave_for_promise[$boy] = 1
+		npc_shave_promise[$boy] = daystart
 		cla & *nl
 		'"Well..." you say. "I guess I could try it? For you."'
 		'You punctuate your promise with a gentle smile, returned with an eager grin from <<$npc_firstname[$boy]>>.'
@@ -1865,7 +1904,7 @@ if $ARGS[0] = 'boy_likes_pubes2':
 		elseif $npc_dick_desc[$boy] = 'gigantic':
 			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs even when flaccid. "I can practically feel you in my stomach when you''ve got the whole thing inside me."'
 		elseif $npc_dick_desc[$boy] = 'monster':
-			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his monstrously large manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs with a girth nearly as thick as your wrist even flaccid. "It''s like you''ve got a fist for a dick, I didn''t even know cocks could get that big!"'
+			'"You''ve got some pretty nice equipment yourself," you say, grinning lewdly at his monstrously large manhood, stretching its <<npc_dick[$boy]>>cm length down his thighs with a girth nearly as thick as your wrist even flaccid. "It''s like you''ve got an arm for a dick. I didn''t even know cocks could get that big!"'
 		end
 		gs'booty_call_pillow_talk', 'topics'
 	end
@@ -1915,12 +1954,6 @@ if $ARGS[0] = 'pubes_other_lovers':
 			gs'booty_call_pillow_talk', 'boy_pubes_response'
 		end
 		
-		act'My last fuckbuddy liked it':
-			cla & *nl
-			'"An old fuckbuddy liked it this way," you shrug. "Why do you ask?"'
-			gs'booty_call_pillow_talk', 'boy_pubes_response'
-		end
-		
 		if pcs_lovers > 0 and pcs_lovers - pcs_girlfriends > 0:
 			act'My boyfriend likes it':
 				cla & *nl
@@ -1937,11 +1970,17 @@ if $ARGS[0] = 'pubes_other_lovers':
 			end
 		end
 		
+		act'My last fuckbuddy liked it':
+			cla & *nl
+			'"An old fuckbuddy liked it this way," you shrug. "Why do you ask?"'
+			gs'booty_call_pillow_talk', 'boy_pubes_response'
+		end
+		
 		
 		if arrsize('$fuckbuddy') > 1:
 			act'My other fuckbuddy likes it':
 				cla & *nl
-				'"Another fuckbuddy of mine likes it this way," you shrug. "Why do you ask?"'
+				'"My other fuckbuddy likes it this way," you shrug. "Why do you ask?"'
 				gs'booty_call_pillow_talk', 'boy_pubes_response'
 			end
 		end
@@ -2135,11 +2174,22 @@ if $ARGS[0] = 'boy_no_kids':
 				
 				act'I get that':
 					cla & *nl
-					'"I get that?" you nod back. "Parenthood isn''t for everyone."'
+					'"I get that," you nod back. "Parenthood isn''t for everyone."'
 					gs'booty_call_pillow_talk', 'topics'
 				end
 			else
+				'"It wouldn''t be so bad, being a father," he replies. "Not sure about the when, but I think I''d really like to have a kid or two one day."'
+				act'Maybe one day':
+					cla & *nl
+					'"Maybe one day," you say again, shrugging.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
 				
+				act'I get that':
+					cla & *nl
+					'"I get that," you nod back. "Might be nice to have someone to live for."'
+					gs'booty_call_pillow_talk', 'topics'
+				end
 			end
 		end
 		
@@ -2148,181 +2198,34 @@ if $ARGS[0] = 'boy_no_kids':
 			'"Not now, not ever," you grimace. "Motherhood sounds... ugh."'
 			if npc_childfree[$boy] = 1:
 				'"I feel the same way," he says, nodding. "I never want to be a parent. That sounds awful."'
+				gs'booty_call_pillow_talk', 'topics'
 			else
-				
-			end
-		end
-	end
-end
-
-!! -------------------------- SMALL TALK ----------------------------
-
-if $ARGS[0] = 'small_talk':
-	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
-	gs'booty_call_pillow_talk', 'weather_talk'
-	gs'booty_call_pillow_talk', 'better_without'
-	gs'booty_call_pillow_talk', 'kuni_wear_out'
-	gs'booty_call_pillow_talk', 'long_time'
-	gs'booty_call_pillow_talk', 'ran_out_of_condoms'
-	gs'booty_call_pillow_talk', 'keep_it_up'
-	gs'booty_call_pillow_talk', 'so_many_creampies'
-	gs'booty_call_pillow_talk', 'broken_creampie_rule'
-	if booty_call['sleepover'] = 1:gs'booty_call_talk', 'morning_talk'
-end
-
-if $ARGS[0] = 'weather_talk':
-	if booty_call['weather_pillow_talk'] = 0:
-		if temper > 28:
-			act'It''s so hot':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Fuck me, it''s so hot today," you pant. "I''m sweating after that."'
-				
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'plans_later':
-	if booty_call['plans_later_talk'] = 0:
-		if hour < 14:
-			act'What''re you up to?':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Got any plans for the rest day?" you ask.'
-				if npc_day_off1[$boy] = week or npc_day_off2[$boy] = week:
-					
-				else
-					if npc_end_free_time[$boy] >= hour:
-						'"I have to go to work after this," he says, checking the time. "Shit, I''m gonna be late. I gotta get going now."'
-						booty_call['npc_late'] = 1
-					else
-						'"I have to go to work after this," he says, checking the time.'
-					end
+				'"Don''t you think you''d get lonely?" <<$npc_firstname[$boy]>> asks. "Y''know, knowing that you wouldn''t have anything to live for except yourself when you get old?"'
+				act'I guess...':
+					cla & *nl
+					'"I guess, maybe," you mumble. "I don''t know. Why does everything have to be about procreation? Why can''t I just live my life?"'
+					gs'booty_call_pillow_talk', 'topics'
 				end
-			end
-		elseif hour >= 20:
-			act'What''d you do today?':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Fuck me, it''s so hot today," you pant. "I''m sweating after that."'
 				
-			end
-		else
-			act'Doing anything else today?':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Fuck me, it''s so hot today," you pant. "I''m sweating after that."'
+				act'I''ll have a spouse':
+					cla & *nl
+					'"I''ll get married," you shrug. "Why would I be lonely then?"'
+					gs'booty_call_pillow_talk', 'topics'
+				end
 				
+				act'Play it off':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"That''s what I have guys like you for," you smirk. "To fuck me when I get lonely."'
+					*nl
+					'<<$npc_firstname[$boy]>> can tell you just sidestepped the question, but doesn''t press the topic any further.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
 			end
 		end
 	end
 end
 
-!! -------------------------- DICK TALK ----------------------------
-
-if $ARGS[0] = 'dick_grab_image':
-	cla & *clr
-	if pcs_pubes < 12:
-		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play1.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play2.jpg"></center>'
-	end
-end
-
-if $ARGS[0] = 'dick_talk':
-	gs'booty_call_pillow_talk', 'dick_grab_image'
-	if booty_call['dick_play'] = 0:
-		booty_call['dick_play'] = 1
-		if npc_dick_play[$boy] = 0:
-			if booty_call['cum_count'] = npc_sexdrive[$boy]:
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
-				'"If you''re trying to get me hard, I don''t think I can go again," he chuckles.'
-			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
-				'"You trying to get me hard again?" he snickers.'
-			else
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, immediately stiffening between your fingers.'
-				'"You want to go again?" he grins.'
-			end
-			'"That''s not what I''m doing," you say, affectionately rolling your eyes. "I''m just... playing with it."'
-		else
-			if booty_call['cum_count'] = npc_sexdrive[$boy]:
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
-			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
-			else
-				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
-			end
-			'"Amusing yourself with my dick again?"'
-			'"Yeah," you grin back shamelessly.'
-		end
-	end
-	gs'booty_call_pillow_talk', 'dick_talk_topics'
-end
-
-if $ARGS[0] = 'dick_talk_topics':
-	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
-	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
-	gs'booty_call_pillow_talk', 'whats_it_like_dick'
-	gs'booty_call_pillow_talk', 'dicks_are_weird'
-end
-
-if $ARGS[0] = 'whats_it_like_dick':
-	if booty_call['whats_it_like_dick_talk'] = 0:
-		act'What''s it like having a dick?':
-			cla & *clr
-			gs'booty_call_pillow_talk', 'dick_grab_image'
-			'"What''s it like having a dick?" you ask, a strange expression on your face as you fondle <<$npc_firstname[$boy]>>''s meat.'
-			if npc_humor[$boy] = 1:
-				'"What''s it like having a pussy?" he shrugs. "I don''t know, it''s just a dick. I have one. I don''t know how to explain that."'
-			elseif npc_humor[$boy] = 2:
-				'"Like having a brain between your legs that wants to fuck all the time," he grins.'
-				'"Seriously?" you ask, staring at it even harder.'
-				'"Fucker gets hard whenever it feels like it, whether there''s a pussy to be fucked or not," he chuckles. "But pussy is always what it wants."'
-			else
-				'"It has its ups and downs," he says. "I can pee anywhere I want for one thing. Toilet, urinal, bushes, an open field, it''s as easy as getting it out and letting loose."'
-				'"Damn," you sigh. "I wish I could do that. I can only squat down somewhere and hope that I don''t piss all over my own shoes."'
-				'"Random erections can be... awkward..."'
-				'"Random?" you ask confusedly. "What do you mean?"'
-				'"It''s like it has a mind of its own," he chuckles. "Gets hard for no reason at all."'
-				'"That''s cause all guys want is sex," you giggle but <<$npc_firstname[$boy]>> shakes his head.'
-				'"No," he says. "Even when I''m not horny. Sometimes I''ll just be watching TV or going to the store and suddenly, bam-! I''m hard. Gotta figure out how to stuff it down there without everybody thinking I''m a pervert."'
-				'"Really???" you ask, staring in bewilderment at his inactive cock.'
-			end
-			gs'booty_call_pillow_talk', 'dick_talk_topics'
-		end
-	end
-end
-
-
-if $ARGS[0] = 'dicks_are_weird':
-	if booty_call['dicks_are_weird_talk'] = 0:
-		act'Dicks are weird':
-			cla & *clr
-			gs'booty_call_pillow_talk', 'dick_grab_image'
-			if booty_call['fuck'] = 0:
-				'"Dicks are <i>so</i> weird," you say, experimentally squishing the flesh of his manhood between your fingers in bemusement. It twitches at your touch, causing you to pull back in alarm for a moment.'
-			else
-				'"Dicks are <i>so</i> weird," you say, experimentally squishing the flesh of his manhood between your fingers in bemusement. It twitches at your touch, causing you to pull back in alarm for a moment. You look at it warily, mumbling, "I can''t believe I had this thing inside me..."'
-			end
-			gs'booty_call_pillow_talk', 'dick_talk_topics'
-		end
-	end
-end
-
-if $ARGS[0] = 'dicks_compliment':
-	if booty_call['dicks_compliment_talk'] = 0:
-		act'Compliment his dick':
-			cla & *clr
-			gs'booty_call_pillow_talk', 'dick_grab_image'
-			
-			
-			gs'booty_call_pillow_talk', 'dick_talk_topics'
-		end
-	end
-end
-
 
 if $ARGS[0] = 'angry_end':
 	cla & *nl

+ 753 - 0
locations/booty_call_pillow_talk2.qsrc

@@ -0,0 +1,753 @@
+# booty_call_pillow_talk2
+
+
+!! -------------------------- SMALL TALK ----------------------------
+
+if $ARGS[0] = 'small_talk':
+	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
+!!	gs'booty_call_pillow_talk2', 'weather_talk'
+	gs'booty_call_pillow_talk', 'fav_body_part'
+
+	if booty_call['sleepover'] = 1:gs'booty_call_talk', 'morning_talk'
+end
+
+if $ARGS[0] = 'weather_talk':
+	if booty_call['weather_pillow_talk'] = 0:
+		if temper > 30:
+			act'It''s so hot':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"It''s so hot today," you pant. "I''m sweating after that. And not just from the sex."'
+				'"Yeah," <<$npc_firstname[$boy]>> replies. "The sheets are practically soaked."'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'fav_body_part':
+	act'What do you like about my body?':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+		'"What''s do you find sexy about me?" you ask <<$npc_firstname[$boy]>>.'
+		if $npc_fav_body_part[$npclastgenerated] = 'tits':
+!!			if npc_humor[$boy] = 2:
+!!				'"Your tits," he grins, bending his head and popping your nipple into his mouth for a gentle suckle. "Definitely your tits."'
+!!			else
+				'"Your breasts," he smiles, glancing down to admire them.'
+!!			end
+			
+			act'Really?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				if pcs_cupsize <= 15:
+					'"You really think so?" you ask, surprised. You self consciously grope yourself, saying, "You don''t think they''re too small?"'
+					if npc_tit_pref[$boy] = 1:
+						'"I love all tits," he says, bowing his head to kiss along the side of your breast. "But I love small tits like yours most of all."'
+					elseif npc_tit_pref[$boy] = 2:
+						'"My preferences run a little bigger," he admits but smiles at you. "But tits are tits. I love them all."'
+					elseif npc_tit_pref[$boy] = 3:
+						'"I do like it when girls have a big rack," he admits but smiles at you. "But tits are tits. I love them all."'
+					elseif npc_tit_pref[$boy] = 4:
+						'"I love gigantic tits," he admits but smiles at you. "But tits are tits. I love them all."'
+					else
+						'"Boobs are boobs," he says, bowing his head to kiss along the side of your breast. He grins. "And I love all boobs."'
+					end
+				elseif pcs_cupsize > 25:
+					'"You really think so?" you ask, surprised. You self consciously grope yourself, saying, "You don''t think they''re too too big?"'
+					if npc_tit_pref[$boy] = 1:
+						'"I prefer smaller boobs to bigger ones," he admits but smiles at you. "But tits are tits. I love them all."'
+					elseif npc_tit_pref[$boy] = 2:
+						'"My preferences run a little smaller," he admits but smiles at you. "But tits are tits. I love them all."'
+					elseif npc_tit_pref[$boy] >= 3:
+						'"I love big titties," he grins, admiring your glorious rack. "Actually, I love all titties. But big titties are the best."'
+					else
+						'"Boobs are boobs," he says, bowing his head to kiss along the side of your breast. He grins. "And I love all boobs."'
+					end
+				else
+					'"You really think so?" you ask, surprised. You self consciously grope yourself, saying, "You really like them that much? You don''t wish they were... different?"'
+					if npc_tit_pref[$boy] = 1:
+						'"I prefer smaller boobs generally," he admits but smiles at you. "But tits are tits. I love them all."'
+					elseif npc_tit_pref[$boy] = 2:
+						'"They''re perfect," he says, bowing his head to kiss along the side of your breast. He grins. "And I love all boobs."'
+					elseif npc_tit_pref[$boy] >= 3:
+						'"I do like it when girls have a big rack," he admits but smiles at you. "But tits are tits. I love them all."'
+					else
+						'"Boobs are boobs," he says, bowing his head to kiss along the side of your breast. He grins. "And I love all boobs."'
+					end
+				end
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'Glad you think so':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				'"Aww! Thanks," you smile fondly at <<$npc_firstname[$boy]>>. "Means a lot to me that you think so."'
+				'"Boobs are great," he grins. "And your boobs are especially great because you let me fuck you."'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'I like them too':
+				cla & *nl
+				'"Me too," you grin. "I love my boobs!"'
+				'"They''re the best," he nods, bowing his head to kiss one.'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+		elseif $npc_fav_body_part[$npclastgenerated] = 'ass':
+			if npc_humor[$boy] <= 2:
+				'"It''s all about dat ass," he grins, reaching around to give said ass a firm squeeze.'
+			else
+				'"I love your ass," he smiles, running his hand up your thigh to give your bottom a firm squeeze.'
+			end
+			
+			act'Really?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				'"Really?" you ask, surprised. "My ass? Not my boobs? Or my pussy?"'
+				'"No way." He shakes his head. "Ass is the sexiest thing about a girl, and it''s the sexiest thing about you."'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'Glad you think so':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				'"Aww! Thanks," you smile fondly at <<$npc_firstname[$boy]>>. "Means a lot to me that you think so."'
+				'"There''s something irresistible about a good ass," he grins, grabbing another handful of yours.'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'I like it too':
+				cla & *nl
+				'"Me too," you grin. "It''s my best <i>ass</i>et," you add with a wink.'
+				'"Damn right," he says, unable to resist giving it another grab.'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'Oh you''re one of those':
+				cla & *nl
+				'"Oh," you say. "You''re one of <i>those</i>."'
+				'"One of what?"'
+				'"An ass man," you say, rolling your eyes.'
+				'"Damn right," he grins, unable to resist giving it another grab.'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+		elseif $npc_fav_body_part[$npclastgenerated] = 'pussy':
+			gs 'arousal', 'foreplay', 1, 'no_orgasm_msg'
+			gs 'stat'
+			'"I love your pussy," he says, his fingers slowly running up the inside of your thigh to caress your lower lips.'
+			act'Really?':
+				cla & *clr
+				gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
+				gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				'"You really think so?" you ask. "Not my boobs or my ass or-"'
+				*nl
+				'Your next words are interrupted by a gasp as <<$npc_firstname[$boy]>> drives a finger knuckle deep into your just-fucked pussy. Soft squelching sounds emanate from between your legs as he gently caresses your insides, forcing whimpers from your lips while he stares into your eyes.'
+				*nl
+				'"Yeah..." he says, giving a predatory smile as he draws his hand away trailing strands of your juices. "Your pussy is the best."'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'Glad you think so':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				if booty_call['fuck_count'] > 0 or npc_fuck_times[$boy] > 0:
+					'"Glad you think so," you smile at <<$npc_firstname[$boy]>>. "I''d hate to find out you don''t appreciate the pussy you''re fucking."'
+				else
+					'"Glad you think so," you smile at <<$npc_firstname[$boy]>>. "Always nice to get compliments."'
+				end
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			act'I like it too':
+				cla & *nl
+				if booty_call['fuck_count'] > 0 or npc_fuck_times[$boy] > 0:
+					'"Me too," you grin at <<$npc_firstname[$boy]>>. "I like the way it lets me fuck you."'
+				else
+					'"Me too," you grin at <<$npc_firstname[$boy]>>. "I''ve always thought my pussy was cute."'
+				end
+				'"Glad we''re in agreement," he grins back.'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+			
+			if stat['think_virgin'] ! 1 or booty_call['fuck_count'] > 0 or npc_fuck_times[$boy] > 0:
+				act'You just like fucking it':
+					cla & *nl
+					'"You''re just saying that because you get to fuck it," you smirk teasingly.'
+					if npc_pussyeater[$boy] = 1 and (booty_call['kuni'] > 0 or npc_kuni_times[$boy]):
+						gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
+						gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+						gs 'stat'
+						'"That''s not true," he smirks back. "I love eating it too."'
+						if cum_loc['vagina'] > 0:
+							booty_call['creampie_eat'] += 1
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your cum-filled pussy before drawing it back out to suck the cocktail of cum and your juices off his finger.'
+						else
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your pussy before drawing it back out to suck your juices off his finger.'
+						end
+						'"You taste good," he says, licking his lips.'
+					else
+						'"That''s not the <i>only</i> reason," he says. "There''s just something hot about them. But yours is especially hot when I''m fucking it."'
+						'<<$npc_firstname[$boy]>> grins shamelessly.'
+					end
+					gs'booty_call_pillow_talk2', 'small_talk'
+				end
+			elseif booty_call['virgin'] = 1:
+				act'You''re just saying that because you deflowered me':
+					cla & *nl
+					'"You''re just saying that because I was a virgin and you''re the first one who got to fuck it," you smirk teasingly.'
+					if npc_pussyeater[$boy] = 1 and (booty_call['kuni'] > 0 or npc_kuni_times[$boy]):
+						gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
+						gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+						gs 'stat'
+						'"That''s not true," he smirks back. "I love eating it too."'
+						if cum_loc['vagina'] > 0:
+							booty_call['creampie_eat'] += 1
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your cum-filled pussy before drawing it back out to suck the cocktail of cum and your juices off his finger.'
+						else
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your pussy before drawing it back out to suck your juices off his finger.'
+						end
+						'"But you were also really tight," he says, licking his lips. "Mmm... You taste good..."'
+					else
+						'"That''s not the <i>only</i> reason," he says. "There''s just something hot about them. But yours is especially hot because I got to be your first."'
+						'<<$npc_firstname[$boy]>> grins shamelessly.'
+					end
+					gs'booty_call_pillow_talk2', 'small_talk'
+				end
+			elseif booty_call['fuck_count'] = 0 and npc_fuck_times[$boy] = 0:
+				act'You just want to fuck me':
+					cla & *nl
+					'"You''re just saying that because you want to fuck me," you smirk teasingly.'
+					if npc_pussyeater[$boy] = 1 and (booty_call['kuni'] > 0 or npc_kuni_times[$boy]):
+						gs 'arousal', 'vaginal_finger', 1, 'no_orgasm_msg'
+						gs 'arousal', 'vaginal_finger', -5, 'no_orgasm_msg'
+						gs 'stat'
+						'"Not just that," he smirks back. "I like the taste."'
+						if cum_loc['vagina'] > 0:
+							booty_call['creampie_eat'] += 1
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your cum-filled pussy before drawing it back out to suck the cocktail of cum and your juices off his finger.'
+						else
+							'He punctuates his reply by forcing a gasp from your lips as he drives his finger knuckle deep into your pussy before drawing it back out to suck your juices off his finger.'
+						end
+						'"You taste good," he says, licking his lips.'
+					else
+						'"That''s not the <i>only</i> reason," he says. "There''s just something hot about them. Even fingering you is fun."'
+					end
+					gs'booty_call_pillow_talk2', 'small_talk'
+				end
+			end
+		else
+			gs 'arousal', 'foreplay', 1, 'no_orgasm_msg'
+			gs 'arousal', 'foreplay', -5, 'no_orgasm_msg'
+			gs 'stat'
+			!! $npc_fav_body_part[$npclastgenerated] = 'thighs':
+			'"Your legs," he says, slowly caressing his fingers up and down the curve of your thigh. It''s tantalizing, the way he dances the tips across your skin, sending goosebumps wherever they go.'
+			act'Really?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+				'"Really?" you ask, startled. "I would have expected boobs or ass or pussy, but your favorite thing about me is my legs?"'
+				'"Yeah," he shrugs. "There''s something... enticing about them. Every girl has pussy and tits, but a girl''s legs call to me for some reason."'
+				gs'booty_call_pillow_talk2', 'small_talk'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'plans_later':
+	if booty_call['plans_later_talk'] = 0:
+		if hour < 14:
+			act'What''re you up to?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Got any plans for the rest day?" you ask.'
+				if npc_day_off[$boy] = week:
+					'"Not really," he shrugs. "It''s my day off so I''m just chilling. Why do you think I called you over?"'
+					gs'booty_call_pillow_talk2', 'small_talk'
+				else
+					if npc_end_free_time[$boy] >= hour:
+						'"I have to go to work after this," he says, checking the time. "Shit, I''m gonna be late. I gotta get going now."'
+						booty_call['npc_late'] = 1
+					else
+						'"I have to go to work after this," he says, checking the time.'
+						
+					end
+				end
+			end
+		elseif hour >= 20:
+			act'What''d you do today?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Fuck me, it''s so hot today," you pant. "I''m sweating after that."'
+				
+			end
+		else
+			act'Doing anything else today?':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"Fuck me, it''s so hot today," you pant. "I''m sweating after that."'
+				
+			end
+		end
+	end
+end
+
+!! -------------------------- DICK TALK ----------------------------
+
+if $ARGS[0] = 'dick_grab_image':
+	cla & *clr
+	if pcs_pubes < 12:
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play1.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play2.jpg"></center>'
+	end
+end
+
+if $ARGS[0] = 'dick_talk':
+	gs'booty_call_pillow_talk2', 'dick_grab_image'
+	if booty_call['dick_play'] = 0:
+		booty_call['dick_play'] = 1
+		if npc_dick_play[$boy] = 0:
+			if booty_call['cum_count'] = npc_sexdrive[$boy]:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
+				'"If you''re trying to get me hard, I don''t think I can go again," he chuckles.'
+			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+				'"You trying to get me hard again?" he snickers.'
+			else
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, immediately stiffening between your fingers.'
+				'"You want to go again?" he grins.'
+			end
+			'"That''s not what I''m doing," you say, affectionately rolling your eyes. "I''m just... playing with it."'
+		else
+			if booty_call['cum_count'] = npc_sexdrive[$boy]:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
+			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+			else
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+			end
+			'"Amusing yourself with my dick again?"'
+			'"Yeah," you grin back shamelessly.'
+		end
+	end
+	gs'booty_call_pillow_talk2', 'dick_talk_topics'
+end
+
+!! -------------------------- DICK TALK ----------------------------
+
+if $ARGS[0] = 'dick_grab_image':
+	cla & *clr
+	if pcs_pubes < 12:
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play1.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="images/shared/sex/after/dick_play2.jpg"></center>'
+	end
+end
+
+if $ARGS[0] = 'dick_talk':
+	gs'booty_call_pillow_talk2', 'dick_grab_image'
+	if booty_call['dick_play'] = 0:
+		booty_call['dick_play'] = 1
+		if npc_dick_play[$boy] = 0:
+			if booty_call['cum_count'] = npc_sexdrive[$boy]:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
+				'"If you''re trying to get me hard, I don''t think I can go again," he chuckles.'
+			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+				'"You trying to get me hard again?" he snickers.'
+			else
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, immediately stiffening between your fingers.'
+				'"You want to go again?" he grins.'
+			end
+			'"That''s not what I''m doing," you say, affectionately rolling your eyes. "I''m just... playing with it."'
+		else
+			if booty_call['cum_count'] = npc_sexdrive[$boy]:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it between your fingers.'
+			elseif booty_call['cum_count'] < npc_sexdrive[$boy]/2:
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+			else
+				'You reach over to <<$npc_firstname[$boy]>>, gently taking hold of his cock in your hand, squeezing and playing with it. It twitches in your grasp, stiffening slightly between your fingers.'
+			end
+			'"Amusing yourself with my dick again?"'
+			'"Yeah," you grin back shamelessly.'
+		end
+	end
+	gs'booty_call_pillow_talk2', 'dick_talk_topics'
+end
+
+if $ARGS[0] = 'dick_talk_topics':
+	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
+	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
+	gs'booty_call_pillow_talk2', 'whats_it_like_dick'
+	gs'booty_call_pillow_talk2', 'dicks_are_weird'
+	gs'booty_call_pillow_talk2', 'dick_compliment'
+	gs'booty_call_pillow_talk2', 'whats_it_like_fuck_girl'
+end
+
+if $ARGS[0] = 'whats_it_like_dick':
+	if booty_call['whats_it_like_dick_talk'] = 0:
+		act'What''s it like having a dick?':
+			cla & *clr
+			gs'booty_call_pillow_talk2', 'dick_grab_image'
+			'"What''s it like having a dick?" you ask, giving <<$npc_firstname[$boy]>>''s meat a funny look as you fondle it.'
+			if npc_humor[$boy] = 1:
+				'"What''s it like having a pussy?" he shrugs. "I don''t know, it''s just a dick. I have one. I don''t know how to explain that."'
+			elseif npc_humor[$boy] = 2:
+				'"Like having a brain between your legs that wants to fuck all the time," he grins.'
+				'"Seriously?" you ask, staring at it even harder.'
+				'"Fucker gets hard whenever it feels like it, whether there''s a pussy to be fucked or not," he chuckles. "But pussy is always what it wants."'
+			else
+				'"It has its ups and downs," he says. "I can pee anywhere I want for one thing. Toilet, urinal, bushes, an open field, it''s as easy as getting it out and letting loose."'
+				'"I wish I could do that," you sigh. "I can only squat down somewhere and hope that I don''t piss all over my own shoes."'
+				'"Random erections can be... awkward..."'
+				'"Random?" you ask confusedly. "What do you mean?"'
+				'"It''s like it has a mind of its own," he chuckles. "Gets hard for no reason at all."'
+				'"That''s cause all guys want is sex," you giggle but <<$npc_firstname[$boy]>> shakes his head.'
+				'"No," he says. "Even when I''m not horny. Sometimes I''ll just be watching TV or going to the store and suddenly, bam-! I''m hard. Gotta figure out how to stuff it down there without everybody thinking I''m a pervert."'
+				'"Really???" you ask, staring in bewilderment at his inactive cock.'
+			end
+			gs'booty_call_pillow_talk2', 'dick_talk_topics'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'dicks_are_weird':
+	if booty_call['dicks_are_weird_talk'] = 0:
+		act'Dicks are weird':
+			cla & *clr
+			gs'booty_call_pillow_talk2', 'dick_grab_image'
+			if booty_call['fuck'] = 0:
+				'"Dicks are <i>so</i> weird," you say, experimentally squishing the flesh of his manhood between your fingers in bemusement. It twitches at your touch, causing you to pull back in alarm for a moment.'
+			else
+				'"Dicks are <i>so</i> weird," you say, experimentally squishing the flesh of his manhood between your fingers in bemusement. It twitches at your touch, causing you to pull back in alarm for a moment. You look at it warily, mumbling, "I can''t believe I had this thing inside me..."'
+			end
+			gs'booty_call_pillow_talk2', 'dick_talk_topics'
+		end
+	end
+end
+
+if $ARGS[0] = 'dick_compliment':
+	if booty_call['dicks_compliment_talk'] = 0:
+		act'Compliment his dick':
+			cla & *clr
+			gs'booty_call_pillow_talk2', 'dick_grab_image'
+			'"You have a great dick, you know that?" you say while giving <<$npc_firstname[$boy]>>''s manhood an appreciative fondle.'
+			'"Yeah?" <<$npc_firstname[$boy]>> grins.'
+			act'You know how to use it':
+				cla & *nl
+				'"Not every guy with a cock like yours knows how to use it," you smile. "But you sure do. Fucked me silly with this thing."'
+				'<<$npc_firstname[$boy]>> looks more than a little smug after your compliment.'
+				gs'booty_call_pillow_talk2', 'dick_talk_topics'
+			end
+			
+			if $npc_dick_desc[$boy] = 'thick' or $npc_dick_desc[$boy] = 'long' or $npc_dick_desc[$boy] = 'huge' or $npc_dick_desc[$boy] = 'enormous' or $npc_dick_desc[$boy] = 'lengthy' or $npc_dick_desc[$boy] = 'gigantic' or $npc_dick_desc[$boy] = 'monster':
+				act'It''s huge':
+					cla & *nl
+					'"Yeah. I mean, look at this thing," you say, running your fingers along its <<$npc_dick_desc[$boy]>> shaft. "How could I <i>not</i> be impressed by a cock like this?"'
+					gs'booty_call_pillow_talk2', 'dick_talk_topics'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'whats_it_like_fuck_girl':
+	if booty_call['whats_it_like_dick_talk'] = 0:
+		act'What does it feel like to fuck a girl?':
+			cla & *clr
+			gs'booty_call_pillow_talk2', 'dick_grab_image'
+			'"What''s it like having sex as a guy?" you ask curiously. "I mean like, I know what it''s like to get fucked. But what''s it like to do the fucking?"'
+			if npc_humor[$boy] = 1:
+				'"Like having my dick surrounded with hot sticky goo," he says, grinning childishly. "Once I''m in, I just want to keep pumping until I explode."'
+			elseif npc_humor[$boy] = 2:
+				'"Hot and wet," <<$npc_firstname[$boy]>> smiles affectionately. "Like having my dick wrapped in warm silk that squeezes me tight and pulls me in. That''s what your pussy feels like."'
+			else
+				'"It''s... hot," <<$npc_firstname[$boy]>> says.'
+				'"I know it''s hot," you roll your eyes. "Of course fucking is hot."'
+				'"No, I mean temperature hot," he replies, causing you to twerk your head in confusion. "You expect it to be wet inside, and soft, and smooth, but it''s also really physically hot. It''s like a pussy is an oven and my dick gets baked when I put it in."'
+				'"<i>Really?</i>" Your eyes go wide, looking down at your own pussy in awe.'
+			end
+			gs'booty_call_pillow_talk2', 'dick_talk_topics'
+		end
+	end
+end
+
+if $ARGS[0] = 'angry_end':
+	cla & *nl
+	booty_call['angry_after'] = 1
+	'Your initial comment has escalated into a full blown shouting match, leaving both of you visibly fuming.'
+	gs'booty_call_after', 'after_sex2'
+end
+
+if $ARGS[0] = 'morning_sex_talk':
+	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
+	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
+	gs'booty_call_pillow_talk2', 'morning_start_day'
+	gs'booty_call_pillow_talk2', 'morning_sore_pussy'
+	gs'booty_call_pillow_talk2', 'wakeup_sex_late_for_school'
+	gs'booty_call_morning', 'want_breakfast'
+end
+
+if $ARGS[0] = 'morning_start_day':
+	if booty_call['start_the_day'] = 0 and booty_call['wake_fuck'] = 1:
+		act'Nice way to start the day':
+			gs'booty_call_pillow_talk', 'talk_time_add'
+			booty_call['start_the_day'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if npc_sleep_sex_okay[$boy] > 0:
+				'"Well, that was a nice way to wake up," you sigh happily, stretching out on the bed.'
+				if npc_humor[$boy] = 3:
+					'"As requested Ms. <<$pcs_lastname>>, your <<hour>>AM wake up call," <<$npc_firstname[$boy]>> says, doing a mock half-bow.'
+				else
+					'"You really like it when I fuck you while you''re sleeping don''t you?" <<$npc_firstname[$boy]>> grins.'
+				end
+				act'It feels really good':
+					cla & *nl
+					'"It feels really good," you giggle, rubbing your thighs together, maybe still a little dick drunk.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				act'I know you like it':
+					npc_rel[$boy] += 2
+					cla & *nl
+					'"I know you like doing it," you smile fondly. "It makes you happy, so it makes me happy too."'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				act'You''re my favorite alarm cock':
+					cla & *nl
+					'"You''re my favorite alarm cock," you giggle. "It''s the best way to wake up."'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			else
+				'"Well, that was a nice start to the day," you sigh happily, stretching out on the bed.'
+				'"Sorry I didn''t wake you first. You just looked so hot, I had to put it in while you were still asleep."'
+				act'Next time':
+					cla & *nl
+					'"Maybe next time," you smirk wryly.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				act'I didn''t mind':
+					cla & *nl
+					'"I didn''t mind," you smile fondly. "It felt nice."'
+					gs'booty_call_pillow_talk2', 'morning_sleep_fuck_okay'
+				end
+				
+				act'I loved it':
+					cla & *nl
+					'"Don''t be sorry," you say, grinning openly. "I loved it."'
+					gs'booty_call_pillow_talk2', 'morning_sleep_fuck_okay'
+				end
+				
+				act'You should do it more often':
+					npc_sleep_sex_okay[$boy] = 2
+					cla & *nl
+					'"You should do it again," you say with an erotic smirk. "Feels good to wake up with cock inside me."'
+					'"Really?" <<$npc_firstname[$boy]>> looks surprised. "You mean I can do that whenever I want?"'
+					'"Just make sure I wake up before you finish," you grin.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_sore_pussy':
+	if booty_call['morning_sore_pussy'] = 0 and (booty_call['morning_fuck'] = 1 or booty_call['wake_fuck'] = 1):
+		act'Maybe we overdid it':
+			cla
+			act'Gonna walk funny today':
+				gs'booty_call_pillow_talk', 'talk_time_add'
+				booty_call['morning_sore_pussy'] = 1
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6:
+					'"We might have overdone it," you half smile, rubbing your thighs together over your sore pussy. "I still have to go to school today. My classmates are going to know you fucked me silly just by the way I walk," you giggle.'
+				else
+					'"We might have overdone it," you say with a half smile, rubbing your thighs together over your sore pussy. "I''m going to walk funny for the rest of the day because of you," you giggle.'
+				end
+				gs'booty_call_pillow_talk', 'topics'
+			end
+			
+			act'Hard time sitting down':
+				gs'booty_call_pillow_talk', 'talk_time_add'
+				booty_call['morning_sore_pussy'] = 1
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6:
+					'"We might have overdone it," you half smile, rubbing your thighs together over your sore pussy. "I still have to go to school. I''m going to have a hard time sitting through class the rest of the day."'
+				else
+					'"We might have overdone it," you say with a half smile, rubbing your thighs together over your sore pussy. "I''m going to have a hard time sitting down today."'
+				end
+				gs'booty_call_pillow_talk', 'topics'
+			end
+			
+			act'Twice in one day is too much':
+				gs'booty_call_pillow_talk', 'talk_time_add'
+				booty_call['morning_sore_pussy'] = 1
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'"We might have overdone it," you say. "Maybe both night and the morning after wasn''t such a good idea."'
+				*nl
+				'You give him a rueful smile, rubbing your thighs together over your sore pussy'
+				gs'booty_call_pillow_talk', 'topics'
+			end
+			act'Hard to stay awake':
+				gs'booty_call_pillow_talk', 'talk_time_add'
+				booty_call['morning_sore_pussy'] = 1
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6:
+					'"How am I going to get through my classes today?" you say, giving <<$npc_firstname[$boy]>> a loopy smile. "If I fall asleep in school today, it''s your fault."'
+					'"I''ll take credit for that," <<$npc_firstname[$boy]>> grins.'
+				else
+					'"We might have overdone it," you say, giving <<$npc_firstname[$boy]>> a loopy smile. "I already want to go back to bed."'
+					if npc_day_off[$boy] = week:
+						'"I just might after you leave," he replies with a mirror of your expression.'
+					else
+						'"Tell me about it," he sighs. "I still have to go to work after this."'
+					end
+				end
+				gs'booty_call_pillow_talk', 'topics'
+			end
+			
+		end
+	end
+end
+
+
+if $ARGS[0] = 'wakeup_sex_late_for_school':
+	if booty_call['late_for_school'] = 0 and kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and (hour = 7 or hour = 8):
+		act'Late for school':
+			booty_call['late_for_school'] = 1
+			gs'booty_call_pillow_talk', 'talk_time_add'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/after/check_phone1.mp4"></video></center>'
+			'You reach over to the bedside table, checking the time on your phone.'
+			*nl
+			gs 'shortgs', 'calendar_display'
+			if hour < 8:
+				'"Damn," you mutter. "I might be late for school cause of that."'
+				if npc_caretaker[$boy] = 1:
+					'"Sorry," <<$npc_firstname[$boy]>> says, looking genuinely apologetic.'
+				else
+					'"Sorry," <<$npc_firstname[$boy]>> says, the grin on his face making him look like he doesn''t mean it at all.'
+				end
+				if minut <= 30 and $region = 'pav' and hour = 7:
+					act'I might still make it':
+						cla & *nl
+						'"I might still make it yet," you smile. "I just need to hurry."'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+				else
+					act'I only said might':
+						cla & *nl
+						'"I only said might," you smirk. "I''ll probably make it if I hurry."'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+				end
+				
+				act'I need to hurry':
+					cla & *nl
+					'"I gotta get out of here," you say. "I really don''t want to be late'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				act'Worth it':
+					cla & *nl
+					'"If I am, it was still worth it," you smirk.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				if schoolprogul = 2:
+					act'I''m gonna get kicked out of school':
+						cla & *nl
+						'"Shit!" you curse. "If I''m late again I''m gonna get expelled!"'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+				end
+			elseif hour = 8:
+				'"Shit," you curse. "I''m late for school."'
+				if npc_caretaker[$boy] = 1:
+					'"Sorry," <<$npc_firstname[$boy]>> says, looking genuinely apologetic.'
+				else
+					'"Sorry," <<$npc_firstname[$boy]>> says, the grin on his face making him not look like he means it at all.'
+				end
+				
+				act'I need to hurry':
+					cla & *nl
+					'"I gotta get out of here," you say. "I can''t afford to be absent too many times."'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				act'Worth it':
+					cla & *nl
+					'"Oh well," you smirk. "That fuck was worth it."'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+				
+				if schoolprogul = 2:
+					act'I''m gonna get kicked out of school':
+						cla & *nl
+						'"Fuck!" you swear again. "If I don''t make it by the end of first period, I''m gonna get expelled!"'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+				end				
+			end
+			if cum_loc['vagina'] > 0:
+				act'Gonna leak all day':
+					cla & *nl
+					'"I don''t even have time to shower," you say. "Which means I''m going to have to go through all my classes leaking your cum."'
+					'You give <<$npc_firstname[$boy]>> a wry smirk.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			end
+		end
+	end
+end
+
+!!{
+
+
+if $ARGS[0] = 'morning_sore_pussy':
+	if booty_call['morning_sore_pussy'] = 0:
+		act'Nice way to start the day':
+			gs'booty_call_pillow_talk', 'talk_time_add'
+			booty_call['morning_sore_pussy'] = 1
+			cla & *clr
+			
+		end
+	end
+end
+}
+
+
+
+if $ARGS[0] = 'morning_sleep_fuck_okay':
+	'"Is that permission for me to do it again next time you sleep over?"'
+	act'No':
+		cla & *nl
+		'"No," you roll your eyes. "It was fine this time, but you should still wait till I wake up."'
+		gs'booty_call_pillow_talk', 'topics'
+	end
+	
+	act'Yes':
+		npc_sleep_sex_okay[$boy] = 2
+		cla & *nl
+		'"Sure," you smirk wryly. "Why not?"'
+		gs'booty_call_pillow_talk', 'topics'
+	end
+	
+	act'Do whatever you want to me':
+		npc_sleep_sex_okay[$boy] = 2
+		cla & *nl
+		'"You can do whatever you want to me," you say with a smouldering look. '
+		gs'booty_call_pillow_talk', 'topics'
+	end
+end
+
+--- booty_call_pillow_talk2 ---------------------------------

+ 298 - 4
locations/booty_call_sex.qsrc

@@ -15,7 +15,8 @@ if $ARGS[0] = 'sex_start':
 					cla
 					gs 'booty_call_sex', 'reset'
 					gs 'booty_call_condoms', 'condoms'
-					gs 'booty_call_sex', 'position_change'
+				!!	gs 'booty_call_sex', 'position_change'
+					gs 'booty_call_sex', 'position_choose'
 				end
 			end
 		end
@@ -228,7 +229,7 @@ end
 
 if $ARGS[0] = 'sex_end':
 	if booty_call['force_harden'] = 2:
-		gs 'booty_call_after', 'finish'
+		act'Continue':gs 'booty_call_after', 'finish'
 	else
 		if booty_call['mad'] = 1:
 			gs'booty_call_after', 'bad_sex_end'
@@ -278,7 +279,7 @@ if $ARGS[0] = 'dirty_talk2':
 end
 
 if $ARGS[0] = 'keep_fucking':
-	if booty_call['cock_remove'] = 0 and $booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl':
+	if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl'):
 		act'Keep fucking':
 			cla & *nl
 			$booty_call['reset_pos'] = $booty_call['position']
@@ -356,8 +357,8 @@ if $ARGS[0] = 'take_a_break':
 				end
 			end
 		elseif $booty_call['last_cum'] = 'condom':
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			if booty_call['cock_remove'] = 1:
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 				'You flop down onto the bed, breathing hard as your body slowly unwinds, relaxing as you let yourself sink into the bed. <<$npc_firstname[$boy]>> removes the condom from his cock, tossing it aside before laying down beside you.'
 				*nl
 				if booty_call['speed'] <= 2:
@@ -380,6 +381,7 @@ if $ARGS[0] = 'take_a_break':
 					'The two of you just stay like that for a while, basking in the afterglow of your rough fucking.'
 				end
 			end
+			gs'booty_call_sex', 'break_time'
 		else
 			if $booty_call['last_cum'] = 'face_mouth':
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial35.jpg"></center>'
@@ -935,6 +937,7 @@ if $ARGS[0] = 'reset':
 	booty_call['must_fuck'] = 0
 	booty_call['smoke_break'] = 0
 	booty_call['first_break'] = 0
+	if booty_call['consecutive_orgasm'] = 0: booty_call['magik'] = pcs_magik
 end
 
 if $ARGS[0] = 'pain':
@@ -1148,6 +1151,41 @@ if $ARGS[0] = 'sleep_wake_options':
 		gs'booty_call_sex','sleep_cum'
 	end
 	
+	
+	act'Orgasm':
+		$orgasm_or = 'yes'
+		gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/vag/miss/orgasm1.mp4"></video></center>'
+		'In your relaxed state of sleep, you didn''t realize how close you were to orgasm. The instant you''re aware of it, your arousal finally breaks and an orgasm rocks through your body. You whimper sleepily as you squirm beneath <<$npc_firstname[$boy]>> and your climax washes over you.'
+		act'Back to sleep':
+			cla & *clr
+			$booty_call['sleep_video2']
+			'<i>That was... nice...</i> you think before tiredness overtakes you and you drift off back to dreamland.'
+			*nl
+			'...'
+			gs'booty_call_sex','sleep_cum'
+		end
+		
+		act'Keep fucking':
+			cla & *clr
+			booty_call['sleep_fuck'] = 2
+			$booty_call['position'] = 'miss'
+			'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
+			'<i>Ahh~! Aahn~!</i>'
+			*nl
+			'You moan with hoarse arousal as your orgasm fades and control comes back to your body, spreading your legs wider so <<$npc_firstname[$boy]>> can keep fucking you.'
+			if npc_sex_speed <= 2:
+				booty_call['speed'] = 1
+				act'Fuck <<$npc_firstname[$boy]>>':gs'booty_call_miss','miss1.2'
+			else
+				booty_call['speed'] = 3
+				act'Fuck <<$npc_firstname[$boy]>>':gs'booty_call_miss','miss3.1'
+			end
+		end
+	end
+	
+	
 	act'Don''t wake me up':
 		cla & *nl
 		'"Do whatever you want to me, just don''t wake me up," you murmur and promptly close your eyes, letting yourself drift back into dreamland.'
@@ -1278,4 +1316,260 @@ if $ARGS[0] = 'sleep_cum':
 	act'. . .':gt'booty_call_after', 'sleep_function'
 end
 
+if $ARGS[0] = 'wakeup_sex':
+	booty_call['sleep_fuck'] = 1
+	booty_call['wake_fuck'] = 1
+	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg'
+	if npc_sex_speed <= 2:
+		$booty_call['sleep_video1'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow<<rand(1,2)>>.mp4"></video></center>'
+		$booty_call['sleep_video2'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow2.mp4"></video></center>'
+	else
+		$booty_call['sleep_video1'] = '<center><video autoplay loop src="images/shared/sex/sleep/fast<<rand(1,2)>>.mp4"></video></center>'
+		$booty_call['sleep_video2'] = '<center><video autoplay loop src="images/shared/sex/sleep/fast2.mp4"></video></center>'
+	end
+	if daystage = 2:
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+		'<i>Mmmmmmm...</i>'
+		*nl
+		'Your consciousness stirs. A bright light shines on your eyelids. Must be the sun coming through the window. But also, what''s that between your...'
+	else
+		$booty_call['sleep_video1']
+		'<i>Mmmmmmm...</i>'
+		*nl
+		'Your consciousness stirs. It doesn''t seem to be light out yet, but hazily somewhere your body feels like morning has already arrived. Speaking of your body, what''s that...'
+	end
+	act'Open your eyes':gt'booty_call_sex', 'wakeup_sex2'
+end
+
+if $ARGS[0] = 'wakeup_sex2':
+	cla & *clr
+	if daystage = 2:
+		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex0.mp4"></video></center>'
+	else
+		'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
+	end
+	'Your eyes flutter open and find <<$npc_firstname[$boy]>> balls deep inside you, happily fucking you first thing in the morning.'
+	gs'booty_call_sex', 'wakeup_sex_options'
+end
+
+if $ARGS[0] = 'wakeup_sex_options':
+	*nl
+	if npc_sleep_sex_okay[$boy] > 0:
+		!! npc_sleep_sex_okay[$boy] = 2 means you''ve asked him to wake you up for sleep sex
+		if npc_humor[$boy] = 1 and $npc_apt_spare[$boy] = 'gaming' and rand(1,3) = 1:
+			booty_call['skyrim_joke'] = 1
+			'"You''re finally awake," <<$npc_firstname[$boy]>> says, putting on a stern face and a gruff voice. "You were trying to cross the border, right?"'
+		else
+			'"Good morning," <<$npc_firstname[$boy]>> smiles. "Have any good dreams?"'
+		end
+	end
+	
+	act'Moan':
+		cla & *clr
+		booty_call['wakeup_fuck'] = 1
+		$booty_call['position'] = 'miss'
+		if daystage = 2:
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
+		else
+			'<center><video autoplay loop src="images/shared/sex/sleep/wake2.mp4"></video></center>'
+		end
+		'<i>Ahh~! Aahn~!</i>'
+		*nl
+		'You moan with hoarse arousal, spreading your legs wider so <<$npc_firstname[$boy]>> can keep fucking you.'
+		gs'booty_call_sex', 'wakeup_sex_continue'
+	end
+	
+	if npc_sleep_sex_okay[$boy] < 1:
+		act'What the fuck!':gt'booty_call_sex', 'morning_wake_wtf'
+	elseif npc_sleep_sex_okay[$boy] = 1:
+		act'"You were supposed to wake me" (not mad)':
+			cla & *clr
+			gs'booty_call_sex', 'morning_wake_fuck_code'
+			'"Weren''t <i>mm-!</i> you supposed to <i>aah~!</i> wake me?" you moan with hoarse arousal, spreading your legs wider so <<$npc_firstname[$boy]>> can keep fucking you.'
+			'"I just did," he grins.'
+			gs'booty_call_sex', 'wakeup_sex_continue'
+		end
+	end
+	
+	if booty_call['skyrim_joke'] = 1:
+		act'Giggle':
+			cla & *clr
+			gs'booty_call_sex', 'morning_wake_fuck_code'
+			'<<$npc_firstname[$boy]>>''s internet video game joke is stupid to be sure, but despite that you can''t help giggling at it, causing him to break into a shit eating grin as he keeps fucking you.'
+			gs'booty_call_sex', 'wakeup_sex_continue'
+		end
+				
+		act'What are you talking about?':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
+			'"Huh?" Your nose scrunches up in confusion. "What on earth are you talking about?"'
+			'"It''s a meme," he says, breaking into a silly smile.'
+			act'Uhh, okay?':
+				cla & *nl
+				'"Uhmm... okay...?" you reply with confusion as he keeps fucking you and you think to yourself, <i>Boys are weird...</i>'
+			end
+			gs'booty_call_sex', 'morning_skyrim_joke'
+		end
+		
+		act'Shut up and fuck me':
+			cla & *clr
+			gs'booty_call_sex', 'morning_wake_fuck_code'
+			'"Keep your dumb jokes to yourself and fuck me," you moan hoarsely, spreading your legs as an invitation to pick up the pace.'
+			gs'booty_call_sex', 'wakeup_sex_continue'
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_wake_fuck_code':
+	booty_call['wakeup_fuck'] = 1
+	$booty_call['position'] = 'miss'
+	if daystage = 2:
+		'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
+	else
+		'<center><video autoplay loop src="images/shared/sex/sleep/wake2.mp4"></video></center>'
+	end
+	if npc_sex_speed <= 2:
+		booty_call['speed'] = 1
+	else
+		booty_call['speed'] = 3
+	end
+end
+
+if $ARGS[0] = 'morning_skyrim_joke':
+	act'What a terrible joke':
+		cla
+		act'Are you a child?':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
+			'"Ugh," you groan loudly. "Internet memes? Seriously? What are you? Twelve?"'
+			'<<$npc_firstname[$boy]>> seems to feel no shame at all, letting his shit eating grin widen as he keeps fucking you.'
+			gs'booty_call_sex', 'wakeup_sex_continue'
+		end
+		
+		act'That killed the mood':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
+			'"<i>Wow</i>," you say, cringing something awful. "You sure know how to instantly kill the mood. I think we''re done here."'
+			'"Oh come on! It wasn''t that bad!" <<$npc_firstname[$boy]>> tries to protest as you push him away. "Come on, don''t be like that."'
+			act'Yes it was':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"Uhh, <i>yes</i>. It was," you say, giving him a look of contempt. "I practically felt the moisture in my vagina evaporate. There is no way I''m going to let you fuck me right after saying that with your cock <i>inside</i> me."'
+				*nl
+				'You successfully push <<$npc_firstname[$boy]>> off of you, shuddering with utter disgust the moment he''s out from between your legs.'
+				gs'booty_call_morning', 'wakeup1'
+			end
+			
+			act'Ugh, fine':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/2.jpg"></center>'
+				'"Ugh," you groan loudly. "I can''t believe I''m going to let you do this after saying that, but <i>fine</i>."'
+				*nl
+				'You spread your legs wider, allowing him to fuck you more deeply.'
+				gs'booty_call_sex', 'wakeup_sex_continue'
+			end				
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_wake_wtf':
+	cla & *clr
+	$npc_apt_bedroom[$boy]
+	'"<i>WHAT THE FUCK!</i>" you scream, kicking <<$npc_firstname[$boy]>> out of you and scrambling across the bed from him. "What the fuck do you think you''re doing?!"'
+	if (npc_caretaker[$boy] = 1 or rand(1,3) = 1) and npc_abusive[$boy] ! 1:
+		'<<$npc_firstname[$boy]>> looks deeply embarrassed.'
+		'"I- I''m sorry," he stammers. "I woke up. You were right there and... I thought it would be sexy if I... you know...'
+		act'Forgive him':
+			cla & *nl
+			'Your hard stare softens and you feel the anger slowly drain from your body.'
+			'"It''s fine, I guess," you say. "Just..."'
+			gs'booty_call_sex', 'morning_wtf_forgive'
+		end
+	else
+		'"What?" he asks, unabashed. "You were just laying there all naked and sexy, so I just thought I''d give you some wakeup sex. It''s not like we haven''t fucked before."'
+		act'Forgive him':
+			cla & *nl
+			'Your hard stare softens and you feel the anger slowly drain from your body.'
+			'"I guess you have a point," you admit reluctantly. "Just..."'
+			gs'booty_call_sex', 'morning_wtf_forgive'
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_wtf_forgive':
+	act'Don''t do it again':
+		npc_sleep_sex_okay[$boy] = -1
+		cla & *nl
+		'"... don''t do it again, okay?" you warn.'
+		'"Okay..." he says. After a moment, still blushing, he says, "Since you''re awake... do you think we could...?"'
+		gs'booty_call_sex', 'morning_wtf_forgive2'
+	end
+	
+	act'Wake me up first':
+		npc_sleep_sex_okay[$boy] = 1
+		cla & *nl
+		'"... wake me next time, okay?" you say with a soft smile.'
+		'"I can do that," he grins.'
+		act'For permission':
+			cla & *nl
+			'"For <i>permission</i>," you roll your eyes. "I don''t like getting raped in my sleep. But if you wake me up first and have my consent, it''s not rape."'
+			'"Okay," he nods. After a moment, still blushing, he says, "Since you''re awake... do you think we could...?"'
+			gs'booty_call_sex', 'morning_wtf_forgive2'
+		end
+		
+		act'Maybe I''ll be in the mood':
+			cla & *nl
+			'"Maybe I''ll be in the mood too," you smirk teasingly. "It''s not fair if you get all the fun."'
+			'"Okay," he nods. After a moment, still blushing, he says, "Since you''re awake... do you think we could...?"'
+			gs'booty_call_sex', 'morning_wtf_forgive2'
+		end		
+	end
+end
+
+if $ARGS[0] = 'morning_wtf_forgive2':
+	act'No way':
+		booty_call['morning_fuck'] = -1
+		cla & *clr
+		npc_apt_bedroom[$boy]
+		'Your anger returns swiftly.'
+		'"No! Did you really think I was going to say yes after you were just <i>molesting</i> me in my sleep?"'
+		'<<$npc_firstname[$boy]>> sighs disappointedly and lays back in bed.'
+		gs'booty_call_morning', 'wakeup1'
+	end
+	
+	act'Oh alright':
+		booty_call['morning_fuck'] = 2
+		cla & *clr
+		npc_apt_bedroom[$boy]
+		'You give him a look and after a brief pause, you sigh dramatically, rolling your eyes.'
+		*nl
+		'"Oh alright. Come here," you say, beckoning him towards you so you can do something about his raging hard-on.'
+		gs'booty_call_sex', 'reset'
+		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
+		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
+		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+	end
+	
+	act'Sure':
+		booty_call['morning_fuck'] = 2
+		cla & *clr
+		npc_apt_bedroom[$boy]
+		'"Sure," you grin, beckoning him closer so you can put his raging erection to use.'
+		gs'booty_call_sex', 'reset'
+		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
+		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
+		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+	end
+end
+
+if $ARGS[0] = 'wakeup_sex_continue':
+	if npc_sex_speed <= 2:
+		booty_call['speed'] = 1
+		act'Fuck <<$npc_firstname[$boy]>>':gs'booty_call_miss','miss1.2'
+	else
+		booty_call['speed'] = 3
+		act'Fuck <<$npc_firstname[$boy]>>':gs'booty_call_miss','miss3.1'
+	end
+end
+
 --- booty_call_sex ---------------------------------

+ 370 - 20
locations/booty_call_shower.qsrc

@@ -161,7 +161,7 @@ if $ARGS[0] = 'before_together2':
 			act'I want you inside me':
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
-				'"I want you inside me," you whisper hoarsly in <<$npc_firstname[$boy]>>''s ear. He quickly obliges your desire and you feel him lift your leg and push his <<$npc_dick_desc[$boy]>> cock into your waiting snatch.'
+				'"I want you inside me," you whisper hoarsely in <<$npc_firstname[$boy]>>''s ear. He quickly obliges your desire and you feel him lift your leg and push his <<$npc_dick_desc[$boy]>> cock into your waiting snatch.'
 				act'Fuck':gt'booty_call_shower', 'before_shower_fuck1'
 			end
 			
@@ -201,7 +201,7 @@ if $ARGS[0] = 'before_jerkoff1':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/shower/fun3.mp4"></video></center>'
 	'You turn around, grabbing <<$npc_firstname[$boy]>>''s cock and start jerking him off. He rubs your clit in return and you both stare into each other''s eyes, both of you entranced by the other''s reactions.'
-	act'Come together':gt'booty_call_shower', 'before_jerkoff2'
+	act'Come together':gt'booty_call_shower', 'before_jerkoff_cum1'
 	act'Blow him':gt'booty_call_shower', 'before_bj1'
 	if stat['think_virgin'] = 0:
 		act'Fuck him':gt'booty_call_shower', 'before_shower_fuck1'
@@ -499,7 +499,7 @@ if $ARGS[0] = 'after_borrow_shower':
 	NoShampoo = 1
 	$npc_apt_bedroom[$boy]
 	'"I''m gonna borrow your shower," you say, sliding out of the bed.'
-	if rand(1,10) < npc_sexdrive[$boy]:
+	if rand(1,10) < npc_sexdrive[$boy] and booty_call['angry_after'] = 0:
 		'"Why don''t I join you?" <<$npc_firstname[$boy]>> says, a glimmer in his eyes that lets you know he wants to do more than just "join" you.'
 		act'I''d rather not':
 			cla & *nl
@@ -537,7 +537,7 @@ if $ARGS[0] = 'after_borrow_shower':
 			act'Shower':gt'booty_call_shower', 'after_alone'
 		end
 	else
-		if npc_caretaker[$boy] = 1:
+		if npc_caretaker[$boy] = 1 and booty_call['angry_after'] = 0:
 			if npc_apt_type <= 2:
 				'"Okay. Feel free to use my towel when you''re done."'
 			else
@@ -836,7 +836,7 @@ if $ARGS[0] = 'after_shower_cum_ask':
 	end
 	act'Jerk him off':gt'booty_call_shower', 'after_shower_fuck_jerkoff'
 		
-	if booty_call['condom'] > 0:
+	if booty_call['condom'] > 0 or stat['dangerous_day'] > 0:
 		act'Not inside!':booty_call['not_inside'] = 1 & gt'booty_call_shower', 'after_shower_fuck_jerkoff'
 	end
 end
@@ -1167,6 +1167,25 @@ end
 
 !! --------------------- MORNING SHOWERS ------------------------------
 
+if $ARGS[0] = 'morning_look1':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/romance/nude_walk1.mp4"></video></center>'
+	'Curious to know where he is, you climb out of bed, wandering his apartment looking for him. A few doors down the hall, you realize you hear water running in the bathroom. He must be taking a shower.'
+	act'Head back to the bedroom':gt'booty_call_morning', 'wakeup2'
+	act'Wait your turn':
+		minut += rand(1,5)
+		gs 'stat'
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'You wait a few minutes waiting outside the door for <<$npc_firstname[$boy]>> before you hear the water shuts off and he opens the door, his hair wet and a towel wrapped around his waist.'
+		'"Hey," you say. "Can I use it now?"'
+		'"Sure," <<$npc_firstname[$boy]>> replies, smirking as he shamelessly ogles your nude body.'
+		'"Thanks," you smile, casually walking past him and closing the door behind you.'
+		act'Take a shower':gt'booty_call_morning', 'shower2'
+	end
+	act'Join <<$npc_firstname[$boy]>> in the shower':gt'booty_call_morning', 'shower'
+end
+
 if $ARGS[0] = 'morning_shower_join1':
 	booty_call['morning_shower'] = 1
 	'<center><video autoplay loop src="images/shared/sex/shower/join1.mp4"></video></center>'
@@ -1179,7 +1198,7 @@ end
 if $ARGS[0] = 'morning_shower_join2':
 	gs 'arousal', 'foreplay', 5
 	cla & *clr
-	'<center><video autoplay loop src="images/shared/sex/shower/join1.mp4"></video></center>'
+	'<center><video autoplay loop src="images/shared/sex/shower/grope1.mp4"></video></center>'
 	'You join <<$npc_firstname[$boy]>> under the water, relaxing in the heat with him.'
 	*nl
 	'It isn''t long before his hands begin to roam your body, pawing your breasts and slipping between your thighs. Something hard pokes you in the back.'
@@ -1222,26 +1241,357 @@ if $ARGS[0] = 'morning_together_sex1':
 		act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
 		act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
 	end
-	act'Jerk him off':gt'booty_call_shower', 'before_jerkoff1'
+	act'Jerk him off':gt'booty_call_shower', 'morning_jerkoff1'
 	
-	act'Blow him':gt'booty_call_shower', 'before_bj1'
+	act'Blow him':gt'booty_call_shower', 'morning_bj1'
 
 	if stat['think_virgin'] = 0 or booty_call['fuck'] > 0:
-		act'Let him fuck you':
+		act'Let him fuck you':gt'booty_call_shower', 'morning_shower_fuck1'
+	end
+end
+
+if $ARGS[0] = 'morning_jerkoff1':
+	gs'arousal', 'clit_finger',-10
+	gs'arousal', 'foreplay',-10
+	gs'arousal', 'hj',rand(2,5)
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/fun2.mp4"></video></center>'
+	'One hand reaches back to grab hold of <<$npc_firstname[$boy]>>''s cock while the other snakes between your legs. Your moans echo off the walls as <<$npc_firstname[$boy]>> keeps groping your breasts, massaging them with firm squeezes you feel straight through your nipples.'
+	act'Come together':gt'booty_call_shower', 'morning_jerkoff_cum1'
+	act'Blow him':gt'booty_call_shower', 'morning_bj1'
+	if stat['think_virgin'] = 0:
+		act'Fuck him':gt'booty_call_shower', 'morning_shower_fuck1'
+	end
+end
+
+if $ARGS[0] = 'morning_jerkoff_cum1':
+	booty_call['morning_shower_cum'] = 1
+	gs'cum_call', 'stomach', $boy, 1
+	booty_call['cum_count'] += 1
+	booty_call['orgasm_count'] += 1
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/cum_jerkoff1.mp4"></video></center>'
+	if booty_call['not_inside'] = 1:
+		'"Not inside me!" you yelp.'
+		*nl
+		'You practically jump off of his cock and begin furiously working it with your hand. Not even a second later, cum explodes from the tip, spattering across your stomach.'
+	else
+		$orgasm_or = 'yes'
+		gs'arousal', 'hj',-1
+		'Tension builds up inside you to bursting. You feel <<$npc_firstname[$boy]>>''s cock throb in your hand and you know he''s about to burst too.'
+		*nl
+		'You turn to face him, staring into <<$npc_firstname[$boy]>>''s eyes as you work him even harder trying to finish him with one final sprint. <<$npc_firstname[$boy]>> grunts and cum explodes from his tip. The sensation of his cum spattering across your stomach is the last thing you need and you come as well, moaning loudly even as you continue to finish him off.'
+	end
+	act'Continue':
+		noShampoo = 1
+		dynamic $showerdin
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/after2.mp4"></video></center>'
+		'You and <<$npc_firstname[$boy]>> stand there under the hot water together, breathing hard.'
+		gs'booty_call_shower', 'morning_sex_end'
+	end
+end
+
+if $ARGS[0] = 'morning_bj1':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/bj1.mp4"></video></center>'
+	'You kneel down, taking <<$npc_firstname[$boy]>>''s wet cock in your mouth and start noisily slurping it down your throat. <<$npc_firstname[$boy]>> moans in return, his hand grabbing the back of your hair and holding you there as you suck his dick.'
+	act'Make him come':
+		booty_call['morning_shower_cum'] = 1
+		gs 'cum_call', 'mouth_swallow', $boy, 1
+		booty_call['cum_count'] += 1
+		gs 'stat'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/deepthroat1.mp4"></video></center>'
+		'"Hey-" <<$npc_firstname[$boy]>> grunts as you kiss the base of his cock with your lips while still keeping it wrapped in your mouth. "That-! I''m gonna-!"'
+		'He doesn''t even manage to finish his warning before he groans loudly and his cock pulses on your tongue. <<$npc_firstname[$boy]>> pulls you further down with his hand and hot salty liquid pours into the back of your throat, your only choice to swallow or choke.'
+		*nl
+		'Eventually his dick stops throbbing and you gently release him from your mouth, looking up at him with seductive eyes.'
+		gs'booty_call_shower', 'morning_sex_end'
+	end
+	
+	act'Take it to the bedroom':
+		cla & *nl
+		'"Mmm mmrm mmm mmph mm mm mmph?"'
+		'"What?" <<$npc_firstname[$boy]>> moans breathlessly. You let his cock slip from your mouth with a <i>pop</i>.'
+		'"You wanna take this to the bed?"'
+		'"Yeah," he says nodding. <<$npc_firstname[$boy]>> shuts off the water and practically pushes you out of the shower back onto the bed.'
+		gs 'booty_call_start', 'bed_start'
+	end
+end
+
+if $ARGS[0] = 'morning_shower_fuck1':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy_enter1.mp4"></video></center>'
+	'<<$npc_firstname[$boy]>> bends you over, spreading your feet apart and lining his cock up with your pussy. You waggle your ass in anticipating, moaning softly as his member splits your lips and pushes inside you.'
+	act'Fuck':gt 'booty_call_shower', 'morning_shower_fuck2'
+end
+
+if $ARGS[0] = 'morning_shower_fuck2':
+	booty_call['shower_sex'] += 1
+	booty_call['orgasm'] = orgasm
+	gs'arousal', 'vaginal',rand(10,15),'no_orgasm_msg'
+	gs'stat'
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy<<rand(1,3)>>.mp4"></video></center>'
+	'<<$npc_firstname[$boy]>> slams his cock into you from behind, sending shock waves of pleasure rippling through your body. Your erotic moans echo off the tile in time with the wet slap of skin on skin.'
+!	if booty_call['condom'] > 0:
+		if rand(1,10) > 1:
+			*nl
+			'After what seems like an eternity of pleasure, <<$npc_firstname[$boy]>> grunts.'
+			gs'booty_call_shower', 'morning_shower_cum_ask'
+		else
+			*nl
+			'Suddenly, <<$npc_firstname[$boy]>> stiffens and you feel something hot pour into your pussy.'
+			gs 'cum_call', '', $boy, 1
+			booty_call['shower_creampie'] += 1
+			booty_call['creampie_count'] += 1
+			gs'booty_call_shower', 'morning_shower_creampie_surprise'
+		end
+!	else
+	
+!	end
+end
+
+if $ARGS[0] = 'morning_shower_cum_ask':
+	'"<<$pcs_nickname>>-! I''m almost there!"'
+	if booty_call['orgasm'] < orgasm:
+		'"Me too-!" you gasp.'
+		act'Come together':gt'booty_call_shower', 'morning_shower_creampie'
+	else
+		'"Mmmm-!" you hum back.'
+		act'Let him come inside you':gt'booty_call_shower', 'morning_shower_creampie'
+	end
+	act'Jerk him off':gt'booty_call_shower', 'morning_shower_fuck_jerkoff'
+		
+	if booty_call['condom'] > 0 or stat['dangerous_day'] > 0:
+		act'Not inside!':booty_call['not_inside'] = 1 & gt'booty_call_shower', 'morning_shower_fuck_jerkoff'
+	end
+end
+
+if $ARGS[0] = 'morning_shower_creampie_surprise':
+	booty_call['morning_shower_cum'] = 1
+	if booty_call['condom'] > 0 and npc_free_creampies[$boy] = 0:
+		act'Asshole!':
 			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/shower/leg_up_enter1.mp4"></video></center>'
-			gs'arousal', 'massage',5,'no_orgasm_msg'
-			gs'stat'
-			'You turn to face <<$npc_firstname[$boy]>>.'
-			if (booty_call['condom'] > 0 and booty_call['no_condom'] ! 1 and npc_free_creampies[$boy] < 1) or booty_call['danger_day'] = 1:
-				'"You won''t come inside me, will you?" you ask.'
-				'"Don''t worry, I won''t."'
-				*nl
-				'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
+			'<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>'
+			'"Asshole!" you shout, pushing <<$npc_firstname[$boy]>> away from you. But it''s too late and you feel a hot liquid that isn''t water running down your leg.'
+			'"Did you seriously just come inside me?" you parrot scornfully. "Fucking moron!"'
+			act'Storm out':
+				cla & *clr
+				$npc_apt_bathroom[$boy]
+				minut += 2
+				gs 'stat'
+				'"Imbecile!" you shout again, storming out of the shower, not caring that you''re dripping wet. You make your way over to his bedroom and pick up your clothes, throwing them on.'
+				'"Wait!" <<$npc_firstname[$boy]>> protests, clumsily wrapping a towel around his waist and following you.'
+				'"I''m not waiting for shit!" you sneer. The moment the last item of clothing is over your wet skin, you stomp out the door, slamming it behind you.'
+				act'Leave':gt 'booty_call_after', 'exit'
+			end
+			
+			act'Forgive him (my fault)':
+				cla & *clr
+				minut += 2
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'After a few more moments of anger, you deflate. You pull <<$npc_firstname[$boy]>> close, pressing your naked skin against his.'
+				'"I''m sorry," you say. "I was just... acting out. It''s my fault. I should''ve known better. I can''t blame you."'
+				'You stand there holding each other in silence for several more minutes before <<$npc_firstname[$boy]>> breaks it.'
+				'"I guess you need another shower, then?" he says, a guilty smile on his face.'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+			
+			act'Forgive him (both our faults)':
+				cla & *clr
+				minut += 2
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'After a few more moments of anger, you deflate. You pull <<$npc_firstname[$boy]>> close, pressing your naked skin against his.'
+				'"I''m sorry," you say. "I was just... acting out. You should''ve held it since you promised me, but... it takes two to fuck," you smile ruefully. "So it''s my fault too."'
+				'You stand there holding each other in silence for several more minutes before <<$npc_firstname[$boy]>> breaks it.'
+				'"I guess you need another shower, then?" he says, a guilty smile on his face.'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+		end
+	end
+	
+	act'Take it in stride':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>'
+		'You gasp in surprise, but hold on to <<$npc_firstname[$boy]>>, allowing him to empty his balls into your pussy.'
+		*nl
+			
+		act'That was nice':
+			cla & *nl
+			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+			'"That was nice," you smile as he pulls away, feeling something hot dribble down your leg.'
+			'"I guess... you might need another shower," <<$npc_firstname[$boy]>> says, looking a little embarrassed.'
+			gs'booty_call_shower', 'morning_sex_end'
+		end
+		
+		if booty_call['condom'] > 0:
+			act'Tease him':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'"What happened to ''Don''t worry, I won''t''?" you ask, a smirk twitching at your lips as he pulls away, feeling something hot dribble down your leg.'
+				'"Sorry," he blushes. "I, uhh... I overestimated myself... I guess you need another shower, huh?"'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+		end
+	end
+	
+	act'Creampie induced orgasm':
+		if booty_call['orgasm'] = orgasm:
+			$orgasm_or = 'yes'
+			gs'arousal', 'vaginal',1,'no_orgasm_msg'
+		end
+		booty_call['creampie_orgasm'] += 1
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>'
+		'You gasp in surprise, feeling <<$npc_firstname[$boy]>> pulse inside you. You were already close yourself and his orgasm sends you over the edge. He holds you tight and you clench on to him with all your might, both of you riding out your orgasms completely intertwined.'
+		*nl
+		'Finally, your orgasms subside and you untangle yourselves. As his cock leaves your pussy, something hot dribbles down your leg.'
+		act'That was nice':
+			cla & *nl
+			'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+			'"That was nice," you pant, unable to say anything else.'
+			'"I guess... you might need another shower," <<$npc_firstname[$boy]>> says, looking a little embarrassed.'
+			gs'booty_call_shower', 'morning_sex_end'
+		end
+		
+		if booty_call['condom'] > 0:
+			act'Tease him':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'"What happened to ''Don''t worry, I won''t''?" you ask, still panting in the throes of post-orgasm.'
+				'"Sorry," he blushes. "I, uhh... I overestimated myself... I guess you need another shower, huh?"'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_shower_creampie':
+	booty_call['morning_shower_cum'] = 1
+	cla & *clr
+	gs 'cum_call', '', $boy, 1
+	booty_call['shower_creampie'] = 1
+	booty_call['creampie_count'] += 1
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy_orgasm1.mp4"></video></center>'
+	'<<$npc_firstname[$boy]>> slams his cock inside you right as he comes, pouring heat into your waiting snatch.'
+	*nl
+	if booty_call['orgasm'] < orgasm:
+		'Your climax comes in time with his, legs nearly buckling from the orgasmic bliss that washes over you. Only his arms wrapped around you prevent you from crumpling to the shower floor.'
+	else
+		'Even though you don''t come with him, the sensation is almost too much to bear, nearly buckling your legs beneath you. Only his arms wrapped around you prevent you from crumpling to the shower floor.'
+	end
+	
+	act'Continue':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/creampie1.mp4"></video></center>'
+		*nl
+		'Eventually, his orgasm fades and his cock slips from inside you and a hot dribble of liquid runs down your leg.'
+		*nl
+		if booty_call['condom'] > 0 or npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2 or npc_know_not_bc[$boy] = 1:
+			'"I thought..." <<$npc_firstname[$boy]>> pants. "You didn''t want me... to come inside you..."'
+			act'Changed my mind':
+				if npc_boyfriend_creampie_rule[$boy] > 0: npc_boyfriend_creampie_rule[$boy] = 0
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'"I changed my mind," you smile blissfully and leave it at that.'
+				'<<$npc_firstname[$boy]>> smiles back at you.'
+				'"You look like you could use another shower."'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+			
+			act'Felt too good':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+				'"I couldn''t help myself," you smile blissfully. "It felt too good to stop."'
+				'<<$npc_firstname[$boy]>> smiles back at you.'
+				'"You look like you could use another shower."'
+				gs'booty_call_shower', 'morning_sex_end'
+			end
+			
+			if birth_control['think_safe'] < 1 and npc_know_not_bc[$boy] = 1:
+				act'Worth the risk':
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
+					'"It was worth it," you smile blissfully.'
+					'<<$npc_firstname[$boy]>> smiles back at you.'
+					'"You look like you could use another shower."'
+					gs'booty_call_shower', 'morning_sex_end'
+				end
+			end
+		elseif npc_know_bc[$boy] = 1:
+			'"Good thing you''re on birth control," <<$npc_firstname[$boy]>> pants.'
+			if birth_control['think_safe'] = 1:
+				'"Yeah..." you murmur back, breathing just as hard as <<$npc_firstname[$boy]>> in your post-orgasmic bliss.'
 			else
-				'You look at <<$npc_firstname[$boy]>> and your expression tells him everything he needs to know. Without another word, he lifts your leg and pushes his cock inside you.'
+				'"Yeah..." you murmur back, your lie coloring the tone of your post-orgasmic emotions.'
 			end
-			act'Fuck':gt'booty_call_shower', 'after_shower_sex1'
+			gs'booty_call_shower', 'morning_sex_end'
+		else
+			'"Wow..." is all you can say, breathing heavily in post-orgasmic bliss.'
+			gs'booty_call_shower', 'morning_sex_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'morning_shower_fuck_jerkoff':
+	booty_call['morning_shower_cum'] = 1
+	gs 'cum_call', 'stomach', $boy, 1
+	gs'stat'
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/cum_jerkoff1.mp4"></video></center>'
+	if booty_call['not_inside'] = 1:
+		*nl
+		'"Not inside!" you yelp.'
+	end
+	if booty_call['orgasm'] < orgasm:
+		'You barely manage to slip <<$npc_firstname[$boy]>> from your pussy and grab his cock with your hand before he explodes, managing to get you off at the same time. You both come together and euphoria washes over you as his cum -somehow still warm to your skin despite the heat of the shower- spatters across your stomach.'
+	else
+		'You barely manage to slip <<$npc_firstname[$boy]>> from your pussy and grab his cock with your hand before he explodes. A sense of euphoria washes over you as his cum -somehow still warm to your skin despite the heat of the shower- spatters across your stomach.'
+	end
+	act'Recover':gt'booty_call_shower', 'morning_shower_fuck_jerkoff_end'
+end
+
+if $ARGS[0] = 'morning_shower_fuck_jerkoff_end':
+	'<center><video autoplay loop src="images/shared/sex/shower/after2.mp4"></video></center>'
+	if booty_call['condom'] > 0:
+		if booty_call['orgasm'] < orgasm:
+			'"Woah..." you breathe, panting in post-orgasmic bliss. "That was close."'
+		else
+			'"Woah..." you breathe, panting. "That was close."'
+		end
+		'"I think you might need another shower," <<$npc_firstname[$boy]>> breathes, smiling at his handiwork covering your belly.'
+	else
+		if booty_call['orgasm'] < orgasm:
+			'"Woah..." you pant in post-orgasmic bliss. "That was..."'
+		else
+			'"Woah..." you pant. "That was..."'
+		end
+		'"Yeah..." he breathes back, a smile spreading across his face. "I think you might need another shower."'
+	end
+	gs'booty_call_shower', 'morning_sex_end'
+end
+
+if $ARGS[0] = 'morning_sex_end':
+	act'Finish up':
+		cla
+		act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
+		act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+	end
+	if booty_call['morning_shower_cum'] = 1:
+		act'Round 2 in the bed?':
+			cla & *nl
+			'"Want to keep this going?" you ask, grinning. "But use a bed this time?"'
+			'<<$npc_firstname[$boy]>> nods and the two of you hustle out of the shower into his bedroom, not even bothering to towel off.'
+			gs 'booty_call_start', 'bed_start'
+		end
+	else
+		act'Bedroom?':
+			cla & *nl
+			'"Bedroom?" you ask hoarsely.'
+			'"Bedroom." <<$npc_firstname[$boy]>> shuts off the water and practically pushes you out of the shower back onto the bed.'
+			gs 'booty_call_start', 'bed_start'
 		end
 	end
 end

+ 3 - 3
locations/booty_call_sms.qsrc

@@ -74,7 +74,7 @@ if $ARGS[0] = 'start':
 
 		$VF['2b'] = 'ill come right now ;)'
 		if npc_humor[$ARGS[1]] <= 1 and rand(0,1) = 1:
-			$VM['3b'] = 'my cock is waiting for you'
+			$VM['3b'] = 'im already hard'
 		elseif npc_humor[$ARGS[1]] = 2 and rand(0,1) = 1:
 			if rand(0,1) = 1:
 				$VM['3b'] = 'in the street?? damn! keep it in your pants till you get here!'
@@ -93,7 +93,7 @@ if $ARGS[0] = 'pre_planned_booty_call':
 	$VM['0'] = dyneval('$result=''hey <<$pcs_nickname>>, you coming over?'' ')
 
 	$VF['1a'] = 'sorry, something came up'
-	$VF['1b'] = ''
+	$VF['1b'] = 'on my way now'
 
 	if rand(0,2) = 0:
 		$VM['2b'] = 'come over to my place lets fuck like bunnies'
@@ -110,7 +110,7 @@ if $ARGS[0] = 'pre_planned_booty_call':
 
 	$VF['2b'] = 'ill come right now ;)'
 	if npc_humor[$ARGS[1]] <= 1:
-		$VM['3b'] = 'my cock is waiting for you'
+		$VM['3b'] = 'im already hard'
 	elseif npc_humor[$ARGS[1]] = 2:
 		if rand(0,1) = 1:
 			$VM['3b'] = 'in the street?? damn! keep it in your pants till you get here!'

+ 4 - 0
locations/booty_call_start.qsrc

@@ -355,6 +355,7 @@ if $ARGS[0] = 'kuni_start':
 	act'Spread them for him':
 		cla & *nl
 		!! IMAGE HERE
+		booty_call['kuni'] = 1
 		if kuni_no[$boy] = 1:
 			kuni_yes[$boy] = 1 & kuni_no[$boy] = 0
 			'Realizing what he wants, you realize that you want it too and spread your legs, inviting him in. Despite initiating it, he seems surprised that you''re actually letting him.'
@@ -1225,6 +1226,7 @@ end
 if $ARGS[0] = 'bj_sub_cum_face3':
 	!! player choosing to do it
 	act'How about my face instead?':
+		booty_call['cum_count'] += 1
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		
@@ -1369,6 +1371,7 @@ if $ARGS[0] = 'bj_sub_cum_hand':
 	act'Finish him with your hand':
 		$booty_call['last_cum'] = 'hand'
 		booty_call['cum_hand'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'hands', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1383,6 +1386,7 @@ end
 if $ARGS[0] = 'bj_force_cum_mouth':
 	booty_call['cum_mouth'] = 1
 	booty_call['cum_mouth_force'] = 1
+	booty_call['cum_count'] += 1
 	$booty_call['last_cum'] = 'mouth'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'

+ 7 - 0
locations/booty_call_stats.qsrc

@@ -27,6 +27,7 @@ if $ARGS[0] = 'starting_stats':
 	booty_call['orgasm'] = orgasm
 	booty_call['orgasm_limit'] = orgasm + 6
 	booty_call['pc_condom_count'] = prezik
+	if $start_type[1] ! 'nomagic': booty_call['magik'] = pcs_magik
 	if npc_fuckbuddy[$boy] ! 1: npc_fuckbuddy[$boy] = 1
 end
 
@@ -34,6 +35,10 @@ if $ARGS[0] = 'save':
 	!! number of times you have initiated or responded to a booty call
 	npc_bootycalls[$boy] += 1
 	
+	!! number of times you have had sex with an npc
+	npc_fuck_times[$boy] += booty_call['fuck']
+	npc_kuni_times[$boy] += booty_call['kuni']
+	
 	!! number of times you have made your fuckbuddy cum
 	npc_cum_count[$boy] += booty_call['cum_count']
 	
@@ -124,4 +129,6 @@ if $ARGS[0] = 'sleep_check':
 	booty_call['sleep_cum_tits'] = cum_loc['tits']
 	booty_call['sleep_cum_hair'] = cum_loc['hair']
 end
+
+
 --- booty_call_stats ---------------------------------

+ 6 - 5
locations/booty_call_talk.qsrc

@@ -17,9 +17,9 @@ if $ARGS[0] = 'cum_react':
 			elseif booty_call['he_ask_tits'] = 1 and $booty_call['last_cum'] ! 'tits':
 				gs 'booty_call_talk', 'no_tits_cum'
 			else
-!!temporary fix but was commented out
+!!{temporary fix but was commented out
 				'You grin at him as he comes all over your hand, continuing to jerk him until his cock stops twitching and nothing else comes out. After a couple more tugs for good measure, you pull back.'
-				gs'booty_call_sex', 'sex_end'
+				gs'booty_call_sex', 'sex_end'}
 			end
 			gs'booty_call_talk', 'handjob_react'
 			gs'booty_call_talk', 'kuni_react'
@@ -30,7 +30,7 @@ if $ARGS[0] = 'cum_react':
 			gs'booty_call_talk', 'facial_react1'
 		end
 	end
-	if booty_call['orgasm_count'] >= 5 or pcs_sleep < 20 and hour >= 20:
+	if (booty_call['orgasm_count'] >= 5 or pcs_sleep < 20) and hour >= 20:
 		act'Collapse':gt'booty_call_after', 'black_out'
 	end
 end
@@ -468,10 +468,11 @@ if $ARGS[0] = 'free_creampies':
 					else
 						'"You don''t need to ask to come inside me y''know," you murmur. "I''m on birth control. So if you want to come inside me, you should go right ahead."'
 					end
+					gs 'booty_call_talk','free_creampies2'
 				end
 			end
 		end
-	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0:
+	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and birth_control['think_safe'] = 0:
 		if stat['safe_day'] = 1:
 			act'It''s a safe day':
 				booty_call['safe_day'] = 1
@@ -492,7 +493,7 @@ if $ARGS[0] = 'free_creampies':
 				'<i>Probably...</i> you quietly reiterate to yourself.'
 				gs'booty_call_sex', 'sex_end'
 			end
-		else
+		elseif booty_call['danger_day'] ! 1:
 			act'It''s a safe day (lie)':
 				booty_call['safe_day'] = 1
 				cla & *clr

+ 1 - 1
locations/brother.qsrc

@@ -988,8 +988,8 @@ if $ARGS[0] = 'brother_voyeur_ev2':
 	menu_off = 1
 	gs 'stat'
 	temp_var = rand(5,10)
-	minut += temp_var
 	gs 'arousal','foreplay', temp_var
+	killvar 'temp_var'
 	picrand = rand(1,7)
 	if npc_rel['A34'] <50:npc_rel['A34'] += rand(1,2)
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/shower/c (<<picrand>>).jpg"></center>'

+ 1586 - 0
locations/brother_shower_sex.qsrc

@@ -0,0 +1,1586 @@
+# brother_shower_sex
+
+if $ARGS[0] = 'sex_menu':
+!!	act'Jerk him off':gt'brother_shower_sex', 'mutual_masturbation'
+	act'Blow him':gt'brother_shower_sex', 'brother_shower_bj'
+	act'Fuck him':gt'brother_shower_sex', 'brother_shower_fuck'
+	act'Offer him your ass':gt'brother_shower_sex','brother_shower_anal'
+end
+
+if $ARGS[0] = 'mutual_masturbation':
+	'<center><video autoplay loop src="images/shared/sex/shower/fun2.mp4"></center>'
+end
+
+if $ARGS[0] = 'brother_shower_bj':
+	gs 'boystat', 'A34'
+	npc_rel['A34'] += 3
+	brotherbj += 1
+	brothershowerbj = daystart
+	if brotherSex < 6:brotherSex = 6
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
+	'Kneeling down, you take Kolka''s freshly washed cock and push it between your lips, sucking gently. Several minutes go by while you to continue blowing your brother, going slowly up and down his length, the sound of water raining down from the showerhead muting the soft slurping sounds coming from your mouth.'
+	gs 'arousal', 'bj', rand(3,5)
+	gs 'stat'
+	act'Keep sucking':
+		cla
+		gs 'arousal', 'bj', rand(1,5)
+		brotherbjfinish = rand(1,2)
+		if brotherbjfinish = 1:
+			gs 'cum_call', 'mouth', 'A34', 1
+			brotherbjcomment = rand(1,2)
+			gs 'stat'
+			gt'brother_shower_sex', 'shower_swallow'
+		else
+			*nl
+			'"Hey <<$pcs_nickname>>," he says through grunts. "I''m gonna cum soon. Can I cum on your face?"'
+			act'Ignore him and keep sucking':
+				cla
+				gs 'cum_call', 'mouth_swallow', 'A34', 1
+				gs 'stat'
+				*nl
+				'Despite his pleas to let him blow his load on your face, you keep sucking until you taste hot liquid spilling into your mouth.'
+				act'Swallow':
+					cla
+					*nl
+					'You swallow his load with a gulp, showing your clean tongue and smiling after you do.'
+					'"Thanks for the warning Kolka. I really appreciate it," you say, standing up.'
+					'"But I wanted to cum on your face..." he says, disappointment seeping from his voice.'
+					act'I was having too much fun':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+						'"Sorry Kolka, I just couldn''t help myself! Blowing you was too much fun and I didn''t want to stop." You keep licking and sucking on his tip as if to make your point. "I hope you''ll forgive me."'
+						'"Okay, fine... " He''s still clearly disappointed but he nods anyways. "But next time I want to cum on your face!"'
+						'"Maybe," you say with is what is probably a very frustrating wink.'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+
+					act'But I just washed my face':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+						'"But I just washed my face, Kolka. I don''t want to get cum on it after that."'
+						'"But we''re in the shower!" he protests. "What does it matter if I cum on your face? You can just rinse it off two seconds later!"'
+						act'Cum is hard to clean':
+							cla
+							*nl
+							'"Cum is hard to clean off! Even in the shower! It''s all sticky and gets everywhere. Even if you wipe it off your face, it gets on your hands, and then you have to be careful to get it all off before you run it through your hair."'
+							'Kolka opens his mouth to say something but nothing comes out. Guess he thought better of it.'
+							'"Hrmph! Always asking to cum on a girl''s face, never thinking about what a mess it makes or the trouble it causes for her! Boys!"'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+
+						act'Cum is still dirty':
+							cla
+							*nl
+							'"So what? It''s still dirty. It''s a sticky fluid that came out of your dick! That makes it dirty and would mean I''d have to use soap, which I don''t feel like doing twice. You should be grateful that I even swallowed!"'
+							'"It''s not dirty! Besides, I hear that cum is good for a girl''s skin. You should be <i>asking</i> me to cum on your face!"'
+							'"Pfft~!" You roll your eyes. "And where did you hear that? From some porno you were watching with your friends?"'
+							'"No!" he says quickly. You turn off the water and pull back the curtain, rolling your eyes again. "... maybe..." you hear him mutter again under his breath behind you.'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+					end
+
+					if pcs_traits['cumeater'] = 1:
+						act'I didn''t want to waste it':
+							cla & *clr
+							'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+							'"I didn''t want to waste it. It''s one of my favorite treats!" you say, licking your lips.'
+							'Your brother stares at you for a moment, giving you a look.'
+							'"Slut." he says.'
+							'"Cum dispenser." you smile back.'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+					end
+				end
+
+				act'Spit':
+					cla
+					*nl
+					'Opening your mouth, you drool and let his cum drip down off your tongue before wadding up what''s left and spitting it onto the bottom of the bathtub.'
+					'"Thanks for the warning Kolka. I really appreciate it," you say, smiling as you standing up.'
+					'"But I wanted to cum on your face..." he says, disappointment seeping from his voice.'
+					act'I was having too much fun':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+						'"Sorry Kolka, I just couldn''t help myself! Blowing you was too much fun and I didn''t want to stop." You keep licking and sucking on his tip as if to make your point. "I hope you''ll forgive me."'
+						'"You could have at least swallowed if you weren''t going to let me give you a facial," he grumbles as you stand up.'
+						'"Maybe next time," you say with is what is probably a very frustrating wink.'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+
+					act'But I just washed my face':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+						'"But I just washed my face, Kolka. I don''t want to get cum on it after that."'
+						'"But we''re in the shower!" he protests. "What does it matter if I cum on your face? You can just rinse it off two seconds later!"'
+						act'Cum is hard to clean':
+							cla
+							*nl
+							'"Cum is hard to clean off! Even in the shower! It''s all sticky and gets everywhere. Even if you wipe it off your face, it gets on your hands, and then you have to be careful to get it all off before you run it through your hair."'
+							'Kolka opens his mouth but nothing comes out. Guess he thought better of whatever he was about to say.'
+							'"Hrmph! Always asking to cum on a girl''s face, never thinking about what a mess it makes or the trouble it causes for her! Boys!"'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+
+						act'It''s still dirty':
+							cla
+							*nl
+							'"So what? It''s still dirty. It''s a sticky fluid that comes out of your dick! That makes it dirty and would mean I''d have to use soap, which I don''t feel like doing twice."'
+							'"It''s not dirty! Besides, I hear that cum is good for a girl''s skin. You should be <i>asking</i> me to cum on your face!"'
+							'"Pfft~!" You roll your eyes. "And where did you hear that? From some porno you were watching with your friends?"'
+							'"No!" he says quickly. You turn off the water and pull back the curtain, rolling your eyes again. "... maybe..." you hear him mutter again under his breath.'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+					end
+				end
+			end
+			act'Let him cum on your face':gt'brother_shower_sex', 'shower_facial'
+		end
+	end
+
+	act'Let him fuck you':gt'brother_shower_sex', 'brother_shower_fuck'
+end
+
+
+if $ARGS[0] = 'brother_shower_fuck_first':
+	npc_rel['A34'] += 20
+	gs 'boystat', 'A34'
+	cla & *clr
+	if brotherSex < 7:brotherSex = 7
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy_enter2.mp4"></center>'
+	'You lean back into your brother, gripping his member and jerking it a few times to make sure he''s still hard enough for what you want to do next. You pull on him, carefully guiding his cock until you can feel the tip pressing against the entrance of pussy.'
+	if brother_knows_not_virgin = 1:
+		brotherfuck += 1
+		'"I was wondering if you were going to let me join the "Boys Who Fuck <<$pcs_nickname>>" Club," he says, grin radiating from behind you.'
+		*nl
+		act'It''s pretty exclusive':
+			cla
+			brotherclub = 1
+			'"Be grateful little brother. It''s a pretty exclusive club that not a lot of people get access to. What''re you trying to say about your dear sister? I might take offense to something like that," you say, putting on a pouty face.'
+			'His eyes go wide and immediately begins sputtering, his bravado evaporating instantaneously at the possibility that he might not get laid.'
+			'"I didn''t-! I just meant-! Sorry... I just... I mean... I''ve never been with a girl before... And you''re just so hot, and... I can''t believe you''d let me... You know... With you..." You laugh internally at his clumsy explanation but keep up your false face of disapproval. His eyes go even wider and he says, "Please! Don''t-! Don''t be mad... please..." You smile breaks through, deciding to stop messing around and let him off the hook. His embarrassment is kind of endearing. Your brother can be such a sweet boy sometimes.'
+			!!'"Not many <b>members</b> huh?" he says meaningfully, his dick twitching under your touch. You smile at him.'
+			'"It''s okay Kolka. I''m not mad. Let''s get you into the club. Why don''t I show you the <b>member only</b> entrance?"'
+			'"Don''t you mean member<b>s</b> only entrance sis?" he asks, confused.'
+			'"That''s not what I said," you whisper, pushing your hips back and swallowing him straight to the hilt.'
+			act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first3'
+		end
+		act'This doesn''t make you''re special':
+			cla
+			brotherclub = 1
+			'"Sorry to say kiddo, but this doesn''t make you special," you smile wryly at him over your shoulder.'
+			'"What do you mean?" he asks, grin disappearing.'
+			'"There''s been a lot of members in that club." You position his tip at your entrance, lining him up for what you''re about to do next.'
+			'"A <b>lot.</b> Of <b>members.</b>" On your emphasized words, you thrust your hips backward to take his entire cock inside you in one go, causing your brother to gasp and grab you by the hips to steady himself.'
+			'"Inside. <i>My. <b>''Club.''</i></b>" you whisper into his ear.'
+			act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first3'
+		end
+	else
+		brotherfuck += 1
+		'You feel Kolka tense up behind you and he hesitates.'
+		'"Is this...? Are you...?"'
+		'"My first time? A virgin?"'
+		*nl
+		if stat['vaginal'] = 0:
+			act'Yes, I''m a virgin':
+				npc_rel['A34'] += 20
+				cla
+				'"Yeah. I am." You smile at him. "I''m giving my first time to you little brother."'
+				'Still smiling, you push your ass towards him and impale yourself on his cock.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first2'
+			end
+
+			act'No, I''m not (lie)':
+				cla
+				brothervirginlie = 1
+				'"Nope!" You smile at him. "Sorry to disappoint, but I lost my virginity a while back little brother."'
+				'You''re not really sure why you''re lying to him about this, but there''s no time to think about that as you push your ass towards him and impale yourself on his cock.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first2'
+			end
+
+			act'No, I''m a slut (lie)':
+				cla
+				brothervirginlie = 2
+				'"Nope!" You smile at him. "Sorry to disappoint, but yours is just going to be one more of many different dicks that have been inside my pussy little brother."'
+				'You''re not really sure why you''re lying to him about this, especially with the implication that you''re a huge slut, but there''s no time to think about that as you push your ass towards him and impale yourself on his cock.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first2'
+			end
+		else
+			act'No, I''m not':
+				cla
+				'"Nope!" You smile at him. "Sorry to disappoint, but I lost my virginity a while back little brother."'
+				'With one more quick jerk on his cock for good measure and push your ass towards him, swallowing his length with your pussy.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first2'
+			end
+
+			act'No, I''m a slut':
+				cla
+				brother_knows_not_virgin = 1
+				'"Nope!" You smile at him. "Sorry to disappoint, but yours is just going to be one more of many different dicks that have been inside my pussy little brother."'
+				'You''re not really sure why you''re telling him about this, especially with the implication that you''re a huge slut, but there''s no time to think about that as you thrust your hips backward to take his entire length inside you in one go. Your brother gasps at the rush of having his cock entirely swallowed by your pussy, grabbing you by the hips to steady himself.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first3'
+			end
+
+			act'Yes, you''re my first time (lie)':
+				npc_rel['A34'] += 10
+				cla
+				brothervirginlie = 3
+				'"Yeah. I am." You smile at him. "You''re my first time little brother."'
+				if guy >= 10:'You feel a little bad for lying to him, but you figure it''ll probably make him feel special if he thinks you''re giving him your virginity, especially considering the numerous quantity of dicks that''ve been inside you. You give his cock one more quick jerk for good measure and start pushing him in.'
+				if guy < 10:'You feel a little bad for lying to him, but you figure it''ll probably make him feel special if he thinks you''re giving him your virginity. You give his cock one more quick jerk for good measure and start pushing him inside you.'
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_first2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'brother_shower_fuck_first2':
+	eff_contra = iif(argc > 1,ARGS[1],sexcontra)
+	tmp = func('pregriskeval',eff_contra)
+	cla & *clr
+	if pcs_vag = 0:
+		'<center><video autoplay loop src="images/shared/home/bathroom/broshowervirgin.mp4"></center>'
+		'Holding your breath, you push back on Kolka, feeling his tip stretch your pussy. He eventually pushes the entire length of his cock inside causing you to gasp in pain as his <<npc_dick[''A34'']>> cm dick tears through your hymen. Despite your pain, neither of you stop moving, continuing to thrust against each other.'
+		!!elseif stat['hidden_vaginal'] > 0:
+		!!	'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+		!!	'Kolka slides inside you with surprising ease. Though his dick still stretches your pussy, you find it to be pleasant instead of painful. Of course you''ve heard stories that say it doesn''t hurt for some girls, but you always thought it was a myth or at least a rare occurrence. <i>I must be pretty lucky!<</i> you think to yourself.'
+	else
+		'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+		'Your pussy easily swallows your brother''s <<npc_dick[''A34'']>> cm cock and you immediately start building into a rhythm, pushing back on him in time with his thrusts for maximum depth of penetration.'
+	end
+
+	act'Continue':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+		if pcs_vag = 0:
+			'Several minutes pass and your pain is long forgotten. The only thing you can feel now is the ecstasy of Kolka''s cock pumping in and out of your pussy. His hands come up to grope your breasts and you moan in pleasure. Is this what sex is? How did you live your life without it? Why did you wait so long to lose your virginity? Why didn''t you jump on your brother''s cock sooner?!'
+		elseif stat['hidden_vaginal'] > 0 and stat['vaginal'] = 0:
+			'Several minutes go by and you find yourself thoroughly enjoying your brother''s cock pump in and out of your pussy. His hands grope your breasts and you moan in pleasure. Is this what sex is? How did you live your life without it? Why did you wait so long to lose your virginity? Why didn''t you jump on your brother''s cock sooner?!'
+		else
+			'Several minutes go by as you enjoy Kolka''s cock. His hands come up to grope you, and you moan in pleasure, your breasts being used as leverage to fuck you harder. Fuck! He''s pretty good for his first time. Maybe you should have jumped on your brother''s dick ages ago!'
+		end
+		guy += 1
+		gs 'arousal', 'vaginal', 5
+		gs 'arousal', 'vaginal', -5
+		gs 'arousal', 'foreplay', -10
+		gs 'stat'
+
+		if pcs_horny >= 90:
+			gs 'cum_call', '', 'A34', 1
+			*nl
+			'Your incestuous shower sex continues and you vaguely think that Kolka trying to tell you something but you''re too drunk on cock to hear what he''s saying. Suddenly, he pulls you tight, pushing himself as far into you as he can. Something spurts inside you, filling you up, sending you over the edge, orgasming hard on your brother''s cock.'
+			'As your orgasm winds down and your legs stop quivering, you lean forward against the shower wall, Kolka''s cock slipping from between your legs. You start to think about how empty you feel without a cock inside you when you realize you feel something dripping out from your pussy.'
+			'"Is... is that cum? Did you come insideme?!" you pant.'
+			'"Y-yeah... I was trying to tell you that I was cumming but you didn''t say anything so..."'
+
+			if succubusflag = 0:
+				if birth_control['think_safe'] = 1 or tabletkishot >= 1:
+					'<i>Well,</i> you think to yourself, <i>It''s a good thing '+iif(birth_control['implant_status'] > 1, 'I have a birth control implant.', 'I''m on birth control.')+'</i>'
+				elseif mesec > 0:
+					'<i>Well,</i> you think to yourself, <i>I don''t think I can get pregnant when I''m on my period... right...?</i>'
+				elseif knowpreg = 1:
+					'<i>Well,</i> you think to yourself, <i>I''m already pregnant.</i>'
+				else
+					'<i>Damn...</i> You close your eyes, sighing as you feel another glob of Kolka''s cum drip from your pussy. <i>I should go buy a morning after pill from the pharmacy...</i>'
+				end
+			end
+			act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+		else
+			'Suddenly, you feel your brother tapping you on the shoulder.'
+			act'Continue':gt'brother_shower_sex', 'brother_fuck_cum'
+		end
+	end
+end
+if $ARGS[0] = 'brother_shower_fuck_first3':
+	guy += 1
+	gs 'arousal', 'vaginal', rand(5,10)
+	gs 'arousal', 'foreplay', 1
+	gs 'stat'
+	eff_contra = iif(argc > 1,ARGS[1],sexcontra)
+	tmp = func('pregriskeval',eff_contra)
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+	'Barely giving him any time at all to recover from your sudden start, you immediately break into a hard rhythm, thrusting your hips back and giving it your all. He''s your little brother after all. You should try to make his first time special. Soon enough, you start giving him tips.'
+	'"Hold my hips so you have more control."'
+	'"Grab my boobs if you like. Boobs are meant to be grabbed during sex.'
+	'"Don''t worry if you feel like you''re going to cum. It''s your first time so just let me kn-OW-OW-WOAH!"'
+	'Kolka''s really getting into it. He pumps in and out you, member slick with your juices. His hands come up to grab your breasts and you gasp when they''re used as leverage to fuck you harder, his cock reaching even deeper inside you. His cock! Oh god! It''s driving you insane! Even though it''s his first time, he''s actually pretty good! Fuck! You should have jumped on his dick ages ago!'
+	'Several minutes go by with you unable to think about anything except how good fucking your brother feels.'
+	'Suddenly, you feel him urgently tapping you on the shoulder.'
+	act'Continue':gt'brother_shower_sex', 'brother_fuck_cum'
+end
+
+if $ARGS[0] = 'brother_shower_fuck':
+	broshowerfuck = daystart
+	gs 'boystat', 'A34'
+	if brotherfuck < 1:gt'brother_shower_sex', 'brother_shower_fuck_first'
+	brotherfuck += 1
+	if brotherSex < 7:brotherSex = 7
+	npc_rel['A34'] += 5
+	gt 'brother_shower_sex', 'brother_fuck_cum'
+end
+
+if $ARGS[0] = 'brother_shower_anal':
+	broshowerfuck = daystart
+	gs 'boystat','A34'
+	brotheranal += 1
+	npc_rel['A34'] += 5
+	if brotheranal = 0:
+		if stat['think_virgin'] = 1:
+			gt 'brother_shower_sex','brother_shower_anal_vagv_analv'
+		else
+			gt 'brother_shower_sex','brother_shower_anal_vagnv_analv'
+		end
+	else
+		if stat['think_virgin'] = 1:
+			gt 'brother_shower_sex','brother_shower_anal_vagv_analnv'
+		else
+			gt 'brother_shower_sex','brother_shower_anal_vagnv_analnv'
+		end
+	end
+end
+
+if $ARGS[0] = 'brother_shower_anal_vagv_analv':
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+	'Kolka looks at you. You know he wants to go further, and you want to do more than a blowjob too, but you know you can''t.'
+	*nl
+	'"We have to stop. I want to do more, but if we continue... if I lose my virginity, then mother will kill me."' 
+	'Kolka looks confused, and with a hint of pleading in his voice says "But... I don''t get it. How would she know?"'
+	'You are momentarily surprised he doesn''t know before realizing that he has no reason to know. "Why do you think I have to go to the doctors every month? I have to get checked."'
+	'Kolka thinks for a moment before smiling. "Are my grades good enough to become a doctor?"'
+	act 'What a smartass':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex1.jpg"></center>'
+		'"Don''t be a smartass!" It irritates you that he jokes about a monthly task that he doesn''t have to do. A thought then comes through your head, and you gulp nervously. "Unless... Would you... Do you want... Want to try anal instead? I know it''s not-"'
+		'"Yes!" Kolka says, interrupting you mid-sentence with much more enthusiasm than you were expecting.'  
+		'"Okay, but go slow. I''ve never done this before," you tell him.'
+		act 'Prepare yourself':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/home/bathroom/broshower2.mp4"></center>'
+			'Kolka gives you a wide smile. "Okay, I''ll go slow, I promise. You can stop me if you want."' 
+			'You turn your back to him, unsure of what to do, so you decide to use your hands to keep your cheeks parted.  He puts one hand on your hip and slowly pushes the tip of his penis against your anus.'
+			'You suddenly panic about the lack of any lube, but decide that the water will be enough. At least you hope it will.'
+			guy += 1
+			$orgasm_or = 'no'
+			gs 'arousal', 'anal', 2
+			gs 'stat'
+			act 'Try to relax':
+				cla & *clr
+				'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal3.mp4"></center>'
+				'As Kolka slowly enters you, you feel yourself unintentionally tighten your ass around his penis and your hands move to brace yourself against the wall. As you do this, Kolka briefly pauses before slowly going deeper. It''s an odd feeling; not exactly painful but not pleasurable either.'
+				*nl
+				'Kolka starts moving a little faster, and you realize that having water as lube isn''t that effective. You feel some burning pain as he begins picking up speed, but there is another feeling. You start to feel... pleasant; it''s not that much, but it''s definitely there.'
+				*nl
+				'You move a hand down to your clit, and while it''s not that easy, you manage to give yourself some extra stimulation. You soon realize that you''re beginning to feel good, really good. Your clit stimulation, the taboo act and now Kolka''s thrusting is turning from pleasant to... pleasure. Indeed, the pain is rapidly falling into history as your pleasure ramps up with every thrust.  Now you are finding it hard not moan in pleasure as this new experience is undeniably pushing you towards a powerful orgasm.'
+				gs 'arousal', 'anal', 5
+				gs 'arousal', 'finger_clit', 2
+				gs 'stat'
+				act 'Enjoy':
+					cla & *clr
+					'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
+					'Just as you''re about to cum, you feel Kolka thrust deep and hold it as he cums deep in your bowels, pushing you over the edge. Unable to keep quiet, you moan as your climax tears though you, your body quivering as your knees become weak. You are steadied as Kolka holds you in a firm embrace from behind, squeezing your breasts as he does.'
+					*nl
+					'"That was..." you begin to say before you realize that you''re unsure what to say.'
+					gs 'cum_call', 'anal', 'A34', 1
+					gs 'arousal', 'finger_clit', 2
+					gs 'arousal','breasts', -1
+					$orgasm_txt = ''
+					$orgasm_or = 'custom'
+					gs 'arousal', 'anal', 5
+					act 'Was it good for you?':
+						gs 'arousal', 'end'
+						gs 'stat'
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brotherwash.jpg"></center>'
+						'You both quietly return to washing before Kolka asks "Was I, um... Was it okay? Did you enjoy it?"'
+						'"It felt uncomfortable at first and even a bit painful," you say, wincing at the mere memory. "But by the end it was... well let''s just say, yes, I enjoyed it. But let me know when you''re about to cum next time, okay?"'
+						'"Does that mean that there will be a next time?" he asks with a hopeful expression on his face.'
+						'"No promises," you say as you realise that he''s not the only one looking forward to trying it again.'
+						*nl
+						'The sit under the water together for a little while longer before you realize someone might notice that your brother is missing and become suspicious. You quickly shut off the water and dry him off, gathering Kolka''s clothes and shooing him into the hallway.'
+						act'Finish':mirror_steam = hour & gt $loc
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
+	*clr
+	cla
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+	'You chew your lip, debating with yourself internally before just spitting it out.'
+	*nl
+	'"Kolka," you begin nervously. "I''m... I''m an anal virgin. Would you be willing to change that?"'  
+	*nl
+	'He freezes for a second before a broad grin appears on his face. "I''d like that."'
+	'While you''re no virgin, anal sex presents problems that you''ve not had before. Kolka seems to be thinking the same as you, asking, "So... how do you want to do this?"'
+	'"Go slow, and if I ask you to stop, please stop, okay?" you reply.'  
+	'"Okay, but what about lube? Is the water enough?"'
+	*nl
+	'This question stops you. Thinking back to porn that you''ve seen, they often just spit, but that doesn''t sound like a good option to you now that you''re about to have something fairly large entering you.'  
+	'Kolka comes up with a suggestion. "I could try to use some of your pussy juice... You know, like one or two thrusts there first, then we try. What do you think?"'  
+	*nl
+	'While you''re not sure if you like the label ''pussy juice'', it''s the only plan you''ve got.'
+	act '"Okay, let''s do that."':
+		*clr
+		cla
+		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal2.mp4"></center>'
+		'Moving in behind you, Kolka lines up with your pussy before thrusting in. Feeling this, you consider hitting the abort button and returning to what you''re more familiar with, but you want that new experience and still feel the need to try it.'
+		'You widen your stance and push your ass towards Kolka. He grips your hip and his cock slowly pushes at your virgin hole. As the head of Kolka''s cock enters you, he pauses and lets out an annoyed grunt.'
+		'You panic. "What is it? Am I, are we okay?! What''s wrong?!"'  
+		'"Sorry. yes it''s fine.  It''s just, well, perhaps we should have stopped the water. I don''t think our lube has lasted. What should we do?"'
+		guy += 1
+		$orgasm_or = 'no'
+		gs 'arousal', 'vaginal', 2
+		gs 'stat'
+		act 'This is nice':
+			*clr
+			cla
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal3.mp4"></center>'
+			'You briefly think about switching back to ''normal'' shower sex, but you still want to try this and want to see it though.'  
+			'"Keep going," you say, and Kolka pushes deeper, stopping every few seconds to let you breathe before continuing.'  
+			'You can feel Kolka getting deeper when he says "God, you''re tight. I think you''re squeezing me with every heartbeat."'  
+			'"Sorry, I''ll try to stop..."' 
+			'"No, it''s not a complaint, it was just unexpected," he replies.'
+			act 'Try to relax':
+				'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
+				'After another minute, Kolka asks "Can I start to move now?"'  
+				'You take a deep breath. "Yes, but go slow."'  
+				'Kolka begins slowly thrusting, but gets into a rhythm as you notice that he''s slowly gaining speed. You could ask him to slow down, but decide against it. You can''t deny that it''s starting to feel good, and every Kolka pushes forward, the pain diminishes and pleasure replaces it.'
+				gs 'arousal', 'anal', 2
+				gs 'stat'
+				act 'Enjoy':
+					*clr
+					cla
+					'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
+					'You find yourself needing to brace yourself on the wall with your hands. You didn''t even notice, but you''ve bent forward, allowing Kolka better access as his speed increases.'
+					'You''re really getting into it now, and are surprised by how good you feel.'
+					'"I''m about to cum!" Kolka cries.' 
+					'"Do it!" is all you can say. As Kolka bursts inside you, he pushes deep and if he wasn''t holding you, you may have lost your balance. After a performance like that, you don''t want to complain though.'
+					gs 'arousal', 'anal', 3
+					gs 'cum_call', 'anal', 'A34', 1
+					gs 'stat'
+					act 'Wash yourselves':
+						gs 'arousal', 'end'
+						gs 'stat'
+						*clr
+						cla
+						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brotherwash.jpg"></center>'
+						'As you both quickly rewash yourselves, Kolka asks "So, was it good? More importantly, will you want to do it again?"'  
+						'You''re slightly annoyed by the ''more importantly'' part, but can''t deny that you''ve enjoyed your first butt fucking.'  
+						'"It was..." you say, letting it hang for a moment before finishing with "Good. Will it happen again? I''ll think about it."'
+						act'Finish':mirror_steam = hour & gt $loc
+					end
+				end
+			end
+		end
+	end
+end
+
+	
+if $ARGS[0] = 'brother_shower_anal_vagv_analnv':
+	*clr
+	cla
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+	'You want, no, <i>need</i> to continue, but thanks to your mother''s stupid rule you know your pussy is out of bounds, but you do have other options...' 
+	'"Kolka, I can''t let you have my pussy, but would you be okay with anal?" You ask and Kolka''s eyes light up.' 
+	act 'Prepare yourself':
+		*clr
+		cla
+		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal3.mp4"></center>'
+		'You''re no anal virgin, but sex in a shower isn''t as easy as it looks in porn; the water also makes proper lube impossible. You spread your legs and lean forward, pushing your ass towards Kolka while bracing yourself on the wall.'
+		'Kolka''s cock prods at your anus as he gets into position, placing one hand on your hip. You''re enjoying the anticipation when Kolka slowly but steadily breaches the resistance of your ass as he pushes himself deep into you. He takes a few seconds before beginning a slow but strong piston motion.'
+		guy += 1
+		gs 'arousal', 'anal', 3
+		gs 'stat'
+		act 'Enjoy':
+			*clr
+			cla
+			'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
+			'You find that you are reciprocating his motion as you push back into his thrusts and clench down as he withdraws from you. Kolka reaches up and grabs your right breast, squeezing it hard and thumbing your nipple as his pace increases.'
+			'You know the noise of the shower can only hide so much, and are doing your best to keep your voice down as Kolka says "I''m about to cum."'  
+			'You''re only able to respond with a nod as you''re biting your lower lip to help keep quiet. You feel Kolka push in hard as he cums deep inside you.'
+			gs 'arousal', 'breast', -3
+			gs 'arousal', 'anal', 3
+			gs 'cum_call', 'anal', 'A34', 1
+			gs 'stat'
+			act 'Clean up':
+				*clr
+				cla
+				gs 'arousal', 'end'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brotherwash.jpg"></center>'
+				'Straightening up, you both go back to washing yourselves in silence before you turn to face him.'  
+				'"You really are the best sister." Kolka says.'  
+				'"I know," you reply with a wide grin.'
+				act'Finish':mirror_steam = hour & gt $loc
+			end
+		end
+	end
+end
+
+	
+if $ARGS[0] = 'brother_shower_anal_vagnv_analnv':
+	*clr
+	cla
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+	'"Sorry Kolka," you say while doing your best to pretend that you''re not going to continue, before pushing your backside towards him. "You''re going to have to settle for anal today."'  
+	'He grins before sighing. "If I must."'  
+	'You both giggle before Kolka places his hands on your hips and pulls you back. You lean forward, using your arms to brace yourself on the wall and taking a wider stance to give Kolka room behind you.'
+	guy += 1
+	gs 'arousal', 'anal', 3
+	gs 'stat'
+	act 'Enjoy':
+		*clr & cla
+		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
+		'As the water from the shower falls on your back and between your ass cheeks, you feel Kolka breaching your anus in one powerful motion. As the glorious feeling of his cock fills you up, he reaches forward and grasps your breasts. A moment later, he''s started moving, and you meet his thrusts by pushing back, willing him to go deeper. Every time he withdraws, you feel yourself gripping him to unconsciously pull him back in.'
+		'"I''m about to cum," he says, and you simply nod. Aafter a final flurry of thrusts, Kolka cums, flooding your bowels with his seed.'
+		gs 'arousal', 'anal', 3
+		gs 'cum_call', 'anal', 'A34', 1
+		gs 'stat'
+		act 'Clean up':
+			*clr & cla
+			gs 'arousal', 'end'
+			gs 'stat'
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+			'Straightening up, you both go back to washing yourselves in silence before you turn to face him.'  
+			'"The things I do for you..." Kolka says with a cheeky grin.' 
+			'You just pull a face and stick out your tongue before you both giggle and get out of the shower.'
+			act'Finish':mirror_steam = hour & gt $loc
+		end
+	end
+end
+
+!! ----------------------------------------------------------- Cum Variants ---------------------------------------------------------------------
+
+if $ARGS[0] = 'brother_fuck_cum':
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy4.mp4"></center>'
+	if brotherfuck ! 1:brothercumchoice = rand(1,5)
+	if brotherfuck = 1:
+		brothercumchoice = 1
+	else
+		'"Nnngh~!" you bite your lip as you feel your brother''s <<npc_dick[''A34'']>> cm cock slide all the way into your pussy. You waste no time and the two of you start furiously fucking each other like the sex crazed teenagers you are.'
+		$orgasm_txt = 'After a few minutes of this, you can''t take it anymore and cum. You grab the shower faucet tight, gasping as Kolka continues to pound you even as you quiver in the throes of your orgasm.'
+		gs 'arousal', 'vaginal', rand(5,10)
+		if brothercumchoice < 5:'Suddenly, Kolka starts tapping you on the shoulder.'
+	end
+	gs 'stat'
+	if brothercumchoice = 1:
+		'"<<$pcs_nickname>>-! I''m gonna cum! What should I do?"'
+		act'Not inside me!':
+			cla & *clr
+			gs 'arousal', 'hj', 1
+			gs 'cum_call', 'stomach', 'A34', 1
+			'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></center>'
+			'"Not inside me!" you cry out. You quickly pull yourself off him and turn around, grabbing his cock with your hand and jerking him furiously until he groans and you feel his hot cum spattering all over your stomach.'
+			act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+		end
+
+		act'Suck him off':gt'brother_shower_sex', 'shower_swallow'
+
+		act'Let him cum on your face':gt'brother_shower_sex', 'shower_facial'
+		
+		act'Fuck him till he cums':gt'brother_shower_sex', 'shower_creampie'
+
+		act'Fill me up!': gt'brother_shower_sex', 'shower_fill_me_up'
+		
+	elseif brothercumchoice = 2:
+		'"<<$pcs_nickname>>-! I''m almost there! Can I come insideyou today?"'
+		if knowpreg = 0 and thinkpreg = 0:
+			act'Push him off (not inside!)':
+				cla & *clr
+				gs 'cum_call', 'stomach', 'A34', 1
+				'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></center>'
+				'"No! Not inside me!" you cry out. You push him off you and turn around. Grabbing his cock, you jerk him vigorously until he groans, spraying hot cum that spatters all over your stomach.'
+				if birth_control['think_safe'] = 0:
+					'Feeling his spunk on your stomach, you suddenly grow annoyed and wonder why you even finished him off. "What the fuck Kolka?! Are you <i>trying</i> to get me pregnant?"'
+					if birth_control['kolka_knows'] = 1:
+						birth_control['kolka_knows'] = 2
+						'"I thought you were on birth control!"'
+						'"Well I stopped!"'
+						'"Well how was I supposed to know that?"'
+					end
+				end
+				act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+			end
+		end
+
+		act'Push him off (not today)':
+			cla & *clr
+			gs 'cum_call', 'stomach', 'A34', 1
+			gs 'stat'
+			'<center><video autoplay loop src="images/shared/sex/shower/jerkoff1.mp4"></center>'
+			'"Not today Kolka." You push your brother off of you and turn around. Grabbing his cock, you jerk him vigorously until he groans, spraying hot cum that spatters all over your stomach.'
+			if birth_control['kolka_knows'] = 1:
+				'"Hey what gives?" he complains. "I thought you were on birth control? Why can''t I cum inside?"'
+				if birth_control['think_safe'] = 0:
+					birth_control['kolka_knows'] = 2
+					'"Sorry, I stopped using it a while ago. If you came inside me, you could have seriously knocked me up."'
+					'Kolka gulps at the realization of what you just said.'
+				else
+					'"I just didn''t want you to come insideme today," you say irritatedly.'
+					'"But why does it matter if you''re on birth control?"'
+					'"Because I said so! It''s my body! I get a say in where you cum on it!"'
+				end
+			end
+			if birth_control['think_safe'] = 0:'"Sorry," you smile apologetically. "I''m not on birth control and I can''t afford to get knocked up. Especially not by my little brother."'
+			act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+		end
+		
+		act'Fuck him till he cums':gt'brother_shower_sex', 'shower_creampie'
+			
+		act'Fill me up!':gt 'brother_shower_sex', 'shower_fill_me_up'
+		
+	elseif brothercumchoice = 3:
+		'"<<$pcs_nickname>>-! I''m almost there! Let me cum on your face!"'
+		act'Let him cum on your face':gt'brother_shower_sex', 'shower_facial'
+
+		act'Ignore him, make him come insideyou':gt'brother_shower_sex', 'shower_forced_creampie'
+
+	elseif brothercumchoice = 4:
+		'"<<$pcs_nickname>>-! I''m almost there! Can I cum in your mouth?"'
+		brotherbjcomment = 3
+		act'Let him cum in your mouth':gt'brother_shower_sex', 'shower_swallow'
+
+		act'Ignore him, make him come inside you':gt'brother_shower_sex', 'shower_forced_creampie'
+			
+	elseif brothercumchoice = 5:
+		act'Continue':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+			gs 'cum_call', '', 'A34', 1
+			*nl
+			'Suddenly Kolka grabs you tight, thrusting his cock into you as deep as it can go and you can feel him pulsating inside you.'
+			if pcs_horny >= 95:
+				broshowerorgasm = daystart
+				$orgasm_or = 'custom'
+				$orgasm_txt = 'The sensation sends you over the edge and you clench down on him hard, your orgasm rocking you in waves, and leaving your legs wobbly when it finally subsides.'
+				gs 'arousal', 'vaginal', 1
+			end
+			'A moment later, he pulls out of you and you can feel a thick liquid dripping from your pussy. You frown at that, and turn your head around to face him.'
+			'"What just... wait, is that...? Did you just come insideme?"'
+			if birth_control['kolka_knows'] = 1:
+				'"Well yeah," he says. "You''re on birth control anyways right?"'
+				if birth_control['think_safe'] = 0:
+					act'"I''m not on it anymore you idiot!"':
+						cla & *nl
+						birth_control['kolka_knows'] = 2
+						'"I''m not on birth control anymore you fucking idiot!"'
+						'"What?? But you said-!"'
+						'"Well you didn''t tell me about it! How was I supposed to know?!"'
+						'"Fuck!"'
+						'<i>Maybe I can get a morning after pill from the pharmacy,</i> you think to yourself.'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+					
+					act'"I''m not but it''s okay"':
+						cla & *nl
+						birth_control['kolka_knows'] = 2
+						'"Actually... I kinda stopped using it a while ago..."'
+						'"What?? But you said-!"'
+						'"I know, I know. I''m sorry Kolka, this is my fault, I should have told you. But now you know I guess?" you smile weakly at him.'
+						'<i>Maybe I can get a morning after pill from the pharmacy,</i> you think to yourself.'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+				else
+					act'"Was just asking"':
+						cla & *nl
+						if broshowerorgasm = daystart:
+							'"Yup," you smile. "So it''s no problem. I was just asking because I was a little lightheaded after that. I think we came at the same time."'
+							'"Do you orgasm every time someone cums inside you?" he asks, raising an eyebrow.'
+							'"Only if I''ve been properly fucked beforehand," you respond wryly.'
+						else
+							'"Yup," you smile. "Was just asking because I wasn''t sure what happened."'
+							'"You didn''t feel me come insideyou?" he asks, raising an eyebrow?"'
+							'"I did, I just didn''t understand why you were cumming without making me cum first. I thought you were a better lover than that," you respond wryly.'
+						end
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+					
+					act'"You still need to ask" (tease)':
+						cla & *nl
+						'"Well," you chide him, "you still need to ask."'
+						'"How come? It''s not like you''re in any danger are you?"'
+						'"No, but I like telling you to come insideme," you smirk.'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+					
+					act'"You still need to ask"':
+						cla & *nl
+						'"Well, you still need to ask," you chide him.'
+						'"How come? It''s not like you''re in any danger are you?"'
+						'"No, but you still need to ask. It''s my pussy and it''s my right to choose whether you''re filling it with cum or not."'
+						'"Tch. Whatever."'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+				end
+			else
+				'Kolka''s eyes are wide and filled with worry.'
+				'"I am <i>so</i> sorry <<$pcs_nickname>>! I didn''t mean to! I just couldn''t hold it in and before I could say anything I just-!"'
+				if birth_control['think_safe'] = 1:
+					birth_control['kolka_knows'] = 1
+					act'"I''m on birth control but be careful"':
+						cla & *nl
+						'"It''s okay Kolka, I''m on birth control," you reassure him. His expression melts with visible relief. "But still, you need to be more careful. If I forget to take my pills or stop for some reason, you cumming inside me like that could be really dangerous. I could really get pregnant."'
+						'He nods back at you in understanding. "I''m sorry," he says again. "I''ll be more careful in the future."'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+					
+					act'"I''m on birth control so you don''t have to worry"':
+						cla & *nl
+						'"It''s okay Kolka, I''m on birth control," you reassure him. His expression melts with visible relief. "So that means you can come insideme as much as you like and you don''t have to worry."'
+						'You wink at him and his jaw drops open. He looks down at your cum dripping pussy and you can feel a hunger exuding from him.'
+						'<i>Oops. I might have just created a monster,</i> you think to yourself.'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+					act'Play a prank on him':
+						cla & *nl
+						'"Oh my god," you say, adopting an expression of severe panic. "You just came inside me! Your own sister! Do you have any idea what that means?"'
+						'He wilts back from you. "I-"'
+						'"I could get pregnant Kolka! I''m only <<age>>! I''m not ready to be a mother! Are you ready to be a father?? If I have a baby, are you going to take responsibility? Oh god, what is <<$npc_nickname[''A29'']>> going to think? Her son knocking up his sister?!"'
+						'Kolka''s face visibly pales. "Oh shit! No! What are we going to do? I don''t want to be a dad! I don''t want to get in trouble for this! I-! I-!"'
+						'He''s on the verge of tears now and you can''t hold back any longer and bust into near uncontrollable laughter. Your body is wracked with giggles, trying not to let your laughs escape the room and echo outside the door.'
+						'"WHY ARE YOU LAUGHING?! THIS IS SERIOUS! YOU WERE SERIOUS A SECOND AGO!!"'
+						'"Shhhhh!" you hush him, still laughing. "Pipe down would you?? Do you want <<$npc_nickname[''A29'']>> and dad to find out? Relax, I''m just fucking with you. I''m on birth control, I''m not gonna get pregnant."'
+						act'Continue':
+							cla & *clr
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+							'"What the fuck! Are you fucking kidding me?!"'
+							'"Would you rather I not be?" you giggle, his reactions sending you into another fit. "Would you rather have had your sperm swarming around my unprotected uterus looking for eggs to impregnate?"'
+							'"You know what I mean!" His anger has you cackling further and you have to spray yourself in the face with the shower head just to calm down.'
+							act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+						end
+					end
+				else
+					if succubusflag = 0:
+						if mesec > 0:
+							act'"It''s okay, I''m on my period"':
+								cla & *nl
+								'"It''s okay Kolka, I''m on my period right now. I don''t think I can get pregnant on my period."'
+								'His face sighs with visible relief.'
+								'"We got lucky this time. Consider it a freebie," you smile at him.'
+								act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+							end
+							act'"You need to be more careful!"':
+								cla & *nl
+								'"You need to be more careful!" you scold him. "What if I get pregnant?!"'
+								'"I know! I know! I''m sorry!"'
+								'You huff out in anger but turn back to face him again anyways.'
+								'"Look, I was on my period this time and I don''t think I can get pregnant on my period. But you should know better! If I wasn''t on my period right now this could have been really bad! So show some self control next time!" He nods fearfully in agreement.'
+								act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+							end
+						elseif knowpreg = 1:
+							'<i>Well,</i> you think to yourself, <i>I''m already pregnant.</i>'
+							act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+						else
+							act'"It''s okay, it was an accident"':
+								cla & *nl
+								brother['cp_accident'] += 1
+								'"It''s okay Kolka," you say, trying to calm him down. "Look, I''m not mad, it was just an accident."'
+								'"But-!"'
+								'"Yeah, I know. I could get pregnant from this. But we''ll just have to hope I don''t. We can''t change it now, we''ll just have to be more careful in the future."'
+								'"The future? You mean..."'
+								'"Yes, I''m still going to keep fucking you Kolka," you smile at him. "Just cause this happened doesn''t mean I''m going to leave you alone. So just learn from the mistake and we''ll move on from it together, okay? Maybe I can buy a morning after pill from the pharmacy later."'
+								act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+							end
+							act'"You need to be more careful!"':
+								cla & *nl
+								'"You need to be more careful!" you scold him. "What if I get pregnant?!"'
+								'"I know! I know! I''m sorry!"'
+								'You huff out in anger but turn back to face him again anyways.'
+								'"I''m not on birth control! This is really dangerous!"'
+								'"I know! I know!"'
+								'"Fuck! What the fuck were you thinking?!"'
+								'You continue to swear at your brother for the next minute while he pleads for your forgiveness.'
+								'<i>Maybe I can get a morning after pill from the pharmacy,</i> you think to yourself.'
+								act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+							end
+							act'"What the fuck!"':
+								cla & *nl
+								'"What the fuck Kolka!" you hiss. "What if I get pregnant?!"'
+								'"I know! I know! I''m sorry!"'
+								'"You fucking moron! Get the fuck out!" In your rage, you shove him out of the shower and into the hallway, sopping wet before slamming it behind him and closing the latch.'
+								*nl
+								'<i>Fuck! Fuck! Fuck! Fuck, fuck!</i>'
+								*nl
+								'<i>Idiot! ... I wonder if I can get a morning after pill from the pharmacy...</i> you think as you watch the cum spill from your pussy and run down the drain.'
+								act'Continue':mirror_steam = hour & gt $loc
+							end
+						end
+						if brother['cp_accident'] >= 5:
+							act'"Plan B is expensive!"':
+								brother['cp_accident'] += 1
+								cla & *nl
+								'"Come on Kolka, I''m going to have to buy another morning after pill now! I know accidents happen but this is getting expensive!"'
+								'"Well what if you started taking birth control? Then I can cum in you as much any time right?"'
+								'"That''s not the point Kolka. You need to have more self control!"'
+								'<i>Though he is right...</i>'
+								act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+							end
+						end
+					else
+						'"It''s okay Kolka, I''m on birth control," you lie. His expression melts with visible relief. "So that means you can come insideme as much as you like and you don''t have to worry."'
+						'You wink at him and his jaw drops open. He looks down at your cum dripping pussy and you can feel a hunger exuding from him.'
+						'<i>Oops. I might have just created a monster,</i> you think to yourself. <i>Well it''s not like I could have told him the truth that I''m a magical sex demon now could I?</i>'
+						act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+					end
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'shower_swallow':
+	cla & *clr
+	brotherbjcomment = rand(1,2)
+	gs 'boystat', 'A34'
+	gs 'arousal', 'bj', 1
+	gs 'cum_call', 'mouth_swallow', 'A34', 1
+	gs 'stat'
+	'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
+	if broshowerfuck = daystart:
+		'Sinking to your knees, you barely put the tip of Kolka''s cock in before he explodes between your lips. Cum fills your mouth and you contemplate what to do with it.'
+	else
+		'You keep sucking on Kolka''s cock until he starts tapping on your head.'
+		'"<<$pcs_nickname>>-! I''m gonna-!"'
+		'He doesn''t even finish the word before you feel hot liquid squirting into your mouth.'
+		'"... cum."'
+	end
+
+	act'Swallow':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
+		'You suck a little more, making sure you''ve drained him to the last drop and then withdraw your mouth with carefully closed lips before swallowing it all in a single gulp.'
+		act'"Let''s finish up"':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+			'"Come on Kolka, let''s finish up quickly before someone starts wondering where we are."'
+			'You stand up without further comment, letting the water run over your body a little more and making sure your hair is thoroughly rinsed.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'Stare intimately':
+			cla & *nl
+			'Looking into his eyes, you stare at him and lean forward to give him a very long and intimate kiss on the tip of his cock before standing up. The two of you hold each other in continued silence, spending a few more minutes under the water and basking in the afterglow together.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+		
+		act'Yuck':
+			cla & *nl
+			'"Yeech," you wince, sticking out your tongue. "That''s gross."'
+			'"But you swallowed it anyways?" Kolka asks, confused.'
+			'"Spitting is quitting," you smirk.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		if pcs_traits['cumeater'] = 1:
+			act'"Tasty!"':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+				'"Mmm!" you smile at him. "Say, you''re pretty tasty!" you say, playfully sucking and licking his cock little more before finishing up with a light kiss on the tip and standing up. "Might have to get myself another drink later! ''Right off the tap'' if you know what I mean," winking at him.'
+				if brotherbjcomment = 1:
+					'"That really tastes good to you?"'
+					'"Mhm," you nod, letting the water run through your hair a little more. "Didn''t used to at first. But maybe it''s just an acquired taste. Or maybe little brothers are just the best vintage of cum!" You grin and wiggle your eyebrows at him.'
+					gs'brother_shower_sex','ending_route_routine'
+				elseif brotherbjcomment = 2:
+					'Kolka regards you with a bit of a look as you stand back up.'
+					'"What?" you ask at him.'
+					'"You''re kind of a slut, aren''t you <<$pcs_nickname>>?"'
+					act'Feign insult':
+						cla & *nl
+						'You gasp in mock indignation. "Kolka! How dare you! I have never been anything other than ladylike! How could you call your beloved sister a slut?"'
+						'"Probably because she loves the taste of cum," he snickers at you while you rinse your hair one last time.'
+						'"Have you considered maybe it''s just yours?" you ask, looking over your shoulder.'
+						'"A cumslut is still a cumslut, even if it''s only for one kind."'
+						'You roll your eyes. He''s being a punk but you can''t find the anger to be annoyed with him. He does have a bit of a point after all.'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+
+					act'Careful what you say':
+						cla & *nl
+						'"Hey! Careful what you say little brother," you say admonishingly. "Your big sister might stop doing you ''favors'' if you act too much like a brat."'
+						'"Hey, I can''t help it if my big sister is a slut!" he grins. "I just call it like I see it, and girls who swallows are usually sluts. Besides, I don''t think I have to worry too much. If you stopped blowing me, where else would you get your favorite drink?"'
+						if broshowerfuck = daystart:
+							'You roll your eyes. "I''m a slut remember? Maybe I''ll just go around the corner and blow someone else!" you growl at him. Tearing back the curtain, you step out of the tub somewhat annoyed with Kolka. Partially because he''s being a punk, but also partially because he''s actually kind of right. Fucking your brother in the shower and swallowing his cum <i>is</i> pretty slutty...'
+							gs'brother_shower_sex','ending_route_routine'
+						else
+							'You roll your eyes. "I''m a slut remember? Maybe I''ll just go around the corner and blow someone else!" You growl at him and shut off the water. Tearing back the curtain, you step out of the tub somewhat annoyed with Kolka. Partially because he''s being a punk, but also partially because he''s actually kind of right. Swallowing your brother''s cum <i>is</i> pretty slutty...'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+					end
+
+					act'Yeah, I am':
+						cla & *nl
+						'"Uhmm... yeah? What tipped you off? Was it the part where I gave you shower head?"'
+						'"No, it was the part where you swallowed my cum like a shot of vodka. Only sluts swallow like that," he says, grinning.'
+						'You punch him in the arm playfully but you aren''t really mad. He does have a point after all.'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+
+					act'Kiss him to gross him out':
+						cla
+						*nl
+						'You frown at him and fling your arms around his neck without warning. You press your lips against his and force your tongue into his mouth as far as it can go. He sputters, flailing backward and pushing you away.'
+						'"Ugh! Ew! Gross! What the hell <<$pcs_nickname>>?! I just came in your mouth! I don''t want to taste that!"'
+						'He rips open the shower curtain and you grin back in satisfaction as he stumbles out to escape.'
+						'"Well maybe you shouldn''t be calling girls sluts just because they''re nice enough to swallow your cum!"'
+						'<i>Well,</i> you think to yourself. <i>I didn''t <b>just</b> swallow. I did also say I thought it was tasty. I suppose that is a bit slutty isn''t it?</i>'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+
+					act'Only for you(sisterly)':
+						cla
+						*nl
+						'"Only for you!" You wrap your arms around him, smothering him and rubbing your head against his cheek. "I just love you so very much! What sister could stop herself from slutting up for such a cute baby brother?"'
+						'"Ack!" he cries out and shoves you away. "Get off of me! Weirdo!"'
+						if broshowerfuck = daystart:
+							'"Hey! What''s wrong with that?" you grin at him. "I''d say it''s pretty weird to for your sister to let you fuck her in the shower. I thought you liked that! Don''t you want me to be a slutty weirdo then?"'
+							'"Bah!" he says, clambering out of the shower to escape you, grumbling as he does so. "More slut and less weirdo!"'
+							gs'brother_shower_sex','ending_route_routine'
+						else
+							'"Hey! What''s wrong with that?" you grin at him. "I''d say it''s pretty weird to get slutty blowjobs from your sister in the shower. I thought you liked that! Don''t you want me to be a slutty weirdo then?"'
+							'"Bah!" he says, clambering out of the shower to escape you, grumbling as he does so. "More slut and less weirdo!"'
+							gs'brother_shower_sex','ending_route_routine'
+						end
+					end
+
+					act'Only for you (loving)':
+						pcs_horny += 25
+						gs 'stat'
+						cla & *clr
+						'<center><video autoplay loop src="images/shared/home/bathroom/brotherpussyfeel.mp4"></center>'
+						'"Only for you," you whisper, suddenly serious, looking longingly into his eyes.'
+						'He looks back at you a hesitant expression on his face. You lean in, wrapping your arms around him and pressing your breasts into his chest.'
+						'"Yes, I''m a slut," you murmur into his ear. "I would never be a slut for anyone else Kolka," taking his hand. "But I''ll happily be a slut for you."'
+						'With your final words you press his hand against your pussy and the heat between your legs.'
+						'Neither of you say anything for a few minutes, standing still with your breasts still pressed against him and his fingers gently working themselves in and out of your pussy. You realize you can''t stay in there together too long, lest someone become suspicious and you wistfully pull away, Kolka''s fingers slipping from your pussy as you do.'
+						gs'brother_shower_sex','ending_route_routine'
+					end
+				end
+			end
+		end
+	end
+
+	act'Spit':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/home/bathroom/showerbj.mp4"></center>'
+		'"Yeeeech..."'
+		'Opening your mouth, you drool and let his cum drip down off your tongue before wadding up what''s left and spitting it onto the bottom of the bathtub.'
+		if broshowerfuck = daystart: '"Thanks for the warning Kolka," you say, smiling as you standing up.'
+		if brotherbjcomment = 1:
+			'"Sorry sis," he says looking somewhat ashamed. "I just couldn''t hold it any longer. I tried, I really did!"'
+			'"It''s okay Kolka," you smile up at him. "It happens sometimes. Just try to warn me a little sooner next time, okay?" He nods promisingly.'
+			if brotherbj > 5:'You suppress a grin when he promises to do better in the future. You''ve given him enough blowjobs to suspect that he doesn''t give any warning because he wants to cum in your mouth. He never seems to have this problem when he asks to give you a facial. <i>Oh well,</i> you mentally shrug to yourself. <i>What''s a girl to do?</i>'
+			'"Now come on, let''s finish up before someone wonders where we are."'
+			gs'brother_shower_sex','ending_route_routine'
+		elseif brotherbjcomment = 2:
+			'"A little warning next time maybe?"'
+			'"Sorry sis. Your mouth just felt so good and your blowjobs are so great and... Sorry... I just couldn''t hold it."'
+			'"It''s okay Kolka," you smile up at him. "It''s not like I can be mad at you for saying I''m good at giving head." You give him a quick kiss on the tip of his cock before standing up.'
+			'"Now come on, let''s finish up before someone wonders where we are."'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+	end
+end
+
+if $ARGS[0] = 'shower_facial':
+	cla & *clr
+	brotherbjcomment = rand(1,2)
+	gs 'boystat', 'A34'
+	gs 'cum_call', 'face', 'A34', 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial1.jpg"></center>'
+	if broshowerfuck = daystart:
+		'You kneel down in front of Kolka, jerking his cock off. He starts to cum and as the first spurt hits you, you squeeze your eyes shut, continuing to jerk your brother until your face is thoroughly coated and feel no more droplets.'
+	elseif brothershowerbj = daystart:
+		'You let his cock slip out of your mouth and close your eyes in anticipation, listening to the light fapping sound of your brother jerking off just centimeters in front of you. Within seconds, you feel his hot cum spattering all over you. It''s a surprisingly big load, as you feel several spurts hit your face before he''s finally done ejaculating.'
+	end
+	if brotherbjcomment = 1:
+		'"That''s a pretty good look for you. Ever consider going out like that?"'
+		act'Hardy har har':
+			cla
+			*nl
+			'"Hardy, har, har." Even with your eyes closed, you can feel his self satisfied grin radiating towards you. You squeeze your eyelids tighter, feeling blindly for the water stream to rinse Kolka''s cum off, pushing him out of the way when you realize he''s blocking it. "You ever consider going out with my foot up your ass?"'
+			'"Hey, I''m only asking! You never know, you might start a new trend!" You finish wiping the last of his cum off your face, grimacing when you see that it''s now stuck to your hands instead. You turn, wiping it on your brother''s arm. "Hey!"'
+			'"Maybe you should try wearing it yourself," you retort sarcastically, ignoring his complaint. "''You never know, you might start a new trend!''"'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'Only on Sundays':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial2.jpg"></center>'
+			'"Sometimes. Only on Sundays though. White cum probably goes well with a white dress at Divine Liturgy."'
+			'You hear him snicker and grin at him with closed eyes, flicking your tongue out to have a taste of the spunk slowly dripping down your face. You motion for Kolka to move aside and let you rinse your face off.'
+			'"Good for spreading a reputation as a town slut too," he adds.'
+			'Finishing rinsing off your face you reply, "Well it''s not like they can complain about wearing my best makeup to church," causing you both to muffle laughter.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'Why? Are you willing to help?':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial2.jpg"></center>'
+			'"Why do you ask?" you ask, flicking your tongue out to catch a taste of cum, eyes still closed. "Did you want to help me put it on every morning?"'
+			'You wipe the spunk out of your eyes to can see Kolka grinning at you. "Well of course I would! What kind of brother would I be if I wasn''t willing to help my sister put on her best makeup?"'
+			'"Mhm," you hum, sucking the tart semen off your fingers. "And you would be doing this for completely selfless reasons with no ulterior motive I''m sure, especially not to get a free blowjob in the morning."'
+			'You rinse the rest of the cum off your face as Kolka continues, "Of course I wouldn''t be doing this <i>just</i> for blowjobs. I''d hope to get a few morning fucks in too!" You smack his arm, rolling your eyes but smiling anyways.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'I only did this because I owed you one':
+			cla
+			*nl
+			'"I only did this because I owed you one," You say, wiping the cum from your eyes with your hands. Your eyes clear, you see a questioning look on his face. "Did you already forget? I promised I''d let you cum on my face this time."'
+			'"Oh! Right."'
+			'"Yeah. Right. So instead of making fun of me, be grateful that you have a sister who keeps her promises."'
+			'"But what if I''m not making fun of you? Seriously, my cum on your face is one of my favorite looks for you!"'
+			'You roll your eyes, but despite yourself you can''t suppress a smile.'
+			'"So you really don''t like getting facials?" he asks.'
+			act'It''s not all that bad':
+				cla
+				*nl
+				'"It''s not all that bad I guess," you say. "It''s just not something I want <i>every</i> time, you know?"'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+			act'I prefer to swallow':
+				cla
+				*nl
+				'"Nah," you say. "I prefer to swallow."'
+				'You grin lewdly at him and you can practically feel him drooling.'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+			act'I prefer creampies':
+				cla
+				*nl
+				'"Nah," you say. "I prefer it when people come insideme."'
+				'You grin lewdly at him and you can practically feel him drooling.'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+				
+		end
+	else
+		'"What''s it feel like? Having cum on your face like that?"'
+		act'Sticky':
+			cla
+			*nl
+			'"Sticky," you say, squeezing your eyes tight, feeling blindly for the water stream to rinse your face off. "To be honest, it''s not that enjoyable for me."'
+			'"Really?" Kolka helps you find the showerhead and you start scrubbing your face, annoyed at how it ends up sticking to your hands instead of just sliding down the drain. "If it''s so annoying, why do girls you let people give them facials?"'
+			'Your eyes finally clear of the viscous liquid, you look pointedly at Kolka. "Why do boys always want to cum on girls faces?" you ask, raising an eyebrow and before realizing there''s still a wad of spunk still stuck in it.'
+			'Kolka''s lips twist as he sees your point. "Well... We don''t <i>always</i> want to cum on your faces... Sometimes we want you to swallow instead." Your face finally clean, you shut off the water, rolling your eyes at your brother''s justification.'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'Why don''t you find out?':
+			cla
+			*nl
+			'"Why don''t you find out for yourself if you''re so curious," you say, frowning and blindly searching for the water stream to rinse your face. "I''m sure it wouldn''t be too hard for you to cum all over yourself and wear it on your face."'
+			'"Yeesh, I was just asking," Kolka complains.'
+			'"Yeah, well I''m just telling," you respond, grimacing as you wipe the sticky liquid from your eyes so you can find the showerhead.'
+			'<i>Ugh. Maybe I should have just swallowed,</i> you think to yourself. <i>At least I wouldn''t have to deal with this mess if I had.</i>'
+			gs'brother_shower_sex','ending_route_routine'
+		end
+
+		act'Feels pretty good':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial2.jpg"></center>'
+			'"Feels pretty good actually," you say cheerfully. "It''s kind of like getting a face mask except it''s hot and comes with a sense of flattery that your face is the place that someone wanted to blow their load."'
+			'"Huh. Wouldn''t have guessed that."'
+			'Your tongue instinctively flicks out to catch a liquid you feel dribbling down your cheek and you feel an overwhelming lack of surprise when it tastes like cum.'
+			act'Better than having to swallow':
+				cla
+				*nl
+				'"Yech-!" you stick your tongue out in distaste of the bitter sperm. "I''ll tell you what else, getting a facial is also a lot better because it means I don''t have to swallow," you say, reaching blindly for the showerhead.'
+				'"Oh. I thought girls were into that sort of thing. At least, a lot of the girls in porn swallow."'
+				'Finding the showerhead at last, you start to rinse off your face, responding, "Yeah, well, anyone who says they like to swallow is either a liar or a slut." Your face washed clean, you blink a couple times to see Kolka grinning at you.'
+				'"And what does that make you? A girl who lets her little brother cum on her face?"'
+				'You pause and smile back at him before answering. "A good sister."'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+
+			act'Tastes good too':
+				cla
+				*nl
+				'"Mmm... It tastes good too," you say appreciatively, licking your lips to find any more stray drops.'
+				'"Oh! So girls really do like to eat cum! I always wondered if that was just something they did in pornos."'
+				'You wipe your eyes so you can look at him and suck the spunk off your fingers.'
+				'"Oh yeah. I wish all face masks were as edible as a facial. Though they could probably never be this satisfying."'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+		end
+
+		if pcs_traits['cumeater'] = 1:
+			act'Feels like a waste':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial2.jpg"></center>'
+				'"Feels like a waste," you say, your tongue flicking about for any sperm it can find within its reach.'
+				'Clearly confused, Kolka asks, "What do you mean?"'
+				'Wiping your face with your hand, you give it a hard lick, savouring the flavour as you do. "You lose so much someone cums on your face. Falls off or gets stuck in your hair, hands aren''t really good utensils for scooping up cum either. Much easier to get it straight from the tap if you know what I mean.'
+				'Your brother''s confusion continues until his eyes go wide with the realization that you''re talking about enjoying the taste of semen. Almost as soon as the realization crosses his face, his eyes become obscured by confusion again.'
+				'"But if you like eating cum so much, why did you let me cum on your face?"'
+				'You give your hand another lick, sucking on the tips of your fingers where you scrapped the cum out of your eyebrow.'
+				'"''Cause I''m a good sister," you smile at him.'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+		end
+
+		act'I only did this because I owed you one':
+			cla
+			*nl
+			'"I only did this because I owed you one," You say, wiping the cum from your eyes with your hands. Your eyes clear, you see a questioning look on his face. "Did you already forget? I promised I''d let you cum on my face this time."'
+			'"Oh! Right... So you don''t like having cum on your face like that?"'
+			act'Not really':
+				cla
+				*nl
+				'"Not really, no," you say, grimacing as some drips into your eye before you find the showerhead.'
+				'"So... Why do you let me do it? Just because you promised?"'
+				'Finally rinsing your face clean, you turn to face him, meeting his eye.'
+				'"''Cause I''m a good sister."'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+
+			act'It''s just messy':
+				cla
+				*nl
+				'"It''s not like it actually feels that bad," you say, blinking to keep it out of your eyes and reaching for the showerhead. "It''s just really messy. Can be hard to clean out of your hair sometimes."'
+				'"Ahh. I see. So... Why did you let me do it today? Just because you promised? Cause we''re in the shower and it''s easier to clean?"'
+				'You turn towards him, meeting his eye, his cum still coating your face.'
+				'"Cause I''m a good sister."'
+				gs'brother_shower_sex','ending_route_routine'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'shower_creampie':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+	'You don''t respond verbally but pick up the pace, slapping your ass back against Kolka''s cock until he grabs you tight and you can feel his cock pulsating, spurts of cum pouring out inside you.'
+	$orgasm_txt = 'The sensation sends you over the edge and you orgasm as well, your pussy gripping him and squeezing every last drop of cum from his cock.'
+	gs 'arousal', 'vaginal', 1
+	gs 'cum_call', '', 'A34', 1
+	gs 'stat'
+	'Looking back at Kolka with a self satisfied smirk, you slip off his cock, feeling cum gush from your pussy and spatter on the bath tub floor.'
+	*nl
+	gs'brother_shower_sex','ending_route_routine'
+	if succubusflag = 0:
+		if knowpreg = 1 or thinkpreg = 1:
+			'You chuckle to yourself, "Well, at least I can''t get any more pregnant than I already am!"'
+		elseif birth_control['kolka_knows'] = 1:
+			'"I love having a sister who''s on birth control," he grins, watching another glob of cum dribble out of you.'
+!!			act'"Not as much as I do"':
+			
+!!			end
+			
+!!			act'"Be grateful"':
+			
+!!			end
+			
+!!			act'"You''d love me less if I weren''t on birth control?"':
+			
+!!			end
+		elseif birth_control['think_safe'] = 1:
+			birth_control['kolka_knows'] = 1
+			'"<<$pcs_nickname>>!" he says with wide eyes. "Is it okay that I came inside you like that? What if you get pregnant?"'
+			'"Don''t worry about it," you smile. "I''m on birth control. I could take a thousand creampies from you, I won''t get pregnant."'
+			'Kolka''s eyes get even wider and his cock already seems to be hardening up again.'
+			'<i>Whoops,</i> you think to yourself. <i>I wonder if it''s going to come back to bite me that I told him that...</i>'
+		elseif mesec > 0:
+			'"Happy?" you ask him. He nods back at you with a self-satisfied grin. "Just feel lucky that I''m on my period. I might not have let you do that otherwise."'
+		else
+			'You watch as another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>I need to buy a morning after pill from the pharmacy. What if I get pregnant?</i>'
+		end
+	end
+end
+
+if $ARGS[0] = 'shower_forced_creampie':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+	gs 'cum_call', '', 'A34', 1
+	gs 'stat'
+	if pcs_horny >= 90:
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'Smiling mischievously, you suddenly speed up instead of pulling out, causing your brother to erupt inside you. He groans as his cum spills into you, sending you over the edge as well with legs quivering and pussy milking his cock for everything he has to give. Finally, Kolka pulls away and his cock slips from inside you, cum bursting out of your pussy like an uncorked champagne bottle.'
+		gs 'arousal', 'vaginal', 1
+	else
+		'Smiling mischievously, you suddenly speed up instead of pulling out, causing your brother to erupt inside you. He groans and you curl your toes in pleasure, feeling his cum spurting deep inside you. It''s not enough to bring you to orgasm, but it still feels good. You tighten up on him and work your hips a little more, trying to milk him for a couple more shots. Finally, Kolka pulls away and his cock slips from inside you, cum bursting out of your pussy like an uncorked champagne bottle.'
+	end
+	if brothercumchoice = 3:
+		'Kolka steps back, staring as he watches his spunk drip from your pussy. "Why''d you do that? I wanted to give you a facial."'
+	elseif brothercumchoice = 4:
+		'Kolka steps back, staring as he watches his spunk drip from your pussy. "Why''d you do that? I wanted to cum in your mouth."'
+	end
+	*nl
+	act'And I wanted a creampie (argue)':
+		cla
+		'"And I wanted a creampie! Sorry Kolka, but my vote outweighs yours."'
+		'"And why''s that?!"'
+		'"Because."'
+		'"Because what?"'
+		'"Because I''m a girl, I''m a girl who''s your older sister, and I''m a girl who''s your older sister who''s letting you fuck her! And if it weren''t for me, then you''d be on a date with Pamela Handerson instead," you say, making a jerking motion with your hand. "You should be grateful to be getting anything at all, let alone deciding where you get to cum on me."'
+		'"But that''s not fair! So what I want doesn''t count for anything?"'
+		'"Nope! But I get to decide if I''m feeling generous."'
+		'With Kolka''s hands balled into fists at his side and your hands on your hips, the two of you glare at each other, scowling. This turned into a much bigger argument than you meant it to.'
+		if succubusflag = 0:
+			if knowpreg = 1 or thinkpreg = 1:
+				'You chuckle to yourself. "Well, at least I can''t get any more pregnant than I already am!"'
+			elseif birth_control['think_safe'] = 1 or tabletkishot >= 1:
+				'<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+				'<i>At least '+iif(birth_control['implant_status'] > 1, 'I have a birth control implant', 'I''m on birth control')+'...</i>'
+			elseif mesec > 0:
+				'<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+				'<i>At least I don''t have to worry about getting pregnant on my period... right...?</i>'
+			else
+				'<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Fuck. I shouldn''t have done this anyways. This gets me pregnant?</i>'
+			end
+		end
+		gs'brother_shower_sex','ending_route_routine'
+	end
+
+	act'It felt too good':
+		cla
+		'"I''m sorry Kolka! Your cock just felt so good, I couldn''t stop! You can''t be mad at me for being too addicted to your cock to stop, can you?" You kneel down, trying to apologize by cleaning him up with your tongue.'
+		if brothercumchoice = 3:
+			'He grumbles a bit but you can tell that he''s not mad at you. "I guess I can''t be mad about that... But next time I ask, I want to cum on your face!"'
+		elseif brothercumchoice = 4:
+			'He grumbles a bit but you can tell that he''s not mad at you. "I guess I can''t be mad about that... But next time I ask, I want to cum in your mouth! And you better swallow it!"'
+		end
+		'"Okay, it''s a promise," you say, standing back up and kissing him on the cheek. "So long as I can stop myself that is."'
+		if birth_control['think_safe'] = 1 or tabletkishot >= 1:
+			'<i>Fuck, that felt good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
+			'<i>It''s a good thing '+iif(birth_control['implant_status'] > 1, 'I have a birth control implant', 'I''m on birth control')+'...</i>'
+		elseif mesec > 0:
+			'<i>Fuck, that felt good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+			'<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+		else
+			'<i>Shit... I probably should have had more self control...</i> you think to yourself, watching another glob of cum dribble from your pussy. <i>What if this gets me pregnant?</i>'
+		end
+		gs'brother_shower_sex','ending_route_routine'
+	end
+
+	act'Too much mess':
+		cla
+		'"Too messy," you say. "Sorry Kolka, but I don''t feel like cleaning that off my face. You understand don''t you?"'
+		'"Yeah I guess..."'
+		if succubusflag = 0:
+			if knowpreg = 1 or thinkpreg = 1:
+				'You chuckle to yourself. "Well, at least I can''t get any more pregnant than I already am!"'
+			elseif birth_control['think_safe'] = 1 or tabletkishot >= 1:
+				'<i>Fuck, that feels good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
+				'<i>It''s a good thing '+iif(birth_control['implant_status'] > 1, 'I have a birth control implant', 'I''m on birth control')+'...</i>'
+			elseif mesec > 0:
+				'<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+				'<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+			else
+				'<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>Maybe I should have let him cum on my face after all... What if I get pregnant?</i>'
+			end
+		end
+		gs'brother_shower_sex','ending_route_routine'
+	end
+end
+
+if $ARGS[0] = 'shower_fill_me_up':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/shower/doggy5.mp4"></center>'
+	gs 'cum_call', '', 'A34', 1
+	gs 'stat'
+	'"Yes! Yes!" you cry out. "Fill me up!"'
+	if pcs_horny >= 90:
+		broshowerorgasm = daystart
+		$orgasm_or = 'custom'
+		$orgasm_txt = 'Your cries push him over the edge and Kolka can''t hold back any longer. He groans and pulls you tight against him. His cock plunges deep and you feel his cum spurting deep inside you. The sensation brings you to orgasm, body spasming and your pussy tightening up around him, squeezing him to the last drop. As your orgasm winds down and your legs stop quivering, you lean forward against the shower wall, Kolka''s cock slipping from between your legs.'
+		gs 'arousal', 'vaginal', 1
+	else
+		'Your cries push him over the edge and Kolka can''t hold back any longer. He groans and pulls you tight against him. His cock plunges deep and you feel his cum spurting deep inside you. You bite your lip and curl your toes, enjoying the sensation even if it doesn''t bring you to orgasm. Eventually his cock stops pulsating and you feel him slide out of you.'
+	end
+	'Pressing your face against the cool wall, you feel Kolka''s cum drip from your pussy, and look back at him.'
+	*nl
+	if succubusflag = 0:
+		if knowpreg = 1 or thinkpreg = 1:
+			*nl
+		elseif birth_control['kolka_knows'] = 1:
+			'"I love having a sister who''s on birth control," he grins, watching another glob of cum dribble out of you.'
+			'"Yeah, it was good for me too, thanks," you roll your eyes before straightening up.'
+		elseif birth_control['think_safe'] = 1:
+			birth_control['kolka_knows'] = 1
+			'"<<$pcs_nickname>>!" he says with wide eyes. "Is it okay that I came inside you like that? What if you get pregnant?"'
+			'"Don''t worry about it," you smile. "I''m on birth control. I could take a thousand creampies from you, I won''t get pregnant."'
+			'Kolka''s eyes get even wider and his cock already seems to be hardening up again.'
+			'<i>Whoops,</i> you think to yourself. <i>I wonder if it''s going to come back to bite me that I told him that...</i>'
+		elseif mesec > 0:
+			'"Happy?" you faintly smile at him. He nods back at you with a self-satisfied grin. "Just feel lucky that I''m on my period. I might not have let you do that otherwise."'
+		else
+			'He has a grin on his face while he watches the cum spilling out of you.'
+			'<i>Huh...</i> you think, basking in the afterglow. <i>I''ll have to buy a morning after pill from the pharmacy...</i>'
+		end
+	end
+	gs'brother_shower_sex','ending_route_routine'
+end
+
+!! ----------------------------------------------------------- Ending ---------------------------------------------------------------------
+
+if $ARGS[0] = 'ending_route_routine':
+	gs 'arousal', 'end'
+	if broshowerfuck = daystart:
+		act'Continue':gt'brother_shower_sex', 'brother_shower_fuck_end'
+	else
+		act'Finish showering together':gt'brother_voyeur', 'brother_shower_end'
+	end
+end
+
+if $ARGS[0] = 'brother_shower_fuck_end':
+	cla & *clr
+	noShampoo = 1
+	dynamic $showerdin
+	brother_shower_times += 1
+	minut += 2
+	if brotherfuck = 1 and brother_knows_not_virgin >= 1:
+		gs'stat'
+		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+		'Thoroughly satisfied with the dicking you received from your brother, you lean into him letting him feel you up from behind.'
+		'"So," you ask, nonchalantly grabbing his cock and working it gently. "Did you enjoy losing your virginity? Was it everything your teenage brain dreamed of?"'
+		'"Everything and more," he responds, gently pinching your nipples. You to moan and squeeze his dick in response. "But more than that, I''m happy to be part of the club."'
+		*nl
+		act'I''m glad you''re in the club too':
+			cla
+			'"I''m glad you''re in the club too," you smile back at him. "Seriously, I meant it when I said I don''t get around much. You''re not just another boy who''s fucked me Kolka. You''re my brother. You''re special."'
+			'He hesitates before he asks his next question. "Does that mean that I''m going to be the only ''active'' member of the club? I mean... does this mean that I''m going to be the only one you have sex with?"'
+			act'No, it means we help each other out':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+				if brotherSex < 9:brotherSex = 9
+				'"Well..." You think for a moment. "I''d still like to get a boyfriend, maybe get married some day. And I like fucking you, but you''re still just my brother to me. I can''t really see you any other way. Besides, I''m sure that you''d like to get a real girlfriend someday. Not just be that boy who''s so pathetic because the only poon he can get is from his sister. Maybe we can just take care of each other? So we''d still see other people and stuff, but we can always fuck each other''s brains out whenever we need some relief. How does that sound?"'
+				'"Sounds good," he grins at you. "Besides, you can''t be the only girl I have sex with. I need to fuck a real virgin some day. Not some loose slut throwing freebies to her brother."'
+				'You smack his arm but smile anyways. "Yeah, but I still have <i>your</i> virginity. No matter how many other girls'' you take, yours will always be mine!"'
+				'The two of you banter back and forth for a little while longer before you realize someone might notice that your brother is missing and become suspicious. You quickly shut off the water and dry him off, gathering Kolka''s clothes and shooing him into the hallway.'
+				act'Finish':mirror_steam = hour & gt $loc
+			end
+			act'Yes, I love you':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+				if brotherSex < 10:brotherSex = 10
+				'His question strikes you by surprise. Even more surprisingly, you hear yourself whispering.'
+				'"Yes."'
+				'"You''re the only one for Kolka. You''re my brother and I love you like a brother but... I also feel something more for you. I want to be with you. I love you."'
+				'He seems taken aback by your answer and thinks about it for a minute.'
+				'"Yeah. I love you too sis," he says, gently kissing you. He seems happy but a little wistful. "I wish I could have taken your virginity too though."'
+				'You quickly try to console him. "I''m sorry Kolka! I''m sorry I couldn''t save it for you. But I''ll make it up to you! Because you''re going to get to far more of me than the person who took it. You''ll have me forever..."'
+				'The sit under the water together for a little while longer before you realize someone might notice that your brother is missing and become suspicious. You quickly shut off the water and dry him off, gathering Kolka''s clothes and shooing him into the hallway.'
+				act'Finish':mirror_steam = hour & gt $loc
+			end
+		end
+
+		act'Glad to have a new member (slut)':
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
+			'"Oh yeah, I''m glad to have a new member. You can never have enough members inside y-, I mean, in the club," you say, winking at him mischievously.'
+			'"Slut."'
+			'"Cocktoy."'
+			'"Cum dump."'
+			'"Dicking machine."'
+			'"Cocksleeve."'
+			'The two of you banter back and forth for a little while longer before you realize someone might notice that your brother is missing and become suspicious. You quickly shut off the water and dry him off, gathering Kolka''s clothes and shooing him into the hallway.'
+			act'Finish':mirror_steam = hour & gt $loc
+		end
+	else
+		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
+		'Your teenage fuck session finished and bodies relatively clean -despite your best attempts to undo the effects of your recent washing- the two of you rinse yourselves off one last time to ensure no cum or other suspicious bodily fluids remain.'
+		*nl
+		if brotherfuck = 1 and brothervirginlie = 3:
+			cla
+			'"Hey <<$pcs_nickname>>. Can I ask you something? I''ve been wondering..."'
+			'"Hmm? What is it?"'
+			if pcs_vag >= 25:
+				'"If it was your first time, how come you''re so loose?"'
+				'<i>Shit!</i>'
+				'"I always heard that virgins are supposed to be really tight for their first time, but you weren''t. I mean, it still felt really good but I slid in so easily. How come?"'
+				'Unable to come up with a suitable explanation, you decide to retaliate with false offense.'
+				'"What are you trying to say about me? Huh? That I''m a slut? That I would lie to you about giving you my virginity? How dare you!"'
+				'Kolka shies away at your sudden burst of emotion.'
+				'"I''m sorry! I jus-"'
+				'"Just nothing! I can''t believe I just gave my virginity to such an ungrateful brat!"'
+				act'Kick him out to cover up your lie':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+					'Not knowing what else to do, you yank open the shower curtain and shove Kolka towards the door.'
+					'"Get out."'
+					'"But I-!"'
+					'"Out!"'
+					'Still dripping wet with his clothes in his arms, you shove your brother into the hallway naked. If your parents ask about it, you''ll just tell them he was peeping on you and you sprayed him with the showerhead.'
+					'Your brother out of the room you lean back onto the door and close your eyes, feeling bad for what you just did. Maybe you shouldn''t have lied to him about that after all...'
+					brother_knows_not_virgin = 1
+					brothervirginlie = 0
+					act'Finish up':mirror_steam = hour & gt $loc
+				end
+			else
+				'"If that was your first time, how come you didn''t have a hymen? Isn''t that supposed to tear the first time a girl has sex? I didn''t feel it when I put my dick inside you."'
+				'<i>Shit!</i>'
+				'"Well, uhh, I''m definitely a virgin! I mean, I was until you fucked me for the first time, uhh, today!" you stammer, hoping your furious blush is covered up by the heat of the shower. "You definitely tore my hymen! It, uhh, it really hurt! Maybe you just didn''t notice when you did! I sure noticed! Ahaha, haha, ha..."'
+				'"Hmm. Well, you <i>were</i> pretty tight. You''re probably right and I just didn''t feel it."'
+				'You sigh quietly in relief, your hasty lies about your chastity bought by your brother. That was a close one...'
+				act'Finish showering':
+					pcs_horny = 0
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+					'Stepping out of the shower, you grab a towel to personally help your brother dry off, paying special attention to his cock and balls. Once finished, you stand back to smirk at him, you yourself still naked and dripping wet.'
+					'"Well? Did you have fun showering with your sister??"'
+					'Kolka does nothing but grin at you in response.'
+					*nl
+					act'Ruffle his hair and send him on his way':
+						cla
+						'"Well, glad you enjoyed yourself," you say, ruffling his hair, smiling when he cringes back in response to the child-like treatment. "See you later bro."'
+						'He nods back at you, picking up his clothes before peeking into the hallway to make sure no one is there and slipping out the door.'
+						brother_knows_not_virgin = 1
+						brothervirginlie = 0
+						act'Finish drying off':mirror_steam = hour & gt $loc
+					end
+					
+					act'Kiss him goodbye (just a peck)':
+						cla
+						'You lean in and peck Kolka on the lips with a quick kiss.'
+						'"See you next time," you smile.'
+						'He smiles back at you and picks up his clothes before peeking into the hallway to make sure no one is there and slipping out the door.'
+						brother_knows_not_virgin = 1
+						brothervirginlie = 0
+						act'Finish drying off':mirror_steam = hour & gt $loc
+					end
+
+					act'Kiss him goodbye (intimate)':
+						cla
+						'You lean in to give your brother an intimate kiss, then stepping back to meet his eyes.'
+						'"See you later," you whisper.'
+						'He smiles back at you and picks up his clothes before peeking into the hallway to make sure no one is there and slipping out the door.'
+						brother_knows_not_virgin = 1
+						brothervirginlie = 0
+						act'Finish drying off':mirror_steam = hour & gt $loc
+					end
+
+					act'Until next time (grab his cock)':
+						cla
+						'A sly smile on your face, you step forward to grab him by the cock.'
+						'"Until next time little brother," you murmur into his ear, giving his dick a hard squeeze. Then, you slap his ass and push him towards the door. "Now, shoo! Before someone catches us in here together."'
+						'Startled, he does as you say, picking up his clothes and peeking into the hallway to make sure no one is there before slipping out the door.'
+						brothervirginlie = 0
+						act'Finish drying off':mirror_steam = hour & gt $loc
+					end
+				end
+			end
+		elseif brotherfuck = 1 and brothervirginlie <= 2 and brothervirginlie >= 1:
+			cla
+			'"Hey <<$pcs_nickname>>. Can I ask you something? I''ve been wondering..."'
+			'"Hmm? What is it?"'
+			'"When I put it in before, I thought I felt something, some kind of resistance. When I pushed past it I heard you make a sound, like you were in pain. Was... was that your hymen?"'
+			'You freeze in place suddenly, not knowing what to do.'
+			'"Did you lie to me about not being a virgin?"'
+			'You turn towards him, biting your lip and not saying anything. The guilty look on your face gives everything away.'
+			'"Why did you lie about that <<$pcs_nickname>>?"'
+			act'I don''t know':
+				npc_rel['A34'] += 25
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+				if brothervirginlie = 1:
+					'"I... I don''t know. I just panicked I guess. Thought that maybe it might be better for you if you thought your big sister was more experienced and had been with other boys before." You look back at him apprehensively, worried about what he''ll say or do next now that you''ve admitted the truth.'
+				elseif brothervirginlie = 2:
+					'"I... I don''t know. I just panicked I guess. Thought that maybe it might be better for you if you thought your big sister was a big slut who fucked all the boys in town." You look back at him apprehensively, worried about what he''ll say or do next now that you''ve admitted the truth.'
+				end
+				'Your brother regards you for a moment. And then he smiles.'
+				'"Dummy."'
+				'You shy away. And then blink a few times registering what you just heard.'
+				'"What...?"'
+				'"I called you a dummy <<$pcs_nickname>>. How could you think that I''d like you more if you were fucking other guys? You know that most guys like to fuck virgins, right?"'
+				'"They do?"'
+				'"Yes, we do! Anyone can fuck a slut. That''s what makes them sluts. But a girl is only a virgin once. And besides..." His grin grows wider. "This means that we lost our virginities together. I have yours and you have mine. And... I know we''re siblings and stuff... I know that some people think that''s wrong, but you being my sister just makes this feel more right to me. I feel closer to you now. How many other brothers and sisters can say they had their first time together? I''m glad you were a virgin! And I''m glad we got to share that together..."'
+				'He trails off and you eye him for a moment before you break into a smile, wrapping him a tight hug.'
+				'"Aww! You''re actually quite the romantic, little brother!"'
+				'"Pfft~! It''s not like I''m gonna marry you or anything like that. You''re still my sister. And I''m still gonna fuck lots of other girls once they start looking my way! But..." he trails off again.'
+				'"... now we have a bond that other siblings don''t have," you finish. "And no matter what else happens, we''ll carry each other''s virginities for the rest of our lives." He nods.'
+				act'Continue':
+					brotherSex = 9
+					minut += 5
+					gs 'stat'
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+					'You stand together for a few more minutes, holding each other under the water of the shower, not saying anything. Finally, you break the silence.'
+					'"Well, if you''re going to be trying to fuck other girls, you can''t be mad at me when I fuck other boys," you smirk at him.'
+					'"Go ahead! I won''t need you! In a couple years, I''ll practically be drowning in pussy!"'
+					'"Yeah, right! That sounds about as likely as your dick growing 20 centimeters overnight! I''m more likely to find you sitting at home with blue balls, begging me for blowjobs."'
+					'"You''ll see! Girls will be lining up the block for a turn to ride my magnificent cock!"'
+					act'And what if I want a turn?':
+						cla & *clr
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+						'"And if I want a turn? Will I have to wait in line like the rest?"'
+						'He opens his mouth and pauses, suddenly realizing the implications of your turn in the flow of banter.'
+						'"... no..." he mutters. "... you won''t have to wait... sisters get special dick privileges."'
+						'Kolka looks away, his cheeks a little redder than they were before, an erection hardening and rubbing up against your thighs. You smile at him. He can be such a sweet boy sometimes.'
+						'"Good! And <i>you</i> should know, little brothers get an all access pussy pass too," you say, leaning in to give him a light kiss on the lips.'
+						'"... even if you have a boyfriend?" he asks hesitantly.'
+						'"Even if I have a boyfriend," you insist. "After all, my relationship with my brother is special. He took my virginity!"'
+						*nl
+						'The conversation winding down, the two of you remember that you have to get your brother out of here, lest the rest of your family grow suspicious of his absence. Leaving the shower running, you quickly help him towel off. Afterwards, he collects his clothes, gives you another quick kiss on the cheek, and slips out the door into the hallway. Your brother gone, now there''s nothing left to do but turn off the water and dry yourself off.'
+						brothervirginlie = 0
+						act'Finish drying off':mirror_steam = hour & gt $loc
+					end
+				end
+			end
+		end
+		if brothervirginlie = 0:
+			act'Did you have fun?':
+				pcs_horny = 0
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+				'Thoroughly satisfied with the dicking you received, you grab a towel to personally help your brother dry off, paying special attention to his cock and balls. Once finished, you stand back to smirk at him, you yourself still naked and dripping wet.'
+				'"Well? Did you have fun showering with your sister??"'
+				'Kolka does nothing but grin at you in response.'
+				*nl
+				act'Ruffle his hair and send him on his way':
+					cla
+					brother_knows_not_virgin = 1
+					brothervirginlie = 0
+					'"Well, glad you enjoyed yourself," you say, ruffling his hair, smiling when he cringes back in response to the child-like treatment. "See you later bro."'
+					'He nods back at you, picking up his clothes before peeking into the hallway to make sure no one is there and slipping out the door.'
+					act'Finish drying off':mirror_steam = hour & gt $loc
+				end
+
+				act'Kiss him goodbye':
+					cla
+					brother_knows_not_virgin = 1
+					brothervirginlie = 0
+					'You lean in to give your brother an intimate kiss, then stepping back to meet his eyes.'
+					'"See you later," you whisper.'
+					'He smiles back at you and picks up his clothes before peeking into the hallway to make sure no one is there and slipping out the door.'
+					act'Finish drying off':mirror_steam = hour & gt $loc
+				end
+
+				act'Until next time (grab his cock)':
+					cla
+					brothervirginlie = 0
+					'A sly smile on your face, you step forward to grab him by the cock.'
+					'"Until next time little brother," you murmur into his ear, giving his dick a hard squeeze. Then, you slap his ass and push him towards the door. "Now, shoo! Before someone catches us in here together."'
+					'Startled, he does as you say, picking up his clothes and peeking into the hallway to make sure no one is there before slipping out the door.'
+					act'Finish drying off':mirror_steam = hour & gt $loc
+				end
+			end
+			act'Kick him out':
+				cla & *clr
+				brother_knows_not_virgin = 1
+				brothervirginlie = 0
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/vanrpar.jpg"></center>'
+				if brothervirginlie ! 2:
+					'Thoroughly annoyed with Kolka, you shove him towards the door.'
+				elseif brothervirginlie = 2:
+					'Not knowing what else to do, you yank open the shower curtain and shove Kolka towards the door.'
+					'"Get out."'
+					'"But I-!"'
+					'"Out!"'
+					'Still dripping wet with his clothes in his arms, you shove your brother into the hallway naked. If your parents ask about it, you''ll just tell them he was peeping on you and you sprayed him with the showerhead.'
+					'<br>Your brother out of the room you lean back onto the door and close your eyes, feeling bad for what you just did. Maybe you shouldn''t have lied to him about that after all...'
+				end
+				if pcs_horny > 70 and brothervirginlie ! 2:'And fuck! You''re still so goddamn horny!'
+				act'Finish up':mirror_steam = hour & gt $loc
+			end
+		end
+	end
+end
+
+--- brother_shower_sex ---------------------------------

File diff suppressed because it is too large
+ 283 - 421
locations/brother_voyeur.qsrc


+ 6 - 3
locations/brother_voyeur_sex.qsrc

@@ -71,7 +71,7 @@ if $ARGS[0] = 'brother_shower_bj':
 						end
 					end
 
-					if trt_cumeater = 1:
+					if pcs_traits['cumeater'] = 1:
 						act'I didn''t want to waste it':
 							cla & *clr
 							'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
@@ -433,6 +433,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 			'"Sorry, I''ll try to stop..."' 
 			'"No, it''s not a complaint, it was just unexpected," he replies.'
 			act 'Try to relax':
+				*clr & cla
 				'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
 				'After another minute, Kolka asks "Can I start to move now?"'  
 				'You take a deep breath. "Yes, but go slow."'  
@@ -521,6 +522,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analnv':
 	gs 'arousal', 'anal', 3
 	gs 'stat'
 	act 'Enjoy':
+		*clr & cla
 		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
 		'As the water from the shower falls on your back and between your ass cheeks, you feel Kolka breaching your anus in one powerful motion. As the glorious feeling of his cock fills you up, he reaches forward and grasps your breasts. A moment later, he''s started moving, and you meet his thrusts by pushing back, willing him to go deeper. Every time he withdraws, you feel yourself gripping him to unconsciously pull him back in.'
 		'"I''m about to cum," he says, and you simply nod. Aafter a final flurry of thrusts, Kolka cums, flooding your bowels with his seed.'
@@ -528,6 +530,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analnv':
 		gs 'cum_call', 'anal', 'A34', 1
 		gs 'stat'
 		act 'Clean up':
+			*clr & cla
 			gs 'arousal', 'end'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
@@ -851,7 +854,7 @@ if $ARGS[0] = 'shower_swallow':
 			end
 		end
 
-		if trt_cumeater = 1:
+		if pcs_traits['cumeater'] = 1:
 			act'"Tasty!"':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershower.jpg"></center>'
@@ -1148,7 +1151,7 @@ if $ARGS[0] = 'shower_facial':
 			end
 		end
 
-		if trt_cumeater = 1:
+		if pcs_traits['cumeater'] = 1:
 			act'Feels like a waste':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/facial2.jpg"></center>'

+ 6 - 6
locations/cikl.qsrc

@@ -254,15 +254,15 @@ bimbo_flag = 0
 !!------------------------------------------------------------------------------------------------------------
 
 if orgasm_anal > orgasm_anal[1]:
-	if traits['buttslut_lvl'] > 0: traits['buttslut_exp'] += orgasm_anal - orgasm_anal[1]
+	if pcs_traits['buttslut_lvl'] > 0: pcs_traits['buttslut_exp'] += orgasm_anal - orgasm_anal[1]
 else
-	if traits['buttslut_exp'] > 1: traits['buttslut_exp'] -= 1
+	if pcs_traits['buttslut_exp'] > 1: pcs_traits['buttslut_exp'] -= 1
 end
 orgasm_anal[1] = orgasm_anal
-if orgasm_anal > 10 and traits['buttslut_lvl'] = 0: traits['buttslut_lvl'] = 1
-if traits['buttslut_exp'] >= 15 and traits['buttslut_lvl'] = 1: traits['buttslut_lvl'] = 2 & traits['buttslut_exp'] = 0
-if traits['buttslut_exp'] >= 50 and traits['buttslut_lvl'] = 2: traits['buttslut_lvl'] = 3
-if traits['buttslut_exp'] <= 0 and traits['buttslut_lvl'] = 3: traits['buttslut_lvl'] = 2 & traits['buttslut_exp'] = 0
+if orgasm_anal > 10 and pcs_traits['buttslut_lvl'] = 0: pcs_traits['buttslut_lvl'] = 1
+if pcs_traits['buttslut_exp'] >= 15 and pcs_traits['buttslut_lvl'] = 1: pcs_traits['buttslut_lvl'] = 2 & pcs_traits['buttslut_exp'] = 0
+if pcs_traits['buttslut_exp'] >= 50 and pcs_traits['buttslut_lvl'] = 2: pcs_traits['buttslut_lvl'] = 3
+if pcs_traits['buttslut_exp'] <= 0 and pcs_traits['buttslut_lvl'] = 3: pcs_traits['buttslut_lvl'] = 2 & pcs_traits['buttslut_exp'] = 0
 
 !!------------------------------------------------------------------------------------------------------------
 !!	Exhibitionism

+ 12 - 12
locations/city_center.qsrc

@@ -44,7 +44,7 @@ else
 end
 *nl
 
-'Day or night the city center is alive and bustling. Whether You''re looking to shop, hit the gym or get some cheap food, you''ll find it hard not to have your needs satisfied.'
+'Day or night, the city centre is alive and bustling. So whether you''re looking to shop, hit the gym or get some cheap food, you''ll find it hard not to have your needs satisfied.'
 *nl
 
 gs'street_event','city_center', 'extras'
@@ -73,15 +73,15 @@ if shantpopala > 0:
 	rape += 1
 	shantpopala -= 1
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/sex/rape.jpg"></center>'
-	'On the street close to you, a black jeep suddenly hit the brakes. You turn your head to see what''s happening and see two large men jump of it and start to run towards you in. Before you can react and run away, they grap you and drag you into the car.'
-	'"You''re doing this for a living? Taking pictures of naked people in the park?", one of the shouts, holding one of the pictures to your face you''ve made awhile back and sent someone over a social network, hoping they would pay the ransom.'
-	'"No... what? What the hell is going on? I don''t know what you''re talking about!", you try to explain.'
-	'"Don''t lie to use you stupid bitch.", as he said that, he hits you on your head and you pass out.'
-	'You wake up somewhere out of town, you''re tied up and naked. You look down on yourself and notice traces of cum on your body, it also seems like that cum is flowing from your ass and your pussy.'
-	'You notice that the blokes, who captured you sit next to you and seem to have a break, some of them are smoking.'
-	'"Oh, she is finally awake, then the next fuck-cycle will be far more fun.", one of the men said, as he noticed you moving. Some of them are starting to get an evil grin on their face.'
-	'They got up and came back at you, barely a minute later you wished your were still knocked out, as these jackasses had their ways with. You tried to resist, but the tape hindered you from moving. Not long after, everything faded to black and you lost you consciousness again.'
-	'You feel groggy as you wake up, but it feels like someone is grapping you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he shouts, then kicks you into the stomach and leaves. As you collapse on the ground holding your stomach in pain, you take a glimpse at the street and see the assholes driving away in their black jeep. The mainroad is about 200m away, you crawl most of the way there, but soon you can walk again and eventually you find your way back to one of the mainstreets.'
+	'A black jeep suddenly hit the brakes on the street close to you. You turn your head to see what''s happening and see two prominent men jump out of it and start running towards you. Before you can react and run away, they grab you and drag you into the car.'
+	'"You''re doing this for a living? Taking pictures of naked people in the park?" one of them shouts while holding one of the pictures to your face you''ve made a while back and sent someone over a social network, hoping they would pay the ransom.'
+	'"No... what? What the hell is going on? I don''t know what you''re talking about!" you try to explain.'
+	'"Don''t lie to us, you stupid bitch." as he says that, he hits you on your head, and you pass out.'
+	'You wake up somewhere out of town, tied up and naked. You look down on yourself and notice traces of cum on your body. It also seems like that cum is flowing from your ass and pussy.'
+	'You notice that the blokes, who captured you, sit next to you and seem to have a break. Some of them are smoking.'
+	'"Oh, she is finally awake, then the next fuck-cycle will be far more fun.", one of the men said as he noticed you moving. Some of them are starting to get evil grins on their face.'
+	'They got up and came back at you. Barely a minute later, you wished you were still knocked out, as these jackasses had their ways with. You tried to resist, but the tape hindered you from moving. Not long after, everything faded black, and you lost consciousness again.'
+	'You feel groggy as you wake up, but someone grabs you by the hair and shouts at you. "Let this be a lesson for you, bitch.", he yells, then kicks you in the stomach and leaves. As you collapse on the ground holding your stomach in pain, you glimpse the street and see the assholes driving away in their black jeep. The main road is about 200m away. You crawl most of the way there, but soon you can walk again, and eventually, you find your way back to one of the main streets.'
 	gs 'arousal', 'bj', -60, 'sub', 'gangbang','humiliation', 'rough'
 	gs 'arousal', 'vaginal', -60, 'sub', 'gangbang', 'humiliation', 'rough'
 	gs 'arousal', 'anal', -60, 'sub', 'gangbang', 'humiliation', 'rough'
@@ -225,7 +225,7 @@ end
 
 
 if Enable_tablemap = 0:
-	if nichTanyaRelationship = 1 and nichWork ! 2 and hour >= 16 and hour <= 21 and nichTanyaFuckLast ! daystart:'<a href="exec:gt ''nichApartment'', ''visitTanya''">Apartment where Tanya lives</a>.'
+	if nichTanya['Relationship'] = 1 and nichWork ! 2 and hour >= 16 and hour <= 21 and nichTanya['FuckLast'] ! daystart:'<a href="exec:gt ''nichApartment'', ''visitTanya''">Apartment where Tanya lives</a>.'
 	if nichWork = 2:'<a href="exec:gt ''nichApartment''">Nicholas''s</a> apartment where you work as a live in maid.'
 	if izoldaQW >= 1:'Your friend <a href="exec:gt ''qwIzoldaApp''">Isolde''s</a> apartment.'
 	if mainQW >= 1:'<a href="exec:gt ''tatiana_lab'', ''start''">Tatiana''s</a> secret hideout.'
@@ -233,7 +233,7 @@ if Enable_tablemap = 0:
 	if peter > 0:'<a href="exec:gt ''peterroom'', ''start_door''">Peter</a> the sexshop owner''s apartment.'
 else
 	st_count=0 & $show_table=''
-	if nichTanyaRelationship = 1 and nichWork ! 2 and hour >= 16 and hour <= 21 and nichTanyaFuckLast ! daystart:gs'show_table','<a href="exec:gt ''nichApartment'', ''visitTanya''">Apartment</a> where Tanya lives','3'
+	if nichTanya['Relationship'] = 1 and nichWork ! 2 and hour >= 16 and hour <= 21 and nichTanya['FuckLast'] ! daystart:gs'show_table','<a href="exec:gt ''nichApartment'', ''visitTanya''">Apartment</a> where Tanya lives','3'
 	if nichWork = 2:gs'show_table','<a href="exec:gt ''nichApartment''">Nicholas''s</a> apartment','3'
 	if izoldaQW >= 1:gs'show_table','<a href="exec:gt ''qwIzoldaApp''">Isolde''s</a> apartment','3'
 	if mainQW >= 1:gs'show_table','<a href="exec:gt ''tatiana_lab'', ''start''">Tatiana''s</a> secret hideout','3'

+ 7 - 8
locations/city_clinic.qsrc

@@ -201,7 +201,7 @@ if $ARGS[0] = 'start':
 
 	if katjob > 0:act 'Visit the chief doctor': gt 'city_clinic', 'glavdoc'
 
-	if (pcs_teeth > -1 and (dentistday + 90 < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
+	if (pcs_teeth > -1 and (dentistday < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
 		act 'Go to the dentist':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/shared/clinic/dentist.jpg"></center>'
@@ -212,7 +212,6 @@ if $ARGS[0] = 'start':
 			if pcs_brace = 1:
 				pcs_brace = 0
 				pcs_teeth -= 1
-				dentistday = daystart
 				'The dentist spends 15 minutes to take of you brace and clean up. You look at the mirror afterward and you teeth are '+iif(pcs_teeth = 0, 'now straight', 'straighter, but can still use some more work.')
 				gs 'AppearanceSystem', 'UpdateBaseAppearnce'
 				gs 'stat'
@@ -244,11 +243,11 @@ if $ARGS[0] = 'start':
 								pcs_missing_teeth = 0
 								'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
 							elseif pcs_teeth > 0:
-								dentistday = daystart
+								dentistday = daystart + 180
 								pcs_brace = 1
-								'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it three months to have it taken of.'
+								'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
 							else
-								dentistday = daystart
+								dentistday = daystart + 90
 								pcs_teeth = -1
 								'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
 							end
@@ -267,12 +266,12 @@ if $ARGS[0] = 'start':
 								pcs_missing_teeth = 0
 								'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
 							elseif pcs_teeth > 0:
-								dentistday = daystart
+								dentistday = daystart + 180
 								pcs_brace = 1
-								'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it three months to have it taken of.'
+								'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
 							else
 								pcs_teeth = -1
-								dentistday = daystart
+								dentistday = daystart + 90
 								'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
 							end
 							gs 'AppearanceSystem', 'UpdateBaseAppearnce'

+ 1 - 1
locations/city_nightclub.qsrc

@@ -304,7 +304,7 @@ if $ARGS[0] = 'dance':
 					gs 'stat'
 
 					if pcs_horny < 90:
-						act 'Go to the dance floor':gt 'city_nightclub', 'dance'
+						act 'Leave him':gt 'city_nightclub', 'dance'
 					end
 
 					act 'Kiss':

+ 3 - 3
locations/city_sauna.qsrc

@@ -211,7 +211,7 @@ if $ARGS[0] = 'saunaroom':
 				$lastwornbratype['bed'] = $braworntype
 				lastwornbranumber['bed'] = brawornnumber
 				if $clothingworntype ! 'nude': gs 'clothing', 'strip'
-				gt 'bed2', 'succhoice'
+				gt 'sleep', 'succhoice'
 			end
 		else
 			if workDolg > 0 or money >= 850:
@@ -238,9 +238,9 @@ if $ARGS[0] = 'saunaroom':
 					end
 					if $clothingworntype ! 'nude': gs 'clothing', 'strip'
 					if magf2bdo = 2:
-						gt 'bed2', 'magbstchoice'
+						gt 'sleep', 'magbstchoice'
 					else
-						gt 'bed2', 'sleep'
+						gt 'sleep', 'sleep'
 					end
 				end
 				killvar '$sleep_txt'

+ 9 - 1
locations/clothing.qsrc

@@ -418,7 +418,7 @@ if $ARGS[0] = 'clothing_list':
 			:loopgm_school_filter
 		end
 
-		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and gm_school_s[6] = cloc and ($clothingworntype ! 'gm_school' or clothingwornnumber ! 6):
+		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and ($clothingworntype ! 'gm_school' or clothingwornnumber ! 6):
 			if (clothingfilter['quality'] = 0 and CloQuality = clo_i) or (clothingfilter['inhibition'] = 0 and CloInhibit = clo_i) or clothingfilter['number'] = 0:*P dyneval($clothing_list_line, $ward_list_page, 'gm_school', 6)
 		end
 
@@ -1665,6 +1665,14 @@ if $ARGS[0] = 'strip_all':
 	gs 'clothing', 'strip', $strip_loc
 end
 
+if $ARGS[0] = 'dispose':
+	dynamic $clothingworntype + '[<<clothingwornnumber>>] = 0'
+	$lastwornclothingtype = 'none'
+	lastwornclothingnumber = 0
+	$clothingworntype = 'none'
+	clothingwornnumber = 0
+end
+
 if $ARGS[0] = 'strip':
 	!$strip_loc = location when stripping outdoors
 	$strip_loc = $ARGS[1]

+ 96 - 5
locations/clothing_QV.qsrc

@@ -1313,15 +1313,106 @@ if $ARGS[0] = 'change':
 		if CloInhibit > 10:
 			if CloInhibit + 10 > pcs_inhib: 'You find this outfit more revealing than you are completely comfortable with but that makes it quite exciting too.'
 		end
-		act 'Wear this outfit':
-			gs 'clothing', 'wear', $ARGS[1], ARGS[2]
+		
+		!!Therapist force exhibitionist clothing check
+		if hypnoClothes > 0:
+			if CloStyle2 = 4:
+				if CloThinness < 3:		
+					act 'Wear this outfit':
+						cla
+						*clr		
+						'You pick up the uniform and think about trying them on... but you don''t really like wearing these type of uniform. You wonder if you can find more revealing uniform.'
+						gs 'willpower', 'misc', 'resist', 'easy'
+						will_cost += hypnoTime/CloThinness
+						if will_cost <= pcs_willpwr:
+							act 'Put them on anyways (<<will_cost>> Willpower)':
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gs 'clothing', 'wear', $ARGS[1], ARGS[2]
+
+								if $regularwornclothingtype = '':
+									gt 'wardrobe', 'main'
+								else
+									gt 'clothing_QV', 'gym'
+								end
+							end
+						else
+							act 'Put them on anyways (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Back':
+							if $regularwornclothingtype = '':
+								gt 'wardrobe', 'main'
+							else
+								gt 'clothing_QV', 'gym'
+							end
+						end
+					end	
+				else
+					act 'Wear this outfit':
+						gs 'clothing', 'wear', $ARGS[1], ARGS[2]
 
-			if $regularwornclothingtype = '':
-				gt 'wardrobe', 'main'
+						if $regularwornclothingtype = '':
+							gt 'wardrobe', 'main'
+						else
+							gt 'clothing_QV', 'gym'
+						end
+					end
+				end
 			else
-				gt 'clothing_QV', 'gym'
+				if CloThinness < 6:		
+					act 'Wear this outfit':
+						cla
+						*clr		
+						'You pick up the outfit and think about trying them on... but you don''t really like wearing these type of outfits'
+						gs 'willpower', 'misc', 'resist', 'easy'
+						will_cost += hypnoTime
+						if will_cost <= pcs_willpwr:
+							act 'Put them on anyways (<<will_cost>> Willpower)':
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								gs 'clothing', 'wear', $ARGS[1], ARGS[2]
+
+								if $regularwornclothingtype = '':
+									gt 'wardrobe', 'main'
+								else
+									gt 'clothing_QV', 'gym'
+								end
+							end
+						else
+							act 'Put them on anyways (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Back':
+							if $regularwornclothingtype = '':
+								gt 'wardrobe', 'main'
+							else
+								gt 'clothing_QV', 'gym'
+							end
+						end
+					end	
+				else
+					act 'Wear this outfit':
+						gs 'clothing', 'wear', $ARGS[1], ARGS[2]
+
+						if $regularwornclothingtype = '':
+							gt 'wardrobe', 'main'
+						else
+							gt 'clothing_QV', 'gym'
+						end
+					end
+				end
+			end	
+		else
+			act 'Wear this outfit':
+				gs 'clothing', 'wear', $ARGS[1], ARGS[2]
+				if $regularwornclothingtype = '':
+					gt 'wardrobe', 'main'
+				else
+					gt 'clothing_QV', 'gym'
+				end
 			end
 		end
+		
+
 	end
 end
 

+ 1 - 0
locations/dimaHome.qsrc

@@ -403,6 +403,7 @@ if $ARGS[0] = 'kitchen1':
 	*clr & cla
 	menu_off = 1
 	minut += 1
+	met_DimkaMother = 1
 	gs 'stat'
 	'<center><b><font color = maroon>Kitchen</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/dimkahome/olya.jpg"></center>'

+ 3 - 3
locations/dimaRevenge.qsrc

@@ -618,11 +618,11 @@ if dimaRevChoice = 2:
 						!!combat!!
 						!!if you win!!
 						'Lera is unconscious on the ground as you hold Lena by the hair. "I didn''t say shit about you," you tell her.'
-						'You let go of her and turn to head home, but then you see Vitek walking towards you. He looks pissed. He must have just seen you beat up his sister. You make to run but are tripped by Lena. You close your eyes, afraid of what he''ll do to you, but nothing happens. You open your eyes to see Ivan<<$dimaRevenge[''Fedor Involved'']>>holding Vitek back. Vitek is swearing at the top of his lungs. As you get up and dust yourself off, Dan, Vasily, Paulina and Ekaterina come to investigate and see Vitek getting ganged up on. Things get crazy after that.'
+						'You let go of her and turn to head home, but then you see Vitek walking towards you. He looks pissed. He must have just seen you beat up his sister. You make to run but are tripped by Lena. You close your eyes, afraid of what he''ll do to you, but nothing happens. You open your eyes to see Ivan<<$dimaRevenge[''Fedor Involved'']>>holding Vitek back. Vitek is swearing at the top of his lungs. As you get up and dust yourself off, Dan, Vasily, Pauline and Ekaterina come to investigate and see Vitek getting ganged up on. Things get crazy after that.'
 					elseif win = 1:
 						!!if you lose!!
 						'The two of them are too strong for you and you get knocked to the ground. They start kicking you. You do your best to block their kicks while trying to get up, but they keep knocking you down. You are about to give up when Ivan<<$dimaRevenge[''Fedor Involved'']>>show up. Fedor tosses Lera aside and Ivan grabs Lena by the shoulders and tries to calm her down. Suddenly you hear an angry yell, and you see Vitek charging towards Ivan.
-						You get up in time to see Dan, Vasily Paulina, and Ekaterina arrive, followed by Erast and Lazar. Things get crazy after that, with Roman showing up last.'
+						You get up in time to see Dan, Vasily Pauline and Ekaterina arrive, followed by Erast and Lazar. Things get crazy after that, with Roman showing up last.'
 						act 'School brawl':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/revenge/bigbrawl.jpg"></center>'
@@ -898,7 +898,7 @@ if dimaRevChoice = 4:
 				*clr & cla
 				grupvalue[4] += 2
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/revenge/cheers.jpg"></center>'
-				'You head to the old school building, with Anushka. Inside is the old music room, built to be soundproof. It is the perfect place to avoid being heard, even if most of the windows are now just borded up. You knock on the door, so the people inside can quiet down, before heading in. Lavrenti hands you a beer as you enter. The party is in full swing and everyone is drinking and swearing. Anushka goes to join Radomir and his band. As soon as she joins them, they start one of their songs. Vitek, Dan and Vasily are in a corner laughing. Paulina is drinking a bottle of vodka while talking to Lena and Lera.'
+				'You head to the old school building, with Anushka. Inside is the old music room, built to be soundproof. It is the perfect place to avoid being heard, even if most of the windows are now just borded up. You knock on the door, so the people inside can quiet down, before heading in. Lavrenti hands you a beer as you enter. The party is in full swing and everyone is drinking and swearing. Anushka goes to join Radomir and his band. As soon as she joins them, they start one of their songs. Vitek, Dan and Vasily are in a corner laughing and Pauline is drinking a bottle of vodka while talking to Lena and Lera.'
 				*nl
 				'Alyona is sitting by twenty bottles of Zhiguljovskoje, guarding them from anyone who tries to take one. You can''t believe she bought all that just for herself, the other half of them seem to have been handed out. As you think that, Alyona sees you staring at her and offers you a bottle which you gladly accept.'
 				*nl

+ 67 - 5
locations/din_bad.qsrc

@@ -423,9 +423,16 @@ $d_tabletkied = {
 	tabloc = 0
 	if tabletkiday < daystart and thinkpreg = 0 and knowpreg = 0: '<a href="exec:dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
 	if tabletkicheck = 0 and thinkpreg = 0 and knowpreg = 0:
+		if (tabletki > 0 or pillsleft[ptype] > 0) and birth_control['remind_hour'] = 0: 
+			'<a href="exec:gs ''din_bad'', ''set_bc_reminder''">Set a reminder to take your birth control pills.</a>'
+		elseif (tabletki > 0 or pillsleft[ptype] > 0) and birth_control['remind_hour'] > 0: 
+			'<a href="exec:gs ''din_bad'', ''set_bc_reminder''">Change your birth control reminder.</a>'
+			'<a href="exec:gs ''din_bad'', ''turn_off_bc_reminder''">Turn off your birth control reminder.</a>'
+		end
 		'<a href="exec:dynamic $d_tabletkieda, 2">Automatically take your birth control pills.</a>'
 	elseif tabletkicheck = 1:
 		'<a href="exec:dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'
+		if birth_control['remind_hour'] > 0:'<a href="exec:*clr & birth_control[''remind_hour''] = 0 & dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'
 	end
 	'<a href="exec:dynamic $d_tabletkieda, 4">Examine the birth control pills.</a>'
 	if tabletkioddk = 1: '<a href="exec:dynamic $d_tabletkieda, 5">Dump the strange pills.</a>'
@@ -440,10 +447,17 @@ $d_tabletkiedt = {
 	*nl
 	tabloc = 1
 	if tabletkiday < daystart and thinkpreg = 0 and knowpreg = 0: '<a href="exec:*clr & dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
+	
 	if tabletkicheck = 0 and thinkpreg = 0 and knowpreg = 0:
+		if (tabletki > 0 or pillsleft[ptype] > 0) and birth_control['remind_hour'] = 0: 
+			'<a href="exec:gs ''din_bad'', ''set_bc_reminder''">Set a reminder to take your birth control pills.</a>'
+		elseif (tabletki > 0 or pillsleft[ptype] > 0) and birth_control['remind_hour'] > 0: 
+			'<a href="exec:gs ''din_bad'', ''set_bc_reminder''">Change your birth control reminder.</a>'
+			'<a href="exec:gs ''din_bad'', ''turn_off_bc_reminder''">Turn off your birth control reminder.</a>'
+		end
 		'<a href="exec:*clr & dynamic $d_tabletkieda, 2">Automatically take your birth control pills.</a>'
 	elseif tabletkicheck = 1 and therapistFuckedPussyStage < 2:
-		'<a href="exec:*clr & dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'
+		'<a href="exec:*clr & birth_control[''remind_hour''] = 0 & dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'
 	end
 	'<a href="exec:*clr & dynamic $d_tabletkieda, 4">Examine the birth control pills.</a>'
 	if tabletkioddk = 1: '<a href="exec:*clr & dynamic $d_tabletkieda, 5">Dump the strange pills.</a>'
@@ -465,7 +479,7 @@ $d_tabletkieda = {
 		pilldaychk = 1
 		*clr
 		dynamic $d_tabletkied
-		'You take the birth control pill.'
+		'You take your birth control pill.'
 		gs 'stat'
 	elseif ARGS[0] = 2:
 		'You will do your best to remember to take your birth control pills every day.'
@@ -505,6 +519,10 @@ $d_tabletkieda = {
 		tabletkioddp = 0
 		gs 'stat'
 	end
+	
+	if tabletki = 0 and pillsleft[ptype] = 0:
+		msg 'That was your last birth control pill. You need to buy some more.'
+	end
 
 	if tabloc = 0:
 		act 'Return':gs 'din_bad', 'd_bag'
@@ -513,6 +531,22 @@ $d_tabletkieda = {
 	end
 }
 
+if $ARGS[0] = 'set_bc_reminder':
+	:invalid_bc_reminder_loop
+	birth_control['remind_hour'] = input ("When do you want to set your reminder? (Pick an hour 1 - 22. A reminder icon will appear in the stat display during that hour.)")
+	if birth_control['remind_hour'] < 1 or birth_control['remind_hour'] > 22:
+		msg 'Invalid reminder input. Pick an hour between 1 and 22.'
+		jump 'invalid_bc_reminder'
+	else
+		msg 'You set a reminder on your phone to take your birth control pill at <<birth_control[''remind_hour'']>>.'
+	end
+end
+
+if $ARGS[0] = 'turn_off_bc_reminder':
+	birth_control['remind_hour'] = 0
+	msg 'You turn off your reminder to take your birth control pills.'
+end
+
 $d_cycreport_choice = {
 	*clr & cla
 	'<center><h1>Fertility Cycle</h1></center>'
@@ -734,11 +768,11 @@ $d_cycreport_update = {
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Your implant protects you from getting pregnant.</font>'
 				elseif birth_control['implant_status'] > 1 and pillcon2 < 30000:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Your implant is not yet effective.</font>'				
-				elseif pillcon2 > 30000:
+				elseif pillcon2 > 0 and birth_control['think_safe'] = 1:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>You are currently on the birth control pill.</font>'
-				elseif pillcon2 > 8000 and ((FocH > (Foch_Max - 96)) or ovulate > 0):
+				elseif pillcon2 > 0 and ((FocH > (Foch_Max - 96)) or ovulate > 0) and birth_control['think_safe'] = 0:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective. <font color=red>It is currently a dangerous day.</font>'
-				elseif pillcon2 > 8000:
+				elseif pillcon2 > 0 and birth_control['think_safe'] = 0:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You are currently on the pill but it is not yet effective.'
 				elseif daystart = tabletkiday:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. You have taken the pill but it will be several weeks before it is fully effective.'
@@ -746,6 +780,12 @@ $d_cycreport_update = {
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>It is currently your fertile stage.</font>'
 				elseif birth_control['implant_status'] = 1:
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Your implant stopped working. You need a new one.</font>'
+				elseif birth_control['think_safe'] ! 1 and stat['safe_day'] = 1:
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=green>Today is a safe day to have unprotected sex.</font>'
+				elseif birth_control['think_safe'] ! 1 and stat['probably_safe_day'] = 1:
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=blue>Today is <i>probably</i> a safe day to have unprotected sex.</font>'
+				elseif birth_control['think_safe'] ! 1 and stat['dangerous_day'] = 1:
+					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period. <font color=red>Today is a dangerous day to have unprotected sex.</font>'
 				else
 					$cycreport_txt = 'It has been <<temp[1]>> days since the start of your last period.'
 				end
@@ -1038,6 +1078,28 @@ if $ARGS[0] = 'takepill':
 	end
 end
 
+if $ARGS[0] = 'quick_takepill':
+	tabletkipd += tabletkipt
+	if tabletkiday ! daystart:
+		gs 'din_bad','takepill'
+		tabletkiday = daystart
+		tabletkipt = 0
+		tabletkipi = 0
+	else
+		pcs_health -= 1
+	end
+	pilldaychk = 1
+	
+	if birth_control['message_skip'] ! daystart:
+		if tabletki = 0 and pillsleft[ptype] = 0:
+			msg 'That was your last birth control pill. You need to buy some more.'
+		else
+			msg 'You take your birth control pill.'
+		end
+	end
+	gs 'stat'
+end
+
 if $ARGS[0] = 'p_deodorant':
 	minut += 1
 	deodorant -= 1

+ 2 - 2
locations/din_van.qsrc

@@ -1466,7 +1466,7 @@ end
 
 !!Private bathrooms: One of these text should be randomly selected if using a private restroom, such as one in a home.
 if $ARGS[0] = 'prvt_pee':
-	if pee_hour ! hour or (pee_hour = hour and pee_day ! daystart): 
+	if (pee_hour ! hour or (pee_hour = hour and pee_day ! daystart)) and cheatPee = 0:
 		act 'Go pee (0:04)':
 			*clr & cla
 			menu_off = 1
@@ -1543,7 +1543,7 @@ end
 
 !!Public bathrooms: These texts should be randomly selected if using a public restroom
 if $ARGS[0] = 'pblc_pee':
-	if pee_hour ! hour or (pee_hour = hour and pee_day ! daystart): 
+	if (pee_hour ! hour or (pee_hour = hour and pee_day ! daystart)) and cheatPee = 0:
 		act 'Go pee (0:04)':
 			*clr & cla
 			menu_off = 1

+ 278 - 0
locations/emp_functions.qsrc

@@ -0,0 +1,278 @@
+# emp_functions
+
+!! Employmnent and Event Systems
+!! 2022-09-30
+!! Author: Hooded Silence
+!!
+!! v.01 - Initial code base
+!! v.02 - Event generator partially integrated
+!! v.03 - Job management system integrated
+!! 
+
+!! --------------------- UI Interface for Journal
+
+if $ARGS[0] = 'gen_schedule':
+	*clr & cla 
+		if night_mode = 1 or night_mode = 2:
+		$header_theme = '#91B0B4'
+		$body_theme = '#303030'
+		$body_theme_alt  = '#474747'
+		$font_theme = '#000000'
+	else
+		$header_theme = '#e27c00'
+		$body_theme = '#E0DED4'
+		$body_theme_alt  = '#D58B32'
+		$font_theme = '#FFFFFF'
+	end
+	if  function_sw = 1:	'<center><h2>' + $npc_firstname['A<<mod_npc_id>>'] + ' ' + $npc_lastname['A<<mod_npc_id>>'] + '</h2></center>'
+	if function_sw = 2: 
+		gs 'journal', 'journalmenu'
+		'<center><h2>Work</h2></center>'
+	end
+	!! Enable selector if attending school or Uni by NPC group type or by character and set default to School
+	if (npc_grupTipe['A<<mod_npc_id>>']>= 1 and npc_grupTipe['A<<mod_npc_id>>']<= 5) or mod_npc_id = 34 and function_sw <= 1: 
+		if flag_schedule = 0: flag_schedule = 1
+		school_group = 1
+		'<center>Change to: <a href="exec: flag_schedule = 1 & gs ''emp_functions'', ''gen_schedule''">School</a> | <a href="exec: flag_schedule = 2 &  gs ''emp_functions'', ''gen_schedule''">University</a> | <a href="exec: flag_schedule = 3 &  gs ''emp_functions'', ''gen_schedule''">Holiday</a> </center>'
+	else
+		!! Set schedule to holiday / non-edu NPCs
+		flag_schedule = 3
+	end
+
+	!! Initiate loop variables
+
+	i_day = 1
+    mod_max_day = 7
+	i_hour = ARGS[1]
+    mod_max_hour = ARGS[1] + 8 
+    header_switch = 1
+	killvar '$tablebody'   
+	killvar '$tableheader'
+
+	!! create header, using header switch to fill in :00 or :30 automatically using mod to determine odd/even and set display hour automatically.
+
+	$tableheader = '<tr border="1" align="center"  bgcolor="<<$header_theme>>"><th style="padding: 10px;"></th>'
+	:jmp_header_create
+		if (i_hour mod 2) = 0:
+			display_hour = i_hour/ 2
+		end
+		if display_hour = 24: Display_hour = 0
+		if header_switch = 1:
+			header_switch += 1
+			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<<display_hour >>', display_hour) + ':00</font></th>'
+		elseif header_switch=2: 
+			header_switch = 1
+			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<< display_hour>>', display_hour) + ':30</font></th>'
+		end		
+		i_hour += 1
+	if i_hour <=  mod_max_hour: jump 'jmp_header_create'
+	! Reset i_hour for next loop	
+	killvar 'display_hour'
+	killvar 'header_switch'
+	i_hour = ARGS[1]
+	header_switch = 1
+	!! Close out table header
+	$tableheader += '</tr>'
+	!! Create table body, with alternating colour rows for legibility
+    :jmp_day_create
+
+        !Set day
+        if i_day = 1 or i_day = 3 or i_day = 5 or i_day = 7:
+			$tablebody += '<tr><td  style="padding: 10px;" bgcolor="<<$header_theme>>"><b><font color="<<$font_theme>>">' + $week[i_day] + '</font></b></td>'
+		else
+			$tablebody += '<tr bgcolor="<<$body_theme_alt>>"><td  style="padding: 10px;" bgcolor="<<$header_theme>>"><b><font color="<<$font_theme>>">' + $week[i_day] + '</font></b></td>'
+		end
+		!! fill the slots from the NPC schedule
+
+        :jmp_hour_create 
+			if i_day >= 1:
+
+				!! Create function switcher:
+				!! 1: NPC tracker
+				!! 2: Job tracker
+				!! 3: Event Tracker
+
+				if function_sw = 1 or function_sw = 0:
+					dynamic $schedule_tracker 
+				elseif function_sw = 2:
+                    flag_active  = 1
+                    j_id = emp_rota_week[i_day +  '_' + i_hour]
+                    if emp_rota_week[i_day +  '_' + i_hour] ! 0:							
+                        $transient_tb =  '<a  href="exec:gs ''emp_functions'', ''job_info'', <<j_id>>">' + $emp_job_title[j_id] + '</a>'
+                    else
+                        $transient_tb  = 'Free'
+                    end
+				elseif function_sw = 3:
+				else
+					msg 'Error - Failed to create body. Please set content switch.'
+				end
+
+				if flag_active = 0:
+					$tablebody += '<td style="padding: 10px;">Slot: ' + i_hour +'</td>'
+				else
+					$tablebody +=  '<td style="padding: 10px;">' + $transient_tb +'</td>'
+					flag_active = 0
+					killvar '$transient_tb'
+				end	
+			else
+				 i_day += 1
+				 jump 'jmp_day_create'
+			end
+			i_hour += 1
+            if i_hour <=  mod_max_hour: jump 'jmp_hour_create'
+			$tablebody +='</tr>'
+			i_day += 1
+			i_hour = ARGS[1]
+        if i_day <= mod_max_day: jump 'jmp_day_create'	
+	!! Create navigaton bars
+	if (mod_max_hour + 8)  <= 48:
+		set_hour = ARGS[1] + 8
+		$msg_forward = '<a  href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Forward 4 hours</b></a>'
+	else
+		$msg_forward = 'End of Day'
+	end
+    if (mod_max_hour  - 8) >0 :
+		set_hour = ARGS[1] - 8
+        $msg_back = '<a  href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Back 4 hours</b></a>'
+    else
+		$msg_back = 'Start of day'
+    end
+
+    !! Start the table constuction    
+    '<center><table border=0 cellpadding=1 bgcolor="<<$body_theme>>" width="95%" align="center"><<$tableheader>><<$tablebody>></table>'
+    '<<$msg_back>> | <<$msg_forward>>'
+    *nl
+    if  function_sw = 1:
+	'<b>Note:</b> Times are approximate, some characters will appear at quarter past or quarter to the hour.</center>' 
+	end
+	if  function_sw = 2:
+		'<b>Note:</b> Times are approximate, some jobs may extend past the allotted time or have flexi-starts.</center>' 
+	end
+    act 'Back':
+		killvar 'flag_schedule'
+		killvar 'school_group'
+		killvar 'j_id'
+		gt $loc, $loc_arg
+	end
+end
+
+!! Job Info popup
+if $ARGS[0] = 'job_info':
+	j_id = ARGS[1]
+	killvar '$msg_body'
+	$msg_body +=  '<p>Job Title: ' + $emp_job_title[j_id] + '</p>'
+	$msg_body += '<p>Location: ' + $emp_job_loc[j_id] + '</p>'
+	$msg_body += '<p>Notes: ' + $emp_job_notes[j_id]+ '</p>'
+	$msg_body += '<p>Wages: ' +emp_job_wages[j_id] + '<b>₽</b></p>'
+	
+	msg '<<$msg_body>>'
+end
+
+!!  Removed event generation for initial code review and to make job integration easier.
+
+!! --------------------- Event Generator
+
+!! Author - Hooded Silence
+!! Date created - 26 Aug 22
+!! Event Generator - filler content only for one off events or recurring work from NPCs
+!!
+!! v. 01 - Initial code base
+!! v. 02 - UI improvements and feature feedback
+
+
+!! --------------------- Job management system
+
+
+!! book role, creates a time slot for emp_rota_week in format day_hour to be used in schedule mode.
+
+if $ARGS[0] = 'emp_booking':
+	gs 'emp_functions', 'emp_chk_clk'
+	if emp_rota_fail  = 0:	
+		gs 'emp_functions', 'loop_configure'
+		j_finish = emp_job_end[j_id]
+		:jmp_daily_book
+			j_idx = emp_job_start[j_id]
+			:jmp_hour_book
+				emp_rota_week[d_idx + '_' + j_idx]  = j_id
+				j_idx += 1
+			if j_idx <= j_finish: jump 'jmp_hour_book'	
+			d_idx += 1
+		if d_idx <= d_end: jump 'jmp_daily_book'
+		emp_job_status[j_id] = 1
+		emp_job[active] += 1
+		killvar 'j_idx'
+		killvar 'j_finish'
+		killvar 'd_idx'
+		killvar 'd_end'
+	else
+		msg 'Sorry, you''ve already got a job for this time period.'
+	end
+
+	killvar 'emp_rota_fail'
+end
+
+!! check if time slots are avaialble for this role. 
+
+if $ARGS[0] = 'emp_chk_clk':	
+	gs 'emp_functions', 'loop_configure'
+	j_finish = emp_job_end[j_id]
+	:jmp_daily_chk
+		j_idx = emp_job_start[j_id]
+		:jmp_job_chk
+			if emp_rota_week[d_idx + '_' + j_idx]  >  0:
+				!! booking failed					
+				emp_rota_fail = 1
+			else
+				!! booking passed
+				emp_rota_fail = 0
+			end	
+			j_idx +=1
+		if j_idx <= j_finish and emp_rota_fail = 0: jump 'jmp_job_chk'	
+		d_idx += 1
+	if d_idx <= d_end and emp_rota_fail = 0: jump 'jmp_daily_chk'
+end
+
+if $ARGS[0] = 'emp_terminate':
+	if ARGS[1] >= 4:
+		gs 'emp_functions', 'loop_configure'
+		j_finish = emp_job_end[j_id]
+		:jmp_daily_book
+			j_idx = emp_job_start[j_id]
+			:jmp_hour_book
+				emp_rota_week[d_idx + '_' + j_idx] = 0
+				j_idx += 1
+			if j_idx <= j_finish: jump 'jmp_hour_book'	
+			d_idx += 1
+		if d_idx <= d_end: jump 'jmp_daily_book'
+		!! Set the termination value
+		emp_job_status[j_id] = ARGS[1]
+		emp_job[active] -= 1
+	else
+		msg 'Job termination failed. Please ensure you set to  4 - Terminated or 5 - Fired'
+	end
+	killvar 'j_idx'
+	killvar 'j_finish'
+	killvar 'd_idx'
+	killvar 'd_end'	
+end
+
+if $ARGS[0] = 'loop_configure':	
+	if  j_day= 0 or j_day = 1 or j_day = 2:
+		d_idx = 1
+	else
+		d_idx= 6
+	end
+	if  j_day <= 1:
+		d_end = 5
+	else
+		d_end= 7
+	end	
+end
+--- emp_functions ---------------------------------
+
+
+
+
+
+
+

+ 124 - 0
locations/emp_job_array.qsrc

@@ -0,0 +1,124 @@
+# emp_job_array
+
+!! Jobs array
+!! < 4 hours is classed as ad-hoc work 
+!! => 4 hours is contract roles
+!! Events are non-permanent employment of varying rates/times and set in the future.
+!!
+!! Index:
+!! 1 - Tourist Guide
+!! 2 - Pavlosk Hotel Maid
+!! 3 - Pussy Kats Shop Assistant
+!! 4 - Titran Secretary
+!! 5 - City Burger Joint
+
+if $ARGS[0] = 'emp_tourist_guide':
+	!! Transitory variables to initialise job start - REQ
+	j_id = 1
+	
+	!! j_day defines work days: 1 - Mon-Sun, 2 Mon-Fr, 3 Weekend.  - REQ
+	j_day = 2
+
+	!! Role ID - Array index and used as job identifier.
+	emp_job_id[j_id] = 1
+	
+	!! Job Role	- REQ
+	$emp_job_title[j_id] = 'Tourist Guide' 
+	
+	!! Job start time - a day has 48 slots from base 0 - REQ
+	emp_job_start[j_id] = 16
+	
+	!! Job finish time - REQ
+	emp_job_end[j_id] = 32
+	
+	!! Job pay rate- REQ
+	emp_job_wages[j_id] = 1000
+	
+	!! Job employment location- REQ
+	$emp_job_loc[j_id] = 'Pavlosk Park'
+	
+	!! Job notes - to remind the player of the job details
+	$emp_job_notes[j_id] = 'Summer job with flexible days - start between 08:00 and 09:00'
+		
+	if emp_job_status[j_id] < 1:
+		!! Job status 1 Employed, 2 Started with favour, 3 Started with merit, 4 Terminated/suspended, 5 Fired permanently - REQ. <= 10 reserved for core mechanics, 10 + for custom quest markers
+		emp_job_status[j_id] = 0
+	end
+	if emp_job_rank[j_id] < 1:
+		!! Job ranking system for promotions and career progression. - Opt
+		emp_job_rank[j_id] = 1
+	end
+	
+end
+
+if $ARGS[0] = 'emp_pav_maid':
+	j_id = 2
+	j_day = 2
+	emp_job_id[j_id] = 2
+	$emp_job_title[j_id] = 'Hotel Maid'
+	emp_job_start[j_id] = 33
+	emp_job_end[j_id] = 40
+	emp_job_wages[j_id] = 375
+	$emp_job_loc[j_id] = 'Pavlosk Park'
+	$emp_job_notes[j_id] = 'Be at the Pavlosk Hotel reception between 16:00-17:00 to start your shift.'		
+	if emp_job_status[j_id] < 1:
+		emp_job_status[j_id] = 0
+	end
+	if emp_job_rank[j_id] < 1:
+		emp_job_rank[j_id] = 1
+	end
+
+end
+
+if $ARGS[0] = 'emp_pussy_kats':
+	j_id = 3
+	if ARGS[1] = 1:
+		!! Weekdays
+		j_day = 2
+		emp_job_start[j_id] = 32
+		emp_job_end[j_id] = 40
+	else
+		!! P/T weekend
+		j_day = 3
+		emp_job_start[j_id] = 18
+		emp_job_end[j_id] = 30
+	end
+	emp_job_id[j_id] = 3
+	$emp_job_title[j_id] = 'Shop Assistant'
+	emp_job_wages[j_id] = 205
+	$emp_job_loc[j_id] = 'Pussy Cats'
+	$emp_job_notes[j_id] = 'Shop assistant at Pussy Cat''s in the City Center Mall. You''ve missed <<young_shop_miss>> day(s).'
+		
+	if emp_job_status[j_id] < 1:
+		emp_job_status[j_id] = 0
+	end
+	if emp_job_rank[j_id] < 1:
+		emp_job_rank[j_id] = 1
+	end
+
+end
+
+if $ARGS[0] = 'emp_titran':
+	j_id = 4
+	j_day = 2
+	emp_job_start[j_id] = 18
+	emp_job_end[j_id] = 34
+
+	emp_job_id[j_id] = 3
+	$emp_job_title[j_id] = 'Secretary'
+	emp_job_wages[j_id] = 1500
+	$emp_job_loc[j_id] = 'Titran-Express Engineering'
+	$emp_job_notes[j_id] = 'You work as a secretary at Titran Express. You need to come to work by 09:00 during the week Monday-Friday. Salary is automatically transferred on the 25th of each month.'
+		
+	if emp_job_status[j_id] < 1:
+		emp_job_status[j_id] = 0
+	end
+
+	!! Secretatry Career examples
+	!! 1 Office Secretary 2 Pool Secretary 3 Head Secretary 4 PA - Trainable through the Ind Comm Ctr
+	if emp_job_rank[j_id] < 1:
+		emp_job_rank[j_id] = 1
+	end
+end
+
+--- emp_job_array ---------------------------------

+ 0 - 1
locations/event.qsrc

@@ -402,7 +402,6 @@ if $ARGS[0] = 'dima16':
 	cls
 	minut += 30
 	lobkoef = 3
-	legkoef = 3
 	cumspclnt = 20
 	gs 'cum_cleanup'
 	gs 'stat'

+ 4 - 4
locations/exercise.qsrc

@@ -504,7 +504,7 @@ if $ARGS[0] = 'tier1':
 		if $ARGS[i] ! '':
 			gs 'exp_gain', $ARGS[i], rand(0,1)
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
-				gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
+				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
 			end
 			i += 1
@@ -552,7 +552,7 @@ if $ARGS[0] = 'tier2':
 		if $ARGS[i] ! '':
 			gs 'exp_gain', $ARGS[i], rand(1,2)
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
-				gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
+				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
 			end
 			i += 1
@@ -600,7 +600,7 @@ if $ARGS[0] = 'tier3':
 		if $ARGS[i] ! '':
 			gs 'exp_gain', $ARGS[i], rand(2,3)
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
-				gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
+				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
 			end
 			i += 1
@@ -648,7 +648,7 @@ if $ARGS[0] = 'tier4':
 		if $ARGS[i] ! '':
 			gs 'exp_gain', $ARGS[i], rand(3,5)
 			if $ARGS[i] = 'vital' or $ARGS[i] = 'stren': 
-				gs 'exp_gain', $ARGS[2], rand(0,steroid_dose)
+				gs 'exp_gain', $ARGS[i], rand(0,steroid_dose)
 				steroidcheck = 1
 			end
 			i += 1

+ 21 - 15
locations/fit.qsrc

@@ -38,8 +38,8 @@ if $ARGS[0] = 'start':
 	*nl
 	'Sportswear is required for all available classes.'
 
-	act 'Leave': minut += 5 & gt 'city_center'
-
+	act 'Leave': killvar 'epayments' & minut += 5 & gt 'city_center'
+	
 	if abonement > 0:
 		act 'Go to the dressing room': gt 'fit', 'dressing room'
 	elseif money > 100:
@@ -50,25 +50,31 @@ if $ARGS[0] = 'start':
 		end
 	end
 
-!! Pay cash or card - Hooded Silence.
+	!! Pay cash or card - Hooded Silence.
 
 	*nl
 	if abonement = 0:
 		'How long do you want to subscribe for?'
 	else
 		'Extend your subscription:'
-	end
-	'<center>'
-	'<table width="90%" align="center" width="90%" cellspacing="0" cellpadding="0" valign="top">'
-	
+	end	
+
+	$epayments['method'] = ''
+	$epayments['item_variable'] = 'abonement'
+	$epayments['description'] = 'lesson subscriptions and facilities access'
+	$epayments['loc'] = 'fit'
+	$epayments['loc_arg'] = 'start'
+	$epayments['banner']= 'locations/city/citycenter/gym/desk.jpg'
+
+	'<center><table width="90%" align="center" width="90%" cellspacing="0" cellpadding="0" valign="top">'	
 	if money >= 3000 or karta + bankDebtLimit => 3000:
-		'<tr><td> <a href="exec: gs ''shortgs'',''payments'', 3000, '''', ''abonement'', 30, ''lesson subscriptions and facilities access'', ''fit'', ''start''">3,000<b> ₽</b> for 30 lessons</a></td>'
+		'<tr><td> <a href="exec: epayments[''value''] = 3000 & epayments[''quantity''] = 30 & gs ''shortgs'',''payments'' ">3,000<b> ₽</b> for 30 lessons</a></td>'
 	end
 	if money >= 2250 or karta + bankDebtLimit => 2250:
-		'<td> <a href="exec: gs ''shortgs'',''payments'', 2250, '''', ''abonement'', 20, ''lesson subscriptions and facilities access'', ''fit'', ''start''">2,250<b> ₽</b> for 20 lessons</a></td>'
+		'<td> <a href="exec: epayments[''value''] = 2250 & epayments[''quantity''] = 20 & gs ''shortgs'',''payments'' ">2,250<b> ₽</b> for 20 lessons</a></td>'
 	end
 	if money >= 1500 or karta + bankDebtLimit => 1500:
-		'<td><a href="exec: gs ''shortgs'',''payments'', 1500, '''', ''abonement'', 10, ''lesson subscriptions and facilities access'', ''fit'', ''start''">1,500<b> ₽</b> for 10 lessons</a></td>'
+		'<td><a href="exec: epayments[''value''] = 1500 & epayments[''quantity''] = 10 & gs ''shortgs'',''payments'' ">1,500<b> ₽</b> for 10 lessons</a></td>'
 	end
 	'</tr></table></center>'
 
@@ -94,7 +100,7 @@ if $ARGS[0] = 'dressing room':
 	*nl
 	if abonement > 0:'Your existing subscription package is valid for <<abonement>> more classes.'
 	*nl
-	if nichTanyaKnown = 0 and (rand(1,100) <= 20 or nichDebug = 1):
+	if nichTanya['Known'] = 0 and (rand(1,100) <= 20 or nichDebug = 1):
 		'In the locker room you notice <a href="exec:gt ''fit'', ''fitgirl''">a cute girl</a>.'
 	end
 
@@ -298,11 +304,11 @@ if $ARGS[0] = 'tanyaIntroduction':
 	if $pantyworntype = 'none': gs 'underwear', 'wear'
 	gs 'panties', 'dispose'
 	gs 'clothing', 'wear_last_worn'
-	nichTanyaRelationship = 1
-	nichTanyaRelationshipState = 10
-	nichTanyaKnown = 1
+	nichTanya['Relationship'] = 1
+	nichTanya['RelationshipState'] = 10
+	nichTanya['Known'] = 1
 	npc_rel['A218'] += 5
-	nichTanyaFuckLast = daystart
+	nichTanya['FuckLast'] = daystart
 	gs 'arousal', 'end'
 	gs 'stat'
 	'"You can at least tell me your name, seeing as you did not even have the decency to do so before you assaulted me." The girl says, catching her breath. Despite her words she doesn''t seem to be angry with you.'

+ 77 - 5
locations/food.qsrc

@@ -16,7 +16,7 @@ if $ARGS[0] = 'pirosh':
 	frost = 0
 	minut += 15
 	money -= val($_eat['<<args[1]>>,price'])
-	pcs_health += 5
+	pcs_health += pcs_health/10
 	pcs_mood += 5
 	fat += 4
 	pcs_energy += 40
@@ -346,7 +346,7 @@ if $ARGS[0] = 'ryesna':
 	frost = 0
 	minut += 10
 	money -= val($_eat['<<args[1]>>,price'])
-	pcs_health += 5
+	pcs_health += pcs_health/10
 	pcs_mood += 10
 	fat += 4
 	pcs_energy += 20
@@ -376,7 +376,7 @@ if $ARGS[0] = 'crisps':
 	frost = 0
 	minut += 10
 	money -= val($_eat['<<args[1]>>,price'])
-	pcs_health += 5
+	pcs_health += pcs_health/10
 	pcs_mood += 20
 	fat += 16
 	pcs_energy += 20
@@ -865,7 +865,7 @@ if $ARGS[0] = 'bilberry':
 	gs 'stat'
 	minut += 15
 	money -= val($_eat['<<args[1]>>,price'])
-	pcs_health += 5
+	pcs_health += pcs_health/10
 	pcs_mood += 10
 	fat += 1
 	pcs_energy += 10
@@ -964,7 +964,7 @@ end
 if $ARGS[0] = 'only_cost_light_snack':
 	*clr & cla
 	money -= val($_eat['<<args[1]>>,price'])
-	pcs_health += 5
+	pcs_health += pcs_health/10
 	pcs_mood += 20
 	fat += 3
 	pcs_energy += 20
@@ -978,5 +978,77 @@ if $ARGS[0] = 'only_cost_light_snack':
 	gt 'food_menu'
 end
 
+if $ARGS[0] = 'only_stats_fast_food':
+	*clr & cla
+	pcs_health += pcs_health/10
+	pcs_mood += 20
+	fat += 14
+	pcs_energy += 70
+	pcs_hydra += 70
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
+if $ARGS[0] = 'only_stats_small_meal':
+	*clr & cla
+	pcs_health += pcs_health/5
+	pcs_mood += 10
+	fat += 4
+	pcs_energy += 40
+	pcs_hydra += 40
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
+if $ARGS[0] = 'only_stats_medium_meal':
+	*clr & cla
+	pcs_health += pcs_health/10
+	pcs_mood += 15
+	fat += 7
+	pcs_energy += 70
+	pcs_hydra += 70
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
+if $ARGS[0] = 'only_stats_large_meal':
+	*clr & cla
+	pcs_health += pcs_health/15
+	pcs_mood += 20
+	fat += 14
+	pcs_energy += 100
+	pcs_hydra += 100
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
+if $ARGS[0] = 'only_stats_bagged_meal':
+	*clr & cla
+	pcs_health += pcs_health/8
+	pcs_mood += 5
+	fat += 5
+	pcs_energy += 40
+	pcs_hydra += 40
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
+if $ARGS[0] = 'only_stats_healthy_meal':
+	*clr & cla
+	pcs_health += pcs_health/5
+	pcs_mood += 5
+	fat += 1
+	pcs_energy += 50
+	pcs_hydra += 50
+	cumspclnt = 2
+	gs 'cum_cleanup'
+	pcs_breath = 0
+end
+
 --- food ---------------------------------
 

+ 30 - 8
locations/foto.qsrc

@@ -304,16 +304,29 @@ if $ARGS[0] = 'studio':
 				'You go to your locker in the back room and start to throw on your clothes when you suddenly remember that one of the managers took your underwear earlier today. You''ll have to go see him to get it back...'
 				act'Go see the manager':gt'foto_events','underwear_steal2'
 			else
+				if $clothingworntype = 'nude':
+					gs 'clothing', 'wear_last_worn'
+					gs 'foto', 'underwear'
+					gs 'stat'
+					'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+					'You go into the back room to put on clothes and get ready to go home.'
+					act 'Leave': minut += 1 & gt 'city_center'
+				else
+					gt 'city_center'
+				end
+			end
+		end
+	elseif model['status'] = 0:
+		if $clothingworntype = 'nude':
+			act 'Get dressed and leave':
 				gs 'clothing', 'wear_last_worn'
 				gs 'foto', 'underwear'
-				gs 'stat'
-				'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
-				'You go into the back room to put on clothes and get ready to go home.'
-				act 'Leave': minut += 1 & gt 'city_center'
+				minut += 1
+				gt 'city_center'
 			end
+		else
+			act 'Leave': minut += 1 & gt 'city_center'
 		end
-	elseif model['status'] = 0:
-		act 'Leave': minut += 1 & gt 'city_center'
 	end
 
 	if parkblackmail = 2: act 'Look around for the blackmailer':gt 'foto', 'blackm'
@@ -518,7 +531,7 @@ if $ARGS[0] = 'gave_passport':
 	end
 	model['start_year'] = year
 	act'Leave the studio':gt'city_center'
-	act'Head to the back':gt'foto','start'
+	act'Head to the main floor':gt'foto','studio'
 end
 
 if $ARGS[0] = 'interview':
@@ -605,7 +618,16 @@ if $ARGS[0] = 'interview2':
 	if pcs_inhib >= 40:
 		act 'Do as he says':
 			*clr & cla
-			if $clothingworntype ! 'nude': gs 'shortgs', 'undress'
+			if underwear['type'] = 2:
+				$lastwornbodysuittype['foto'] = $bodysuitworntype
+				lastwornbodysuitnumber['foto'] = bodysuitwornnumber
+			else
+				$lastwornpantytype['foto'] = $pantyworntype
+				lastwornpantynumber['foto'] = pantywornnumber
+				$lastwornbratype['foto'] = $braworntype
+				lastwornbranumber['foto'] = brawornnumber
+			end
+			gs 'shortgs', 'undress'
 			gs 'stat'
 			'<center><video autoplay loop src="images/locations/city/citycenter/photo/strip1.mp4"></video><video autoplay loop src="images/locations/city/citycenter/photo/strip2.mp4"></video></center>'
 			if pcs_bmi < foto_weight and foto_weight > 0:

+ 1 - 1
locations/gopsex.qsrc

@@ -1071,7 +1071,7 @@ if $ARGS[0] = 'hide':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/pc/body/cum/cumass/cumass'+rand(1,19)+'.jpg"></center>'
 		'One by one the '+func('gopsex','hide','gop_text_npcr')+' take their turns and cover your asshole with their sperm.'
-		act 'Leave': gt '', 'start'
+		act 'Leave': gt 'vasilyhome', 'livingroom'
 	end &!--- shgopsex_group_cumanal ---
 
 	

+ 47 - 47
locations/gschool_chats.qsrc

@@ -5,19 +5,19 @@ if $ARGS[0] = 'nerds':
 	*clr & cla
 	minut += 5
 	if ((hotcat >= 8 and rand(1,10) = 1) or (hotcat >= 5 and hotcat < 8 and rand(1,20) = 1)) and gschool_gropeday ! daystart:
-		!!It is more likely that somebody will grap the player''s butt the hooter she is.
+		!!It is more likely that somebody will grab the player''s butt the hotter she is.
 		menu_off = 1
 		gschool_gropeday = daystart
 		if $pantyworntype = 'none':
 			gs 'fame', 'pav', 'sex', 'tiny'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/buttgrab_nopanties.jpg"></center>'
-			'When you enter the hallway heading for the classroom the nerds hangout in, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you. You hear several classmates remark on your lack of panties.'
+			'When you enter the hallway heading for the classroom the nerds hang out in, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you as you hear several classmates remark on your lack of panties.'
 			gs 'arousal', 'flash', 1, 'humiliation'
 			gs 'arousal', 'end'
 			gs 'stat'
 		else
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boysex_tualet.jpg"></center>'
-			'When you enter the hallway heading for the classroom the nerds hangout in, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you.'
+			'When you enter the hallway heading for the classroom the nerds hang out in, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you.'
 			gs 'arousal', 'flashlite', 1, 'humiliation'
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -33,9 +33,9 @@ if $ARGS[0] = 'nerds':
 				gs 'gschool_socialchg', 'group_rel_change', 'nerds', 1
 				gs 'npc_relationship', 'modify', 'A142', 'like'
 				if grupTipe = 3:
-					'You go to the classroom that you and your fellow nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects, as usual. You get several warm smiles and greetings from your fellow nerds.'
+					'You go to the classroom that you and your fellow nerds like to gather in and find them all clustered around a table talking and engaged in a variety of pet projects. You get several warm smiles and greetings from your fellow nerds.'
 				else
-					'You go to one of the classrooms that the nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects. Some of them seem to be surprised at what you are wearing but they also seem to approve.'
+					'You go to one of the classrooms that the nerds like to gather in and find them all clustered around a table talking and engaged in a variety of pet projects. Some of them seem to be surprised at what you''re wearing, but they also seem to approve.'
 				end
 				'Artem, Petka, Julia, Natasha, Zinaida, Evgeny, Feofan and Gerasim are sitting around some tables they''ve moved together.'
 				*nl
@@ -44,9 +44,9 @@ if $ARGS[0] = 'nerds':
 				gs 'npc_relationship', 'modify', 'A12', 'like'
 				gs 'npc_relationship', 'modify', 'A16', 'like'
 				if grupTipe = 3:
-					'You go to the classroom that you and your fellow nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects, as usual. Natasha notices your uniform. "Oh I like your uniform, it''s very pretty. Don''t you think?" She nudges Julia, who looks at you and blushes. "Yes very pretty." she says in agreement.'
+					'You go to the classroom that you and your fellow nerds like to gather in and find them all clustered around a table talking and engaged in a variety of pet projects. Natasha notices your uniform. "Oh I like your uniform, it''s very pretty. Don''t you think?" She nudges Julia, who looks at you and blushes. "Yes, very pretty..." she says in agreement.'
 				else
-					'You go to one of the classrooms that the nerds like to gather in. You find them all clustered around a table talking and engaged in a variety of pet projects. Natasha notices your uniform. "Oh I like your uniform, it''s very pretty. Don''t you think?" She nudges Julia, who looks at you and blushes. "Yes very pretty." she says in agreement.'
+					'You go to one of the classrooms that the nerds like to gather in and find them all clustered around a table talking and engaged in a variety of pet projects. Natasha notices your uniform. "Oh I like your uniform, it''s very pretty. Don''t you think?" She nudges Julia, who looks at you and blushes. "Yes, very pretty..." she says in agreement.'
 				end
 				'Artem, Petka, Julia, Natasha, Zinaida, Evgeny, Feofan and Gerasim are sitting around some tables they''ve moved together.'
 				*nl
@@ -57,10 +57,9 @@ if $ARGS[0] = 'nerds':
 				if soniaPS > 0: gs 'npc_relationship', 'modify', 'A25', 'like'
 				gs 'npc_relationship', 'modify', 'A159', 'like'
 				if grupTipe = 3:
-					'You enter the classroom that you and your fellow nerds like to hang out. You find them, as usual, all gathered around a table talking and engaging in various hobby projects. Few of them look up just as you walk closer. A couple of the boys, Feofan and Artem, are struggling to conceal their disapproving stares about your choosen uniform. Julia''s eyes also seem to linger on your attire for just a bit longer and you don''t feel her gaze is all that welcoming either.'
-					'Artem, Petka, Julia, Natasha, Zinaida, Evgeny, Feofan and Gerasim are sitting around some tables they''ve moved together.'
+					'You enter the classroom that you and your fellow nerds like to hang out in and find them, as usual, all gathered around a table talking and engaging in various hobby projects. A few of them look up as you walk closer. Feofan and Artem are struggling to conceal their disapproving stares about your choosen uniform while Julia''s eyes seem to linger on your attire for just a bit longer; you don''t feel her gaze is all that welcoming either.'
 				else
-					'You go to the classrooms that the nerdy students like to hang out. You find them, as always, all nerding around a table talking and engaging in various personal projects. Several of them look up just as you walk closer. A couple of the boys, Artem and Petka, both seem to be struggling to hide their judgmental stares about your choice of uniform. You don''t find the look Julia has in her eyes all that comforting either.'
+					'You go to the classrooms that the nerdy students like to hang out in and find them, as always, all nerding around a table talking and engaging in various personal projects. Several of them look up as you walk closer. Artem and Petka both seem to be struggling to hide their judgmental stares about your choice of uniform and you don''t find the look Julia has in her eyes all that comforting either.'
 				end
 				*nl
 				gs 'gschool_groups', 'nerds'
@@ -73,9 +72,9 @@ if $ARGS[0] = 'nerds':
 				if soniaPS > 0: gs 'npc_relationship', 'modify', 'A25', 'love'
 				gs 'npc_relationship', 'modify', 'A159', 'like'
 				if grupTipe = 3:
-					'When you walk in, the room goes dead silent and everyone is staring at you. Several of the nerds blush at the scandalous display of flesh from your uniform, or lack there of. Feofan finally speaks up. "What are you wearing?" Natasha butts in. "A better questions is why?" As you get closer, the nerds all share looks before looking at Feofan, who swallows and then says. "Maybe you should go hang out somewhere else or go change or something." Then the nerds all close ranks, making sure not to give you space to walk up and talk to them. The outcasts on the other hand don''t seem to care as much.'
+					'When you walk in, the room goes dead silent and everyone stares at you. Several of the nerds blush at the scandalous display of flesh from your uniform, or lack there of before Feofan finally speaks up. "What are you wearing?" Natasha butts in. "A better questions is why?" As you get closer, the nerds all share looks before looking at Feofan, who swallows. "Maybe you should go hang out somewhere else or go change or something?" They all close ranks, making sure not to give you space to walk up and talk to them. The outcasts, on the other hand, don''t seem to care as much.'
 				else
-					'When you walk in, the room goes dead silent and everyone is staring at you. Several of the nerds blush at the scandalous display of flesh from your uniform, or lack there of. The nerds all close ranks, making sure not to give you space to walk up and talk to them. The outcasts on the other hand don''t seem to care as much.'
+					'When you walk in, the room goes dead silent and everyone stares at you. Several of the nerds blush at the scandalous display of flesh from your uniform, or lack there of before they all close ranks, making sure not to give you space to walk up and talk to them. The outcasts, on the other hand, don''t seem to care as much.'
 				end
 			end
 		else
@@ -84,8 +83,8 @@ if $ARGS[0] = 'nerds':
 			gs 'gschool_groups', 'nerds'
 		end
 		*nl
-		'The outcasts are mostly hiding away from everyone else, hoping that no one will pick on them today.'
-		'Lesco is reading a book. Meanwhile '+iif(npc_grupTipe['A5'] ! 5, '', 'Fedor is sitting on a window sill staring outside, looking lonely and depressed.')+iif(npc_grupTipe['A25'] ! 5, '', 'Sonia is sitting at a desk typing on her phone.')+iif(npc_grupTipe['A5'] ! 5 and npc_grupTipe['A18'] ! 5 and npc_grupTipe['A25'] ! 5, 'Petia is roaming around, like he is about to approach someone.', ' Petia is roaming around, like he is about to approach someone.')
+		'The outcasts are hiding away from everyone else, hoping that no one will pick on them today.'
+		'Lesco is reading a book '+iif(npc_grupTipe['A5'] ! 5, '', 'Fedor is sitting on a window sill staring outside')+iif(npc_grupTipe['A25'] ! 5, '', 'Sonia is sitting at a desk typing on her phone')+iif(npc_grupTipe['A5'] ! 5 and npc_grupTipe['A18'] ! 5 and npc_grupTipe['A25'] ! 5, 'and Petia is roaming around like he''s about to approach someone.', ' and Petia is roaming around like he''s about to approach someone.')
 		gs 'gschool_groups', 'outcasts'
 		act 'Leave': gt 'gschool_lessons', 'short_break'
 	end
@@ -97,13 +96,13 @@ if $ARGS[0] = 'gopniks':
 	minut += 5
 	gs 'stat'
 	if ((hotcat >= 8 and rand(1,10) = 1) or (hotcat >= 5 and hotcat < 8 and rand(1,20) = 1)) and gschool_gropeday ! daystart:
-		!!It is more likely that somebody will grap the player''s butt the hooter she is.
+		!!It is more likely that somebody will grab the player''s butt the hotter she is.
 		menu_off = 1
 		gschool_gropeday = daystart
 		if $pantyworntype = 'none':
 			gs 'fame', 'pav', 'sex', 'tiny'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/buttgrab_nopanties.jpg"></center>'
-			'When you enter the hallway heading for the stairwell, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you. You hear several classmates remark on your lack of panties.'
+			'When you enter the hallway heading for the stairwell, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you as you hear several classmates remark on your lack of panties.'
 			gs 'arousal', 'flash', 1, 'humiliation'
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -126,23 +125,23 @@ if $ARGS[0] = 'gopniks':
 					gs 'gschool_socialchg', 'group_rel_change', 'gopniks', -5
 					gs 'npc_relationship', 'modify', 'A189', 5
 					
-					'You go to the stairwell that you and your fellow gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual.'
-					'At first, a couple of them stare at you and then more and more of them do. Finally, Dan laughs and Lavrenti speaks up. "What are you wearing?" They just seem stunned at your uniform. Anushka chimes in. "Please tell me you just lost some kind of bet." Several others comment, all expressing displeasure at your choice of uniform. After a few minutes of ridicule they finally lose interest in you, but you can tell you lost their respect and maybe more today.'
+					'You head to the stairwell that you and your fellow gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations.'
+					'A few of them stare at you before Dan laughs and Lavrenti speaks up. "What are you wearing?" They seem stunned at your uniform as Anushka chimes in. "Please tell me you just lost some kind of bet?" Several others comment, all expressing displeasure at your choice of uniform. After a few minutes of ridicule, they finally lose interest in you, but you can tell you lost their respect and maybe more today.'
 				else
 					grupvalue[4] -= 5
 					gs 'gschool_socialchg', 'group_rel_change', 'gopniks', -2
 					
-					'You go to the stairwell that the gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations.'
-					'At first, a couple of them stare at you and then more and more of them do. Finally, Radomir speaks up. "Are you lost or something?" Paulina chimes in, pointing back the way you came. "The nerds are back that way, loser." Several others also comment, all expressing displeasure at your choice of uniform. You feel very unwelcome among them, which makes you uneasy. They are well known to bully their fellow students, maybe this was a bad idea.'
+					'You head to the stairwell that the gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations.'
+					'A few of them stare at you before Radomir speaks up. "Are you lost or something?" Pauline then chimes in, pointing back the way you came. "The nerds are back that way, loser." Several others also comment, all expressing displeasure at your choice of uniform. You feel very unwelcome among them, which makes you uneasy.'
 				end
 				'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are all hanging around.'
 				gs 'gschool_groups', 'gopniks'
 				act 'Leave': gt 'gschool_lessons', 'short_break'
 			elseif PCloSkirt < 5 and PCloThinness < 5 and PCloBra = 0:
 				if grupTipe = 4:
-					'You go to the stairwell that you and your fellow gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual.'
+					'You head to the stairwell that you and your fellow gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations.'
 				else
-					'You go to the stairwell that the gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations.'
+					'You head to the stairwell that the gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations.'
 				end
 				'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
 				gs 'gschool_groups', 'gopniks'
@@ -154,9 +153,9 @@ if $ARGS[0] = 'gopniks':
 				gs 'npc_relationship', 'modify', 'A144', 'love'
 				gs 'npc_relationship', 'modify', 'A189', 'like'
 				if grupTipe = 4:
-					'You go to the stairwell that you and your fellow gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual. A few of them take note of your slightly risky uniform and seem to approve of it.'
+					'You head to the stairwell that you and your fellow gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. A few of them take note of your slightly risky uniform and seem to approve of it.'
 				else
-					'You go to the stairwell that the gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations. A few of them take note of your slightly risky uniform and seem to approve of it.'
+					'You head to the stairwell that the gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. A few of them take note of your slightly risky uniform and seem to approve of it.'
 				end
 				'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
 				gs 'gschool_groups', 'gopniks'
@@ -171,10 +170,10 @@ if $ARGS[0] = 'gopniks':
 					pcs_mood -= 10
 					gs 'stat'
 					
-					'You go to the stairwell that '+iif(grupTipe = 4,'you and your fellow','the')+' gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual. As you approach, Dan stands up and whistles. "Hey there slut, why don''t you come over here and suck my dick?" Several of the other gopniks laugh as well, a few of the guys comment about being next in line. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
+					'You head to the stairwell that '+iif(grupTipe = 4,'you and your fellow','the')+' gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. As you approach, Dan stands up and whistles. "Hey there, slut. Why don''t you come over here and suck my dick?" Several of the other gopniks laugh and a few of the guys comment about being next in line. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
 					*nl
 					'Vitek stands up and shoves Dan up against the wall. "What did you say about my girl?"'
-					'Dan just swallows while everyone else shuts up. "Hey I was just joking, we all know she is your girl."'
+					'Dan just swallows while everyone else shuts up. "Hey, I was just joking! We all know she''s your girl."'
 					'Vitek lets go of him. "Then watch your fucking mouth!" He turns towards you and walks over, grabbing you by the arm and dragging you over to the side. "Just what are you wearing? You''re dressed like a slut! Don''t wear this to school again. Now get out of here." He then shoves you away. You glance back, but know better than to tempt fate so you walk away.'
 					act 'Leave': gt 'gschool_lessons', 'short_break'
 				elseif kotovLoveQW > 0 and kotovLoveQW['clo_comment'] = 1:
@@ -182,18 +181,17 @@ if $ARGS[0] = 'gopniks':
 					pcs_mood -= 10
 					gs 'stat'
 					
-					'You go to the stairwell that '+iif(grupTipe = 4,'you and your fellow','the')+' gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual. As you approach, everyone notices you and when Vitek sees you, he tenses up and angrily walks across to you. He grabs you roughly by the arm and drags you out of the stairwell. "What did I tell you about coming to school dressed like this? No girl of mine is going to walk around dressed like some slut. Now don''t come back to school dressed like this again!" He roughly shoves you into the wall and storms back to the other gopniks.'
+					'You head to the stairwell that '+iif(grupTipe = 4,'you and your fellow','the')+' gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. As you approach, everyone notices you and when Vitek sees you, he tenses up and angrily walks over to you before grabbing you roughly by the arm and dragging you out of the stairwell. "What did I tell you about coming to school dressed like this? No girl of mine is going to walk around dressed like some slut. Now don''t come back to school dressed like this again!" He roughly shoves you into the wall and storms back to the other gopniks.'
 					act 'Leave': gt 'gschool_lessons', 'short_break'
 				elseif grupTipe = 4:
-					'You go to the stairwell that you and your fellow gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations, as usual. As you approach, Dan stands up and whistles. "Hey there slut, why don''t you come over here and suck my dick?" Several of the other gopniks laugh as well and a few of the guys comment about being next in line. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
-					'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
+					'You head to the stairwell that you and your fellow gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. As you approach, Dan stands up and whistles. "Hey there, slut. Why don''t you come over here and suck my dick?" Several of the other gopniks laugh and a few of the guys comment about being next in line. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
 					gs 'gschool_groups', 'gopniks'
 					act 'Leave': gt 'gschool_lessons', 'short_break'
 				else
 					grupvalue[4] -= 5
 					gs 'fame', 'pav', 'sex', 3
 					
-					'You go to the stairwell that the gopniks like to gather in. You find them leaning against the wall, sitting on the steps or even just sitting on the landing of the stairs, engaged in a variety of conversations. As you approach, Dan stands up and whistles. "Hey there slut, why don''t you come over here and suck my dick?" Several of the other gopniks laugh as well and a few of the guys comment as well. "Like she came to see you Dan! She obviously came to throw herself at me." Radomir says. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
+					'You head to the stairwell that the gopniks like to gather in and find them leaning against the wall or sitting on the stairs engaged in a variety of conversations. As you approach, Dan stands up and whistles. "Hey there, slut. Why don''t you come over here and suck my dick?" Several of the other gopniks laugh and a few of the guys comment as well. "Like she came to see you Dan! She obviously came to throw herself at me," Radomir says. You feel yourself getting very nervous around them dressed the way you are and fear they might actually try something. No one comes down to this end of the school at this time of the day after all.'
 					gs 'gschool_groups', 'gopniks'
 					act 'Leave': gt 'gschool_lessons', 'short_break'
 				end
@@ -214,13 +212,13 @@ if $ARGS[0] = 'cooljocks':
 	minut += 5
 	gs 'stat'
 	if ((hotcat >= 8 and rand(1,10) = 1) or (hotcat >= 5 and hotcat < 8 and rand(1,20) = 1)) and gschool_gropeday ! daystart:
-		!!It is more likely that somebody will grap the player''s butt the hooter she is.
+		!!It is more likely that somebody will grab the player''s butt the hotter she is.
 		menu_off = 1
 		gschool_gropeday = daystart
 		if $pantyworntype = 'none':
 			gs 'fame', 'pav', 'sex', 'tiny'
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/buttgrab_nopanties.jpg"></center>'
-			'When you enter the hallway, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you. You hear several classmates remark on your lack of panties.'
+			'When you enter the hallway, you feel someone moving in behind you and quickly pulling your skirt up. Your skirt is barely in the air before you feel hands pawing at your naked ass. As you move to turn around, the hand quickly pulls away. By the time you can see who''s behind you, you find half the guys in your class standing there, all looking in different directions and trying to act inconspicuous, a few of them even having the gall to whistle innocently. You try to tell from their faces which one of them just touched you as you hear several classmates remark on your lack of panties.'
 			gs 'arousal', 'flash', 1, 'humiliation'
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -231,11 +229,11 @@ if $ARGS[0] = 'cooljocks':
 			gs 'arousal', 'end'
 			gs 'stat'
 		end
-		act 'Ignore it and talk to the cool kids and jocks': gt 'gschool_chats', 'cooljocks'
+		act 'Ignore it': 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>'
-		'When the break finally comes, the girls wander through the hallways of the school, gossiping about pretty much everyone they know. The guys are standing around in small groups, some of them sneaking off to have a smoke behind the school building.'
+		'When the break finally comes, the girls wander through the hallways of the school, gossiping about pretty much everyone they know while the guys are standing around in small groups, some of them sneaking off to have a smoke behind the school building.'
 		if PCloStyle2 = 4:
 			if PCloInhibit <= 10:
 				if fame['pav_sex'] > 0: gs 'fame', 'pav', 'sex', -1
@@ -259,13 +257,13 @@ if $ARGS[0] = 'cooljocks':
 				gs 'npc_relationship', 'modify', 'A165', -1
 				
 				if christinaQW['fight'] = 1 or christinaQW['blackmail'] = 2:
-					'As you approach them, you notice some of them giving you a disapproving look as Lizaveta takes your picture and then starts texting, obviously sending the picture around. Vicky is smirking a bit and then whispers something to Vanya and Katja.'
+					'As you approach them, you notice some of them giving you a disapproving look as Lizaveta takes your picture and starts texting, obviously sending the picture around. Vicky smirks before whispering something to Vanya and Katja.'
 				else
-					'As you approach them, you notice some of them giving you a disapproving look and Christina starts to laugh. "What are you wearing? Did mommy dress you? I mean we are all glad she did, the more clothes you wear that hide that hideous body the better." Lariska and Lina add their own snide remarks similar to Christina''s and several other students laugh at her comments. Lizaveta takes your picture and then starts texting, obviously sending the picture around. Vicky is smirking a bit and then whispers something to Vanya and Katja.'
+					'As you approach them, you notice some of them giving you a disapproving look as Christina starts to laugh. "What are you wearing? Did mommy dress you? I mean we''re all glad she did, the more clothes you wear that hide that hideous body the better." Lariska and Lina add their own snide remarks similar to Christina''s and several other students laugh at her comments as Lizaveta takes your picture and starts texting, obviously sending the picture around. Vicky smirks before whispering something to Vanya and Katja.'
 				end
-				'Stasya glances at Bella. "My god, she is an absolute social disaster. Really no sense of style at all." Then she turns towards Andrey. "If I ever wore something like that, would you still love me?"'
-				'Andrey shakes his head. "Hell no, a man has to have his standards after all.", which just gets more and more of them to laugh.'
-				'Dimka steps forwards. "Maybe you''re lost? The nerds and outcasts are over that way." He points in the direction of the classroom the nerds and outcasts hang out in. "Perhaps you would find those who might appreciate your sense of... style there." Igor, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Marcus, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Veronika, Lazar and Erast either ignore what is going on or join in on mocking your clothes.'
+				'Stasya glances at Bella. "My god, she''s an absolute social disaster. Really no sense of style at all." She then turns towards Andrey. "If I ever wore something like that, would you still love me?"'
+				'Andrey shakes his head. "Hell no, a man has to have his standards after all." This results in more of them laughing at you.'
+				'Dimka steps forwards. "Maybe you''re lost? The nerds and outcasts are over that way." He points in the direction of the classroom the nerds and outcasts hang out in. "Perhaps you''ll find those who might appreciate your sense of... style there." Igor, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Marcus, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Veronika, Lazar and Erast either ignore what''s going on or join in on mocking your clothes.'
 				gs 'gschool_groups', 'popular'
 				gs 'gschool_groups', 'jocks'
 				act 'Leave': gt 'gschool_lessons', 'short_break'
@@ -284,7 +282,8 @@ if $ARGS[0] = 'cooljocks':
 					gs 'npc_relationship', 'modify', 'A139', 1
 					gs 'npc_relationship', 'modify', 'A140', 1
 					
-					'As you approach them, several of them give you approving looks. Stasya comments "Looking good <<$pcs_nickname>>! Where did you buy that uniform?" Vicky comments as well. "Yeah I like it, it looks very nice." Katja, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta and Bella all comment on how nice your outfit looks while Dimka, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+' and Svyatoslav talk among themselves, obviously not interested in girls fashion. However, you do notice Igor seems to be somewhat paying attention, maybe at you in particular. Christina just pretends you don''t exist while she talks to Lina and Lariska while Veronika is reading something and seems to be unaware of the whole conversation.'
+					'As you approach them, several of them give you approving looks. "Looking good <<$pcs_nickname>>! Where did you buy that uniform?" Stasya comments.' 
+					'"Yeah I like it, it looks very nice," Vicky adds. Katja, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta and Bella all comment on how nice your outfit looks while Dimka, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+' and Svyatoslav talk among themselves. However, you do notice Igor seems to be somewhat paying attention, maybe at you in particular. Christina just pretends you don''t exist while she talks to Lina and Lariska while Veronika is reading something and seems to be entirely unaware of the conversation.'
 
 					gs 'gschool_groups', 'popular'
 					gs 'gschool_groups', 'jocks'
@@ -303,7 +302,8 @@ if $ARGS[0] = 'cooljocks':
 					grupvalue[2] += 1
 					if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
 					
-					'As you approach them, several of them give you approving looks. Stasya comments "Looking good <<$pcs_nickname>>! Where did you buy that uniform?" Vicky comments as well. "Yeah looking sexy <<$pcs_nickname>>." Katja, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta and Bella all comment on how nice your outfit looks while Dimka, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+' and Svyatoslav talk among themselves, obviously not interested in girls fashion. However, you do notice Igor seems to be somewhat paying attention, maybe to you in partucular. Christina just pretends you don''t exist while she talks to Lina and Lariska while Veronika is reading something and seems to be unaware of the whole conversation.'
+					'As you approach them, several of them give you approving looks. "Looking good <<$pcs_nickname>>! Where did you buy that uniform?" Stasya comments.' 
+					'"Yeah, looking sexy <<$pcs_nickname>>!" Vicky adds. Katja, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta and Bella all comment on how nice your outfit looks while Dimka, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+' and Svyatoslav talk among themselves. However, you do notice Igor seems to be somewhat paying attention, maybe to you in partucular. Christina just pretends you don''t exist while she talks to Lina and Lariska while Veronika is reading something and seems to be entirely unaware of the conversation.'
 
 					gs 'gschool_groups', 'popular'
 					gs 'gschool_groups', 'jocks'
@@ -319,9 +319,9 @@ if $ARGS[0] = 'cooljocks':
 					gs 'npc_relationship', 'modify', 'A147', 'like'
 					gs 'npc_relationship', 'modify', 'A148', 'like'
 					
-					'As you approach them, several of them give you once over, obviously noticing your uniform. Stasya smirks "Someone is trying hard to get the boys to look at her."'
-					'Hearing this, Bella gives you a closer look and says "It wouldn''t be so bad if it was a good quality."'
-					'Dimka adds in. "Now Bella, you know her family can''t afford the finer things in life." If not for the tone of his voice and the smirk, it would almost sound like he was defending you but it comes across as more of an insult. Igor, Katja, Vicky, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Christina, Lariska, Lina, Veronika, Lazar, Erast and Vanya just stay out of it.'
+					'As you approach them, several of them give you once over, obviously noticing your uniform. "Someone''s trying hard to get the boys to look at her," Stasya says with a smirk.'
+					'Hearing this, Bella gives you a closer look. "It wouldn''t be so bad if it was a good quality."'
+					'"Now Bella, you know her family can''t afford the finer things in life," Dimka adds. If not for the tone of his voice and the smirk, it would almost sound like he was defending you, but it comes across as more of an insult. Igor, Katja, Vicky, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+' Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Christina, Lariska, Lina, Veronika, Lazar, Erast and Vanya just stay out of it.'
 					gs 'gschool_groups', 'popular'
 					gs 'gschool_groups', 'jocks'
 					act 'Leave': gt 'gschool_lessons', 'short_break'
@@ -340,9 +340,9 @@ if $ARGS[0] = 'cooljocks':
 				gs 'npc_relationship', 'modify', 'A139', 'dislike'
 				gs 'npc_relationship', 'modify', 'A140', 'dislike'
 				
-				'As you approach, everyone is staring at you. Bella speaks up. "What on earth are you wearing? Forget to change out of your whoring clothes last night?" Several of the rest laugh and you can sense the general feeling of agreement from the rest.'
-				'Dimka smirks. "Maybe she messed up the wash and her uniform just shrunk and she was too stupid to notice?" and the others laugh even more.'
-				'Albina steps forward. "Get out of here with your whorish clothes! No one wants you around." and you hear several murmers of agreement from the rest. It looks like even Igor, Katja, Vicky, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Christina, Lariska, Lina, Veronika, Lazar, Erast and Vanya appear to agree. They either give you the cold shoulder or refuse to meet your eyes. Feeling very unwelcome, you turn around and leave.'
+				'As you approach, everyone is staring at you. Irina speaks up. "What on earth are you wearing? Forget to change out of your whoring clothes last night?" Several of the others laugh and you can sense the general feeling of agreement from the rest.'
+				'Dimka smirks. "Maybe she messed up the wash and her uniform shrunk, but she was too stupid to notice?"'
+				'Bella steps forward. "Get out of here with your whorish clothes! No one wants you around!" You hear several murmers of agreement from the others. It looks like even Igor, Katja, Vicky, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Albina, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Christina, Lariska, Lina, Veronika, Lazar, Erast and Vanya appear to agree. They either give you the cold shoulder or refuse to meet your eyes. Feeling very unwelcome, you turn around and leave.'
 				act 'Leave': gt 'gschool_lessons', 'short_break'
 			end
 		else

+ 3 - 3
locations/gschool_detention.qsrc

@@ -58,11 +58,11 @@ if $ARGS[0] = 'wedgie':
 	:wedgie_girl
 	gs 'gschool_events', 'rand_girl_arg', 1, 1, 0, 1, 1, 0
 	if grupTipe = 4 and wedgie_counter < 1000:
-		if $rand_girl ! 'Paulina' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona': wedgie_counter += 1 & jump 'wedgie_girl'
+		if $rand_girl ! 'Pauline' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona': wedgie_counter += 1 & jump 'wedgie_girl'
 	elseif grupTipe = 2 and wedgie_counter < 1000:
-		if $rand_girl ! 'Paulina' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona' and $rand_girl ! 'Christina': wedgie_counter += 1 & jump 'wedgie_girl'
+		if $rand_girl ! 'Pauline' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona' and $rand_girl ! 'Christina': wedgie_counter += 1 & jump 'wedgie_girl'
 	elseif wedgie_counter < 1000:
-		if $rand_girl ! 'Paulina' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona' and $rand_girl ! 'Christina' and $rand_girl ! 'Lina' and $rand_girl ! 'Lariska' and $rand_girl ! 'Stasya': wedgie_counter += 1 & jump 'wedgie_girl'
+		if $rand_girl ! 'Pauline' and $rand_girl ! 'Lena' and $rand_girl ! 'Lera' and $rand_girl ! 'Alyona' and $rand_girl ! 'Christina' and $rand_girl ! 'Lina' and $rand_girl ! 'Lariska' and $rand_girl ! 'Stasya': wedgie_counter += 1 & jump 'wedgie_girl'
 	end
 	'<center><b><font color="maroon">Detention</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/detention/wedgie.jpg"></center>'

+ 62 - 62
locations/gschool_events.qsrc

@@ -22,7 +22,7 @@ if $ARGS[0] = 'teacher_greet':
 			else
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big26.jpg"></center>'
 				'"Good morning Mr. Tsarev, have a nice day. I look forward to your lessons."'
-				'"Hello <<$pcs_firstname>>. I also look forward to such a wonderful student like you being in my class." he replies, obviously not looking you in the face, but somewhere on the level of your hips.'
+				'"Hello <<$pcs_firstname>>. I also look forward to such a wonderful student like you being in my class," he replies while not looking you in the eye, but somewhere on the level of your hips.'
 				npc_rel['A26'] += 1
 			end
 		else
@@ -32,12 +32,12 @@ if $ARGS[0] = 'teacher_greet':
 				'"Hello <<$pcs_firstname>>. I''m expecting your homework today. Are you prepared, or should I not ask you for it?" he asks in a friendly manner.'
 				'"Oh you know, I tried to do my homework, but something came up late last night with the girls at the club. Can I give it to you tomorrow?" you plead, giving him your sweetest face.'
 				'"Fine, but this is the last time." he says, but he has said that more than once over the years.'
-				'"Thank you, you are such a nice man! I need to find a nice man for myself." smiling to him.'
-				'"Sorry, I''m married." he replies and you both laugh.'
+				'"Thank you, you are such a nice man! I need to find a nice man for myself," you reply while smiling at him.'
+				'"Sorry, I''m married," he replies and you both laugh.'
 				pcs_mood += 5
 			else
 				'"Mr. Tsarev, what will the lesson be about today? The new subject? And maybe you can let us go early?" you ask.'
-				'"Yes, today will be about the new subject. Unfortunately, I can''t let you leave early. The new Director strictly monitors us and said no." he replies sadly.'
+				'"Yes, today will be about the new subject. Unfortunately, I can''t let you leave early. The new Director strictly monitors us and said no," he replies sadly.'
 			end
 			npc_rel['A26'] += 1
 		end
@@ -49,35 +49,35 @@ if $ARGS[0] = 'teacher_greet':
 		if npc_rel['A26'] < 10:
 			if hotcat < 5:
 				if rand(0,1) = 0:
-					'"Hello Mr. Tsarev. You are so handsome." you say, trying to attract his attention with a smile.'
-					'"Miss <<$pcs_lastname>>, you shouldn''t be saying things like that." but still smiles back at you in response.'
+					'"Hello Mr. Tsarev. You are so handsome," you say, trying to attract his attention with a smile.'
+					'"Miss <<$pcs_lastname>>, you shouldn''t be saying things like that," he replies, but still smiles back at you in response.'
 				else
-					'You go to greet him, but notice he is quite sour. You decide to cheer him up with a smile and wave to him.'
+					'You go to greet him, but notice he is quite sour. You decide to cheer him up with a smile and wave at him.'
 					'In response, the teacher smiles back at you and goes on about his business.'
 				end
 				npc_rel['A26'] += 1
 			else
 				if rand(0,1) = 0:
-					'"Hello Mr. Tsarev. You are so handsome." you say, trying to attract his attention with a smile.'
-					'"Thank you Miss <<$pcs_lastname>>. I''d pay you a compliment, but we are not supposed to have such informal relationships with students." he replies, but still smiles back.'
+					'"Hello Mr. Tsarev. You''re so handsome," you say, trying to attract his attention with a smile.'
+					'"Thank you Miss <<$pcs_lastname>>. I''d pay you a compliment, but we''re not supposed to have such informal relationships with students," he replies, but still smiles back.'
 					npc_rel['A26'] += 1
 				else
-					'"Good morning Mr. Tsarev. I see you have a new suit, so chic." you say in a very erotic voice.'
+					'"Good morning Mr. Tsarev. I see you have a new suit, so chic," you say in a very erotic voice.'
 					'Hearing your words, he awkwardly picks up his pace while heading towards the mens room. You hear him muttering incoherently - you think he was trying to say hello or respond to the compliment, but apparently was a little flustered.'
 				end
 			end
 		else
 			if rand(0,1) = 0:
-				'"Hello Mr. Tsarev. You are so handsome." you say, trying to attract his attention with a smile.'
-				'"My wife had the night shift at work, so I had to eat at the cafe." he replies and you laugh together.'
-				'"Well, maybe I''ll try to cook for you, just to say thank you for what I''ve learned in your class." you answer in a serious voice.'
-				'"You know, <<$pcs_firstname>>, maybe we should arrange something like that. Yes, a tea party with the class. The girls can make cakes and the boys can prepare the classroom." your teacher replies, obviously not understanding your hint.'
-				'"That''s not what I meant." you say and walk away.'
+				'"Hello Mr. Tsarev. You are so handsome," you say, trying to attract his attention with a smile.'
+				'"My wife had the night shift at work, so I had to eat at the cafe," he replies and you laugh together.'
+				'"Well, maybe I''ll try to cook for you, just to say thank you for what I''ve learned in your class?" you answer in a serious voice.'
+				'"You know, <<$pcs_firstname>>, maybe we should arrange something like that. Yes, a tea party with the class. The girls can make cakes and the boys can prepare the classroom," he replies, obviously not understanding your hint.'
+				'"That''s not what I meant..." you say and walk away.'
 				pcs_mood -= 10
 				npc_rel['A26'] -= 1
 			else
-				'"Good morning Mr. Tsarev. I see you have a new suit, so chic." you say in a very erotic voice.'
-				'"Thank you <<$pcs_firstname>>. I bought it myself with my last paycheck." he replies.'
+				'"Good morning Mr. Tsarev. I see you have a new suit, so chic," you say in a very erotic voice.'
+				'"Thank you <<$pcs_firstname>>. I bought it myself with my last paycheck," he replies.'
 				npc_rel['A26'] += 1
 			end
 		end
@@ -89,21 +89,21 @@ if $ARGS[0] = 'teacher_greet':
 		if npc_rel['A26'] < 10:
 			*clr & cla
 			if hotcat < 5:
-				'You hurry down the hallway. You are already late, so decide to just pass by. He wasn''t even looking in your direction.'
+				'You hurry down the hallway. You''re already late, so decide to just pass by. He wasn''t even looking in your direction.'
 			else
-				'"Good morning Miss <<$pcs_lastname>>. No time to say hello to your teacher?" he asks.'
-				'"Oh Mr. Tsarev! Good morning. Sorry I didn''t notice you. I was busy day dreaming." you reply and run away.'
+				'"Good morning, Miss <<$pcs_lastname>>. No time to say hello to your teacher?" he asks.'
+				'"Oh Mr. Tsarev! Good morning. Sorry I didn''t notice you. I was busy day dreaming," you reply and run away.'
 			end
 
 			act 'Continue': gt 'gschool_lessons', 'morning'
 		else
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big26.jpg"></center>'
-			'"Good morning Miss <<$pcs_lastname>>. Why don''t you say hello? A teacher can''t punish or reward such actions. You''ve still got this year''s exam and should behave more kindly." he jokes.'
+			'"Good morning, Miss <<$pcs_lastname>>. Why don''t you say hello? A teacher can''t punish or reward such actions. You''ve still got this year''s exam and should behave more kindly," he jokes.'
 			act 'Apologize':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big26.jpg"></center>'
-				'"Oh Mr. Tsarev! I''m sorry, I didn''t see you. Of course, good day to you. I look forward to our lessons." you say smiling.'
+				'"Oh Mr. Tsarev! I''m sorry, I didn''t see you. Of course, good day to you. I look forward to our lessons," you say smiling.'
 				npc_rel['A26'] += 1
 
 				act 'Continue': gt 'gschool_lessons', 'morning'
@@ -111,7 +111,7 @@ if $ARGS[0] = 'teacher_greet':
 			act 'Touch and apologize':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big26.jpg"></center>'
-				'"Oh Mr. Tsarev. I''m sorry, I didn''t see you." you say happily, coming closer and, as if by accident, touch his arm.'
+				'"Oh Mr. Tsarev! I''m sorry, I didn''t see you," you say happily, coming closer and, as if by accident, touch his arm.'
 				'He either doesn''t notice the touch or pretends not to notice it.'
 				if hotcat >= 5: npc_rel['A26'] += 1
 
@@ -151,19 +151,19 @@ if $ARGS[0] = 'teacher_greet':
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendover.jpg"></center>'
 						npc_rel['A26'] += 1
 						'You drop some books and bend over to pick up them up, showing off your ass.'
-						'"<<$pcs_firstname>>, you really should squat down instead of bending over like that or one of the boys might take advantage." he says with a smile.'
+						'"<<$pcs_firstname>>, you really should squat down instead of bending over like that or one of the boys might take advantage!" he says with a smile.'
 					else
 						gs 'flash', 'butt', 'indoors', 1, 1
 						gs 'arousal', 'flash', -10
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendoverbare.jpg"></center>'
 						npc_rel['A26'] += 1
 						'You drop some books and bend over to pick up them up, showing off your ass.'
-						'"<<$pcs_firstname>>, you really should squat down instead of bending over like that or one of the boys might take advantage." he says with a smile.'
+						'"<<$pcs_firstname>>, you really should squat down instead of bending over like that or one of the boys might take advantage!" he says with a smile.'
 					end
 					act 'Stand up and try to start a conversation':
 						*clr & cla
-						'"Well I was lucky that it was you then. A grown and respectable man and not some kid. I don''t really understand boys and therefore I prefer to make friends and chat with more mature people." you reply.'
-						'"Yes, <<$pcs_lastname>>, their behavior is often bad." he says. Before leaving, he gently runs his hand over your back.'
+						'"Well, I was lucky that it was you then. A grown and respectable man and not some kid. I don''t really understand boys and therefore I prefer to make friends and chat with more mature people..." you reply.'
+						'"Yes, <<$pcs_lastname>>, their behavior is often bad," he says. Before leaving, he gently runs his hand over your back.'
 						pcs_horny += 3
 						act 'Continue': gt 'gschool_lessons', 'morning'
 					end
@@ -176,7 +176,7 @@ if $ARGS[0] = 'teacher_greet':
 								gs 'arousal', 'flash', -15
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendoverbare.jpg"></center>'
 								'You don''t pay attention to his words and decide to have a little more fun. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your pussy and ass.'
-								'"Miss <<$pcs_lastname>>! Please cover up." he says when he notices that you are not wearing any panties. He quickly runs up to you and pulls your skirt down, covering up your naked ass.'
+								'"Miss <<$pcs_lastname>>! Please cover up!" he says when he notices that you''re not wearing any panties. He quickly runs up to you and pulls your skirt down, covering up your naked ass.'
 								'He gives you a lecture on how to properly pick up books from the floor before you both leave, not saying a word to each other.'
 								act 'Continue': gt 'gschool_lessons', 'morning'
 							end
@@ -187,7 +187,7 @@ if $ARGS[0] = 'teacher_greet':
 								gs 'arousal', 'flash', -10
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/bendover.jpg"></center>'
 								'You don''t pay attention to his words and decide to have a little more fun. Reaching for the next book, you inadvertently pull your skirt up, giving the teacher a full view of your panty clad ass.'
-								'"Miss <<$pcs_lastname>>! Please cover up." he says before he rushes to you and pulls your skirt down, covering your ass.'
+								'"Miss <<$pcs_lastname>>! Please cover up!" he says before he rushes to you and pulls your skirt down, covering your ass.'
 								'He gives you a lecture on how to properly pick up books from the floor before you both leave, not saying a word to each other.'
 								act 'Continue': gt 'gschool_lessons', 'morning'
 							end
@@ -200,11 +200,11 @@ if $ARGS[0] = 'teacher_greet':
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big26.jpg"></center>'
 				if rand(0,4) > 0:
 					'You stumble and fall into your teacher''s arms as he deftly catches you.'
-					'"Miss <<$pcs_lastname>>! Are you OK, did you hurt yourself?" Once he makes sure you are fine, he goes on about his business.'
+					'"Miss <<$pcs_lastname>>! Are you okay? did you hurt yourself?" Once he makes sure you''re fine, he goes on about his business.'
 				else
-					'You stumble and fall in front of him. However, he lacks the agility to catch you. You bruise your knees form falling as he bends over to help you up.'
+					'You stumble and fall in front of him. However, he lacks the agility to catch you. You bruise your knees from falling as he bends over to help you up.'
 					'"Oh-Oh-Oh, my leg hurts. Oh please look, is it alright?" you say and stretch out your leg in front of his face. He begins to inspect your leg, one hand at the ankle, the other stroking your thigh, just above the bruise.'
-					'"Well <<$pcs_firstname>>, you need to be more careful. You have very beautiful legs and it would be a shame if you badly injured them." he gently whispers to you.'
+					'"Well <<$pcs_firstname>>, you need to be more careful. You have very beautiful legs and it would be a shame if you badly injured them," he gently whispers to you.'
 					'"It doesn''t look bad, but you should go to the infirmary so they can check it out." He helps you back to your feet and goes about his business.'
 					npc_rel['A26'] += 2
 				end
@@ -266,7 +266,7 @@ if $ARGS[0] = 'break_events':
 					gs 'flash', 'butt', 'indoors', 1, 1
 					gs 'arousal', 'flash', -5
 				end
-				'Not even breaking stride you call over your shoulder "Sweetie, you''ll have to spank me harder than that if you want to get up to my standards!" as your hands go down to your waist and give a flip of your skirt to give him a fleeting view of '+iif($pantyworntype ! 'none', 'your panties.', 'your naked ass.')
+				'Not even breaking stride you call over your shoulder "Sweetie, you''ll have to spank me harder than that if you want to get up to my standards!" Your hands go down to your waist and give a flip of your skirt to give him a fleeting view of '+iif($pantyworntype ! 'none', 'your panties.', 'your naked ass.')
 				gs 'gschool_events', 'leave_break_events'
 			end
 		elseif PCloSkirt > 0 and will_cost > pcs_willpwr:
@@ -318,7 +318,7 @@ if $ARGS[0] = 'break_events':
 	elseif break_rand = 2:
 		cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/irina_stumble.jpg"></center>'
-		'As you walk through the hallway you start to head up the stairs, Irina is in front of you talking to Lazar and flirting with him. She misses one of the steps and suddenly stumbles forward, nearly falling, but manages to catch herself with her hands. Unfortunately for her she drops her books which go tumbling down the stairs and even worse everyone behind and below her can see her panty clad ass under her skirt. Several boys and even a few girls whistle or make rude remarks, she quickly stands up, blushing a bit. Lazar helps her gather up her books, as you walk past the two of them.'
+		'As you walk through the hallway and head up the stairs, you see Irina in front of you talking to Lazar and flirting with him. She misses one of the steps and suddenly stumbles forward, nearly falling, but manages to catch herself with her hands. Unfortunately for her, she drops her books which go tumbling down the stairs and even worse everyone behind and below her can see her panty clad ass under her skirt. Several boys and even a few girls whistle or make rude remarks as she quickly stands up and blushes. Lazar helps her gather up her books as you walk past the two of them.'
 		gs 'arousal', 'erotic_nudity', 2
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -349,7 +349,7 @@ if $ARGS[0] = 'break_events':
 					grupvalue[4] -= 5
 					'"Let me go or I''ll scream! Then you''ll have to explain to the teachers what you were trying to do to me." Vitek grabs you by the throat and slams you up against the wall, squeezing until you can''t breathe.'
 					*nl
-					'"You threatening me bitch? I should beat the shit out of you for that." He growls as you struggle in his grip, but his friends notice everyone is starting to stare at what is going on and they grab him by the arm.'
+					'"You threatening me bitch? I should beat the shit out of you for that!" he growls as you struggle in his grip, but his friends notice everyone is starting to stare at what''s going on and they grab him by the arm.'
 					*nl
 					'"Come on Vitek, we can deal with the bitch later, let''s go!" He jerks free from them but does let you go and you collapse to the floor, gasping for air.'
 					'"This isn''t over bitch!" He walks off just as one of the teachers takes notice that something was going on, but seeing that whatever it was is over, they lose interest. You get up slowly, rubbing your bruised throat and wondering if you just made a huge mistake.'
@@ -1132,19 +1132,19 @@ if $ARGS[0] = 'break_events':
 		end
 	elseif break_rand = 31:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/teaseteacher.jpg"></center>'
-		'You notice Paulina, Lena, Lera and Ekaterina sitting by one of the windows, talking and occasinally hassling the other students. When Mr. Yenotin comes over to ask them what they are doing, Lena, Lera and Paulina occasionally open their legs wide to show off their panties while faking innocence. When Mr. Yenotin demands they stop opening their legs, they act shocked like they don''t know what he is talking about and then turn it around on him, asking him if he is trying to look up their skirts. Flustered and not making progress, he tells them to behave and hurries away while the girls all burst out laughing.'
+		'You notice Pauline, Lena, Lera and Ekaterina sitting by one of the windows, talking and occasinally hassling the other students. When Mr. Yenotin comes over to ask them what they are doing, Lena, Lera and Pauline occasionally open their legs wide to show off their panties while faking innocence. When Mr. Yenotin demands they stop, they act shocked like they don''t know what he''s talking about before turning it around on him, asking him if he''s trying to look up their skirts. Flustered and not making progress, he tells them to behave and hurries away while the girls all burst out laughing.'
 		gs 'arousal', 'erotic', 1, 'unknown'
 		gs 'arousal', 'end'
 		gs 'stat'
 	elseif break_rand = 32:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/tieshoe.jpg"></center>'
-		'As you walk down the hallway, you see Irina has stopped. She lifts her foot up to place it on the window ledge as she bends over to tie her shoe. Her skirt rides way up showing off her ass. It is only for a moment, but you are almost certain she wasn''t wearing panties. You briefly wonder if she was even aware of how much the others could see.'
+		'As you walk down the hallway, you see Irina has stopped. She lifts her foot up to place it on the window ledge as she bends over to tie her shoe. Her skirt rides way up showing off her ass. It is only for a moment, but you''re almost certain she wasn''t wearing panties. You briefly wonder if she was even aware of how much the others could see.'
 		gs 'arousal', 'erotic_nudity', 1
 		gs 'arousal', 'end'
 		gs 'stat'
 	elseif break_rand = 33:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/walkaround.jpg"></center>'
-		'As you walk down the hallway, you see Paulina, Lena and Lera practically laying in the middle of the hallway. This forces the other students to carefully walk around them and they berate those who step too close to them. You are sure they are enjoying making the other students lives harder by just being in their way.'
+		'As you walk down the hallway, you see Pauline, Lena and Lera practically laying in the middle of the hallway. This forces the other students to carefully walk around them and they berate those who step too close to them. You are sure they are enjoying making the other students lives harder by just being in their way.'
 	elseif break_rand <= 35 and month ! 9 and cheerleadingQW['quest_stage'] = 0 and cheerleadingQW['gossip'] = 4 and cheerleadingQW['gossip_day'] < daystart:
 	 !! month ! 9 so it doesnt happen in september, but does any time after that
 		gt 'gschool_cheerleading', 'poster'
@@ -1157,9 +1157,9 @@ if $ARGS[0] = 'break_events':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/lunch/hall.jpg"></center>'
 		if grupTipe = 1 or grupTipe = 2 or grupTipe = 4:
-			'As you walk down the hallway you notice Petka stop at the boys bathroom door and look around for a moment, like he is afraid to go into the bathroom. He opens the door and looks in, then apparently liking what he sees, goes in. He must have been checking if any gopniks were already in there waiting to bully him or something. That likely means he is alone in there. Looking around, you see the hall starting to clear of people.'
+			'As you walk down the hallway you notice Petka stop at the boys bathroom door and look around, like he''s afraid to go into the bathroom. He opens the door and looks in, then apparently liking what he sees, goes in. He must have been checking if any gopniks were already in there waiting to bully him or something. That likely means he''s alone in there. Looking around, you see the hall starting to clear of people.'
 		else
-			'As you walk down the hallway you notice Petka stop at the boys bathroom door and look around for a moment, like he is afraid to go into the bathroom. He opens the door and looks in, then apparently liking what he sees, goes in. He must have been checking if any gopniks were already in there waiting to bully him or something. You don''t blame him for being cautious as you go about your business.'
+			'As you walk down the hallway you notice Petka stop at the boys bathroom door and look around, like he''s afraid to go into the bathroom. He opens the door and looks in, then apparently liking what he sees, goes in. He must have been checking if any gopniks were already in there waiting to bully him or something. You don''t blame him for being cautious as you go about your business.'
 		end
 		act 'Leave': gt 'gschool_events', 'leave_break_events2'
 		if lernHome > 1:
@@ -1211,7 +1211,7 @@ if $ARGS[0] = 'afterschool_events':
 					'You walk up to her. "Hey, what''s up Alyona?"'
 					'She gives you a dirty look. "Just hanging out. Why?"'
 					'You reply. "No reason. I just wanted to say hi."'
-					'She shrugs a bit as she takes a long pull of the bottle, before offering it to you. "Want a drink?"'
+					'She shrugs as she takes a long pull of the bottle before offering it to you. "Want a drink?"'
 
 					gs 'willpower', 'drink', 'resist'
 					if will_cost <= pcs_willpwr:
@@ -1247,8 +1247,8 @@ if $ARGS[0] = 'afterschool_events':
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/alyona3.jpg"></center>'
 								'You shake your head and don''t take the offered bottle. "No thanks, I need to be able to walk home."'
-								'She laughs a bit at that and takes another long swig herself. The two of you talk as she drinks. Well, you talk and she drinks. Before long, she is wasted. She puts the bottle away and falls on her ass as she starts to get up. You offer to help, but she pushes you away. "Fuck off, I don''t need any help!"'
-								'You back off and let her get up on her own, but it takes her a couple of tries. Once up, she turns and stumbles for the exit, not sure what to do. You head out after her, at least making sure she gets outside in one piece.'
+								'She laughs and takes another long swig herself. The two of you talk as she drinks. Well, you talk and she drinks. Before long, she is wasted. She puts the bottle away and falls on her ass as she starts to get up. You offer to help, but she pushes you away. "Fuck off, I don''t need any help!"'
+								'You back off and let her get up on her own, but it takes her a few tries. Once up, she turns and stumbles for the exit, not sure what to do. You head out after her, at least making sure she gets outside in one piece.'
 								act 'Leave': gt 'gschool_grounds', 'main'
 							end
 						else
@@ -1262,15 +1262,15 @@ if $ARGS[0] = 'afterschool_events':
 							npc_rel['A143'] += 2
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/alyona3.jpg"></center>'
 							'You take the offered bottle and take another swig as well. It burns a little less this time. "If I drink much more of this I won''t be able to walk home."'
-							'She laughs a bit at that and take another long swig herself. The two of you talk and drink. Well, you talk while she drinks even more than you do. Before long, you are both wasted. She puts the bottle away and falls on her ass as she starts to get up. You offer to help, but she pushes you away. She then sighs and takes your hand as you pull her to her feet. The two of you stumble outside together supporting one another. After taking a breath of fresh air, you feel a little better.'
-							'She stumbles away but calls back. "I gotta go, see you around <<$pcs_nickname>>!", leaving you drunk and alone.'
+							'She laughs and take another long swig herself. The two of you talk and drink. Well, you talk while she drinks even more than you do. Before long, you are both wasted. She puts the bottle away and falls on her ass as she starts to get up. You offer to help, but she pushes you away. She then sighs and takes your hand as you pull her to her feet. The two of you stumble outside together supporting one another. After taking a breath of fresh air, you feel a little better.'
+							'She stumbles away but calls back. "I gotta go. See you around <<$pcs_nickname>>!"'
 							act 'Leave': gt 'gschool_grounds', 'main'
 						end
 					end
 				else
 					'You walk up to her. "Hey what''s up Alyona?"'
-					'She gives you a dirty look. "What the fuck do you want skank?"'
-					'Taken a bit aback by her comment you reply. "Nothing I just wanted to say hi."'
+					'She gives you a dirty look. "What the fuck do you want, skank?"'
+					'You''re taken a bit aback by her comment. "Nothing I just wanted to say hi."'
 					'"Well fuck off bitch before you get hurt!" She sounds serious and you know she has a rep for carrying a knife and not being afraid of using it, so you decide not to press the issue and leave.'
 					act 'Leave': gt 'gschool_grounds', 'main'
 				end
@@ -1300,7 +1300,7 @@ if $ARGS[0] = 'afterschool_events':
 			end
 		elseif break_rand = 3:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/braflash.jpg"></center>'
-			'As you walk down the hallway, you see several of the gopnik boys giving Paulina a bit of a hard time. She flips them off and shoves the closer ones away. Before she walks off, she flips up her shirt to flash them her bra and laughs at their reaction before walking away, the boys calling her a tease as she does.'
+			'As you walk down the hallway, you see several of the gopnik boys giving Pauline a bit of a hard time. She flips them off and shoves the closer ones away. Before she walks off, she flips up her shirt to flash them her bra and laughs at their reaction before walking away, the boys calling her a tease as she does.'
 			gs 'arousal', 'erotic', 1
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -1317,13 +1317,13 @@ if $ARGS[0] = 'afterschool_events':
 			gs 'arousal', 'erotic_nudity', 5, 'unknown'
 			gs 'stat'
 			act 'Ignore her and leave': gt 'gschool_grounds', 'main'
-			act 'Ask her whats going on':
+			act 'Ask her what''s going on':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/nushflash2.jpg"></center>'
 				'You walk up to her and as you do, she turns to face you, giving you a full view of everything she has. "What''s up <<$pcs_nickname>>?"'
 				'You smile at how casual she is about everything. "You tell me! I was about to ask you the same thing."'
-				'She smiles, obviously knowing what you mean and replies. "Oh you know, same old same old." she says as she gets dressed.'
-				'You just nod. What else are you suppose to say? Once fully dressed, she adds "Well I need to go, see you around." and she turns and heads out.'
+				'She smiles, obviously knowing what you mean and replies. "Oh you know, same old same old," she says as she gets dressed.'
+				'You just nod. Once fully dressed, she adds "Well I need to go, see you around." She turns and heads out.'
 				gs 'arousal', 'erotic_nudity', 5
 				gs 'arousal', 'end'
 				gs 'stat'
@@ -1380,7 +1380,7 @@ if $ARGS[0] = 'afterschool_events':
 			act 'Watch':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip2.jpg"></center>'
-				'After a few moments, they encourage her to take off her jacket. Well it''s just her jacket, nothing to it. She seems unsure but after one more quick glance around, she pulls off her jacket, smiling as the boys whistle and compliment her. She seems to be a little more OK with it since the boys are complimenting her so much. Then they start encouraging her to show them her underwear.'
+				'After a few seconds, they encourage her to take off her jacket. She seems unsure, but after one more quick glance around, she pulls off her jacket, smiling as the boys whistle and compliment her. She seems to be a little more OK with it since the boys are complimenting her so much. Then they start encouraging her to show them her underwear.'
 				act 'Ignore what''s happening and leave': gt 'gschool_grounds', 'main'
 				gs 'willpower', 'misc', 'self', 'medium'
 				if will_cost <= pcs_willpwr:
@@ -1391,8 +1391,8 @@ if $ARGS[0] = 'afterschool_events':
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip1.jpg"></center>'
 						'You decide to give her an out and head right for Lariska. "There you are! You ready to go?" you ask her.'
-						'For a moment she seems confused, but with a final look at the boys, she nods quickly. "Yes." She smiles to the boys as the two you head out. She leans over to you and quietly says "Thanks."'
-						'The boys grumble a bit as the two of you walk off, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
+						'For a moment she seems confused, but with a final look at the boys, she nods quickly and smiles at the boys as you head out. She leans over to you and quietly says "Thanks."'
+						'The boys grumble as the two of you walk away, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
 						act 'Leave': gt 'gschool_grounds', 'main'
 					end
 				else
@@ -1401,7 +1401,7 @@ if $ARGS[0] = 'afterschool_events':
 				act 'Keep Watching':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip3.jpg"></center>'
-					'Again she hesitates, obviously a bit unsure but the boys keep encouraging her, pointing out that no one is around and it is just her underwear and that it covers as much as the bikini they have seen her in anyways. After a few more glances around, she unbuttons her shirt and takes it off, then her skirt, leaving her standing in front of them in her underwear, blushing as the boys really compliment her. You can''t tell if she is blushing from the embarrassment or because she likes the attention.'
+					'Again she hesitates, but the boys keep encouraging her, pointing out that no one is around and it''s just her underwear, which covers as much as the bikini they have seen her in anyways. After a few more glances around, she unbuttons her shirt and takes it off, then her skirt, leaving her standing in front of them in her underwear, blushing as the boys really compliment her. You can''t tell if she is blushing from the embarrassment or because she likes the attention.'
 					*nl
 					'Next, the boys start encouraging her to take off her bra. She now looks a bit less confident, looking around and partially using her hands to cover herself up from time to time, but the guys keep complimenting and encouraging her to take off her bra. She resists at first, but she slowly seems to be giving in under the peer pressure.'
 					gs 'arousal', 'erotic', 5, 'unknown'
@@ -1416,8 +1416,8 @@ if $ARGS[0] = 'afterschool_events':
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip1.jpg"></center>'
 							'You decide to give her an out and head right for Lariska. "There you are! You ready to go?" you ask her.'
-							'For a moment she seems confused, but with a final look at the boys, she nods quickly. "Yes." She smiles to the boys as the two you head out. She leans over to you and quietly says "Thanks."'
-							'The boys grumble a bit as the two of you walk off, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
+							'For a moment she seems confused, but with a final look at the boys, she nods quickly and smiles at the boys as you head out. She leans over to you and quietly says "Thanks."'
+							'The boys grumble as the two of you walk away, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
 							act 'Leave': gt 'gschool_grounds', 'main'
 						end
 					else
@@ -1441,8 +1441,8 @@ if $ARGS[0] = 'afterschool_events':
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip1.jpg"></center>'
 								'You decide to give her an out and head right for Lariska. "There you are! You ready to go?" you ask her.'
-								'For a moment she seems confused, but with a final look at the boys, she nods quickly. "Yes." She smiles to the boys as the two you head out. She leans over to you and quietly says "Thanks."'
-								'The boys grumble a bit as the two of you walk off, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
+								'For a moment she seems confused, but with a final look at the boys, she nods quickly and smiles at the boys as the two you head out. She leans over to you and quietly says "Thanks."'
+								'The boys grumble as the two of you walk away, but they go their own way as well. Once outside, Lariska thanks you again and then hurries off.'
 								act 'Leave': gt 'gschool_grounds', 'main'
 							end
 						else
@@ -1451,7 +1451,7 @@ if $ARGS[0] = 'afterschool_events':
 						act 'Keep Watching':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/strip5.jpg"></center>'
-							'Finally, she gives in and pulls her panties down and steps out of them. She is now completely naked in front of the boys, who seem to be loving the show. She seems torn between enjoying the approval of the boys and the embarrassment of being naked. She lets the boys look at her naked body for a couple more minutes before she seems to change her mind and starts to quickly get dressed. The boys try to get her to stay naked, but she gets dressed. The boys take it in their stride and comment about how great she looks and how cool she is. Once she is dressed, they all leave together, leaving you to go on your way as well.'
+							'Finally, she gives in and pulls her panties down and steps out of them. She is now completely naked in front of the boys, who seem to be loving the show. She seems torn between enjoying the approval of the boys and the embarrassment of being naked. She lets the boys look at her naked body for a few more minutes before she seems to change her mind and starts to quickly get dressed. The boys try to get her to stay naked, but she gets dressed. The boys take it in their stride and comment about how great she looks and how cool she is. Once she is dressed, they all leave together, leaving you to go on your way as well.'
 							gs 'arousal', 'erotic_nudity', 5
 							gs 'arousal', 'end'
 							gs 'stat'
@@ -1474,7 +1474,7 @@ if $ARGS[0] = 'afterschool_events':
 			act 'Ask if she is OK':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/upset.jpg"></center>'
-				'You stop beside her. "Are you OK?" you ask.'
+				'You stop beside her. "Are you okay?" you ask.'
 				'She looks up a bit startled. She apparently didn''t hear you walk up. She quickly rubs her eyes, making it very obvious she was crying. "I''m fine."'
 				'Her tone suggests she is anything but fine, but before you can say more she starts to get up, clearly wanting to get away.'
 				gs 'willpower', 'misc', 'self', iif(grupTipe ! 4,'easy','')
@@ -1626,7 +1626,7 @@ if $ARGS[0] = 'afterschool_classroom_events':
 	act 'Leave': gt 'gschool_grounds', 'main'
 	if break_rand = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/afterschool/classroom/girlsnudeboy.jpg"></center>'
-		'You step over to the classroom door, look up and down the hallway and see no one around. You gently pull the door open just a crack and peek inside. You notice Lavrenti sitting at one of the desks completely naked while Paulina, Lera and Lena are sitting on a desk near him. You are not sure what is going on as you can''t quite make out what they are saying, but the girls are teasing him about something. You decide you would rather not get caught spying, so you gently close the door and hurry off.'
+		'You step over to the classroom door, look up and down the hallway and see no one around. You gently pull the door open just a crack and peek inside. You notice Lavrenti sitting at one of the desks completely naked while Pauline, Lera and Lena are sitting on a desk near him. You are not sure what is going on as you can''t quite make out what they are saying, but the girls are teasing him about something. You decide you would rather not get caught spying, so you gently close the door and hurry off.'
 		gs 'arousal', 'voyeur', 5
 		gs 'arousal', 'end'
 		gs 'stat'

+ 7 - 0
locations/gschool_grounds.qsrc

@@ -417,6 +417,11 @@ if $ARGS[0] = 'bulding':
 	$menu_arg = 'bulding'
 	menu_off = 0
 	gs 'stat'
+
+	if therapistFuckedPussyScene = 1:
+		gt 'therapist','therapistFucked'
+	end
+
 	'<center><b><font color="maroon">Inside School</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall0<<rand(0,2)>>.jpg"></center>'
 	'The hallways of the school building are painted with a cheap green paint, which you think may be toxic. Budget cuts.'
@@ -987,5 +992,7 @@ if $ARGS[0] = 'Family extension':
 	end
 end
 
+
+
 --- gschool_grounds ---------------------------------
 

+ 10 - 10
locations/gschool_lessonsev1.qsrc

@@ -1456,7 +1456,7 @@ if $ARGS[0] = 'russian':
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 5:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/urok7.jpg"></center>'
-			'As you wait for the lesson to end, you see that you''re not the only one who''s a bit drowsy; Paulina is very close to falling asleep on her desk.'
+			'As you wait for the lesson to end, you see that you''re not the only one who''s a bit drowsy; Pauline is very close to falling asleep on her desk.'
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 6:
 			'<center><video autoplay loop src="images/locations/pavlovsk/school/classroom/crash.mp4"></video></center>'
@@ -1598,21 +1598,21 @@ if $ARGS[0] = 'russian':
 				gs 'stat'
 				act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 			end
-			act 'Paulina':
+			act 'Pauline':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/talk.jpg"></center>'
 				gs 'exp_gain', 'chrsm', rand(1,2)
 				if fame['pav_slut'] >= 150:
-					'You sit next to Paulina, who ignores you at first before mouthing "slut" at you and doing a motion with her hands where she pretends to be forcing your head down on her imaginary dick.'
+					'You sit next to Pauline, who ignores you at first before mouthing "slut" at you and doing a motion with her hands where she pretends to be forcing your head down on her imaginary dick.'
 				else
 					if grupTipe = 4:
 						npc_rel['A24'] += 1
-						'You sit next to Alyona and you spend most of the class talking quietly with each other. You often get stern looks from Mr. Yenotin when you get a bit too loud. He clears his throat and hushes you a few times before he finally tells you to be quiet or he''ll send you to the principal''s office.'
+						'You sit next to Pauline and you spend most of the class talking quietly with each other. You often get stern looks from Mr. Yenotin when you get a bit too loud. He clears his throat and hushes you a few times before he finally tells you to be quiet or he''ll send you to the principal''s office.'
 					elseif grupTipe = 5:
-						'You are forced to sit next to Paulina and she immediately starts bullying you, eventually getting some of the other gopniks to join in.'
+						'You are forced to sit next to Pauline and she immediately starts bullying you, eventually getting some of the other gopniks to join in.'
 					else
 						npc_rel['A24'] += 1
-						'You sit next to Paulina. She is a little surprised that you chose to do so, but you are able to strike up a brief, if a little awkward, conversation with her before Mr. Ivanov asks you to be quiet.'
+						'You sit next to Pauline. She is a little surprised that you chose to do so, but you are able to strike up a brief, if a little awkward, conversation with her before Mr. Ivanov asks you to be quiet.'
 					end
 				end
 				gs 'stat'
@@ -1687,9 +1687,9 @@ if $ARGS[0] = 'russian':
 			end
 		elseif scooltiperand = 15 and (soniafall = 5 or soniaPS = 1):
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/russian/soniadare1.jpg"></center>'
-			'As you work on your class assignment, you hear Paulina talking to Sonia. "I dare you to walk up to Mr. Yenotin and ask him for help. Then bend over his desk, pull your panties down and show everyone your ass."'
+			'As you work on your class assignment, you hear Pauline talking to Sonia. "I dare you to walk up to Mr. Yenotin and ask him for help. Then bend over his desk, pull your panties down and show everyone your ass."'
 			'Sonia blushes a little, but also looks thrilled at the idea. "Everyone would see."'
-			'Paulina nods. "Yeah, everyone would see how badass you are."'
+			'Pauline nods. "Yeah, everyone would see how badass you are."'
 			'Sonia looks around, spots you looking at them and grins as she gets up and heads up to Mr. Yenotin''s desk.'
 			act 'Ignore them and wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 			act 'Watch':
@@ -1740,7 +1740,7 @@ if $ARGS[0] = 'russian':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/class1.jpg"></center>'
 				'Not wanting to partake in the bullying, but also not wanting to piss off Alyona or the gopniks, you don''t say anything. "Please continue." Mr. Yenotin tells Marcus while giveing Alyona a disapproving look. "Please be nice and treat others as you would like them to treat you." This doesn''t have the effect he was hoping for as it just gets her and several other students laughing.'
-				'After a few minutes, Marcus is still struggling and now Paulina joins in as well, interrupting him each time he almost gets the word right. Soon about half the class has joined in and Mr. Yenotin gives up. "That''s enough Marcus, it was a good effort. Now how about we have someone else read for a bit? Alyona, why don''t you read the next part?"'
+				'After a few minutes, Marcus is still struggling and now Pauline joins in as well, interrupting him each time he almost gets the word right. Soon about half the class has joined in and Mr. Yenotin gives up. "That''s enough Marcus, it was a good effort. Now how about we have someone else read for a bit? Alyona, why don''t you read the next part?"'
 				act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 			end
 			act'Take over reading':
@@ -1846,7 +1846,7 @@ if $ARGS[0] = 'russian':
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 20:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/russian/paulpanties.jpg"></center>'
-			'As class ends and everyone starts to get up, Paulina stops in front of Marcus, bends over and lifts her skirt to show him her panty clad ass and wiggles it around. "That''s as close as any Russian girl will get to letting you touch them. It must be... hard... being so far from home Marcus." She teases him a bit more and gets a lot of laughs. He does his best to ignore it, but he can''t help himself from looking. Soon, it is over as she drops her skirt back in place and everyone leaves class.'
+			'As class ends and everyone starts to get up, Pauline stops in front of Marcus, bends over and lifts her skirt to show him her panty clad ass and wiggles it around. "That''s as close as any Russian girl will get to letting you touch them. It must be... hard... being so far from home Marcus." She teases him a bit more and gets a lot of laughs. He does his best to ignore it, but he can''t help himself from looking. Soon, it is over as she drops her skirt back in place and everyone leaves class.'
 			gs 'arousal', 'voyeur', 5
 			gs 'arousal', 'end'
 			gs 'stat'

+ 9 - 9
locations/gschool_lessonsev2.qsrc

@@ -1198,7 +1198,7 @@ if $ARGS[0] = 'shop':
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 4:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/urok7.jpg"></center>'
-			'As you wait for the end of the lesson, you notice you''re not the only one being a bit drowsy; Paulina is very close to falling asleep on her desk.'
+			'As you wait for the end of the lesson, you notice you''re not the only one being a bit drowsy; Pauline is very close to falling asleep on her desk.'
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 5:
 			'<center><video autoplay loop src="images/locations/pavlovsk/school/classroom/boobg.mp4"></video></center>'
@@ -1464,21 +1464,21 @@ if $ARGS[0] = 'shop':
 				gs 'stat'
 				act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 			end
-			act 'Paulina':
+			act 'Pauline':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/talk.jpg"></center>'
 				gs 'exp_gain', 'chrsm', rand(1,2)
 				if fame['pav_slut'] >= 150:
-					'You sit next to Paulina, who ignores you at first before mouthing "slut" at you and doing a motion with her hands where she pretends to be forcing your head down on her imaginary dick.'
+					'You sit next to Pauline, who ignores you at first before mouthing "slut" at you and doing a motion with her hands where she pretends to be forcing your head down on her imaginary dick.'
 				else
 					if grupTipe = 4:
 						npc_rel['A24'] += 1
-						'You sit next to Alyona and you spend most of the class talking quietly with each other. You often get stern looks from Mr. Kuznetsov when you get a bit too loud. He clears his throat and hushes you a few times before he finally tells you to be quiet or he''ll send you to the principal''s office.'
+						'You sit next to Pauline and you spend most of the class talking quietly with each other. You often get stern looks from Mr. Kuznetsov when you get a bit too loud. He clears his throat and hushes you a few times before he finally tells you to be quiet or he''ll send you to the principal''s office.'
 					elseif grupTipe = 5:
-						'You are forced to sit next to Paulina and she immediately starts bullying you, eventually getting some of the other gopniks to join in.'
+						'You are forced to sit next to Pauline and she immediately starts bullying you, eventually getting some of the other gopniks to join in.'
 					else
 						npc_rel['A24'] += 1
-						'You sit next to Paulina. She is a little surprised that you chose to do so, but you are able to strike up a brief, if a little awkward, conversation with her before Mr. Kuznetsov asks you to be quiet.'
+						'You sit next to Pauline. She is a little surprised that you chose to do so, but you are able to strike up a brief, if a little awkward, conversation with her before Mr. Kuznetsov asks you to be quiet.'
 					end
 				end
 				gs 'stat'
@@ -1550,16 +1550,16 @@ if $ARGS[0] = 'shop':
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 13:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/shop/paulnushhump.jpg"></center>'
-			'Near the end of class, Mr. Kuznetsov tells the class to study quietly as he leaves class a few minutes early. Of course, once he is gone no one listens and everyone starts wandering around messing with the tools. Meanwhile, Anushka starts to tease Fedor, asking him if he wants to fuck her until she makes him blush. When he finally admits he is attracted to her, Paulina swoops in behind Anushka, pushes into her and pulls up the back of her skirt.'
+			'Near the end of class, Mr. Kuznetsov tells the class to study quietly as he leaves class a few minutes early. Of course, once he is gone no one listens and everyone starts wandering around messing with the tools. Meanwhile, Anushka starts to tease Fedor, asking him if he wants to fuck her until she makes him blush. When he finally admits he is attracted to her, Pauline swoops in behind Anushka, pushes into her and pulls up the back of her skirt.'
 			*nl
-			'She starts pounding her hips against Anushka''s ass. "Oh Anushka you''re so hot, I have always wanted to fuck you." Paulina says, obviously trying to sound like Fedor, and Anushka plays along. "Oh Fedor, you have such an almost average sized dick! It almost feels good!" This gets the rest of class laughing and Fedor blushing even more. His humiliation ends when the bell rings.'
+			'She starts pounding her hips against Anushka''s ass. "Oh Anushka you''re so hot, I have always wanted to fuck you." Pauline says, obviously trying to sound like Fedor, and Anushka plays along. "Oh Fedor, you have such an almost average sized dick! It almost feels good!" This gets the rest of class laughing and Fedor blushing even more. His humiliation ends when the bell rings.'
 			gs 'arousal', 'erotic', 5
 			gs 'arousal', 'end'
 			gs 'stat'
 			act 'Leave class': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 14:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/shop/paulvichair.jpg"></center>'
-			'During class, Vicky and Paulina start whispering back and forth and you can tell it''s getting heated by the harshness of the hissing whispers and their facial expressions. You have no clue what they are saying but whatever it is pisses Paulina off, as she reaches over and starts yanking hard on Vicky''s hair. "You fucking bitch, I will rip your hair out." she says loudly enough to get everyone''s attention. Mr. Kuznetsov rushes over, breaks it up and then takes each girl by the elbow and leads them out of class. A couple of minutes later, Vicky comes back looking smug and just before the end of class, Mr. Kuznetsov comes back alone.'
+			'During class, Vicky and Pauline start whispering back and forth and you can tell it''s getting heated by the harshness of the hissing whispers and their facial expressions. You have no clue what they are saying but whatever it is pisses Pauline off, as she reaches over and starts yanking hard on Vicky''s hair. "You fucking bitch, I will rip your hair out." she says loudly enough to get everyone''s attention. Mr. Kuznetsov rushes over, breaks it up and then takes each girl by the elbow and leads them out of class. A couple of minutes later, Vicky comes back looking smug and just before the end of class, Mr. Kuznetsov comes back alone.'
 			act 'Wait for the end of the lesson': gt 'gschool_lessons', 'short_break'
 		elseif scooltiperand = 15 and npc_rel['A15'] => 60:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/classroom/shop/vicpanties.jpg"></center>'

+ 61 - 61
locations/gschool_socialchg.qsrc

@@ -80,7 +80,7 @@ if $ARGS[0] = 'Pavlovsk slut':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/shamewalk.jpg"></center>'
-	'As you walk down the school hallway, you notice almost everyone is eying you. Some sneer at you, others laugh, a few turn away in disgust. You are used to this treatment with your sexual escapades, but not to this level. No one wants to greet you and most seem to actively avoid you, you are starting to feel a bit uncomfortable at all the staring eyes. As you approach your locker, you see someone has spray painted ''Slut'' on it in big red letters. You hear someone walking up behind you before you turn around to see who it might be.'
+	'Walking down the school hallway, you notice almost everyone is eying you. Some sneer at you, others laugh, and others turn away in disgust. You are used to this treatment with your sexual escapades, but not to this level. No one wants to greet you and most actively avoid you. You are starting to feel a bit uncomfortable at all the staring eyes. As you approach your locker, you see someone has spray painted ''Slut'' on it in big red letters. You hear someone walking up behind you before you turn around to see who it might be.'
 
 	grupvalue[1] = min(100,grupvalue[1])
 	grupvalue[2] = min(150,grupvalue[2])
@@ -103,31 +103,31 @@ if $ARGS[0] = 'Pavlovsk slut':
 	if grupTipe = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/coolslut.jpg"></center>'
 		if soniaPS = 0:
-			'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe in complete disgust. Just as you''re about to ask what''s going on, Irina cuts you off. "Shut your cum hole, slut! I don''t want to smell your cum breath. We''ve all heard about what you''ve been up to and your ass is out. You''re no longer welcome around us. Go and find some dick to suck and maybe they will pretend to care about you." With that, Irina turns and walks away as Dimka gives you a final look and shakes his head.'
+			'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe in complete disgust. Just as you''re about to ask what''s going on, Irina cuts you off. "Shut your cum hole, slut! I don''t want to smell your cum breath. We''ve all heard about what you''ve been up to, and your ass is out. You''re no longer welcome around us. Find some dick to suck, and maybe they will pretend to care about you." With that, Irina turns and walks away as Dimka gives you a final look and shakes his head.'
 		else	
-			'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe in complete disgust. Just as you''re about to ask what''s going on, Irina cuts you off. "Shut your cum hole, slut! I don''t want to smell your cum breath. We''ve all heard about what you''ve been up to and your ass is out. You''re no longer welcome around us. Go and find Sonia, I''m sure you two have a lot in common now." With that, Irina turns and walks away as Dimka gives you a final look and shakes his head.'
+			'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe in complete disgust. Then, just as you''re about to ask what''s going on, Irina cuts you off. "Shut your cum hole, slut! I don''t want to smell your cum breath. We''ve all heard about what you''ve been up to, and your ass is out. You''re no longer welcome around us. Go and find Sonia. I''m sure you two have a lot in common now." With that, Irina turns and walks away as Dimka gives you a final look and shakes his head.'
 		end	
 		'"What a waste, you fucking slut." He then spits at your feet before leaving as well. You hear many of the students around you laughing as you look around. Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	elseif grupTipe = 2:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/jockslut.jpg"></center>'
 		if christinaQW['fight'] < 1 or christinaQW['blackmail'] < 2:
-			'Christina, Lariska, and Lina walk up to you. Lariska and Lina are looking at you in disgust, while Christina is smirking. She shoves you hard up against your locker. "What are you doing here slut? Shouldn''t you be in the boys bathroom sucking a bunch of cocks? We all heard that''s all you do now. At least sluts know to get paid, but you just give it away for free." she says mockingly while laughing. Lariska, Lina and several other students nearby join in, openly mocking you.'
+			'Christina, Lariska, and Lina walk up to you. Lariska and Lina are looking at you in disgust while Christina is smirking. She shoves you hard up against your locker. "What are you doing here slut? Shouldn''t you be in the boys'' bathroom sucking a bunch of cocks? We all heard that''s all you do now. At least sluts know to get paid, but you just give it away for free, " she laughs mockingly. Lariska, Lina and several other students nearby join in, openly mocking you.'
 		else
-			'Albina and Lazar walk up to you with looks of disgust on their face. "What are you doing here? Shouldn''t you be in the boys bathroom sucking dick like the whore that you are?" Lazar says mockingly. Albina opens her mouth to say something, but chooses to remain quiet and stares at the floor. Christina smirks at you from behind them, not daring to challenge you directly, but definitely enjoying the moment.'
+			'Albina and Lazar walk up to you with looks of disgust on their face. "What are you doing here? Shouldn''t you be in the boys'' bathroom sucking dick like the whore that you are?" Lazar says mockingly. Albina opens her mouth to say something but chooses to remain quiet and stares at the floor. Christina smirks at you from behind them, not daring to challenge you directly but enjoying the moment.'
 		end
 		if soniaPS = 0:
-			'"Go and hang out with the other losers because none of us give a shit about you anymore." Lazar says before turning and walking away. Albina looks at you with what you think is disappointment before she shakes her head and follows Lazar. Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+			'"Go hang out with the other losers because none of us gives a shit about you anymore," Lazar says before turning and walking away. Albina looks at you with what you think is disappointment before she shakes her head and follows Lazar. Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 		else	
-			'"Go and hang out with the other losers because none of us give a shit about you anymore. I''m sure you and Sonia have a lot in common now." Lazar says mockingly before walking away. Albina looks at you with what you think is disappointment before she shakes her head and follows Lazar. Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+			'"Go hang out with the other losers because none of us gives a shit about you anymore. I''m sure you and Sonia have a lot in common now." Lazar says mockingly before walking away. Albina looks at you with what you think is disappointment before she shakes her head and follows Lazar. Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 		end	
 	elseif grupTipe = 3:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
-		'A group of students stand in front of you, wanting to get a better look at what''s written on your locker. When you look at them, they start laughing and then quickly hurry away from you as if you have the plague. You turn and try to find some of your friends, but most seem to be hiding or hurry off when you approach. You finally manage to catch up to Gerasim, but just as you''re about to say something, he turns to you. "Please go away! I don''t know what you''ve gotten yourself into, but the things they say you''ve done..." He looks disgusted. "I''m sorry, but I can''t be seen hanging out with you anymore. I''ve got enough problems without you making it worse."'
-		'He pauses for a second to stare at the dejected look on your face, realizing that you are now an outcast. He then lets out a short sigh. "I''m sorry, I really am but this is your own fault. What were you thinking doing all that.. sex stuff? Just leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you as he wheels himself away from you decidedly. You take a second to look around as most of the other students either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+		'A group of students stand in front of you, wanting a better look at what''s written on your locker. They start laughing when you look at them and quickly hurry away from you as if you have the plague. You turn and try to find some of your friends, but most seem to be hiding or hurrying off when you approach. You finally manage to catch up to Gerasim, but he turns to you just as you''re about to say something. "Please go away! I don''t know what you''ve gotten yourself into, but the things they say you''ve done..." He looks disgusted. "I''m sorry, but I can''t be seen hanging out with you anymore. I''ve got enough problems without you making them worse."'
+		'He pauses for a second to stare at the dejected look on your face, realizing that you are now an outcast. He then lets out a short sigh. "I''m sorry, I really am, but this is your fault. What were you thinking doing all that.. sex stuff? Just leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you as he wheels himself away from you decidedly. You take a second to look around as most other students either start mocking you or actively look away. Finally, you grab your stuff and hurry to your next class.'
 	elseif grupTipe = 4:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/gopnikslut.jpg"></center>'
-		'You turn and see Pauline, Lera and Lena standing next to you. Lera is snickering, Pauline looks like she''s preparing to beat you up and Lera looks at you with disgust. Pauline shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently hanging out, partying and having a good time wasn''t enough for you. Noooo, you had to go around and be the town bicycle! Don''t act all surprised, we''ve all heard about how you let any guy fuck you in whatever hole they desire. Spineless sluts have no place with us, so stay the fuck away from us or I will personally beat the living shit out of you." With that, Pauline shoves your against you locker and walks away.'
-		'Lena gives you a final look of disgust and shoves you again while Lera gives you a few parting words before walking away. "If you ever try to approach us, we''ll take you to some nasty guys who will fuck you so hard that your holes will be loose enough to stick a watermelon inside them!" Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+		'You turn and see Pauline, Lera and Lena standing next to you. Lera is snickering. Pauline looks like she''s preparing to beat you up, and Lera looks at you with disgust. Pauline shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently, hanging out, partying and having a good time wasn''t enough for you. Noooo, you had to go around and be the town bicycle! Don''t act all surprised. We''ve all heard about how you let any guy fuck you in whatever hole they desire. Spineless sluts have no place with us, so stay away from us, or I will beat the living shit out of you." With that, Pauline shoves you against your locker and walks away.'
+		'Lena gives you a final look of disgust and shoves you again while Lera gives you a few parting words before walking away. "If you ever try to approach us, we''ll take you to nasty guys who will fuck you so hard that your holes will be loose enough to stick a watermelon inside them!" Having been publicly shamed and disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	end
 	'<font color = red>You have been kicked out of your social group and become an outcast.</font>'
 	grupTipe = 5
@@ -140,13 +140,13 @@ if $ARGS[0] = 'coolkid':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing behind you and turn to see Vicky, Andrey and Stasya giving you friendly smiles. "Hey <<$pcs_nickname>>, we''ve been talking and you seem to have the right attitude to be one of us. So what do you say, do you want to join the popular clique?" Vicky asks and the three of them just stand there waiting on your response.'
+	'You walk down the hallway and stop at your locker. You sense someone standing behind you and turn to see Vicky, Andrey and Stasya giving you friendly smiles. "Hey, <<$pcs_nickname>>, we''ve been talking, and you seem to have the right attitude to be one of us. So what do you say? Do you want to join the popular clique?" Vicky asks, and the three of them just wait for your response.'
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
 		'You shake your head. "I like hanging out with you guys, but I don''t think that''s a good idea."'
-		'Vicky frowns but nods. "Suit yourself then." With that, she turns and leaves, Andrey just shakes his head at you and does the same.'
-		'Stasya gives you a once over. "I told you guys she wasn''t cool enough! What a loser!" With that, she follows the others, leaving you behind to wonder if you made the right choice.'
+		'Vicky frowns but nods. "Suit yourself then." With that, she turns and leaves. Andrey just shakes his head at you and does the same.'
+		'Stasya gives you a once-over. "I told you guys she wasn''t cool enough! What a loser!" With that, she follows the others, leaving you behind to wonder if you made the right choice.'
 
 		grupvalue[1] = rand(600,650)
 		old_grupvalue[1] = grupvalue[1]
@@ -158,7 +158,7 @@ if $ARGS[0] = 'coolkid':
 	act 'Yes':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-		'You nod your head. "Yes I would love to! I love hanging out with you guys!"'
+		'You nod your head. "Yes, I would love to! I love hanging out with you guys!"'
 		'Vicky gives you a hug. Once she lets go, Andrey wraps an arm around your shoulder and starts leading you to your next class. "From now on, you''re one of us." Stasya gives you a friendly smile as the four of you walk to your next class.'
 		
 		grupvalue[2] = min(rand(675,725),grupvalue[2])
@@ -190,9 +190,9 @@ if $ARGS[0] = 'coolkid warn 1':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing behind you and turn to see Vicky, Andrey and Stasya giving you friendly smiles. "Hey <<$pcs_nickname>>, is everything okay?"'
-	'Before you can answer, Stasya chimes in. "You havn''t been setting the right example of late. You''re acting more like the losers than us, so do you want to keep hanging around with us or not?"'
-	'You are again interrupted before you can speak. "Cool it, Stasya! Look <<$pcs_nickname>>, if you want to hang out with us, just act like you normally do okay? That''s all we''re saying." Vicky says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other cool kids question whether you belong in the group or not...'
+	'You walk down the hallway and stop at your locker. You sense someone standing behind you and turn to see Vicky, Andrey and Stasya giving you friendly smiles. "Hey, <<$pcs_nickname>>, is everything okay?"'
+	'Before you can answer, Stasya chimes in. "You haven''t been setting the right example of late. You''re acting more like the losers than us, so do you want to keep hanging around with us?"'
+	'You are again interrupted before you can speak. "Cool it, Stasya! Look, <<$pcs_nickname>>, if you want to hang out with us, just act like you normally do, okay? That''s all we''re saying." Vicky says before the bell rings, and you all hurry to class. You can''t help but worry. Your recent activity has made the other cool kids question whether you belong in the group or not...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -202,9 +202,9 @@ if $ARGS[0] = 'coolkid warn 2':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vicky, Andrey and Stasya. "Hey <<$pcs_nickname>>, we talked about this before, but you still seem to be not getting with the program." Vicky says with disdain.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vicky, Andrey and Stasya. "Hey, <<$pcs_nickname>>, we talked about this before, but you still seem to be not getting with the program," Vicky says with disdain.'
 	'Before you can answer, Stasya chimes in. "I told you she doesn''t want to be one of us! I don''t know why we ever let her hang out with us in the first place."'
-	'You are again interrupted before you can speak. "<<$pcs_nickname>>, you need to get your act together or you''re out, simple as that." Andrey says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other cool kids question whether you belong in the group or not. You need to improve your standing with them or risk being kicked out...'
+	'You are again interrupted before you can speak. "<<$pcs_nickname>>, you need to get your act together, or you''re out, simple as that," Andrey says before the bell rings and you all hurry to class. You can''t help but worry. Your recent activity has made the other cool kids question whether you belong in the group. You need to improve your standing with them or risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -214,9 +214,9 @@ if $ARGS[0] = 'coolkid slut warn':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vicky, Andrey and Stasya. "What''s going on with you, <<$pcs_nickname>>? We''ve all heard the rumors about your sexual exploits. We all like sex but come on, this is getting out of hand." Vicky says with a hint of disdain.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vicky, Andrey and Stasya. "What''s going on with you, <<$pcs_nickname>>? We''ve all heard the rumours about your sexual exploits. Of course, we all like sex but come on, this is getting out of hand." Vicky says with a hint of disdain.'
 	'Before you can answer, Stasya chimes in. "Maybe she just wants to be a slut."'
-	'You are again interrupted before you can speak. "<<$pcs_nickname>>, you need to start using a little discretion or you''re out." Andrey says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other cool kids question whether you belong in the group or not. You better fix things fast or you risk being kicked out...'
+	'You are again interrupted before you can speak. "<<$pcs_nickname>>, you need to start using a little discretion, or you''re out," Andrey says before the bell rings and you all hurry to class. You can''t help but worry. Your recent activity has made the other cool kids question whether you belong in the group. You better fix things fast, or you risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -225,13 +225,13 @@ if $ARGS[0] = 'jock':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinjock.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "Hey <<$pcs_nickname>>, we''ve been talking and you seem to have the right attitude to be one of us. So what do you say, do you want to join us and become a jock?" They seem to be waiting on your response.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "Hey, <<$pcs_nickname>>, we''ve been talking, and you seem to have the right attitude to be one of us. So what do you say? Do you want to join us and become a jock?" They seem to be waiting on your response.'
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
 		'You shake your head. "I like hanging out with you guys, but I don''t think that''s a good idea."'
-		'Lariska frowns then nods. "Suit yourself." With that, she turns and leaves.'
-		'Lina gives you a once over. "Well at least Christina will be happy." With that she follows after Lariska, leaving you behind to wonder if you made the right choice.'
+		'Lariska frowns, then nods. "Suit yourself." With that, she turns and leaves.'
+		'Lina gives you a once-over. "Well, at least Christina will be happy." With that, she follows after Lariska, leaving you behind to wonder if you made the right choice.'
 		grupvalue[2] = rand(600,650)
 		old_grupvalue[2] = grupvalue[2]
 		gs 'gschool_socialchg', 'group_rel_change','jocks', -5
@@ -243,7 +243,7 @@ if $ARGS[0] = 'jock':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinjock.jpg"></center>'
 		'You nod your head. "Yes, I would love to! I love hanging out with you guys!"'
-		'Lariska gives you a hug. "From now on you are one of us." Lina gives you a friendly smile and you all walk you to your next class.'
+		'Lariska gives you a hug. "From now on, you are one of us." Lina gives you a friendly smile, and you all walk to your next class.'
 
 		grupvalue[1] = min(rand(675,725),grupvalue[1])
 		grupvalue[3] = min(rand(600,650),grupvalue[3])
@@ -274,9 +274,9 @@ if $ARGS[0] = 'jock warn 1':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "Hey <<$pcs_nickname>>, is everything okay with you?" Lariska asks.'
-	'Before you can answer, Lina chimes in. "You haven''t been putting your all into sports and you''re starting to act like some of the others, so does that mean that you don''t want to hang around with us anymore?"'
-	'The bell rings and you all hurry to class, but you can''t help but worry. It seems your recent activity has made the other jocks question whether you belong in the group or not...'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "Hey, <<$pcs_nickname>>, is everything okay with you?" Lariska asks.'
+	'Before you can answer, Lina chimes in. "You haven''t been putting your all into sports, and you''re starting to act like some others, so does that mean you don''t want to hang around with us anymore?"'
+	'The bell rings, and you all hurry to class, but you can''t help but worry. It seems your recent activity has made the other jocks question whether you belong in the group or not...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -288,7 +288,7 @@ if $ARGS[0] = 'jock warn 2':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
 	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "<<$pcs_nickname>>, we talked about this before, but you still seem to be not getting the idea." Lariska scoffs.'
 	'Before you can answer, Lina chimes. "Christina says she doesn''t want you to be one of us and that we should have never let you hang out with us in the first place."'
-	'You are again interrupted before you can speak. "<<$pcs_nickname>> you need to get your act together or you''re out, simple as that." Lina says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other jocks question whether you belong in the group or not. You better fix things fast or risk becoming being kicked out...'
+	'You are again interrupted before you can speak. "<<$pcs_nickname>>, you need to get your act together, or you''re out, simple as that," Lina says before the bell rings and you all hurry to class. You can''t help but worry. Your recent activity has made the other jocks question whether you belong in the group. You better fix things fast or risk becoming kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -298,8 +298,8 @@ if $ARGS[0] = 'jock slut warn':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "What''s going on with you, <<$pcs_nickname>>? We''ve all heard the rumors about your sexual exploits. Sex is fun, but what are you going to do next? Fuck the whole football team?"'
-	'Before you can answer, Lina chimes. "You need to start using a little discretion or you''re out." The bell then rings and you all hurry to class, but you can''t help but worry. It seems your recent activity has made the other jocks question whether you belong in the group or not. You better fix things fast or risk being kicked out...'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Lariska and Lina giving you friendly smiles. "What''s going on with you, <<$pcs_nickname>>? We''ve all heard the rumours about your sexual exploits. Sex is fun, but what are you going to do next? Fuck the whole football team?"'
+	'Before you can answer, Lina chimes. "You need to start using a little discretion, or you''re out." The bell then rings, and you all hurry to class, but you can''t help but worry. Your recent activity has made the other jocks question whether you belong in the group. So you better fix things fast or risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -308,12 +308,12 @@ if $ARGS[0] = 'nerd':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinnerd.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up, all giving you friendly smiles. "Hey <<$pcs_nickname>>, we''ve been talking and we like you. We were wondering if you would like to come hang out with us at our game night?" They seem to be waiting on your response.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up, all giving you friendly smiles. "Hey, <<$pcs_nickname>>, we''ve been talking, and we like you. We were wondering if you would like to hang out with us at our game night?" They seem to be waiting on your response.'
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
 		'You shake your head. "I like hanging out with you guys, but I''m just not interested in doing a game night. Sorry."'
-		'Artem frowns then nods. "Oh, okay. Well maybe some other time then..." With that, he turns and the rest follow, looking a little disappointed. Looks like they were hoping you would join them. It makes you feel a little bad and wondering if you made the right choice.'
+		'Artem frowns and then nods. "Oh, okay. Well, maybe some other time then..." With that, he turns, and the rest follow, looking a little disappointed. Looks like they were hoping you would join them. It makes you feel a little bad and wonder if you made the right choice.'
 		grupvalue[3] = rand(600,650)
 		old_grupvalue[3] = grupvalue[3]
 		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
@@ -325,7 +325,7 @@ if $ARGS[0] = 'nerd':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinnerd.jpg"></center>'
 		'You nod your head. "Yes, I would love to hang out with you guys! A game night sounds like a lot of fun."'
-		'They all start speaking at once, excited about you joining them. Feofan then speaks up. "That''s great <<$pcs_nickname>>! Meet us at the community center library tonight at 20:00. See you then." With that they all start leaving and going to class, saying that they look forward to seeing you tonight.'
+		'They all start speaking at once, excited about you joining them. Feofan then speaks up. "That''s great, <<$pcs_nickname>>! Meet us at the community centre library tonight at 20:00. See you then." Then, they all start leaving and going to class, saying they look forward to seeing you tonight.'
 		
 		grupvalue[1] = min(rand(600,650),grupvalue[1])
 		grupvalue[2] = min(rand(625,625),grupvalue[2])
@@ -359,9 +359,9 @@ if $ARGS[0] = 'nerd warn 1':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "Hey <<$pcs_nickname>>, is everything okay with you?"'
-	'Before you can answer, Julia chimes in. "You''re acting a lot like the others. Does that mean that you don''t want to hangout with us anymore?"'
-	'You are again interrupted before you can speak. "Look <<$pcs_nickname>>. We like you and want you to stay, but if you want to hang out with us, just act like you want to hang out with us? That''s all we''re saying." Feofan says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other nerds question whether you belong in the group or not...'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "Hey, <<$pcs_nickname>>, is everything okay with you?"'
+	'Before you can answer, Julia chimes in. "You''re acting a lot like the others. Does that mean you don''t want to hang out with us anymore?"'
+	'You are again interrupted before you can speak. "Look, <<$pcs_nickname>>. We like you and want you to stay, but if you want to hang out with us, just act like you want to hang out with us? That''s all we''re saying." Feofan says before the bell rings, and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other nerds question whether you belong in the group or not...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -371,9 +371,9 @@ if $ARGS[0] = 'nerd warn 2':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "<<$pcs_nickname>>, we talked about this, but you''re still acting out." Artem says with disdain.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "<<$pcs_nickname>>, we talked about this, but you''re still acting out," Artem says with disdain.'
 	'Before you can answer, Julia chimes in. "Yeah, we''re all worried about you. What''s wrong? Is there anything we can do to help? Please just ask."'
-	'You are again interrupted before you can speak. "<<$pcs_nickname>> I don''t know what''s wrong, but if you don''t want to hang out with us, just say so. In any case, we hope things get better for you." Deofan says before the bell rings and you all hurry to class. You can''t help but worry. It seems your recent activity has made the other nerds question whether you belong in the group or not. You better fix things fast or risk being kicked out...'
+	'You are again interrupted before you can speak. "<<$pcs_nickname>>, I don''t know what''s wrong, but if you don''t want to hang out with us, just say so. In any case, we hope things get better for you." Deofan says before the bell rings, and you all hurry to class. You can''t help but worry. Your recent activity has made the other nerds question whether you belong in the group. You better fix things fast or risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -383,8 +383,8 @@ if $ARGS[0] = 'nerd slut warn':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "Hey <<$pcs_nickname>>, what''s going on with you? We''ve all heard some pretty disturbing rumors about you... If they''re even half true... I just don''t know what to say. You always seemed like such a nice girl." Feofan says with a hint of disappointment.'
-	'Before you can answer, Petka chimes in. "<<$pcs_nickname>>, you need to get yourself under control or you won''t be able to hang out with us anymore." The bell rings and you all hurry to class, but you can''t help but worry. It seems your recent activity has made the other nerds question whether you belong in the group or not. You better fix things fast or risk being kicked out...'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see a group of nerds bunched up and giving you friendly smiles. "Hey, <<$pcs_nickname>>, what''s going on with you? We''ve all heard some pretty disturbing rumours about you... If they''re even half true... I just don''t know what to say. You always seemed like such a nice girl." Feofan says with a hint of disappointment.'
+	'Before you can answer, Petka chimes in. "<<$pcs_nickname>>, you need to get yourself under control, or you won''t be able to hang out with us anymore." The bell rings, and you all hurry to class, but you can''t help but worry. Your recent activity has made the other nerds question whether you belong in the group. You better fix things fast or risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -393,12 +393,12 @@ if $ARGS[0] = 'gopnik':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joingopnik.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vitek and Lena. Vitek gives you a hungry once over and Lena gives you a smirk. "Hey <<$pcs_nickname>>, we''ve been talking and you seem like you have the right attitude to hang with us. So what do you say, want to come to one of our exclusive parties tonight?" They seem to be waiting on your response.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vitek and Lena. Vitek gives you a hungry once-over, and Lena gives you a smirk. "Hey, <<$pcs_nickname>>, we''ve been talking, and you seem like you have the right attitude to hang with us. So what do you say? Want to come to one of our exclusive parties tonight?" They seem to be waiting on your response.'
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
-		'You shake your head. "I like hanging out with you guys, but I''m just not in the partying mood tonight.""'
-		'Vitek''s eyes darken. "What, are you too good for us all of a sudden? Well fuck you then!" With that, he storms away. Lena looks at you with a derogatory stare before following her brother, leaving you behind to wonder if you made the right choice.'
+		'You shake your head. "I like hanging out with you guys, but I''m just not in the partying mood tonight."'
+		'Vitek''s eyes darken. "What, are you too good for us all of a sudden? Well, fuck you then!" With that, he storms away. Lena looks at you with a derogatory stare before following her brother, leaving you behind to wonder if you made the right choice.'
 		grupvalue[4] = rand(600,650)
 		gs 'gschool_socialchg', 'group_rel_change','gopniks', -5
 		gs 'stat'
@@ -408,9 +408,9 @@ if $ARGS[0] = 'gopnik':
 	act 'Yes':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joingopnik.jpg"></center>'
-		'You nod your head. "Yeah that sounds great, I love hanging out and maybe getting a little wasted."'
+		'You nod your head. "Yeah, that sounds great. I love hanging out and maybe getting a little wasted."'
 		'Vitek smirks and glances at Lena, leaving you wondering what they mean. "Lena will let you know where and when." With that, he turns and walks off, but you can''t help but feel you missed something, which makes you feel a little nervous.'
-		'Lena leans over. "Meet me and Lera after school at the apartment garages at eight this evening." She smiles like she knows something you don''t, but without a further word or letting you ask anything, she briskly walks away.'
+		'Lena leans over. "Meet Lera and me after school at the apartment garages at eight this evening." She smiles like she knows something you don''t, but she briskly walks away without a further word or letting you ask anything.'
 		gopnik_initiation = 1
 		gopnik_initiation_day = daystart
 		gs 'stat'
@@ -424,9 +424,9 @@ if $ARGS[0] = 'gopnik warn 1':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vitek, Lena, Lera and Dan. Vitek gives you a once over. "What the fuck is up with you, <<$pcs_nickname>>?"'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vitek, Lena, Lera and Dan. Vitek gives you a once-over. "What the fuck is up with you, <<$pcs_nickname>>?"'
 	'Before you can answer, Lena chimes in. "You''ve been acting like a little submissive bitch lately. Grow a fucking pair and get your shit together!"'
-	'You are again interrupted before you can speak. "Look <<$pcs_nickname>>. If you want to hang out with us, just act like it okay? That''s all we''re saying." Lera says before the bell rings and the group disperses. You can''t help but worry. It seems your recent activity has made the other gopniks question whether you belong in the group or not...'
+	'You are again interrupted before you can speak. "Look, <<$pcs_nickname>>. If you want to hang out with us, just act like it, okay? That''s all we''re saying." Lera says before the bell rings, and the group disperses. You can''t help but worry. It seems your recent activity has made the other Gopnik question whether you belong in the group or not...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -437,8 +437,8 @@ if $ARGS[0] = 'gopnik warn 2':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
 	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Vitek, Lena, Lera and Dan. Lena shoves you into your locker. "What the fuck bitch? You deaf or something, or do you just think you''re too good for us?"'
-	'Before you can answer, Dan chimes in. "I told you she didn''t belong, this bitch is too soft." he says as he plays with your hair. "I don''t know why we let Vasily talk us into letting her hang out with us anyways. I mean maybe if she sucked a few more cocks we could look the other way..." he adds with a laugh.'
-	'You are again interrupted before you can speak. "Cool it, Dan. <<$pcs_nickname>>, get your shit together or you''re out, simple as that." Vitek says before the bell rings and the group disperses. You can''t help but worry. It seems your recent activity has made the other gopniks question whether you belong in the group or not. You better fix things fast or you risk being kicked out...'
+	'Before you can answer, Dan chimes in. "I told you she didn''t belong. This bitch is too soft," he says as he plays with your hair. "I don''t know why we let Vasily talk us into letting her hang out with us anyways. I mean, maybe if she sucked a few more cocks we could look the other way..." he laughs.'
+	'You are again interrupted before you can speak. "Cool it, Dan. <<$pcs_nickname>>, get your shit together, or you''re out, simple as that." Vitek says before the bell rings, and the group disperses. You can''t help but worry. Your recent activity has made the other Gopnik question whether you belong in the group. You better fix things fast, or you risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -448,13 +448,13 @@ if $ARGS[0] = 'gopnik slut warn':
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Pauline, Lena, Lera and Dan. Dan stands uncomfortably close and wraps an arm around your hip before pulling you in closer. "Hey slut. Sucked any cocks today? I can give you another one..." he says with a laugh.'
+	'You walk down the hallway and stop at your locker. You sense someone standing next to you and turn to see Pauline, Lena, Lera and Dan. Dan stands uncomfortably close and wraps an arm around your hip before pulling you closer. "Hey, slut. Sucked any cocks today? I can give you another one..." he says with a laugh.'
 	'Before you can answer, Lera chimes in. "Maybe she just wants to be a slut."'
-	'You are again interrupted before you can speak. "We don''t need another Nush, one slut is enough." Pauline says in reply.'
+	'You are again interrupted before you can speak. "We don''t need another Nush. One slut is enough." Pauline says in reply.'
 	'Lera fires back. "Hey, she isn''t a slut! She just likes to fuck. It''s not like she lets just anyone fuck her. Not like <<$pcs_nickname>> here." She gives Dan a pointed look, which makes him give Lera a sour look in return.'
 	*nl
-	'Pauline rolls her eyes. "Whatever. If you want to lick her ass so bad go ahead and do it, you carpet muncher."'
-	'Before Lera can reply, Lena steps between the girls. "That''s enough, we''re not here to bitch about this shit." She then turns to you. "And you, chill the fuck out and stop being the town bicycle or you''re out, got it?" They then turn and walk off, still chatting among themselves as the bell rings. You can''t help but worry. It seems your recent activity has made the other gopniks question whether you belong in the group or not. You better fix things fast or you risk being kicked out...'
+	'Pauline rolls her eyes. "Whatever. If you want to lick her ass so bad, go ahead and do it, you carpet muncher."'
+	'Before Lera can reply, Lena steps between the girls. "That''s enough. We''re not here to bitch about this shit." She then turns to you. "And you, chill the fuck out and stop being the town bicycle, or you''re out, got it?" They then turn and walk off, still chatting as the bell rings. You can''t help but worry. Your recent activity has made the other Gopnik question whether you belong in the group. You better fix things fast, or you risk being kicked out...'
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
@@ -462,7 +462,7 @@ if $ARGS[0] = 'coolkid outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
-	'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe shaking her head. Just as you''re about to speak, Irina cuts you off. "Save it, we don''t care. I don''t know what happened, but you use to be cool. Now? Well you made your choice. You''re no longer welcome to hang out with us." With that Irina turns and walks away as Dimka gives you a final look and shakes his head.'
+	'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe shaking her head. Just as you''re about to speak, Irina cuts you off. "Save it. We don''t care. I don''t know what happened, but you used to be cool. Now? Well, you made your choice. You''re no longer welcome to hang out with us." With that, Irina turns and walks away as Dimka gives you a final look and shakes his head.'
 	'"Now you''re where you always belonged. With the other losers." he says before leaving as well. You hear the other students laughing as you look around. Having been publicly disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>You have been kicked out of your social group and become an outcast.</font>'
 
@@ -490,9 +490,9 @@ if $ARGS[0] = 'jock outcast':
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
 	if christinaQW['blackmail'] = 2 or christinaQW['fight'] = 1:
-		'Lazar and Albina walk up to you and Albina scoffs at you dismissively. "It seems like you care more about being a social reject than anything else, so fuck off and go hang out with the other losers where you belong. We''re not your friends anymore, and don''t try to pretend otherwise." She gives you a pitiful once over before forcefully shoving you aside and walking away. A disappointed looking Lazar just shakes his head at you before catching up with Albina, where you hear them clearly mocking you. Having been publicly disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+		'Lazar and Albina walk up to you, and she scoffs at you dismissively. "It seems like you care more about being a social reject than anything else, so fuck off and go hang out with the other losers where you belong. We''re not your friends anymore, and don''t try to pretend otherwise." She gives you a pitiful once-over before forcefully shoving you aside and walking away. A disappointed-looking Lazar just shakes his head at you before catching up with Albina, where you hear them clearly mocking you. Having been publicly disavowed by your clique, the other students are ready to prey on your weakness, and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	else
-		'Christina, Lariska and Lina walk up to you. Lariska and Lina are looking at you like you did something wrong while Christina is smirking. She shoves you hard up against your locker. "What are you doing here bitch? You belong with the loser crowd now, so fuck off." she says with a laugh and Lariska and Lina join in openly mocking you. "Stay away from us or I''ll show you what happens to little bitches who don''t know their place." Christina warns before they turn and walk away. Having been publicly disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+		'Christina, Lariska and Lina walk up to you. Lariska and Lina look at you like you did something wrong while Christina smirks. She shoves you hard up against your locker. "What are you doing here bitch? You belong with the loser crowd now, so fuck off." She laughs, and Lariska and Lina join in openly mocking you. "Stay away from us, or I''ll show you what happens to little bitches who don''t know their place," Christina warns before they turn and walk away. Having been publicly disavowed by your clique, the other students are ready to prey on your weakness, and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	end
 	'<font color = red>You have been kicked out of your social group and become an outcast.</font>'
 	
@@ -519,7 +519,7 @@ if $ARGS[0] = 'nerd outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
-	'You try to find your friends, but most seem to be hiding or hurry off when you approach. You finally manage to catch up to Gerasim, but as you''re about to say something he turns to you. "Please go away, I can''t be seen hanging out with you. I''ve got enough problems without you making it worse. None of us want to be around you anymore." He sighs when he sees the dejected look on your face. "I''m sorry I really am, but this is your own fault. Please just leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you as he wheels himself away from you decidedly. As you look around, most of the other students either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+	'You try to find your friends, but most seem to be hiding or hurry off when you approach. You finally manage to catch up to Gerasim, but as you''re about to say something, he turns to you. "Please go away. I can''t be seen hanging out with you. I''ve got enough problems without you making them worse. None of us wants to be around you anymore." He sighs when he sees the dejected look on your face. "I''m sorry, I really am, but this is your fault. Please just leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you as he wheels himself away from you decidedly. As you look around, most of the other students either start mocking you or actively look away. Finally, you grab your stuff and hurry to your next class.'
 	'<font color = red>You have been kicked out of your social group and become an outcast.</font>'
 	
 	grupvalue[1] = min(rand(600,650),grupvalue[1])
@@ -545,7 +545,7 @@ if $ARGS[0] = 'gopnik outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
-	'As you approach your locker, Pauline, Lera and Lena walk up next to you. Pauline looks like she''s preparing to beat you up while Lera looks at you with disgust. Pauline shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently hanging out, partying and having a good time wasn''t enough for you. Nooo, you had to become a spineless cunt afraid of her own shadow, so stay the fuck away from us or I''ll beat the shit out of you!" With that, Pauline shoves you against your locker and walks away. Lena gives you a final look of disgust and shoves you again while Lera gives you a few parting words before walking away. "You''re so pathetic even the nerds will kick your ass now." Having been publicly disavowed by your clique, the other students are ready to prey on your weakness and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
+	'As you approach your locker, Pauline, Lera, and Lena walk up next to you. Pauline looks like she''s preparing to beat you up, while Lera looks at you with disgust. Pauline shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently, hanging out, partying and having a good time wasn''t enough for you. Nooo, you had to become a spineless cunt afraid of her own shadow, so stay the fuck away from us, or I''ll beat the shit out of you!" With that, Pauline shoves you against your locker and walks away. Lena gives you a final look of disgust and pushes you again while Lera gives you a few parting words before walking away. "You''re so pathetic. Even the nerds will kick your ass now." Having been publicly disavowed by your clique, the other students are ready to prey on your weakness, and either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>You have been kicked out of your social group and become an outcast.</font>'
 	
 	grupvalue[1] = min(rand(625,675),grupvalue[1])
@@ -572,7 +572,7 @@ if $ARGS[0] = 'gopnik miss':
 	'<center><b><font color = maroon>School Hall</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big20.jpg"></center>'
 	'Just as you approach your locker, Lena shoves you against it. "Where the fuck were you bitch? We waited almost an hour for you!"'
-	'You start to answer, but before you can even get a single word out, she shoves you again. "It doesn''t matter, we changed our mind about you. You''re not welcome. So get lost." she snarls before storming off. Maybe if you try to earn their respect again they will give you a second chance.'
+	'You start to answer, but she shoves you again before you can even get a single word out. "It doesn''t matter. We changed our mind about you. You''re not welcome. So get lost." she snarls before storming off. If you try to earn their respect again, they will give you a second chance.'
 	minut += 1
 	grupvalue[4] = rand(675,725)
 	old_grupvalue[4] = grupvalue[4]

+ 7 - 1
locations/hookup.qsrc

@@ -1,7 +1,13 @@
 # hookup
 !! 2021/05/06
 if $ARGS[0] = 'start':
-	
+	if $boy ! $npclastgenerated and $boy ! $npclastsaved:
+		if npcgen_lastrun = 1:
+			gs 'boystat', $npclastgenerated
+		elseif npcgen_lastrun = 2:
+			gs 'boystat', $npclastsaved
+		end
+	end
 	hookup['orgasm_count'] = orgasm
 	$location_type = 'indoors'
 	$location_type = 'indoors'

+ 2 - 2
locations/hunter_favors.qsrc

@@ -222,7 +222,7 @@ if $ARGS[0] = 'creekside_gangbang_request':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/hunter/backwaterrelax3.jpg"></center>'
 			'You politely refuse, saying you don''t owe them anything, but the men don''t accept a no, and you can see they''re clearly not satisfied with your answer.'
-			'"Sveta, don''t fuck around with us. Deep inside, you know you need to repay us," said Andrei, grabbing you by the hair.'
+			'"<<$pcs_firstname>>, don''t fuck around with us. Deep inside, you know you need to repay us," said Andrei, grabbing you by the hair.'
 			minut += 5
 			hunter_collective_opinion -= 25
 			hunter_sexual_comfort += 15
@@ -598,7 +598,7 @@ if $ARGS[0] = 'yard_bondage':
 						gs 'stat'
 
 						'"Well," you respond. "Do I look like some sex toy to you?" you reply. "What is next? You just randomly fuck me whenever?"'
-						'"You are not exactly all pure and innocent, Sveta," he says. "I think you are just being a bitchy cocktease", and walks away'
+						'"You are not exactly all pure and innocent, <<$pcs_firstname>>," he says. "I think you are just being a bitchy cocktease", and walks away'
 						act 'Further': gt 'swamp_yard', 'start'
 					end
 				end

+ 1 - 0
locations/intro_city.qsrc

@@ -43,6 +43,7 @@ if $ARGS[0] = '2':
 end
 
 if $ARGS[0] = 'vlad_intro':
+	gs 'npc_relationship', 'default_family_friends'
 	gs 'intro_initialization'
 	gs'stat'
 	!! Intro to your stepfather

+ 0 - 7
locations/intro_city_select.qsrc

@@ -84,13 +84,6 @@ if $ARGS[0] = 'start':
 	prezikProver = 3
 	brothersawpirsF = 0
 
-	gs 'npcstatic1'
-	gs 'npcstatic2'
-	gs 'npcstatic3'
-	gs 'npcstatic4'
-	gs 'npcstatic5'
-	gs 'npcstatic6'
-
 	$pcs_dna = func('dna','generate',$npc_dna['A29'],$npc_dna['A35'])
 
 	killvar 'class_list_institution'

+ 10 - 0
locations/intro_initialization.qsrc

@@ -174,6 +174,13 @@ else
 	cyccustom = 1
 end
 
+gs 'npcstatic1'
+gs 'npcstatic2'
+gs 'npcstatic3'
+gs 'npcstatic4'
+gs 'npcstatic5'
+gs 'npcstatic6'
+
 pcs_horny = 0
 killvar 'opPRE'
 killvar 'tgs_skipinto'
@@ -430,6 +437,9 @@ else
 		gm_school[49] = 1
 		gm_school_h[49] = 120
 		gm_school_b[49] = pcs_hips
+		market_outfits[17] = 1
+		market_outfits_h[17] = 60
+		market_outfits_b[17] = pcs_hips
 	elseif school_clothing = 3:
 		gm_school[25] = 1
 		gm_school_h[25] = 120

+ 7 - 0
locations/intro_initialization_city.qsrc

@@ -183,6 +183,13 @@ else
 	cyccustom = 1
 end
 
+gs 'npcstatic1'
+gs 'npcstatic2'
+gs 'npcstatic3'
+gs 'npcstatic4'
+gs 'npcstatic5'
+gs 'npcstatic6'
+
 pcs_horny = 0
 killvar 'opPRE'
 killvar 'tgs_skipinto'

+ 0 - 7
locations/intro_sg_select.qsrc

@@ -67,13 +67,6 @@ if $ARGS[0] = 'start':
 		killvar '$temp_nickname'
 	end
 
-	gs 'npcstatic1'
-	gs 'npcstatic2'
-	gs 'npcstatic3'
-	gs 'npcstatic4'
-	gs 'npcstatic5'
-	gs 'npcstatic6'
-
 	$pcs_dna = func('dna','generate',$npc_dna['A29'],$npc_dna['A35'])
 	gs 'homes_properties', 'give_access', 'parents_home'
 	gs 'homes_properties', 'set_home', 'parents_home'

+ 0 - 7
locations/intro_sg_tg.qsrc

@@ -158,13 +158,6 @@ if $ARGS[0] = 'settings':
 	*clr & cla
 
 	ml_update_1 = 1
-	!! NPC Data and Relations
-	gs 'npcstatic1'
-	gs 'npcstatic2'
-	gs 'npcstatic3'
-	gs 'npcstatic4'
-	gs 'npcstatic5'
-	gs 'npcstatic6'
 
 	$pcs_dna = func('dna','generate',$npc_dna['A29'],$npc_dna['A35'])
 

+ 1 - 0
locations/intro_uni.qsrc

@@ -95,6 +95,7 @@ if $ARGS[0] = 'degree_choice':
 	
 	gs 'homes_properties', 'give_access', 'university_dorm'
 	gs 'homes_properties', 'set_home', 'university_dorm'
+	gs 'npc_relationship', 'default_family_friends'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/6_uni/degree_choice.jpg"></center>'
 	'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.'

+ 12 - 14
locations/journal_work.qsrc

@@ -1,14 +1,11 @@
 # journal_work
-! Created 12/9/22 
-! 12/9/22 Initial code
-! Authored by Hooded Silence
-! Game Character work section. This is the container file for all work roles in game. Used to track income, work days and other relevant data.
-! V .01 Refactored code from Journal section into it''s own section to make legibility easier.
-!
-! Work Variables:
-!
-! employed[qw] = Work tracker if employed. To be set on starting or leaving a job.
-
+!! Created 12/9/22 
+!! 12/9/22 Initial code
+!! Authored by Hooded Silence
+!! Game Character work section. This is the container file for all work roles in game. Used to track income, work days and other relevant data.
+!! V .01 Refactored code from Journal section into it''s own section to make legibility easier.
+!! V. 02 New job schedule system integrated
+!!
 
 if $ARGS[0] = 'start':
 
@@ -18,8 +15,11 @@ if $ARGS[0] = 'start':
 	$jumploc = 'worktab'
 	gs 'journal', 'journalmenu'
 	'<center><h2>Work</h2></center>'
-	if employedqw['status'] = 0:
+	if emp_job[active] < 1:
 		'You need to find a job or get training to develop your career. Check the Quests or Information section.'
+	else
+		function_sw = 2
+		gs 'emp_functions', 'gen_schedule'
 	end
 	
 	if workPTU > 2:'You work as a teacher at the Lycée and your schedule is Monday to Saturday, teaching between 14:00 and 16:00. Your salary is 300 <b>₽</b> per day.'
@@ -32,7 +32,7 @@ if $ARGS[0] = 'start':
 	if (work = 1 or cheatWork = 1) and young_shop_work1 = 1:'You work in the city as a store clerk at the Pussy Cats clothing store. Work starts at 09:00 Saturday and Sunday. The salary shall be issued once a week, on Fridays.'
 	if (work = 1 or cheatWork = 1) and young_shop_work2 = 1:'You work in the city as a store clerk at the Pussy Cats clothing store. Work starts at 09:00 Monday through Friday. The salary shall be issued once a week, on Fridays.'
 	if (work = 1 or cheatWork = 1) and workFabrika = 1:'You work as a seamstress in the factory in Pavlovsk. Work is every weekday, with weekends off. Salary is automatically transferred on the 25th of each month.'
-	if (work = 1 or cheatWork = 1) and TourGuide = 1:'You work as a tour guide in the Pavlovsk park. Work is any day during the summer holidays for 8 hours, starting between 08:00 and 12:00. Salary is 1,000 <b>₽</b> .'
+	!!if (work = 1 or cheatWork = 1) and TourGuide = 1:'You work as a tour guide in the Pavlovsk park. Work is any day during the summer holidays for 8 hours, starting between 08:00 and 12:00. Salary is 1,000 <b>₽</b> .'
 	if workrin = 1:'You are working at the market in Arthur''s tent as a clothing saleswoman. You work on Tuesday, Thursday and Saturday with a start time of 08:00. Salary depends on sales.'
 	if maidqw = 1:
 		'You work in the Pavlovsk hotel as a maid. Your work schedule is every day from 16:00 to 19:00 and your salary is 250 <b>₽</b> plus tips.'
@@ -144,6 +144,4 @@ if $ARGS[0] = 'start':
 		end
 	end
 end
-
-
 --- journal_work ---------------------------------

+ 30 - 30
locations/katja_chat.qsrc

@@ -94,7 +94,7 @@ if $ARGS[0] = 'start':
 
 	if npc_sex['A14'] > 0:
 		if katjaQW['slut'] >= 100:
-			'Katja embraces you and gives you quick kiss on the lips. "How are you, <<$pcs_nickname>>? It''s great to see you," she says after letting you go.'
+			'Katja embraces you and gives you a quick kiss on the lips. "How are you, <<$pcs_nickname>>? It''s great to see you," she says after letting you go.'
 			'"I''m good," you answer. "How about you?"'
 			'"I''m doing fine. In fact, even better now that you''re here," she replies.'
 		elseif katjaQW['slut'] >= 50:
@@ -110,9 +110,9 @@ if $ARGS[0] = 'start':
 		act 'Say you can''t stay to chat': gt $loc, $loc_arg
 	else
 		if fame['city_slut'] > 200:
-			'"This is not the place to attract boys," Katja says in a mocking tone. "Take your antics somewhere else!"'
+			'"This is not the place to attract boys," Katja says mockingly. "Take your antics somewhere else!"'
 			'"Maybe I am not hunting for boys but redheaded girls this time," you reply in jest.'
-			'"Stop it! I''m not interested," she says in a tone less harsh than you expected.'
+			'"Stop it! I''m not interested," she says, in a tone less harsh than you expected.'
 			'"Maybe you should be," you say with a smirk. "I could definitely teach you a thing or two about how to have fun."'
 			'Katja''s face grows red and her breath hitches, defying the stern look on her face.'
 			if npc_rel['A14'] > 40:
@@ -122,18 +122,18 @@ if $ARGS[0] = 'start':
 				act 'Leave': gt $loc, $loc_arg			
 			end
 		elseif npc_rel['A14'] > 60:
-			'"Hi <<$pcs_nickname>>, great to see you. How is it going?" Katja asks.'
+			'"Hi, <<$pcs_nickname>>. Great to see you. How is it going?" Katja asks.'
 			'"It''s going good," you reply. "How about you?"'
 			'"I''m good," Katja says.'
 			act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
 			act 'Say you don''t have time to chat': gt $loc, $loc_arg
 		elseif npc_rel['A14'] < 25:
-			'"What are you doing here?" Katja says. "I don''t have time for bullies like you." She then turns around and ignores you.'
+			'"What are you doing here?" Katja asks. "I don''t have time for bullies like you." She then turns around and ignores you.'
 			act 'Leave': gt $loc, $loc_arg
 		else
-			'"Hi <<$pcs_nickname>>," Katja says, looking awkwardly at you, like she is trying to determine why you approached her.'
-			'"Hi Katja," you say. "How are you?"'
-			'"I''m good," she says and her composure loosens up a little.'
+			'"Hi, <<$pcs_nickname>>," Katja says, looking awkwardly at you like she is trying to determine why you approached her.'
+			'"Hi, Katja," you say. "How are you?"'
+			'"I''m good," she says, and her composure loosens a little.'
 			act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
 			act 'Say you don''t have time to chat': gt $loc, $loc_arg
 		end
@@ -148,7 +148,7 @@ if $ARGS[0] = 'uni_cafe':
 
 	if npc_sex['A14'] > 0:
 		if katjaQW['slut'] >= 100:
-			'Katja get up and gives you quick kiss on the lips. "How are you, <<$pcs_nickname>>? It''s great to see you," she says after sitting down again.'
+			'Katja gets up and gives you a quick kiss on the lips. "How are you, <<$pcs_nickname>>? It''s great to see you," she says after sitting down again.'
 			'"I''m good," you answer. "How about you?"'
 			'"I''m doing fine. In fact, even better now that you''re here," she replies.'
 		else
@@ -157,7 +157,7 @@ if $ARGS[0] = 'uni_cafe':
 			'"I''m doing fine. In fact, even better now that you''re here," she replies.'
 		end
 		if uni_lunch_bought = 1:
-			'You sit down and start eating your lunch with Katja while the two of you are talking'
+			'You sit down and start eating your lunch with Katja while you are talking.'
 			act 'Chat with Katja while you are eating': uni_lunch_bought = 0 & gt 'katja_chat', 'chat'
 		else
 			act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
@@ -165,14 +165,14 @@ if $ARGS[0] = 'uni_cafe':
 		end
 	else
 		if fame['city_slut'] > 200:
-			'"This is not the place to attract boys," Katja says in a mocking tone. "Take your antics somewhere else!"'
+			'"This is not the place to attract boys," Katja says mockingly. "Take your antics somewhere else!"'
 			'"Maybe I am not hunting for boys but redheaded girls this time," you reply in jest.'
-			'"Stop it! I''m not interested," she says in a tone less harsh than you expected.'
+			'"Stop it! I''m not interested," she says, in a tone less harsh than you expected.'
 			'"Maybe you should be," you say with a smirk. "I could definitely teach you a thing or two about how to have fun."'
 			'Katja''s face grows red and her breath hitches, defying the stern look on her face.'
 			if npc_rel['A14'] > 40:
 				if uni_lunch_bought = 1:
-					'You sit down and start eating your lunch with Katja while the two of you are talking'
+					'You sit down and start eating your lunch with Katja while you are talking.'
 					act 'Chat with Katja while you are eating': uni_lunch_bought = 0 & gt 'katja_chat', 'chat'
 				else
 					act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
@@ -182,25 +182,25 @@ if $ARGS[0] = 'uni_cafe':
 				act 'Leave': gt 'uni_cafe'		
 			end
 		elseif npc_rel['A14'] > 60:
-			'"Hi <<$pcs_nickname>>, great to see you. How is it going?" Katja asks.'
+			'"Hi, <<$pcs_nickname>>.Great to see you. How is it going?" Katja asks.'
 			'"It''s going good," you reply. "How about you?"'
 			'"I''m good," Katja says.'
 			if uni_lunch_bought = 1:
-				'You sit down and start eating your lunch with Katja while the two of you are talking'
+				'You sit down and start eating your lunch with Katja while you are talking.'
 				act 'Chat with Katja while you are eating': uni_lunch_bought = 0 & gt 'katja_chat', 'chat'
 			else
 				act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
 				act 'Say you can''t stay to chat': gt 'uni_cafe'
 			end
 		elseif npc_rel['A14'] < 25:
-			'"What are you doing here?" Katja says. "I don''t have time for bullies like you." She then turns around and ignores you.'
+			'"What are you doing here?" Katja asks. "I don''t have time for bullies like you." She then turns around and ignores you.'
 			act 'Leave': gt 'uni_cafe'
 		else
 			'"Hi <<$pcs_nickname>>," Katja says, looking awkwardly at you, like she is trying to determine why you approached her.'
 			'"Hi Katja," you say. "How are you?"'
-			'"I''m good," she says and her composure loosens up a little.'
+			'"I''m good," she says, and her composure loosens a little.'
 			if uni_lunch_bought = 1:
-				'You sit down and start eating your lunch with Katja while the two of you are talking'
+				'You sit down and start eating your lunch with Katja while you are talking.'
 				act 'Chat with Katja while you are eating': uni_lunch_bought = 0 & gt 'katja_chat', 'chat'
 			else
 				act 'Continue chatting with Katja': gt 'katja_chat', 'chat'
@@ -216,24 +216,24 @@ if $ARGS[0] = 'chat':
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
 	if locat['katja'] = 26:
 		if $university['enrolled_in'] = 'teaching_studies':
-			'Katja says you need to leave for class now so that you aren''t late.'
+			'Katja says you need to leave for class now, so you aren''t late.'
 			hour -= 1
 			if university['semester_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'schedule'
 			act 'Say you aren''t going to class and leave': hour += 1 & gt $loc, $loc_arg
 		else
-			'Katja says that she needs to leave now so that she isn''t late for class.'
+			'Katja says she needs to leave now, so she isn''t late for class.'
 			hour -= 1
 			if university['semester_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'schedule'
 			act 'Say goodbye': hour +=1 & gt $loc, $loc_arg
 		end
 	elseif locat['katja'] = 50:
 		if $university['enrolled_in'] = 'teaching_studies':
-			'Katja says that you need to leave for class now so that you aren''t late for the exam.'
+			'Katja says that you need to leave for class now, so you aren''t late for the exam.'
 			hour -= 1
 			if university['exam_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'exam_schedule'
 			act 'Say you aren''t going to the exam and leave': hour += 1 & gt $loc, $loc_arg
 		else
-			'Katja says that she needs to leave for class now so that she isn''t late for her exam.'
+			'Katja says she needs to leave for class now, so she isn''t late for her exam.'
 			hour -= 1
 			if university['exam_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'exam_schedule'
 			act 'Say goodbye': hour +=1 & gt $loc, $loc_arg
@@ -285,12 +285,12 @@ if $ARGS[0] = 'chat1':
 	!!end
 
 	if locat['katja'] = 24: 
-		'Katja grabs a magazine lying on the table, opens it and hands it to you. "Look at that dress, <<$pcs_nickname>>. I think it would look very good on you," she says. It is indeed a nice dress, but before you can respond, she is already flipping pages to another dress.'
+		'Katja grabs a magazine lying on the table, opens it and hands it to you. "Look at that dress, <<$pcs_nickname>>. I think it would look perfect on you," she says. It is a lovely dress, but before you can respond, she is already flipping pages to another dress.'
 		'Katja spends the next few minutes showing you clothes that she thinks would suit you or would just like for herself.'
 		if university['semester_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'schedule'
 		if university['exam_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'exam_schedule'
 	elseif locat['katja'] = 25:
-		'Katja suddenly gestures to a tall brunette in a long dress walking by. "Look at her! She is so pretty in that dress. I wish I had that," she says longingly. You''re unsure if she meant that she wants the dress or the girl.'
+		'Katja suddenly gestures to a tall brunette in a long dress walking by. "Look at her! She is so pretty in that dress. I wish I had that," she says longingly. You''re unsure if she meant she wanted the dress or the girl.'
 		'You spend the next several minutes talking with Katja about the clothes and makeup of the girls who pass you by.'
 		if university['semester_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'schedule'
 		if university['exam_week'] > 0 and university['enrolled_in_semester'] > university['semester_passed']: gs 'uni_lessons', 'exam_schedule'
@@ -316,7 +316,7 @@ if $ARGS[0] = 'first_meet':
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
 	'"Are you studying at uni?" you ask.'
 	'"Yes, I''m '+iif(year = 2017 and month < 10, 'going to study', 'studying')+' to become a teacher," Katja says. "What about you. Are you also studying here?"'
-	'"I''m '+iif( $university['enrolled_in'] = 'teaching_studies', ' also going to study to become a teacher.', ' '+iif(university[student] = 1, 'in the '+func('uni_programs', 'program_name')+' program', 'not studying at the university')+',')+'" you tell Katja.'
+	'"I''m '+iif( $university['enrolled_in'] = 'teaching_studies', ' also going to study to become a teacher,', ' '+iif(university[student] = 1, 'in the '+func('uni_programs', 'program_name')+' program', 'not studying at the university,')+',')+'" you tell Katja.'
 	act 'Talk about something else': gt 'katja_chat', 'chat1'
 end	
 
@@ -324,15 +324,15 @@ end
 if $ARGS[0] = 'sofia1':
 	sofiaQW['QWstage'] = 1
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-	'"So what do you think about my roommate?" Katja asks with a curious look on her face.'
+	'"So, what do you think about my roommate?" Katja asks with a curious look on her face.'
 	'"She seems nice," you answer. "But she sure does talk a lot."'
 	'"She talks constantly; she never shuts up! Like she has nobody else to talk to except me," Katja complains.'
 	'"Is that true?" you ask.'
-	'"Maybe. I don''t think she''s made any friends since she moved here. So she probably only has me and her boyfriend," Katja says. "If she just had something interesting to say it might be a bit more bearable," Katja continues.'
+	'"Maybe. I don''t think she''s made any friends since she moved here. So she probably only has her boyfriend and me," Katja says. "If she just had something interesting to say, it might be a bit more bearable," Katja continues.'
 	'"She never says anything interesting?" you ask.'
-	'"Well, sometimes she talks about her classes, which isn''t too boring or she''ll tell me about something she saw or experienced that day," Katja says. "But mostly she just tells the same stories from her stupid hometown in the fucking middle of nowhere, or even worse, just fawns over her boyfriend." The redhead looks at you and smiles slightly, "At least she knows you now, so maybe she''ll start bothering you instead so I can get a little bit of peace."'
-	'"Hopefully she can make some more friends soon," you say with a laugh.'
-	'"I doubt it," Katja says. "She is constantly hanging out with her boyfriend and I don''t think he wants her to meet other girls. She also goes back to her hometown on Thursday nights and stays until Sunday, so she doesn''t have much time to meet anyone."'
+	'"Well, sometimes she talks about her classes, which isn''t too boring, or she''ll tell me about something she saw or experienced that day," Katja says. "But mostly, she just tells the same stories from her stupid hometown in the fucking middle of nowhere, or even worse, just fawns over her boyfriend." The redhead looks at you and smiles slightly, "At least she knows you now, so maybe she''ll start bothering you instead so I can get a little bit of peace."'
+	'"Hopefully, she can make some more friends soon," you laughingly.'
+	'"I doubt it," Katja says. "She is constantly hanging out with her boyfriend, and I don''t think he wants her to meet other girls. She also returns to her hometown on Thursday nights and stays until Sunday, so she doesn''t have much time to meet anyone."'
 	'"You''re not too fond of her boyfriend?" you ask.'
 	'"I don''t know," she says. "There''s something about him that feels a little bit off, but I shouldn''t speak ill of people you don''t even know. So let''s wait until after you meet him."'
 	act 'Talk about something else': gt 'katja_chat', 'chat1'

+ 7 - 2
locations/korrPar.qsrc

@@ -103,8 +103,13 @@ if locat['Mother'] = 3:
 		end
 	end
 elseif locat['Mother'] = 1:
-	if hour = 22 and parsexrand = 5 and parentsexday ! daystart:
-		act 'Go to your parents'' room': gt 'bedrPar2', 'peek'
+	if hour = 22 and parsexrand ! daystart and parentsexday ! daystart:
+		parsexrand = daystart
+		if rand(0, 5) = 0:
+			act 'Go to your parents'' room': gt 'bedrPar2', 'peek'
+		else
+			act 'Go to your parents'' room': msg'Your parents are probably asleep. You shouldn''t go in right now.'
+		end
 	else
 		act 'Go to your parents'' room': msg'Your parents are probably asleep. You shouldn''t go in right now.'
 	end

+ 1 - 1
locations/lact_bp.qsrc

@@ -432,7 +432,7 @@ end
 !!	for manual milk expression in bathrooms etc. please use this function.
 
 if $ARGS[0] = 'massage':
-	if (($location_type ! 'bathroom' and pcs_inhib >= 30) or $location_type = 'bathroom' and breastpump = 0) and (pcs_horny >= 10 or lactation['active'] > 0):
+	if (($location_type ! 'bathroom' and pcs_inhib >= 30) or $location_type = 'bathroom' and breastpump = 0) and (pcs_horny >= 10 or lactation['active'] > 0) and cheat_NoLactation = 0:
 		if lactation['active'] > 0 and lactation['pc_aware'] > 0:
 			act 'Milk your breasts': gt 'lact_bp','man_milking'
 		else

+ 2 - 2
locations/marisha_ev.qsrc

@@ -161,7 +161,7 @@ if $ARGS[0] = 'Mall':
 				$loc_arg = 'start'
 				MarishaQW["marisha_sleepover"] = 1
 				gs 'stat'
-				gt 'bed2', 'sleep'
+				gt 'sleep', 'sleep'
 			end
 		end
 
@@ -178,7 +178,7 @@ if $ARGS[0] = 'Mall':
 				$loc_arg = 'start'
 				MarishaQW["marisha_sleepover"] = 1
 				gs 'stat'
-				gt 'bed2', 'sleep'
+				gt 'sleep', 'sleep'
 			end
 		end
 	end

+ 1 - 1
locations/medical_din.qsrc

@@ -254,10 +254,10 @@ if $ARGS[0] = 'morning_after_pill_function':
 		killvar 'temp_ID'
 	end
 	stat['morning_after_pill'] += 1
+	morning_after_pill -= 1
 end
 
 if $ARGS[0] = 'morning_after_pill':
-	morning_after_pill -= 1
 	*clr
 	if $locclass = 'kitr':
 		'<center><img <<$set_imgh>> src="images/pc/items/accessories/birthcontrol/pill_take2.jpg"></center>'

+ 10 - 12
locations/metro.qsrc

@@ -16,7 +16,6 @@ if $ARGS[0] = 'start':
 	elseif $loc = 'city_industrial':
 		'<center><b><font color="maroon">City Industrial Region</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/platindust.jpg"></center>'
-!!new locations for the metro, you will have to see how the code works and for now the island will be commented out until we add that area of the city
 	elseif $loc = 'city_suburbs':
 		'<center><b><font color="maroon">City Suburbs</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/platsuburb.jpg"></center>'
@@ -46,7 +45,7 @@ if $ARGS[0] = 'start':
 	
 	if money >= 16:
 		if $loc ! 'city_residential':
-			act 'Go to the <b>Residential Area</b> (16 <b>₽</b>)':
+			act 'Go to the Residential Area (16 <b>₽</b>)':
 				$loc = 'city_residential'
 				$loc_arg = ''
 				money -= 16
@@ -56,7 +55,7 @@ if $ARGS[0] = 'start':
 		end
 
 		if $loc ! 'city_center':
-			act 'Go to the <b>City Center</b> (16 <b>₽</b>)':
+			act 'Go to the City Center (16 <b>₽</b>)':
 				$loc = 'city_center'
 				$loc_arg = ''
 				money -= 16
@@ -66,7 +65,7 @@ if $ARGS[0] = 'start':
 		end
 
 		if $loc ! 'city_industrial':
-			act 'Go to the <b>City Industrial Region</b> (16 <b>₽</b>)':
+			act 'Go to the City Industrial Region (16 <b>₽</b>)':
 				$loc = 'city_industrial'
 				$loc_arg = ''
 				money -= 16
@@ -76,7 +75,7 @@ if $ARGS[0] = 'start':
 		end
 
 		if $loc ! 'city_suburbs':
-			act 'Go to the <b>City Suburbs</b> (16 <b>₽</b>)':
+			act 'Go to the City Suburbs (16 <b>₽</b>)':
 				$loc = 'city_suburbs'
 				$loc_arg = 'start'
 				money -= 16
@@ -86,7 +85,7 @@ if $ARGS[0] = 'start':
 		end
 
 		if $loc ! 'city_island':
-			act 'Go to the <b>Vasilyevsky Island</b> (16 <b>₽</b>)':
+			act 'Go to Vasilyevsky Island (16 <b>₽</b>)':
 				$loc = 'city_island'
 				$loc_arg = ''
 				money -= 16
@@ -100,7 +99,7 @@ if $ARGS[0] = 'start':
 	
 	if pusher = 1 and dealer = 0:
 		dealer = 1
-		'You see a tall, emaciated man leaning against the wall next to the tracks, looking very shady.<br>He notices you looking and beckons you to come closer.'
+		'You see a tall, emaciated man leaning against the wall next to the tracks, looking very shady. He notices you looking and beckons you to come closer.'
 		act 'Talk to the man':gt 'metro', 'dealer'
 	elseif dealer ! 0:
 		'You see the dealer lurking around the station.'
@@ -130,16 +129,16 @@ if $ARGS[0] = 'vagon':
 
 	if metro_busy = 0:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metroempty.jpg"></center>'
-		'The car is almost completely empty. One or two other passengers are in the car with you. It seems a bit odd and a little creepy seeing the car this empty. You have practically the whole car to yourself and pick the cleanest spot to sit.'
+		'The car is almost completely empty, with only one or two other passengers in the car with you. It seems a bit odd and a little creepy seeing the car this empty. Having practically the entire car to yourself, you pick the cleanest spot to sit.'
 	elseif metro_busy = 1:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metro.jpg"></center>'
 		'The car is mostly empty, leaving you a choice of seats. You easily find a place for yourself, leaving you plenty of room to get comfortable. The few other people on the car mind their own business, leaving you to your own thoughts.'
 	elseif metro_busy = 2:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metrofull<<rand(1,5)>>.jpg"></center>'
-		'The car is full of people. All of the seats are taken, but only a few people are forced to stand. At least it is not packed. You easily find a place for yourself, leaving you plenty of room to get comfortable.'
+		'The car is full of people. All the seats are taken, but only a few people are forced to stand. You easily find a place for yourself, leaving you plenty of room to get comfortable.'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metropacked.jpg"></center>'
-		'The car is packed with people. Most of them are forced to stand, as there are not enough seats. It is so tightly packed that people are crammed tight up against each other either in the seats or standing up. You manage to squeeze yourself in among the people. You can feel other bodies pressed up tightly against yours. It is very uncomfortable and hot.'
+		'The car is packed with people, most of them being forced to stand since there aren''t enough seats. It''s so tightly packed that people are crammed up tightly against each other, but you manage to squeeze yourself in. You can feel other bodies pressed up tightly against yours, making for a very uncomfortable journey.'
 	end
 
 	if (cumloc[6] = 1 or cumloc[7] = 1) or cumloc[11] = 1:
@@ -165,7 +164,6 @@ if $ARGS[0] = 'shop':
 	*clr & cla
 	menu_off = 1
 	gs 'stat'
-	'<b>What''s it gonna be?</b>'
 	'He shows you a small box filled with red and blue pills. There are about two dozen of each pill inside.'
 	act 'Leave':gt 'metro','start'
 	if money >= 1000:
@@ -208,7 +206,7 @@ end
 if $ARGS[0] = 'dealer':
 	*clr & cla
 	menu_off = 1
-	'He sizes you up with suspicion.<br><b>"Hey miss, saw you buying Lady in the park."</b> <br>He clears his throat and spits onto the tracks.<b> "That shit will mess you up."</b><br>He opens his coat, and you flinch thinking he is going to flash you, but instead you see he is wearing a business suit beneath.<br>He gestures at numerous pockets lining the insides of his coat. They are filled to bursting with various packages, pills and ampules.<br><b>"Here, my products are of a much better quality. You''ll have a great time, and I guarantee they won''t kill you."</b>'
+	'He sizes you up with suspicion. "Hey there. Saw you buying Lady in the park." He clears his throat and spits onto the tracks. "That shit will mess you up." He opens his coat and you flinch, thinking he''s going to flash you, but instead see that he''s wearing a business suit underneath. He gestures at numerous pockets lining the insides of his coat, filled to bursting with various packages, pills and ampules. "Here, my products are of a much better quality. You''ll have a great time, and I guarantee they won''t kill you."'
 	act 'Continue':gt 'metro','shop'
 end
 

+ 117 - 121
locations/metro_events.qsrc

@@ -19,7 +19,7 @@ if $ARGS[0] = 'a':
 	spot = 500*rand(16,24)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot.jpg"></center>'
-	'You feel something solid pressing against your ass. A few moments pases by, as you realize what the hardness you feel pressing against you is, it''s someone''s rock hard cock!'
+	'You feel something solid pressing against your ass. A few seconds pass by before you realize what the hardness you feel pressing against you is - it''s someone''s rock hard cock!'
 	gs 'willpower', 'misc', 'resist', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Move away (<<will_cost>> Willpower)':
@@ -32,11 +32,10 @@ if $ARGS[0] = 'a':
 		act 'Move away (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
 	end
 	act 'Disregard':
-		cla
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot1.jpg"></center>'
-		'The guy standing behind you, disregarding the other passengers, grabs your butt cheek with his hand, while rubbing his crotch against your ass.'
+		'The guy standing behind you, disregarding the other passengers, grabs your ass cheek with his hand while rubbing his crotch against your ass.'
 		gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 		gs 'willpower', 'misc', 'resist', 'medium'
 		if will_cost <= pcs_willpwr:
@@ -54,7 +53,7 @@ if $ARGS[0] = 'a':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frot2.jpg"></center>'
-			'You feel his rock hard cock more clearly now; and by the way it is moving, you are sure he has taken it out of his pants and is rubbing it against your ass. His hands continue to cling on to you, squeezing your buttocks.'
+			'You feel his rock hard cock more clearly now; and by the way it is moving, you''re sure he''s taken it out of his pants and is rubbing it against your ass. His hands continue to cling on to you, squeezing your buttocks.'
 			gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 			gs 'willpower', 'misc', 'resist', 'medium'
 			if will_cost <= pcs_willpwr:
@@ -76,7 +75,7 @@ if $ARGS[0] = 'a':
 				clr
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotc'+ rand(1,2) +'.jpg"></center>'
-				'The man jerks back, and stops molesting you. A few moments later, you can feel something wet seep through your clothes. After a few more seconds, the guy moves away.'
+				'The man jerks back, and stops molesting you. A few seconds later, you feel something wet seep through your clothes. After a few more seconds, the guy moves away.'
 				gs 'arousal', 'end'
 				gs 'stat'
 				act 'Finished':gt 'metro_events', 'fin2'
@@ -91,7 +90,7 @@ if $ARGS[0] = 'b':
 	spot = 500*rand(16,24)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd2.jpg"></center>'
-	'There is a man standing behind you. He begins playing with your skirt.'
+	'There is a man standing behind you who begins playing with your skirt.'
 	gs 'willpower', 'sex', 'resist', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Move away (<<will_cost>> Willpower)':
@@ -107,7 +106,7 @@ if $ARGS[0] = 'b':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota1.jpg"></center>'
-		'The man cautiously lifts your skirt and begins caressing your buttocks with his strong hands.'
+		'The man cautiously lifts your skirt and begins caressing your buttocks with his hands.'
 		gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 		gs 'willpower', 'sex', 'resist', 'medium'
 		if will_cost <= pcs_willpwr:
@@ -125,7 +124,7 @@ if $ARGS[0] = 'b':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frota2.jpg"></center>'
-			'The man pulls your panties down to your knees, then lets your skirt fall back into place. He slides his hand between your thighs, caressing your clit. After a couple of minutes of pleasuring you, he pulls your hand back, placing it on his cock.'
+			'The man pulls your panties down to your knees, then lets your skirt fall back into place. He slides his hand between your thighs, caressing your clit. After spending a few minutes pleasuring you, he pulls your hand back, placing it on his cock.'
 			gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 			gs 'willpower', 'sex', 'resist', 'medium'
 			if will_cost <= pcs_willpwr:
@@ -151,7 +150,7 @@ if $ARGS[0] = 'b':
 					gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
-					'You angrily pull your hand away, which he allows you to do. A few moments later, you can feel the head of his cock, and hand, bumping against your ass check, as he jerks off. Minutes later you feel spurts of hot cum splashing against your ass cheeks. Once he is finished, he pulls your panties back up over your sperm covered ass, patting you on the butt, before moving away, and disappearing in the crowd.'
+					'You angrily pull your hand away, which he allows you to do. A few seconds later, you feel the head of his cock, and hand, bumping against your ass cheek as he jerks off. Minutes later, you feel spurts of hot cum splashing against your ass cheeks. Once he''s finished, he pulls your panties back up over your sperm covered ass and pats you on the ass before disappearing into the crowd.'
 					gs 'arousal', 'end'
 					gs 'stat'
 					act 'Finished':gt 'metro_events', 'fin2'
@@ -165,7 +164,7 @@ if $ARGS[0] = 'b':
 				frot += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
-				'With your hand on his cock, you grip it firmly, and start stroking. As he seems to really enjoy it, he reaches up then places his hands on your shoulders, trying to push you down to your knees.'
+				'With your hand on his cock, you grip it firmly and start stroking. As he seems to really enjoy it, he reaches up and places his hands on your shoulders, trying to push you down to your knees.'
 				gs 'arousal', 'hj', 2, 'sub', 'unknown'
 				gs 'willpower', 'hj', 'resist', 'medium'
 				if will_cost <= pcs_willpwr:
@@ -178,7 +177,7 @@ if $ARGS[0] = 'b':
 						gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg"></center>'
-						'You angrily pull your hand away, which he allows you to do. A few moments later, you can feel the head of his cock, and hand, bumping against your ass check, as he jerks off. Minutes later you feel spurts of hot cum splashing against your ass cheeks. Once he is finished, he pulls your panties back up over your sperm covered ass, patting you on the butt, before moving away, and disappearing in the crowd.'
+						'You angrily pull your hand away, which he allows you to do. A few seconds later, you feel the head of his cock, and hand, bumping against your ass cheek as he jerks off. Minutes later, you feel spurts of hot cum splashing against your ass cheeks. Once he''s finished, he pulls your panties back up over your sperm covered ass and pats you on the ass before disappearing into the crowd.'
 						gs 'arousal', 'end'
 						gs 'stat'
 						act 'Finished':gt 'metro_events', 'fin2'
@@ -190,7 +189,7 @@ if $ARGS[0] = 'b':
 					*clr & cla
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote1.jpg"></center>'
-					'You give into his demands, and squat down in front of him, he grabs your head then turns your face to his crotch. His rock hard cock is waiting for you. He starts rubbing his cock against your face, and lips, teasing his cock.'
+					'You give into his demands and squat down in front of him. He grabs your head and turns your face to his crotch, his rock hard cock waiting for you. He starts rubbing his cock against your face and lips, teasing his cock.'
 					gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 					gs 'willpower', 'bj', 'resist', 'medium'
 					if will_cost <= pcs_willpwr:
@@ -210,12 +209,11 @@ if $ARGS[0] = 'b':
 						frot += 1
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote2.jpg"></center>'
-						'You obediently open your mouth and begin sucking his hard cock. You are sitting on your haunches; in the middle of a crowded subway car, sucking a strangers cock.'
+						'You obediently open your mouth and begin sucking his hard cock. You''re sitting on your haunches, in the middle of a crowded subway car, sucking a stranger''s cock.'
 						gs 'arousal', 'bj', 3, 'sub', 'unknown'
 						act 'Continue to suck':
 							*clr & cla
 							gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
-							
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
 							'The man pulls his cock out of your mouth, and hot cum splatters across your cheek and chin. Once he has milked the last drop of sperm from his cock onto your face, he tucks his cock into his pants and moves away. He forces his way through the crowd before disappearing, leaving you alone with his cum all over your face.'
@@ -236,7 +234,7 @@ if $ARGS[0] = 'c':
 	spot = 500*rand(16,24)
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
-	'An unknown man nears you from behind and without any hesitation shoves his hand down the back of your pants.'
+	'An unknown man nears you from behind, and without any hesitation, shoves his hand down the back of your pants.'
 	gs 'willpower', 'sex', 'resist', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Move away (<<will_cost>> Willpower)':
@@ -252,7 +250,7 @@ if $ARGS[0] = 'c':
 		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp.jpg"></center>'
-		'You enjoy the nice sensation while the stranger caresses your ass. With his other hand, he reaches around and begins fondling your left breast under the shirt.'
+		'You enjoy the nice sensation as the stranger caresses your ass. With his other hand, he reaches around and begins fondling your left breast under your shirt.'
 		gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 		gs 'stat'
 		gs 'willpower', 'sex', 'resist', 'medium'
@@ -271,7 +269,7 @@ if $ARGS[0] = 'c':
 			*clr & cla
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotp2.jpg"></center>'
-			'After a few moments of the playing with your pucker, he pulls his hand out and instead grabs your second breast. He''s now fondling both of your breast while his cock is pushing against your behind.'
+			'After a few minutes, he pulls his hand out and grabs your other breast. He''s now fondling both of your breasts as his cock pushes against your ass.'
 			gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 			gs 'stat'
 			gs 'willpower', 'sex', 'resist', 'medium'
@@ -290,7 +288,7 @@ if $ARGS[0] = 'c':
 				*clr & cla
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
-				'Once he hears you moan, he pulls his hands away from your breasts, he slides them down the front of your body; to the waist of your pants. He unbuttons your pants then pulls them down; along with your panties, down to your knees, leaving you; exposed from the waist down, in a crowded subway car. He takes your hand and places it on his rock hard cock.'
+				'Once he hears you moan, he pulls his hands away from your breasts and slides them down the front of your body to the waist of your pants. He unbuttons your pants and pulls them, along with your panties, down to your knees, leaving you exposed from the waist down in a crowded subway car. He takes your hand and places it on his rock hard cock.'
 				gs 'arousal', 'foreplay', 2, 'sub', 'unknown', 'exhibitionism'
 				gs 'stat'
 				gs 'willpower', 'bj', 'resist', 'medium'
@@ -315,7 +313,7 @@ if $ARGS[0] = 'c':
 						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.'
+						'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 and a few minutes later, you feel spurts of hot cum splashing against your ass cheek. Once he''s finished, he pulls your panties back up over your sperm covered ass and pats you on the ass before disappearing into the crowd.'
 						act 'Finished':gt 'metro_events', 'fin2'
 					end
 				else
@@ -327,7 +325,7 @@ if $ARGS[0] = 'c':
 					frot += 1
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frotd.jpg"></center>'
-					'With your hand on his cock, you grip it firmly, and start stroking. As he seems to really enjoy it, he reaches up then places his hands on your shoulders, trying to push you down to your knees.'
+					'With your hand on his cock, you grip it firmly and start stroking. As he seems to really enjoy it, he reaches up and places his hands on your shoulders, trying to push you down to your knees.'
 					gs 'arousal', 'hj', 2, 'sub', 'unknown'
 					gs 'willpower', 'bj', 'resist', 'medium'
 					if will_cost <= pcs_willpwr:
@@ -337,7 +335,7 @@ if $ARGS[0] = 'c':
 							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.'
+							'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 and a few minutes later, you feel spurts of hot cum splashing against your ass cheek. Once he''s finished, he pulls your panties back up over your sperm covered ass and pats you on the ass before disappearing into the crowd.'
 							act 'Finished':gt 'metro_events', 'fin2'
 						end
 					else
@@ -347,7 +345,7 @@ if $ARGS[0] = 'c':
 						*clr & cla
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote1.jpg"></center>'
-						'You give into his demands, and squat down in front of him, he grabs your head then turns your face to his crotch. His rock hard cock is waiting for you. He starts rubbing his cock against your face, and lips, teasing his cock.'
+						'You give into his demands and squat down in front of him. He grabs your head and turns your face to his crotch, his rock hard cock waiting for you. He starts rubbing his cock against your face and lips, teasing his cock.'
 						gs 'arousal', 'foreplay', 2, 'sub', 'unknown'
 						gs 'willpower', 'bj', 'resist', 'medium'
 						if will_cost <= pcs_willpwr:
@@ -371,7 +369,6 @@ if $ARGS[0] = 'c':
 							act 'Continue to suck':
 								*clr & cla
 								gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
-								
 								gs 'stat'
 								'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/grop/frote3.jpg"></center>'
 								'The man pulls his cock out of your mouth, and hot cum splatters across your cheek and chin. Once he has milked the last drop of sperm from his cock onto your face, he tucks his cock into his pants and moves away. He forces his way through the crowd before disappearing, leaving you alone with his cum all over your face.'
@@ -389,13 +386,13 @@ end
 
 if $ARGS[0] = 'fin':
 	*clr & cla
-	'You barely manage to pull away from the horny idiot. You force your way through the crowded car, and find a new place to stand, as far away from him, as you can get. After a while, you get to your station.'
+	'You barely manage to pull away from the horny idiot and force your way through the crowded car to find a new place to stand as far away from him as you can get. After a while, you get to your station.'
 	act 'Get out of the car':gt 'metro', 'start'
 end
 
 if $ARGS[0] = 'fin2':
 	*clr & cla
-	'Now that he is gone, and you are covered in his cum, you notice the other passengers staring at you. You should likely clean up before your step outside.'
+	'Now that he''s gone, and you are covered in his cum, you notice the other passengers staring at you. You should clean up before you step outside.'
 	act 'Get out of the car':gt 'metro', 'start'
 end
 
@@ -405,21 +402,21 @@ if $ARGS[0] = 'station':
 	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.'
+		'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 tight ass, which draws the attention of several men and even a few of the women.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave':minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 2:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/guitar'+ rand(1,7) +'.jpg"></center>'
-		'As you head through the metro station, you notice a man playing a guitar, he has his guitar case open and you can see some money in it already. Several other people have stopped to listen to him play, he isn''t half bad.'
+		'As you head through the metro station, you notice a man playing a guitar; he has his guitar case open and you can see some money in it already. Several other people have stopped to listen to him play; he isn''t half bad.'
 		act 'Ignore':minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/guitar'+ rand(1,7) +'.jpg"></center>'
-			'You stop and listen to him play several songs, he really is pretty good. You wonder why he is playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to him play several songs.'
 			act 'Leave':minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give him money':
@@ -427,7 +424,7 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into his case. He looks up at you and smiles and nods his head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into his case. He looks up at you and smiles and nods his head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				end
@@ -435,14 +432,14 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 3:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/violin'+ rand(1,3) +'.jpg"></center>'
-		'As you head through the metro station, you notice a young woman, she has her violin case open and you can see some money in it already. Several other people have stopped to listen to her play, she isn''t half bad.'
+		'As you head through the metro station, you notice a young woman has her violin case open and you can see some money in it already. Several other people have stopped to listen to her play; she isn''t half bad.'
 		act 'Ignore': minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/violin'+ rand(1,3) +'.jpg"></center>'
-			'You stop and listen to her play several songs, she really is pretty good. You wonder why she is playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to her play several songs.'
 			act 'Leave': minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give her money':
@@ -450,14 +447,14 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into her case. She looks up at you and smiles and nods her head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into her case. She looks up at you and smiles and nods her head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				end
 			end
 		end
 	elseif metrorand <= 6:
 		'<center><video autoplay loop src="images/locations/city/shared/metro/station/flashd1.mp4"></video></center>'
-		'As you leave the metro car, you, and nearly everyone else, notice two African men walking. One of them has a huge bulge in the front of his pants. When he catches you eyeing them, he stops, pulling his pants down. As he does that a massive black cock springs free, which causes a lot more people to look in shock.'
+		'As you leave the metro car, you, and nearly everyone else, notice two African men, one of whom has a huge bulge in his pants. When he catches you eyeing them, he stops and pulls his pants down. A massive black cock springs free, which causes a lot more people to look in shock.'
 		gs 'arousal', 'erotic', 3
 		gs 'stat'
 		act 'Hurry away':
@@ -472,19 +469,19 @@ if $ARGS[0] = 'station':
 				if $pantyworntype = 'none':
 					if PCloPants > 0:
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/hairy1.jpg"></center>'
-						'You smile back at them and pull down your pants flashing your pussy to them. They wave you over.'
+						'You smile back at them and pull down your pants, flashing your pussy at them. They wave you over.'
 					else
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/hairy4.jpg"></center>'
-						'You smile back at them and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+' flashing your pussy to them. They wave you over.'
+						'You smile back at them and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+', flashing your pussy at them. They wave you over.'
 					end
 					gs 'flash', 'pussy', 'outdoors', 3, 1
 				else
 					if PCloPants > 0:
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/panty/1.jpg"></center>'
-						'You smile back at them and pull down your pants flashing your panties to them. They wave you over.'
+						'You smile back at them and pull down your pants, flashing your panties at them. They wave you over.'
 					else
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/panty/4.jpg"></center>'
-						'You smile back at them and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+' flashing your panties to them. They wave you over.'
+						'You smile back at them and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+', flashing your panties at them. They wave you over.'
 					end
 					gs 'flash', 'panties', 'outdoors', 1, 1
 				end
@@ -499,7 +496,7 @@ if $ARGS[0] = 'station':
 		act 'Stare in shock':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/pc/reactions/shock.jpg"></center>'
-			'It is just so big, you can''t help but stare at it, you briefly wonder if his friend is as big as he is. Then you notice them smiling and staring at you, as he puts his dick back away they wave you over.'
+			'It''s so big that you can''t help but stare at it while wondering if his friend is as big as he is. You notice them smiling and staring at you as he puts his dick back away they wave you over.'
 			gs 'arousal', 'erotic', 3
 			gs 'stat'
 			act 'Hurry away':minut += 5 & gt $loc, $loc_arg
@@ -508,7 +505,7 @@ if $ARGS[0] = 'station':
 		act 'Lick your lips':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/pc/reactions/shock.jpg"></center>'
-			'You can''t help yourself, seeing that big dick, you lick your lip. They see that and both grin wide and wave you over as the one puts his dick away.'
+			'You lick your lips at the sight. They see that and both grin and wave you over he puts his dick away.'
 			gs 'arousal', 'erotic', 3
 			gs 'stat'
 			act 'Hurry away':minut += 5 & gt $loc, $loc_arg
@@ -516,7 +513,7 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 7:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/flashus'+ rand(1,5) +'.jpg"></center>'
-		'As you head through the metro station, you notice a pretty young woman, she keeps lifting her skirt; flashing her pussy at various strangers. As you get closer she smiles at you and then flashes you.'
+		'As you head through the metro station, you notice a pretty young woman who keeps lifting her skirt and flashing her pussy at various strangers. As you get closer, she smiles at and then flashes you.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
@@ -532,19 +529,19 @@ if $ARGS[0] = 'station':
 				if $pantyworntype = 'none':
 					if PCloPants > 0:
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/pussy/hairy1.jpg"></center>'
-						'You smile back at her and pull down your pants flashing your pussy back to her. You both share a laugh before going on your way.'
+						'You smile back at her and pull down your pants, flashing your pussy at her. You both share a laugh before going on your way.'
 					else
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/pussy/hairy4.jpg"></center>'
-						'You smile back at her and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+' flashing your pussy back to her. You both share a laugh before going on your way.'
+						'You smile back at her and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+', flashing your pussy back at her. You both share a laugh before going on your way.'
 					end
 					gs 'flash', 'pussy', 'outdoors', 3, 1
 				else
 					if PCloPants > 0:
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/pants/inside/panty/1.jpg"></center>'
-						'You smile back at her and pull down your pants flashing your panties to her. You both share a laugh before going on your way.'
+						'You smile back at her and pull down your pants, flashing your panties at her. You both share a laugh before going on your way.'
 					else
 						'<center><img <<$set_imgh>> src="images/pc/activities/flashing/dress/inside/panty/4.jpg"></center>'
-						'You smile back at her and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+' flashing your panties to her. You both share a laugh before going on your way.'
+						'You smile back at her and pull up your '+iif(PCloSkirt > 0, 'skirt', 'dress')+', flashing your panties at her. You both share a laugh before going on your way.'
 					end
 					gs 'flash', 'panties', 'outdoors', 1, 1
 				end
@@ -557,61 +554,61 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 8:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/nakedg1.jpg"></center>'
-		'As you head through the metro station, you see a naked woman, only wearing a pair of boots boarding another metro train. She is actually walking around casually, like there is nothing; even remotely, out of the ordinary. She is garnering a lot of attention from everyone around her, but she seems completely oblivious to it. Within moments, she boards the other train, and is gone.'
+		'As you head through the metro station, you see a naked woman wearing only a pair of boots boarding another train. She''s casually walking around as if there''s nothing even remotely out of the ordinary. She''s garnering a lot of attention from everyone around her, but she seems completely oblivious to it. Within seconds, she boards the train and is gone.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 9:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/nakedg2.jpg"></center>'
-		'As you head through the metro station, you see a naked woman, she is huddled down on her knees; against one of the pillars. She is using her arms to cover up her body, as best she can; clearly ashamed.'
+		'As you head through the metro station, you see a naked woman huddled down on her knees against one of the pillars. She''s using her arms to cover up her body as best she can, clearly ashamed.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
-		act 'Ignore Her':minut += 5 & gt $loc, $loc_arg
+		act 'Ignore her':minut += 5 & gt $loc, $loc_arg
 		if money >= 50:
-			act 'Help Her and pay for taxi':
+			act 'Help her':
 				*clr & cla
 				money -= 50
 				pcs_mood += 10
 				minut += 10
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/nakedg2.jpg"></center>'
-				'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.'
+				'You notice a newspaper on one of the benches and grab it before walking over and offering it to her. Now that you''re closer, you can see she''s crying, though she takes the newspaper and covers up as best as she can before you 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 and he stripped her and left her naked. Once the taxi arrives, she thanks you and climbs in.'
 				act 'Leave': minut += 5 & gt $loc, $loc_arg
 			end
 		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.'
+		'As you head through the metro station, you see a naked man with a huge grin on his face. He seems rather proud at the attention he''s getting, though you have no idea why. After a quick check, you notice he packs nothing special in the manhood department as he continues on his way, as do you.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 11:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/nakedp1.jpg"></center>'
-		'As you head through the metro station, you see two couples looking a bit strange... All four of them are naked, only wearing shoes, carrying bags with them. They act normal, as if walking through the metro completely naked is a perfectly normal thing to do. They garner a lot of attention from the other people in the station, but they just head towards one of the metro trains.'
+		'As you head through the metro station, you see two couples looking a bit strange... All four of them are naked, wearing only shoes while carrying bags with them. They act normal, as if walking through the metro completely naked is a perfectly normal thing to do. They garner a lot of attention from the other people in the station, but they just keep heading towards one of the trains.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 12:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/seethru1.jpg"></center>'
-		'As you leave the metro station, you find yourself walking up the stairs behind a woman wearing a sheer dress. It is completely see through, it is obvious that she is not wearing any underwear at all. Which gives you a very nice view of her ass, once you reach the street, she heads off down the sidewalk.'
+		'As you leave the metro station, you find yourself walking up the stairs behind a woman wearing a sheer dress. It is completely see through, and you can see that she''s not wearing any underwear, which gives you a very nice view of her ass. Once you reach the street, she heads off down the sidewalk.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 13:
 		'<center><video autoplay loop src="images/locations/city/shared/metro/station/sex/jerkoff1.mp4"></video></center>'
-		'As you walk past one of the pillars, you see a man with his pants around his knees jerking off, just as you walk past, he starts cumming. He starts shooting his sperm out onto the floor, barely missing a woman that happens to go by at the wrong moment. Once he stops cumming, he pulls his pants up, and goes about his business.'
+		'As you walk past one of the pillars, you see a man with his pants around his knees jerking off. Just as you walk past, he starts cumming, barely missing a woman that happens to go by at the wrong moment. Once he stops cumming, he pulls his pants up and goes about his business.'
 		gs 'arousal', 'erotic', 3
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': minut += 5 & gt $loc, $loc_arg
 	elseif metrorand = 14:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/sex/les1.jpg"></center>'
-		'As you head through the metro station, you see a woman sitting on one of the benches in the station. Her skirt is pulled up, wearing no panties, with her legs stretched out, leaving plenty of room for the girl down on all fours in front of her to eat her pussy, who''s skirt is also pulled up, not wearing panties, giving everyone that are walking by a perfect vision of her pussy.'
-		'The one sitting fends off anyone trying to join in while her friend eats her out. Many people stop to watch the pair, several people pull out their smart phones, recording the show.'
+		'As you head through the metro station, you see a woman sitting on one of the benches in the station. Her skirt is pulled up and she has her legs stretched out, leaving plenty of room for the girl down on all fours in front of her to eat her pussy, whose skirt is also pulled up, giving everyone walking by a perfect view of her bare pussy.'
+		'The one sitting fends off anyone trying to join in while her friend eats her out. Many people stop to watch the pair, several pulling out their phones to record the show.'
 		gs 'arousal', 'voyeur_sex', 3
 		gs 'stat'
 		act 'Leave':
@@ -624,7 +621,7 @@ if $ARGS[0] = 'station':
 			*clr & cla
 			gs 'exp_gain', 'photoskl', 2
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/sex/les1.jpg"></center>'
-			'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.'
+			'You pull out your phone and start recording them. The one on all fours is going at it, and has her friend quickly moaning loudly while clutching at her hair. Seconds later, she gasps loudly and withers against her friend''s face as she had an orgasm. Once she recovers, they passionately kiss before standing up and straightening their clothes before heading out.'
 			gs 'arousal', 'voyeur_sex', 3
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -633,7 +630,7 @@ if $ARGS[0] = 'station':
 	elseif metrorand = 15:
 		metrorand['rand'] = rand(1,2)
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/sex/fuck'+ metrorand['rand'] +'.jpg"></center>'
-		'As you head through the metro station, you see a couple leaning against one of the walls, you see the woman struggling to keep her moans as quiet as possible as she''s bent over at the waist while the man behind her is hammering her for all he is worth. Several people gather around the couple to watch them fuck, many of them pulling out their smart phones to record the couple fucking. A couple of men are trying to join in, but are quickly shooed away.'
+		'As you head through the metro station, you see a couple leaning against one of the walls, the woman struggling to keep her moans quiet as the man hammers her for all he is worth. Several people gather around to watch, many of them pulling out their phones to record the scene. A few men try to join in, but are quickly shooed away.'
 		gs 'arousal', 'voyeur_sex', 3
 		gs 'stat'
 		act 'Hurry away':
@@ -647,7 +644,7 @@ if $ARGS[0] = 'station':
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/sex/fuck'+ metrorand['rand'] +'.jpg"></center>'
 			killvar 'metrorand'
 			gs 'exp_gain', 'photoskl', 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.'
+			'You pull out your phone and 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 buries himself balls deep. Once he pulls out of her, they both quickly get dressed and hurry to catch a train.'
 			gs 'arousal', 'voyeur_sex', 3
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -655,14 +652,14 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 16:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/guitarf'+ rand(1,2) +'.jpg"></center>'
-		'As you head through the metro station, you notice a woman playing a guitar, she has her guitar case open and you can see some money in it already. Several other people have stopped to listen to her play, she isn''t half bad.'
+		'As you head through the metro station, you notice a woman playing a guitar; she has her guitar case open and you can see some money in it already. Several other people have stopped to listen to her play; she isn''t half bad.'
 		act 'Ignore':minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/guitarf'+ rand(1,2) +'.jpg"></center>'
-			'You stop and listen to her play several songs, she really is pretty good. You wonder why she is playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to her play several songs, she really is pretty good.'
 			act 'Leave':minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give her money':
@@ -670,7 +667,7 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into her case. She looks up at you and smiles and nods her head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into her case. She looks up at you and smiles and nods her head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				end
@@ -678,14 +675,14 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 17:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/musicgroupm'+ rand(1,7) +'.jpg"></center>'
-		'As you head through the metro station, you notice a group of men playing music, there is a case open and you can see some money in it already. Several other people have stopped to listen to them play, they isn''t half bad.'
+		'As you head through the metro station, you notice a group of men playing music; there is a case open and you can see some money in it already. Several other people have stopped to listen to them play; they aren''t half bad.'
 		act 'Ignore': minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/musicgroupm'+ rand(1,7) +'.jpg"></center>'
-			'You stop and listen to them play several songs, they really is pretty good. You wonder why they are playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to them play several songs.'
 			act 'Leave': minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give them money':
@@ -693,21 +690,21 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into the case. One of the men looks up at you and smiles and nods his head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into the case. One of the men looks up at you and smiles and nods his head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				end
 			end
 		end
 	elseif metrorand = 18:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/accordionm'+ rand(1,2) +'.jpg"></center>'
-		'As you head through the metro station, you notice a man playing a accordion, he has his case open and you can see some money in it already. Several other people have stopped to listen to him play, he isn''t half bad.'
+		'As you head through the metro station, you notice a man playing an accordion; he has his case open and you can see some money in it already. Several other people have stopped to listen to him play; he isn''t half bad.'
 		act 'Ignore':minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/accordionm'+ rand(1,2) +'.jpg"></center>'
-			'You stop and listen to him play several songs, he really is pretty good. You wonder why he is playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to him play several songs.'
 			act 'Leave':minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give him money':
@@ -715,7 +712,7 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into his case. He looks up at you and smiles and nods his head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into his case. He looks up at you and smiles and nods his head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				end
@@ -723,14 +720,14 @@ if $ARGS[0] = 'station':
 		end
 	elseif metrorand = 19:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/musicgroup1.jpg"></center>'
-		'As you head through the metro station, you notice a group of men and women playing music, there is a case open and you can see some money in it already. Several other people have stopped to listen to them play, they isn''t half bad.'
+		'As you head through the metro station, you notice a group of men and women playing music; there is a case open and you can see some money in it already. Several other people have stopped to listen to them play; they aren''t half bad.'
 		act 'Ignore': minut += 5 & gt $loc, $loc_arg
 		act 'Listen':
 			*clr & cla
 			minut += 10
 			pcs_mood += 10
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/musicgroup1.jpg"></center>'
-			'You stop and listen to them play several songs, they really is pretty good. You wonder why they are playing in a metro station, perhaps the old adage about starving artist applies to musicians as well.'
+			'You stop and listen to them play several songs.'
 			act 'Leave': minut += 5 & gt $loc, $loc_arg
 			if money > 50:
 				act 'Give her money':
@@ -738,14 +735,14 @@ if $ARGS[0] = 'station':
 					money -= 50
 					pcs_mood += 10
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/station/givemoney.jpg"></center>'
-					'You reach into your purse and pull out some money, you drop it into the case. One of the men looks up at you and smiles and nods his head, but keeps playing. With your good deed done you leave the station and go on your way.'
+					'You reach into your purse and pull out some money to drop into the case. One of the men looks up at you and smiles and nods his head, but keeps playing. With your good deed done, you leave the station and go on your way.'
 					act 'Leave':minut += 5 & gt $loc, $loc_arg
 				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.'
+		'As you head through the metro station, you notice a couple having sex on the other side of the tracks. You can''t believe your eyes and despite this being a completely public place, you can''t pull your eyes away. They''re either a very 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 man notices you watching, he flashes you a hand gesture while never missing a thrust.'
 		gs 'arousal', 'voyeur_sex', 3
 		gs 'stat'
 		act 'Hurry away':
@@ -758,7 +755,7 @@ if $ARGS[0] = 'station':
 			*clr & cla
 			gs 'exp_gain', 'photoskl', 2
 			'<center><video autoplay loop src="images/locations/city/shared/metro/station/sex/fuck3.mp4"></video></center>'
-			'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.'
+			'You pull out your phone and 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 buries himself balls deep. Once he pulls out of her, they both quickly get dressed and rush to catch a train.'
 			gs 'arousal', 'voyeur_sex', 3
 			gs 'arousal', 'end'
 			gs 'stat'
@@ -766,14 +763,14 @@ if $ARGS[0] = 'station':
 		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.'
+		'As you step off the train and head up the stairs toward the street, you notice a girl trying to adjust her skirt, which has gotten caught up around her waistband. While doing so, she has accidentally exposed her bare ass to everyone behind her. A few seconds later, a few gopniks notice her and start catcalling at the girl, who quickly covers up and rushes away with bright red cheeks.'
 		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 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.'
+		'As you head through the metro station, you see two women standing on the platform waiting for the train dressed in latex body suits. Their heels are extremely tall and you imagine how much muscle control it must take just to stand in them, let alone walk.'
 		act 'Leave':minut += 5 & gt $loc, $loc_arg	
 	end
 end
@@ -860,104 +857,104 @@ if $ARGS[0] = 'train':
 		end
 	elseif metrorand = 8:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/girlcat.jpg"></center>'
-		'As you ride the metro, you notice a young woman sitting across from you, she is playing on her phone. But that is not what draws your attention to her, it is the large black cat sitting in her lap. The cat seems surprisingly calm, and happy considering the strange people around, and movement of the train. Occasionally she reaches down to pet the cat while playing on her phone. Once the metro comes to a stop, she lifts the cat then carries it in her arms, as she leaves the train.'
+		'As you ride the metro, you notice a young woman sitting across from you playing on her phone, but that''s not what draws your attention to her; she has large black cat sitting in her lap. The cat seems surprisingly calm and happy considering the strange people around. She occasionally reaches down to pet the cat while playing on her phone. Once the metro comes to a stop, she lifts the cat and carries it in her arms as she leaves the train.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 9:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/kilt.jpg"></center>'
-		'As you ride the metro, you notice a foreign man wearing a kilt. You overhear several other men commenting on him wearing a skirt, which he just ignores. He is likely used to such comments, as he has lived in Russia for a long time.'
+		'As you ride the metro, you notice a foreign man wearing a kilt. You overhear several other men commenting on him wearing a skirt, which he just ignores. He''s likely used to such comments as he has lived in Russia for a long time.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 10:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/manasleep.jpg"></center>'
-		'As you ride the metro, you notice a young man laying on the floor of the car, in front of one of the doors. He seems to be fast asleep, or maybe he is passed out. Several other people near his age are sitting near him, perhaps they are his friends, and are just taking him home. When your stop arrives everyone just steps over him, as they enter, or exit the metro. You quickly follow suit.'
+		'As you ride the metro, you notice a young man laying on the floor of the car in front of one of the doors. He seems to be fast asleep, or passed out. Several other people his age are sitting near him, likely his friends taking him home. When your stop arrives, everyone just steps over him as they enter or exit the train. You quickly follow suit.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 11:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/nakedg'+ rand(1,5) +'.jpg"></center>'
-		'As you find a seat, you notice a woman, she is wearing shoes, but other than that she is naked. She is sitting in one of the seats, as if riding the metro naked was the most normal thing in the world. At the very next stop she gets off, leaving you wondering why she was naked, and where she was going.'
+		'As you find a seat, you notice a woman wearing only a pair of shoes. She is strangely calm, as if riding the metro naked was the most normal thing in the world. She gets off at the next stop, leaving you wondering why she was naked, and where she was going.'
 		gs 'arousal', 'erotic_nudity', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 12:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/nakedm'+ rand(1,2) +'.jpg"></center>'
-		'As you find a seat, you notice a naked man. He acts as if, walking around naked; is the most normal thing in the world to do. At the very next stop he gets off, leaving you wondering why he was naked, and where he was going.'
+		'As you find a seat, you notice a naked man who acts as if walking around naked is the most normal thing in the world to do. He gets off at the next stop, leaving you wondering why he was naked, and where he was going.'
 		gs 'arousal', 'erotic_nudity', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 13:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/nakedgm1.jpg"></center>'
-		'As you find a seat, you notice several naked men. They are laughing, and talking, they appear to be a little drunk. They seem to be aware of all the looks that they are getting, finding it amusing, than anything. They often wink at any of the women looking their way. At the very next stop, they get off, leaving you wondering why they were naked, and where they were going.'
+		'As you find a seat, you notice several naked men who appear to be a little drunk as they laugh and talk. They seem to be aware of all the looks that they''re getting, finding it amusing more than anything. They often wink at any of the women looking their way. They all get off at the next stop, leaving you wondering why they were naked, and where they were going.'
 		gs 'arousal', 'erotic_nudity', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 14:
 		'<center><video autoplay loop src="images/locations/city/shared/metro/sex/3some1.mp4"></video></center>'
-		'As you find a seat, you notice a woman half naked kneeling in one of the seats. A man behind her is fucking her roughly, while she sucks the cock of another man. This goes on for some time until both of the men cum inside of her in each of the hole they were using. Once done, they get dressed, and sit together then start talking among themselves. They remain on the train, as you get off at your stop.'
+		'As you find a seat, you notice a woman half naked kneeling in one of the seats, a man behind her fucking her roughly while she sucks the cock of another man. This goes on for some time until both of the men cum. Once done, they get dressed and sit together to start talking among themselves. They remain on the train as you get off at your stop.'
 		gs 'arousal', 'voyeur_sex', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 15:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/anal1.jpg"></center>'
-		'As you find a seat, you notice a woman naked from the waist down, on all fours in the middle of the car. She seems to have a collar around her neck with a leash attached. Another woman is squatting in front of her, reaching back, pulling her butt checks apart. All while a man behind the kneeling woman grabs his cock and begins pounding her ass, the sounds of her cries makes it hard to tell, if she is enjoying the experience or not.'
-		'Once he finishes, the squatting woman reaches down, and grabs the leash then tightly pulls on it, almost choking the other girl. She and the man, talk for a bit, while the leashed girl stays on her knees, still naked from the waist down, but with cum running down her thighs. After their talk the man goes to take a seat, while the woman holding the leash, walks over to another spot to sit. Tugging on the leash to pull the other girl along, after a few more minutes, she leans over and whispers something to the leashed girl, who then gets dressed again, but remains kneeling at the feet, of what can only be, her dominatrix.'
+		'As you find a seat, you notice a woman naked from the waist down on all fours in the middle of the car. She seems to have a collar around her neck with a leash attached. Another woman is squatting in front of her while reaching back to pull her ass cheeks apart. A man behind the leashed girl grabs his cock and begins pounding her ass, the sounds of her cries making it hard to tell if she''s enjoying the experience or not.'
+		'Once he finishes, the squatting woman reaches down and grabs the leash before tightly pulling on it, almost choking the other girl. She and the man talk for a bit while the leashed girl stays on her knees with cum running down her thighs. After their talk, the man goes to take a seat while the woman holding the leash walks over to another spot to sit, tugging on the leash to pull the other girl along. After a few minutes, she leans over and whispers something to the leashed girl, who then gets dressed, but remains kneeling at the feet of what can only be her dominatrix.'
 		gs 'arousal', 'erotic_nudity', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 16:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/fingering1.jpg"></center>'
-		'As you find a seat, you notice a woman with her skirt pulled up and panties pushed aside being finger banged by a man in a suit. Her cries of ecstasy get louder, and louder, as he keeps it up until she finally climaxes, leaving her legs to buckle, forcing the man to catch her before she crumples to the floor. She leans against him, as he holds her tight, pulling her clothes back in place. You can hear them laughing at the attention they got, she is blushing, and they quickly exit at the next stop.'
+		'As you find a seat, you notice a woman with her skirt pulled up and panties pushed aside being finger banged by a man in a suit. Her cries of ecstasy get louder and louder until she finally climaxes, causing her legs to buckle, forcing the man to catch her before she crumples to the floor. She leans against him as he holds her tight, pulling her clothes back in place. You can hear them laughing at the attention they got before they quickly exit at the next stop.'
 		gs 'arousal', 'voyeur_sex', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 17:
 		'<center><video autoplay loop src="images/locations/city/shared/metro/sex/fuck'+ rand(1,3) +'.mp4"></video></center>'
-		'As you find a seat, you notice a couple having intercourse in the car. They are going at each other like animals. Many people are watching them, some even pull out their smart phones, recording them. They switch between several sex positions during the ride, getting more and more turned on. The man seems to have a lot of stamina, as they are still going at it hard, as you leave the car at your end station.'
+		'As you find a seat, you notice a couple having intercourse in the car, going at each other like animals. Many people are watching them, some even pulling out their phones to record them. They switch between several sex positions during the ride, getting more and more turned on. The man seems to have a lot of stamina, as they are still going at it as you leave the car at your stop.'
 		gs 'arousal', 'voyeur_sex', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 18:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/les1.jpg"></center>'
-		'As you find a seat, you notice a girl kneeling in her seat; facing the wrong way. Her skirt is pulled up, and her panties are down around her knees. Another girl is squatting behind her eating her pussy. This goes on for several minutes until the first girl finally has an orgasm, once she''s finished, she gets dressed, and sits by her friend. For the rest of the ride, they keep making out, leaving the car at the next stop.'
+		'As you find a seat, you notice a girl kneeling in her seat facing the wrong way. Her skirt is pulled up, and her panties are down around her knees as another girl squats behind her, eating her pussy. This goes on for several minutes until the girl finally has an orgasm. Once she''s finished, she gets dressed and sits by her friend. They make out for the remainder of their journey, leaving the car at the next stop.'
 		gs 'arousal', 'voyeur_sex', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 19:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/boystuffed1.jpg"></center>'
-		'As you find a seat, you notice a young man close to your own age across form you. He seems to be asleep clutching a stuffed animal tightly in his arms. Several of the other passengers give him amused looks.'
+		'As you find a seat, you notice a young man close to your own age across from you. He seems to be fast asleep while clutching a stuffed animal tightly in his arms. Several of the other passengers give him amused looks.'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 20:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/girlsbff'+ rand(1,2) +'.jpg"></center>'
-		'As you find a seat, there is some girls across the way horsing around. They are talking loudly and goofing off, the seem to be having fun but they are also annoying several of the other passengers.'
+		'As you find a seat, you see some girls horsing around, talking loudly and goofing off. While they seem to be having fun, they''re also annoying several of the other passengers.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 21:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/passedoutg1.jpg"></center>'
-		'As you find a seat, you notice a woman leaned over in the seat across from you. You can smell the alcohol from here, she seems to be passed out. Most of the other passengers ignore her but you noticed a couple of men eying her.'
+		'As you find a seat, you notice a woman passed out in the seat across from you; you can smell the alcohol from here. Most of the other passengers ignore her, but you notice more than a few men eying her.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 22:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sleepb1.jpg"></center>'
-		'As you find a seat, you notice a young guy sound asleep snoring across from you, he has managed to cram himself akwardly into the seat. You don''t know how he manged to get comfortable enough to fall asleep. You imagine he will be sore when he waked up.'
+		'As you find a seat, you notice a young man sound asleep snoring across from you, having managed to cram himself akwardly into the seat. You don''t know how he manged to get comfortable enough to fall asleep, but imagine he will be sore when he wakes up.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 23:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sleepcouple.jpg"></center>'
-		'As you find a seat, you a couple across the way. The man is sitting up with his hand handing down, his eyes are closed and it sounds like he is snoring. The woman is laying on the seat next to him with her head in his lap.'
+		'As you find a seat, you a couple across from you. The man is sitting up and snoring while the woman is laying on the seat next to him with her head in his lap.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 24:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sleepexf1.jpg"></center>'
-		'As you find a seat, you notice a woman across from you. She seems to be passed out, you can smell the alcohol from here. Her jacket is open is open and her shirt pulled down, leaving one of her breasts exposed for everyone to see. Several passengers give her a glance now and a again. A few even take her pictures, a group of young guys are whispering to each other and laughing while watching her.'
+		'As you find a seat, you notice a woman passed out across from you; you can smell the alcohol from here. Her jacket is open and her shirt pulled down, leaving one of her breasts exposed for everyone to see. Several passengers give her a glance now and again, and a few even take her picture. A group of young men are whispering to each other and laughing while watching her.'
 		gs 'arousal', 'erotic_nudity', 5
 		gs 'arousal', 'end'
 		gs 'stat'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 25:
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sleepg1.jpg"></center>'
-		'As you find a seat, you notice a woman laying in the seat across from yours sound asleep, most of the passengers ignore her. Though one man seems to be watching her, you don''t know if he knows her or is thinking about doing something.'
+		'As you find a seat, you notice a woman laying in the seat across from yours sound asleep. Most of the passengers ignore her, though one man seems to be watching her. You don''t know if he knows her or is thinking about doing something.'
 		act 'Leave': gt 'metro', 'start'
 	elseif metrorand = 26 and (hour = 7 or hour = 15):
 		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big77.jpg"></center>'
@@ -965,37 +962,37 @@ if $ARGS[0] = 'train':
 		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.'
+		'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 a while 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. 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.'
+		'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.'
 		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.'
+		'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 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.'
+		'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 he''s homeless, or just poor, and almost feel sorry for him. 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, who 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.'
+		'As you take your spot in the metro, you notice a police officer standing across from you, staring at you. 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 you. You don''t think he''s even blinked once. "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.'
+		'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/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.'
+		'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? 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'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/kilt.jpg"></center>'
-		'As you ride the metro, you notice a foreign man wearing a kilt. You overhear several other men commenting on him wearing a skirt, which he just ignores. He is likely used to such comments, as he has lived in Russia for a long time.'
+		'As you ride the metro, you notice a foreign man wearing a kilt. You overhear several other men commenting on him wearing a skirt, which he just ignores. He''s likely used to such comments as he has lived in Russia for a long time.'
 		act 'Leave': gt 'metro', 'start'
 	end
 end
@@ -1004,7 +1001,7 @@ if $ARGS[0] = 'twobbc':
 	*clr & cla
 	minut += 3
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metrorestroom.jpg"></center>'
-	'You walk over to them. The one that pulled his pants down says to you in badly accented Russian, it sounds like he might be from somewhere in Africa. "Come lets go have some fun, yes?" He points off, you turn to follow where he is pointing and you see he is pointing at the restrooms, you know what they want, to have sex with you in the mens room.'
+	'You walk over to them. "Come, let''s go have some fun, yes?" the one who pulled his pants down says to you in badly accented Russian; it sounds like he might be from Africa. He points and you turn to that he''s pointing at the restrooms. It''s clear what they want.'
 	gs 'willpower', 'sex', 'resist', 'medium'
 	if will_cost <= pcs_willpwr:
 		act 'Tell them no (<<will_cost>> Willpower)':
@@ -1012,7 +1009,7 @@ if $ARGS[0] = 'twobbc':
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/pc/reactions/no.jpg"></center>'
-			'You shake your head no and step away, as you do they both frown. "No sorry. I was just playing I didn''t mean to tease you." You tell them and then turn and hurry away.'
+			'You shake your head and step away, causing them both to frown. "Sorry, I was just playing. I didn''t mean to tease you," you tell them before turning and hurrying away.'
 			act 'Leave':minut += 5 & gt $loc, $loc_arg
 		end
 	else
@@ -1021,8 +1018,8 @@ if $ARGS[0] = 'twobbc':
 	act 'Go with them':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc1.jpg"></center>'
-		'You decided why not, a little risk is always fun. Sure someone might come in a catch you with them but then again maybe no one will. As soon as you walk in the mens room, one of them takes you over near the stalls and starts kissing you. While his friend seems to be doing something at the door, you''re not sure what and you really don''t care at this moment.'
-		'After a couple of minutes of kissing he pushes you down by your shoulders.'
+		'You decide to go with them. As soon as you walk in the mens room, one of them takes you over near the stalls and starts kissing you while his friend seems to be doing something at the door.'
+		'After a few minutes of kissing, he pushes you down by your shoulders.'
 		gs 'arousal', 'foreplay', 3, 'exhibitionism'
 		gs 'stat'
 		gs 'willpower', 'sex', 'resist', 'medium'
@@ -1032,11 +1029,11 @@ if $ARGS[0] = 'twobbc':
 				gs 'willpower', 'pay', 'resist'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbcno.jpg"></center>'
-				'You pull away so he can''t push you down anymore and then you shake your head. "I''m sorry I can''t do this." You turn and rush to the door where the other one is, at first it looks like he might stop you, but his friend behind you says something you don''t understand and then he steps aside. You rush out of the mens room, breathing heavily.'
+				'You pull away and shake your head. "I''m sorry, but I can''t do this." You turn and rush to the door where the other one is; it looks like he might stop you, but his friend says something you don''t understand and he steps aside. You rush out of the mens room, breathing heavily.'
 				gs 'arousal', 'foreplay', 3, 'exhibitionism'
 				gs 'arousal', 'end'
 				gs 'stat'
-				'Leave':minut += 5 & gt $loc, $loc_arg
+				act 'Leave': minut += 5 & gt $loc, $loc_arg
 			end
 		else
 			act 'Change your mind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
@@ -1044,27 +1041,27 @@ if $ARGS[0] = 'twobbc':
 		act 'Squat':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc2.jpg"></center>'
-			'You squat down and rub his crotch through his pants, you can feel his cock is already rock hard. He looks down at you and in accented Russian says. "Suck it." There is really no doubt what he means by it, he seems to speak Russian better than his friend. Who seems to be trying to jam something under the door.'
+			'You squat down and rub his crotch through his pants; his cock is already rock hard. He looks down at you and in accented Russian says "Suck it." He seems to speak Russian better than his friend, who seems to be trying to jam something under the door.'
 			gs 'arousal', 'foreplay', 3, 'exhibitionism'
 			gs 'stat'
 			act 'Suck his dick':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc3.jpg"></center>'
-				'You drop down to your knees as you unbutton his pants, you reach inside and pull his cock free. You stroke it several times before opening your mouth. You take his cock into your mouth, wrapping your lips tightly around the shaft and begin bobbing your head up and down as you suck his cock. While you are sucking his dick you notice his friend walks back over and they exchange a few words in a language you don''t recognize. After their exchange of words the other guy pulls his dick out of your mouth and they trades places.'
+				'You drop down to your knees as you unbutton his pants before reaching inside and pulling his cock free. You stroke it several times before opening your mouth. You take his cock into your mouth, wrapping your lips tightly around the shaft and bobbing your head up and down as you suck his cock. While you''re sucking his dick, you notice his friend walking back over and they exchange a few words in a language you don''t recognize. After their exchange of words, the other guy pulls his dick out of your mouth and they trade places.'
 				gs 'arousal', 'bj', 3, 'exhibitionism'
 				gs 'stat'
 				act 'Suck the other dick':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc4.jpg"></center>'
-					'As soon as he steps in place of where his friend was, his dick already out, you wrap your lips around his dick and start sucking it. The other one now walks to the other side of you, you reach over to play with his balls and jerk him off at the same time. By the sounds of their moans and tone of voice when they talk to each other in that language you don''t understand they sound happy anyways.'
+					'As soon as he steps in place of where his friend was, his dick already out, you wrap your lips around his dick and start sucking it. The other one now walks to the other side of you, and you reach over to play with his balls and jerk him off at the same time. By the sounds of their moans and tone of voice when they talk to each other, they sound happy.'
 					gs 'arousal', 'bj', 5, 'exhibitionism', 'group'
 					gs 'arousal', 'hj', -5, 'exhibitionism', 'group'
 					gs 'stat'
 					act 'Suck the other dick':
 						*clr & cla
 						'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc5.jpg"></center>'
-						'Soon you start switching which dick you are sucking while you jerk the other one off, trying to keep them both happy. Part of you is thrilled at the excitement of blowing two guy in a public mens room. Even more so because they are black and you know some people are still racist, just makes it all the more exciting. The one you are jerking off starts stripping you while waiting for his turn to get sucked off again, before long you find yourself naked, between them.'
-						'Once you are naked the one you are not sucking tries to get you to stand up and bend over, he is obviously wanting to fuck you.'
+						'You start switching which dick you''re sucking while you jerk the other one off, trying to keep them both happy. Part of you is thrilled at the excitement of blowing two guys in a public mens room, even more so because they are black. The one you are jerking off starts stripping you while waiting for his turn.'
+						'Once you''re naked, the one you''re not sucking tries to get you to stand up and bend over.'
 						gs 'arousal', 'bj', 5, 'exhibitionism', 'group'
 						gs 'arousal', 'hj', -5, 'exhibitionism', 'group'
 						gs 'stat'
@@ -1082,14 +1079,14 @@ if $ARGS[0] = 'twobbc':
 						act 'Get fucked':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc6.jpg"></center>'
-							'You stand up while you keep sucking his friend, leaving you bent over. You feel the head of his hard dick rubbing against your slit, getting the head of his cock and your pussy wet in the process. Once he is convinced you are wet enough, he slides his dick in your pussy. You feel it filling you up, you moan softly around the cock in your mouth. He starts fucking you hard and fast almost at once.'
+							'You stand up while you keep sucking his friend, leaving you bent over. You feel the head of his hard dick rubbing against your slit, getting the head of his cock and your pussy wet in the process. Once he''s convinced you''re wet enough, he slides his dick into your pussy. You feel it filling you up and moan softly around the cock in your mouth. He starts fucking you hard and fast almost at once.'
 							gs 'arousal', 'bj', 5, 'exhibitionism', 'group', 'sub', 'rough'
 							gs 'arousal', 'vaginal', -5, 'exhibitionism', 'group', 'sub','rough'
 							gs 'stat'
 							act 'Get fucked again':
 								*clr & cla
 								'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc7.jpg"></center>'
-								'After a few minutes the one who''s dick you are sucking says something to his friend and soon both of them pull out of you. They switch places, you find a wet dick covered in your pussy juices shoved in your mouth. You start sucking on it at once, almost at the same time you feel the other dick shoved in your wet pussy and almost at once starts fucking you hard and rough. Several minutes go by, when the one fucking you spits on your ass and you feel him working the spit into your asshole with his finger, you know what comes next.'
+								'After a few minutes, the one whose dick you''re sucking says something to his friend and soon both of them pull out of you. They switch places and you find a wet dick covered in your pussy juices shoved into your mouth. You start sucking on it as you feel the other dick being shoved into your wet pussy and fucking you hard and rough. Several minutes go by before the one fucking you spits on your ass and you feel him working the spit into your asshole with his finger.'
 								gs 'arousal', 'bj', 5, 'exhibitionism', 'group', 'sub', 'rough'
 								gs 'arousal', 'vaginal', -5, 'exhibitionism', 'group', 'sub', 'rough'
 								gs 'stat'
@@ -1107,7 +1104,7 @@ if $ARGS[0] = 'twobbc':
 								act 'Take it up the ass':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc8.jpg"></center>'
-									'He pulls his dick out of you and rubs the tip against your anus. Then pushes against against it until the head of his cock pops into your ass. Causing you to groan a little in pain and moan in pleasure. He starts fucking your butt as you suck his friends dick, it doesn''t take him very long until he works his cock balls deep in your ass and starts hammering away at it. They excitedly talk back and forth laughing, if you had to guess the one in your ass is telling his friend he is fucking your butt.'
+									'He pulls his dick out of you and rubs the tip against your anus before pushing against against it until the head of his cock pops into your ass, causing you to groan in pain. He starts fucking your ass as you suck his friend''s dick, and it doesn''t take him very long until he works his cock balls deep into your ass and starts hammering away at it. They excitedly talk back and forth while laughing.'
 									gs 'arousal', 'bj', 5, 'exhibitionism', 'group', 'sub', 'rough'
 									gs 'arousal', 'anal', -5, 'exhibitionism', 'group', 'sub', 'rough'
 									gs 'pain', 1, 'asshole', 'stretch'
@@ -1115,9 +1112,8 @@ if $ARGS[0] = 'twobbc':
 									act 'Another ass pounding':
 										*clr & cla
 										'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/sex/station/2bbc9.jpg"></center>'
-										'It looks like you were correct, after a few minutes the ones who dick you are sucking starts saying something urgently, by a guess you think he wants to trade positions. Sure enough they both pull out of you and walk around you, switching positions. The one that was just in your ass does make a detour to grab some toilet paper, which he uses to wipe off his dick, before walking over to shove it back in your mouth.'
-										*nl
-										'While his friend wasting no time shoves his cock in your much loser asshole, it actually slides in fairly easily since the stretching it already got. He very quickly works himself balls deep in your ass, he grabs you by the hips as he starts hammering away at your ass, just as fast and furiously as he can. Several minutes of this goes by until they both pull out of you, the one just in your ass does what his friend did and cleans his dick up with some toilet paper.'
+										'After a few minutes, the one whose dick you''re sucking starts saying something urgently before they both pull out of you and walk around you, switching positions. The one that was just in your ass does make a detour to grab some toilet paper, which he uses to wipe off his dick before walking over to shove it back in your mouth.'
+										'His friend wastes no time and shoves his cock into your much looser asshole. He very quickly works himself balls deep into your ass, grabbing you by the hips as he starts hammering away at your ass as fast as he can. Several minutes of this go by until they both pull out of you.'
 										gs 'arousal', 'bj', 5, 'exhibitionism', 'group', 'sub', 'rough'
 										gs 'arousal', 'anal', -5, 'exhibitionism', 'group', 'sub', 'rough'
 										gs 'pain', 1, 'asshole', 'stretch'
@@ -1137,8 +1133,8 @@ end
 if $ARGS[0] = 'twobbcfinish':
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/shared/metro/metrorestroom.jpg"></center>'
-	'You get down on your knees between them and alternate between sucking one dick and jerking the other one back and forth until they both start to moan. At that point you start jerking them both off, with their dicks pointed at your face. Moments later the first hot stream of cum splatters on your face and some down on your tits, almost at the same time you get hit by another splatter of cum on the other side of your face. They both let out several spurts of cum covering your face and tits with their sperm.'
-	'With them both finished they laugh and quickly get dressed, just as they start to leave the one that speaks better Russian stops and says. "Thank you, you are very good fuck." Then they both walk out leaving you naked and covered in their cum. You get up and start getting dressed yourself.'
+	'You get down on your knees between them and alternate between sucking one dick and jerking the other one back and forth until they both start to moan. At that point, you start jerking them both off with their dicks pointed at your face. Seconds later, streams of cum start splattering across your face and dripping onto your breasts.'
+	'Once they finish, they laugh and quickly get dressed. "Thank you, you are very good fuck," one of the says before they both walk out, leaving you naked and covered in their cum. You get up and start getting dressed yourself.'
 	gs 'arousal', 'bj', 5, 'exhibitionism', 'group', 'sub'
 	gs 'arousal', 'hj', -5, 'exhibitionism', 'group', 'sub'
 	gs 'cum_call', 'face', 'unknown African man'

+ 29 - 29
locations/misha.qsrc

@@ -6,14 +6,14 @@ if $ARGS[0] = '1':
 	gs 'themes', 'indoors'
 	gs 'boyStat','A54'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/misha.pre0,<<rand(0,1)>>.jpg"></center>'
-	'You enter Uncle Misha''s apartment. He lets you in and you take a seat, as he glances down the hallway once more to see if anyone saw you enter. Content that the hallway is empty, he closes the door behind him. He then immediately reaches for his pants and pulls out his large cock with a lewd grin on his face.'
-	'Uncle Misha approaches you, his cock bobbing up and down. Noticing your reluctance he puts his hand below your chin and makes you look him in the eye: "Come on girl, we both know why you''re here. You want to service my hard cock. Get to it."'
+	'You enter Uncle Misha''s apartment. He lets you in, and you take a seat as he glances down the hallway once more to see if anyone saw you walk in. Content that the hallway is empty, he closes the door behind him. He immediately reaches for his pants and pulls out his giant cock with a lewd grin.'
+	'Uncle Misha approaches you, his cock bobbing up and down. Noticing your reluctance, he puts his hand below your chin and makes you look him in the eye: "Come on, girl, we both know why you''re here. You want to service my hard cock. Get to it."'
 	gs 'stat'
 	act 'Take his dick in your mouth':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/misha0,<<rand(0,7)>>.jpg"></center>'
-		'Even though the size of his large cock intimidates you a little, you nod. He''s right... you wouldn''t have been here if this wasn''t what you wanted. Right?'
-		'You take your uncle''s penis in your hand, giving it a few short tugs. A bead of precum forms on the head of his dick, and you take that as your cue to really get involved. You move your head closer to his penis and close your lips around it, licking the dollop of precum off. It actually tastes kind of nice. You can feel his dick stiffen further in your mouth, and the thought of you being responsible for this gives you an odd sense of accomplishment.'
+		'Even though the size of his giant cock intimidates you a little, you nod. He''s right... you wouldn''t have been here if this wasn''t what you wanted. Right?'
+		'You take your uncle''s penis in your hand, giving it a few short tugs. A bead of precum forms on the head of his dick. You accept that as your cue to get involved. You move your face closer to his penis and close your lips around it, licking a dollop of precum off. It actually tastes kind of nice. You can feel his dick stiffen further in your mouth, and the thought of you being responsible for this gives you an odd sense of accomplishment.'
 		gs 'arousal', 'hj', 5, 'sub'
 		gs 'arousal', 'bj', 2
 		gs 'stat'
@@ -22,10 +22,10 @@ if $ARGS[0] = '1':
 			gs 'arousal', 'bj', 10, 'sub'
 			dmishaday = daystart
 			gs 'stat'
-			'He''s content just letting you suck him off for a bit, especially when you gather your courage and start to apply your skills. After a while he pulls back though, saying: "Alright <<$pcs_nickname>>, that was nice but not what I had in mind for today. It''s time for the main course!"'
+			'He''s content just letting you suck him off for a bit, especially when you gather your courage and start to apply your skills. Then, after a while, he pulls back, saying: "Alright, <<$pcs_nickname>>, that was nice but not what I had in mind for today. It''s time for the main course!"'
 			act 'Uncle Misha put his condom on': $temp = {gs 'dinsex','boy_puts_his_condom'} & xgt 'misha','1_2nd_part'
 			if prezik > 0:act 'You put your condom on his cock': $temp = {gs 'dinsex','pc_puts_condom'} & xgt 'misha','1_2nd_part'
-			act 'You tell Misha that he need not a condom': $temp = '' & xgt 'misha','1_2nd_part'
+			act 'You tell Misha that he doesn''t need a condom': $temp = '' & xgt 'misha','1_2nd_part'
 		end
 	end
 
@@ -36,8 +36,8 @@ if $ARGS[0] = '1':
 			gs 'willpower', 'pay', 'resist'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/misha.exit0,0.jpg"></center>'
-			'You have no intentions of ''servicing him'', and stand up. Although he has always been nice to you, you know from the stories your mother told that uncle Misha is used to getting his way, and that he can get rather violent when he doesn''t. You try to placate him: "I''m sorry uncle, I didn''t mean to lead you on. I merely wanted to see if you were up for a chat."'
-			'Fortunately, he''s not upset with you at all. The smug grin on uncle Misha never leaves his face, his cock still hanging out of his pants. "No problem <<$pcs_nickname>>, I recognized that look in your eyes when I pulled my dick out. You''ll be back. They all come back." You try to ignore his laughter as you pull the door shut behind you.'
+			'You have no intentions of ''servicing him'' and stand up. Although he has always been pleasant to you, you know from the stories your mother told that uncle Misha is used to getting his way and can get rather violent when he doesn''t. So you try to placate him: "I''m sorry, uncle, I didn''t mean to lead you on. I merely wanted to see if you were up for a chat."'
+			'Fortunately, he''s not upset with you at all. The smug grin on uncle Misha never leaves his face, his cock still hanging out of his pants. "No problem, <<$pcs_nickname>>. I recognized that look in your eyes when I pulled my dick out. You''ll be back. They all come back." You ignore his laughter as you pull the door shut behind you.'
 			act 'Exit to the stairwell':gt'pod_ezd','etaj_2'
 		end
 	else
@@ -59,8 +59,8 @@ if $ARGS[0] = '1_2nd_part':
 		gs 'cum_call', 'face', $boy, 1,'','',20
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/misha.cum0,<<rand(0,1)>>.jpg"></center>'
 		'Panting heavily, your uncle Misha pulls his hard cock away from your pussy.'
-		'He motions for you to get on your knees, his breathing is ragged and his face flustered. Once you''re in position, he furiously masturbates his dick as you sit there waiting for his load, not sure whether to close your eyes or to keep looking at him. You decide to be brave and look him in the eye, which turns him on a great deal. He rewards you by focusing on your mouth and making sure not to cum near your eyes. You do what feels right in the moment and stick out your tongue, trying to catch at least some of it.'
-		'Uncle Misha takes a minute to catch his breath and admire his handiwork on your face, before leaning down and kissing you on the forehead. He throws a couple of crumpled bills on the floor. "Very nice, <<$pcs_nickname>>. Here, take these for your efforts", he says as you scramble to pick them up. Indicating he''s done with you now, he expects you to leave.'
+		'He motions for you to get on your knees. His breathing is ragged, and his face is flustered. Once you''re in position, he furiously masturbates his dick as you sit there waiting for his load, not sure whether to close your eyes or to keep looking at him. You decide to be brave and look him in the eye, which turns him on a great deal. He rewards you by focusing on your mouth and making sure not to cum near your eyes. You do what feels right and stick out your tongue, trying to catch at least some of it.'
+		'Uncle Misha takes a minute to catch his breath and admire his handiwork on your face before leaning down and kissing you on the forehead. He throws a couple of crumpled bills on the floor. "Very nice, <<$pcs_nickname>>. Here, take these for your efforts", he says as you scramble to pick them up. Indicating he''s done with you now, and he expects you to leave.'
 		gs 'arousal', 'end'
 		money = money + 200
 		npc_sex[$boy] += 1
@@ -72,8 +72,8 @@ end
 if $ARGS[0] = '2':
 	gs 'themes', 'indoors'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/garage/father/sex/father.misha.pre0,0.jpg"></center>'
-	'They both drop their pants to their ankles, revealing their hard cocks.'
-	'Your stepfather instructs you, "Well, <<$pcs_nickname>>, given your history I''m sure you know what to do with these. Get started."'
+	'They both drop their pants to their ankles, revealing their stiff cocks.'
+	'Your stepfather instructs you, "Well, <<$pcs_nickname>>, given your history, I''m sure you know what to do with these. Get started."'
 	gs 'stat'
 	act 'Get on your knees and suck them off':
 		*clr & cla
@@ -86,7 +86,7 @@ if $ARGS[0] = '2':
 		npc_rel['A28']+=3
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/garage/father/sex/father.misha0,<<rand(0,1)>>.jpg"></center>'
 		'You meekly nod and fall to your knees in front of them, reaching for their hard dicks.'
-		'Since they have been talking about ''punishment'' non-stop, you do your best to keep them happy. Maybe they''ll go easy on you? You obediently put your lips around your stepfather''s dick, diligently sucking him off while you massage your uncle''s rod with your hand at the same time. A while later, the roles are reversed and your uncle Misha''s dick is deep down your throat as you try to keep your stepfather happy too.'
+		'Since they have been talking about ''punishment'' non-stop, you do your best to keep them happy. Maybe they''ll go easy on you? You obediently put your lips around your stepfather''s dick, diligently sucking him off while you massage your uncle''s rod with your hand at the same time. A while later, the roles are reversed, and your uncle Misha''s dick is deep down your throat as you try to keep your stepfather happy.'
 		gs 'arousal', 'bj', 5,'dick[1]', 'sub', 'deepthroat', 'group'
 		gs 'arousal', 'hj', 5,'dick[2]', 'sub', 'group'
 		minut -= 5
@@ -98,9 +98,9 @@ if $ARGS[0] = '2':
 		act 'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/garage/father/sex/father.misha1,<<rand(0,5)>>.jpg"></center>'
-			'If your goal was to avoid punishment, you were way too eager to achieve that. Your uncle Misha notices how eager you are to comply and snorts: "Hmm, look at her... this is hardly punishment. She looks like she''s the happiest girl in the world, sucking our dicks like that."'
-			'Your stepfather agrees: "You''re right, <<$pcs_nickname>> should be punished properly." Then turning his attention to you he says: "Go on <<$pcs_nickname>>, spread those cute little legs of yours. It''s time for your real punishment."'
-			'You open your legs wide and <<lcase(mid($boydesc[2],1,1))>><<mid($boydesc[2],2,len($boydesc[2])-1)>> enters your pussy, while you suck your <<lcase(mid($boydesc[1],1,1))>><<mid($boydesc[1],2,len($boydesc[1])-1)>>. Neither of them are too gentle about it, and within seconds you find yourself gagging on cock on one end, and being roughly pounded at the other. After a while they change positions. And then again, and again... you can tell this is definitely not the first time they used a girl together. You''re surprised at the amount of positions they manage to fuck you in, but at the same time are too horny to care and just enjoy your ''punishment''.'
+			'If your goal was to avoid punishment, you were too eager to achieve that. Your uncle Misha notices how eager you are to comply and snorts: "Hmm, look at her... this is hardly a punishment. She looks like the happiest girl in the world, sucking our dicks like that."'
+			'Your stepfather agrees: "You''re right. <<$pcs_nickname>> should be punished properly." Then turning his attention to you, he says: "Go on, <<$pcs_nickname>>, spread those cute little legs of yours. After that, it''s time for your real punishment."'
+			'You open your legs wide and <<lcase(mid($boydesc[2],1,1))>><<mid($boydesc[2],2,len($boydesc[2])-1)>> enters your pussy, while you suck your <<lcase(mid($boydesc[1],1,1))>><<mid($boydesc[1],2,len($boydesc[1])-1)>>. Neither of them is too gentle about it. Within seconds, you find yourself gagging on cock on one end and being roughly pounded at the other. After a while, they change positions. And then again, you can tell this is definitely not the first time they used a girl together. You''re surprised at the number of positions they manage to fuck you in, but at the same time, are too horny to care and just enjoy your "punishment".'
 			gs 'arousal', 'bj', 15,'dick[1]', 'sub', 'deepthroat', 'group', 'rough'
 			gs 'arousal', 'vaginal', 15,'dick[2]', 'sub', 'group', 'rough'
 			gs 'arousal', 'bj', 15,'dick[2]', 'sub', 'deepthroat', 'group', 'rough'
@@ -112,14 +112,14 @@ if $ARGS[0] = '2':
 				*clr & cla
 				minut += 3
 :misha_tootight
-				!! stepmisha = rand(0,12)
-				stepmisha = ARGS[1]
-				ARGS[1] = 0
+				stepmisha = rand(0,12)
+				!! stepmisha = ARGS[1]
+				!! ARGS[1] = 0
 				if stepmisha = 0:
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/misha.cum0,<<rand(0,1)>>.jpg"></center>'
 					gs 'cum_call', 'mouth', $boy[1], 1
 					gs 'cum_call', 'face', $boy[2], 1
-					'Eventually they''re close enough to reach orgasm, and they tell you to get on your knees and take it on your face like a good little slut. You simply get down on your knees and do everything they say, having way too much of a good time to cause any trouble. They drop their loads on your face one at a time, while you try to lick off any bits of cum that drop close enough to your mouth. Being fully satisfied by you, they drop back into their chairs and resume their drinking, not paying any more attention to you.'
+					'Eventually, they''re close enough to reach orgasm, telling you to get on your knees and take it on your face like a good little slut. You simply get down on your knees and do everything they say, having way too much of a good time to cause any trouble. They drop their loads on your face one at a time while you try to lick off any bits of cum that drop close enough to your mouth. Then, being fully satisfied by you, they drop back into their chairs and resume their drinking, not paying any more attention to you.'
 					gs 'arousal', 'end'
 					gs 'stat'
 				elseif stepmisha = 1:
@@ -130,7 +130,7 @@ if $ARGS[0] = '2':
 					!!Misha in pussy, father in ass
 					gs 'cum_call', '', $boy[2], 1
 					gs 'cum_call', 'anus', $boy[1], 1
-					'Finally uncle Misha fills up your pussy, while your stepfather comes inside your ass.'
+					'Finally, uncle Misha fills up your pussy, while your stepfather comes inside your ass.'
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -142,7 +142,7 @@ if $ARGS[0] = '2':
 					!!father in pussy, Misha in ass
 					gs 'cum_call', '', $boy[1], 1
 					gs 'cum_call', 'anus', $boy[2], 1
-					'Finally your stepfater fills up your pussy, while uncle Misha comes inside your ass.'
+					'Finally, your stepfather fills up your pussy, while uncle Misha comes inside your ass.'
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -156,8 +156,8 @@ if $ARGS[0] = '2':
 					gs 'cum_call', '', $boy[1], 1
 					gs 'cum_call', '', $boy[2], 1
 					npc_rel['A28'] += 2
-					'Finally they both force their cocks in your pussy at the same time, and push up inside of you. The gravity helps them force you down on them to the hilt, but you still feel extremely full with their dicks.'
-					'For a few minutes your pussy feels really tight while you just moan and hang on, while they piston inside of your tight cunt, but in the end they both cum inside of you at the same time.'
+					'Finally, they force their cocks in your pussy simultaneously and push up inside you. The gravity helps them move you down on them to the hilt, but you still feel incredibly complete with their dicks.'
+					'For a few minutes, your pussy feels tight while you moan and hang on while they piston inside your tight cunt, but in the end, they both cum inside of you simultaneously.'
 					gs 'arousal', 'end'
 					gs 'stat'
 
@@ -193,7 +193,7 @@ if $ARGS[0] = '2':
 					gs 'cum_call', '', $boy[2], 1
 					'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/garage/father/sex/firstguy.mp4"></video></center>'
 					'"Seriously, come already!" says <<lcase(mid($boydesc[1],1,1))>><<mid($boydesc[1],2,len($boydesc[1])-1)>>, while watching his brother fucking you.'
-					'"Hang on, I''m soon going to cum inside her puss... ahh... yeah, thats it!"'
+					'"Hang on, I''m soon going to cum inside her puss... ahh... yeah, that''s it!"'
 					'<<ucase(mid($boydesc[2],1,1))>><<mid($boydesc[2],2,len($boydesc[2])-1)>> pulls out of your pussy, causing the pumped-in sperm to start to flow out, but it doesn''t have much time.'
 					'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/garage/father/sex/secondguy.mp4"></video></center>'
 					'<<ucase(mid($boydesc[1],1,1))>><<mid($boydesc[1],2,len($boydesc[1])-1)>> immediately jumps to the newly available hole, and stuff his prick inside.'
@@ -210,8 +210,8 @@ if $ARGS[0] = '2':
 					gs 'cum_call', 'anus', $boy[1], 1
 					gs 'cum_call', 'anus', $boy[2], 1
 					'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/garage/father/sex/firstguy.mp4"></video></center>'
-					'"Seriously, come already!" says <<$boydesc[2]>>, while watching his brother fucking you.'
-					'"Hang on, I''m soon going to cum inside her ass... ahh... yeah, thats it!"'
+					'"Seriously, come already!" says <<$boydesc[2]>>, watching his brother fucking you.'
+					'"Hang on, I''m soon going to cum inside her ass... ahh... yeah, that''s it!"'
 					'<<ucase(mid($boydesc[1],1,1))>><<mid($boydesc[1],2,len($boydesc[1])-1)>> pulls out of your gaping anus, causing the pumped-in sperm to start to flow out, but it doesn''t have much time.'
 					'<center><video autoplay loop src="images/locations/pavlovsk/resident/apartment/garage/father/sex/secondguy.mp4"></video></center>'
 					'<<ucase(mid($boydesc[2],1,1))>><<mid($boydesc[2],2,len($boydesc[2])-1)>> immediately jumps to the newly available hole, and stuff his prick inside.'
@@ -230,8 +230,8 @@ if $ARGS[0] = '2':
 					gs 'cum_call', 'anus', $boy[1], 1
 					npc_rel['A28'] += 2
 					gs 'stat'
-					'Finally they both force their cocks in your ass at the same time, and pushes up inside of you. The gravity helps them force you down on them to the hilt, but you still feel extremely full with their dicks.'
-					'For a few minutes your anus feels really tight while you just moan and hang on, while they piston inside of your ass, but in the end they both cum inside of you at the same time.'
+					'Finally, they both force their cocks in your ass simultaneously and push up inside of you. The gravity helps them move you down on them to the hilt, but you still feel incredibly complete with their dicks.'
+					'For a few minutes, your anus feels tight while you moan and hang on while they piston inside of your ass, but in the end, they both cum inside you simultaneously.'
 					gs 'arousal', 'end'
 					gs 'stat'
 				end

+ 13 - 13
locations/mother_sextalk.qsrc

@@ -469,7 +469,7 @@ if $ARGS[0] = 'dildo_wakeup1':
 		vanrPar_suction_dildo = 0
 		motherQW['bathroom_dildos'] = 0
 		motherKnowDildo = 1
-		act'Continue':gt 'bed2', 'wake'
+		act'Continue':gt 'sleep', 'wake'
 	end
 end
 
@@ -500,7 +500,7 @@ if $ARGS[0] = 'dildo_wakeup2':
 			'She walks out of your bedroom and shuts the door.'
 			*nl
 			'<i>Well, so much for that...</i>'
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		end
 	else
 		vanrPar_bathtub_dildo = 0
@@ -515,7 +515,7 @@ if $ARGS[0] = 'dildo_wakeup2':
 			'"No..." you say dejectedly.'
 			'"Honestly," she huffs, shaking her head in disappointment. "I expected more of you <<$pcs_firstname>>."'
 			'She walks out of your bedroom and shuts the door.'
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		end
 		
 		act'Well I need some kind of outlet!':
@@ -536,7 +536,7 @@ if $ARGS[0] = 'dildo_wakeup2':
 			'She walks out of your bedroom and shuts the door.'
 			*nl
 			'<i>Ugh. Great.</i> you think, throwing your head back against your pillow. <i>Now I need a new one. But maybe at least this gets <<$npc_nickname[''A29'']>> off my back...</i>'
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		end		
 	end
 end
@@ -558,7 +558,7 @@ if $ARGS[0] = 'dildo_wakeup3':
 		'"Again, <<$pcs_firstname>>?" Looking up, you see your mother sighing in the doorway to your bedroom with a hand on her forehead. "God, I hope you washed everything before I touched those. I''m not going to throw them away this time because I know you''re just going to buy more. But please <<$pcs_nickname>>. Think of your brother and father. Stop leaving these lying around like that."'
 	end
 	'She walks out of your bedroom and shuts the door.'
-	act'Continue':gt 'bed2', 'wake'
+	act'Continue':gt 'sleep', 'wake'
 end
 
 !! branching path if a SINGLE dildo was left in the bathroom
@@ -586,7 +586,7 @@ if $ARGS[0] = 'bathroom_dildo_response_single':
 				'<i>Great. Now I have to do that too. I didn''t even get to use it...</i>'
 			end
 			if motherQW['dildo_wakeup'] = 1:
-				act'Continue':gt 'bed2', 'wake'
+				act'Continue':gt 'sleep', 'wake'
 			else
 				act'Continue':gt $loc, $loc_arg
 			end
@@ -624,7 +624,7 @@ if $ARGS[0] = 'bathroom_dildo_response_single':
 			'<i>Great. Now I''m going to get in even bigger trouble. <b>And</b> I lost my dildo...</i>'
 		end
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end
@@ -653,7 +653,7 @@ if $ARGS[0] = 'bathroom_dildo_response_single':
 			'<i>Great. Now I have to do that too. I didn''t even get to use it...</i>'
 		end
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end
@@ -685,7 +685,7 @@ if $ARGS[0] = 'bathroom_dildo_response_single':
 		*nl
 		'<i>Ugh. Great. Now I need a new one.</i>'
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end
@@ -718,7 +718,7 @@ if $ARGS[0] = 'bathroom_dildo_response_multiple':
 				'<i>Great. Now I have to do that too. I didn''t even get to use it...</i>'
 			end
 			if motherQW['dildo_wakeup'] = 1:
-				act'Continue':gt 'bed2', 'wake'
+				act'Continue':gt 'sleep', 'wake'
 			else
 				act'Continue':gt $loc, $loc_arg
 			end
@@ -756,7 +756,7 @@ if $ARGS[0] = 'bathroom_dildo_response_multiple':
 			'<i>Great. Now I''m going to get in even bigger trouble. <b>And</b> I lost my dildo...</i>'
 		end
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end
@@ -786,7 +786,7 @@ if $ARGS[0] = 'bathroom_dildo_response_multiple':
 			'<i>Great. Now I have to do that too. I didn''t even get to use it...</i>'
 		end
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end
@@ -819,7 +819,7 @@ if $ARGS[0] = 'bathroom_dildo_response_multiple':
 		motherKnowDildo = 1
 		
 		if motherQW['dildo_wakeup'] = 1:
-			act'Continue':gt 'bed2', 'wake'
+			act'Continue':gt 'sleep', 'wake'
 		else
 			act'Continue':gt $loc, $loc_arg
 		end

+ 147 - 146
locations/natbel_friend.qsrc

@@ -8,16 +8,16 @@ if $ARGS[0] = 'go_for_walk':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/walk1.jpg"></center>'
-	'You both head of as friends to hang out together whilst going on a walk around town. On the way Natasha says "I like walking around with you as I''m not into sports too much and I do like isn''t the exercise. It''ll help keep my figure if I stay in shape."' 
-	'You look at her and feel that a compliment is in order as she has a lovely figure "Well Natasha I think that you have a lovely figure! Umm... Maybe at some time you might like to go for a jog with me?"'
-	'Natasha is clearly unsure about your suggestion and you barely get a "Yeah maybe..." response. You think to yourself that at least she didn''t say no and it might be fun.'
+	'You both head off as friends to hang out together whilst going on a walk around town. On the way, Natasha says, "I like walking around with you as I''m not into sports too much, and I do like isn''t the exercise. It''ll help keep my figure if I stay in shape."' 
+	'You look at her and feel that a compliment is in order as she has a lovely figure. "Well, Natasha, I think that you have a lovely figure! Umm... Maybe you might like to go for a jog with me sometime?"'
+	'Natasha is unsure about your suggestion, and you barely get a "Yeah, maybe..." response. You think that at least she didn''t say no, and it might be fun.'
 
 	act 'Suggest going to the cafe':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/walk2.jpg"></center>'
-		'A while into your walk you have an idea and say "Natasha, my <<$npc_nickname[''A29'']>> works at Borislav''s cafe near the station so I can get free food and drinks there. Shall we go over and pop in for a drink?"'
-		'Natasha nods her agreement "Yes <<$pcs_nickname>>..." You give her a quizzical look and she restarts "Yes <<$pcs_nickname>> that would be very nice but only if you''re sure as we shouldn''t take advantage of their offer."'
-		'You agree and reply "Yes you''re right. It''s nice of Slava to have made the offer to me so how about we just have a milkshakes each?"' 
+		'A while into your walk, you have an idea and say, "Natasha, my <<$npc_nickname[''A29'']>> works at Borislav''s cafe near the station, so I can get free food and drinks there. So let''s go over and pop in for a drink.'
+		'Natasha nods her agreement. "Yes, <<$pcs_nickname>>..." You give her a quizzical look, and she restarts, "Yes, <<$pcs_nickname>>, that would be very nice, but only if you''re sure, as we shouldn''t take advantage of their offer."'
+		'You agree and reply, "Yes, you''re right. It''s nice of Slava to have made the offer to me, so how about we just have a milkshake each?"' 
 		'Natasha smiles and nods enthusiastically. "Now that''s a great idea!"' 
 
 		act 'Go to the cafe':
@@ -39,7 +39,7 @@ if $ARGS[0] = 'go_for_walk':
 			gs 'stat'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/cafe1.jpg"></center>'
-			'You both head off to the cafe. Once you arrive you tell Natasha to have a seat while you go and get a couple of shakes. You thank Slava for them and take them back to the table with Natasha. You both sit and enjoy the shakes, chilling out having a nice chat about whatever comes to mind including Natasha''s interest in the latest fashion. "So Natasha I hear that you are interested in fashion, maybe we can have a look at some clothes together in a store or just flick through a magazine or two." Natasha smiles and you spend some time where she tells you about some of the latest fashions. Nearly a hour later you decide to...'
+			'You both head off to the cafe. Once you arrive, you tell Natasha to have a seat while you go and get a couple of shakes. You thank Slava for them and take them back to the table with Natasha. You both sit and enjoy the shakes, chilling out and having a friendly chat about whatever comes to mind, including Natasha''s interest in the latest fashion. "So Natasha, I hear that you are interested in fashion. Maybe we can look at some clothes together in a store or just flick through a magazine or two." Natasha smiles, and you spend some time where she tells you about some of the latest fashions. Nearly an hour later, you decide to...'
 
 			act 'Return to her room': gt 'natbelapt', 'natroom'
 		end
@@ -51,30 +51,30 @@ if $ARGS[0] = 'go_for_walk':
 		gs 'stat'
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/walk2.jpg"></center>'
-		'You both hang out as good friends whilst you have nice walk around town laughing and joking with each other and chatting about all sorts; just two girls enjoying each others company as best friends should. During your walk Natasha says "I''m really enjoying this just spending time with you and that the walk will be good for my figure."' 
-		'You look at her and say "I can''t see any problems there you have a lovely figure Natasha."'
-		'She tells you "Well I don''t get a chance to do much walking or exercise in general as I have to help at home a lot and doesn''t give me much time to myself which gets me down at times."'
+		'You both hang out as good friends whilst you have a nice walk around town, laughing and joking with each other and chatting about all sorts; just two girls enjoying each other''s company as best friends should. During your walk, Natasha says, "I''m really enjoying this just spending time with you and that the walk will be good for my figure."' 
+		'You look at her and say, "I can''t see any problems. You have a lovely figure, Natasha."'
+		'She tells you, "Well, I don''t get a chance to do much walking or exercise in general as I have to help at home a lot, and it doesn''t give me much time to myself, which sometimes gets me down."'
 
 		act 'Keep walking and talking':
 			minut += 10
 			gs 'stat'
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/walk3.jpg"></center>'
-			'As the two of you keep walking, you respond with "Well how about we go out and about a bit more often in the future?"'
-			'Natasha responds with a smile "Yes I''d love that."'
-			'After a while, Natasha looks a little sad and confides in you "You know Svetka I don''t have many friends who want to spend time with me other than some of the other nerds and all they want to do is play games and study."' 
-			'You think about what she''s just said and respond kindly "Well you''re a very clever young lady and you should be proud of your ability."' 
-			'She smiles at you but says "Yes but I feel that there must be more to life than studying." She continues "I''m also not much into games like the role play stuff the rest do".' 
+			'As the two of you keep walking, you respond with, "Well, how about we go out and about a bit more often in the future?"'
+			'Natasha smiles, "Yes, I''d love that."'
+			'After a while, Natasha looks a little sad. Then, finally, she confides in you, "You know, <<$pcs_nickname>>, I don''t have many friends who want to spend time with me other than some of the other nerds, and all they want to do is play games and study."' 
+			'You think about what she''s just said and respond kindly, "Well, you''re a very clever young lady, and you should be proud of your ability."' 
+			'She smiles at you but says, "Yes, but I feel that there must be more to life than studying." She continues, "I''m also not much into games like the role-playing stuff the rest do."' 
 
 			act 'Finish your walk':
 				minut += 10
 				gs 'stat'
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/walk4.jpg"></center>'
-				'You shoulder bump her as the two sit for a moment whilst still talking. "Well I don''t mind games but not all the time there''s much more to explore, you''re right! Although I''ve often thought of taking up chess to exercise the mind".' 
-				'Getting up you then continue your walk and chat and you then ask her about what interests her, "So Natasha, what does interest you, I''ve heard some chat that you like fashion."'
-				'She smiles and excitedly tells you "Yes I love fashion!" She then pauses and suddenly the smile vanishes and she looks sad as she continues "It''s just frustrating that as I can''t afford anything and have to rely on hand downs".' 
-				'This clearly upsets her so you give her a hug and smile saying "Well Natasha you mustn''t give up! Things can get better, you might just need to give it time." Forty five minutes later you are back in her apartment, hanging out in her room once more.'
+				'You bump shoulders with her as the two sit for a moment whilst still talking. "Well, I don''t mind games, but not all the time. There''s much more to explore, you''re right! Although I''ve often thought of taking up chess to exercise the mind".' 
+				'Getting up, you then continue your walk and chat, asking her what interests her, "So Natasha, what does interest you? I''ve heard some chat that you like fashion."'
+				'She smiles and excitedly tells you, "Yes, I love fashion!" She then pauses, and suddenly the smile vanishes. She looks sad as she continues, "It''s just frustrating that I can''t afford anything and have to rely on hand downs".' 
+				'This clearly upsets her, so you give her a hug and smile, saying, "Well, Natasha, you mustn''t give up! Things can get better. You might just need to give it time." Forty-five minutes later, you are back in her apartment, hanging out in her room again.'
 
 				act 'Return to her room': gt 'natbelapt', 'natroom'
 			end
@@ -88,24 +88,24 @@ if $ARGS[0] = 'go_to_park':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/park1.jpg"></center>'
-	'You both head to the park and walk around enjoying nature and each other''s company while you chat about whatever comes to mind taking into account the wonders of nature around you. She spots a shy squirrel at the base of the tree and as you carefully approach it takes fright and rapidly climbs the tree and disappears from sight prompting you both to giggle as clearly your stealth approach didn''t work too well.'
-	'You decide to spend some quality time together chatting so you ask Natasha about her interests "So Natasha I believe that you are interested in fashion and makeup?"'
-	'Natasha gives you a wry smile "Well yes I love fashion and would love to get some new clothes as I know that I''m not viewed too kindly by some of our classmates, however, regrettably we simply don''t have much money and I have to help my mum out as she works hard but the pay is poor and we struggle."' 
-	'You know a lot of your fellow students can be assholes, especially to nerds and outcasts, but you also know some of them are not, despite what Natasha might think.'
+	'You both head to the park and walk around, enjoying nature and each other''s company. At the same time, you chat about whatever comes to mind considering the wonders of nature around you. Then, she spots a shy squirrel at the base of the tree. As you carefully approach, it takes fright and rapidly climbs the tree and disappears from sight, prompting you both to giggle as your stealth approach didn''t work too well.'
+	'You decide to spend quality time chatting, so you ask Natasha about her interests. "So Natasha, I believe you are interested in fashion and makeup?"'
+	'Natasha gives you a wry smile. "Well, yes, I love fashion and would love to get some new clothes as I know that I''m not viewed too kindly by some of our classmates, however, regrettably, we simply don''t have much money, and I have to help my mum out as she works hard, but the pay is poor, and we struggle."' 
+	'You know many fellow students can be assholes, especially nerds and outcasts. Still, you also know some of them are not, despite what Natasha might think.'
 
 	act 'Disagree':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/park2.jpg"></center>'
-		'You give her a friendly smile and let her know "Well not all your classmates feel that way, and I don''t just mean the nerds, maybe we can do some stuff together and who knows... Maybe we''ll have to work on your image?" You continue "So how come you''re in the nerd group? You''re clever but you''re not a ''typical'' nerd... I can''t think of any of them other than Julia who''d like fashion and even she doesn''t seem to use makeup much and you''re not into the games they play and don''t want to spend all your free time studying... That doesn''t sound like a nerd to me!"'
+		'You give her a friendly smile and tell her, "Well, not all your classmates feel that way, and I don''t just mean the nerds. Maybe we can do some stuff together, and who knows... Maybe we''ll have to work on your image?" You continue, "So how come you''re in the nerd group? You''re clever, but you''re not a ''typical'' nerd... I can''t think of any of them other than Julia who''d like fashion, and even she doesn''t seem to use makeup much. You''re not into the games they play and don''t want to spend all your free time studying... That doesn''t sound like a nerd to me!"'
 
 		act 'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/park3.jpg"></center>'
-			'"No, you''re right Sveta, I''m not! I guess that because I''m poor and don''t have the nice new clothes I wouldn''t be considered by the popular kids as my image won''t fit and pretty much the same with the jocks as I also don''t have much time for sports so I don''t even know if I''d like it."' 
-			'You look at her and ponder what she''s just said as she continues "I love walking around with you and chatting as I don''t get much of an opportunity to do this and her fellow nerds just aren''t into this kind of stuff."' 
+			'"No, you''re right, <<$pcs_nickname>>, I''m not! Because I''m poor and don''t have nice new clothes, I wouldn''t be considered by the popular kids as my image won''t fit. Pretty much the same with the jocks, as I also don''t have much time for sports, so I don''t even know if I''d like it."' 
+			'You look at her and ponder what she''s just said as she continues, "I love walking around with you and chatting as I don''t get much of an opportunity to do this and my fellow nerds just aren''t into this kind of stuff."' 
 			*nl
-			'As she pauses and looks at you, you give her a friendly hug and finally get a chance to respond "OK well first off we can do more walks and so on after school if you''d like and if you''re free. Also if you want to go for a jog or do some yoga I''d be happy if you''d like to join me. As regards the popular kids and the jocks who knows what the future holds, just don''t give up on your dreams. They''re important!"' 
-			'Natasha smiles and looks at you contentedly. forty five minutes later you are back in her apartment, hanging out in her room once more.'
+			'As she pauses and looks at you, you give her a friendly hug and finally get a chance to respond, "Okay, well, first off, we can do more walks after school if you''d like and if you''re free. Also, if you want to go for a jog or do some yoga, I''d be happy if you''d like to join me. Who knows what the future holds for the popular kids and the jocks? Just don''t give up on your dreams. They''re important!"' 
+			'Natasha smiles and looks at you contentedly. Forty-five minutes later, you are back in her apartment, hanging out in her room again.'
 
 			act 'Return to her room': gt 'natbelapt', 'natroom'
 		end
@@ -114,18 +114,18 @@ if $ARGS[0] = 'go_to_park':
 	act 'Agree':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/park4.jpg"></center>'
-		'You smile at her and agree "Yeah well I can''t disagree with you there, most are assholes! They can be cruel at times which I know isn''t what you need if you''re feeling down in the first place!"'
-		'Natasha is a little surprised at your response and looks at you "You know what Sveta? I know this may sound horrible and it''s not meant that way but it''s comforting in a way to know that I''m not the only one!"'
-		'You ponder that you both feel in pretty much the same place and slowly respond "Look Natasha clearly I don''t feel that way about you; maybe we can help each other get into a better place..." You continue ""So how come you''re in the nerd group? You''re clever but you''re not a ''typical'' nerd... I can''t think of any of them other than Julia who''d like fashion and even she doesn''t seem to use makeup much and you''re not into the games they play and don''t want to spend all your free time studying... That doesn''t sound like a nerd to me!"'
+		'You smile at her and agree, "Yeah, I can''t disagree with you there. Most are assholes! They can be cruel at times which I know isn''t what you need if you''re feeling down in the first place!"'
+		'Natasha is a little surprised at your response and looks at you. "You know what, <<$pcs_nickname>>? I know this may sound horrible, and it''s not meant that way, but it''s comforting to know I''m not the only one!"'
+		'You ponder that you both feel in the same place and slowly respond, "Look, Natasha, clearly I don''t feel that way about you; maybe we can help each other get into a better place..." You continue ""So how come you''re in the nerd group? You''re clever, but you''re not a "typical" nerd... I can''t think of any of them other than Julia who''d like fashion, and even she doesn''t seem to use makeup much. You''re not into the games they play and don''t want to spend all your free time studying... That doesn''t sound like a nerd to me!"'
 
 		act 'Continue':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/park3.jpg"></center>'
-			'"No, you''re right Sveta, I''m not! I guess that because I''m poor and don''t have the nice new clothes I wouldn''t be considered by the popular kids as my image won''t fit and pretty much the same with the jocks as I also don''t have much time for sports so I don''t even know if I''d like it."' 
-			'You look at her and ponder what she''s just said as she continues "I love walking around with you and chatting as I don''t get much of an opportunity to do this and her fellow nerds just aren''t into this kind of stuff."' 
+			'"No, you''re right, <<$pcs_nickname>>, I''m not! I guess that because I''m poor and don''t have nice new clothes I wouldn''t be considered by the popular kids as my image won''t fit. Pretty much the same with the jocks, as I also don''t have much time for sports, so I don''t even know if I''d like it."' 
+			'You look at her and ponder what she''s just said as she continues, "I love walking around with you and chatting as I don''t get much of an opportunity to do this, and my fellow nerds just aren''t into this kind of stuff."' 
 			*nl
-			'As she pauses and looks at you, you give her a friendly hug and finally get a chance to respond "OK well first off we can do more walks and so on after school if you''d like and if you''re free. Also if you want to go for a jog or do some yoga I''d be happy if you''d like to join me. As regards the popular kids and the jocks who knows what the future holds, just don''t give up on your dreams. They''re important!"' 
-			'Natasha smiles and looks at you contentedly. forty five minutes later you are back in her apartment, hanging out in her room once more.'
+			'As she pauses and looks at you, you give her a friendly hug and finally get a chance to respond, "Okay, well, first off, we can do more walks and so on after school if you''d like and if you''re free. Also, if you want to go for a jog or do some yoga, I''d be happy if you''d like to join me. Who knows what the future holds for the popular kids and the jocks? Just don''t give up on your dreams. They''re important!"' 
+			'Natasha smiles and looks at you contentedly. Forty-five minutes later, you are back in her apartment, hanging out in her room again.'
 
 			act 'Return to her room': gt 'natbelapt', 'natroom'
 		end
@@ -151,34 +151,35 @@ if $ARGS[0] = 'go_to_del_greco':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/delparco1.jpg"></center>'
-	'You both head to the park and walk around enjoying the open space and the greenery which is in marked contrast to your estate whilst making the most of each other''s company as friends. After a while you suggest that you both pop into Del Parco for a drink and you get a couple of Kvass. You pay 240<b>₽</b> for both yours and Natasha''s. It''s a really nice restaurant and you both love it there.' 
-	'Natasha expresses her gratitude to you. "Thanks for this Svetka, you really didn''t have to."' 
+	'You both head to the park and walk around. Enjoying the open space and the greenery, which is in marked contrast to your estate, whilst making the most of each other''s company as friends. After a while, you suggest you go to Del Parco for a drink and get a couple of Kvass. You pay 240<b>₽</b> for both yours and Natasha''s. It''s a charming restaurant, and you both love it there.' 
+	'Natasha expresses her gratitude to you. "Thanks for this, <<$pcs_nickname>>. You really didn''t have to."' 
 
 	act 'Be friendly':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/delparco2.jpg"></center>'
-		'You respond "I know; I just wanted to treat my friend. Maybe we can do more stuff like this in the future if you like?"'	
+		'You respond, "I know; I just wanted to treat my friend. Maybe we can do more like this in the future if you like?"'	
 		'Natasha smiles contentedly and shyly nods her agreement.' 
-		'While having your drink you say to Natasha "I can see that you haven''t got much in the way of modern fashionable clothes; maybe we can go shopping together at some point?"'
+		'While having your drink, you say to Natasha, "I can see that you haven''t got much in the way of modern fashionable clothes; maybe we can go shopping together at some point?"'
 		*nl
-		'Natasha looks sad and responds "There''s nothing I''d like more but I simply can''t afford it. Sometimes I kid myself but that''s when I''ve borrowed money and I need to stop doing that as it keeps getting on top of me." She takes a deep breath and continues, "It''s so frustrating as I love fashion and want to be a cool girl but if I''m honest it''s simply out of reach and it makes it pretty difficult to even have a friend let alone a boyfriend!'
-		'You sympathise and let her know that having a boyfriend isn''t the answer to everything as a boyfriend relationship comes with it''s own difficulties and challenges although with some benefits too. There is a brief silence as you both think inwardly reflect further on your own lives.'
-		'You nod and give her hand a friendly squeeze and smiling at her say "Well who knows what the future may hold." forty five minutes later you decide to...'
+		'Natasha looks sad and responds, "There''s nothing I''d like more, but I simply can''t afford it. Sometimes I kid myself, but that''s when I''ve borrowed money, and I need to stop doing that as it keeps getting on top of me." She takes a deep breath and continues, "It''s so frustrating as I love fashion and want to be a cool girl. But, if I''m honest, it''s simply out of reach, making it difficult to even have a friend, let alone a boyfriend!'
+		'You sympathise and tell her that having a boyfriend isn''t the answer to everything. A boyfriend relationship comes with difficulties and challenges, although with some benefits. There is a brief silence as you both think inwardly and reflect further on your own lives.'
+		'You nod, give her hand a friendly squeeze, and, smiling at her, say, "Well, who knows what the future may hold." Forty-five minutes later, you decide to...'
+		act 'Return to her room': gt 'natbelapt', 'natroom'
 	end
 	act 'Be flirty':
 		NatbelQW['romance'] += 1
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/Hands.jpg"></center>'
-		'You reach over and place your hand on hers and squeeze it gentle, leaving your hand holding hers. "I know; I just wanted to treat you, you mean a lot to me. Maybe we can do more stuff like this in the future if you like?"'
-		'Natasha smiles then after a moment, she looks around at the other people around, after which she gently pulls her hand away. You can tell it made her a little uncomfortable but she didn''t seem to mind it to much. "There''s nothing I''d like more but I simply can''t afford it. Sometimes I kid myself but that''s when I''ve borrowed money and I need to stop doing that as it keeps getting on top of me."'
+		'You reach over, place your hand on hers, and gently squeeze it, leaving your hand holding hers. "I know; I just wanted to treat you. You mean a lot to me. Maybe we can do more like this in the future if you like?"'
+		'Natasha smiles, then after a moment, she looks around at the other people, after which she gently pulls her hand away. You can tell it made her uncomfortable, but she didn''t seem to mind it too much. "There''s nothing I''d like more, but I simply can''t afford it. Sometimes I kid myself, but that''s when I''ve borrowed money, and I need to stop doing that as it keeps getting on top of me."'
 		*nl
-		'Natasha continues, "You know Sveta this has been great... A lovely walk with a real friend who speaks to me as a person rather than judging me." She lets out a big sigh, "Also some time when I can just switch off."'
-		'You are a little confused and look at her quizzically "Well I don''t judge but I like you, you are a good friend who is nice to me. That means a lot."'
-		'"You know Sveta it''s also nice that you made the choice to come here with me and took me out of the flat. Sometimes I have difficulty making even the smallest decision." Natasha smiles at you and squeezes your hand, "You know it''s nice that I can spend some time where I didn''t have to think or make decisions, just enjoy life."'
+		'Natasha continues, "You know, <<$pcs_nickname>>, this has been great... A lovely walk with a real friend who speaks to me as a person rather than judging me." She lets out a big sigh, "Also, sometime when I can just switch off."'
+		'You are a little confused and look at her quizzically. "Well, I don''t judge, but I like you. You are a good friend who is nice to me. That means a lot."'
+		'"You know, <<$pcs_nickname>>, it''s also nice that you chose to come here with me and took me out of the flat. Sometimes I have difficulty making even the smallest decision." Natasha smiles at you and squeezes your hand, "You know it''s nice that I can spend some time where I don''t have to think or make decisions and just enjoy life."'
 		*nl
-		'You look at her and understand that her life if pretty much a constant struggle and can sympathise as although your family are not well off they are in a better position than Natasha and her mum. "You know what Natasha you can have some down time with me, I like being with you and caring for you. I don''t mind making decisions... You probably don''t want to know some of the stuff I''ve had to do to get ahead."'
-		'Natasha looks at you and goes to respond then thinks better of it and just gives you a lovely smile and squeezes your hand again.'
-		'"OK Natasha it''s been lovely but I guess it''s time to head back."'
+		'You look at her and understand her life is a constant struggle and can sympathise. Although your family are not well off, they are in a better position than Natasha and her mum. "You know what, Natasha, you can have some downtime with me. I like being with you and caring for you. I don''t mind making decisions... You probably don''t want to know some of the stuff I''ve had to do to get ahead."'
+		'Natasha looks at you and goes to respond, then thinks better of it and just gives you a lovely smile and squeezes your hand again.'
+		'"Okay, Natasha, it''s been lovely, but I guess it''s time to head back."'
 
 		act 'Return to her room': gt 'natbelapt', 'natroom'
 	end
@@ -192,10 +193,10 @@ if $ARGS[0] = 'go_to_park_and_work':
 	gs 'stat'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/friends/flyers1.jpg"></center>'
-	'You both head of to the park having a friendly chat talking about school, current affairs and so on and spend an hour handing out flyers. Whilst you don''t get to spend too much time together as you are both busy with your job.'
-	'However, you do manage to have a brief chat about your interests and Natasha responds telling you "Well... mine is mainly fashion."' 
-	'When she sees you looking at her and not responding she continues "Although I''m in the nerds group I don''t really fit in with them and really don''t consider myself at home there. I think that there''s more to life than studying and the games they play in their games night so I don''t join them."' 
-	'You are not quite sure how to respond but do your best to reassure her giving her a friendly smile you say "Well look I''m your friend and let''s see where the journey takes us." After an hour you are both a bit richer richer and you can...'
+	'You both head off to the park, chat about school and current affairs, and spend an hour handing out flyers. But, unfortunately, you only get to spend a little time together as you are both busy with your job.'
+	'However, you have a brief chat about your interests, and Natasha responds, "Well... mine is mainly fashion."' 
+	'When she sees you looking at her and not responding, she continues, "Although I''m in the nerds'' clique, I don''t really fit in with them and don''t consider myself at home there. I think there''s more to life than studying and the games they play on their games night, so I don''t join them."' 
+	'You are unsure how to respond but do your best to reassure her. Giving her a friendly smile, you say, "Well, look, I''m your friend and let''s see where the journey takes us." After an hour, you are both a bit richer, and you can...'
 
 	act 'Return to her room': gt 'natbelapt', 'natroom'
 end
@@ -210,9 +211,9 @@ if $ARGS[0] = 'shopping_spree':
 
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha8.jpg"></center>'
 	'"So, Natasha," you start. "Have you decided on which hairstyle you''d like?"'
-	'"Well, I''m still a little undecided," she says. "Since you''re paying, I''d like to know what you think."'
-	'You sit by her and look through her choices. She''s circled a few and you both spend a few minutes deciding which one would look best for her.'
-	'"Thank you, <<$pcs_nickname>>. I''m sure it''ll look awesome. I just hope that you''ll be happy with the result too."'
+	'"Well, I''m still a little undecided," she says. "Since you''re paying, I''d like your thoughts."'
+	'You sit by her and look through her choices. She''s circled a few, and you spend a few minutes deciding which would look best for her.'
+	'"Thank you, <<$pcs_nickname>>. I''m sure it''ll look awesome. I hope that you''ll be happy with the result too."'
 	'You smile at her, "I''m sure I will be. So, are you ready for our trip?"'
 	'"Oh, yes!" she beams. "I''ve been so looking forward to this!"'
 	act 'Head out':
@@ -220,7 +221,7 @@ if $ARGS[0] = 'shopping_spree':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha9.jpg"></center>'
 		'You both stand up to leave.'
 		'"Oh, before I forget," she says.'
-		'You turn to her and notice her pulling out a small handful of bills from her purse. "I really wanted to contribute as much as I could, so I did some odd jobs handing out flyers. Now I can at least pay for our food while we''re out."'
+		'You turn to her and notice her pulling out a small handful of bills from her purse. "I wanted to contribute as much as possible, so I did some odd jobs handing out flyers. So now I can at least pay for our food while we''re out."'
 		'"Oh, that sounds great. Thanks!" you offer. "It''ll be a lovely end to our trip before we head home."'
 
 		act 'Go to the market':
@@ -230,7 +231,7 @@ if $ARGS[0] = 'shopping_spree':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/pav_market_day.jpg"></center>'
 			'Arriving at the market, you and Natasha browse the selection of clothes available. However, nothing stands out.'
 			'You lean over to Natasha. "Um, I don''t think that there''s much here today. What do you say we go ahead and get your hair done, then we''ll head over to G&M and see if there''s something nice there?"'
-			'Natasha looks at you sadly, "Well, I agree there''s nothing that I like here but G&M is way more expensive."'
+			'Natasha looks at you sadly, "Well, I agree there''s nothing that I like here, but G&M is way more expensive."'
 			'"You let me worry about that," you tell her. "Come on, let''s go."'
 			'She hesitates for a second, "But..."'
 			'You give her an amused look.'
@@ -242,16 +243,16 @@ if $ARGS[0] = 'shopping_spree':
 				money -= 700
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha10a.jpg"></center>'
-				'You grab Natasha''s hand and head towards the commercial district and into A Cut Above.'
-				'Once inside, Natasha talks with a stylist and picks out her desired new hairstyle. She takes a seat and the stylist begins working.'
+				'You grab Natasha''s hand, head towards the commercial district, and into A Cut Above.'
+				'Once inside, Natasha talks with a stylist and picks out her desired new hairstyle. She takes a seat, and the stylist begins working.'
 				'Nearly half an hour later, a smiling and clearly delighted Natasha has had her hair styled and cut. She calls you over to show you the result.'
 				
 				act 'Check out the new Natasha':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha10b.jpg"></center>'
-					'You approach Natasha, who is admiring herself in the mirror. "So, what do you think, <<$pcs_nickname>>?" she asks, doing a slow turn on her heels. "Do you like it?"'
-					'"Natasha, that really suits you," you say. "It looks even better than I thought it would from the pictures."'
-					'The two of you thank the stylist for his work and you pay him 700₽ and you say to him "Guess I know where to come when I need mine done."'
+					'You approach Natasha, who is admiring herself in the mirror. "So, what do you think, <<$pcs_nickname>>?" she asks, taking a slow heel turn. "Do you like it?"'
+					'"Natasha, that really suits you," you say. "It looks better than I thought it would from the pictures."'
+					'The two of you thank the stylist for his work, and you pay him 700<b></b>, and you say to him, "Guess I know where to come when I need mine done."'
 					'You turn back to Natasha, "Time to go find you a pretty dress!"'
 					!! Note to coder please replace the headshot of Natasha with image 10b going forward.
 		
@@ -262,20 +263,20 @@ if $ARGS[0] = 'shopping_spree':
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/Natasha11.jpg"></center>'
 						'The two of you make your way to G&M and start looking for clothes, with a focus on dresses.'
-						'You spend several minutes picking and choosing between various outfits until you have a small assortment of clothes that you can both agree on. Natasha steps into the dressing room to change, stepping out to show off each dress.'
-						'Natasha has difficulty choosing between three of the outfits and asks for you to make the final choice. You decide on a nice party dress. "Okay, <<$pcs_nickname>>," she says, smiling. "Then that''s the one. It''ll look much nicer than what I''ve currently got at home."'
-						'You take the 1300₽ dress and head to the register to pay for it while Natasha gets dressed.'
+						'You spend several minutes picking and choosing between various outfits until you have a small assortment of clothes that you can both agree on. Finally, Natasha steps into the dressing room to change, showing off each dress.'
+						'Natasha has difficulty choosing between three outfits and asks you to make the final choice. Finally, you decide on a lovely party dress. "Okay, <<$pcs_nickname>>," she says, smiling. "Then that''s the one. It''ll look much nicer than what I currently have at home."'
+						'You take the 1300<b></b> dress and head to the register to pay for it while Natasha gets dressed.'
 
 						act 'Wait for Natasha':
 							*clr & cla
 							minut += 35
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha12.jpg"></center>'
-							'Natasha meets you at the front of the store and takes you by the hand. "Come on, <<$pcs_nickname>>," she says. "Let''s go."'
-							'As she leads you away from the store, she continues, "This bit is a small thank you for such a wonderful present. I simply can''t keep expecting you to pay for me all the time and I want to contribute. I''m going to keep passing out flyers as well as a cleaning job, so long as the hours are flexible."'
+							'Natasha meets you at the front of the store and takes you by hand. "Come on, <<$pcs_nickname>>," she says. "Let''s go."'
+							'As she leads you from the store, she continues, "This bit is a small thank you for such a wonderful present. I simply can''t keep expecting you to always pay for me. I want to contribute. So I''ll keep passing out flyers and a cleaning job, so long as the hours are flexible."'
 							'"I appreciate the gesture, Natasha. Maybe we''ll be able to do this again soon?" you suggest. "Just make sure that your jobs don''t get in the way of your schoolwork."'
 							'"Yes, Mum," she replies sarcastically.'
-							'You giggle and reply "Yep, well it''s self interest too. I need help with my homework!"'
+							'You giggle and reply, "Yep, it''s self-interest too. I need help with my homework!"'
 							'The two of you laugh between yourselves as you make your way to the park.'
 
 							act 'Natasha takes you to Del Parco':
@@ -293,22 +294,22 @@ if $ARGS[0] = 'shopping_spree':
 								gs 'stat'
 
 								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha13.jpg"></center>'
-								'You enter the cafe, still hand in hand. You find a table and Natasha orders the two of you a coffee and a Reuben sandwich to split.'
+								'You enter the cafe, still hand in hand. You find a table, and Natasha orders the two of you a coffee and a Reuben sandwich to split.'
 								'While waiting on your food, you talk to Natasha about your day.'
 								'"Well, Natasha," you start, "today was pretty fun, I think. Did you enjoy it?"'
-								'She reaches across the table and squeezes your hand, "I really have, <<$pcs_nickname>>. My life was in a complete mess until you came along. You''ve given me hope and so much happiness in the short time we''ve been together."'
-								'You enjoy your meal, sharing some inconsequential small talk between bites. When you''re finished, Natasha gets up to pay for the meal and you two leave the cafe together.'
+								'She reaches across the table and squeezes your hand, "I really have, <<$pcs_nickname>>. My life was a complete mess until you came along. You''ve given me hope and happiness in our short time together."'
+								'You enjoy your meal, sharing some inconsequential small talk between bites. When you''re finished, Natasha gets up to pay for the dinner, and you two leave the cafe together.'
 								*nl
 								act 'Walk through the park':
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha14.jpg"></center>'
 									'While walking back through the park, you notice Natasha looking downwards.'
 									'"Natasha, what''s wrong?" you ask. "I thought we were having fun together?"'
-									'She quickly looks back up at you, apologetically. "I was, but," she looks back down. "I''m just a bit sad that it''s ending. I can''t remember another time like this that I got so spoiled other than with my mum when she could afford it."'
-									'You pull her towards you and, holding her face gently, you reassure her. "Well, I enjoyed it too. Anyway, it''s not the end, we can still hang out together. Also, you never know, we might get to do something like this again in the future."'
-									'After a pause, you continue. "And I guess we need to think about how we want to develop our relationship. We''re both young and I don''t want to mess it up by wanting too much too soon."'
+									'She quickly looks back up at you apologetically. "I was, but," she looks back down. "I''m just a bit sad that it''s ending. I can''t remember another time like this that I got so spoiled other than with my mum when she could afford it."'
+									'You pull her towards you and hold her face gently. You reassure her. "Well, I enjoyed it too. Anyway, it''s not the end. We can still hang out together. Also, you never know. We might get to do something like this again in the future."'
+									'After a pause, you continue. "And I guess we need to think about how we want to develop our relationship. We''re both young, and I don''t want to mess it up by wanting too much too soon."'
 									'Natasha looks at you and smiles, "Yes, <<$pcs_nickname>>, I know."'
-									'You return to the Five Eight Estate and drop off Natasha at her apartment.'
+									'You return to Five Eight Estate and drop off Natasha at her apartment.'
 									act 'Return to Five Eight': gt 'pav_complex', 'start'
 								end
 							end
@@ -328,20 +329,20 @@ if $ARGS[0] = 'love_jct':
 	disco_invite = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha15.jpg"></center>'
-	'You smile at Natasha, "Okay, first off, I really like you and really enjoyed our shopping trip. Hopefully you did too?"'
-	'"Oh yes, <<$pcs_nickname>>," she smiles back. "It was lovely to spend that time with you; let alone get so spoiled."'
-	'You nod. "I guess we need to have a chat about where we go from here." You take a quick breath. "The thing is Natasha, from what I''ve heard, you''re attracted to guys so I don''t know how a romantic relationship with me would sit with you."'
-	'Natasha looks a little apprehensive. "Well, it''s true that I''ve been attracted to guys but honestly I just feel let down by them. I''ve never enjoyed a date with a guy as much as I did our time together." She stares down at the floor. "I guess you''ve heard the nasty rumours going around school about me sucking guys off when I couldn''t pay them back on time," she pauses and holds her hand up, indicating she wants to continue.'
+	'You smile at Natasha, "Okay, first off, I really like you and enjoyed our shopping trip. Hopefully, you did too?"'
+	'"Oh yes, <<$pcs_nickname>>," she smiles back. "It was lovely to spend that time with you, let alone get so spoiled."'
+	'You nod. "I guess we need to chat about where we go from here." You take a quick breath. "The thing is, Natasha, from what I''ve heard, you''re attracted to guys, so I don''t know how a romantic relationship with me would sit with you."'
+	'Natasha looks a little apprehensive. "Well, I''ve indeed been attracted to guys, but honestly, I just feel let down by them. I''ve never enjoyed dating a guy as much as I did our time together." She stares down at the floor. "I guess you''ve heard the nasty rumours going around school about me sucking guys off when I couldn''t pay them back on time," she pauses and holds her hand up, indicating she wants to continue.'
 	*nl
-	'She sighs before continuing. "They aren''t true but I have been very stupid in the past." She lets out a deep sigh. "I hope you won''t think too poorly of me but I fell for Lazar''s charms and went on a couple of dates with him. At first, he was sweet and even talked about me becoming his girlfriend. I was such an idiot and let him make love to me."'
-	'By now she''s in tears and you move over to comfort her. "I think I can guess the rest. After that, he backed off and there was no more talk of being his girlfriend?"'
+	'She sighs before continuing. "They aren''t true, but I have been foolish in the past." She lets out a deep sigh. "I hope you won''t think too poorly of me, but I fell for Lazar''s charms and went on a couple of dates with him. At first, he was sweet and even talked about me becoming his girlfriend. But, I was such an idiot and let him make love to me."'
+	'By now, she''s in tears, and you move over to comfort her. "I think I can guess the rest. After that, he backed off, and there was no more talk of being his girlfriend?"'
 	'Natasha confirms your suspicion by nodding her head.'
 	'You gently rub at her back, "Look, it''s in the past and wasn''t your fault. You''re not the first girl to fall for a sleazy guy''s charms."'
 	*nl
-	'She takes a moment to recompose herself. "I tried going on dates with other guys, but one kept blowing me off and I caught another one cheating on me with another girl. I put off the idea of ever dating again. But," she looks at you, her eyes still glistening, "After the other day, with you, I think I''d like to give it another try."'
+	'She takes a moment to recompose herself. "I tried going on dates with other guys, but one kept blowing me off, and I caught another cheating with another girl. So I put off the idea of ever dating again. But," she looks at you, her eyes still glistening, "After the other day with you, I think I''d like to give it another try."'
 	'You try to lighten the mood a bit with a joke. "I don''t know, Natasha, you aren''t exactly a cheap date."'
-	'Her eyes light up and a big smile crosses her face. "<<$pcs_nickname>>, do you mean the shopping trip was our first date?"'
-	'The question catches you off guard; you''re not certain you meant ''date'' literally. Before you can think anymore about it, Natasha starts to bring her face closer to yours.'
+	'Her eyes light up, and a big smile crosses her face. "<<$pcs_nickname>> do you mean the shopping trip was our first date?"'
+	'The question catches you off guard; you''re not sure you meant "date" literally. Before you can think about it, Natasha starts to bring her face closer to yours.'
 
 	act 'Kiss her to confirm she''s your girlfriend':
 		*clr & cla
@@ -349,21 +350,21 @@ if $ARGS[0] = 'love_jct':
 		NatbelQW['FriendLover'] += 2
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha16.jpg"></center>'
-		'You push yourself forward and your lips meet with Natasha''s. There''s a sudden jolt coursing through you and it must be the same for her; you feel her tense for a brief moment before relaxing into your kiss.'
-		'Time seems to stand still for a bit until you both gently pull apart.'
-		'You both hesitantly pull back. You slowly open your eyes and see her doing the same.'
-		'You stare at one another for a few seconds. "Does that answer your question?" you ask, slyly.'
-		'Natasha sighs contentedly and smiles at you happy you sealed her being your girlfriend with the kiss.'
-		'"Well I guess the taking things slow didn''t last too long. However, I don''t want to ruin a good thing so I think, at least for now, we should take our time," you tell her.'
+		'You push yourself forward, and your lips meet with Natasha''s. There''s a sudden jolt coursing through you, and it must be the same for her; you feel her tense for a brief moment before relaxing into your kiss.'
+		'Time seems to stand still until you both gently pull apart.'
+		'You both hesitantly pull back. Then, you slowly open your eyes and see her doing the same.'
+		'You stare at one another for a few seconds. "Does that answer your question?" you ask slyly.'
+		'Natasha sighs contentedly and smiles at you, happy you sealed her being your girlfriend with the kiss.'
+		'"Well, taking things slowly lasted only a short time. However, I don''t want to ruin a good thing, so I think, at least for now, we should take our time," you tell her.'
 		*nl
 		'"Mmm, yeah," Natasha says, licking her lips. "We should take things slow." She smacks her lips...'
 		'Natasha leans in and starts kissing you again. You find it increasingly difficult to resist and start kissing her back.'
-		'"Umm very... slow..." Natasha says in a husky voice as you momentarily break to catch your breath before you resume your kissing and cuddling.'
-		'Time seems to stand still while you make out, but you eventually manage to pull yourself away.'
-		'"I do mean it though," you say, trying to catch your breath. "We need to think carefully about what we want and how we want our relationship to progress."'
+		'"Umm, very... slow..." Natasha says in a husky voice as you momentarily break to catch your breath before you resume kissing and cuddling.'
+		'Time seems to stand still while you make out, but you eventually pull yourself away.'
+		'"I do mean it, though," you say, trying to catch your breath. "We need to think carefully about what we want and how we want our relationship to progress."'
 		'"I know, <<$pcs_nickname>>," she replies.'
 		'You continue, "Well, Natasha, I think I''d better head off now before things get too steamy."'
-		'Natasha sighs contentedly and smiles at you and nods as you get up to leave.'
+		'Natasha sighs contentedly and smiles at you, and nods as you get up to leave.'
 		act 'Keep talking': gt 'natbel_chat', 'chat'
 		act 'Stop talking': gt 'natbelapt', 'natroom'
 	end
@@ -375,10 +376,10 @@ if $ARGS[0] = 'love_jct':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha17.jpg"></center>'
 		'Realizing things have seriously escalated, you pull yourself back. "Wait, Natasha. I''m sorry, this is a bit too fast for me."'
 		'Natasha stops herself, blinking in confusion.'
-		'"It''s not that I don''t like you," you offer. "You''re a great friend and I find myself wondering if we could be more. I''m just not sure what I want yet and don''t want to ruin what we''ve got."'
-		'You see disappointment spreading across her face. "I''m not saying ''no''," you say while reaching out for her hands. "I''m just saying let''s take things slowly. I wouldn''t want to do anything to jeopardize my friendship with you. I cherish that too much."'
-		'A small amount of relief starts to return to Natasha''s face. "Your friendship means the world to me too, <<$pcs_nickname>>. You''re right, I wouldn''t want to lose that either."'
-		'"Okay, well let''s just be sure and give ourselves a little time."'
+		'"It''s not that I don''t like you," you offer. "You''re a great friend, and I wonder if we could be more. I''m just unsure what I want yet and don''t want to ruin what we''ve got."'
+		'You see disappointment spreading across her face. "I''m not saying "no," you say while reaching out for her hands. Let''s take things slowly. I wouldn''t want to do anything to jeopardize my friendship with you. I cherish that too much."'
+		'A small amount of relief starts to return to Natasha''s face. "Your friendship means the world to me, too, <<$pcs_nickname>>. You''re right. I wouldn''t want to lose that either."'
+		'"Okay, let''s just be sure and give ourselves a little time."'
 		'Natasha still looks sad but nods at you in confirmation.'
 		act 'Keep talking': gt 'natbel_chat', 'chat'
 		act 'Stop talking': gt 'natbelapt', 'natroom'
@@ -393,32 +394,32 @@ if $ARGS[0] = 'disco_1':
 	disco_invite = 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha18.jpg"></center>'
-	'After some general chat you decide to ask Natasha to go to the disco with you next Saturday so you can see her in her new dress. "So Natasha, how about I pick you up next Saturday evening and we go to the disco together?"'
-	'Natasha breaks out into a huge grin, "Yes, I''d love that, <<$pcs_nickname>>! Thank you."'
-	'You continue, "Right, well I''m not sure what time I''ll be able to get here yet so..."'
-	'A smiling Natasha interrupts "Don''t worry about the time, <<$pcs_nickname>>. As you know, I don''t often get the chance to go anyway so I''ll tell my mum during the week so she won''t worry if I''m not home."'
-	'"Good! I''ll see you then and you WILL wear your new dress... Okay?!" you say with extra emphasis on the ''WILL'' leaving her in no doubt that there''s only one correct answer."'
-	'"Yes, I''d love to. I''m not sure I''d be brave enough to do so if I went on my own so I''m happy you''ll be with me."'
+	'After some general chat, you ask Natasha to go to the disco next Saturday so you can see her in her new dress. "So Natasha, how about I pick you up next Saturday evening, and we go to the disco together?"'
+	'Natasha breaks out with a huge grin, "Yes, I''d love that, <<$pcs_nickname>>! Thank you."'
+	'You continue, "Right, well, I''m not sure when I''ll be able to get here yet, so..."'
+	'A smiling Natasha interrupts, "Don''t worry about the time, <<$pcs_nickname>>. As you know, I don''t often get the chance to go anyway, so I''ll tell my mum during the week so she won''t worry if I''m not home."'
+	'"Good! I''ll see you then, and you <b>will</b> wear your new dress... Okay?!" you say, leaving her no doubt that there''s only one correct answer."'
+	'"Yes, I''d love to. However, I''m not sure I''d be brave enough if I went on my own, so I''m happy you''ll be with me."'
 	'You continue, "One thing though..."'
 	'Natasha looks at you quizzically.'
 	!! If Sveta is a Gopnik
 	if grupTipe = 4:
-		'I know that you have reasons to be scared of the Gopniks but I hope I''ve proven that I''m not going to bully you... Well, unless you break the rules!" you say with a small giggle.'
+		'I know you have reasons to be scared of the Gopnik, but I hope I''ve proven that I''m not going to bully you... Unless you break the rules!" you say with a slight giggle.'
 		'Natasha looks apprehensive as she has understood the implications of what you are saying.'
-		'You continue. "Okay, well enough of this nonsense with you disappearing into the crowd when I approach you. If you do that to me again, I won''t be happy and will need to think seriously about our relationship."'
-		'A very sad and worried Natasha looks at you and replies, "Yes, I know <<$pcs_nickname>>. That wasn''t one of my finest actions. I''m so sorry and yes of course I''ll dance with you. In fact it''ll be my pleasure to do so." She pauses for a second.'
-		'"I''m so happy you weren''t put off by my rudeness."'
-		'You smile reassuringly at her. "Look, I do understand and at least you weren''t as rude as some of the others. Don''t let it worry you; I''m looking forward to dancing with you in your new outfit."'
+		'You continue. "Okay, well enough of this nonsense with you disappearing into the crowd when I approach you. If you do that to me again, I won''t be happy and will need to rethink seriously about our relationship."'
+		'A very sad and worried Natasha looks at you and replies, "Yes, I know, <<$pcs_nickname>>. That wasn''t one of my finest actions. I''m so sorry, and yes, I''ll dance with you. In fact, it''ll be my pleasure to do so." She pauses for a second.'
+		'"I''m so happy you weren''t offended by my rudeness."'
+		'You smile reassuringly at her. "Look, I understand, and at least you weren''t as rude as some others. Don''t let it worry you; I''m looking forward to dancing with you in your new outfit."'
 	elseif grupTipe = 5:
-		'I know that I''m not exactly everyone''s favorite person but I hope I''ve proven that I''m a good friend," you tell her.'
+		'I know I''m not everyone''s favourite person, but I hope I''ve proven that I''m a good friend," you tell her.'
 		'Natasha looks apprehensive as she has understood the implications of what you are saying.'
-		'"Okay, well enough of this nonsense with you disappearing into the crowd when I approach you. If you do that to me again, I won''t be happy and will need to think seriously about our relationship."'
-		'A very sad and worried Natasha looks at you and replies. "Yes, I know <<$pcs_nickname>>. That wasn''t one of my finest actions. I''m so sorry and yes of course I''ll dance with you. In fact it''ll be my pleasure to do so." She pauses for a second.'
-		'"I''m so happy you weren''t put off by my rudeness."'
-		'You smile reassuringly at her. "Look, I do understand and at least you weren''t as rude as some of the others. Don''t let it worry you. I''m looking forward to dancing with you in your new outfit."'
+		'"Okay, well enough of this nonsense with you disappearing into the crowd when I approach you. If you do that to me again, I won''t be happy and will need to seriously rethink our relationship."'
+		'A very sad and worried Natasha looks at you and replies. "Yes, I know, <<$pcs_nickname>>. That wasn''t one of my finest actions. I''m so sorry, and yes, I''ll dance with you. In fact, it''ll be my pleasure to do so." She pauses for a second.'
+		'"I''m so happy you weren''t offended by my rudeness."'
+		'You smile reassuringly at her. "Look, I understand, and at least you weren''t as rude as some others. So don''t let it worry you. I''m looking forward to dancing with you in your new outfit."'
 	else
 	!! If svets is a cool kid, jock or nerd
-		'"When we get there your first dance is with me," you tell Natasha.'
+		'"When we get there, your first dance is with me," you tell Natasha.'
 		'"Okay, <<$pcs_nickname>>. It''ll be my pleasure."'
 	end		
 	act 'Keep talking': gt 'natbel_chat', 'chat'
@@ -433,7 +434,7 @@ if $ARGS[0] = 'disco_2':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha19.jpg"></center>'
 	'You see that Natasha is wearing her dress. "Yep, that was definitely the right choice, Natasha. It looks great on you."'
-	'Natasha smiles, "Thanks, and thank you for getting it for me. It''s so much nicer than any of my others. I''m almost ready to go, I just need a few minutes to put some makeup on."'
+	'Natasha smiles, "Thanks, and thank you for getting it for me. It''s so much nicer than any of my others. I''m almost ready to go. I just need a few minutes to put some makeup on."'
 	'She walks over to a mirror and starts applying her makeup.'
 	if  pcs_makeup <= 1:
 		'She eyes you from the reflection in the mirror, "Would you like me to put some makeup on you as well? You''ll look even lovelier."'
@@ -472,10 +473,10 @@ if $ARGS[0] = 'disco_2_cont':
 
 	!!On arrival Sveta dances with Natasha. Please use the scene in 'zNat dance', enclosed.
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/natasha_sveta_dance.jpg"></center>'
-	'After arriving at the disco, you have a couple of dances together then head over to a table and chat.'
+	'After arriving at the disco, you have a couple of dances together, then head over to a table and chat.'
 	'Katja and Mefodiy approach the two of you and comment on Natasha''s new look and dress, leaving her beaming with happiness.'
 	*nl
-	'A few hours later, Natasha turns to you. "<<$pcs_nickname>>, I''ve really enjoyed myself tonight but I really should get home soon so my mum doesn''t worry. Would you please walk me home?"'
+	'A few hours later, Natasha turns to you. "<<$pcs_nickname>>, I''ve really enjoyed myself tonight, but I should get home soon, so my mum doesn''t worry. Would you please walk me home?"'
 	'"Of course, Natasha. I''ve had a lovely time as well," you tell her. "It''s so nice to see that at least some of our classmates taking notice of your new look."'
 	'You take her by the hand and walk back to her apartment.'
 	*nl
@@ -486,14 +487,14 @@ if $ARGS[0] = 'disco_2_cont':
 		minut += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha20.jpg"></center>'
-		'Realizing that she wants to kiss you, you hesitate and gently kiss her on the forehead. "Thank you for tonight, I hope you enjoyed it as much as me. Maybe we can do this again soon?"'
-		'Natasha looks a little disappointed but smiles at you, "Yes, I know, <<$pcs_nickname>>. We need to take it slow and think about what we want from our relationship."'
+		'Realizing that she wants to kiss you, you hesitate and gently kiss her on the forehead. "Thank you for tonight. I hope you enjoyed it as much as me. Maybe we can do this again soon?"'
+		'Natasha looks slightly disappointed but smiles at you, "Yes, I know, <<$pcs_nickname>>. But, we need to take it slow and think about what we want from our relationship."'
 		'You nod and take a step back.'
-		'Natasha continues, "Well, the decision is yours and I''ll respect it. But I think by now you know that I''d like for us to be more than friends."'
-		'"I''d like that, too," you tell her. "We''re already best friends and I don''t want to spoil anything but rushing it."'
-		'After a brief pause and a nervous giggle you try to soften the blow and continue. "I''m not as clever as you so it takes me longer to process things and I really didn''t expect to feel like this so quickly."'
+		'Natasha continues, "Well, the decision is yours, and I''ll respect it. But I think by now you know that I''d like us to be more than friends."'
+		'"I''d like that, too," you tell her. "We''re already best friends, and I don''t want to spoil anything by rushing it."'
+		'After a brief pause and a nervous giggle, you try to soften the blow and continue. "I''m not as clever as you, so it takes me longer to process things, and I didn''t expect to feel like this so quickly."'
 		'Natasha smiles at you and nods. "Tonight was great. See you soon."'
-		'"Yes it was, see you soon."'
+		'"Yes, it was. See you soon."'
 		act 'Return to Five Eight': gt 'pav_complex', 'start'
 	end	
 	!!The Quest journal needs to be updated: Maybe you should have kissed Natasha.
@@ -505,19 +506,19 @@ if $ARGS[0] = 'disco_2_cont':
 		NatbelQW['FriendLover'] = 2
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha16.jpg"></center>'
-		'Natasha pulls you over to the couch still holding onto your hand.'
+		'Natasha pulls you over to the couch, still holding onto your hand.'
 		'You both sit down as she turns towards you, smiling, "I just want to say thank you, <<$pcs_nickname>>, for taking me to the disco tonight and again for my wonderful day out with you."'
-		'You''ve decided that you want Natasha as your girlfriend. Her face is not far from yours so you lean in to kiss her.'
-		'Pushing yourself forward your lips meet with Natasha''s. There''s a sudden jolt coursing through you and it must be the same for her as you feel her tense for a brief moment before relaxing into your kiss.'
+		'You''ve decided that you want Natasha as your girlfriend. Her face is not far from yours, so you lean in to kiss her.'
+		'Pushing yourself forward, your lips meet with Natasha''s. There''s a sudden jolt coursing through you, and it must be the same for her as you feel her tense for a brief moment before relaxing into your kiss.'
 		'You both hesitantly pull back. You slowly open your eyes and see her doing the same.'
 		'You stare at each other for a brief moment before speaking.'
-		'"Well, I''ve been thinking things over, Natasha. I don''t want to risk losing our friendship, but I''m ready to give dating a try. Let''s just take it one day at a time and try not to rush things, okay?"'
-		'"Mmm, yeah, well..." Natasha says, moistening her lips. She holds you gently but firmly and slowly brings her face close to yours. "We should..." Natasha leans forward and starts kissing you again. "Take... things..." She holds you close as she makes out with you. Finding it impossible to resist you start kissing her back. "Slow..."'
-		'Time seems to stand still while you make out, but you eventually manage to pull yourself away.'
-		'Licking her lips again Natasha looks lovingly at you. "Was that slow enough for you?"'
-		'You giggle still caressing her face, "That was..." You start leaning towards her again before catching yourself and pulling back. "Wow! Unexpected... Wonderful..." You pause momentarily.'
-		'Then you continue, "I do mean it though," you say, still trying to catch your breath and trying your best to look serious. "We need to think carefully about what we want and how we want our relationship to progress."'
-		'"I know, <<$pcs_nickname>>," she replies still licking her lips and savouring the taste of your kiss.'
+		'"Well, I''ve been thinking things over, Natasha. I don''t want to risk losing our friendship, but I''m ready to try dating. So let''s take it one day at a time and try not to rush things, okay?"'
+		'"Mmm, yeah, well..." Natasha says, moistening her lips. She holds you gently but firmly, bringing her face close to yours. "We should..." Natasha leans forward and starts kissing you again. "Take... things..." She holds you close as she makes out with you. Finding it impossible to resist, you start kissing her back. "Slow..."'
+		'Time seems to stand still while you make out, but you eventually pull yourself away.'
+		'Licking her lips again, Natasha looks lovingly at you. "Was that slow enough for you?"'
+		'You giggle, still caressing her face, "That was..." You start leaning towards her again before catching yourself and pulling back. "Wow! Unexpected... Wonderful..." You pause momentarily.'
+		'Then you continue, "I do mean it, though," you say, still trying to catch your breath and trying your best to look serious. "We need to think carefully about what we want and how we want our relationship to progress."'
+		'"I know, <<$pcs_nickname>>," she replies, still licking her lips and savouring the taste of your kiss.'
 		act 'Keep talking': gt 'natbel_chat', 'chat'
 		act 'Return to her room': gt 'natbelapt', 'natroom'
 	end
@@ -530,18 +531,18 @@ if $ARGS[0] = 'kissing_games':
 	NatbelQW['FriendLover'] = 2
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/events/bullied/natasha16.jpg"></center>'
-	'You both sit on the couch as she turns towards you, smiles and says "I just want to say thank you <<$pcs_nickname>> for taking me to the disco tonight and again for my wonderful day out with you."'
-	'You''ve decided that you want Natasha as your girlfriend. Her face is not far from yours so you lean in to kiss her.'
-	'Pushing yourself forward your lips meet with Natasha''s. There''s a sudden jolt coursing through you and it must be the same for her as you feel her tense for a brief moment before relaxing into your kiss.'
+	'You both sit on the couch as she turns towards you, smiles, and says, "I just want to say thank you, <<$pcs_nickname>>, for taking me to the disco tonight and again for my wonderful day out with you."'
+	'You''ve decided that you want Natasha as your girlfriend. Her face is not far from yours, so you lean in to kiss her.'
+	'Pushing yourself forward, your lips meet with Natasha''s. There''s a sudden jolt coursing through you, and it must be the same for her as you feel her tense for a brief moment before relaxing into your kiss.'
 	'You both hesitantly pull back. You slowly open your eyes and see her doing the same.'
 	'You stare at each other for a brief moment before speaking.'
-	'"Well, I''ve been thinking things over, Natasha. I don''t want to risk losing our friendship, but I''m ready to give dating a try. Let''s just take it one day at a time and try not to rush things, okay?"'
-	'"Mmm, yeah, well..." Natasha says, moistening her lips. She holds you gently but firmly and slowly brings her face close to yours. "We should..." Natasha leans forward and starts kissing you again. "take... things..." She holds you close as she makes out with you. Finding it impossible to resist you start kissing her back. "Slow..."'
-	'Time seems to stand still while you make out, but you eventually manage to pull yourself away.'
-	'Licking her lips Natasha looks lovingly at you. "Was that slow enough for you?"'
-	'You giggle still caressing her face, "That was..." You start leaning towards her again before catching yourself and pulling back. "Wow! Unexpected... Wonderful..." You pause momentarily.'
-	'Then you continue, "I do mean it though," you say, still trying to catch your breath and look serious. "We need to think carefully about what we want and how we want our relationship to progress."'
-	'"I know, <<$pcs_nickname>>," she replies still licking her lips and savouring the taste of your kiss.'
+	'"Well, I''ve been thinking things over, Natasha. I don''t want to risk losing our friendship, but I''m ready to try dating. Let''s just take it one day at a time and try not to rush things, okay?"'
+	'"Mmm, yeah, well..." Natasha says, moistening her lips. She holds you gently but firmly, bringing her face close to yours. "We should..." Natasha leans forward and starts kissing you again. "take... things..." She holds you close as she makes out with you. Finding it impossible to resist, you start kissing her back. "Slow..."'
+	'Time seems to stand still while you make out, but you eventually pull yourself away.'
+	'Licking her lips, Natasha looks lovingly at you. "Was that slow enough for you?"'
+	'You giggle, still caressing her face, "That was..." You start leaning towards her again before catching yourself and pulling back. "Wow! Unexpected... Wonderful..." You pause momentarily.'
+	'Then you continue, "I do mean it, though," you say, still trying to catch your breath and look serious. "We need to think carefully about what we want and how we want our relationship to progress."'
+	'"I know, <<$pcs_nickname>>," she replies, still licking her lips and savouring the taste of your kiss.'
 	act 'Keep talking': gt 'natbel_chat', 'chat'
 	act 'Return to her room': gt 'natbelapt', 'natroom'
 end

+ 121 - 82
locations/nichApartment.qsrc

@@ -202,9 +202,10 @@ if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
 		act 'Debug Menu':
 			gt 'nichUtil', 'debug'
 		end
-	end
-		
-elseif $ARGS[0] = 'jobInterview':
+	end	
+end
+
+if $ARGS[0] = 'jobInterview':
 	*clr & cla
 	$location_type = 'event'
 	menu_off = 1
@@ -228,7 +229,7 @@ elseif $ARGS[0] = 'jobInterview':
 			'<center><img <<$set_imgh>> src="images/characters/city/tanya/01.jpg"></center>'
 			'Finally the elevator stops and its doors open.'
 			
-			if nichTanyaKnown = 0:
+			if nichTanya['Known'] = 0:
 				'In front of you stands a cute girl smiling at you.'
 				'"Hello. My name is Tanya. You are here for the maid-job I guess? Just follow me to the living room. My parents are waiting for you."'
 			else
@@ -239,7 +240,9 @@ elseif $ARGS[0] = 'jobInterview':
 			act 'Follow her': gt 'nichApartment', 'hiring'
 		end
 	end
-elseif $ARGS[0] = 'hiring':
+end
+
+if $ARGS[0] = 'hiring':
 	$location_type = 'event'
 	menu_off = 1
 	
@@ -414,70 +417,102 @@ elseif $ARGS[0] = 'hiring':
 		
 		act 'Leave now before you can do anymore damage':gt 'city_center'
 	end
-	
-elseif $ARGS[0] = 'visitTanya':
+end
+
+if $ARGS[0] = 'visitTanya':
 	!! Visiting Tanya is only possible if PC is not employed by Nicholas. If she is she can find Tanya by going to her room.
-	
 	$location_type = 'event'
 	menu_off = 1
 	
 	if nichWork = 1:
-		if npc_rel['A218'] < 30: npc_rel['A218'] += rand(1,2)
-		*clr & cla
-		!! PC agreed to meet the parents for the job interview. Tanya expects her to be unemployed and dressed as a maid.
-		if nichTanyaFuckLast = daystart:
-			!! Tanya and PC just had sex because PC cant go to the job interview yet
-			'Now that the immediate lust is sated and you''re both enjoying your postcoital bliss, you rest naked in each other''s arms.'
-			if $clothingworntype = 'gm_maid':
-				'"<<$pcs_nickname>>, I really enjoy this. But I kind of promised to my parents that you will apply for the maid job. I really need you to quit your current job."'
-				'You promise her to do it as soon as possible before putting your uniform back on.'
-			else
-				'"<<$pcs_nickname>>, I really enjoy this. But I kind of promised to my parents that you will apply for the maid job. I really need you to wear a maid uniform the next time you come over."'
-				'You promise her to do so before putting your clothes back on.'
-			end
-			act 'Leave the apartment':gt 'city_center'
-		elseif (work = 0 or cheatWork = 0) and $clothingworntype = 'gm_maid':
-			'When Tanya opens the door she takes a few seconds to admire your look. "Wow, <<$pcs_nickname>>, this uniform really suits you. How does it feel?"'
-			act 'Great':
-				cla
-				'"Good, I guess. I think I could really get used to wearing it."'
-				'Tanya smiles brightly. That''s great, because you will need to wear it a lot.'
-				'"Come on now. My parents are waiting in the living room."'
-				act 'Follow her': minut += 3 & gt 'nichApartment', 'hiring'
-			end
-			act 'Embarrassing':
-				cla
-				'"I don''t know. It felt a little bit embarrassing walking through the streets dressed like this."'
-				'Tanya smiles comfortingly. "Don''t worry. You will get used to it."'
-				'"Come on now. My parents are waiting in the living room."'
-				act 'Follow her': minut += 3 & gt 'nichApartment', 'hiring'
-			end
-		elseif $clothingworntype = 'gm_maid':
-			'When Tanya opens the door she takes a few seconds to admire your look. "Wow, <<$pcs_nickname>>, this uniform really suits you. Are you ready to have your interview with my parents?"'
-			'"Not yet. I still have to quit my current job."'
-			'Tanya looks a little bit disappointed but then she smirks at you. "Oh, I understand. You are wearing this outfit for me and not for my parents."'
-			'Not giving you a chance to say a word, she leads you to her room and pushes you on her bed.'
+		gt 'nichApartment', 'agreed_to_job'
+	elseif nichTanya['FuckCounter'] > rand(3,5) and nichJobRefused < 1 and nichWork = 0 and FUNC('body_din','pregnancyVisibility',0,'nude') = 0:
+		!! Tanya will only offer the job while she believes that Sveta is not pregnant. Note that it is assumed that Tanya knows how Sveta looks naked and bases her decision on that!
+		gt 'nichApartment', 'job_offer'
+	else
+		gt 'nichApartment', 'casual_visit'
+	end
+end
+
+if $ARGS[0] = 'agreed_to_job':
+	if npc_rel['A218'] < 30: npc_rel['A218'] += rand(1,2)
+	*clr & cla
+	!! PC agreed to meet the parents for the job interview. Tanya expects her to be unemployed and dressed as a maid.
+	if nichTanya['FuckLast'] = daystart:
+		!! Tanya and PC just had sex because PC cant go to the job interview yet
+		'Now that the immediate lust is sated and you''re both enjoying your postcoital bliss, you rest naked in each other''s arms.'
+		if $clothingworntype = 'gm_maid':
+			'"<<$pcs_nickname>>, I really enjoy this. But I kind of promised to my parents that you will apply for the maid job. I really need you to quit your current job."'
+			'You promise her to do it as soon as possible before putting your uniform back on.'
+		else
+			'"<<$pcs_nickname>>, I really enjoy this. But I kind of promised to my parents that you will apply for the maid job. I really need you to wear a maid uniform the next time you come over."'
+			'You promise her to do so before putting your clothes back on.'
+		end
+		act 'Leave the apartment':gt 'city_center'
+	elseif (work = 0 or cheatWork = 0) and $clothingworntype = 'gm_maid':
+		'When Tanya opens the door she takes a few seconds to admire your look. "Wow, <<$pcs_nickname>>, this uniform really suits you. How does it feel?"'
+		act 'Great':
+			cla
+			'"Good, I guess. I think I could really get used to wearing it."'
+			'Tanya smiles brightly. That''s great, because you will need to wear it a lot.'
+			'"Come on now. My parents are waiting in the living room."'
+			act 'Follow her': minut += 3 & gt 'nichApartment', 'hiring'
+		end
+		act 'Embarrassing':
+			cla
+			'"I don''t know. It felt a little bit embarrassing walking through the streets dressed like this."'
+			'Tanya smiles comfortingly. "Don''t worry. You will get used to it."'
+			'"Come on now. My parents are waiting in the living room."'
+			act 'Follow her': minut += 3 & gt 'nichApartment', 'hiring'
+		end
+	elseif $clothingworntype = 'gm_maid':
+		'When Tanya opens the door she takes a few seconds to admire your look. "Wow, <<$pcs_nickname>>, this uniform really suits you. Are you ready to have your interview with my parents?"'
+		'"Not yet. I still have to quit my current job."'
+		'Tanya looks a little bit disappointed but then she smirks at you. "Oh, I understand. You are wearing this outfit for me and not for my parents."'
+		'Not giving you a chance to say a word, she leads you to her room and pushes you on her bed.'
+		act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
+	elseif (work = 0 or cheatWork = 0):
+		'When Tanya opens the door she looks a little be disappointed.'
+		'"<<$pcs_nickname>>, I told you that you need to wear a maid uniform when you meet my parents. Remember?"'
+		'She bites down on her lip. "But since you are here we could have some fun as well."'
+		'Not giving you a chance to say a word, she leads you to her room and pushes you on her bed.'
+		act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
+	end
+end
+
+if $ARGS[0] = 'job_offer':
+	'<center><img <<$set_imgh>> src="images/characters/city/tanya/door_01.jpg"></center>'
+	'Tanya opens the door for you. As you look into her eyes, they seem to be sparkling with excitement, and her entire face lights up as she smiles at you.'
+	'"<<$pcs_nickname>>, it''s so good you are here. I have the best idea ever! Our maid left us recently, and my stepfather is looking for a replacement. I could suggest <b>you</b> to him! He pays really well, and all you gotta do is tidy up a bit, but you would be able to live right here with us!"'
+	'Tanya is so giddy that you almost don''t dare to voice your concerns: "And where do you get the idea that your stepfather would employ me? I''ve never worked as a maid before and I''m sure that, with his kind of money, he could get a much better one."'
+	!!TODO: check whether PC has worked as maid in hotel. If so she will mention or think it.
+	'"Believe me, if I ask him <i>nicely</i>, he will hire you", Tanya smiles lasciviously.'
+
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
+		act 'Refuse (still at school)':
+			cla
+			nichJobRefused = 1
+			'"I''m still at school Tanya. I can''t work here full time and go to school can I? It is sweet that you want me to be here all the time though."'
+			'"Damn that''s a good point, I was so keen to get you to work here I forgot that you''re still at school. Maybe when you graduate? Just talk to me about it if you can do it in the future, OK? I can convince Dad to get you the job" She says with an exaggerated wink.'
+
+			'Without saying another word she takes your hand and leads you to her room.'
 			act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
-		elseif (work = 0 or cheatWork = 0):
-			'When Tanya opens the door she looks a little be disappointed.'
-			'"<<$pcs_nickname>>, I told you that you need to wear a maid uniform when you meet my parents. Remember?"'
-			'She bites down on her lip. "But since you are here we could have some fun as well."'
-			'Not giving you a chance to say a word, she leads you to her room and pushes you on her bed.'
+		end
+	elseif university['student'] = 1:
+		act 'Refuse (still at school)':
+			cla
+			nichJobRefused = 1
+			'"I''m at uni Tanya, as you know. I can''t work here full time and do a degree, it would be too much. It is sweet that you want me to be here all the time though."'
+			'"Damn that''s a good point, I was so keen to get you to work here I didn''t even think about your degree course. A maid with a degree might be over qualified, but if you did ever want to do it I can convince Dad to get you the job" She says with an exaggerated wink.'
+
+			'Without saying another word she takes your hand and leads you to her room.'
 			act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
 		end
-	elseif nichTanyaFuckCounter > rand(3,5) and nichJobRefused < 1 and nichWork = 0 and FUNC('body_din','pregnancyVisibility',0,'nude') = 0:
-		!! Tanya will only offer the job while she believes that Sveta is not pregnant. Note that it is assumed that Tanya knows how Sveta looks naked and bases her decision on that!
-		'<center><img <<$set_imgh>> src="images/characters/city/tanya/door_01.jpg"></center>'
-		'Tanya opens the door for you. As you look into her eyes, they seem to be sparkling with excitement, and her entire face lights up as she smiles at you.'
-		'"<<$pcs_nickname>>, it''s so good you are here. I have the best idea ever! Our maid left us recently, and my stepfather is looking for a replacement. I could suggest <b>you</b> to him! He pays really well, and all you gotta do is tidy up a bit, but you would be able to live right here with us!"'
-		'Tanya is so giddy that you almost don''t dare to voice your concerns: "And where do you get the idea that your stepfather would employ me? I''ve never worked as a maid before and I''m sure that, with his kind of money, he could get a much better one."'
-		!!TODO: check whether PC has worked as maid in hotel. If so she will mention or think it.
-		'"Believe me, if I ask him <i>nicely</i>, he will hire you", Tanya smiles lasciviously.'
-		
+	else
 		act 'Refuse':
 			cla
-			npc_rel['A218'] = 25
-			nichTanyaFuckLast = daystart
+			npc_rel['A218'] -= 5
+			nichTanya['FuckLast'] = daystart
 			'"I don''t know about this, Tanya", you say carefully. "I mean, can you imagine me cleaning up and cooking, day in and day out? It doesn''t sound like me."'
 			'Her joyful expression falters and is quickly replaced with a cold, angry stare. "You just don''t want to be around me."'
 			'"No!", you exclaim, "No, of course I''d love to be around yo-"'
@@ -497,34 +532,38 @@ elseif $ARGS[0] = 'visitTanya':
 		act 'Maybe later':
 			cla
 			nichJobRefused = 2
-			'"Sorry Tanya, this sounds like a great opportunity, but I just don''t have time for this."'
-			'She looks a little bit disappointed.'
-			'"So maybe in the future? When you have settled whatever is holding you back? Just talk to me when you can start working here."'
+			'"Of course I''d love to be able to spend more time here with you but I have other commitments and I can''t just drop them so how about if circumstances change I get back to you? For now let''s leave things as they are and just enjoy our times together."'
+			'"So maybe in the future? Talk to me when you can start working here. We seem to get through maids very quickly for some reason."'
 			
 			'Without saying another word she takes your hand and leads you to her room.'
-		act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
+			act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
 		end
+	end
+end
+
+if $ARGS[0] = 'casual_visit':
+	'<center><img <<$set_imgh>> src="images/characters/city/tanya/door_01.jpg"></center>'
+	if nichJobRefusedTReact = 1:
+		'Tanya opens the door looking angrily at you. "You got some nerve showing up like nothing happened, <<$pcs_nickname>>! Do you even realize how I felt after you changed your mind about working for us in the very last second?!"'
+		'She bites down on her lip. Apparently her lust for you is bigger than her anger.'
+		'"Well, since you are here you could as well come in. Maybe you find a good way to apologize."'
+		killvar 'nichJobRefusedTReact'
+	elseif nichTanya['FuckLast'] = daystart - 1:
+		'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! I didn''t expect to see you so soon again."'
+	elseif nichTanya['FuckLast'] > daystart - 8:
+		'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! I was hoping you would show up today."'
+	elseif nichTanya['FuckLast'] > daystart - 30:
+		'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! Where have you been in the past weeks? I was beginning to wonder if you had forgotten me."'
 	else
-		'<center><img <<$set_imgh>> src="images/characters/city/tanya/door_01.jpg"></center>'
-		if nichJobRefusedTReact = 1:
-			'Tanya opens the door looking angrily at you. "You got some nerve showing up like nothing happened, <<$pcs_nickname>>! Do you even realize how I felt after you changed your mind about working for us in the very last second?!"'
-			'She bites down on her lip. Apparently her lust for you is bigger than her anger.'
-			'"Well, since you are here you could as well come in. Maybe you find a good way to apologize."'
-			killvar 'nichJobRefusedTReact'
-		elseif nichTanyaFuckLast = daystart - 1:
-			'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! I didn''t expect to see you so soon again."'
-		elseif nichTanyaFuckLast > daystart - 8:
-			'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! I was hoping you would show up today."'
-		elseif nichTanyaFuckLast > daystart - 30:
-			'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! Where have you been in the past weeks? I was beginning to wonder if you had forgotten me."'
-		else
-			'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! After all these weeks of not hearing anything from you I was beginning to wonder if you would show up again. I''m very happy you did."'
-		end
-		
-		'Without saying another word she takes your hand and leads you to her room.'
-		act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
+		'Tanya opens the door and smiles warmly at you. "Hello <<$pcs_nickname>>! After all these weeks of not hearing anything from you I was beginning to wonder if you would show up again. I''m very happy you did."'
 	end
-elseif $ARGS[0] = 'removeNote':
+	
+	'Without saying another word she takes your hand and leads you to her room.'
+	act 'Have sex with Tanya': gt 'nichTanya', 'sexL'
+	act 'Chat with Tanya': gt 'nichTanya', 'chat'
+end
+
+if $ARGS[0] = 'removeNote':
 	nichNote = 0
 	gt $loc,'return'
 end

+ 14 - 14
locations/nichBedroomServant.qsrc

@@ -243,7 +243,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			killvar 'nichTarSauna'
 			killvar 'nichTarSaunaPay'
 			!!TODO: CONT
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichTarSaunaPay > 10000:
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/chat.jpg"></center>'
 			'You wake up to the feeling of something heavy resting on you. A little bit sleepy you open your eyes and see the face of Taras directly in front of yours.'
@@ -251,7 +251,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'"Don''t slack off now! I need 20000 <b>₽</b> in total from you. I am sure you can easily earn them for me. You are already more than half-way there."'
 			'He gives you a light smack on your face, then he stands up and leaves your room.'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 10:
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/chat.jpg"></center>'
 			'You wake up to the feeling of something heavy resting on you. A little bit sleepy you open your eyes and see the face of Taras directly in front of yours.'
@@ -271,7 +271,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			nichTarSauna = 1
 			nichTarSaunaPay = 0
 			SaunaWhore = 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 0 or nichRand = 0:
 			
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed7.jpg"></center>'
@@ -287,7 +287,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'"I know you prefer the real deal. Don''t worry, it won''t take long before you can experience it again."'
 			'He unties you and leaves your room.'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 1 or nichRand = 1:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed9.jpg"></center>'
 			'You have an erotic dream of being tied up tightly.'
@@ -304,7 +304,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			gs 'cum_call', 'mouth_swallow', 'A513', 1
 			gs 'stat'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 2 or nichRand = 2:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed3.jpg"></center>'
 			'Just as you are falling asleep, you feel yourself being lifted out of bed. You are immediately wide awake.'
@@ -322,7 +322,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			gs 'cum_call', 'anus', 'A513', 1
 			gs 'stat'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 3 or nichRand = 3:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed6.jpg"></center>'
 			'You wake up to a painful hit on your butt. Instinctively you try to reach down there, but your wrists and ankles are tied to the opposite corners of your bed. There is nothing you can do besides lie on your stomach.'
@@ -337,7 +337,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'You are just too exhausted to stay awake for much longer. During another pause of the vibrator you fall asleep. You have some erotic dreams about being fucked by various guys and girls with the ongoing vibrations of the vibrator being a part of it.'
 			'You don''t know how long Taras left the vibrator inside of you, but when you wake up next, you are untied and the vibrator is gone.'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 			!! TODO: CONT
 		elseif nichGalaContractTarasCount = 4 or nichRand = 4:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed4x1.jpg"></center>'
@@ -367,7 +367,7 @@ elseif $ARGS[0] = 'sleepEvents':
 				'"I am sure you will enjoy this."'
 				'He unties your right wrist, allowing you to remove the other restraints, before he leaves your room again.'
 				nichGalaContractTarasCount += 1
-				act 'Back to sleep': gt 'bed2','dream'
+				act 'Back to sleep': gt 'sleep', 'dream'
 			end
 		elseif nichGalaContractTarasCount = 5 or nichRand = 5:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed2.jpg"></center>'
@@ -382,7 +382,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'"Well done, slut. If you haven''t struggled that much, I wouldn''t have had so much fun."'
 			'It was Taras all along. He picks up his rope and leaves your room.'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 6 or nichRand = 6:
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed10.jpg"></center>'
 			'Suddenly you wake up. Your butt hurts. You realize that you are tied to your bed and that somebody is sitting next to you, spanking your ass.'
@@ -395,7 +395,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'He gives you three last hits, then he stands up and unties you.'
 			'"At least you have a nice ass, slave."'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 7 or nichRand = 7:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed1x1.jpg"></center>'
 			'You get woken up by a slap to your breast. You want to shriek, but once again you are tied to your bed. A ball gag in your mouth prevents you from making any sound.'
@@ -423,7 +423,7 @@ elseif $ARGS[0] = 'sleepEvents':
 					'"I knew you would enjoy it. While normal people like me sleep at night, sluts like you want to get fucked all night long, and I am nothing but supportive in this regard."'
 					'He leaves you with a grin on his face.'
 					nichGalaContractTarasCount += 1
-					act 'Back to sleep': gt 'bed2','dream'
+					act 'Back to sleep': gt 'sleep', 'dream'
 				end
 			end
 		elseif nichGalaContractTarasCount = 8 or nichRand = 8:	
@@ -437,7 +437,7 @@ elseif $ARGS[0] = 'sleepEvents':
 			'"Damn. My services are required. I am sorry, but I am afraid we will have to continue our little fun another time."'
 			'He unties you and leaves your room without saying another word.'
 			nichGalaContractTarasCount += 1
-			act 'Back to sleep': gt 'bed2','dream'
+			act 'Back to sleep': gt 'sleep', 'dream'
 		elseif nichGalaContractTarasCount = 9 or nichRand = 9:	
 			'<center><img <<$set_imgh>> src="images/characters/city/gala/slave/taras/bed5.jpg"></center>'
 			'No air...'
@@ -464,7 +464,7 @@ elseif $ARGS[0] = 'sleepEvents':
 						'As you wake up this time, Taras is gone and you are untied.'
 						'One horrific thought comes to your mind and makes you shiver: this man shows utter neglect for your safety. What if one day he kills you by accident?'
 						nichGalaContractTarasCount += 1
-						act 'Back to sleep': gt 'bed2','dream'
+						act 'Back to sleep': gt 'sleep', 'dream'
 					end
 				end
 			end
@@ -501,7 +501,7 @@ elseif $ARGS[0] = 'sleepEvents':
 						gs 'stat'
 						'He unties you and leaves your room again.'
 						nichGalaContractTarasCount += 1
-						act 'Back to sleep': gt 'bed2','dream'
+						act 'Back to sleep': gt 'sleep', 'dream'
 					end
 				end
 			end

+ 1 - 1
locations/nichBedroomTanja.qsrc

@@ -71,7 +71,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
 		
 		act 'Spy':
 			*clr & cla
-			$nichTempPic = func('nichUtil','tanyaPic','sexH','spy','bf<<nichTanyaBF>>')
+			$nichTempPic = func('nichUtil','tanyaPic','sexH','spy','bf<<nichTanya[''BF'']>>')
 			'<center><img <<$set_imgh>> src="<<$nichTempPic>>"></center>'
 			'"Through the keyhole you can see Tanya and her boyfriend. They are obviously in the act of doing it."'
 			

+ 3 - 3
locations/nichChore.qsrc

@@ -390,7 +390,7 @@ elseif $ARGS[0] = 'work':
 		nichRand = rand(1,100)
 		if nichChoreID = 5:
 			!! Tanyas room
-			if nichTanyaRelationship = 1 and nichTanyaDominance >= 20:
+			if nichTanya['Relationship'] = 1 and nichTanya['Dominance'] >= 20:
 				!! if Tanya and Sveta are in a relationship and Tanya is dominant
 				nichTanyPresent = FUNC('nichUtil','isPresent','tanya','bedroomTanya')
 				if nichTanyPresent ! 0:
@@ -400,7 +400,7 @@ elseif $ARGS[0] = 'work':
 						'When you start cleaning Tanya approaches you from behind and smacks you on your butt.'					
 						'"Hey <<$pcs_nickname>>, don''t miss that edge over there." she points at a small mess she obviously created on purpose.'
 						act 'Comply':
-							nichTanyaDominance += 2
+							nichTanya['Dominance'] += 2
 							'Once you are done cleaning up the first spot Tanya points you to another one. She obviously enjoys bossing you around, taking several opportunities to hit you on you butt again.'
 							minut += 10
 							cla
@@ -409,7 +409,7 @@ elseif $ARGS[0] = 'work':
 							end
 						end
 						act 'Tell her to stop this':
-							nichTanyaDominance -= 3
+							nichTanya['Dominance'] -= 3
 							'She looks a little bit disappointed as you tell her that you are not in the mood for this right now and want to focus on your work.'
 							cla
 							act 'Continue cleaning':

+ 3 - 3
locations/nichLivingroom.qsrc

@@ -245,7 +245,7 @@ elseif $ARGS[0] = 'breakfast':
 		'"Of course, Master Nicholas." You reply as is expected of you.'
 		nichPregnancy = 1
 		nichAfterBFEvent = 90
-	elseif nichTanyaUni = 0 and (nichRand <= 20 or nichDebug = 1):
+	elseif nichTanya['Uni'] = 0 and (nichRand <= 20 or nichDebug = 1):
 		*nl
 		'Nicholas starts to read the newspaper. After a while he puts it aside and looks at Tanya.'
 		'"Tanya, I talked to one of my friends yesterday: Dimitrij Aslanov. I think you might know him."'
@@ -259,7 +259,7 @@ elseif $ARGS[0] = 'breakfast':
 		'Nicholas doesn''t look convinced by Tanyas change of heart. He drops the topic nevertheless and continues reading the newspaper.'
 		'Once he finishes he looks up and directs his next words at you. "<<$pcs_nickname>>, I would like to speak to you when you are done cleaning up the breakfast table."'
 		'"Of course, Master Nicholas." You reply as is expected of you.'
-		nichTanyaUni = 1
+		nichTanya['Uni'] = 1
 		nichAfterBFEvent = 1
 	elseif nichGalaKnowsPT = 1 and (nichRand <= 75 or nichDebug = 1):
 		*nl
@@ -334,7 +334,7 @@ elseif $ARGS[0] = 'breakfast':
 			'"<<$pcs_nickname>>, I am sure you heard what I said to Tanya earlier. I want her to become successful in life, to accomplish something on her own. But it seems as if she lacks the ambition to do so."'
 			'"The two of you seem to get along quite well. Maybe you could speak some sense into her?"'
 			act 'Agree':
-				nichTanyaUni = 11
+				nichTanya['Uni'] = 11
 				'"I will try, Master Nicholas."'
 				'He nods. "I won''t expect more from you than that."'
 				'He nods again, signalling you that you are dismissed for now.'

File diff suppressed because it is too large
+ 313 - 355
locations/nichTanya.qsrc


+ 28 - 58
locations/nichUtil.qsrc

@@ -46,28 +46,28 @@ elseif $ARGS[0] = 'debug':
 			gs 'nichUtil','clearVars'
 			abonement = 30
 			nichWork = 0
-			nichTanyaRelationship = 0
-			nichTanyaRelationshipState = 0
-			nichTanyaRelationshipBreakup = 0
-			nichTanyaFuckCounter = 0
+			nichTanya['Relationship'] = 0
+			nichTanya['RelationshipState'] = 0
+			nichTanya['RelationshipBreakup'] = 0
+			nichTanya['FuckCounter'] = 0
 			gt 'fit','start'
 		elseif $ARGS[2] = 'getHired':
 			nichWork = 0
-			nichTanyaRelationship = 1
-			nichTanyaRelationshipState = 10
-			nichTanyaRelationshipBreakup = 0
+			nichTanya['Relationship'] = 1
+			nichTanya['RelationshipState'] = 10
+			nichTanya['RelationshipBreakup'] = 0
 			nichJobRefused = 0
-			nichTanyaFuckCounter = 6
+			nichTanya['FuckCounter'] = 6
 			hour = 16
 			gt 'city_center'
 		elseif $ARGS[2] = 'tanyaDate100':
 			nichWork = 2
-			nichTanyaRelationship = 1
-			nichTanyaRelationshipState = 10
-			nichTanyaRelationshipBreakup = 0
-			nichTanyaFuckCounter = 6
-			nichTanyaDominance = 30
-			nichTanyaStrapon = 0
+			nichTanya['Relationship'] = 1
+			nichTanya['RelationshipState'] = 10
+			nichTanya['RelationshipBreakup'] = 0
+			nichTanya['FuckCounter'] = 6
+			nichTanya['Dominance'] = 30
+			nichTanya['Strapon'] = 0
 			nichGalaKnowsPT = 0
 			hour = 16
 			$loc = 'nichBedroomTanja'
@@ -142,14 +142,14 @@ elseif $ARGS[0] = 'debug':
 	
 	'<b>Tanya</b>'
 	'Set relationship to:'
-	'-<a href="exec: nichTanyaRelationship = 0 & nichTanyaRelationshipState = 0    & gt ''nichUtil'', ''debug''">Not together (and never have been)</a>'
-	'-<a href="exec: nichTanyaRelationship = 0 & nichTanyaRelationshipState = 1000 & gt ''nichUtil'', ''debug''">Not together (you broke up)</a>'
-	'-<a href="exec: nichTanyaRelationship = 0 & nichTanyaRelationshipState = 1010 & gt ''nichUtil'', ''debug''">Not together (Tanya broke up)</a>'
-	'-<a href="exec: nichTanyaRelationship = 1 & nichTanyaRelationshipState = 10   & gt ''nichUtil'', ''debug''">Casually dating</a>'
-	'-<a href="exec: nichTanyaRelationship = 1 & nichTanyaRelationshipState = 20   & gt ''nichUtil'', ''debug''">In a relationship</a>'
-	'You fucked Tanya <<nichTanyaFuckCounter>> times'
-	'The last time you fucked Tanya was '+(daystart-nichTanyaFuckLast)+' days ago'
-	'Tanya has a dominance of <<nichTanyaDominance>> (range: -100 - 100)'
+	'-<a href="exec: nichTanya[''Relationship''] = 0 & nichTanya[''RelationshipState''] = 0    & gt ''nichUtil'', ''debug''">Not together (and never have been)</a>'
+	'-<a href="exec: nichTanya[''Relationship''] = 0 & nichTanya[''RelationshipState''] = 1000 & gt ''nichUtil'', ''debug''">Not together (you broke up)</a>'
+	'-<a href="exec: nichTanya[''Relationship''] = 0 & nichTanya[''RelationshipState''] = 1010 & gt ''nichUtil'', ''debug''">Not together (Tanya broke up)</a>'
+	'-<a href="exec: nichTanya[''Relationship''] = 1 & nichTanya[''RelationshipState''] = 10   & gt ''nichUtil'', ''debug''">Casually dating</a>'
+	'-<a href="exec: nichTanya[''Relationship''] = 1 & nichTanya[''RelationshipState''] = 20   & gt ''nichUtil'', ''debug''">In a relationship</a>'
+	'You fucked Tanya <<nichTanya[''FuckCounter'']>> times'
+	'The last time you fucked Tanya was '+(daystart-nichTanya['FuckLast'])+' days ago'
+	'Tanya has a dominance of <<nichTanya[''Dominance'']>> (range: -100 - 100)'
 	
 	act 'DEBUG: New Workday': gs 'nichUtil', 'startWorkday'
 	
@@ -229,8 +229,8 @@ elseif $ARGS[0] = 'startWorkday':
 	nichChoreState[3] += 5
 	!! 4: laundry
 	nichChoreState[4] += 5
-	!! 5: tanya bedroom, if nichTanyaRoom = 1 she will clean it herself
-	if nichTanyaRoom = 0:
+	!! 5: tanya bedroom, if nichTanya['Room'] = 1 she will clean it herself
+	if nichTanya['Room'] = 0:
 		nichChoreState[5] += 5
 	end
 	!! 6: master bathroom
@@ -314,7 +314,7 @@ elseif $ARGS[0] = 'clearVars':
 	killvar 'nichNTRelation'
 	killvar 'nichSex'
 	
-	!!Do not kill nichTanyaUni
+	!!Do not kill nichTanya['Uni']
 	!!Do not kill Tanyas fuck vars since Sveta might meet her after leaving her job
 	killvar 'nichTanyaSpyLast'
 	killvar 'nichTanyaSpyCounter'
@@ -502,7 +502,6 @@ end
 !! 2 (required for sex): Specific activity (prefix a: Tanya acts, prefix p: Tanya gets acted upon; "")
 !! 3 (optional): Partner for sex-options (0 or unset: PC, 1: PC and ignore PC appearance)
 if $ARGS[0] = 'tanyaPic':
-	gs 'nichUtil','updatePcHair'
 
 	$nichTempFolder = 'images/characters/city/tanya/'
 	
@@ -514,36 +513,7 @@ if $ARGS[0] = 'tanyaPic':
 		$RESULT = $nichTempFolder + 'sex/cuddle'+rand(0,4)+'.jpg'
 	end
 	
-	if $ARGS[1] = 'sexL' or $ARGS[1] = 'sexH':
-		!! Pictures which work for both lesbian and heterosexual sex
-		if $ARGS[2] = 'after':
-			!! pictures of Tanya relaxing after sex
-			$RESULT = $nichTempFolder + 'sex/relax'+rand(0,5)+'.jpg'
-		elseif $ARGS[2] = 'pose':
-			$RESULT = $nichTempFolder + 'sex/pose'+rand(0,1)+'.jpg'
-		elseif $ARGS[2] = 'undress':
-			$RESULT = $nichTempFolder + 'sex/undress'+rand(0,3)+'.jpg'
-		end
-	end
-	if $ARGS[1] = 'sexL':
-		if $ARGS[2] = 'kiss':
-			$RESULT = $nichTempFolder + 'sexL/kiss/kiss'+rand(0,5)+'.jpg'
-		elseif $ARGS[2] = 'aeatout':
-			$RESULT = $nichTempFolder + 'sexL/aeatout/aeatout'+rand(0,3)+'.jpg'
-		elseif $ARGS[2] = 'peatout':
-			$RESULT = $nichTempFolder + 'sexL/peatout/peatout'+rand(0,6)+'.jpg'
-		elseif $ARGS[2] = 'arimjob':
-			$RESULT = $nichTempFolder + 'sexL/arimjob/arimjob'+rand(0,3)+'.jpg'
-		elseif $ARGS[2] = 'primjob':
-			$RESULT = $nichTempFolder + 'sexL/primjob/primjob'+rand(0,2)+'.jpg'
-		elseif $ARGS[2] = 'astrapon':
-			$RESULT = $nichTempFolder + 'sexL/astrapon/astrapon'+rand(0,5)+'.jpg'
-		elseif $ARGS[2] = 'pstrapon':
-			$RESULT = $nichTempFolder + 'sexL/pstrapon/pstrapon'+rand(0,3)+'.jpg'
-		elseif $ARGS[2] = 'psovaginal':
-			$RESULT = $nichTempFolder + 'sexL/pstrapon/pstrapon'+rand(0,3)+'.jpg'
-		end
-	elseif $ARGS[1] = 'sexH':
+	if $ARGS[1] = 'sexH':
 		if $ARGS[2] = 'spy':
 			if $ARGS[3] = '' or $ARGS[3] = 'nicholas':
 				$RESULT = $nichTempFolder + 'sexNich/nich'+rand(0,5)+'.jpg'
@@ -746,7 +716,7 @@ if $ARGS[0] = 'npcActivity':
 		
 		!! TODO: daily activities
 		!! Tanya will go to university from 10:15-14:00
-		if nichTanyaUni >= 100 and nichTanyaUniStart ! daystart:
+		if nichTanya['Uni'] >= 100 and nichTanya['UniStart'] ! daystart:
 			if week <= 5:
 				gs 'nichUtil', 'npcActivityAdd', 'leaveUni', 10 , 20
 				gs 'nichUtil', 'npcActivityAdd', 'uni', 14 , 0
@@ -792,7 +762,7 @@ if $ARGS[0] = 'npcActivity':
 			!! Needs to have corresponding entries to Nicholas entries.
 			if nichNTRelation < 10:
 				gs 'nichUtil', 'npcActivityAdd', 'nicholas', 22 , 0
-			elseif nichTanyaBF > 0:
+			elseif nichTanya['BF'] > 0:
 				gs 'nichUtil', 'npcActivityAdd', 'boyfriend', 23 , 0
 			else
 				gs 'nichUtil', 'npcActivityAdd', 'tanya', 22 , 0

+ 5 - 0
locations/npcgeneratec.qsrc

@@ -4,6 +4,11 @@
 !! You can also set their approx. home location
 !! All data produced is random so if you need a specific value you will have to overwrite it
 
+!! npcgen_lastrun is a flag to help track whether npcgeneratec or npcpreservec has been run last
+!! npcgeneratec is 1
+!! npcpreservec is 2
+npcgen_lastrun = 1
+
 !! sets sex, 0 male, 1 female, 2 female herm, 3 male herm
 npctempgsex = ARGS[0]
 

+ 5 - 0
locations/npcpreservec.qsrc

@@ -3,6 +3,11 @@
 !! {This initializes the array and acts as a gate to deny bad calls.}
 $npctemp = $ARGS[0]
 
+!! npcgen_lastrun is a flag to help track whether npcgeneratec or npcpreservec has been run last
+!! npcgeneratec is 1
+!! npcpreservec is 2
+npcgen_lastrun = 1
+
 if mid($npctemp,1,1) = 'C':
 	:npcsavebsanityloop
 	i = 0

+ 1 - 8
locations/npcstatic1.qsrc

@@ -27,7 +27,6 @@ npc_height['A<<npctemp>>'] = 0
 npc_bust['A<<npctemp>>'] = 0
 npc_haircol['A<<npctemp>>'] = 0
 npc_QW['A<<npctemp>>'] = 0
-npc_rel['A<<npctemp>>'] = 0
 npc_love['A<<npctemp>>'] = 0
 $npc_occupation['A<<npctemp>>'] = ''
 npc_outfit['A<<npctemp>>'] = 0
@@ -241,7 +240,6 @@ $npc_thdick['A<<npctemp>>'] = 'massive'
 npc_dick['A<<npctemp>>'] = 15
 npc_rep['A<<npctemp>>'] = 180
 npc_sexskill['A<<npctemp>>'] = rand(0,2)
-npc_rel['A<<npctemp>>'] = 40
 npc_intel['A<<npctemp>>'] = 33
 hotcat_rating['A<<npctemp>>'] = 4
 
@@ -588,7 +586,6 @@ gs 'npcstaticdefaults', 'group', 'family'
 $npc_thdick['A<<npctemp>>'] = 'well proportioned'
 npc_dick['A<<npctemp>>'] = 17
 npc_sexskill['A<<npctemp>>'] = 1
-npc_rel['A<<npctemp>>'] = 40
 
 
 npctemp = 29
@@ -604,7 +601,6 @@ gs 'npcstaticdefaults', 'defaults'
 gs 'npcstaticdefaults', 'group', 'family'
 npc_sexskill['A<<npctemp>>'] = 2
 npc_bust['A<<npctemp>>'] = 25
-npc_rel['A<<npctemp>>'] = 100
 
 
 npctemp = 30
@@ -617,9 +613,9 @@ $npc_notes['A<<npctemp>>'] = 'Your mother''s sister, Lyudmila Knavs'
 npc_dob['A<<npctemp>>'] = 19750311
 npc_gender['A<<npctemp>>'] = 1
 gs 'npcstaticdefaults', 'defaults'
+gs 'npcstaticdefaults', 'group', 'family'
 npc_sexskill['A<<npctemp>>'] = 2
 npc_bust['A<<npctemp>>'] = 18
-npc_rel['A<<npctemp>>'] = 20
 
 
 npctemp = 31
@@ -666,7 +662,6 @@ npc_gender['A<<npctemp>>'] = 1
 gs 'npcstaticdefaults', 'defaults'
 gs 'npcstaticdefaults', 'group', 'family'
 npc_bust['A<<npctemp>>'] = 19
-npc_rel['A<<npctemp>>'] = 50
 
 
 npctemp = 34
@@ -683,7 +678,6 @@ gs 'npcstaticdefaults', 'group', 'family'
 $npc_thdick['A<<npctemp>>'] = 'slim'
 npc_dick['A<<npctemp>>'] = 14
 npc_intel['A<<npctemp>>'] = 43
-npc_rel['A<<npctemp>>'] = 20
 hotcat_rating['A<<npctemp>>'] = 7
 
 
@@ -702,7 +696,6 @@ $npc_thdick['A<<npctemp>>'] = 'well proportioned'
 npc_dick['A<<npctemp>>'] = 13
 npc_sexskill['A<<npctemp>>'] = 1
 npc_spermpot['A<<npctemp>>'] = 11000
-npc_rel['A<<npctemp>>'] = 40
 
 
 npctemp = 36

+ 2 - 2
locations/nyp_school.qsrc

@@ -519,7 +519,7 @@ if $ARGS[0] = 'gopniks':
 			'The group ponders for a bit. "Maybe in one of the classrooms?" Ekaterina suggests.'
 			'"Definitely the entrance, so everyone can see our masterpiece." says Nikolai.'
 			'"One of the exterior walls, as a welcoming sign." Lavrenti scoffs.'
-			'"Why not keep it simple and do it here in the gym locker room instead?" Paulina replies.'
+			'"Why not keep it simple and do it here in the gym locker room instead?" Pauline replies.'
 			minut += 5
 			gs 'stat'
 
@@ -619,7 +619,7 @@ if $ARGS[0] = 'gopniks':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/gym/locker/lockerroom.jpg"></center>'
 				'"Where should we do it?" you ponder for a second before deciding on tagging the gym. "What do you say about the locker room?"'
-				'The others nod while you can see a clear smile on Paulina''s face as you''ve picked her suggestion.'
+				'The others nod while you can see a clear smile on Pauline''s face as you''ve picked her suggestion.'
 				'"Shall we?" you ask. The others nod and you sneak into the boys locker room, where you start searching for the perfect spot.'
 				minut += 30
 				npc_rel['A24'] += 1

+ 6 - 1
locations/obj_din.qsrc

@@ -164,6 +164,12 @@ if $ARGS[0] = 'cheattabs':
 	else
 		$cheat_tab_list += '<th><a href="exec:menu_page = 9 & gs ''NPCChanger'', ''Start''">NPC Editor</a></th>'
 	end
+	
+	if menu_page = 15:
+		$cheat_tab_list += '<th>NPC Finder</th>'
+	else
+		$cheat_tab_list += '<th><a href="exec:menu_page = 15 & gs ''NPCFinder''">NPC Finder</a></th>'
+	end
 
 	$cheat_tab_list += '<tr>'
 
@@ -338,7 +344,6 @@ if $ARGS[0] = 'description':
 	!! 'pcs_lashes <<pcs_lashes>> a maximum of 2'
 	!! 'pcs_eyesize <<pcs_eyesize>> a maximum of 3'
 	!! 'bodykoef <<bodykoef>> a maximum of 8'
-	!! 'legkoef <<legkoef>> a maximum of 3'
 	!! 'lobkoef <<lobkoef>> a maximum of 3'
 	!! 'odevnesh <<odevnesh>> a maximum of 15'
 	!! 'pcs_sweat <<pcs_sweat>> the maximum 0'

+ 2 - 0
locations/orgasm.qsrc

@@ -20,6 +20,8 @@ end
 
 orgasm_buildup -= 70
 
+if orgasm_buildup < 0:orgasm_buildup = 0
+
 if orgasm_flag['anal'] = 1: orgasm_anal += 1
 if orgasm_flag['masturbate'] = 1: orgasm_masturbate += 1
 if orgasm_flag['clit'] = 1: orgasm_clit += 1

+ 8 - 9
locations/pav_clinic.qsrc

@@ -139,7 +139,7 @@ if $ARGS[0] = '':
 			end
 		end
 
-		if (pcs_teeth > -1 and (dentistday + 90 < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
+		if (pcs_teeth > -1 and (dentistday < daystart or dentistday = 0)) or (pcs_missing_teeth > 0  and pcs_brace = 0):
 			act 'Go to the dentist':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/shared/clinic/dentist.jpg"></center>'
@@ -150,7 +150,6 @@ if $ARGS[0] = '':
 				if pcs_brace = 1:
 					pcs_brace = 0
 					pcs_teeth -= 1
-					dentistday = daystart
 					'The dentist spends 15 minutes to take of you brace and clean up. You look at the mirror afterward and you teeth are '+iif(pcs_teeth = 0, 'now straight', 'straighter, but can still use some more work.')
 					gs 'AppearanceSystem', 'UpdateBaseAppearnce'
 					gs 'stat'
@@ -182,11 +181,11 @@ if $ARGS[0] = '':
 									pcs_missing_teeth = 0
 									'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
 								elseif pcs_teeth > 0:
-									dentistday = daystart
+									dentistday = daystart + 180
 									pcs_brace = 1
-									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it three months to have it taken of.'
+									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
 								else
-									dentistday = daystart
+									dentistday = daystart + 90
 									pcs_teeth = -1
 									'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
 								end
@@ -205,12 +204,12 @@ if $ARGS[0] = '':
 									pcs_missing_teeth = 0
 									'You pay the dentist to fix your teeth, within an hour he has restored your winning smile.'
 								elseif pcs_teeth > 0:
-									dentistday = daystart
+									dentistday = daystart + 180
 									pcs_brace = 1
-									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it three months to have it taken of.'
+									'You pay the dentist to straighten your teeth. After and hour of work he have attached a brace to teeth and tells you to comeback it six months to have it taken of.'
 								else
 									pcs_teeth = -1
-									dentistday = daystart
+									dentistday = daystart + 90
 									'You pay the dentist to brighten and polish your teeth, an hour later your smile is much brighter and more attractive.'
 								end
 								gs 'AppearanceSystem', 'UpdateBaseAppearnce'
@@ -289,7 +288,7 @@ if $ARGS[0] = '':
 				if glass ! 0:
 					if money < 75000 and karta < 75000:
 						*nl
-						'You can not afford the laser eye correction surgery.'
+						'You can not afford the laser eye correction surgery. (75,000 <b>₽</b>)'
 					else
 						if money >= 75000:
 							act 'Pay for laser correction (75,000 <b>₽</b>) (cash)':

+ 0 - 2
locations/pav_complex.qsrc

@@ -24,8 +24,6 @@ if $ARGS[0] = 'start':
 	litltown = 1
 	alkoblock = 0
 	boynumBlock = 0
-!! the following variable seems to be here on the wrong place as it is related to bedroom, but it is here intentionally because I want it to be stable when PC in the apartement. 
-	parsexrand = rand(0, 5)
 	gs 'stat'
 !! Slut gossip
 	if complx_rand[1] + rand(5,10) < daystart and fame['pav_slut'] >= 50 and (hour > 8 and hour < 23):

+ 26 - 26
locations/pav_disco_coolkids.qsrc

@@ -4,7 +4,7 @@
 if $ARGS[0] = 'dimka':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A1', 'like'
+	gs 'npc_relationship', 'modify', 'A1', 'like', 1, 'pav_disco'
 	gs 'stat'
 	gs 'dinnpc'
 	if rand(1,4) = 1:
@@ -281,8 +281,8 @@ end
 
 if $ARGS[0] = 'marcus':
 	*clr & cla
-	minut += 5
-	gs 'npc_relationship', 'modify', 'A146', 'like'
+	minut += 5	
+	gs 'npc_relationship', 'modify', 'A146', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big146.jpg"></center>'
 	if rand(1,3) = 1:
@@ -454,8 +454,8 @@ if $ARGS[0] = 'andrey' or $ARGS[0] = 'stasya': gt 'pav_disco_coolkids', 'andrey_
 if $ARGS[0] = 'andrey_stasya':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A147', 'like'
-	gs 'npc_relationship', 'modify', 'A139', 'like'
+	gs 'npc_relationship', 'modify', 'A147', 'like', 1, 'pav_disco'
+	gs 'npc_relationship', 'modify', 'A139', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,5) <= 2:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/andrey_stasya_dance1.jpg"></center>'
@@ -485,7 +485,7 @@ if $ARGS[0] = 'andrey_stasya':
 						gs 'stat'
 						act 'No':
 							*clr & cla
-							gs 'npc_relationship', 'modify', 'A139', 'like'
+							gs 'npc_relationship', 'modify', 'A139', 'like', 1, 'pav_disco2'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/andrey_stasya_dance2.jpg"></center>'
 							'You shake your head. "No thanks, I''m having fun here. Maybe some other time?"'
@@ -497,8 +497,8 @@ if $ARGS[0] = 'andrey_stasya':
 						end
 						act 'Yes':
 							*clr & cla
-							gs 'npc_relationship', 'modify', 'A147', 'like'
-							gs 'npc_relationship', 'modify', 'A139', 'dislike'
+							gs 'npc_relationship', 'modify', 'A147', 'like', 1, 'pav_disco2'
+							gs 'npc_relationship', 'modify', 'A139', 'dislike', 1, 'pav_disco2'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/andrey_stasya_dance2.jpg"></center>'
 							'You nod your head. "Sure, that sounds like fun. What did you have in mind?"'
@@ -548,7 +548,7 @@ if $ARGS[0] = 'andrey_stasya':
 					'Whatever it is, it seems Stasya isn''t into it but after a bit of back and forth she either relents or changes her mind, because you see Andrey grin before kissing her. After his kiss with Stasya he turns to you. "How about we get out of here and go back to my place? I can get Marcus to come over."'
 					act 'No':
 						*clr & cla
-						gs 'npc_relationship', 'modify', 'A139', 'like'
+						gs 'npc_relationship', 'modify', 'A139', 'like', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/andrey_stasya.jpg"></center>'
 						'You shake your head. "No thanks, I''m having fun here. Maybe some other time?"'
@@ -560,8 +560,8 @@ if $ARGS[0] = 'andrey_stasya':
 					end
 					act 'Yes':
 						*clr & cla
-						gs 'npc_relationship', 'modify', 'A147', 'like'
-						gs 'npc_relationship', 'modify', 'A139', 'dislike'
+						gs 'npc_relationship', 'modify', 'A147', 'like', 1, 'pav_disco2'
+						gs 'npc_relationship', 'modify', 'A139', 'dislike', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/andrey_stasya.jpg"></center>'
 						'You nod your head. "Sure, that sounds like fun. What did you have in mind?"'
@@ -604,7 +604,7 @@ end
 if $ARGS[0] = 'mefodiy':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A148', 'like'
+	gs 'npc_relationship', 'modify', 'A148', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big148.jpg"></center>'
 	if rand(1,4) = 1:
@@ -733,7 +733,7 @@ end
 if $ARGS[0] = 'igor':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A4', 'like'
+	gs 'npc_relationship', 'modify', 'A14', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big4.jpg"></center>'
 	if rand(1,4) = 1:
@@ -925,7 +925,7 @@ end
 if $ARGS[0] = 'bella':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A22', 'like'
+	gs 'npc_relationship', 'modify', 'A22', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big22.jpg"></center>'
 	'You see Bella hanging out with the other cool kids.'
@@ -970,7 +970,7 @@ end
 if $ARGS[0] = 'vicky':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A15', 'like'
+	gs 'npc_relationship', 'modify', 'A15', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big15.jpg"></center>'
 	'You see Vicky hanging out with the other cool kids.'
@@ -1012,7 +1012,7 @@ end
 if $ARGS[0] = 'inna':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A17', 'like'
+	gs 'npc_relationship', 'modify', 'A17', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big17.jpg"></center>'
 	'You see Irina hanging out with the other cool kids.'
@@ -1050,7 +1050,7 @@ end
 if $ARGS[0] = 'katja':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A14', 'like'
+	gs 'npc_relationship', 'modify', 'A14', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,4) <= 3:
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_dance1_1.jpg"></center>'
@@ -1389,7 +1389,7 @@ end
 if $ARGS[0] = 'lizaveta':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A140', 'like'
+	gs 'npc_relationship', 'modify', 'A140', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big140.jpg"></center>'
 	'You see Lizaveta hanging out with the other cool kids.'
@@ -1428,7 +1428,7 @@ end
 if $ARGS[0] = 'sonia':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A25', 'like'
+	gs 'npc_relationship', 'modify', 'A25', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,4) <= 3:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/sonia_dance.jpg"></center>'
@@ -1480,7 +1480,7 @@ if $ARGS[0] = 'sonia':
 				end
 				act 'Yes':
 					*clr & cla
-					gs 'npc_relationship', 'modify', 'A25', 'like'
+					gs 'npc_relationship', 'modify', 'A25', 'like', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
 					'You smile at her. "Okay, let''s go."'
@@ -1525,7 +1525,7 @@ end
 if $ARGS[0] = 'sonia_outcast':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A25', 'like'
+	gs 'npc_relationship', 'modify', 'A125', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,5) <= 4:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/sonia_outcast_dance1.jpg"></center>'
@@ -1577,7 +1577,7 @@ if $ARGS[0] = 'sonia_outcast':
 				end
 				act 'Yes':
 					*clr & cla
-					gs 'npc_relationship', 'modify', 'A25', 'like'
+					gs 'npc_relationship', 'modify', 'A25', 'like', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
 					'You smile at her. "Okay, let''s go."'
@@ -1604,7 +1604,7 @@ if $ARGS[0] = 'sonia_outcast':
 				end
 				act 'Yes':
 					*clr & cla
-					gs 'npc_relationship', 'modify', 'A25', 'like'
+					gs 'npc_relationship', 'modify', 'A25', 'like', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
 					'You smile at her. "Okay, let''s go."'
@@ -1619,7 +1619,7 @@ if $ARGS[0] = 'sonia_outcast':
 				act 'Do something else': gt 'pav_disco_classmates', 'classmates'
 				act 'Ask her to dance':
 					*clr & cla
-					gs 'npc_relationship', 'modify', 'A25', 'like'
+					gs 'npc_relationship', 'modify', 'A25', 'like', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big25.jpg"></center>'
 					'You smile at her reaction. "Would you like to dance then?"'
@@ -1689,7 +1689,7 @@ if $ARGS[0] = 'sonia_outcast_dance':
 						if will_cost <= pcs_willpwr:
 							act 'No (<<will_cost>> Willpower)':
 								*clr & cla
-								gs 'npc_relationship', 'modify', 'A25', 'hate'
+								gs 'npc_relationship', 'modify', 'A25', 'hate', 1, 'pav_disco2'
 								gs 'willpower', 'pay', 'resist'
 								discoenable['A25'] = 0
 								minut += 5
@@ -1723,7 +1723,7 @@ end
 if $ARGS[0] = 'natasha':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A16', 'like'
+	gs 'npc_relationship', 'modify', 'A16', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,4) >= 3:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/natasha_dance.jpg"></center>'

+ 32 - 32
locations/pav_disco_gopniks.qsrc

@@ -7,9 +7,9 @@ if $ARGS[0] = 'vitek' or $ARGS[0] = 'dan' or $ARGS[0] = 'shulga': gt 'pav_disco_
 if $ARGS[0] = 'vitek_dan_vasily':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A9', 'like'
-	gs 'npc_relationship', 'modify', 'A10', 'like'
-	gs 'npc_relationship', 'modify', 'A11', 'like'
+	gs 'npc_relationship', 'modify', 'A9', 'like', 1, 'pav_disco'
+	gs 'npc_relationship', 'modify', 'A10', 'like', 1, 'pav_disco'
+	gs 'npc_relationship', 'modify', 'A11', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/vitek_dan_vasily.jpg"></center>'
 	'Vitek, Dan and Vasily are hanging out in the dark corner of the hall with the other gopniks. It''s dimly lit and hard to make out details, but it looks like they''re sharing some beers they''ve smuggled in.'
@@ -54,9 +54,9 @@ if $ARGS[0] = 'vitek_dan_vasily':
 					*clr & cla
 					gs 'willpower', 'pay', 'resist'
 					grupvalue[4] -= 1
-					gs 'npc_relationship', 'modify', 'A9', 'dislike'
-					gs 'npc_relationship', 'modify', 'A10', 'dislike'
-					gs 'npc_relationship', 'modify', 'A11', 'dislike'
+					gs 'npc_relationship', 'modify', 'A9', 'dislike', 1, 'pav_disco2'
+					gs 'npc_relationship', 'modify', 'A10', 'dislike', 1, 'pav_disco2'
+					gs 'npc_relationship', 'modify', 'A11', 'dislike', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/vitek_dan_vasily.jpg"></center>'
 					'You shake your head. "No thanks. Maybe later."'
@@ -82,9 +82,9 @@ if $ARGS[0] = 'vitek_dan_vasily':
 						*clr & cla
 						gs 'willpower', 'pay', 'resist'
 						grupvalue[4] -= 1
-						gs 'npc_relationship', 'modify', 'A9', 'dislike'
-						gs 'npc_relationship', 'modify', 'A10', 'dislike'
-						gs 'npc_relationship', 'modify', 'A11', 'dislike'
+						gs 'npc_relationship', 'modify', 'A9', 'dislike', 1, 'pav_disco2'
+						gs 'npc_relationship', 'modify', 'A10', 'dislike', 1, 'pav_disco2'
+						gs 'npc_relationship', 'modify', 'A11', 'dislike', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/vitek_dan_vasily.jpg"></center>'
 						'You shake your head. "No thanks. Maybe later."'
@@ -140,9 +140,9 @@ if $ARGS[0] = 'vitek_dan_vasily':
 					*clr & cla
 					gs 'willpower', 'pay', 'resist'
 					grupvalue[4] -= 1
-					gs 'npc_relationship', 'modify', 'A9', 'dislike'
-					gs 'npc_relationship', 'modify', 'A10', 'dislike'
-					gs 'npc_relationship', 'modify', 'A11', 'dislike'
+					gs 'npc_relationship', 'modify', 'A9', 'dislike', 1, 'pav_disco2'
+					gs 'npc_relationship', 'modify', 'A10', 'dislike', 1, 'pav_disco2'
+					gs 'npc_relationship', 'modify', 'A11', 'dislike', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/vitek_dan_vasily.jpg"></center>'
 					'You shake your head. "No thanks. Maybe later."'
@@ -168,9 +168,9 @@ if $ARGS[0] = 'vitek_dan_vasily':
 						*clr & cla
 						gs 'willpower', 'pay', 'resist'
 						grupvalue[4] -= 1
-						gs 'npc_relationship', 'modify', 'A9', 'dislike'
-						gs 'npc_relationship', 'modify', 'A10', 'dislike'
-						gs 'npc_relationship', 'modify', 'A11', 'dislike'
+						gs 'npc_relationship', 'modify', 'A9', 'dislike', 1, 'pav_disco2'
+						gs 'npc_relationship', 'modify', 'A10', 'dislike', 1, 'pav_disco2'
+						gs 'npc_relationship', 'modify', 'A11', 'dislike', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/vitek_dan_vasily.jpg"></center>'
 						'You shake your head. "No thanks. Maybe later."'
@@ -371,7 +371,7 @@ end
 if $ARGS[0] = 'radomir':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A154', 'like'
+	gs 'npc_relationship', 'modify', 'A154', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,3) = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/radomir_dance1.jpg"></center>'
@@ -392,7 +392,7 @@ if $ARGS[0] = 'radomir':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
 							minut += 5
-							gs 'npc_relationship', 'modify', 'A154', 'loathe'
+							gs 'npc_relationship', 'modify', 'A154', 'loathe', 1, 'pav_disco2'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big154.jpg"></center>'
 							'You try to twist your arm out of his grasp, but he has a very firm grip on you and unless you want to start a fight in the middle of the disco, you''re unable to get away. "Ow, let go! You''re hurting me!"'
@@ -429,7 +429,7 @@ if $ARGS[0] = 'radomir':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
 							minut += 5
-							gs 'npc_relationship', 'modify', 'A154', 'loathe'
+							gs 'npc_relationship', 'modify', 'A154', 'loathe', 1, 'pav_disco2'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big154.jpg"></center>'
 							'You try to twist your arm out of his grasp, but he has a very firm grip on you and unless you want to start a fight in the middle of the disco, you''re unable to get away. "Ow, let go! You''re hurting me!"'
@@ -467,7 +467,7 @@ if $ARGS[0] = 'radomir':
 					'"You''re too beautiful to stay here in the shadows. Why don''t we go and dance so I can show you off?"'
 					act 'No':
 						*clr & cla
-						gs 'npc_relationship', 'modify', 'A154', 'dislike'
+						gs 'npc_relationship', 'modify', 'A154', 'dislike', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big154.jpg"></center>'
 						'You shake your head. "No thanks, I don''t feel like dancing right now."'
@@ -512,7 +512,7 @@ if $ARGS[0] = 'radomir':
 							*clr & cla
 							gs 'willpower', 'pay', 'resist'
 							minut += 5
-							gs 'npc_relationship', 'modify', 'A154', 'loathe'
+							gs 'npc_relationship', 'modify', 'A154', 'loathe', 1, 'pav_disco2'
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big154.jpg"></center>'
 							'You try to twist your arm out of his grasp, but he has a very firm grip on you and unless you want to start a fight in the middle of the disco, you''re unable to get away. "Ow, let go! You''re hurting me!"'
@@ -536,7 +536,7 @@ if $ARGS[0] = 'radomir':
 					'"You''re too beautiful to stay here in the shadows. Why don''t we go and dance so I can show you off?"'
 					act 'No':
 						*clr & cla
-						gs 'npc_relationship', 'modify', 'A154', 'dislike'
+						gs 'npc_relationship', 'modify', 'A154', 'dislike', 1, 'pav_disco2'
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big154.jpg"></center>'
 						'You shake your head. "No thanks, I don''t feel like dancing right now."'
@@ -626,7 +626,7 @@ end
 if $ARGS[0] = 'roman':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A157', 'like'
+	gs 'npc_relationship', 'modify', 'A157', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big157.jpg"></center>'
 	'Roman is hanging out in the dark corner of the hall with the other gopniks. It''s dim and hard to make out details, but he seems to be talking to several of the other gopniks and sharing some beers they''ve smuggled in.'
@@ -660,7 +660,7 @@ if $ARGS[0] = 'roman':
 					*clr & cla
 					gs 'willpower', 'pay', 'resist'
 					grupvalue[4] -= 1
-					gs 'npc_relationship', 'modify', 'A157', 'loathe'
+					gs 'npc_relationship', 'modify', 'A157', 'loathe', 1, 'pav_disco2'
 					gs 'stat'
 					'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big156.jpg"></center>'
 					'You shake your head. "No thanks. Maybe later."'
@@ -717,7 +717,7 @@ end
 if $ARGS[0] = 'valentin':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A158', 'like'
+	gs 'npc_relationship', 'modify', 'A158', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big158.jpg"></center>'
 	'Valentin is hanging out in the dark corner of the hall with the other gopniks. It''s dim and hard to make out details, but he seems to be talking to several of the other gopniks while sharing some beers they''ve smuggled in.'
@@ -830,7 +830,7 @@ end
 if $ARGS[0] = 'arkadi':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A156', 'like'
+	gs 'npc_relationship', 'modify', 'A156', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big156.jpg"></center>'
 	'Arkadi is hanging out in the dark corner of the hall with the other gopniks. It''s dim and hard to make out details, but he seems to be talking to several of the other gopniks while sharing some beers they''ve smuggled in.'
@@ -914,7 +914,7 @@ end
 if $ARGS[0] = 'niko':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A189', 'like'
+	gs 'npc_relationship', 'modify', 'A189', 'like', 1, 'pav_disco'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big189.jpg"></center>'
 	act 'Do something else': gt 'pav_disco_classmates', 'classmates'
 !!	if dance = 1
@@ -924,7 +924,7 @@ end
 if $ARGS[0] = 'lavrenti':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A155', 'like'
+	gs 'npc_relationship', 'modify', 'A155', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,4) = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/lavrenti_dance1.jpg"></center>'
@@ -1077,7 +1077,7 @@ end
 if $ARGS[0] = 'pauline':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A24', 'like'
+	gs 'npc_relationship', 'modify', 'A24', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big24.jpg"></center>'
 	'Pauline is hanging out in the dark corner of the hall with the other gopniks. It''s dim and hard to make out details, but she seems to be talking to several of the other gopniks while sharing some beers they''ve smuggled in.'
@@ -1180,8 +1180,8 @@ if $ARGS[0] = 'lena' or $ARGS[0] = 'lera': gt  'pav_disco_gopniks', 'lena_lera'
 if $ARGS[0] = 'lena_lera':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A20', 'like'
-	gs 'npc_relationship', 'modify', 'A21', 'like'
+	gs 'npc_relationship', 'modify', 'A20', 'like', 1, 'pav_disco'
+	gs 'npc_relationship', 'modify', 'A21', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,3) = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/lena_lera_dance1.jpg"></center>'
@@ -1363,7 +1363,7 @@ end
 if $ARGS[0] = 'nush':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A144', 'like'
+	gs 'npc_relationship', 'modify', 'A144', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,2) = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/anushka_dance1.jpg"></center>'
@@ -1666,7 +1666,7 @@ end
 if $ARGS[0] = 'alyona':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A143', 'like'
+	gs 'npc_relationship', 'modify', 'A143', 'like', 1, 'pav_disco'
 	gs 'stat'
 	if rand(1,4) = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/school_kids/alyona_dance1.jpg"></center>'

+ 9 - 9
locations/pav_disco_jocks.qsrc

@@ -4,7 +4,7 @@
 if $ARGS[0] = 'lazar':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A149', 'like'
+	gs 'npc_relationship', 'modify', 'A149', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big149.jpg"></center>'
 	if rand(1,4) = 1:
@@ -134,7 +134,7 @@ end
 if $ARGS[0] = 'ivan':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A3', 'like'
+	gs 'npc_relationship', 'modify', 'A3', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big3.jpg"></center>'
 	'To your surprise, you see Ivan hanging out with the other jocks, talking to a few of them and smiling. You almost never see him here.'
@@ -192,7 +192,7 @@ end
 if $ARGS[0] = 'fedor':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A5', 'like'
+	gs 'npc_relationship', 'modify', 'A5', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big5.jpg"></center>'
 	if FedorLove < 0:
@@ -205,7 +205,7 @@ end
 if $ARGS[0] = 'svyatoslav':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A8', 'like'
+	gs 'npc_relationship', 'modify', 'A8', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big8.jpg"></center>'
 	if rand(1,4) = 1:
@@ -315,7 +315,7 @@ end
 if $ARGS[0] = 'vanya':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A165', 'like'
+	gs 'npc_relationship', 'modify', 'A165', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big165.jpg"></center>'
 	'You see Vanya hanging out with the cool kids and jocks.'
@@ -366,7 +366,7 @@ end
 if $ARGS[0] = 'erast':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A150', 'like'
+	gs 'npc_relationship', 'modify', 'A150', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big150.jpg"></center>'
 	'You''re a little surprised to see Erast hanging out with the cool kids and jocks, standing near one of the tables with his arms crossed. You rarely see him here and you don''t think he''s enjoying himself, but he gives polite smiles to people that talk to him.'
@@ -425,7 +425,7 @@ end
 if $ARGS[0] = 'albina':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A23', 'like'
+	gs 'npc_relationship', 'modify', 'A23', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big23.jpg"></center>'
 	if rand(1,4) <= 3:
@@ -749,7 +749,7 @@ end
 if $ARGS[0] = 'lariska':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A13', 'like'
+	gs 'npc_relationship', 'modify', 'A13', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big13.jpg"></center>'
 	if rand(1,4) <= 3:
@@ -870,7 +870,7 @@ end
 if $ARGS[0] = 'lina':
 	*clr & cla
 	minut += 5
-	gs 'npc_relationship', 'modify', 'A19', 'like'
+	gs 'npc_relationship', 'modify', 'A19', 'like', 1, 'pav_disco'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big19.jpg"></center>'
 	if rand(1,4) <= 3:

File diff suppressed because it is too large
+ 153 - 153
locations/pav_disco_sex.qsrc


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