Browse Source

Merge remote-tracking branch 'upstream/master'

Netuttki 2 years ago
parent
commit
c8ce571cff
100 changed files with 3171 additions and 2765 deletions
  1. 3 0
      changes from 0_8_5 to 0_8_6.txt
  2. 6 10
      glife.qproj
  3. 5 5
      locations/Cheatmenu_din.qsrc
  4. 3 5
      locations/FedorMisc.qsrc
  5. 439 391
      locations/KatjaHomeTalk.qsrc
  6. 21 3
      locations/Katja_Tanga.qsrc
  7. 1 1
      locations/Komp.qsrc
  8. 1 1
      locations/MartinSex.qsrc
  9. 3 3
      locations/MartinTalk.qsrc
  10. 3 3
      locations/TV.qsrc
  11. 2 2
      locations/_difficulty.qsrc
  12. 38 32
      locations/albina_chat.qsrc
  13. 36 37
      locations/albina_house_events.qsrc
  14. 1 1
      locations/albina_school_sex.qsrc
  15. 3 8
      locations/alexandriaEv.qsrc
  16. 4 1
      locations/arousal.qsrc
  17. 70 70
      locations/autosalonF.qsrc
  18. 22 17
      locations/bed2.qsrc
  19. 1 1
      locations/bedrPar.qsrc
  20. 95 308
      locations/begin.qsrc
  21. 0 3
      locations/body.qsrc
  22. 2 2
      locations/booty_call.qsrc
  23. 3 3
      locations/booty_call_after.qsrc
  24. 1 1
      locations/booty_call_morning.qsrc
  25. 1 1
      locations/brothel.qsrc
  26. 2 2
      locations/budilnik.qsrc
  27. 2 2
      locations/buklinik.qsrc
  28. 0 1
      locations/carF.qsrc
  29. 10 10
      locations/carF1.qsrc
  30. 1 1
      locations/cikl.qsrc
  31. 1 1
      locations/city_drugden.qsrc
  32. 2 2
      locations/city_industrial.qsrc
  33. 11 0
      locations/city_island.qsrc
  34. 5 3
      locations/city_sauna.qsrc
  35. 1 1
      locations/city_trashplace.qsrc
  36. 1 1
      locations/clothing.qsrc
  37. 1 1
      locations/clothing_QV.qsrc
  38. 0 1
      locations/danceGev.qsrc
  39. 10 10
      locations/din_van.qsrc
  40. 2 2
      locations/dina.qsrc
  41. 1 1
      locations/dreams.qsrc
  42. 0 1
      locations/drugs.qsrc
  43. 2 2
      locations/ender.qsrc
  44. 2 2
      locations/fame.qsrc
  45. 1 1
      locations/family.qsrc
  46. 1 1
      locations/fit.qsrc
  47. 1 1
      locations/food_menu.qsrc
  48. 1 1
      locations/foto_albums.qsrc
  49. 1 1
      locations/foto_events.qsrc
  50. 1 1
      locations/foto_model_documentary.qsrc
  51. 4 4
      locations/foto_models.qsrc
  52. 1 1
      locations/gaddvor.qsrc
  53. 1 1
      locations/gadfield.qsrc
  54. 85 87
      locations/gadforest.qsrc
  55. 9 9
      locations/gadforestlost.qsrc
  56. 1 1
      locations/gadriver.qsrc
  57. 2 2
      locations/gadroad.qsrc
  58. 1 1
      locations/gadsarai.qsrc
  59. 4 4
      locations/gadukino.qsrc
  60. 6 4
      locations/gameover.qsrc
  61. 3 3
      locations/gdksport.qsrc
  62. 6 6
      locations/gkafe.qsrc
  63. 1 1
      locations/grigory.qsrc
  64. 243 187
      locations/gschool_chats.qsrc
  65. 16 625
      locations/gschool_events.qsrc
  66. 1200 0
      locations/gschool_events1.qsrc
  67. 5 5
      locations/gschool_grounds.qsrc
  68. 2 2
      locations/gschool_jock_chats.qsrc
  69. 12 12
      locations/gschool_sex.qsrc
  70. 3 3
      locations/hookup.qsrc
  71. 1 1
      locations/hookup_after.qsrc
  72. 2 2
      locations/hookup_morning.qsrc
  73. 1 1
      locations/hunterLoveSex.qsrc
  74. 8 2
      locations/igor_schedule.qsrc
  75. 1 1
      locations/ilyroom.qsrc
  76. 9 29
      locations/intro_city.qsrc
  77. 1 2
      locations/intro_city_m.qsrc
  78. 205 293
      locations/intro_city_select.qsrc
  79. 10 43
      locations/intro_city_tg.qsrc
  80. 86 90
      locations/intro_customization.qsrc
  81. 10 16
      locations/intro_initialization.qsrc
  82. 141 30
      locations/intro_initialization_city.qsrc
  83. 9 5
      locations/intro_sg.qsrc
  84. 3 3
      locations/intro_sg_m.qsrc
  85. 131 237
      locations/intro_sg_select.qsrc
  86. 9 15
      locations/intro_sg_select_custom.qsrc
  87. 58 21
      locations/intro_sg_tg.qsrc
  88. 10 26
      locations/intro_uni.qsrc
  89. 1 2
      locations/intro_uni_m.qsrc
  90. 2 2
      locations/intro_uni_tg.qsrc
  91. 2 2
      locations/journal.qsrc
  92. 1 1
      locations/journal_quests.qsrc
  93. 16 12
      locations/katjaEv.qsrc
  94. 1 1
      locations/kuhrPar.qsrc
  95. 4 2
      locations/mainQW.qsrc
  96. 2 2
      locations/miroslava.qsrc
  97. 1 1
      locations/miroslavahome.qsrc
  98. 14 4
      locations/mirror.qsrc
  99. 2 2
      locations/mitka.qsrc
  100. 1 0
      locations/natbelEv.qsrc

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

@@ -22,6 +22,9 @@ katja_meynold_schedule
 igor_schedule
 pav_beach_chat
 katja_lake			<- split from katjaEv
+gschool_events1		<- split from gschool_events
+petkaEv			<- split from gschool_events
+pav_disco_classmates		<- split from pav_disco_coolkids
 
 body_desc
 AppearanceSystem               <- body

+ 6 - 10
glife.qproj

@@ -214,15 +214,6 @@
 		<Location name="succubus"/>
 		<Location name="serpent"/>
 	</Folder>
-	<Folder name="Prehistory">
-		<Location name="preSYS"/>
-		<Location name="preSYS2"/>
-		<Location name="preTG"/>
-		<Location name="preNT"/>
-		<Location name="preCUST"/>
-		<Location name="preALT"/>
-		<Location name="preCSB"/>
-	</Folder>
 	<Folder name="Intro">
 		<Location name="intro_sg"/>
 		<Location name="intro_sg_m"/>
@@ -234,7 +225,7 @@
 		<Location name="intro_uni_m"/>
 		<Location name="intro_uni_tg"/>
 		<Location name="intro_initialization"/>
-		<Location name="intro_initialization_uni"/>
+		<Location name="intro_initialization_city"/>
 		<Location name="intro_customization"/>
 		<Location name="intro_sg_select"/>
 		<Location name="intro_sg_select_custom"/>
@@ -557,6 +548,7 @@
 		<Location name="gschool_lunch"/>
 		<Location name="gschool_office"/>
 		<Location name="gschool_events"/>
+		<Location name="gschool_events1"/>
 		<Location name="gschool_gossip"/>
 		<Location name="gschool_groups"/>
 		<Location name="gschool_boys_bathroom"/>
@@ -613,6 +605,7 @@
 		<Location name="cumreaction"/>
 		<Location name="kotovtalker"/>
 		<Location name="pav_disco"/>
+		<Location name="pav_disco_classmates"/>
 		<Location name="pav_disco_coolkids"/>
 		<Location name="pav_disco_gopniks"/>
 		<Location name="pav_disco_jocks"/>
@@ -661,6 +654,9 @@
 		<Location name="natpimp"/>
 		<Location name="NatBelGo"/>
 	</Folder>
+	<Folder name="Petka">
+		<Location name="petkaEv"/>
+	</Folder>
 	<Folder name="Albina">
 		<Location name="albina_starlets_aftermath"/>
 		<Location name="albinahome"/>

+ 5 - 5
locations/Cheatmenu_din.qsrc

@@ -951,7 +951,7 @@ $cheatmenu['parameters'] = {
 	*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: musle = <<musle>>, salo =	<<salo>>, fat = <<fat>>'
+	'Muscularity: strenbuf = <<strenbuf>>, salo =	<<salo>>, fat = <<fat>>'
 	'Variable List:'
 	'agilbuf = <<agilbuf>>'
 	'strenbuf = <<strenbuf>>'
@@ -1190,7 +1190,7 @@ $cheatmenu['stats'] = {
 	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 StoryLine = 1 and SchoolAtestat = 0:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
 		*pl'<b>School:</b>'
 		if class['school_math_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''math'', 10 & dynamic $cheatmenu[''stats'']">Improve your Math grade: <<class[''school_math_grade'']>></a>'
 		if class['school_rus_grade'] < 100:*pl'<a href="exec:gs ''grades'', ''grade_award'',''school'', ''rus'', 10 & dynamic $cheatmenu[''stats'']">Improve your Russian grade: <<class[''school_rus_grade'']>></a>'
@@ -1272,7 +1272,7 @@ $cheatmenu['reputation'] = {
 	'<center>If they exceed this limit they will be reset overnight.</center>'
 	'<center><table  width="90%" cellspacing="0" cellpadding="0" valign="top">'
 	'<tr><td width="50%" cellpadding="10" valign="top">'
-	if storyline = 1:
+	if mid($start_type,1,2) = 'sg':
 		*nl
 		'Relationships in Pavlovsk'
 		*nl
@@ -1517,7 +1517,7 @@ $cheatmenu['reputation'] = {
 	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 StoryLine = 1:
+	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!'
@@ -1575,7 +1575,7 @@ $cheatmenu['documents'] = {
 	'<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 storyline = 1 and SchoolAtestat = 0: '<font color="red"><b>WARNING!</b></font>: This will end your school year!' & *nl
+	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'

+ 3 - 5
locations/FedorMisc.qsrc

@@ -70,7 +70,7 @@ if $ARGS[0] = 'Fedor Chat':
 	if ARGS[1] ! 1:
 		act 'Leave': gt 'gschool_lessons', 'short_break'
 	else
-		act 'Move away': gt 'pav_disco_coolkids', 'classmates'
+		act 'Move away': gt 'pav_disco_classmates', 'classmates'
 	end
 	
 	act 'Chat':
@@ -103,7 +103,7 @@ if $ARGS[0] = 'Fedor Chat':
 		if ARGS[1] ! 1:
 			act 'Leave': gt 'gschool_lessons', 'short_break'
 		else
-			act 'Move away': gt 'pav_disco_coolkids', 'classmates'
+			act 'Move away': gt 'pav_disco_classmates', 'classmates'
 		end
 	end
 
@@ -144,7 +144,7 @@ if $ARGS[0] = 'Fedor Hate':
 	if ARGS[1] ! 1:
 		act 'Leave': gt 'gschool_lessons', 'short_break'
 	else
-		act 'Move away': gt 'pav_disco_coolkids', 'classmates'
+		act 'Move away': gt 'pav_disco_classmates', 'classmates'
 	end
 end
 
@@ -519,7 +519,6 @@ if $ARGS[0] = 'Smoke':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	gs 'stat'
 	'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/school/hall/smoke.jpg"></center>'
@@ -538,7 +537,6 @@ if $ARGS[0] = 'Smoke 2':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	gs 'stat'
 	'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/school/hall/smoke.jpg"></center>'

File diff suppressed because it is too large
+ 439 - 391
locations/KatjaHomeTalk.qsrc


+ 21 - 3
locations/Katja_Tanga.qsrc

@@ -289,7 +289,13 @@ if $ARGS[0] = 'dance':
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_2.jpg"></center>'
 						'Laughing, you pull aside your dress and reveal one of your bare breasts. Katja looks at you, wanting more. "I showed you both of mine!" 
 						You smile. "Yeah, but you''re wearing panties and I''m not."'
-						act 'Move away': gt'pav_disco'
+						act 'Do something else': gt 'pav_disco_classmates', 'classmates'
+						if hour >= 20:
+							act 'Keep dancing': 
+								if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) 
+								gt 'pav_disco_coolkids', 'katja_dance'
+							end
+						end	
 					end
 				end
 				act 'Tease her':
@@ -299,7 +305,13 @@ if $ARGS[0] = 'dance':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco6_3.jpg"></center>'
 					'You pull at the edge of your dress, barely exposing one of your nipples as Katja indignantly squeaks."Hey, I showed you mine!"
 					You respond with a laugh. "I already showed you my pussy, so that makes us even."'
-					act 'Move away': gt'pav_disco'
+					act 'Do something else': gt 'pav_disco_classmates', 'classmates'
+					if hour >= 20:
+						act 'Keep dancing': 
+							if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) 
+							gt 'pav_disco_coolkids', 'katja_dance'
+						end
+					end
 				end
 			else
 				gs 'arousal', 'end'
@@ -315,7 +327,13 @@ if $ARGS[0] = 'dance':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_disco7_<<i>>.jpg"></center>'
 			'Katja doesn''t hesitate and lifts the hem of her skirt, showing you her bare pussy.'
 		end
-		act 'Move away': gt'pav_disco'
+		act 'Do something else': gt 'pav_disco_classmates', 'classmates'
+		if hour >= 20:
+			act 'Keep dancing': 
+				if katjaQW['QWstage'] > 2:katjaQW['horny'] += 5*(1 + npc_sex['A14']) 
+				gt 'pav_disco_coolkids', 'katja_dance'
+			end
+		end
 	end
 end
 

+ 1 - 1
locations/Komp.qsrc

@@ -82,7 +82,7 @@ if $ARGS[0] = 'brows':
 		if shantfoto > 0:act 'Find the girl you took photos of in the park on "Assbook"':gt 'komp', 'foto'
 		if gor_dorm = 7:act 'Read letter from Eugene':gt 'etoexhib', 'pos91'
 		if camwhore = 1 and $loc ! 'shulga_room' and $loc ! 'anushapt' and $loc ! 'artemhome' and $loc ! 'albinahome' and $loc ! 'pav_library':act 'Go to MyFreeCams.org':gt 'komp', 'mfc'
-		if (storyline = 1 and SchoolAtestat = 0) or func('uniutil', 'student', 'enrolled'):act 'Spend time studying':gt 'komp', 'study'
+		if (mid($start_type,1,2) = 'sg' and SchoolAtestat = 0) or func('uniutil', 'student', 'enrolled'):act 'Spend time studying':gt 'komp', 'study'
 		if sucpcinfo = 0 and succubxp > 0: act 'Research the strange feelings you''ve been having': gt 'succubus', 'kompresearch'
 	end
 end

+ 1 - 1
locations/MartinSex.qsrc

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

+ 3 - 3
locations/MartinTalk.qsrc

@@ -819,13 +819,13 @@ if $ARGS[0] = '':
 		'"Yeah, I guess we are. We don''t talk much, but," he taps his chest, just above the heart, "in here, where it counts, we care about each other. Always have."'
 		*nl
 		
-		if StoryLine = 1 and (npc_rel['A33'] >= 50 or npc_rel['A34'] >= 50):
+		if mid($start_type,1,2) = 'sg' and (npc_rel['A33'] >= 50 or npc_rel['A34'] >= 50):
 			'"Yeah, I know what you mean," you nod, thinking of your own siblings. "No matter where they are, you always know that somebody''s there for you."'
 			'"You have siblings?"'
 			'"An older sister and a younger brother", you nod. "My ' + iif(npc_rel['A33']>=npc_rel['A34'],'sister','brother') + ' and I are really close, but I care about both of them."'
 			'"There''s always a favorite sibling," he chuckles. "Usually the one who shared the most candy with you."'
 
-		elseif Storyline = 1:
+		elseif mid($start_type,1,2) = 'sg':
 			'"I wish I knew what that''s like. I have siblings, but we''re not very close."'
 			'"I was the same around your age," Martin admits, "but trust me: That can change quickly. Sometimes, the tiniest event can pull you closer together."'
 
@@ -936,7 +936,7 @@ if $ARGS[0] = 'MartinTalkApartment':
 		*nl
 		$OpenInnerThought+'He wouldn''t be Martin if he didn''t tell me to "watch out" at least once a day,'+$CloseInnerThought+' you think and roll your eyes, but still smile and say "I always do" before he has to get back to work.'
 	
-	elseif StoryLine = 1 and home_owned[2] = 1:
+	elseif mid($start_type,1,2) = 'sg' and home_owned[2] = 1:
 		'"I still live with my parents, in Pavlovsk," you admit.'
 		*nl
 		'"Oh, well, that can''t be easy at your age."'

+ 3 - 3
locations/TV.qsrc

@@ -19,7 +19,7 @@ if $ARGS[0] = 'start':
 		act 'Watch TV (1:00)': minut += 60 & gt 'TV', 'kable'
 	end
 
-	if daystart < 10 and StoryLine = 0 and ntstart = 0:'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
+	if daystart < 10 and $start_type[1] = 'tg':'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
 	act 'Turn off the TV and get off the couch':
 		cla
 		gt $loc, $loc_arg
@@ -34,7 +34,7 @@ if $ARGS[0] = 'nokable':
 	'<center><img <<$set_imgh>> src="images/shared/home/telek.jpg"></center>'
 	'You watch the network channel, lying on the couch. It''s all repeats and cheesy infomercials.'
 
-	if daystart < 10 and StoryLine = 0 and ntstart = 0:'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
+	if daystart < 10 and $start_type[1] = 'tg':'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
 
 	act 'Watch TV (1:00)': minut += 60 & gt 'TV', 'nokable'
 	act 'Turn off the TV and get off the couch': gt $loc, $loc_arg
@@ -48,7 +48,7 @@ if $ARGS[0] = 'kable':
 	'<center><img <<$set_imgh>> src="images/shared/home/telek.jpg"></center>'
 	'You watch cable television. It''s really good these days.'
 
-	if daystart < 10 and StoryLine = 0 and ntstart = 0:'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
+	if daystart < 10 and $start_type[1] = 'tg':'Sometimes while watching TV, you catch a glimpse of your legs or chest, and every time, it''s a bit shocking for you to see that your body is now that of a woman.'
 
 	act 'Watch TV (1:00)': minut += 60 & gt 'TV', 'kable'
 	act 'Turn off the TV and get off the couch': gt $loc, $loc_arg

+ 2 - 2
locations/_difficulty.qsrc

@@ -27,8 +27,8 @@ end &! --- getdifficulty ---
 !! easy peasy: 20
 !! use func('_difficulty','getexpadj')
 if $ARGS[0] = 'getexpadj':
-	!!Trait ''Everything is new again'', gained from the cursed school boy start
-	if csb_start = 1 and daystart <= 84: 
+	!!Trait ''Everything is new again'', gained from the sg_tg start
+	if $start_type = 'sg_tg' and daystart <= 84: 
 		result = 10 * difficulty
 	else
 		result = 20 * difficulty

+ 38 - 32
locations/albina_chat.qsrc

@@ -322,7 +322,7 @@ if $ARGS[0] = 'Cowgirl':
 	act'It feels better':
 		cla & *nl
 		'"It just feels better," you shrug. "I don''t know how to explain it. The angle? Just the way it fits inside when I''m on top? It feels good. What can I say?"'
-		'"I think it feels best in doggy," Albina says. "It goes way deeper and you can get surprise anal in that position which is the <i>best</i> kind of anal. Plus spankings. If I can''t sit down after a fuck, it was a good fuck."'
+		'"I think it feels best in doggy," Albina says. "It goes way deeper and you can get surprise anal in that position, which is the <i>best</i> kind of anal. Plus spankings. If I can''t sit down after a fuck, it was a good fuck."'
 		gs'albina_chat','Cowgirl2'
 	end
 	
@@ -363,7 +363,7 @@ if $ARGS[0] = 'Anal':
 	'''I would fuck Albina''s asshole while slapping her juicy cheeks like I''m playing some bongos!'' '
 	'''I bet her pussy is tighter than a nun''s with all the anal she does.'' '
 	*nl
-	'"I''ve heard them all, but none of the perverted fucking cowards dare mention them in front of me. To answer your question, I''m not going to. I don''t need to explain my sex life to anyone." She then turns away and goes quiet.'
+	'"I''ve heard them all, but none of the perverted fucking cowards dare mention them in front of me. To answer your question, I just like anal, okay? I don''t even know why I''m justifying my sex life to you!" She then turns away and goes quiet.'
 	'You''ve clearly hit a nerve and know better than to push her further, so you change the subject.'
 	act 'Stop talking': gt 'albinahome', 'bedroom'
 	act 'Change the subject': gt 'albina_chat', 'chat'
@@ -498,7 +498,7 @@ if $ARGS[0] = 'wine_chat1':
 				'"I l''ke the taste of my pussy too," you slur back.'
 				'"I fuhcking knew it!" Albina exclaims. "Every girl loves her own juice!"'
 				'"If you knew, then why are you asking if it''s weird?" you ask, puzzled.'
-				'"I jus'' wanted to see if <i>you</i> were the weird one!" Albina mumbles, voice echoing off the inside of the glass as she takes another sip.'
+				'"I jus'' wanted to see if <i>you</i> were the weird one!" Albina mumbles, her voice echoing off the inside of the glass as she takes another sip.'
 			end
 			gs'albina_chat','wine_chat2'
 		end
@@ -513,9 +513,15 @@ if $ARGS[0] = 'wine_chat1':
 	elseif albina['wine_convo'] = 2:
 		'Shaving convo'
 	elseif albina['wine_convo'] = 3:
-		'"Honest question Sveta. How would dominate me in bed?"'
+		'"Honest question <<$pcs_nickname>>. How would dominate me in bed?" she asks and looks up at you with a drunk smile.'
+		act 'Pound your ass':
+			cla & *nl
+			'You drunkenly smile down at her. "I''d get the biggest, <i>thickest</i> strap-on dildo I could find..." You lean in and softly whisper in her ear. "Then I would shove it up your tight ass and pound you until you cum like the buttslut you are..."'
+			'Albina bites her lip while moaning softly and squeezing her thighs together. "Oh <<$pcs_nickname>>, you''re making me wet just thinking about it. I love it when my ass gets stretched and left gaping wide..."'
+			gs 'albina_chat', 'wine_chat2'
+		end
 	elseif albina['wine_convo'] = 4:
-		'"How often do you masturbate Sveta? Do you have any dildos? Ever double penetrated yourself with them? Ever wanted to try it?"'
+		'"How often do you masturbate <<$pcs_nickname>>? Do you have any dildos? Ever double penetrated yourself with them? Ever wanted to try it?"'
 	elseif albina['wine_convo'] = 5:
 		'"What''s the sluttiest thing you''ve ever done?"'
 	elseif albina['wine_convo'] = 6:
@@ -546,7 +552,7 @@ if $ARGS[0] = 'wine_chat1':
 					gs'albina_chat','wine_chat2'
 				end
 			end
-			
+
 			act'Nope, never':
 				cla & *nl
 				'"Nope!" you say, popping the P with your lips. "Neverrrrrr."'
@@ -554,7 +560,7 @@ if $ARGS[0] = 'wine_chat1':
 				'"Nneh," you shrug. "You ged used to it."'
 				gs'albina_chat','wine_chat2'
 			end
-						
+
 			act'I hate them':
 				cla & *nl
 				'"Neverrr!" you say, wrinkling your nose. "I <i>hate</i> wearing them!"'
@@ -570,31 +576,31 @@ if $ARGS[0] = 'wine_chat1':
 				'"Hah! Slut!" she shouts, taking another slurp of her wine.'
 				gs'albina_chat','wine_chat2'
 			end
-			
+
 			act'Rarely':
 				cla & *nl
-				
-				
+
+
 				gs'albina_chat','wine_chat2'
-			
+
 			end
 		else
 			albina['commando_know'] = 0
 			act'Nope, never':
 				cla & *nl
-				
-				
+
+
 				gs'albina_chat','wine_chat2'
 			end
-			
+
 			act'I hate them':
 				cla & *nl
-				
-				
+
+
 				gs'albina_chat','wine_chat2'
-			
+
 			end
-			
+
 		end
 	elseif albina['wine_convo'] = 8:
 		'"Do you think I would make a good stripper?" Albina asks.'
@@ -604,7 +610,7 @@ if $ARGS[0] = 'wine_chat1':
 			'"Was thinking about how to pay for uni. Mama could probably do it for me, but what if I want some extra cash on the side?"'
 			gs'albina_chat','wine_chat2'
 		end
-		
+
 		act'Too bitchy':
 			cla & *nl
 			'"Nah." You wave your glass dismissively. "You''re too bitchy."'
@@ -628,7 +634,7 @@ if $ARGS[0] = 'wine_chat2':
 		'"Fuck yeah, I am. And I <i>love</i> being one," she grins back, almost spilling her wine all over her face when you both cackle with uncontrollable laughter.'
 		act'Continue':gt'albina_chat','wine_chat1'
 	end
-	
+
 	act'Spit or swallow?':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
@@ -642,7 +648,7 @@ if $ARGS[0] = 'wine_chat2':
 			'"But if he comes in your mouth, that means he wants you to swallow, right?" she says, looking genuinely confused that you''re suggesting there''s a choice.'
 			act'Continue':gt'albina_chat','wine_chat1'
 		end
-		
+
 		act'Me too':
 			cla & *nl
 			'"Me too," you mumble. "Spitting is quitting."'
@@ -662,7 +668,7 @@ if $ARGS[0] = 'wine_chat2':
 			end
 		end
 	end
-	
+
 	act'Your mom is is very pretty':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
@@ -671,18 +677,18 @@ if $ARGS[0] = 'wine_chat2':
 		'"Fucking hell, I <i>knowwwwwwww</i>," Albina whines beneath you. "I gots ass fer dayz, but she''s gots tits to match. Big fucking bootyful bounshy tits that give ''er cleavage in a t-shirt. <i>And</i> a great ass! Life is so un-fucking-fair..."'
 		act'Continue':gt'albina_chat','wine_chat1'
 	end
-	
+
 	act'':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
-		
+
 		act'Continue':gt'albina_chat','wine_chat1'
 	end
-	
+
 	act'':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/wine_talk.jpg"></center>'
-		
+
 		act'Continue':gt'albina_chat','wine_chat1'
 	end
 end
@@ -786,7 +792,7 @@ if $ARGS[0] = 'first_visit2':
 				'Not saying anything else, you awkwardly pick up your things and walk towards the door. Albina sits in silence, her shoulders hunched as she stares downward. As far as you know, she doesn''t move even as you close the door behind you.'
 				act 'Leave':gt 'pav_residential'
 			end
-			
+
 			act 'Comfort her':
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/comfort.jpg"></center>'
@@ -812,7 +818,7 @@ if $ARGS[0] = 'first_visit2':
 						'Your friend truly comforted, you finally collect your things and bid her farewell. She takes you to the door and as you walk down the driveway, both of you waving goodbye, you think you catch sight of the first genuine smile you''ve ever seen on Albina''s face.'
 						act 'Leave':gt 'pav_residential'
 					end
-					
+
 					act 'Kiss her':
 						gs 'arousal', 'kiss', -5
 						cla & *clr
@@ -824,8 +830,8 @@ if $ARGS[0] = 'first_visit2':
 					end
 				end
 			end
-			
-			
+
+
 			act 'Kiss her':
 				cla & *clr
 				gs 'arousal', 'kiss', -5
@@ -843,7 +849,7 @@ if $ARGS[0] = 'first_visit2':
 	else
 		act 'Pull 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 'Kiss her back':
 		*clr & cla
 		gs 'arousal', 'kiss', 2
@@ -911,7 +917,7 @@ if $ARGS[0] = 'first_sex':
 					'The two of you lay on her bed, slowly recovering after your high-intensity orgasms. Incredibly, Albina''s pussy continues to trickle a steady stream of juices, even several minutes later.'
 					'"Oh fuck," she breathes. "I get so wet after I cum, but this is just ridiculous! What did you do to me <<$pcs_nickname>>?"'
 					'You laugh, finally managing to prop yourself up. You look over at her and her expression seems to change to something more tender.'
-					'"Thanks <<$pcs_nickname>>. It was nice to let it all out... and I''m not just talking about my feelings..." she says, expression turning mischevious again. "Thanks for being a good friend."' 
+					'"Thanks <<$pcs_nickname>>. It was nice to let it all out... and I''m not just talking about my feelings..." she says, expression turning mischevious again. "Thanks for being a good friend."'
 					act 'Get dressed':
 						cla & *clr
 						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinahome.jpg"></center>'

+ 36 - 37
locations/albina_house_events.qsrc

@@ -677,7 +677,7 @@ if $ARGS[0] = 'computer':
 	if AlbinaQW['CompUse'] = 0:
 		AlbinaQW['CompUse'] = 1
 		*clr & cla
-		'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/laptop.jpg"></center>'
+		'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/albinahome/laptop.jpg"></center>'
 		'You point towards the laptop sitting at the foot of her bed. "I should''ve guessed that you would have something like that."'
 		'"Yeah, I honestly don''t know why I bought it. I sometimes look up workout techniques and sex tips, but I mostly just use it to watch porn when I feel like rubbing one out."'
         'You''re a little surprised that she would admit such a thing to you given how private and guarded she is about herself.'
@@ -686,51 +686,50 @@ if $ARGS[0] = 'computer':
 		
 	elseif AlbinaQW['CompUse'] > 0:
 		*clr & cla
-		'You decide to use Albina''s laptop while she''s gone, despite knowing she would be upset at you doing so. You boot it up and are a little surprised to find that such a private person doesn''t have a password on her laptop.'
-		act 'Turn it off':gt 'albinahome','bedroom'
-		act 'Go online': gt 'Komp', 'start'
-		act 'Check out her porn':
-			*clr & cla
+		'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/komp.jpg"></center>'
+		'You decide to use Albina''s laptop while she''s gone, despite knowing she would be upset at you doing so. You boot it up, but are confronted by a screen asking for a password.'
+		if rand(1,5) = 1:		
 			'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/komp.jpg"></center>'
-			'You get comfortable on the bed in front of the laptop. You''re curious about what sort of porn Albina would watch, so you click on the internet browser and look through her browsing history.'
-			*nl
-			'You aren''t surprised to find that she watches a lot of anal and lesbian sex, but are surprised to see that she also likes watching BDSM. You feel yourself getting aroused as you keep browsing.'
-			gs 'arousal', 'porn', 10
-			act 'Turn it off':gt 'albinahome','bedroom'
-			act 'Masturbate':
+			'Taking a wild guess, you manage to successfully input the correct password and her desktop loads up. You wonder if you should risk snooping around before she comes back.'
+			act 'Turn it off':
 				*clr & cla
-		
-				'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/kompmas.jpg"></center>'
-				'While browsing, you find a title you like the sound of and sit back on the bed to start watching. Before long, you pull your clothes aside and find yourself masturbating to the video, having completely forgotten where you are.'
-				$orgasm_or = 'no'
-				gs 'arousal', 'clit_finger', 10, 'masturbate'
-				act 'Continue':
+				'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/albinahome/laptop.jpg"></center>'
+				'You decide not to risk it and turn the laptop off before closing the screen.'
+				act 'Wait for Albina to return':gt 'albinahome','bedroom'
+			end
+			act 'Check out her porn':
+				*clr & cla
+				'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/komp.jpg"></center>'
+				'You''re curious about what sort of porn Albina would watch, so you click on the internet browser and proceed to look through her browsing history.'
+				'You aren''t surprised to find that she watches a lot of anal and lesbian sex, but are surprised to see that she also likes watching BDSM. You feel yourself getting aroused as you keep browsing.'
+				gs 'arousal', 'porn', 10
+				act 'Turn it off':
+					*clr & cla
+					'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/albinahome/laptop.jpg"></center>'
+					'Although you''re turned on by what you''ve seen, you decide not to risk getting caught and turn the laptop off before closing the screen.'
+					act 'Wait for Albina to return':gt 'albinahome','bedroom'
+				end
+				act 'Masturbate':
 					*clr & cla
-					
 					'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/kompmas.jpg"></center>'
-					'You keep rubbing your clit as you feel your climax building through the pleasure.'
-					temp = rand(0,3)
-					if temp = 0:
-                     npc_rel['A23'] -= 5
-						'Just as you''re about to cum, you hear someone clearing their throat. Your heart leaps into your mouth and you turn to see Albina standing in the doorway watching you. You quickly rip your hand from between your legs and pull your clothes back into place. You can tell she''s pissed at you as she storms over and slams the laptop screen down. "Have fun <<$pcs_nickname>>?" You sheepishly apologize as she takes the laptop and throws it aside, not caring as it clatters across the floor. "Don''t touch my stuff when I''m not here!"'
-						act 'Find something else to do':gt 'albinahome','bedroom'
-		
-					else
-						'You lean back and spread your legs wide as you feel your climax approaching. You clamp your free hand over your mouth to muffle your screams as an intense orgasm rocks your body. It takes you a few minutes to recover once it''s over, and you manage to fix your clothes and turn the laptop off before Albina returns.'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'clit_finger', 'masturbate', 10
-						gs 'arousal', 'end'
-						gs 'stat'
-						act 'Find something else to do':gt 'albinahome','bedroom'
-					end
-					killvar 'temp'
+					'While browsing, you find a title you like the sound of and sit back on the bed to start watching it. It turns you on and you instinctively start rubbing your clit through your clothes.'
+					'The video is very arousing and you find yourself getting wet after just a few seconds. Just as you''re about to cum, your heart leaps into your mouth when you hear someone approaching. You quickly rip your hand from between your legs and slam the laptop screen down before Albina walks into the room.'
+					$orgasm_or = 'no'
+					gs 'arousal', 'clit_finger', 10, 'masturbate'
+					gs 'arousal', 'end'
+					gs 'stat'
+					act 'Find something else to do':gt 'albinahome','bedroom'
 				end
 			end
+		else
+			'<center><img <<$set_imgh>>src="images/pc/items/accessories/computer/komp.jpg"></center>'
+			'Despite your best efforts, you fail to guess her password and stop before you end up locking it with another incorrect attempt. You close the screen before Albina walks back into the room.'
+			act 'Find something else to do': gt 'albinahome', 'bedroom'
 		end
 	else
 		*clr & cla
-		'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/laptop.jpg"></center>'
-		'You know Albina values her privacy and using her laptop without her permission would break the trust she has in you, so you decide to leave it alone.'
+		'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/albinahome/laptop.jpg"></center>'
+		'You know Albina greatly values her privacy and using her laptop without her permission would break the trust she has in you, so you decide to leave it alone.'
 		act 'Return': gt 'albinahome','bedroom'
 	end
 end

+ 1 - 1
locations/albina_school_sex.qsrc

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

+ 3 - 8
locations/alexandriaEv.qsrc

@@ -210,16 +210,11 @@ if $ARGS[0] = 'interview3':
 	'<center><b><font color="maroon">Aleksei?</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/city/alexandria/chair.jpg"></center>'
 	'You finally reach a study where a morose... Alexandria? Sits on a couch, and in an interesting twist, there isn''t another one for you.'
-	if $start_type = 'tg':
+	if $start_type[1] = 'tg':
 		npc_rel['A241'] +=1
-		'"Yes Mr. Kuznetsu... I am another victim of Rikudo''s games, that is the reason for my interest in you."'
+		'"Yes Mr. Ivanov... I am another victim of Rikudo''s games, that is the reason for my interest in you."'
 	else
-		if csb_start = 1:
-			npc_rel['A241'] +=1
-			'"Yes Mr. Ivanov... I am another victim of Rikudo''s games, that is the reason for my interest in you."'
-		else
-			'"Yes... Cursed by Rikudo, the being that created The Talisman of Power, and the reason for my interest in you."'
-		end
+		'"Yes... Cursed by Rikudo, the being that created The Talisman of Power, and the reason for my interest in you."'
 	end
 	'After this little revelation, he exhales a big puff of smoke, and continue with his explanation.'
 	'"As I remember telling you the last time we meet, my name is Aleksei, and the hows and whys of my curse is better left for another time, suffice is to say, that is my understanding, that you and your relation with the powers that have been transferred to your persona, holds the key to break my current predicament. As you can see from our early confrontation, the powers that be, wanted the monopoly over your attention, so I looked for an alternative, that is the reason after the... convoluted way we met in Aphrodite, hm... as an afterthought, if you want to know, I took care of that little parasite, banishing it."'

+ 4 - 1
locations/arousal.qsrc

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

+ 70 - 70
locations/autosalonF.qsrc

@@ -15,30 +15,30 @@ if $ARGS[0] = 'start':
 	nl
 	$car_table = '<center><table border=0>'
 	$car_table += '<TH>Car</TH><TH></TH><TH>Price in <b>₽</b></TH>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''6''">Kalina VAZ</a>.</TD><TD> - </TD><TD> 400,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''7''">WHA PRIORA</a>.</TD><TD> - </TD><TD> 450,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''8''">Chevrolet NIVA</a>.</TD><TD> - </TD><TD> 500,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''9''">UAZ HUNTER</a>.</TD><TD> - </TD><TD> 500,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''10''">UAZ Patriot</a>.</TD><TD> - </TD><TD> 600,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''13''">Ford Focus 2</a>.</TD><TD> - </TD><TD> 500,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''102''">Renault LOGAN</a>.</TD><TD> - </TD><TD> 700,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''110''">Ford Mondeo</a>.</TD><TD> - </TD><TD> 850,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''104''">Toyota Celica</a>.</TD><TD> - </TD><TD> 1,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''95''">Mitsubishi l200</a>.</TD><TD> - </TD><TD> 1,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''103''">Toyota Corolla</a>.</TD><TD> - </TD><TD> 1,100,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''105''">Mazda 6</a>.</TD><TD> - </TD><TD> 1,200,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''106''">Mercedes-Benz E 212</a>.</TD><TD> - </TD><TD> 1,700,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''109''">Audi A6</a>.</TD><TD> - </TD><TD> 1,900,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''97''">Cadillac Escalade</a>.</TD><TD> - </TD><TD> 2,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''101''">BMW Z4</a>.</TD><TD> - </TD><TD> 3,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''107''">BMW M5</a>.</TD><TD> - </TD><TD> 4,500,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''99''">BMW X6</a>.</TD><TD> - </TD><TD> 4,500,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''96''">Audi Q7</a>.</TD><TD> - </TD><TD> 5,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''98''">Porsche Cayenne</a>.</TD><TD> - </TD><TD> 5,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''108''">Jaguar XKR-S</a>.</TD><TD> - </TD><TD> 7,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''100''">Mercedes-Benz S 600</a>.</TD><TD> - </TD><TD> 8,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''111''">Bentley Continental gt</a>.</TD><TD> - </TD><TD> 10,000,000 </TD>'
-	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''112''">Ferrari 458 Italia</a>.</TD><TD> - </TD><TD> 20,000,000 </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''6''">LADA Kalina</a>.</TD><TD> - </TD><TD> 535,800 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''7''">LADA Vesta</a>.</TD><TD> - </TD><TD> 645,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''8''">Chevrolet NIVA</a>.</TD><TD> - </TD><TD> 625,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''9''">UAZ HUNTER</a>.</TD><TD> - </TD><TD> 600,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''10''">UAZ Patriot</a>.</TD><TD> - </TD><TD> 760,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''13''">Ford Focus</a>.</TD><TD> - </TD><TD> 884,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''102''">Renault LOGAN</a>.</TD><TD> - </TD><TD> 649,990 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''110''">Ford Mondeo</a>.</TD><TD> - </TD><TD> 1,329,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''104''">Toyota Camry</a>.</TD><TD> - </TD><TD> 1,484,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''95''">Mitsubishi L200</a>.</TD><TD> - </TD><TD> 1,749,990 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''103''">Toyota Corolla</a>.</TD><TD> - </TD><TD> 1,097,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''105''">Mazda 6</a>.</TD><TD> - </TD><TD> 1,299,700 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''106''">Mercedes-Benz E-Class</a>.</TD><TD> - </TD><TD> 2,950,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''109''">Audi A6</a>.</TD><TD> - </TD><TD> 2,914,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''97''">Lexus RX 350</a>.</TD><TD> - </TD><TD> 3,374,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''101''">BMW 3-Seria</a>.</TD><TD> - </TD><TD> 2,721,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''107''">BMW M5</a>.</TD><TD> - </TD><TD> 7,000,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''99''">BMW X6</a>.</TD><TD> - </TD><TD> 5,366,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''96''">Audi Q7</a>.</TD><TD> - </TD><TD> 5,000,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''98''">Porsche Cayenne</a>.</TD><TD> - </TD><TD> Price: 5,500,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''108''">Jaguar XJ</a>.</TD><TD> - </TD><TD> 6,500,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''100''">Mercedes-Benz S-Class</a>.</TD><TD> - </TD><TD> 7,600,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''111''">Bentley Continental GT</a>.</TD><TD> - </TD><TD> 13,000,000 <b>₽</b> </TD>'
+	$car_table += '<TR><TD><a href="exec:GS ''carF1'',''112''">Ferrari 458 Italia</a>.</TD><TD> - </TD><TD> 14,000,000 <b>₽</b> </TD>'
 	$car_table += '</table></center>'
 	
 	$car_table
@@ -66,100 +66,100 @@ if $ARGS[0] = 'manager1':
 	act 'Leave':gt 'city_industrial'
 
 	if prava = 1:
-		if karta + bankDebtLimit >= 400000:
-			act 'Buy a Kalina VAZ (400,000 <b>₽</b>)':gt 'autosalonF', 'buy', 400000, 'Kalina VAZ', 6, 400
+		if karta + bankDebtLimit >= 535800:
+			act 'Buy a LADA Kalina (535,800 <b>₽</b>)':gt 'autosalonF', 'buy', 535800, 'LADA Kalina', 6, 400
 		end
 
-		if karta + bankDebtLimit >= 450000:
-			act 'Buy a VAZ Priora (450,000 <b>₽</b>)':gt 'autosalonF', 'buy', 450000, 'WHA PRIORA', 7, 450
+		if karta + bankDebtLimit >= 645000:
+			act 'Buy a LADA Vesta (645,000 <b>₽</b>)':gt 'autosalonF', 'buy', 645000, 'LADA Vesta', 7, 450
 		end
 
-		if karta + bankDebtLimit >= 500000:
-			act 'Buy a Chevrolet Niva (500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 500000, 'Chevrolet NIVA', 8, 500
+		if karta + bankDebtLimit >= 625000:
+			act 'Buy a Chevrolet Niva (625,000 <b>₽</b>)':gt 'autosalonF', 'buy', 625000, 'Chevrolet NIVA', 8, 500
 		end
 
-		if karta + bankDebtLimit >= 500000:
-			act 'Buy a UAZ Hunter (500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 500000, 'UAZ HUNTER', 9, 300
+		if karta + bankDebtLimit >= 600000:
+			act 'Buy a UAZ Hunter (600,000 <b>₽</b>)':gt 'autosalonF', 'buy', 600000, 'UAZ HUNTER', 9, 300
 		end
 
-		if karta + bankDebtLimit >= 600000:
-			act 'Buy a UAZ Patriot (600,000 <b>₽</b>)':gt 'autosalonF', 'buy', 600000, 'UAZ Patriot', 10, 400
+		if karta + bankDebtLimit >= 760000:
+			act 'Buy a UAZ Patriot (760,000 <b>₽</b>)':gt 'autosalonF', 'buy', 760000, 'UAZ Patriot', 10, 400
 		end
 
-		if karta + bankDebtLimit >= 500000:
-			act 'Buy a Ford Focus 2 (500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 500000, 'Ford Focus 2', 13, 800
+		if karta + bankDebtLimit >= 884000:
+			act 'Buy a Ford Focus (884,000 <b>₽</b>)':gt 'autosalonF', 'buy', 884000, 'Ford Focus', 13, 800
 		end
 
-		if karta + bankDebtLimit >= 700000:
-			act 'Buy a Renault LOGAN (700,000 <b>₽</b>)':gt 'autosalonF', 'buy', 700000, 'Renault LOGAN', 102, 1000
+		if karta + bankDebtLimit >= 649990:
+			act 'Buy a Renault LOGAN (649,990 <b>₽</b>)':gt 'autosalonF', 'buy', 649990, 'Renault LOGAN', 102, 1000
 		end
 
-		if karta + bankDebtLimit >= 850000:
-			act 'Buy a Ford Mondeo (850,000 <b>₽</b>)':gt 'autosalonF', 'buy', 850000, 'Ford Mondeo', 110, 2000
+		if karta + bankDebtLimit >= 1329000:
+			act 'Buy a Ford Mondeo (1,329,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1329000, 'Ford Mondeo', 110, 2000
 		end
 
-		if karta + bankDebtLimit >= 1000000:
-			act 'Buy a Toyota Celica (1,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1000000, 'Toyota Celica', 104, 3000
+		if karta + bankDebtLimit >= 1484000:
+			act 'Buy a Toyota Camry (1,484,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1484000, 'Toyota Camry', 104, 3000
 		end
 
-		if karta + bankDebtLimit >= 1000000:
-			act 'Buy a Mitsubishi l200 (1,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1000000, 'Mitsubishi l200', 95, 2000
+		if karta + bankDebtLimit >= 1749990:
+			act 'Buy a Mitsubishi L200 (1,749,990 <b>₽</b>)':gt 'autosalonF', 'buy', 1749990, 'Mitsubishi L200', 95, 2000
 		end
 
-		if karta + bankDebtLimit >= 1100000:
-			act 'Buy a Toyota Corolla (1,100,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1100000, 'Toyaboutta Corolla', 103, 3000
+		if karta + bankDebtLimit >= 1097000:
+			act 'Buy a Toyota Corolla (1,097,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1097000, 'Toyaboutta Corolla', 103, 3000
 		end
 
-		if karta + bankDebtLimit >= 1200000:
-			act 'Buy a Mazda 6 (1,200,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1200000, 'Mazda 6', 105, 3000
+		if karta + bankDebtLimit >= 1299700:
+			act 'Buy a Mazda 6 (1,299,700 <b>₽</b>)':gt 'autosalonF', 'buy', 1299700, 'Mazda 6', 105, 3000
 		end
 
-		if karta + bankDebtLimit >= 1700000:
-			act 'Buy a Mercedes-Benz E 212 (1,700,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1700000, 'Mercedes-Benz E 212', 106, 5000
+		if karta + bankDebtLimit >= 2950000:
+			act 'Buy a Mercedes-Benz E-Class (2,950,000 <b>₽</b>)':gt 'autosalonF', 'buy', 2950000, 'Mercedes-Benz E-Class', 106, 5000
 		end
 
-		if karta + bankDebtLimit >= 1900000:
-			act 'Buy an Audi A6 (1,900,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1900000, 'Audi A6', 109, 5000
+		if karta + bankDebtLimit >= 2914000:
+			act 'Buy an Audi A6 (2,914,000 <b>₽</b>)':gt 'autosalonF', 'buy', 2914000, 'Audi A6', 109, 5000
 		end
 
-		if karta + bankDebtLimit >= 2000000:
-			act 'Buy a Cadillac Escalade (2,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 2000000, 'Cadillac Escalade', 97, 4000
+		if karta + bankDebtLimit >= 3374000:
+			act 'Buy a Lexus RX 350(3,374,000 <b>₽</b>)':gt 'autosalonF', 'buy', 3374000, 'Lexus RX 350', 97, 4000
 		end
 
-		if karta + bankDebtLimit >= 3000000:
-			act 'Buy a BMW Z4 (3,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 3000000, 'BMW Z4', 101, 4000
+		if karta + bankDebtLimit >= 2721000:
+			act 'Buy a BMW 3-Seria (2,721,000 <b>₽</b>)':gt 'autosalonF', 'buy', 2721000, 'BMW 3-Seria', 101, 4000
 		end
 
-		if karta + bankDebtLimit >= 4500000:
-			act 'Buy a BMW M5 (4,500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 4500000, 'BMW M5', 107, 6000
+		if karta + bankDebtLimit >= 7000000:
+			act 'Buy a BMW M5 (7,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 7000000, 'BMW M5', 107, 6000
 		end
 
-		if karta + bankDebtLimit >= 4500000:
-			act 'Buy a BMW X6 (4,500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 4500000, 'BMW X6', 99, 4000
+		if karta + bankDebtLimit >= 5366000:
+			act 'Buy a BMW X6 (5,366,000 <b>₽</b>)':gt 'autosalonF', 'buy', 5366000, 'BMW X6', 99, 4000
 		end
 
 		if karta + bankDebtLimit >= 5000000:
 			act 'Buy an Audi Q7 (5,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 5000000, 'Audi Q7', 96, 5000
 		end
 
-		if karta + bankDebtLimit >= 5000000:
-			act 'Buy a Porsche Cayenne (5,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 5000000, 'Porsche Cayenne', 98, 3000
+		if karta + bankDebtLimit >= 5500000:
+			act 'Buy a Porsche Cayenne (5,500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 5500000, 'Porsche Cayenne', 98, 3000
 		end
 
-		if karta + bankDebtLimit >= 7000000:
-			act 'Buy a Jaguar XKR-S (7,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 7000000, 'Jaguar XKR-S', 108, 4000
+		if karta + bankDebtLimit >= 6500000:
+			act 'Buy a Jaguar XJ (6,500,000 <b>₽</b>)':gt 'autosalonF', 'buy', 6500000, 'Jaguar XJ', 108, 4000
 		end
 
-		if karta + bankDebtLimit >= 8000000:
-			act 'Buy a Mercedes-Benz S 600 (8,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 8000000, 'Mercedes-Benz S 600', 100, 8000
+		if karta + bankDebtLimit >= 7600000:
+			act 'Buy a Mercedes-Benz S-Class (7,600,000 <b>₽</b>)':gt 'autosalonF', 'buy', 7600000, 'Mercedes-Benz S-Class', 100, 8000
 		end
 
-		if karta + bankDebtLimit >= 10000000:
-			act 'Buy a Bentley Continental GT (10,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 10000000, 'Bentley Continental GT', 111, 8000
+		if karta + bankDebtLimit >= 13000000:
+			act 'Buy a Bentley Continental GT (13,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 13000000, 'Bentley Continental GT', 111, 8000
 		end
 
-		if karta + bankDebtLimit >= 20000000:
-			act 'Buy a Ferrari 458 Italia (20,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 20000000, 'Ferrari 458 Italia', 112, 10000
+		if karta + bankDebtLimit >= 14000000:
+			act 'Buy a Ferrari 458 Italia (14,000,000 <b>₽</b>)':gt 'autosalonF', 'buy', 14000000, 'Ferrari 458 Italia', 112, 10000
 		end
 	end
 end

+ 22 - 17
locations/bed2.qsrc

@@ -99,10 +99,12 @@ if $ARGS[0] = '':
 					gs 'underwear', 'wear'
 				end
 				if disable_autosave = 0:
-					if StoryLine = 0:
-						savegame 'autosave.sav'
+					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_alt.sav'
+						savegame 'autosave_sg.sav'
 					end
 				end
 				if $clothingworntype ! 'nude':
@@ -183,13 +185,12 @@ if $ARGS[0] = 'sleep':
 	end
 	pcs_hairbsh = 0
 	pain['killer'] = 0
-	if StoryLine = 1 and $loc ! 'bedrPar' and SchoolAtestat = 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'
 
@@ -512,14 +513,14 @@ if $ARGS[0] = 'wake_horny':
 end
 
 if $ARGS[0] = 'wake':
-	if StoryLine = 1 and indorf = 0 and motherQW['bathroom_dildos'] > 0 and MarishaQW["marisha_sleepover"] = 0:gt'mother_sextalk','dildo_wakeup1'
+	if mid($start_type,1,2) = 'sg' and indorf = 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 StoryLine = 0 and ntstart = 0:'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 StoryLine = 0 and ntstart = 0:'Looking at your female body, you are still a little surprised it''s actually you.'
-	if slept_in = 1 and kanikuli = 0 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 9 and hour < 14 and suspended['on'] ! 1:
+	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'
@@ -538,7 +539,7 @@ if $ARGS[0] = 'wake':
 			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 StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 4 and hour < 9:
+	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'
@@ -575,7 +576,7 @@ if $ARGS[0] = 'wake':
 			end
 			gs 'bed2', 'end'
 		end
-		if kanikuli = 0 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6 and hour >= 4 and hour < 9 and suspended['on'] ! 1:
+		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
@@ -635,10 +636,12 @@ if $ARGS[0] = 'succhoice':
 	'<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 StoryLine = 0:
-				savegame 'autosave.sav'
+			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_alt.sav'
+				savegame 'autosave_sg.sav'
 			end
 		end
 		gt 'bed2', 'sleep'
@@ -663,10 +666,12 @@ if $ARGS[0] = 'succhoiceNO':
 	gs 'stat'
 	act 'Go to sleep':
 		if disable_autosave = 0:
-			if StoryLine = 0:
-				savegame 'autosave.sav'
+			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_alt.sav'
+				savegame 'autosave_sg.sav'
 			end
 		end
 		gt 'bed2', 'sleep'

+ 1 - 1
locations/bedrPar.qsrc

@@ -130,7 +130,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 			'Your <a href="exec:gt ''stol'', ''bc''">condoms</a> are hidden in one of your desk drawers.'
 		end
 		
-		if StoryLine = 1 and SchoolAtestat = 0 and week = 6 and hour > 4 and hour < 9 and detention_set = 1 and SchoolAtestat = 0 and detention_warning ! daystart:
+		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour > 4 and hour < 9 and detention_set = 1 and SchoolAtestat = 0 and detention_warning ! daystart:
 			detention_warning = daystart
 			msg 'You have detention this morning and must be at school before 09:00.'
 		end

+ 95 - 308
locations/begin.qsrc

@@ -12,78 +12,104 @@ if $ARGS[0] = 'start':
 	showstat 1
 	'<center><b><font color="maroon">CHOOSE GAME START</font></b></center>'
 	*nl
-	'<b>Transformation Start:</b>'
-	'You are Mikhail Kuznetsov, a fairly average 35 year old businessman who finds an artifact that changes everything about him and his life. Features magic.'
-	'(magic is still a WIP)'
+	'<center>There are three main start types:'
+	'Last year of school (before or after summer holidays);'
+	'In the city post graduation from school;'
+	'First year of university.'
 	*nl
-	'<b>Schoolgirl Start:</b>'
-	'You are a schoolgirl in the most lustful town in Russia. Will you study hard and keep your purity for that special someone, become a sex addicted whore or anything in between? The possibilities are endless. No magic.'
-	'(currently has most content for non-magic playthrough)'
+	'For each start type there are 3 options:'
+	'Standard;'
+	'Magical (Your character will gain magic abilities and learn about a secret magical world);'
+	'M2F (As per magic but your character will magically be turned into a girl in the intro).</center>'
 	*nl
-	'<b>Cursed Schoolgirl Start:</b>'
-	'Marvel as we recklessly squish both of the above into one start. You are a schoolgirl who finds the amulet and not much changes, except for the magic used.'
-	'(currently has most content but magic is still a WIP)'
 	*nl
-	'<b>Cursed Schoolboy Start:</b>'
-	'You are Peter Ivanov, a fairly average teenage boy who, while trying to escape a bad situation, ends up in the body of a schoolgirl. Now you have to deal with a new body, new desires and your new life in the most lustful town in Russia. Features magic.'
-	'(currently has most content but magic is still a WIP)'
 	*nl
-	'<b>New in Town Start:</b>'
-	'You''re controlled by your overbearing mother and can''t take it any more. It is time to find a new life in the city away from her influence. For the first time, you can make your own decisions and mistakes. No magic.'
-	'(currently has the least content - not recommended for your first playthrough)'
-	
-	act '<center><b>Transformation Start</b></center>':
-		settingmode = 0
-		showstat 0
-		cla
-		act '<center>Show intro (recommended)</center>':
-			gt 'preSYS', 'TGStart'
-		end
-		act '<center>Skip intro (seen it before)</center>':
-			tgs_skipinto = 1
-			gt 'preSYS', 'TGStart'
-		end
+	*nl
+
+	'<center><table><TH>Start Type</TH><TH>Standard</TH><TH>Magical</TH><TH>M2F</TH><TR>'
+
+	$start_text = '<TD>School</TD>'
+
+	if $start_type = 'sg':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''sg'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
 	end
 
-	act '<center><b>Schoolgirl Start</b></center>':
-		cla
-		settingmode = 0
-		showstat 0
-		MagikDostup = 1
-		!!blocks the save update for group standings
-		gruptipe[9000] = 1
-		gt 'preSYS', 'SGStart'
-		
+	if $start_type = 'sg_m':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''sg_m'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
 	end
 
-	act '<center><b>Cursed Schoolgirl Start</b></center>':
-		cla
-		settingmode = 0
-		showstat 0
-		altQS = 1
-		!!blocks the save update for group standings
-		gruptipe[9000] = 1
-		gt 'preSYS', 'SGStart'
+	if $start_type = 'sg_tg':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD><TR>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''sg_tg'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD><TR>'
 	end
-	
-	act '<center><b>Cursed Schoolboy Start</b></center>':
-		cla
-		settingmode = 0
-		showstat 0
-		altQS = 1
-		csb_start = 1
-		!!blocks the save update for group standings
-		gruptipe[9000] = 1
-		gt 'preSYS', 'CSBStart'
+
+	$start_text += '<TD>City</TD>'
+
+	if $start_type = 'city':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''city'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
+	end
+
+	if $start_type = 'city_m':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''city_m'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
+	end
+
+	if $start_type = 'city_tg':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD><TR>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''city_tg'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD><TR>'
+	end
+
+	$start_text += '<TD>University</TD>'
+
+	if $start_type = 'uni':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''uni'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
+	end
+
+	if $start_type = 'uni_m':
+		$start_text += '<TD><center><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''uni_m'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
+	end
+
+	if $start_type = 'uni_tg':
+		$start_text += '<TD><img src="images/system/icons/check.png" height="50"></center></TD>'
+	else
+		$start_text += '<TD><center><a href="exec:$start_type = ''uni_tg'' & gt ''begin'', ''start''"><img src="images/system/icons/uncheck.png" height="50"></a></center></TD>'
 	end
 
-	act '<center><b>New in Town Start</b></center>':
-		cla
-		settingmode = 0
-		showstat 0
-		MagikDostup = 1
-		gt 'preSYS', 'TGStart'
+	$start_text
+
+	'</table></center>'
+	
+	if $start_type = 'sg' or $start_type = 'sg_m':
+		act '<center><b>Start</b></center>': gt 'intro_sg', 'start'
+	elseif $start_type = 'sg_tg':
+		act '<center><b>Start</b></center>': gt 'intro_sg_tg', 'start'
+	elseif $start_type = 'city':
+		act '<center><b>Start</b></center>': gt 'intro_city', 'start'
+	elseif $start_type = 'city_m':
+		act '<center><b>Start</b></center>': gt 'intro_city_m', 'start'
+	elseif $start_type = 'city_tg':
+		act '<center><b>Start</b></center>': gt 'intro_city_tg', 'start'
+	elseif $start_type = 'uni':
+		act '<center><b>Start</b></center>': gt 'intro_uni', 'start'
+	elseif $start_type = 'uni_m':
+		act '<center><b>Start</b></center>': gt 'intro_uni_m', 'start'
+	elseif $start_type = 'uni_tg':
+		act '<center><b>Start</b></center>': gt 'intro_uni_tg', 'start'
 	end
+	
 	act '<center><b>Change game settings</b></center>': settingmode = 1 & gs '$menu_setting'
 end
 
@@ -97,7 +123,7 @@ if $ARGS[0] = 'warning':
 	*nl
 	'<center><img <<$set_imgh>> src="images/system/1_openings/warning.jpg" ></center>'
 	
-	act 'Continue': gt 'begin','real_character'
+	act '<center><b>Continue</b></center>': gt 'begin','real_character'
 end
 	
 if $ARGS[0] = 'real_character':
@@ -106,266 +132,27 @@ 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 offers the ability to create your own character.'
-	'To do this, replace the image "avatar" in the "images" folder of the game with a file of the same name and format JPEG (.jpg). That''s it!'
-	'Please note, this choice can only be changed in the cheat menu and in-game changes to hair color, length etc. will not affect the displayed image if you are using a custom one.'
-	'This function is made solely to simplify things for those that want to use a custom image without having to sort through hundreds of pictures.'
+	'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.'
+	'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.'
 
-	*NL 'If you are playing with Quest player for Android, click '
+	*nl
+	'If you are playing with Quest player for Android, click '
 	if Enable_Android = 1:
 	   *P '<a href="exec:Enable_Android = 0 & gt ''begin'',''real_character''">Here</a> (Current: <B>Yes</B>)'
 	else
 	   *P '<a href="exec:Enable_Android = 1 & gt ''begin'',''real_character''">Here</a> (Current: <B>No</B>)'
 	end
 
-	act'<center><b>Start a standard character</b></center>':
+	act'<center><b>Use the dynamic profile system</b></center>':
 		cls
 		gt 'begin', 'start'
 	end
-	act'<center><b>Use the avatar system</b></center>':
+	act'<center><b>Use a fixed profile image</b></center>':
 		cls
 		player_avatar = 1
-		pcs_eyecol = 1
-		pcs_eyesize = 2
-		pcs_lashes = 1
-		pcs_haircol = 1
-		pcs_hairlng = 81
-		pcs_lip = 2
-		if birthyear = 0: birthyear = 1998
-		if birthmonth = 0: birthmonth = 4
-		if birthday = 0: birthday = 1
-		gt 'begin', 'description_real_character'
-	end
-end
-
-if $ARGS[0] = 'description_real_character':
-	gs 'begin', 'hair'
-	gs 'begin', 'lip'
-	gs 'begin', 'eyes'
-	if birthyear = 0: birthyear = 1998
-	if birthmonth = 0: birthmonth = 4
-	if birthday = 0: birthday = 1
-	cls
-	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-	*nl
-	'<center>On this screen, you may adjust your character''s description to match your avatar. Please note, at present, hair color and glasses choice may be overridden by the personality choice you make during the game intro.</center>'
-	*nl
-	'<center>Customize your:</center>'
-	!'<center>Your name is <B><i><<$pcs_nickname>> <<$pcs_lastname>></B></i>. (You may change this during the intro, and also at the passport office in-game.)'
-	'<center><a href="exec:gs ''begin'', ''hair''"><img src="images/system/1_openings/shared/icon_hair.png"></a> <a href="exec:gs ''begin'', ''eyes''"><img src="images/system/1_openings/shared/icon_eye.png"></a> <a href="exec:gs ''begin'', ''lip''"><img src="images/system/1_openings/shared/icon_lip.png"></a> <a href="exec:gs ''begin'', ''birthday''"><img src="images/system/1_openings/shared/icon_birthday.png"></a></center>'
-
-	act'<center><b>Done</b></center>': gt 'begin', 'start'
-end
-
-if $ARGS[0] = 'hair':
-	cls
-	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-	*nl
-	if pcs_hairlng <= 1:
-		$hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''begin'', ''hair''">very short</a>,'
-	elseif pcs_hairlng <= 31:
-		$hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''begin'', ''hair''">short</a>,'
-	elseif pcs_hairlng <= 81:
-		$hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''begin'', ''hair''">chin length</a>,'
-	elseif pcs_hairlng <= 161:
-		$hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''begin'', ''hair''">shoulder length</a>,'
-	elseif pcs_hairlng <= 261:
-		$hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''begin'', ''hair''">breast length</a>,'
-	elseif pcs_hairlng <= 401:
-		$hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''begin'', ''hair''">back length</a>,'
-	elseif pcs_hairlng <= 601:
-		$hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''begin'', ''hair''">hip length</a>,'
-	elseif pcs_hairlng <= 801:
-		$hair = 'You have <a href="exec:pcs_hairlng = 1001 & gs ''begin'', ''hair''">ass length</a>,'
-	else
-		$hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''begin'', ''hair''">extremely long</a>,'
-	end
-
-	if pcs_haircol = 0 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'black hair' & $hair3 = 'black hair'
-	if pcs_haircol = 1 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'brown hair' & $hair3 = 'brown hair'
-	if pcs_haircol = 2 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'Red hair' & $hair3 = 'red hair'
-	if pcs_haircol = 3 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.'& $hair2 = 'blond hair' & $hair3 = 'blond hair'
-	if pcs_haircol = 0 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'curls' & $hair3 = 'black curls'
-	if pcs_haircol = 1 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'curls' & $hair3 = 'brown curls'
-	if pcs_haircol = 2 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'curls' & $hair3 = 'red hair'
-	if pcs_haircol = 3 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.' &$hair2 = 'curls' & $hair3 = 'blond curls'
-	'<center>Adjust your hair to match your avatar. Please note that, at present, hair choices are overridden by your starting personality choice (e.g. volleyball players will always have straight blond hair).</center>'
-	*nl
-	nathcol = pcs_haircol
-	if player_avatar = 1:
-		if avatar_hair = 1:
-			'<center>Please note that this choice is given only once and you will not be able to change it without starting a new game!</center>'
-			'<center>You have <i><<$av_hair>>.</i> <a href="exec:avatar_hair = 0 & gs ''begin'', ''hair''">Revert to default</a>.</center>'
-		else
-			'<center><i><<$hair>></i> You may also <a href="exec:gs ''begin'', ''hair_input'' & gs ''begin'', ''hair''">manually enter a description</a></center>.'
-		end
-	end
-	if $start_type = 'sgs':
-		act'<center><b>Done</b></center>': gt 'preCUST', 'SGStart'
-	else
-		act'<center><b>Done</b></center>': gt 'begin', 'description_real_character'
-	end
-end
-
-if $ARGS[0] = 'pcs_haircol':
-	pcs_haircol += 1
-	if pcs_haircol > 3: pcs_haircol = 0
-end
-
-if $ARGS[0] = 'hair_input':
-	avatar_hair = 1
-	$av_hair = input("Enter a description of your hair:")
-end
-
-if $ARGS[0] = 'lip':
-	cls
-	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-	*nl
-	if pcs_lip = 0:$pcs_lip = 'you have thin<<$pcs_lipbalm>> lips.' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips'
-	if pcs_lip = 1:$pcs_lip = 'You have normal<<$pcs_lipbalm>> lips.' & $liptalk = 'soft lips' & $liptalk2 = 'delicate lips' & $liptalk3 = 'tender lips'
-	if pcs_lip = 2:$pcs_lip = 'You have plump<<$pcs_lipbalm>> lips.' & $liptalk = 'plump lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'plump lips'
-	if pcs_lip = 3:$pcs_lip = 'You have large,<<$pcs_lipbalm>> full lips.' & $liptalk = 'full lips' & $liptalk2 = 'plump lips' & $liptalk3 = 'full lips'
-	if pcs_lip = 4:$pcs_lip = 'You have huge, thick<<$pcs_lipbalm>> lips.' & $liptalk = 'thick lips' & $liptalk2 = 'thick lips' & $liptalk3 = 'thick lips'
-	'<center>Adjust the size of your lips to match your <a href="exec:view''images/avatar.jpg''">image</a>:</center>'
-	*nl
-	'<center><i><<$pcs_lip>></i></center>'
-	*nl
-	if pcs_lip < 4:'<center><a href="exec:pcs_lip += 1 & gs ''begin'', ''lip''">Bigger lips</a></center>'
-	if pcs_lip > 0:'<center><a href="exec:pcs_lip -= 1 & gs ''begin'', ''lip''">Smaller lips</a></center>'
-	act'<center><b>Done</b></center>': gt'begin','description_real_character'
-end
-
-if $ARGS[0] = 'eyes':
-	cls
-	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	if player_avatar = 1:
-		'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-	end
-	*nl
-	if pcs_eyecol = 0:$pcs_eyecol = 'brown' & $glacol2 = 'brown'
-	if pcs_eyecol = 1:$pcs_eyecol = 'gray' & $glacol2 = 'gray'
-	if pcs_eyecol = 2:$pcs_eyecol = 'green' & $glacol2 = 'green'
-	if pcs_eyecol = 3:$pcs_eyecol = 'blue' & $glacol2 = 'blue'
-	if glass <= 0:$glass = '' & glassvnesh = 0
-	if glass = 1:$glass = ' You wear silly glasses in a cheap frame.' & glassvnesh = 10
-	if pcs_lashes > 2:pcs_lashes = 2
-	if pcs_lashes = 0:$pcs_lashes = 'with short eyelashes'
-	if pcs_lashes = 1:$pcs_lashes = 'with normal eyelashes'
-	if pcs_lashes = 2:$pcs_lashes = 'with long eyelashes'
-	if pcs_eyesize > 3:pcs_eyesize = 3
-	if pcs_eyesize = 0:$glaza = 'You have small <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = '<<$pcs_eyecol>> eyes' & $glaza3 = '<<$glacol2>> eyes'
-	if pcs_eyesize = 1:$glaza = 'You have expressive <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'expressive <<$pcs_eyecol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes'
-	if pcs_eyesize = 2:$glaza = 'You have large <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'big <<$pcs_eyecol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes'
-	if pcs_eyesize = 3:$glaza = 'You have huge <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'great <<$pcs_eyecol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes'
-
-	if player_avatar = 1:
-		'<center>Adjust your eyes and eyelashes to match your avatar. Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
-	else
-		'<center>Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
-	end	
-	*nl
-	'<center><i><<$glaza>></i></center>'
-	*nl
-	if pcs_lashes < 2:'<center><a href="exec:pcs_lashes += 1 & gs ''begin'', ''eyes''">Lengthen lashes</a></center>'
-	if pcs_lashes > 0:'<center><a href="exec:pcs_lashes -= 1 & gs ''begin'', ''eyes''">Shorten lashes</a></center>'
-	if pcs_eyesize < 3:'<center><a href="exec:pcs_eyesize += 1 & gs ''begin'', ''eyes''">Larger eyes</a></center>'
-	if pcs_eyesize > 0:'<center><a href="exec:pcs_eyesize -= 1 & gs ''begin'', ''eyes''">Smaller eyes</a></center>'
-	if glass = 0:'<center><a href="exec:glass = 1 & gs ''begin'', ''eyes''">Wear glasses</a></center>'
-	if glass = 1:'<center><a href="exec:glass = 0 & gs ''begin'', ''eyes''">Remove glasses</a></center>'
-
-	if player_avatar = 1:
-		act'<center><b>Done</b></center>': gt'begin','description_real_character'
-	elseif $start_type = 'nt':
-		act'<center><b>Done</b></center>': gt 'preCUST', 'NTStart2'
-	elseif $start_type = 'sgs':
-		act'<center><b>Done</b></center>': gt 'preCUST', 'SGStart'
-	else
-		act'<center><b>Done</b></center>': gt 'preCUST', 'TGStart'
-	end
-end
-
-if $ARGS[0] = 'eye color':
-	pcs_eyecol += 1
-	if pcs_eyecol > 3: pcs_eyecol = 0
-end
-
-if $ARGS[0] = 'birthday':
-	cls
-	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	if csb_start ! 1:
-		if player_avatar = 1:
-			'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-		else
-			'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
-		end
-	else
-		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/16.jpg"></center>'
-	end
-	'<center>Choose your date of birth:</center>'
-	*nl
-	if birthyear = 0: birthyear = 1998
-	if birthmonth = 0: birthmonth = 4
-	if birthday = 0: birthday = 1
-
-	if birthmonth = 2:
-		if ((birthyear mod 4 = 0) and (birthyear mod 100 ! 0)) or (birthyear mod 400 = 0): 
-			monthdays = 29
-		else
-			monthdays = 28
-		end
-	elseif birthmonth = 4 or birthmonth = 6 or birthmonth = 9 or birthmonth = 11:
-		monthdays = 30
-	else
-		monthdays = 31
-	end
-
-	if birthmonth > 12: birthmonth = 12
-	if birthmonth < 1: birthmonth = 1
-	if birthday < 1: birthday = 1
-	if birthday > monthdays: birthday = monthdays
-
-	if birthday < 10 and birthmonth < 10:
-		'<center>Your birthday: <B>0<<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
-	elseif birthday < 10 and birthmonth >= 10:
-		'<center>Your birthday: <B><<birthmonth>>/0<<birthday>></B> (MM/DD)</center>'
-	elseif birthday >= 10 and birthmonth < 10:
-		'<center>Your birthday: <B>0<<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
-	elseif birthday >= 10 and birthmonth >= 10:
-		'<center>Your birthday: <B><<birthmonth>>/<<birthday>></B> (MM/DD)</center>'
-	end
-
-	*nl
-	'<center><a href="exec:birthday += 5 & gs ''begin'', ''birthday''">+5 Days</a></center>'
-	'<center><a href="exec:birthday += 1 & gs ''begin'', ''birthday''">+1 Day</a></center>'
-	'<center><a href="exec:birthday -= 1 & gs ''begin'', ''birthday''">-1 Day</a></center>'
-	'<center><a href="exec:birthday -= 5 & gs ''begin'', ''birthday''">-5 Days</a></center>'
-	'<center><a href="exec:birthmonth = 1 & gs ''begin'', ''birthday''">January</a></center>'
-	'<center><a href="exec:birthmonth = 2 & gs ''begin'', ''birthday''">February</a></center>'
-	'<center><a href="exec:birthmonth = 3 & gs ''begin'', ''birthday''">March</a></center>'
-	'<center><a href="exec:birthmonth = 4 & gs ''begin'', ''birthday''">April</a></center>'
-	'<center><a href="exec:birthmonth = 5 & gs ''begin'', ''birthday''">May</a></center>'
-	'<center><a href="exec:birthmonth = 6 & gs ''begin'', ''birthday''">June</a></center>'
-	'<center><a href="exec:birthmonth = 7 & gs ''begin'', ''birthday''">July</a></center>'
-	'<center><a href="exec:birthmonth = 8 & gs ''begin'', ''birthday''">August</a></center>'
-	'<center><a href="exec:birthmonth = 9 & gs ''begin'', ''birthday''">September</a></center>'
-	'<center><a href="exec:birthmonth = 10 & gs ''begin'', ''birthday''">October</a></center>'
-	'<center><a href="exec:birthmonth = 11 & gs ''begin'', ''birthday''">November</a></center>'
-	'<center><a href="exec:birthmonth = 12 & gs ''begin'', ''birthday''">December</a></center>'
-
-	if csb_start ! 1:
-		if player_avatar = 1:
-			act'<center><b>Done</b></center>': gt 'begin', 'description_real_character'
-		else
-			act'<center><b>Done</b></center>': gt 'preSYS', 'SGStart2'
-		end
-	else
-		act'<center><b>Done</b></center>': gt 'preSys', 'CSBStart'
+		gt 'begin', 'start'
 	end
 end
 

+ 0 - 3
locations/body.qsrc

@@ -40,9 +40,6 @@ if $ARGS[0] = 'RegularUpdate':
 	elseif pcs_skin < 0:
 		pcs_skin = 0
 	end
-	
-	!!Since "musle" is used all over the place
-	musle = strenbuf
 end
 
 if $ARGS[0] = 'DailyUpdate':

+ 2 - 2
locations/booty_call.qsrc

@@ -954,7 +954,7 @@ if $ARGS[0] = 'bj_react1.2':
 						gs'booty_call','generous_lick'
 					else
 						'"Saving yourself for marriage but still give blowjobs to strangers?" he asks pointedly.'
-						if StoryLine = 1: 
+						if mid($start_type,1,2) = 'sg': 
 							'"I don''t know. Ask my mom why it matters so much," you shrug.'
 						else
 							'You shrug. "I''m still a virgin aren''t I?"'
@@ -1014,7 +1014,7 @@ if $ARGS[0] = 'bj_react2':
 						gs'booty_call','generous_lick'
 					else
 						'"Saving yourself for marriage but still give blowjobs to strangers?" he asks pointedly.'
-						if StoryLine = 1: 
+						if mid($start_type,1,2) = 'sg': 
 							'"I don''t know. Ask my mom why it matters so much," you shrug.'
 						else
 							'You shrug. "I''m still a virgin aren''t I?"'

+ 3 - 3
locations/booty_call_after.qsrc

@@ -168,7 +168,7 @@ if $ARGS[0] = 'no_cum_end':
 					'"Because I want to," you say, a little annoyed. "I have to explain myself to you?"'
 					gs'booty_call_after','after_sex1'
 				end
-				if StoryLine = 1:
+				if mid($start_type,1,2) = 'sg':
 					act'Ask my mom':
 						cla & *nl
 						'"I don''t know," you shrug. "Ask my mom why it''s so important."'
@@ -446,7 +446,7 @@ if $ARGS[0] = 'after_sex2':
 				gs'booty_call_after','spend_night'
 			end
 			
-			if StoryLine = 1:
+			if mid($start_type,1,2) = 'sg':
 				act'I''m sick of my mom':
 					cla & *clr
 					$npc_apt_bedroom[$boy]
@@ -1017,7 +1017,7 @@ if $ARGS[0] = 'sleep':
 				gs'sleep','simple'
 			end	
 			
-			if StoryLine = 1 and home_owned[2] = 1: sveta_punishment['no_come_home'] = 1
+			if mid($start_type,1,2) = 'sg' and home_owned[2] = 1: sveta_punishment['no_come_home'] = 1
 			gt'booty_call_morning','morning'
 		end
 	end

+ 1 - 1
locations/booty_call_morning.qsrc

@@ -9,7 +9,7 @@ if $ARGS[0] = 'morning':
 		'Your mind stirs and you slowly come to consciousness. Your first thoughts are...'
 		act'<i>Yawn</i>':gt'booty_call_morning','yawn_wake'
 !!	end
-	if kanikuli = 0 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
 		act'School!':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/romance/misc/wakeup2.mp4"></video></center>'

+ 1 - 1
locations/brothel.qsrc

@@ -281,7 +281,7 @@ if $ARGS[0] = 'abducted4':
 	pcs_hairbsh = 0
 	InSleep = 1
 	pain['killer'] = 0
-	if StoryLine = 1 and SchoolAtestat = 0:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
 		notathomesleep += 1
 	else
 		notathomesleep = 0

+ 2 - 2
locations/budilnik.qsrc

@@ -24,9 +24,9 @@ if $ARGS[0] = 'start':
 	'<center><b>Currently set for '+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+' </b></center>'
 	'<center><b><a href="exec:  bud_weekend = 1 & gt ''budilnik'', ''Reset''">Reset weekend alarm</a> <a href="exec: bud_weekend = 1 & gt ''budilnik'', ''Time''">Set</a> weekend alarm to this time</b></center>'
 	'<center><b>Currently set for '+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b></center>'
-	if Storyline > 0 and alarm_holiday = 0:
+	if mid($start_type,1,2) = 'sg' and alarm_holiday = 0:
 		'<center><b>Use weekend alarm for holidays - <a href="exec:  alarm_holiday = 1 & gt ''budilnik'', ''start''">OFF</a></b></center>'
-	elseif Storyline > 0 and alarm_holiday = 1:
+	elseif mid($start_type,1,2) = 'sg' and alarm_holiday = 1:
 		'<center><b>Use weekend alarm for holidays - <a href="exec:  alarm_holiday = 0 & gt ''budilnik'', ''start''">ON</a></b></center>'
 	end
 

+ 2 - 2
locations/buklinik.qsrc

@@ -41,7 +41,7 @@ if $ARGS[0] = 'holl':
 	'<center><b>Entrance</b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_holl.jpg"></center>'
 	'The interior is even worse than the exterior, the paint on the wall is falling off and hasn''t been repainted for quite a while. There are some lights working but not all of them and there is this weird smell that you can''t really pinpoint what it is.'
-	if StoryLine = 1 and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and bumtolik >= 5:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and bumtolik >= 5:
 		'You can volunteer here on the weekends.'
 	else
 		if bumtolik > 4:'There is a lock on the <a href="exec:gt ''buklinik'', ''sklad''">storage</a> room.'
@@ -69,7 +69,7 @@ if $ARGS[0] = 'registr':
 	'<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_reg.jpg"></center>'
 	'You approach the counter as you see two women in white coats sitting and chatting with each other, laughing.'
 
-	if StoryLine = 1 and SchoolAtestat = 0 and bumtolik < 5:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and bumtolik < 5:
 		!r125
 		'You clear you throat to get their attention, "Hello, my name is <<$pcs_firstname>>, I read on that note that you were looking for volunteers..."'
 		'The two women cheerfully reply, "Hello! Welcome to our little humble shelter. As you probably noticed we really need some volunteers, just a fair warning the job is not always fun and there''s always lots to do. What you see here is just a small part of it, we even help out the elderly and the less fortunate ones outside the shelter.'

+ 0 - 1
locations/carF.qsrc

@@ -320,7 +320,6 @@ if $ARGS[0] = 'other':
 		benz -= 4
 		teh -= rand(2, 6)
 		pcs_mood += 20
-		wipo += 10
 		'You go to the track and have fun driving around before leaving.'
 
 		act 'Finish':xgt 'carF', 'salon'

+ 10 - 10
locations/carF1.qsrc

@@ -18,9 +18,9 @@ elseif $ARGS[0] = '4':
 elseif $ARGS[0] = '5':
 	'<center><b>VAZ 2119</b></center>'
 elseif $ARGS[0] = '6':
-	'<center><b>VAZ Kalina</b></center>'
+	'<center><b>LADA Kalina</b></center>'
 elseif $ARGS[0] = '7':
-	'<center><b>WHA PRIORA</b></center>'
+	'<center><b>LADA Vesta</b></center>'
 elseif $ARGS[0] = '8':
 	'<center><b>Chevrolet Niva</b></center>'
 elseif $ARGS[0] = '9':
@@ -28,35 +28,35 @@ elseif $ARGS[0] = '9':
 elseif $ARGS[0] = '10':
 	'<center><b>UAZ Patriot</b></center>'
 elseif $ARGS[0] = '13':
-	'<center><b>Ford Focus 2</b></center>'
+	'<center><b>Ford Focus</b></center>'
 elseif $ARGS[0] = '95':
-	'<center><b>Mitsubishi l200</b></center>'
+	'<center><b>Mitsubishi L200</b></center>'
 elseif $ARGS[0] = '96':
 	'<center><b>Audi Q7</b></center>'
 elseif $ARGS[0] = '97':
-	'<center><b>Cadillac Escalade</b></center>'
+	'<center><b>Lexus RX 350</b></center>'
 elseif $ARGS[0] = '98':
 	'<center><b>Porsche Cayenne</b></center>'
 elseif $ARGS[0] = '99':
 	'<center><b>BMW X6</b></center>'
 elseif $ARGS[0] = '100':
-	'<center><b>Mercedes-Benz S 600</b></center>'
+	'<center><b>Mercedes-Benz S-Class</b></center>'
 elseif $ARGS[0] = '101':
-	'<center><b>BMW Z4</b></center>'
+	'<center><b>BMW 3-Seria</b></center>'
 elseif $ARGS[0] = '102':
 	'<center><b>Renault LOGAN</b></center>'
 elseif $ARGS[0] = '103':
 	'<center><b>Toyota Corolla</b></center>'
 elseif $ARGS[0] = '104':
-	'<center><b>Toyota Celica</b></center>'
+	'<center><b>Toyota Camry</b></center>'
 elseif $ARGS[0] = '105':
 	'<center><b>Mazda 6</b></center>'
 elseif $ARGS[0] = '106':
-	'<center><b>Mercedes-Benz E 212</b></center>'
+	'<center><b>Mercedes-Benz E-Class</b></center>'
 elseif $ARGS[0] = '107':
 	'<center><b>BMW M5</b></center>'
 elseif $ARGS[0] = '108':
-	'<center><b>Jaguar XKR-S</b></center>'
+	'<center><b>Jaguar XJ</b></center>'
 elseif $ARGS[0] = '109':
 	'<center><b>Audi A6</b></center>'
 elseif $ARGS[0] = '110':

+ 1 - 1
locations/cikl.qsrc

@@ -967,7 +967,7 @@ killvar 'pcs_drank'
 !!suspension ends
 if suspended['day'] = daystart:	suspended['on'] = 0
 
-if storyline = 1:
+if mid($start_type,1,2) = 'sg':
 !!Party refresh if you didn''t see sis
 	if week = 1 and sisboyparty ! 2:
 		if sisterQW['party'] = -1: sisterQW['party'] = 0

+ 1 - 1
locations/city_drugden.qsrc

@@ -23,7 +23,7 @@ if $ARGS[0] = 'start':
 		act 'Ask for amphetamine': gt 'city_drugden', 'amphetamine'
 		act 'Ask for weed': gt 'city_drugden', 'joints'
 		act 'Ask for cocaine': gt 'city_drugden', 'cocaine'
-		if StoryLine = 1 and snarkozak = 0: act 'Ask for a drop-off point in Pavlovsk':	minut += 5 & gs 'events', 'narkozakladka'
+		if mid($start_type,1,2) = 'sg' and snarkozak = 0: act 'Ask for a drop-off point in Pavlovsk':	minut += 5 & gs 'events', 'narkozakladka'
 	elseif drugUser = 0:
 		'"Ahhh, what do you have?" you ask.'
 		'His eyes light up at a freshy and smiles wildy, "Well I have some H and amphetamine."'

+ 2 - 2
locations/city_industrial.qsrc

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

+ 11 - 0
locations/city_island.qsrc

@@ -77,6 +77,17 @@ end
 
 if home_owned[11] = 1 or university['student'] = 1 or hour >= 6:'The <a href="exec:gt ''uni_dorm'', ''start''">University dorms</a> offers small, but cheap, living space, for university students.'
 
+if pcs_magik >= 1 and mainQW = 0 and mid($start_type,1,3) = 'uni':
+	*clr & cla
+	menu_off = 1
+	mainQW = 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/lab/event/main.jpg"></center>'
+	'In front of your dorm, you see Tatiana and Gustav. Tatiana adjusts her glasses and looks around, while Gustav seems to be distracted, glancing here and there with a strange look on his face as his tattoos are not visible.'
+	'Tatiana looks at you closely, "I felt a burst of energy. Were you attacked by a magician?"'
+	act 'No':gt 'mainQW'
+	exit
+end
 
 --- city_island ---------------------------------
 

+ 5 - 3
locations/city_sauna.qsrc

@@ -220,10 +220,12 @@ if $ARGS[0] = 'saunaroom':
 						money -= 850
 					end
 					if disable_autosave = 0:
-						if StoryLine = 0:
-							savegame 'autosave.sav'
+						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_alt.sav'
+							savegame 'autosave_sg.sav'
 						end
 					end
 					if $clothingworntype ! 'nude': gs 'clothing', 'strip'

+ 1 - 1
locations/city_trashplace.qsrc

@@ -302,7 +302,7 @@ if bomzQW = 0 and rand(1, 10) >= 8 and hour <= 16 and week ! 4:
 		*clr & cla
 		gs 'stat'
 
-		if storyline = 0:
+		if $start_type[1] = 'tg':
 			if daystart < 10 or stat['vaginal'] <= 2:
 				'"I''d love to, but I don''t have much money." Hell, you''re not even accustomed to your new body, but you take care not to say anything.'
 				'"Are you alright?" He looks you up and down.'

+ 1 - 1
locations/clothing.qsrc

@@ -409,7 +409,7 @@ if $ARGS[0] = 'clothing_list':
 			:loopgm_school_filter
 		end
 
-		if StoryLine = 1 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 gm_school_s[6] = cloc 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
 

+ 1 - 1
locations/clothing_QV.qsrc

@@ -276,7 +276,7 @@ if $ARGS[0] = 'clothing_list':
 				if clothingfilter['inc'] = 1 and clothingfilter['only'] = 1 and clothingfilter['sport_only'] = 0:
 					!! Default school uniform
 					if i = 6:
-						if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and gm_school_s[6] = 0: *p '<a href="exec:gt ''clothing_QV'', ''change'', ''gm_school'', 6"><img src="images/pc/items/gm/school/6.jpg" 	height="250" /></a>'
+						if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and gm_school_s[6] = 0: *p '<a href="exec:gt ''clothing_QV'', ''change'', ''gm_school'', 6"><img src="images/pc/items/gm/school/6.jpg" 	height="250" /></a>'
 					elseif CloInhibit <= pcs_inhib:
 						if gm_school_s[i] = 0 and gm_school_h[i] > 0 and gm_school_b[i] >= (pcs_hips - 8) and gm_school_b[i] <= (pcs_hips + 8):*p '<a href="exec:gt ''clothing_QV'', ''change'', ''gm_school'', <<i>>"><img src="images/pc/items/gm/school/<<i>>.jpg" 	height="250" /></a>'
 					end

+ 0 - 1
locations/danceGev.qsrc

@@ -6,7 +6,6 @@ if lesbian > 0:
 	pcs_horny += 5
 elseif lesbian = 0:
 	pcs_mood += 10
-	wipo += 5
 end
 
 danceevtimes += 1

+ 10 - 10
locations/din_van.qsrc

@@ -79,10 +79,10 @@ $shower = {
 		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></center>'
 		*nl
 		'You undress and turn on the water in the shower. When it hits the right temperature, you step into the shower and let the warm water rain down on you.'
-		if daystart < 10 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:
+		if daystart < 10 and $start_type[1] = 'tg':
 			pcs_horny += rand(6,10)
 			'It''s really arousing to see your new body with all its smooth curves, breasts with large nipples, wide hips and smooth legs. You begin to lather your body, noticing how soft and tender it feels. Once you''re sure you haven''t missed a single spot, you begin to wash yourself off, continuing to experience new and strange sensations.'
-		elseif daystart < 30 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:
+		elseif daystart < 30 and $start_type[1] = 'tg':
 			pcs_horny += rand(2,6)
 			'You''ve already gotten used to your feminine body and its softness doesn''t surprise you very much anymore, but you still let your hands wander a bit over your soft curves before you begin to wash yourself in earnest.'
 		else
@@ -223,11 +223,11 @@ $bath = {
 		*nl
 		'You undress while the bathtub fills up and dip a toe into the water. It is just the right temperature, so you climb in and let yourself sink into the warm water, moaning softly as you feel your muscles start to relax.'
 
-		if daystart < 10 and StoryLine = 0 and ntstart = 0:
+		if daystart < 10 and $start_type[1] = 'tg':
 			pcs_horny += rand(6,10)
 			'You stare at the smooth, soft legs sticking out of the water. You''re still not used to this new body and the look of all this roundness.'
 			'As you start to soap yourself, you unwittingly turn your attention to your breasts. They''re so soft and big, and when you touch them you feel an unfamiliar but pleasant sensation. You take your time getting familiar with your new body, then you begin to wash yourself in earnest.'
-		elseif daystart < 30 and StoryLine = 0 and ntstart = 0:
+		elseif daystart < 30 and $start_type[1] = 'tg':
 			pcs_horny += rand(2,6)
 			'You have become a little accustomed to your female body and casually soap up all these soft curves and rinse yourself off, rubbing your hands all over your feminine body to make sure you didn''t miss a spot.'
 		else
@@ -296,11 +296,11 @@ $brit = {
 	if shave_menu = 1 and stanok > 1:
 		if pcs_leghair > 3 or (pubestyle > 0 and pcs_pubes >= shave_trigger):
 			if pcs_leghair > 3 and (pubestyle > 0 and pcs_pubes >= shave_trigger):
-				if daystart < 10 and StoryLine = 0 and ntstart = 0:
+				if daystart < 10 and $start_type[1] = 'tg':
 					$shave_act = 'Shave your legs and pussy'
 					$shave_txt1 = 'You can''t shake off the fact that you''re a girl now, so you decide it''d be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.'
 					$shave_txt2 = 'You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn''t really all that different. In the end, you get a pretty decent job done.'
-				elseif daystart < 30 and StoryLine = 0 and ntstart = 0:
+				elseif daystart < 30 and $start_type[1] = 'tg':
 					pcs_mood += 10
 					$shave_txt1 = 'With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don''t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?'
 				elseif pubestyle = 1:
@@ -389,10 +389,10 @@ $brit = {
 					if $locM = 'uni_dorm' and rand(0, 5) = 5:gt 'vann', 'brit1'
 					'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave2.jpg"></center>'
 					*nl
-					if daystart < 10 and StoryLine = 0 and ntstart = 0:
+					if daystart < 10 and $start_type[1] = 'tg':
 						'You can''t shake off the fact that you''re a girl now, so you decide it''d be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.'
 						'You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn''t really all that different. In the end, you get a pretty decent job done.'
-					elseif daystart < 30 and StoryLine = 0 and ntstart = 0:
+					elseif daystart < 30 and $start_type[1] = 'tg':
 						pcs_mood += 10
 						'With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don''t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?'
 					else
@@ -494,10 +494,10 @@ $brit = {
 				if $locM = 'uni_dorm' and rand(0, 5) = 5:gt 'vann', 'brit1'
 				'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave2.jpg"></center>'
 				*nl
-				if daystart < 10 and StoryLine = 0 and ntstart = 0:
+				if daystart < 10 and $start_type[1] = 'tg':
 					'You can''t shake off the fact that you''re a girl now, so you decide it''d be best to shave your legs. You begin to lather your legs, still marveling at how soft and round they are. Then you take the razor in your hand and begin to shave your legs.'
 					'You feel really awkward, never having done this before as a guy. Luckily, you had more than enough experience with shaving your face and technically this isn''t really all that different. In the end, you get a pretty decent job done.'
-				elseif daystart < 30 and StoryLine = 0 and ntstart = 0:
+				elseif daystart < 30 and $start_type[1] = 'tg':
 					pcs_mood += 10
 					'With a newfound routine you lather up your legs and start shaving, careful not to miss a spot. After washing away the foam you softly glide your hands over your smooth legs, feeling good to know that you don''t need to hide your legs in pants. Maybe you should wear a skirt tomorrow?'
 				else

+ 2 - 2
locations/dina.qsrc

@@ -12,7 +12,7 @@ $brodila = {
 }
 
 $brodilr = {
-	if StoryLine = 1 and home_owned[2] = 1:
+	if mid($start_type,1,2) = 'sg' and home_owned[2] = 1:
 		gt 'pav_residential'
 	elseif home_owned[4] = 1:
 		gt'liames'
@@ -36,7 +36,7 @@ $brodils = {
 		gt'sitr','start'
 	elseif home_owned[4] = 1:
 		gt'sitr2x','start'
-	elseif StoryLine = 1 and home_owned[2] = 1:
+	elseif mid($start_type,1,2) = 'sg' and home_owned[2] = 1:
 		gt 'sitrPar'
 	else
 		gt'city_residential', 'start'

+ 1 - 1
locations/dreams.qsrc

@@ -60,7 +60,7 @@ if $ARGS[0] = 'start':
 			gs 'dreams','d_dreams'
 		end
 	else
-		if storyline = 0:
+		if $start_type[1] = 'tg':
 			temp = rand(1, 10)
 			if temp = 1:
 				'You have hazy dreams about your past.'

+ 0 - 1
locations/drugs.qsrc

@@ -29,7 +29,6 @@ if $ARGS[0] = 'smoke':
 	gs 'cum_cleanup'
 	pcs_breath = 0
 	pcs_mood += 100
-	wipo += 100
 	if pcs_hydra >= 100:
 		pcs_hydra -= 5
 	else

+ 2 - 2
locations/ender.qsrc

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

+ 2 - 2
locations/fame.qsrc

@@ -494,7 +494,7 @@ if $ARGS[0] = 'calculate':
 	
 
 	!! Fame in the city will take alittle while before it start being noticed in other places. But the it will start spreading much faster than in the city. (The formula is +1050-52500000/(50000+(fame_city/10)^3 if the palyer is Sveta, but will spread a little slower for non Sveta starts using the formula +fame_city^2/1000)
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		if dyneval('RESULT = fame[''city_<<$ARGS[1]>>_core'']') >= 2000: 
 			dynamic 'fame[''city_<<$ARGS[1]>>_contribution_high''] = 1050'
 		else 
@@ -516,7 +516,7 @@ if $ARGS[0] = 'calculate':
 	end
 	
 	!!The fame from city takes sometime before it starts being noticed in the village, but after that it spread very fast (the formula is +1050 -672000000/(640000+(fame_city/10-20)^4) is player is Svata and +1050 -672000000/(640000+(fame_city/10-40)^4) in other starts).
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		if dyneval('RESULT = fame[''city_<<$ARGS[1]>>_core'']') >= 2000: 
 			dynamic 'fame[''city_<<$ARGS[1]>>_contribution_low''] = 1050'
 		elseif dyneval('RESULT = fame[''city_<<$ARGS[1]>>'']') >= 200:

+ 1 - 1
locations/family.qsrc

@@ -40,7 +40,7 @@ end
 if sisboyparty_day + 1 = daystart:sister_indorf = 0
 *nl
 
-if StoryLine = 1:
+if mid($start_type,1,2) = 'sg':
 	if sisboyparty_day + 1 = daystart and hour > 18 and sisboypartyQW = 1:
 		if sisboyparty = 1: sisboyparty = -1
 		if sisboyparty = 2:

+ 1 - 1
locations/fit.qsrc

@@ -334,7 +334,7 @@ if $ARGS[0] = 'gym':
 	*nl
 	if abonement > 0:'Your existing subscription package is valid for <<abonement>> more classes.'
 
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		if hour >= 10 and hour < 12 and week = 7 and centr = 1: 'In the hall you see <a href="exec:gt ''VolleyTrenCentr''">Mikhail Nikolaevich</a> talking with a strange man.'
 		if hour >= 10 and hour < 12 and week = 7 and centr = 2 and ricewine < 2: 'In the hall you see <a href="exec:gt ''VolleyTrenCentr''">Guang</a>'
 	end

+ 1 - 1
locations/food_menu.qsrc

@@ -71,7 +71,7 @@ elseif $loc = 'gkafe':
 	*nl
 	'<center><img <<$set_imgh>> src="images/shared/menus/borislav.jpg"</center><br>'
 	!'<center><img <<$set_imgh>> src="images/shared/drinks/cafedrinks.jpg"</center><br>'
-	if storyline = 1 and home_owned[2] = 1:
+	if mid($start_type,1,2) = 'sg' and home_owned[2] = 1:
 		$_eat['0,name'] = 'Vegetarian Piroshki'
 		$_eat['0,type'] = 'pirosh'
 		$_eat['0,price'] = 'Free'

+ 1 - 1
locations/foto_albums.qsrc

@@ -345,7 +345,7 @@ if $ARGS[0] = 'anushka':
 	if nush_model >= 1:
 		'You open up the ninth album and browse through some of the pictures of Anushka placed inside. Well she did say she modeled here, so you are not really surprised to see a album of her here.'
 		'The photo''s all seem to be single pictures taken from past photo shoots.'
-	elseif storyline = 1:
+	elseif mid($start_type,1,2) = 'sg':
 		nush_model = 1
 		'You open up the ninth album and are surprised to see pictures of Anushka placed inside. She is one of the prettier girls in school and it is not surprising she would like being a model, she loves attention, still you are surprised no one has mentioned it at school, surely someone else has to know right?'
 		'The photo''s all seem to be single pictures taken from past photo shoots.'

+ 1 - 1
locations/foto_events.qsrc

@@ -2166,7 +2166,7 @@ if $ARGS[0] = 'runway2':
 								modelfoto['earnings'] += modelpayfin
 								gs'stat'
 								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
-								if StoryLine = 1 and age < 18:
+								if mid($start_type,1,2) = 'sg' and age < 18:
 									'Another hour later, the show is over, the clothes are taken back, and you''re left naked in the studio, counting the <<modelpayfin>> <b>₽</b> you''ve been paid and musing over the happenings of the night. Working the runway isn''t too bad. But at the same time, this kind of thing has the tendency to circle around and you <i>really</i> hope nobody in Pavlovsk hears about this...'
 									act'Back in the studio':gt'foto','studio'
 								else

+ 1 - 1
locations/foto_model_documentary.qsrc

@@ -131,7 +131,7 @@ if $ARGS[0] = '1st_documentary':
 		end
 	end
 
-!!	if storyline = 1 and age < 18:
+!!	if mid($start_type,1,2) = 'sg' and age < 18:
 !!		act'No thanks (don''t want people to find out)':
 !!			cla & *clr
 !!			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'

+ 4 - 4
locations/foto_models.qsrc

@@ -149,7 +149,7 @@ if $ARGS[0] = 'mari_1':
 			'Something piques an interest in you as Mari mentions she''s from out of town, "If you don''t mind me asking where do you come from?"'
 			'"Oh, just some place called Gadukino. You''ve probably never heard of it. It''s a small village outside the city. Too small too be honest, same boring ins and outs every day. I wanted more excitement in my life! More than a simple farm girl would ever have. So I moved here."'
 
-			if storyline = 1:
+			if mid($start_type,1,2) = 'sg':
 				act'"You''re from Gadukino?"':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/mari_e/meeting/4a.jpg"></center>'
@@ -437,7 +437,7 @@ if $ARGS[0] = 'mari_chat':
 			'"Any siblings Mari?"'
 			*nl
 			'"No, none for me. I''m an only child. What about you?"'
-			if storyline = 1:
+			if mid($start_type,1,2) = 'sg':
 				if npc_rel['A34'] < 20:
 					'"Yeah, I''ve got two. My sister who''s about the same age as you are and my stupid little brother. He''s such a pain in the ass!"'
 					'Mari sits up a bit. "Really? What''s so bad about him?"'
@@ -738,7 +738,7 @@ if $ARGS[0] = 'mari_modelling_chat':
 		end
 	end
 	
-	if mari['parent_ask'] < 1 and StoryLine = 1:
+	if mari['parent_ask'] < 1 and mid($start_type,1,2) = 'sg':
 		act'Ask about her parents':
 			mari['parent_ask'] = 1
 			cla & *clr
@@ -844,7 +844,7 @@ if $ARGS[0] = 'mari_modelling_chat':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/portraits/mari_e/talking/reading2.jpg"></center>'
 							'"I''m <<age>>. I didn''t work here when I was still underage, but I still needed the fake to buy booze and stuff," you grin.'
-							if StoryLine = 1:
+							if mid($start_type,1,2) = 'sg':
 								'"That''s fair enough I guess. Not everyone has a neighbor like Misha brewing moonshine vodka in his barn," she laughs.'
 							else
 								'"That''s fair enough I guess. I didn''t drink when I lived in the village, but if I ever wanted one, I had a neighbor who would brew moonshine in his barn," she laughs.'

+ 1 - 1
locations/gaddvor.qsrc

@@ -13,7 +13,7 @@ if $ARGS[0]='':
 	CLOSE ALL
 	gs 'gadukino_event', 'sound'
 
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		'<center><h4>Your grandparents'' yard</h4></center>'
 	else
 		'<center><h4>Old couple''s yard</h4></center>'

+ 1 - 1
locations/gadfield.qsrc

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

+ 85 - 87
locations/gadforest.qsrc

@@ -188,15 +188,15 @@ if $ARGS[0] = 'forest_edge':
 			if gadforest_clothestorn = 1:
 				gadforest_clothestorn = 0
 				'Your clothes were torn to shreds in the woods, leaving you with no choice but to head back home naked.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			! clothes are here
 			elseif clothesAtLocation = 1:
 				'You decide to leave your clothes behind and sneak home naked, purely for the thrill of it.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			! no clothes here
 			elseif clothesAtLocation = 0:
 				'You seem to have misplaced your clothes, leaving you with no choice but to head back home naked. You wonder where you might have left your clothes.'
-				'You try your best to stay in the shadows as you move towards '+iif(StoryLine=1,'your grandparents house ','the village ')+'as stealthily as possible.'
+				'You try your best to stay in the shadows as you move towards your grandparents house as stealthily as possible.'
 			end
 			! Allow schoolgirl player to leave naked but go straight back home
 			! Non-schoolgirls will just find a random sweatshirt to put on - it is the same everytime but walking around naked in the village is not implemented yet
@@ -207,7 +207,7 @@ if $ARGS[0] = 'forest_edge':
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				if StoryLine = 1 and grandaQW['block'] = 0:
+				if mid($start_type,1,2) = 'sg' and grandaQW['block'] = 0:
 					if hour >= 10 and hour < 16 and month >= 4 and month <= 10:
 						forestcaughtrand = rand(4,10)
 					elseif hour >= 6 and hour < 20 and month >= 4 and month <= 10:
@@ -809,105 +809,103 @@ end
 ! $forest_args1 - location of forest where this is called from
 ! Example: gs 'gadforest', 'picking'
 if $ARGS[0] = 'picking':
-	if StoryLine = 1 or (StoryLine = 0 and mirapickingtalk = 1):
-		if hour >= 6 and hour <= 22 and month >= 6 and month <= 9 and boletus + boletus_cooked + bilberry < 5:
-			if ($forest_args1 = 'forest_edge' and edge_pickingday ! daystart) or ($forest_args1 = 'forest_outskirts' and outskirts_pickingday ! daystart) or ($forest_args1 = 'forest_center' and center_pickingday ! daystart) or ($forest_args1 = 'swamp_woods' and swamp_pickingday ! daystart):
-				act 'Look for mushrooms and berries'+iif(MiraLoc = 3 and $forest_args1 = 'forest_edge', ' with Mira (0:30)',' (0:30)'):
-					*clr & cla
-					menu_off = 1
+	if hour >= 6 and hour <= 22 and month >= 6 and month <= 9 and boletus + boletus_cooked + bilberry < 5:
+		if ($forest_args1 = 'forest_edge' and edge_pickingday ! daystart) or ($forest_args1 = 'forest_outskirts' and outskirts_pickingday ! daystart) or ($forest_args1 = 'forest_center' and center_pickingday ! daystart) or ($forest_args1 = 'swamp_woods' and swamp_pickingday ! daystart):
+			act 'Look for mushrooms and berries'+iif(MiraLoc = 3 and $forest_args1 = 'forest_edge', ' with Mira (0:30)',' (0:30)'):
+				*clr & cla
+				menu_off = 1
 
-					if $forest_args1 = 'forest_edge':
-						edge_pickingday = daystart
-						mushroom_pickers_check = 1
-						max_boletus = 1
-						max_bilberry = 1
-					elseif $forest_args1 = 'forest_outskirts':
-						outskirts_pickingday = daystart
-						mushroom_pickers_check = 2
-						max_boletus = 2
-						max_bilberry = 2
-					elseif $forest_args1 = 'forest_center':
-						center_pickingday = daystart
-						mushroom_pickers_check = 3
-						max_boletus = 3
-						max_bilberry = 3
-					elseif $forest_args1 = 'swamp_woods':
-						swamp_pickingday = daystart
-						mushroom_pickers_check = 4
-						max_boletus = 4
-						max_bilberry = 4
-					end
+				if $forest_args1 = 'forest_edge':
+					edge_pickingday = daystart
+					mushroom_pickers_check = 1
+					max_boletus = 1
+					max_bilberry = 1
+				elseif $forest_args1 = 'forest_outskirts':
+					outskirts_pickingday = daystart
+					mushroom_pickers_check = 2
+					max_boletus = 2
+					max_bilberry = 2
+				elseif $forest_args1 = 'forest_center':
+					center_pickingday = daystart
+					mushroom_pickers_check = 3
+					max_boletus = 3
+					max_bilberry = 3
+				elseif $forest_args1 = 'swamp_woods':
+					swamp_pickingday = daystart
+					mushroom_pickers_check = 4
+					max_boletus = 4
+					max_bilberry = 4
+				end
 
-					minut += 30
-					new_boletus = 0
-					new_bilberry = 0
-					gs 'gadforest', 'bushcraft', $forest_args1
-					if $clothingworntype = 'nude':
-						if pcs_inhib < 50:inhib_exp += rand(1,5)
-						if MiraLoc = 3 and $forest_args1 = 'forest_edge':
-							gs 'arousal', 'flash', 5
-							gs 'arousal', 'end'
-						end
+				minut += 30
+				new_boletus = 0
+				new_bilberry = 0
+				gs 'gadforest', 'bushcraft', $forest_args1
+				if $clothingworntype = 'nude':
+					if pcs_inhib < 50:inhib_exp += rand(1,5)
+					if MiraLoc = 3 and $forest_args1 = 'forest_edge':
+						gs 'arousal', 'flash', 5
+						gs 'arousal', 'end'
 					end
+				end
+				gs 'stat'
+
+				! mushroom_pickers are not at the location of the forest Sveta is in
+				if mushroom_pickers ! mushroom_pickers_check:
+					new_boletus += max_boletus
+					new_bilberry += max_bilberry
+					boletus += new_boletus
+					bilberry += new_bilberry
+					pcs_mood += 10
+					gs 'stat'
+
+					gs 'gadforest', 'picking_clothes', $forest_args1, 'berry'
+					*nl
+					'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
+				! mushroom pickers are at the location of the forest Sveta is in
+				elseif mushroom_pickers = mushroom_pickers_check:
+					new_boletus += rand(0,max_boletus)
+					new_bilberry += rand(0,max_bilberry)
+					boletus += new_boletus
+					bilberry += new_bilberry
 					gs 'stat'
 
-					! mushroom_pickers are not at the location of the forest Sveta is in
-					if mushroom_pickers ! mushroom_pickers_check:
-						new_boletus += max_boletus
-						new_bilberry += max_bilberry
-						boletus += new_boletus
-						bilberry += new_bilberry
+					if new_boletus > 0 and new_bilberry > 0:
 						pcs_mood += 10
 						gs 'stat'
 
 						gs 'gadforest', 'picking_clothes', $forest_args1, 'berry'
 						*nl
 						'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-					! mushroom pickers are at the location of the forest Sveta is in
-					elseif mushroom_pickers = mushroom_pickers_check:
-						new_boletus += rand(0,max_boletus)
-						new_bilberry += rand(0,max_bilberry)
-						boletus += new_boletus
-						bilberry += new_bilberry
+					elseif new_boletus = 0 and new_bilberry > 0:
+						pcs_mood += 5
 						gs 'stat'
 
-						if new_boletus > 0 and new_bilberry > 0:
-							pcs_mood += 10
-							gs 'stat'
-
-							gs 'gadforest', 'picking_clothes', $forest_args1, 'berry'
-							*nl
-							'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms and <<new_bilberry>> kg of berries.'
-						elseif new_boletus = 0 and new_bilberry > 0:
-							pcs_mood += 5
-							gs 'stat'
-
-							gs 'gadforest', 'picking_clothes', $forest_args1, 'berry'
-							*nl
-							'After searching for mushrooms and berries for half an hour you found <<new_bilberry>> kg of berries.'
-						elseif new_boletus > 0 and new_bilberry = 0:
-							pcs_mood += 5
-							gs 'stat'
-
-							gs 'gadforest', 'picking_clothes', $forest_args1, 'mushroom'
-							*nl
-							'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms'
-						elseif new_boletus = 0 and new_bilberry = 0:
-							pcs_mood -= 5
-							gs 'stat'
-
-							gs 'gadforest', 'picking_clothes_empty', $forest_args1
-							*nl
-							'After searching for mushrooms and berries for half an hour you found nothing.'
-						end
-					end
+						gs 'gadforest', 'picking_clothes', $forest_args1, 'berry'
+						*nl
+						'After searching for mushrooms and berries for half an hour you found <<new_bilberry>> kg of berries.'
+					elseif new_boletus > 0 and new_bilberry = 0:
+						pcs_mood += 5
+						gs 'stat'
 
-					if $forest_args1 = 'swamp_woods':
-						act 'Continue': gt 'swamp_woods', 'start'
-					else
-						act 'Continue': gt 'gadforest', $forest_args1
+						gs 'gadforest', 'picking_clothes', $forest_args1, 'mushroom'
+						*nl
+						'After searching for mushrooms and berries for half an hour you found <<new_boletus>> kg of mushrooms'
+					elseif new_boletus = 0 and new_bilberry = 0:
+						pcs_mood -= 5
+						gs 'stat'
+
+						gs 'gadforest', 'picking_clothes_empty', $forest_args1
+						*nl
+						'After searching for mushrooms and berries for half an hour you found nothing.'
 					end
 				end
+
+				if $forest_args1 = 'swamp_woods':
+					act 'Continue': gt 'swamp_woods', 'start'
+				else
+					act 'Continue': gt 'gadforest', $forest_args1
+				end
 			end
 		end
 	end

+ 9 - 9
locations/gadforestlost.qsrc

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

+ 1 - 1
locations/gadriver.qsrc

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

+ 2 - 2
locations/gadroad.qsrc

@@ -79,7 +79,7 @@ if $ARGS[0] = '':
 			elseif month=9 or month=10 or month=4 or month=5:
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg3.jpg"></center>'
 			else
-				if musle >= salo:
+				if strenbuf >= salo:
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg1.jpg"></center>'
 				else
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg2.jpg"></center>'
@@ -109,7 +109,7 @@ if $ARGS[0] = 'drinking_invite':
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 	'You quickly catch up to the boys who have already started drinking.'
 	!School girl Sveta
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		! Sveta has never been drinking with Mitka before
 		if mitka_first_drink = 1:
 			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'

+ 1 - 1
locations/gadsarai.qsrc

@@ -114,7 +114,7 @@ if $ARGS[0] = 'search':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/necklace.jpg"></center>'
 		*nl
-		if altQS = 1:
+		if $start_type[1] ! 'nomagic':
 			'While looking through the barn your foot goes through a rotten floorboard. You suddenly feel the presence of something magical under the floor. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The feeling of power is coming from within the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You feel the power coming from the necklace, but it doesn''t feel like any power you have ever felt.'
 		else
 			'While looking through the barn your foot goes through a rotten floorboard and gets stuck. As you work your foot free, you glimpse something underneath the floor - a box or something. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The exotic look of the box gives you gooseflesh and you find yourself holding your breath as you prepare to open the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You let your breath out slowly as you tilt the necklace from side to side, watching the light sparkle as it is reflected by the facets on the deep red rubies. You cannot begin to guess what this necklace must be worth.'

+ 4 - 4
locations/gadukino.qsrc

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

+ 6 - 4
locations/gameover.qsrc

@@ -14,7 +14,7 @@ if over = 1:
 	'You are dragged out by the morgue attendants. The pathologist notes that you died from an unknown cause. Soon, your body is handed over to your parents...'
 elseif over = 2:
 	'<center><img <<$set_imgh>> src="images/system/2_endings/over.jpg"></center>'
-	if StoryLine = 0 and ntstart = 0:
+	if $start_type[1] = 'tg':
 		'You go mad and start running around town naked screaming, "I am a man!". The police are quickly alerted, and you are taken to a mental hospital. There, you are put in a straitjacket then placed in a room with soft walls. You spend the rest of your days in happy delusions about your family and being a man again, but the delusions never became reality.'
 		*nl
 		'Hint:'
@@ -90,10 +90,12 @@ if $ARGS[0] = 'endscreen':
 end
 
 if $ARGS[0] = 'load_autosave':
-	if StoryLine = 0:
-		opengame 'autosave.sav'
+	if mid($start_type,1,4) = 'city':
+		opengame 'autosave_city.sav'
+	elseif mid($start_type,1,3) = 'uni':
+		opengame 'autosave_uni.sav'
 	else
-		opengame 'autosave_alt.sav'
+		opengame 'autosave_sg.sav'
 	end
 end
 

+ 3 - 3
locations/gdksport.qsrc

@@ -78,7 +78,7 @@ if $ARGS[0] = 'start':
 		gt 'wardrobe', 'start'
 	end
 
-	if shampoo > 0 or (StoryLine = 1 and (SchoolAtestat = 0 or SchoolBlock = 0)):
+	if shampoo > 0 or (mid($start_type,1,2) = 'sg' and (SchoolAtestat = 0 or SchoolBlock = 0)):
 		act 'Take a shower': gt 'gdksport', 'shower'
 	else
 		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
@@ -269,7 +269,7 @@ if $ARGS[0] = 'dance2':
 
 		act 'Leave':
 			if rand (0,4) = 0:
-				if AlbinaQW['StarletsJoined'] = 0 and AlbinaQW['StarletsShutDown'] = 0 and StoryLine ! 0 and ( month < 10 or ( month = 10 and day < 18 )):
+				if AlbinaQW['StarletsJoined'] = 0 and AlbinaQW['StarletsShutDown'] = 0 and mid($start_type,1,2) = 'sg' and ( month < 10 or ( month = 10 and day < 18 )):
 					if alterstrtimg = 13:
 						gt 'albina_starlets', 'albina3'
 					elseif grupTipe = 1 or grupTipe = 2:
@@ -579,7 +579,7 @@ if $ARGS[0] = 'shower':
 	menu_off = 1
 	*clr & cla
 	$location_type = 'bathroom'
-	if StoryLine = 1 and (SchoolAtestat = 0 or SchoolBlock = 0): noShampoo = 1
+	if mid($start_type,1,2) = 'sg' and (SchoolAtestat = 0 or SchoolBlock = 0): noShampoo = 1
 	dynamic $showerdin
 	minut += 15
 	pcs_horny += 1

+ 6 - 6
locations/gkafe.qsrc

@@ -75,18 +75,18 @@ if $ARGS[0] = '':
 			
 			gs 'gkafe', 'menu'
 
-			if StoryLine > 0 and home_owned[2] = 1 and SchoolBlock = 0:
+			if mid($start_type,1,2) = 'sg' and home_owned[2] = 1 and SchoolBlock = 0:
 				'Since your <<$npc_nickname[''A29'']>> works here, you can eat-in for free.'
-			elseif StoryLine > 0 and home_owned[2] = 0 and SchoolBlock = 0:
+			elseif mid($start_type,1,2) = 'sg' and home_owned[2] = 0 and SchoolBlock = 0:
 				'Since your <<$npc_nickname[''A29'']>> kicked you out, you can no longer eat here for free.'
-			elseif StoryLine > 0 and home_owned[2] = 1 and SchoolBlock = 0:
+			elseif mid($start_type,1,2) = 'sg' and home_owned[2] = 1 and SchoolBlock = 0:
 				'Since you got kicked out of school, you can no longer eat here for free. Your <<$npc_nickname[''A29'']>> wants you to earn a living.'
-			elseif StoryLine > 0 and home_owned[2] = 0 and SchoolBlock = 1:
+			elseif mid($start_type,1,2) = 'sg' and home_owned[2] = 0 and SchoolBlock = 1:
 				'Since you were expelled from school and your <<$npc_nickname[''29'']>> kicked you out, you can no longer eat here for free.'
 			end
 
 			if week < 6:
-				if hour >= 6 and hour < 16 and StoryLine > 0:
+				if hour >= 6 and hour < 16:
 					'Your <a href="exec:gt ''mother''">mother</a> is currently working at the cafe, taking orders behind the counter.'
 				else
 					'The bar owner <a href="exec:gt ''gkafe'', ''boris''">Borislav</a> is currently taking orders at the counter. Most people call him Slava.'
@@ -109,7 +109,7 @@ if $ARGS[0] = '':
 					act '"Drink tea" with Misha':gs 'boyStat', 'A54' & sexpartkno = 1 & gt 'gevent', '1-1'
 				end
 			end
-			if StoryLine = 1 and SchoolAtestat = 0:
+			if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0:
 				if (sunWeather = 0 or temper <= 0) and (hour >= 18 and hour < 20 and week < 6) or (week >= 6 and hour >= 9 and hour < 20):
 					'<a href="exec:minut += 3 & gt ''gopskver''">Vitek, Dan and Vasily</a> are sitting at a table in the far corner.'
 			end

+ 1 - 1
locations/grigory.qsrc

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

+ 243 - 187
locations/gschool_chats.qsrc

@@ -1,16 +1,29 @@
 # gschool_chats
-!!2021/05/02
+!!2022/02/11
 
 if $ARGS[0] = 'nerds':
 	*clr & cla
 	minut += 5
-	if rand(1,6) = 1 and pcs_vag > 12 and mesec <= 0 and gschool_gropeday ! daystart:
+	if ((hotcat >= 8 and rand(1,5) = 1) or (hotcat >= 5 and rand(1,10) = 1)) and gschool_gropeday ! daystart:
+		!!It is more likely that somebody will grap the player''s butt the hooter she is.
 		menu_off = 1
 		gschool_gropeday = daystart
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boysex_tualet.jpg"></center>'
-		'When you enter the class, 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.'
+		if $pantyworntype = 'none':
+			gs 'fame', 'pav', 'sex', 'small'
+			'<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.'
+			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.'
+			gs 'arousal', 'flashlite', 1, 'humiliation'
+			gs 'arousal', 'end'
+			gs 'stat'
+		end
 		act 'Ignore it': gt 'gschool_chats', 'nerds'
-		act 'Identify the perpetrator': gt 'gschool_events', 'rand_scoolboy'
+		act 'Identify the perpetrator': gt 'gschool_events1', 'butt_grab'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/chat/nerd' + rand(1,3) + '.jpg"></center>'
 		if PCloStyle2 = 4:
@@ -83,95 +96,116 @@ if $ARGS[0] = 'gopniks':
 	*clr & cla
 	minut += 5
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/chat/gopnik.jpg"></center>'
-	if PCloStyle2 = 4:
-		if PCloInhibit <= 10:
-			'<font color="blue">This uniform is very conservative. Only the nerds would approve of you wearing it.</font>'
-			if grupTipe = 4:
-				grupvalue[4] -= 10
-				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.'
-			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.'
-			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.'
-			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.'
-			end
-			'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
-			gs 'gschool_groups', 'gopniks'
-			act 'Leave': gt 'gschool_lessons', 'short_break'
-		elseif PCloSkirt = 5 and PCloThinness < 5 and PCloBra = 0:
-			grupvalue[4] += 5
-			gs 'gschool_socialchg', 'group_rel_change', 'gopniks', 1
-			gs 'npc_relationship', 'modify', 'A143', 'like'
-			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.'
-			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.'
-			end
-			'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
-			gs 'gschool_groups', 'gopniks'
-			act 'Leave': gt 'gschool_lessons', 'short_break'
+	if ((hotcat >= 8 and rand(1,5) = 1) or (hotcat >= 5 and rand(1,10) = 1)) and gschool_gropeday ! daystart:
+		!!It is more likely that somebody will grap the player''s butt the hooter she is.
+		menu_off = 1
+		gschool_gropeday = daystart
+		if $pantyworntype = 'none':
+			gs 'fame', 'pav', 'sex', 'small'
+			'<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.'
+			gs 'arousal', 'flash', 1, 'humiliation'
+			gs 'arousal', 'end'
+			gs 'stat'
 		else
-			if grupTipe = 4: grupvalue[4] -= 3 & gs 'fame', 'pav', 'sex', 1
-			gs 'gschool_socialchg', 'group_rel_change', 'gopniks', -1
-			gs 'npc_relationship', 'modify', 'A189', 'like'
-			if kotovLoveQW > 0 and kotovLoveQW['clo_comment'] = 0:
-				kotovLoveQW['clo_comment'] = 1
-				gs 'npc_relationship', 'modify', 'A9', 'dislike'
-				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.'
-				*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."'
-				'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:
-				gs 'npc_relationship', 'modify', 'A9', 'hate'
-				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.'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/boysex_tualet.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 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'
+		end
+		act 'Ignore it': gt 'gschool_chats', 'gopniks'
+		act 'Identify the perpetrator': gt 'gschool_events1', 'butt_grab'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/chat/gopnik.jpg"></center>'
+		if PCloStyle2 = 4:
+			if PCloInhibit <= 10:
+				'<font color="blue">This uniform is very conservative. Only the nerds would approve of you wearing it.</font>'
+				if grupTipe = 4:
+					grupvalue[4] -= 10
+					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.'
+				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.'
+				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 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.'
+			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.'
+				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.'
+				end
 				'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
 				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.'
+			elseif PCloSkirt = 5 and PCloThinness < 5 and PCloBra = 0:
+				grupvalue[4] += 5
+				gs 'gschool_socialchg', 'group_rel_change', 'gopniks', 1
+				gs 'npc_relationship', 'modify', 'A143', 'like'
+				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.'
+				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.'
+				end
+				'Vitek, Dan, Vasily, Lena, Lera, Pauline, Alyona, Anushka, Ekaterina, Radomir, Lavrenti, Arkadi, Roman, Valentin and Niko are hanging around.'
 				gs 'gschool_groups', 'gopniks'
 				act 'Leave': gt 'gschool_lessons', 'short_break'
+			else
+				if grupTipe = 4: grupvalue[4] -= 3 & gs 'fame', 'pav', 'sex', 1
+				gs 'gschool_socialchg', 'group_rel_change', 'gopniks', -1
+				gs 'npc_relationship', 'modify', 'A189', 'like'
+				if kotovLoveQW > 0 and kotovLoveQW['clo_comment'] = 0:
+					kotovLoveQW['clo_comment'] = 1
+					gs 'npc_relationship', 'modify', 'A9', 'dislike'
+					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.'
+					*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."'
+					'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:
+					gs 'npc_relationship', 'modify', 'A9', 'hate'
+					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.'
+					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.'
+					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.'
+					gs 'gschool_groups', 'gopniks'
+					act 'Leave': gt 'gschool_lessons', 'short_break'
+				end
 			end
+		else
+			'You are using the school uniform cheat and are not wearing a uniform, therefore no one can react to your uniform.'
+			gs 'gschool_groups', 'gopniks'
+			act 'Leave': gt 'gschool_lessons', 'short_break'
 		end
-	else
-		'You are using the school uniform cheat and are not wearing a uniform, therefore no one can react to your uniform.'
-		gs 'gschool_groups', 'gopniks'
-		act 'Leave': gt 'gschool_lessons', 'short_break'
 	end
 end
 
-
 if $ARGS[0] = 'gopniks2':
 end
 
@@ -179,128 +213,150 @@ if $ARGS[0] = 'cooljocks':
 	*clr & cla
 	minut += 5
 	gs 'stat'
-	'<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.'
-	if PCloStyle2 = 4:
-		if PCloInhibit <= 10:
-			if fame['pav_sex'] > 0: gs 'fame', 'pav', 'sex', -1
-			grupvalue[1] -= 5
-			grupvalue[2] -= 3
-			gs 'npc_relationship', 'modify', 'A1', 'loathe'
-			gs 'npc_relationship', 'modify', 'A8', -1
-			gs 'npc_relationship', 'modify', 'A13', -1
-			gs 'npc_relationship', 'modify', 'A15', -1
-			gs 'npc_relationship', 'modify', 'A17', 'dislike'
-			if christinaQW['dompath'] < 6: gs 'npc_relationship', 'modify', 'A18', 'hate'
-			gs 'npc_relationship', 'modify', 'A19', -1
-			gs 'npc_relationship', 'modify', 'A22', 'dislike'
-			gs 'npc_relationship', 'modify', 'A23', 'dislike'
-			if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', -1
-			gs 'npc_relationship', 'modify', 'A139', -1
-			gs 'npc_relationship', 'modify', 'A140', -1
-			gs 'npc_relationship', 'modify', 'A147', -1
-			gs 'npc_relationship', 'modify', 'A148', -1
-			gs 'npc_relationship', 'modify', 'A149', -1
-			gs 'npc_relationship', 'modify', 'A165', -1
-			
-			if christinaQW['dompath'] >= 6:
-				'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.'
-			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.'
-			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.'
-			gs 'gschool_groups', 'popular'
-			gs 'gschool_groups', 'jocks'
-			act 'Leave': gt 'gschool_lessons', 'short_break'
-		elseif PCloSkirt < 5 and PCloThinness < 5 and PCloBra = 0:
-			if PCloQuality >= 4:
-				grupvalue[1] += 1
-				grupvalue[2] += 1
-				gs 'npc_relationship', 'modify', 'A1', 1
-				gs 'npc_relationship', 'modify', 'A4', 1
-				gs 'npc_relationship', 'modify', 'A14', 1
-				gs 'npc_relationship', 'modify', 'A15', 1
-				gs 'npc_relationship', 'modify', 'A17', 1
-				gs 'npc_relationship', 'modify', 'A22', 1
-				gs 'npc_relationship', 'modify', 'A23', 1
-				if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 1
-				gs 'npc_relationship', 'modify', 'A139', 1
-				gs 'npc_relationship', 'modify', 'A140', 1
+	if ((hotcat >= 8 and rand(1,5) = 1) or (hotcat >= 5 and rand(1,10) = 1)) and gschool_gropeday ! daystart:
+		!!It is more likely that somebody will grap the player''s butt the hooter she is.
+		menu_off = 1
+		gschool_gropeday = daystart
+		if $pantyworntype = 'none':
+			gs 'fame', 'pav', 'sex', 'small'
+			'<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.'
+			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, 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'
+		end
+		act 'Ignore it and talk to the cool kids and jocks': gt 'gschool_chats', 'cooljocks'
+		act 'Identify the perpetrator': gt 'gschool_events1', 'butt_grab'
+	else
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/chat/cooljocks.jpg"></center>'
+		'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.'
+		if PCloStyle2 = 4:
+			if PCloInhibit <= 10:
+				if fame['pav_sex'] > 0: gs 'fame', 'pav', 'sex', -1
+				grupvalue[1] -= 5
+				grupvalue[2] -= 3
+				gs 'npc_relationship', 'modify', 'A1', 'loathe'
+				gs 'npc_relationship', 'modify', 'A8', -1
+				gs 'npc_relationship', 'modify', 'A13', -1
+				gs 'npc_relationship', 'modify', 'A15', -1
+				gs 'npc_relationship', 'modify', 'A17', 'dislike'
+				if christinaQW['dompath'] < 6: gs 'npc_relationship', 'modify', 'A18', 'hate'
+				gs 'npc_relationship', 'modify', 'A19', -1
+				gs 'npc_relationship', 'modify', 'A22', 'dislike'
+				gs 'npc_relationship', 'modify', 'A23', 'dislike'
+				if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', -1
+				gs 'npc_relationship', 'modify', 'A139', -1
+				gs 'npc_relationship', 'modify', 'A140', -1
+				gs 'npc_relationship', 'modify', 'A147', -1
+				gs 'npc_relationship', 'modify', 'A148', -1
+				gs 'npc_relationship', 'modify', 'A149', -1
+				gs 'npc_relationship', 'modify', 'A165', -1
 				
 				if christinaQW['dompath'] >= 6:
-					'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. Veronika is reading something and seems to be unaware of the whole conversation.'
+					'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.'
 				else
-					'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. '+iif(npc_grupTipe['A18'] ! 5, '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, 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.'
 				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.'
 				gs 'gschool_groups', 'popular'
 				gs 'gschool_groups', 'jocks'
 				act 'Leave': gt 'gschool_lessons', 'short_break'
-			else
-				'Dimka, Igor, Katja, Vicky, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Lariska, '+iif(npc_grupTipe['A18'] ! 5, 'Christina, ', '')+' Lina, Bella, Veronika, Lazar, Erast and Vanya are all gathered around the lockers.'
-				gs 'gschool_groups', 'popular'
-				gs 'gschool_groups', 'jocks'
-				act 'Leave': gt 'gschool_lessons', 'short_break'
-			end
-		elseif PCloSkirt = 5 and PCloThinness < 5 and PCloBra = 0:
-			if PCloQuality >= 4:
-				gs 'gschool_socialchg', 'group_rel_change', 'cool kids', 1
-				grupvalue[1] += 2
-				gs 'gschool_socialchg', 'group_rel_change', 'jocks', 1
-				grupvalue[2] += 1
-				if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
-				
-				if christinaQW['dompath'] >= 6:
-					'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. Veronika is reading something and seems to be unaware of the whole conversation.'
+			elseif PCloSkirt < 5 and PCloThinness < 5 and PCloBra = 0:
+				if PCloQuality >= 4:
+					grupvalue[1] += 1
+					grupvalue[2] += 1
+					gs 'npc_relationship', 'modify', 'A1', 1
+					gs 'npc_relationship', 'modify', 'A4', 1
+					gs 'npc_relationship', 'modify', 'A14', 1
+					gs 'npc_relationship', 'modify', 'A15', 1
+					gs 'npc_relationship', 'modify', 'A17', 1
+					gs 'npc_relationship', 'modify', 'A22', 1
+					gs 'npc_relationship', 'modify', 'A23', 1
+					if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 1
+					gs 'npc_relationship', 'modify', 'A139', 1
+					gs 'npc_relationship', 'modify', 'A140', 1
+					
+					if christinaQW['dompath'] >= 6:
+						'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. Veronika is reading something and seems to be unaware of the whole conversation.'
+					else
+						'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. '+iif(npc_grupTipe['A18'] ! 5, '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.'
+					end
+					gs 'gschool_groups', 'popular'
+					gs 'gschool_groups', 'jocks'
+					act 'Leave': gt 'gschool_lessons', 'short_break'
 				else
-					'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. '+iif(npc_grupTipe['A18'] ! 5, '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.'
+					'Dimka, Igor, Katja, Vicky, Irina, Albina, '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Lariska, '+iif(npc_grupTipe['A18'] ! 5, 'Christina, ', '')+' Lina, Bella, Veronika, Lazar, Erast and Vanya are all gathered around the lockers.'
+					gs 'gschool_groups', 'popular'
+					gs 'gschool_groups', 'jocks'
+					act 'Leave': gt 'gschool_lessons', 'short_break'
+				end
+			elseif PCloSkirt = 5 and PCloThinness < 5 and PCloBra = 0:
+				if PCloQuality >= 4:
+					gs 'gschool_socialchg', 'group_rel_change', 'cool kids', 1
+					grupvalue[1] += 2
+					gs 'gschool_socialchg', 'group_rel_change', 'jocks', 1
+					grupvalue[2] += 1
+					if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
+					
+					if christinaQW['dompath'] >= 6:
+						'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. Veronika is reading something and seems to be unaware of the whole conversation.'
+					else
+						'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. '+iif(npc_grupTipe['A18'] ! 5, '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.'
+					end
+					gs 'gschool_groups', 'popular'
+					gs 'gschool_groups', 'jocks'
+					act 'Leave': gt 'gschool_lessons', 'short_break'
+				else
+					gs 'gschool_socialchg', 'group_rel_change', 'jocks', 1, 'male'
+					grupvalue[2] += 1
+					gs 'npc_relationship', 'modify', 'A3', 'love'
+					gs 'npc_relationship', 'modify', 'A5', 'love'
+					gs 'npc_relationship', 'modify', 'A8', 'love'
+					if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
+					gs 'npc_relationship', 'modify', 'A146', 'like'
+					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, ', '')+' '+iif(npc_grupTipe['A18'] ! 5, 'Christina, ', '')+' Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, 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'
 				end
-				gs 'gschool_groups', 'popular'
-				gs 'gschool_groups', 'jocks'
-				act 'Leave': gt 'gschool_lessons', 'short_break'
 			else
-				gs 'gschool_socialchg', 'group_rel_change', 'jocks', 1, 'male'
-				grupvalue[2] += 1
-				gs 'npc_relationship', 'modify', 'A3', 'love'
-				gs 'npc_relationship', 'modify', 'A5', 'love'
-				gs 'npc_relationship', 'modify', 'A8', 'love'
+				gs 'fame', 'pav', 'sex', 5
+				gs 'gschool_socialchg', 'group_rel_change', 'cool kids', -1
+				grupvalue[1] -= 5
+				gs 'gschool_socialchg', 'group_rel_change', 'jocks', -1
+				grupvalue[2] -= 5
+				gs 'npc_relationship', 'modify', 'A1', 'hate'
+				gs 'npc_relationship', 'modify', 'A17', 'dislike'
+				if christinaQW['dompath'] < 6: gs 'npc_relationship', 'modify', 'A18', 'hate'
+				gs 'npc_relationship', 'modify', 'A22', 'hate'
 				if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
-				gs 'npc_relationship', 'modify', 'A146', 'like'
-				gs 'npc_relationship', 'modify', 'A147', 'like'
-				gs 'npc_relationship', 'modify', 'A148', 'like'
+				gs 'npc_relationship', 'modify', 'A139', 'dislike'
+				gs 'npc_relationship', 'modify', 'A140', 'dislike'
 				
-				'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, ', '')+' '+iif(npc_grupTipe['A18'] ! 5, 'Christina, ', '')+' Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, Lariska, Lina, Veronika, Lazar, Erast and Vanya just stay out of it.'
-				gs 'gschool_groups', 'popular'
-				gs 'gschool_groups', 'jocks'
+				'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['A18'] ! 5, 'Christina, ', '')+' '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, 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
-			gs 'fame', 'pav', 'sex', 5
-			gs 'gschool_socialchg', 'group_rel_change', 'cool kids', -1
-			grupvalue[1] -= 5
-			gs 'gschool_socialchg', 'group_rel_change', 'jocks', -1
-			grupvalue[2] -= 5
-			gs 'npc_relationship', 'modify', 'A1', 'hate'
-			gs 'npc_relationship', 'modify', 'A17', 'dislike'
-			if christinaQW['dompath'] < 6: gs 'npc_relationship', 'modify', 'A18', 'hate'
-			gs 'npc_relationship', 'modify', 'A22', 'hate'
-			if soniaPS = 0: gs 'npc_relationship', 'modify', 'A25', 'like'
-			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['A18'] ! 5, 'Christina, ', '')+' '+iif(npc_grupTipe['A25'] ! 5, 'Sonia, ', '')+'Stasya, Lizaveta, Marcus, Andrey, Mefodiy, Ivan, '+iif(npc_grupTipe['A5'] ! 5, 'Fedor, ', '')+'Svyatoslav, 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.'
+			'You are using the school uniform cheat and are not wearing a uniform, therefore no one can react to your uniform.'
+			gs 'gschool_groups', 'popular'
+			gs 'gschool_groups', 'jocks'
 			act 'Leave': gt 'gschool_lessons', 'short_break'
 		end
-	else
-		'You are using the school uniform cheat and are not wearing a uniform, therefore no one can react to your uniform.'
-		gs 'gschool_groups', 'popular'
-		gs 'gschool_groups', 'jocks'
-		act 'Leave': gt 'gschool_lessons', 'short_break'
 	end
 end
 

+ 16 - 625
locations/gschool_events.qsrc

@@ -1,5 +1,5 @@
 # gschool_events
-!2021/08/19
+!2022/02/09
 !! Only before class
 if $ARGS[0] = 'teacher_greet':
 	*clr & cla
@@ -1075,11 +1075,19 @@ if $ARGS[0] = 'break_events':
 		gs 'arousal', 'end'
 		gs 'stat'
 	elseif break_rand = 29:
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/skirt_pulled_up.jpg"></center>'
-		'As you pass by some of the nerds talking, Dan walks by them as well. He reaches out and grabs the back of Natasha''s skirt and pulls it up, showing off her panty clad ass to everyone. She fights to pull her skirt out of his hand to no avail. Feofan tells him to let go and gets shoved into a locker for his trouble, but it does make Dan let go of Natasha''s skirt. Before you can say anything, a teacher looks out from one of the classrooms and asks what''s going on. Everyone says nothing and they go about their way, but the look Dan gives Feofan promises it might not be over.'
-		gs 'arousal', 'erotic', 1
-		gs 'arousal', 'end'
-		gs 'stat'
+		if NatbelQW['panty_stuff_day'] = daystart:
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/buttgrab_nopanties.jpg"></center>'
+			'As you pass by some of the nerds talking, Dan walks by them as well. He reaches out and grabs the back of Natasha''s skirt and pulls it up, showing off her naked ass to everyone. She fights to pull her skirt out of his hand to no avail. Feofan tells him to let go and gets shoved into a locker for his trouble, but it does make Dan let go of Natasha''s skirt. Before you can say anything, a teacher looks out from one of the classrooms and asks what''s going on. Everyone says nothing and they go about their way, but the look Dan gives Feofan promises it might not be over.'
+			gs 'arousal', 'erotic_nudity', 1
+			gs 'arousal', 'end'
+			gs 'stat'
+		else 
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/skirt_pulled_up.jpg"></center>'
+			'As you pass by some of the nerds talking, Dan walks by them as well. He reaches out and grabs the back of Natasha''s skirt and pulls it up, showing off her panty clad ass to everyone. She fights to pull her skirt out of his hand to no avail. Feofan tells him to let go and gets shoved into a locker for his trouble, but it does make Dan let go of Natasha''s skirt. Before you can say anything, a teacher looks out from one of the classrooms and asks what''s going on. Everyone says nothing and they go about their way, but the look Dan gives Feofan promises it might not be over.'
+			gs 'arousal', 'erotic', 1
+			gs 'arousal', 'end'
+			gs 'stat'
+		end
 	elseif break_rand = 30:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/skirtupback.jpg"></center>'
 		if christinaQW['dompath'] >= 6:
@@ -1130,7 +1138,7 @@ if $ARGS[0] = 'break_events':
 		end
 		act 'Leave': gt 'gschool_events', 'leave_break_events2'
 		if lernHome > 1:
-			act 'Follow Petka': gt 'gschool_events', 'follow_petka'
+			act 'Follow Petka': gt 'petkaev', 'follow_petka'
 		elseif petka_homework > 0:
 			'<br>You already done all your homework and you don''t need his help today.'
 		else
@@ -1156,232 +1164,6 @@ if $ARGS[0] = 'leave_break_events2':
 	end
 end
 
-if $ARGS[0] = 'follow_petka':
-	*clr & cla
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/nerdtalk.jpg"></center>'
-	if petka_homework = 0:
-		'You follow Petka into the bathroom and as the door closes, he quickly turns around alarmed. When he sees you, he looks a little confused but also a little leary of you. "Hey this is the boys bathroom! You shouldn''t be in here."'
-		'You ignore him. "Petka, I was wondering if you could do me a favor. How about you give me your homework so I can copy it?"'
-		'He is already shaking his head before you even finish. "I can''t do that. That would be cheating and I could get expelled for helping you cheat! I''m sorry, but I can''t help you."'
-
-		act 'Oh well, you tried':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/nerdtalk.jpg"></center>'
-			'You sigh. Oh well, at least you tried. <i>Maybe I really will have to study to get my grades up,</i> you think to yourself as you leave the bathroom.'
-			gs 'gschool_events', 'leave_break_events'
-		end
-
-		gs 'willpower', 'misc', 'force', 'medium'
-		if will_cost <= pcs_willpwr and grupTipe = 1:
-			act 'Threaten his reputation (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'misc', 'force', 'medium'
-				gs 'willpower', 'pay', 'force'
-				gs 'stat'
-				petka_homework = 1
-				grupvalue[3] -= 5
-				grupvalue[1] += 3
-				npc_rel['A6'] -= 5
-				gs 'grades', 'homework', 'school', 'yes', 1, 2, 'A6'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworksuccess.jpg"></center>'
-				'You sigh "Well I guess I will just have to tell everyone I caught you jerking off to upskirt pictures of the girls on your phone."'
-				'He pales a bit at that. "I never did that! The guys will make fun of me or even beat me up!"'
-				'You shrug to him. "Sorry, I can''t help you." you say in a mocking tone.'
-				'He hangs his head for a moment, then nods. "OK, you can have my homework." he says as he pulls it out of his bag. Just please leave me alone.'
-				'You take the homework from him. "See how easy that was?" You leave with the homework to find a quiet place to copy it before class.'
-				act 'Take the homework': gt 'gschool_events', 'leave_break_events2'
-			end
-		elseif will_cost > pcs_willpwr and grupTipe = 1:
-			act 'Threaten his reputation (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-
-		gs 'willpower', 'misc', 'force', 'medium'
-		if will_cost <= pcs_willpwr and (grupTipe = 2 or grupTipe = 4):
-			act 'Give him a swirly (<<will_cost>> Willpower)':
-				*clr & cla
-				gs 'willpower', 'misc', 'force', 'medium'
-				gs 'willpower', 'pay', 'force'
-				gs 'stat'
-				petka_homework = 1
-				grupvalue[3] -= 10
-				grupvalue[2] += 2
-				grupvalue[4] += 3
-				npc_rel['A6'] -= 10
-				gs 'grades', 'homework', 'school', 'yes', 1, 2, 'A6'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/swirlygb.jpg"></center>'
-				'You look at him, a bit surprised he would turn you down, but you have a solution for this. "No? Well OK then." For a moment he looks relieved, but as you step closer to him he panics. You grab him by his ear and start pulling him into one of the stalls. Just as you start to pull him into the stall, he grabs your hand and starts to pry your fingers off his ear.'
-				*nl
-				'You release his ear, but as you do you knee him hard in the balls, causing him to crumple to the floor with a gasp, holding his crotch. "Get up pussy." Grabbing him, you haul him up onto his hands and knees while he is still recovering from the hit. You shove him forward until his face is over the toilet bowl. "Ready to give me your homework yet?" you ask him.'
-				'He pleads with you and resists by placing his hands on the toilet bowl. "No! Let me go! Please!"'
-				*nl
-				'Maneuvering a bit, you get into a position where you can push down on his head and deliver another kick to his balls. He crumples as he cries out and you easily push his head down. You place one of your knees on his upper back while using one hand to force his head into the toilet. After a couple of dunks and him still refusing, you use your other hand to reach down the back of his pants. Clutching his underwear, you yank on them until you hear cloth tearing. Finally, he relents. "OK... OK! You... You can have my homework! Just, please... stop!" he pleads through what sounds like sobs.'
-				act 'Let him up':
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworksuccess.jpg"></center>'
-					'You let go of him and back off, letting him shakily get back on his feet. "Well?" you demand.'
-					'He grabs his pack and pulls out some papers, quickly handing them over. "Here, now please leave me alone..." he says as his voice cracks.'
-					'You smile at him and pat him on the cheek, causing him to flinch. It is hard to tell with the toilet water on his face if he is crying or not. "See, that wasn''t so hard was it? Next time you will know better." you say in a mocking tone.'
-					'He is on the verge of tears and just nods. You leave with the homework to find a quiet place to copy it before class.'
-					act 'Take the homework': gt 'gschool_events', 'leave_break_events2'
-				end
-			end
-		elseif will_cost > pcs_willpwr and (grupTipe = 2 or grupTipe = 4):
-			act 'Give him a swirly (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-		
-		gs 'willpower', 'sex', 'self'
-		if will_cost <= pcs_willpwr:
-			act 'Bribe him with sex (<<will_cost>> Willpower)':
-				gs 'willpower', 'sex', 'self'
-				petka_homework = 2
-				gt 'gschool_events', 'homework_sex_bribe'
-			end
-		else
-			act 'Bribe him with sex (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-		end
-	elseif petka_homework = 2:
-		'You follow Petka into the bathroom and as the door closes, he quickly turns around alarmed. When he sees you he looks a little eager, obviously hoping you want to repeat last time. "Do you need my homework again?" he asks you.'
-		'You nod your head. "Yes."'
-		'He licks his lips a bit and you can already see the bulge in his pants growing. "Same as last time?" he asks, sounding hopeful.'
-		'You nod your head as you walk over to him.'
-		act 'Change your mind': gt 'gschool_events', 'leave_break_events2'
-		act 'Bribe him with sex again': gt 'gschool_events', 'homework_sex_bribe'
-	else
-		gs 'grades', 'homework', 'school', 'yes', 1, 2, 'A6'
-		'You follow Petka into the bathroom and as the door closes, he quickly turns around alarmed. When he sees you he looks a little afraid and crest fallen. "What do you want this time?" he asks.'
-		'"The same thing as last time Petka... or do you need a reminder?" you reply.'
-		'He quickly pulls out his homework, obviously afraid of you. "Here, take it! Just please, leave me alone..."'
-		act 'Take the homework': gt 'gschool_events', 'leave_break_events2'
-	end
-end
-
-if $ARGS[0] = 'homework_sex_bribe':
-	*clr & cla
-	gs 'stat'
-	grupvalue[1] -= 3
-	grupvalue[2] -= 2
-	grupvalue[3] -= 3
-	grupvalue[4] -= 1
-	npc_rel['A6'] += 5
-	if npc_sex['A6'] = 0: npc_sex['A6'] = 1
-	gs 'grades', 'homework', 'school', 'yes', 1, 2, 'A2'
-	gs 'fame', 'pav', 'sex', 5
-	gs 'boystat', 'A6'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homework1.jpg"></center>'
-	'You walk over to him and start to undo your shirt and say to him seductively. "If you do this for me, I will do something for you."'
-	'His eyes get big as he looks down at your chest. "Like what?" he squeaks out.'
-	act 'Take off top':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homework2.jpg"></center>'
-		'You pull open your shirt and show him your bare breasts. "Like you do something for me, I can make you feel real good. So what do you say?"'
-		'He swallows hard as he stares at your tits and nods vigorously. You can see the bulge in his pants growing.'
-		'"Well you need to get me ready." you tell him as you walk over to the stall with your back turned to him. "Why don''t you use that tongue to get me all wet?"'
-		if $pantyworntype ! 'none': 'You pull down your panties, letting them drop to the floor around your ankles as he walks up behind you and kneels down.'
-		act 'Eat me':
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homework3.jpg"></center>'
-			'You lean forward slightly, spreading your legs and with one hand spreading your ass cheeks to give him easier access to your pussy. He eagerly licks your pussy, he even licks your asshole. You are not sure if he is doing it on purpose or just doesn''t know what he is doing. It''s likely the latter as he isn''t very good at licking your pussy, but he sure is eager.'
-			gs 'arousal', 'cuni', 2, 'unknown'
-			gs 'arousal', 'rimming', 2, 'unknown'
-			minut -= 2
-			gs 'stat'
-			act 'Ride him cowgirl':
-				*clr & cla
-				gs 'boyStat', 'A6'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworkride1.jpg"></center>'
-				'Getting tired of his lackluster attempt to eat you out, you push his head away. "Get your cock out and lay on your back." you tell him.'
-				'He quickly lays on his back, unbuttoning his pants so his <<dick>>cm <<$dick_girth>> dick springs free. You take your clothes off as he gets in position. You walk over to him, straddle him and slowly lower yourself down on him, feeling his cock slide into you.'
-				'You start off slowly riding him, picking up speed as it starts to feel better and better.'
-				gs 'arousal', 'vaginal', 5, 'dom'
-				gs 'stat'
-				act 'Reverse cowgirl':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworkride2.jpg"></center>'
-					'It starts to feel really good, but looking into his longing eyes starts to bother you, so you turn around and start riding him reverse cowgirl style. This is even better, now you can just focus on your own pleasure and not worry about him as you use him. His breathing is becoming quicker and he is starting to grunt louder when he suddenly says "I''m about to cum."'
-					gs 'arousal', 'vaginal', 5, 'dom'
-					gs 'stat'
-					act 'Let him cum on your face':gt 'gschool_events', 'petra_homework_facial'
-				end
-			end
-			act 'Fuck me':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworkv1.jpg"></center>'
-				'Getting tired of his lackluster attempt to eat you out, you push his head away. "Get your cock out and come over here." you tell him.'
-				'He quickly unbuttons his pants so his <<dick>>cm <<$dick_girth>> dick springs free. You take your clothes off as you walk over to the sinks, partially bending over and placing one foot on the sink. "Come over here and fuck my pussy." He wastes no time and walks over behind you. It takes him a couple of tries to get his cock inside you as he keeps missing your hole, showing his inexperience.'
-				'Finally, with your help, he gets it lined up and slides his cock into your pussy, moaning loudly as he does. He quickly slides himself in balls deep and starts fucking you frantically like you imagine a virgin would.'
-				gs 'arousal', 'vaginal', 5
-				gs 'stat'
-				act 'Oh yes that''s it':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworkv2.jpg"></center>'
-					'What he lacks in skill, he almost makes up for in enthusiasm as he fucks you, although you can tell he is trying to restrain himself. Perhaps he is afraid of hurting you by being too rough? Either way it doesn''t take too long before he moans out "I''m about to cum."'
-					gs 'arousal', 'vaginal', 5
-					gs 'stat'
-					act 'Let him cum on your face':gt 'gschool_events', 'petra_homework_facial'
-				end
-				act 'You can fuck my ass':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworka1.jpg"></center>'
-					'His dick is rather on the small side, perhaps it would feel better in your ass. "I want you to fuck my ass now."'
-					gs 'arousal', 'auto_lube', 'anal'
-					'He breathes almost in your ear. "OK." He pulls out and tries to put his dick in your ass, failing until you grab his dick and help line it up. He finally slides his cock up your ass. This seems to really excite him, as it doesn''t take long at all until he moans out "I''m about to cum."'
-					gs 'arousal', 'anal', 5
-					gs 'stat'
-					act 'Let him cum on your face':gt 'gschool_events', 'petra_homework_facial'
-				end
-			end
-			act 'Fuck my ass':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworka1.jpg"></center>'
-				'Getting tired of his lackluster attempt to eat you out, you push his head away. "Get your cock out and fuck my ass." you tell him.'
-				'He quickly unbuttons his pants so his <<dick>>cm <<$dick_girth>> dick springs free. You take your clothes off before leaning against the side of the stall, partially bending over. You use one hand to spread your cheeks while your other hand helps guide his dick to your asshole.'
-				gs 'arousal', 'auto_lube', 'anal'
-				'With your help, he gets it lined up and slides his cock into your ass, moaning loudly as he does. He quickly slides himself in balls deep and starts fucking you frantically like you imagine a virgin would.'
-				gs 'arousal', 'anal', 5
-				gs 'stat'
-				act 'Pound my little ass':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworka2.jpg"></center>'
-					'After he pulls back and slips out of you one too many times, you decide to change positions. "Stop, let me change to a better position." He stops and waits while you lay down face first on the floor. You are a little thrilled at the idea of laying on the dirty floor while some guy fucks your ass. You reach back with both hands and spread your ass cheeks wide, glancing back at him. "Well, what are you waiting for?"'
-					'That is all the encouragement he needs and he quickly gets down on top of you. This time he doesn''t have any trouble shoving his dick back in your ass. He starts fucking your ass balls deep and very quickly he moans out "I''m about to cum."'
-					gs 'arousal', 'anal', 5
-					gs 'stat'
-					act 'Let him cum on your face': gt 'gschool_events', 'petra_homework_facial'
-				end
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'petra_homework_facial':
-	*clr & cla
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworkcum.jpg"></center>'
-	'Hearing him say he is about to cum, you force him to pull out of you and as you get down on your knees, you tell him "You can jerk off on my face."'
-	'He stands over you and starts jerking his dick. After only a couple of jerks, you feel the first splatter of cum hit your face, quickly following by several more. Before long, half your face is covered in his cum. Once the cum shower finally stops, you get up and start getting dressed again. Seeing this, he puts his dick away and pulls out his homework from his pack.'
-	gs 'cum_call', 'face', 'A6'
-	gs 'arousal', 'foreplay', 2
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Take the homework':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/sex/boys/homeworksuccess.jpg"></center>'
-		'With his cum still on your face, you take the offered homework and smile to him. "See I knew we could work something out. Now get lost!"'
-		'He smiles at first, then looks a little alarmed when you tell him to get lost. He does what you tell him and quickly leaves the bathroom, leaving you alone.'
-		act 'Clean your face and leave':
-			pcs_makeup = 1
-			cumspclnt = 9
-			gs 'cum_cleanup'
-			cumspclnt = 11
-			gs 'cum_cleanup'
-			if pcs_sweat > 19 : pcs_sweat -= 5
-			gt 'gschool_events', 'leave_break_events2'
-		end
-	end
-end
-
 !!After school events
 if $ARGS[0] = 'afterschool_events':
 	*clr & cla
@@ -1878,397 +1660,6 @@ if $ARGS[0] = 'afterschool_classroom_events':
 	end
 end
 
-if $ARGS[0] = 'rand_scoolboy':
-	menu_off = 1
-	:scoolboy_loop
-	scoolboy = rand(1,5)
-	*clr & cla
-	if scoolboy = 1:
-		if DimaRudeBlock = 0 and rand(0,2) = 0:
-			$school_static_num = 'A1'
-		elseif rand(0,1) = 0:
-			$school_static_num = 'A4'
-		else
-			$school_static_num = 'A147'
-		end
-		$rand_boy = $npc_nickname[$school_static_num]	
-	elseif scoolboy = 3:
-		if (artQW ! 3 and artQW ! 20) and rand(0,2) = 0:
-			$school_static_num = 'A2'
-		elseif rand(0,1) = 0:
-			$school_static_num = 'A6'
-		else
-			$school_static_num = 'A152'
-		end
-		$rand_boy = $npc_nickname[$school_static_num]
-	elseif scoolboy = 4:
-		if fame['pav_sex'] >= 50 and kotovLoveQW <= 0:
-			gt 'gschool_events', 'rand_gopnic'
-		else
-			jump 'scoolboy_loop'
-		end
-	else
-		gs 'gschool_events', 'rand_boy_arg', 0, 1, 0, 0, 1, 0
-	end
-	'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big<<mid($school_static_num, 2)>>.jpg"></center>'
-	if npc_gender[$school_static_num] = 0:
-		if scoolboy = 3:
-			'You can tell from the embarrassed look on his face and the admiring glances of his friends that <<$rand_boy>> was the one touching your ass. Looks like he scored some points in his group today.'
-		elseif scoolboy = 2:
-!!ToDo: Remove fedor		
-			'You can tell from his disappointed expression that <<$rand_boy>> was the one groping your ass. Perhaps he was expecting something firmer after hanging out with the athletic girls so much? Maybe you should work out more...'
-		elseif scoolboy = 1:
-			'Even though he tries to hide it as best he can, the proud grin on the face of <<$rand_boy>> tells you that he was the one groping your ass.'
-		elseif scoolboy = 4:
-!!ToDo: instead of random lets make it Vitek, Dan, or Vasily which uses group 1 in this pav_sex act. Or Roman, Lavrenti, Radomir or Arkadi then it is group two for the pav_sex act
-			'The brazen look on his face betrays <<$rand_boy>>. It must have been him touching your ass. Knowing him, he probably would''ve gone further if there weren''t so many people here.'
-		elseif scoolboy = 5:
-			'<<$rand_boy>> is trembling slightly, his eyes shifting back and forth as he awkwardly tries to not be noticed by you. It must''ve been him.'
-			'"<<$rand_boy>>, are you out of your mind!?" you cry out as the other boys burst out into laughter. You can see the panic in his face as he raises his hands in defense, rapidly apologizing:'
-			'"Please, I didn''t want to! They made me, I promise! I''m sorry!"'
-			'You stare him down for a few seconds and realize he''s not lying. You know <<$rand_boy>> already doesn''t have an easy time in school. You give the other guys a derogatory look as you let him off the hook. "Alright, I believe you. Just don''t do it again, okay?"'
-			'He thanks you and quickly takes his seat for the class, visibly relieved you didn''t report him.'
-			act 'Continue': gt 'gschool_events', 'leave_break_events2'
-			exit
-		else
-			'Wait a minute... you don''t recognize any of these people! You must be in the wrong classroom!'
-		end
-		if npc_rel[$school_static_num] <= 50 and npc_grupTipe[$school_static_num] ! 5:
-			act 'Ignore it':
-				grupvalue[1] -= 1
-				grupvalue[2] -= 1
-				grupvalue[3] -= 1	
-				grupvalue[4] -= 1
-				gt 'gschool_events', 'leave_break_events2'
-			end
-			gs 'willpower', 'misc', 'self', 'medium'
-			if will_cost <= pcs_willpwr:
-				act 'Slap him hard (<<will_cost>> Willpower)':
-					*clr & cla
-					gs 'willpower', 'pay', 'self'
-					gs 'stat'
-					npc_rel[$school_static_num] -= 5
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy1.jpg"></center>'
-					if mesec > 0:
-						'It''s bad enough he did it, it is worse because you are on your period. "You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
-					else
-						'"You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
-						if $rand_boy = 'Dimka':
-							'Dimka rubs his face and glares at those laughing then glares at you. "You''ll pay for that bitch!" With that he walks off.'
-						elseif scoolboy = 1 or scoolboy = 2:
-							'After rubbing his face he looks at you in disbelief. "What the fuck was that for? I was just messing with you." Then he walks off.'
-						elseif scoolboy = 4 and $rand_boy ! 'Roman':
-							if gruptipe = 4:
-								'As the others laugh at him, his eyes get hard and he raises his hand to slap you. However, your look back to him promises him a lot more than just a slap from you if he does. He seems to hesitate, then he finally snorts a laugh. He just gives you a look like he will get you back for this and then heads out.'
-							else
-								'As the others laugh at him, his eyes get hard and he slaps you back. Not as hard as he could, but hard enough that your face is really stinging. "Don''t you ever fucking slap me bitch!" he shouts as he storms off.'
-							end
-						end
-					end
-					act 'Continue': gt 'gschool_events', 'leave_break_events2'
-				end
-			else
-				act 'Slap him hard (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		elseif npc_rel[$school_static_num] > 50:
-			act 'Slap him playfully':
-				npc_rel[$school_static_num] -= 2
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy2.jpg"></center>'
-				'"<<$rand_boy>> ain''t so bad... but still, I can''t just let him do this."'
-				'You give him a playful slap in the face. It''s not hard enough to really hurt him, but enough to send a message. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
-				act 'Continue': gt 'gschool_events', 'leave_break_events2'
-			end
-			gs 'willpower', 'exhib', 'self'
-			if will_cost <= pcs_willpwr:
-				act 'Tease him (<<will_cost>> Willpower)':
-					*clr & cla
-					inhib_exp += 2
-					gs 'willpower', 'pay', 'self'
-					gs 'arousal', 'flash', -5
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
-					'<i><<$rand_boy>> is actually kind of cute...</i> you think to yourself.'
-					'You pretend the other boys aren''t there and step closer. "Come on <<$rand_boy>>. You know you only have to ask if you want to see more..." you smile sweetly as you slowly begin to lift your skirt. He looks down, eyes wide. Just before your skirt is high enough to reveal '+iif($pantyworntype ! 'none', 'your panties', 'your pussy')+', you drop it and skip backward, giggling.'
-					*nl
-					'"Pfft-! You really thought I was gonna give everyone a show like that? Keep dreaming." You give him a cute wink as you sit down and get ready for your next class.'
-					act 'Continue': gt 'gschool_events', 'leave_break_events2'
-				end
-			else
-				act 'Lift your skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-			end
-		else
-			act 'Continue': gt 'gschool_events', 'leave_break_events2'
-		end
-	elseif npc_sex[$school_static_num] > 0:
-		'You notice the confident stares of <<$rand_boy>>. It must''ve been him.'
-		act 'Taunt him':
-			*clr & cla
-			pcs_horny += 50
-			gs 'boyStat', $school_static_num
-			gs'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy4.jpg"></center>'
-			'He''s kind of cute. You''re so horny right now, so you decide to tease him and see if you can push him into doing more. You put your finger in your mouth and quietly ask him in a lewd voice "Come on <<$rand_boy>>, is that all you have for me?"'
-			'His friends heard your question, and are now daring him to take you to the men''s room. He doesn''t seem so sure.'
-			act 'Tease him':
-				*clr & cla
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
-				'You can see him starting to get turned on, certain that this is going to turn out good for him. You lean in real close and whisper in his ear, but loud enough for others to hear. "This is what I have for you." You start sliding your skirt slowly up your thighs, with all of the boys watching. Just before it gets high enough to show them anything, you let it go and it drops back in place. "Which is absolutely nothing." you say with a giggle. As you walk away, you hear one of the boys talking to his friend.'
-				*nl
-				'"God so close. She is such a tease."'
-				act 'Continue': gt 'gschool_events', 'leave_break_events2'
-			end
-			act 'Drag him to the men''s room':
-				*clr & cla
-				grupvalue[1] -= 10
-				grupvalue[2] -= 10
-				grupvalue[3] -= 10
-				gs 'fame', 'pav', 'sex', 15
-				gs 'arousal', 'foreplay', 'exhibitionism', -5
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_tualet1.jpg"></center>'
-				'You give him a sweet smile and take him by the hand, pulling him into the men''s room. Slightly lifting up your skirt, you put his hand between your legs. The other boys have followed you and now you''re being fondled in front of a crowd.'
-				act 'Take his cock out of his pants': gt 'gschool_sex', 'rand_bj'
-			end
-			act 'Take him behind the school building':
-				grupvalue[1] -= 5
-				grupvalue[2] -= 5
-				grupvalue[3] -= 5
-				gs 'fame', 'pav', 'sex', 5
-				gt 'gschool_sex', 'rand_sex'
-			end
-			if katjaQW['school_sex'] = 1:
-				act 'Go to the back room with the guy':
-					grupvalue[1] -= 5
-					grupvalue[2] -= 5
-					grupvalue[3] -= 5
-					gs 'fame', 'pav', 'sex', 5
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
-					'You remember the back room that Katja showed you. When you tell <<$rand_boy>> about it, he takes your hand and tells you to take him there. As soon as you close the door behind you, <<$rand_boy>> pounces on you and begins to kiss you.'
-					act 'Get on the couch':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom1.jpg"></center>'
-						'Feeling playful, you push him away and quickly move to the couch, your back turned towards him. You make a show of slowly lifting your skirt.'
-						if $pantyworntype = 'none':
-							'Since you''re not wearing panties, you reveal your bare pussy and puckered asshole to him, giving him a sly grin when you turn your head back. You innocently ask him "Do you like what you see?"'
-						elseif $pantyworntype ! 'none':
-							'You quickly take your panties off and throw them in a corner. You slap your bare ass as you show off your pussy and anus and innocently ask him "Do you like what you see?"'
-						end
-						act 'Get on your hands and knees':
-							*clr & cla
-							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom2.jpg"></center>'
-							'You lean forward as <<$rand_boy>> approaches. He greedily puts his hands on your ass, fondling your ass cheeks enthusiastically. His touch invokes shivers throughout your body. You''re so horny you don''t know what you''ll do if you don''t get some soon! Slowly but surely, he moves his hands towards your crack, and after a while two of his fingers are inside your dripping pussy.'
-							gs 'arousal', 'vaginal_finger', 5
-							gs 'stat'
-							act 'Lie down on your back':
-								*clr & cla
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom3.jpg"></center>'
-								'As you turn to lie down on your back, his fingers never leave you. The squishing of your wet hole being fingered fills the room as he kisses you and teasingly runs his thumb over your clit. His fingers give you sweet pleasure, but you become frustrated once you see his evil grin: he has no intentions of actually making you orgasm this way.'
-								gs 'arousal', 'vaginal_finger', 5
-								gs 'stat'
-								act 'Beg him to fuck you':
-									*clr & cla
-									gs 'cum_call', '', $boy, 1
-									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom4.jpg"></center>'
-									$orgasm_or = 'yes'
-									$orgasm_txt = 'After a few minutes of being on the edge, you can''t hold back any more. You push his hand away and shift back onto your hands and knees, begging for him to fuck you. <<$rand_boy>> has a mischievous grin on his face, thoroughly amused that his constant teasing got you this desperate. Nevertheless, he obliges: he guides the head of his hard cock against your pussy lips and immediately rams it in. Not giving you any chance to recover, he pounds you like his life depends on it.'
-									'You moan loudly, perhaps a bit too loudly, because you soon find his hand covering your mouth, stifling your moans as he fucks you hard from behind.'
-									'The squeezing of your tight pussy around his dick sends him over the edge.'
-									gs 'arousal', 'vaginal', 10
-									'When he pulls out of you, a slow trickle of sperm leaks from your pussy.'
-									gs 'stat'
-									act 'Lick him clean':
-										*clr & cla
-										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom5.jpg"></center>'
-										'Realizing you have to get to class soon, you quickly scoot over and take his penis in your mouth. As you quickly lick him clean, you taste the mixture of his and your juices; it makes you feel kind of raunchy and you wouldn''t mind having another go if it wasn''t for class starting any minute now. You quickly straighten your clothes, hand him his pants and quickly check your hair before you both run to class.'
-										gs 'arousal', 'bj', 2
-										gs 'arousal', 'end'
-										gs 'stat'
-										act 'Continue': gt 'gschool_events', 'leave_break_events2'
-									end
-								end
-							end
-						end
-					end
-				end
-			end
-		end
-		!! apmeet=6 This closure molestation nerds, Well I think so from the code, who knows if there is no correct.
-		!! dimarudeblock=1 This video stolen from Nosov.
-		if (apmeet = 6 and (val(mid($school_static_num,2)) = 6 or val(mid($school_static_num,2)) = 2)) or (dimarudeblock = 1 and val(mid($school_static_num,2)) = 1):
-			*nl
-			'After all <<$rand_boy>> did with you, he''s still pinching your ass in school like that? He''s kinda cute, but still that''s just wrong!'
-			act 'Kick him in the balls':
-				*clr & cla
-				npc_rel[$school_static_num] -= 10
-				grupvalue[4] += 5
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy8.jpg"></center>'
-				'You kick <<$rand_boy>> in the balls, sending him and all of his classmates the message that you will not put up with this behavior in school. You watch him writhe in pain on the floor for a second, before collecting your things and making your way to your next class.'
-				act 'Continue': gt 'gschool_events', 'leave_break_events2'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'rand_gopnic':
-	menu_off = 1
-	if rand(0,1) = 0:
-		r = 9
-	else
-		r = rand(154,156)
-	end
-	$school_static_num = 'A<<r>>'
-
-	if grupTipe = 4:
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big<<r>>.jpg"></center>'
-		'You step away from him, pulling out of his reach as you turn around. You point your finger at him. "Don''t make me hurt you! You know I will."'
-		'He laughs a bit and steps up closer again, crowding you a bit, but keeps his hands to himself. "Come on <<$pcs_nickname>> you know you want to have some fun, so stop acting like you are not all hot and bothered by this. We can help you with that itch."'
-		act 'Back off':
-			*clr & cla
-			grupvalue[4] += 5
-			inhib_exp += 2
-			'<center><video autoplay loop src="images/locations/pavlovsk/school/lunch/buttflash.mp4"></video></center>'
-			'You snort at him and look at his friends before looking back at him. You wiggle your middle finger at him, flipping him off while pretending you are wiggling your finger for another reason. "If I needed something that small to satisfy my itch, I could just use this." His friends howl with laughter as he fumes at you. You turn and walk away with a laugh, flashing your ass at them as you do, teasing them on what they are missing out on.'
-			act 'Walk away': gt 'gschool_events', 'leave_break_events2'
-		end
-		act 'Why not':
-			*clr & cla
-			if grupvalue[4] > 50:
-				grupvalue[4] -= 5
-				if grupvalue[4] < 50:grupvalue[4] = 50
-			end
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
-			'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
-			'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
-			*nl
-			if fame['pav_slut'] > 250: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
-			act 'Start sucking':
-				*clr & cla
-				if r = 9:
-					gs 'boyStat', 'A157'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A9'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A10'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A11'
-					gs 'cum_call', 'mouth', $boy,1
-				else
-					gs 'boyStat', 'A157'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A155'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A156'
-					gs 'cum_call', 'mouth', $boy,1
-					gs 'boyStat', 'A154'
-					gs 'cum_call', 'mouth', $boy,1
-				end
-				swallow += 4
-				'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
-				'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around <<$boydesc>>''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
-				'Finally, you feel a jet of sperm hit your throat and <<$boydesc>> moans. "That''s right bitch! Swallow it all like a good little slut." <<$boydesc>> seems satisfied and tucks his cock back in his pants and swaps place with the one that was at the door, who comes over and pulls his cock out, ready to get his turn.'
-				*nl
-				'You immediately switch to the cock of one of the other guys standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last two guys. As you get up off your knees, you hear one of them laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
-				gs 'arousal', 'bj', 20, 'group', 'sub'
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Continue': gt 'gschool_events', 'leave_break_events2'
-			end
-		end
-	else
-		gs 'boystat', $school_static_num
-		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big<<r>>.jpg"></center>'
-		'You look at <<$boydesc>> with contempt "What the fuck do you want?" He''s not impressed in the slightest, your loose reputation undermining any authority you try to impose.'
-		act 'Continue':
-			*clr & cla
-			pcs_mood -= 20
-			gs'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy5.jpg"></center>'
-			'"I''ll show you what the fuck I want slut." <<$boydesc>> suddenly grabs you by the hair and presses your face against his desk. "What I want is your lips around my dick, right now. Everyone already knows you''re a <<$gnikname>>, so you better start acting like it or there will be consequences." He turns to his friends and says "Come on boys, this whore doesn''t understand her place in life. It''s about time we show her."'
-			gs 'gschool_events', 'rand_boy_arg1', 0, 1, 0, 0, 0, 0
-			if npc_rel[$school_static_num] > 50:
-				'As you try and pull away <<$rand_boy1>> comes over and pulls the gopnik off you and turns to him. "Leave her alone!"'
-				'The gopnik turns towards him and narrows his eyes. "Or what pussy?"'
-				'<<$rand_boy1>> steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interupts. "What''s going on here? Break it up, all of you." You word a thank you to <<$rand_boy1>> and slip away.'
-				act 'Leave': gt 'gschool_events', 'leave_break_events2'
-			else
-				gs 'willpower', 'bj', 'resist'
-				if will_cost <= pcs_willpwr:
-					act 'Resist (<<will_cost>> Willpower)':
-						*clr & cla
-						gs 'willpower', 'pay', 'resist'
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
-						'You manage to pull away from him, but the others are blocking you. You back up, but eventually find your back against one of the walls and you turn your head away from him. The boy leans in close to you. "Just do as you''re told or this will be a lot worse for you."'
-						gs 'willpower', 'bj', 'resist'
-						if will_cost <= pcs_willpwr:
-							act 'Threaten to scream (<<will_cost>> Willpower)':
-								*clr & cla
-								gs 'willpower', 'pay', 'resist'
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
-								'"I''ll scream and when the teachers arrive, I will tell them that you tried to rape me." He fumes and leans in real close. "You''ll regret this slut! I promise." He relents and leaves and the others go with him, all giving you looks you would rather not think about.'
-								act 'Continue': gt 'gschool_events', 'leave_break_events2'
-							end
-						else
-							'<br>You don''t have enough willpower to resist.'
-						end
-						act 'Go to the men''s room with them':gt 'gschool_events', 'toilet_bj'
-					end
-				else
-					act 'Resist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-				end
-				act 'Go to the men''s room with them': gt 'gschool_events', 'toilet_bj'
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'toilet_bj':
-	*clr & cla
-	menu_off = 1
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
-	'You know perfectly well that the group of boys are not going to let you escape. You meekly let the boys drag you to the men''s room, hoping for a miracle to save you. It never comes. When you arrive at the men''s room, one of the guys drives everyone else out; it''s just you and the gopniks in here now. He goes outside and keeps watch while two of the others reach for their pants. Several more come in to watch.'
-	if fame['pav_slut'] > 250:
-		'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way. On one wall, you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
-	else
-		'The walls of the restroom are covered in crude texts, quite a few of them involving your classmates in some way.'
-	end
-	act 'Start sucking':
-		*clr & cla
-		if $boydesc = 'Vitek':
-			gs 'boyStat', 'A157'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A9'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A10'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A11'
-			gs 'cum_call', 'mouth', $boy,1
-		else
-			gs 'boyStat', 'A157'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A155'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A156'
-			gs 'cum_call', 'mouth', $boy,1
-			gs 'boyStat', 'A154'
-			gs 'cum_call', 'mouth', $boy,1
-		end
-		swallow += 4
-		'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
-		'You know there''s only one way they will let you go, so you dutifully kneel down. <<$boydesc>> takes his cock out of his pants. A second gopnik stands to your right and takes his cock out too. You wrap your <<$pc_desc[''lips'']>> lips around <<$boydesc>>''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
-		'Finally, you feel a jet of sperm hit your throat and <<$boydesc>> says in a menacing voice "Swallow it all, whore. If you miss a drop, you''re licking it up from the ground." You diligently swallow his sperm, doing your best to lick it all up from his dick and your lips. <<$boydesc>> seems satisfied and tucks his cock back in his pants and swaps place with the one that was at the door, who comes over and pulls his cock out, ready to get his turn.'
-		*nl
-		'You immediately switch to the cock of one of the other guys standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside and you finish off the last two guys. As you get up off your knees, you hear one of them laugh. "Do you understand your place in life now? That place is right here, on your knees, whenever we say so. Got that?" You obediently nod, fully aware of the nasty taste of semen in the your mouth.'
-		gs 'arousal', 'bj', 20, 'group', 'sub'
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Continue': gt 'gschool_events', 'leave_break_events2'
-	end
-end
-
 !!Sweet talk function
 !!I have a request for you, now that we have cha as a stat and spots that raise it can you adjust the sweet_talk I am thinking
 !!cha 1-20 = -20
@@ -2359,7 +1750,7 @@ if $ARGS[0] = 'sweet':
 		if hotcat < 5: Sweet_talk -= (hotcat - 5) * 5
 	end
 end
-
+!!is the below still used? I have been removing random checks I think I got most or all of them
 !!Random boy, arguments set to 1 mean included, groups are cool kids, jock, nerd, gopnik, outcast, teachers
 if $ARGS[0] = 'rand_boy_arg':
 	$school_static_num = func('gschool_events', 'random_pers', 0, ARGS[1], ARGS[2], ARGS[3], ARGS[4], ARGS[5], ARGS[6])

+ 1200 - 0
locations/gschool_events1.qsrc

@@ -0,0 +1,1200 @@
+# gschool_events1
+!2022/02/09
+
+if $ARGS[0] = 'butt_grab':
+	menu_off = 1
+	:scoolboy_loop
+	scoolboy = rand(1,5)
+	*clr & cla
+	if scoolboy = 1 and DimaRudeBlock = 0:
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big1.jpg"></center>'
+		'Even though he tries to hide it as best he can, the proud grin on the face of Dimka tells you that he was the one groping your ass.'
+		act 'Ignore it':
+			gs 'npc_relationship', 'modify', 'A1', 'like'
+			grupvalue[1] -= 2
+			grupvalue[2] -= 3
+			grupvalue[3] += 1
+			grupvalue[4] -= 5
+			gt 'gschool_events', 'leave_break_events2'
+		end
+		gs 'willpower', 'misc', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Slap him hard (<<will_cost>> Willpower)':
+				*clr & cla
+				grupvalue[1] -= 2
+				grupvalue[2] += 1
+				grupvalue[3] -= 1
+				grupvalue[4] += 3
+				gs 'npc_relationship', 'modify', 'A1', 'loathe'
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy1.jpg"></center>'
+				if mesec > 0:
+					'It''s bad enough he did it, it is worse because you are on your period. "You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+				else
+					'"You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+					'Dimka rubs his face and glares at those laughing then glares at you. "You''ll pay for that bitch!" With that he walks off.'
+				end
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		else
+			act 'Slap him hard (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		if npc_rel['A1'] > 50:
+			act 'Slap him playfully':
+				*clr & cla
+				grupvalue[1] += 1
+				grupvalue[2] += 1
+				gs 'npc_relationship', 'modify', 'A1', 'dislike'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy2.jpg"></center>'
+				'Dimka ain''t so bad... but still, I can''t just let him do this.'
+				'You give him a playful slap in the face. It''s not hard enough to really hurt him, but enough to send a message. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+			gs 'willpower', 'exhib', 'self'
+			if will_cost <= pcs_willpwr:
+				act 'Tease him (<<will_cost>> Willpower)':
+					*clr & cla
+					inhib_exp += 2
+					gs 'willpower', 'pay', 'self'
+					gs 'arousal', 'flash', -5
+					grupvalue[1] += 1
+					grupvalue[2] += 1
+					grupvalue[3] -= 1
+					grupvalue[4] += 1
+					gs 'npc_relationship', 'modify', 'A1', 'dislike'
+					gs 'stat'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+					'<i><<$rand_boy>> is actually kind of cute...</i> you think to yourself.'
+					'You pretend the other boys aren''t there and step closer. "Come on Dimka. You know you only have to ask if you want to see more..." you smile sweetly as you slowly begin to lift your skirt. He looks down, eyes wide. Just before your skirt is high enough to reveal '+iif($pantyworntype ! 'none', 'your panties', 'your pussy')+', you drop it and skip backward, giggling.'
+					*nl
+					'"Pfft-! You really thought I was gonna give everyone a show like that? Keep dreaming." You give him a cute wink as you sit down and get ready for your next class.'
+					act 'Continue': gt 'gschool_events', 'leave_break_events2'
+				end
+			else
+				act 'Lift your skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else
+			act 'Continue': gt 'gschool_events', 'leave_break_events2'
+		end
+		act 'Taunt him':
+			*clr & cla
+			grupvalue[1] += 1
+			grupvalue[2] += 1
+			grupvalue[3] -= 1
+			grupvalue[4] += 1
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy4.jpg"></center>'
+			'He''s kind of cute. You''re so horny right now, so you decide to tease him and see if you can push him into doing more. You put your finger in your mouth and quietly ask him in a lewd voice "Come on Dimka, is that all you have for me?"'
+			'His friends heard your question, and are now daring him to take you to the men''s room. He doesn''t seem so sure.'
+			act 'Tease him':
+				*clr & cla
+				gs 'npc_relationship', 'modify', 'A1', 'dislike'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+				'You can see him starting to get turned on, certain that this is going to turn out good for him. You lean in real close and whisper in his ear, but loud enough for others to hear. "This is what I have for you." You start sliding your skirt slowly up your thighs, with all of the boys watching. Just before it gets high enough to show them anything, you let it go and it drops back in place. "Which is absolutely nothing." you say with a giggle. As you walk away, you hear one of the boys talking to his friend.'
+				'"God so close. She is such a tease."'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		end
+	elseif scoolboy = 2:
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big8.jpg"></center>'
+		if pcs_vital >= 40:
+			'You can tell from his grin that Svyatoslav was the one groping your ass. "Nice, good to see all your working out is good for something at least." Which is followed by him laughing and a few of the other boys joining in with his laugh.'
+		else
+			'You can tell from his disappointed expression that Svyatoslav was the one groping your ass. Perhaps he was expecting something firmer after hanging out with the athletic girls so much? Maybe you should work out more...'
+		end
+		act 'Ignore it':
+			grupvalue[1] -= 2
+			grupvalue[2] -= 3
+			grupvalue[3] += 1
+			grupvalue[4] -= 5
+			gt 'gschool_events', 'leave_break_events2'
+		end
+		gs 'willpower', 'misc', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Slap him hard (<<will_cost>> Willpower)':
+				*clr & cla
+				grupvalue[1] -= 1
+				grupvalue[2] += 1
+				grupvalue[3] -= 1
+				grupvalue[4] += 5
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				gs 'npc_relationship', 'modify', 'A8', 'hate'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy1.jpg"></center>'
+				if mesec > 0:
+					'It''s bad enough Svyatoslav did it, it is worse because you are on your period. "You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+				else
+					'"You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+					'After rubbing his face Svyatoslav looks at you in disbelief. "What the fuck was that for? I was just messing with you." Then he walks off.'
+				end
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		else
+			act 'Slap him hard (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Slap him playfully':
+			*clr & cla
+			grupvalue[1] += 1
+			grupvalue[2] += 1
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy2.jpg"></center>'
+			'Svyatoslav ain''t so bad... but still, I can''t just let him do this.'
+			'You give him a playful slap in the face. It''s not hard enough to really hurt him, but enough to send a message. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+			act 'Continue': gt 'gschool_events', 'leave_break_events2'
+		end
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Tease him (<<will_cost>> Willpower)':
+				*clr & cla
+				inhib_exp += 2
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'flash', -5
+				grupvalue[1] += 1
+				grupvalue[2] += 1
+				grupvalue[3] -= 1
+				grupvalue[4] += 1
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+				'<i>Svyatoslav is actually kind of cute...</i> you think to yourself.'
+				'You pretend the other boys aren''t there and step closer. "Come on Svyatoslav. You know you only have to ask if you want to see more..." you smile sweetly as you slowly begin to lift your skirt. He looks down, eyes wide. Just before your skirt is high enough to reveal '+iif($pantyworntype ! 'none', 'your panties', 'your pussy')+', you drop it and skip backward, giggling.'
+				*nl
+				'"Pfft-! You really thought I was gonna give everyone a show like that? Keep dreaming." You give him a cute wink as you sit down and get ready for your next class.'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		else
+			act 'Lift your skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Taunt him':
+			*clr & cla
+			grupvalue[1] += 1
+			grupvalue[2] += 1
+			grupvalue[3] -= 1
+			grupvalue[4] += 1
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy4.jpg"></center>'
+			'Svyatoslav is kind of cute. You''re so horny right now, so you decide to tease him and see if you can push him into doing more. You put your finger in your mouth and quietly ask him in a lewd voice "Come on Svyatoslav, is that all you have for me?"'
+			'His friends heard your question, and are now daring him to take you to the men''s room.'
+			act 'Tease him':
+				*clr & cla
+				grupvalue[1] += 2
+				grupvalue[2] += 1
+				grupvalue[3] -= 2
+				grupvalue[4] += 1
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+				'You can see Svyatoslav starting to get turned on, certain that this is going to turn out good for him. You lean in real close and whisper in his ear, but loud enough for others to hear. "This is what I have for you." You start sliding your skirt slowly up your thighs, with all of the boys watching. Just before it gets high enough to show them anything, you let it go and it drops back in place. "Which is absolutely nothing." you say with a giggle. As you walk away, you hear one of the boys talking to his friend.'
+				'"God so close. She is such a tease."'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+			act 'Drag him to the men''s room':
+				*clr & cla
+				grupvalue[1] -= 10
+				grupvalue[2] -= 10
+				grupvalue[3] -= 10
+				grupvalue[4] -= 5
+				gs 'npc_relationship', 'modify', 'A8', 'love'
+				gs 'fame', 'pav', 'sex', 15
+				gs 'arousal', 'foreplay', 'exhibitionism', -5
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_tualet1.jpg"></center>'
+				'You give Svyatoslav a sweet smile and take him by the hand, pulling him into the men''s room. Slightly lifting up your skirt, you put his hand between your legs. The other boys have followed you and now you''re being fondled in front of a crowd.'
+				act 'Take his cock out of his pants': gt 'gschool_sex', 'rand_bj'
+			end
+			act 'Take him to the old school building':
+				grupvalue[1] -= 5
+				grupvalue[2] -= 5
+				grupvalue[3] -= 5
+				grupvalue[4] -= 1
+				gs 'npc_relationship', 'modify', 'A8', 'love'
+				gs 'fame', 'pav', 'sex', 5
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big8.jpg"></center>'
+				'You know almost no one ever goes into the old school building, other than kids looking to hook up. So you take him by the hand and lead him away and out of the school, he doesn''t complain one bit.'
+				act 'Continue': gt 'gschool_sex', 'rand_sex'
+			end
+			if katjaQW['school_sex'] = 1:
+				act 'Go to the back room with the guy':
+					*clr & cla
+					grupvalue[1] -= 5
+					grupvalue[2] -= 5
+					grupvalue[3] -= 5
+					grupvalue[4] -= 1
+					gs 'fame', 'pav', 'sex', 5
+					gs 'npc_relationship', 'modify', 'A8', 'love'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
+					'You remember the back room that Katja showed you. When you tell Svyatoslav about it, he takes your hand and tells you to take him there. As soon as you close the door behind you, Svyatoslav pounces on you and begins to kiss you.'
+					gs 'arousal', 'kiss', 2
+					gs 'stat'
+					act 'Get on the couch':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom1.jpg"></center>'
+						'Feeling playful, you push him away and quickly move to the couch, your back turned towards him. You make a show of slowly lifting your skirt.'
+						if $pantyworntype = 'none':
+							'Since you''re not wearing panties, you reveal your bare pussy and puckered asshole to him, giving him a sly grin when you turn your head back. You innocently ask him "Do you like what you see?"'
+						elseif $pantyworntype ! 'none':
+							'You quickly take your panties off and throw them in a corner. You slap your bare ass as you show off your pussy and anus and innocently ask him "Do you like what you see?"'
+						end
+						act 'Get on your hands and knees':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom2.jpg"></center>'
+							'You lean forward as Svyatoslav approaches. He greedily puts his hands on your ass, fondling your ass cheeks enthusiastically. His touch invokes shivers throughout your body. You''re so horny you don''t know what you''ll do if you don''t get some soon! Slowly but surely, he moves his hands towards your crack, and after a while two of his fingers are inside your dripping pussy.'
+							gs 'arousal', 'vaginal_finger', 2
+							gs 'stat'
+							act 'Lie down on your back':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom3.jpg"></center>'
+								'As you turn to lie down on your back, his fingers never leave you. The squishing of your wet hole being fingered fills the room as he kisses you and teasingly runs his thumb over your clit. His fingers give you sweet pleasure, but you become frustrated once you see his evil grin: he has no intentions of actually making you orgasm this way.'
+								gs 'arousal', 'vaginal_finger', 2
+								gs 'stat'
+								act 'Beg him to fuck you':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom4.jpg"></center>'
+									'After a few minutes of being on the edge, you can''t hold back any more. You push his hand away and shift back onto your hands and knees, begging for him to fuck you. Svyatoslav has a mischievous grin on his face, thoroughly amused that his constant teasing got you this desperate. Nevertheless, he obliges: he guides the head of his hard cock against your pussy lips and immediately rams it in. Not giving you any chance to recover, he pounds you like his life depends on it.'
+									'You moan loudly, perhaps a bit too loudly, because you soon find his hand covering your mouth, stifling your moans as he fucks you hard from behind.'
+									'The squeezing of your tight pussy around his dick sends him over the edge.'
+									'When he pulls out of you, a slow trickle of sperm leaks from your pussy.'
+									gs 'arousal', 'vaginal', 10
+									gs 'cum_call', 'vaginal', 'A8', 1
+									gs 'stat'
+									act 'Lick him clean':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom5.jpg"></center>'
+										'Realizing you have to get to class soon, you quickly scoot over and take his penis in your mouth. As you quickly lick him clean, you taste the mixture of his and your juices; it makes you feel kind of raunchy and you wouldn''t mind having another go if it wasn''t for class starting any minute now. You quickly straighten your clothes, hand him his pants and quickly check your hair before you both run to class.'
+										gs 'arousal', 'bj', 2
+										gs 'arousal', 'end'
+										gs 'stat'
+										act 'Continue': gt 'gschool_events', 'leave_break_events2'
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	elseif scoolboy = 3:
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big6.jpg"></center>'
+		'You can tell from the embarrassed look on his face and the admiring glances of his friends that Petka was the one touching your ass. Looks like he scored some points in his group today.'
+		act 'Ignore it':
+			grupvalue[1] -= 5
+			grupvalue[2] -= 5
+			grupvalue[3] += 1	
+			grupvalue[4] -= 10
+			gt 'gschool_events', 'leave_break_events2'
+		end
+		gs 'willpower', 'misc', 'self', 'medium'
+		if will_cost <= pcs_willpwr:
+			act 'Slap him hard (<<will_cost>> Willpower)':
+				*clr & cla
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				grupvalue[1] += 2
+				grupvalue[2] += 3
+				grupvalue[3] -= 1	
+				grupvalue[4] += 5
+				gs 'npc_relationship', 'modify', 'A6', 'dislike'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy1.jpg"></center>'
+				if mesec > 0:
+					'It''s bad enough he did it, it is worse because you are on your period. "You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+				else
+					'"You fucking pervert!" you shout angrily and slap him across the face as hard as you can. You shake the stinging out of your hand while he clutches his cheek in agony. When he finally pulls his hands away from his face, the outline of your hand is clearly visible on his cheek. That''s going to leave a bruise. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+				end
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		else
+			act 'Slap him hard (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Slap him playfully':
+			npc_rel[$school_static_num] -= 2
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy2.jpg"></center>'
+			'Petka ain''t so bad... but still, I can''t just let him do this.'
+			'You give him a playful slap in the face. It''s not hard enough to really hurt him, but enough to send a message. The other boys laugh loudly. This is the best entertainment they''ve had during the break in a long time.'
+			act 'Continue': gt 'gschool_events', 'leave_break_events2'
+		end
+		gs 'willpower', 'exhib', 'self'
+		if will_cost <= pcs_willpwr:
+			act 'Tease him (<<will_cost>> Willpower)':
+				*clr & cla
+				inhib_exp += 2
+				gs 'willpower', 'pay', 'self'
+				gs 'arousal', 'flash', -5
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+				'<i><<$rand_boy>> is actually kind of cute...</i> you think to yourself.'
+				'You pretend the other boys aren''t there and step closer. "Come on Petka. You know you only have to ask if you want to see more..." you smile sweetly as you slowly begin to lift your skirt. He looks down, eyes wide. Just before your skirt is high enough to reveal '+iif($pantyworntype ! 'none', 'your panties', 'your pussy')+', you drop it and skip backward, giggling.'
+				*nl
+				'"Pfft-! You really thought I was gonna give everyone a show like that? Keep dreaming." You give him a cute wink as you sit down and get ready for your next class.'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		else
+			act 'Lift your skirt (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end
+		act 'Taunt him':
+			*clr & cla
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy4.jpg"></center>'
+			'He''s kind of cute. You''re so horny right now, so you decide to tease him and see if you can push him into doing more. You put your finger in your mouth and quietly ask him in a lewd voice "Come on Petka, is that all you have for me?"'
+			'His friends heard your question, and are now daring him to take you to the men''s room. He doesn''t seem so sure.'
+			act 'Tease him':
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy3.jpg"></center>'
+				'You can see him starting to get turned on, certain that this is going to turn out good for him. You lean in real close and whisper in his ear, but loud enough for others to hear. "This is what I have for you." You start sliding your skirt slowly up your thighs, with all of the boys watching. Just before it gets high enough to show them anything, you let it go and it drops back in place. "Which is absolutely nothing." you say with a giggle. As you walk away, you hear one of the boys talking to his friend.'
+				'"God so close. She is such a tease."'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+			act 'Drag Petka to the men''s room':
+				*clr & cla
+				grupvalue[1] -= 5
+				grupvalue[2] -= 5
+				grupvalue[3] -= 5
+				gs 'npc_relationship', 'modify', 'A6', 'like'
+				gs 'fame', 'pav', 'sex', 5
+				gs 'arousal', 'foreplay', 'exhibitionism', 2
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big6.jpg"></center>'
+				'You give him a sweet smile and take him by the hand, pulling him into the men''s room. Slightly lifting up your skirt, you put his hand between your legs. He starts to pull his hand away but you put it back, he turns bright red as he looks around. Then as you are about to pull him into the restroom he looks paniced and pulls away. "I... I... forgot... I have to do something." Then he rushes away in a panic, apparently the idea of doing something in front of others freaked him out. The rest of the boys and some of the girls laugh at him as he rushes off, though some of the sidelong glances you get, tells you, you have still damaged your rep with this stunt.'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+			act 'Take Petka to the old school building':
+				*clr & cla
+				grupvalue[1] -= 5
+				grupvalue[2] -= 5
+				grupvalue[3] -= 5
+				gs 'fame', 'pav', 'sex', 5
+				gs 'npc_relationship', 'modify', 'A6', 'like'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big6.jpg"></center>'
+				'You know almost no one ever goes into the old school building, other than kids looking to hook up. So you take him by the hand and lead him away and out of the school, he doesn''t complain one bit.'
+				act 'Continue': gt 'gschool_sex', 'rand_sex'
+			end
+			if katjaQW['school_sex'] = 1:
+				act 'Go to the back room with Petka':
+					*clr & cla
+					grupvalue[1] -= 5
+					grupvalue[2] -= 5
+					grupvalue[3] -= 5
+					gs 'fame', 'pav', 'sex', 5
+					gs 'npc_relationship', 'modify', 'A6', 'like'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/kiss.jpg"></center>'
+					'You remember the back room that Katja showed you. You take Petka by the hand and lead him off, you can feel his sweaty palm, you can tell he is nervous. As soon as you close the door you turn towards him and start to kiss him. He shy and awkward at first but then starts to get into it, though he isn''t a very good kisser.'
+					gs 'arousal', 'kiss', 2
+					gs 'stat'
+					act 'Get on the couch':
+						*clr & cla
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom1.jpg"></center>'
+						'Feeling playful, you push him away and quickly move to the couch, your back turned towards him. You make a show of slowly lifting your skirt.'
+						if $pantyworntype = 'none':
+							'Since you''re not wearing panties, you reveal your bare pussy and puckered asshole to him, giving him a sly grin when you turn your head back. You innocently ask him "Do you like what you see?"'
+						elseif $pantyworntype ! 'none':
+							'You quickly take your panties off and throw them in a corner. You slap your bare ass as you show off your pussy and anus and innocently ask him "Do you like what you see?"'
+						end
+						act 'Get on your hands and knees':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom2.jpg"></center>'
+							'You lean forward, you glance back and see Petka looks like a deer in headlights, just totally stunned and unmoving. You wave him forward and he shakes his head a bit and smiles, then starts to approach you. He greedily puts his hands on your ass, fondling your ass cheeks enthusiastically. His touch invokes shivers throughout your body. You''re so horny you don''t know what you''ll do if you don''t get some soon! Slowly but surely, he moves his hands towards your crack, and after a while two of his fingers are inside your dripping pussy.'
+							gs 'arousal', 'vaginal_finger', 2
+							gs 'stat'
+							act 'Lie down on your back':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom3.jpg"></center>'
+								'As you turn to lie down on your back, his fingers never leave you. The squishing of your wet hole being fingered fills the room as he kisses you and teasingly runs his thumb over your clit. His fingers give you sweet pleasure, but you become frustrated once you see his evil grin: he has no intentions of actually making you orgasm this way.'
+								gs 'arousal', 'vaginal_finger', 2
+								gs 'stat'
+								act 'Beg him to fuck you':
+									*clr & cla
+									'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_secretroom4.jpg"></center>'
+									'After a few minutes of being on the edge, you can''t hold back any more. You push his hand away and shift back onto your hands and knees, begging for him to fuck you. Petka clumsily pulls his dick out of his pants, then guides the head of his hard cock against your pussy lips and immediately rams it in.'
+									'You moan as he does but he moans even louder than you do, soon he is pounding you as hard and fast as he can, his moaning turns into grunting,you can tell he is about to cum already. After at most a couple of minutes he groans loudly as he buries himself balls deep  in you and just holds it for a bit. When he pulls out of you, a slow trickle of sperm leaks from your pussy.'
+									gs 'arousal', 'vaginal', 2
+									gs 'cum_call', 'vaginal', 'A6', 1
+									gs 'arousal', 'end'
+									gs 'stat'
+									act 'Lick him clean':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big6.jpg"></center>'
+										'He steps away and zips his pants back up, as he blushes bright red, he won''t even meet your eyes. "Sorry." You don''t know if he is apologizing for cumming in you or for being a two pump chump.'
+										'You decide not to say anything to him. Realizing you have to get to class soon, you quickly straighten your clothes and hair before you both run to class.'
+										act 'Continue': gt 'gschool_events', 'leave_break_events2'
+									end
+								end
+							end
+						end
+					end
+				end
+			end
+		end
+	elseif scoolboy = 4 and kotovLoveQW <= 0:
+		if rand(0,1) = 0:
+			'The brazen look on his face betrays Dan. It must have been him touching your ass. Knowing him, he probably would''ve gone further if there weren''t so many people here.'
+			act 'Continue': gt 'gschool_events1', 'rand_gopnic1'
+		else
+			'The brazen look on his face betrays Arkadi. It must have been him touching your ass. Knowing him, he probably would''ve gone further if there weren''t so many people here.'
+			act 'Continue': gt 'gschool_events1', 'rand_gopnic2'
+		end
+	else
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big7.jpg"></center>'
+		'Lesco is trembling slightly, his eyes shifting back and forth as he awkwardly tries to not be noticed by you. It must''ve been him.'
+		'"Lesco, are you out of your mind!?" you cry out as some of the gopnik boys burst out into laughter. You can see the panic in his face as he raises his hands in defense, rapidly apologizing:'
+		'"Please, I didn''t want to! They made me, I promise! I''m sorry!"'
+		'You stare him down for a few seconds and realize he''s not lying. You know Lesco already doesn''t have an easy time in school. You give the other guys a derogatory look as you let him off the hook. "Alright, I believe you. Just don''t do it again, okay?"'
+		'He thanks you and quickly takes his seat for the class, visibly relieved you didn''t report him.'
+		act 'Continue': gt 'gschool_events', 'leave_break_events2'
+	end
+end		
+
+if $ARGS[0] = 'rand_gopnic1':
+	menu_off = 1
+	if grupTipe = 4:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big10.jpg"></center>'
+		'You step away from Dan, pulling out of his reach as you turn around. You point your finger at him. "Don''t make me hurt you! You know I will."'
+		'He laughs a bit and steps up closer again, crowding you a bit, but keeps his hands to himself. "Come on <<$pcs_nickname>> you know you want to have some fun, so stop acting like you are not all hot and bothered by this. We can help you with that itch."'
+		act 'Back off':
+			*clr & cla
+			grupvalue[1] += 1
+			grupvalue[2] += 1
+			grupvalue[4] += 5
+			inhib_exp += 2
+			'<center><video autoplay loop src="images/locations/pavlovsk/school/lunch/buttflash.mp4"></video></center>'
+			'You snort at him and look at his friends before looking back at him. You wiggle your middle finger at him, flipping him off while pretending you are wiggling your finger for another reason. "If I needed something that small to satisfy my itch, I could just use this." His friends howl with laughter as he fumes at you. You turn and walk away with a laugh, flashing your ass at them as you do, teasing them on what they are missing out on.'
+			act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+		end
+		act 'Why not':
+			*clr & cla
+			grupvalue[1] -= 10
+			grupvalue[2] -= 5
+			grupvalue[3] -= 10	
+			gs 'fame', 'pav', 'sex', 5
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+			'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+			'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+			*nl
+			if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+			act 'Start sucking':
+				*clr & cla
+				gs 'boyStat', 'A9'
+				gs 'cum_call', 'mouth', $boy,1
+				gs 'boyStat', 'A10'
+				gs 'cum_call', 'mouth', $boy,1
+				gs 'boyStat', 'A11'
+				gs 'cum_call', 'mouth', $boy,1
+				swallow += 3
+				'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+				'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Vitek''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+				'Finally, you feel a jet of sperm hit your throat and Vitek moans. "That''s right bitch! Swallow it all like a good little slut." Vitek seems satisfied and tucks his cock back in his pants and swaps place with the Vasily that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+				*nl
+				'You immediately switch Dan''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Vasily. As you get up off your knees, you hear Dan laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+				gs 'arousal', 'bj', 20, 'group', 'sub'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		end
+	elseif fame['pav_slut'] > 250:
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big10.jpg"></center>'
+		'You look at Dan with contempt "What the fuck do you want?" He''s not impressed in the slightest, your loose reputation undermining any authority you try to impose.'
+		act 'Continue':
+			*clr & cla
+			pcs_mood -= 20
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy5.jpg"></center>'
+			'"I''ll show you what the fuck I want slut." Vitek suddenly grabs you by the hair and presses your face against a desk. "What I want is your lips around my dick, right now. Everyone already knows you''re a <<$gnikname>>, so you better start acting like it or there will be consequences." He turns to his friends and says "Come on boys, this whore doesn''t understand her place in life. It''s about time we show her."'
+
+			!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+			$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+			!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+			$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+			killvar '$availble_rescuers'
+
+			if $temperson = 'ivan':
+				'As you try and pull away Ivan comes over and pulls Vitek off you and turns to him. "Leave her alone!"'
+				'The Vitek turns towards him and narrows his eyes. "You want to go for real instead of in the ring?"'
+				'Ivan steps up close, crowding him. "Anytime." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'marcus':
+				'As you try and pull away Marcus comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+				'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+				'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'lazar':
+				'As you try and pull away Lazar comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+				'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+				'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'erast':
+				'As you try and pull away Erast comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+				'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+				'Erast steps up close, crowding him, the only boy in school that can make Vitek look small as he looks down at Vitek. "Or I will make you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'nush':
+				'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+				'The Vitek looks down at her and narrows his eyes. "Mind your own fucking business Nush!"'
+				'Anushka scoffs at him. "I''m making it my business, now... back... the... fuck... off..." Vitek grabs her by her shoulders and just shoves her out of the way, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			else
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Resist (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
+						'You manage to pull away from him, but the others are blocking you. You back up, but eventually find your back against one of the walls and you turn your head away from him. The boy leans in close to you. "Just do as you''re told or this will be a lot worse for you."'
+						gs 'willpower', 'bj', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Threaten to scream (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
+								'"I''ll scream and when the teachers arrive, I will tell them that you tried to rape me." He fumes and leans in real close. "You''ll regret this slut! I promise." He relents and leaves and the others go with him, all giving you looks you would rather not think about.'
+								act 'Continue': gt 'gschool_events', 'leave_break_events2'
+							end
+						else
+							act 'Threaten to scream (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Go to the men''s room with them':gt 'gschool_events1', 'toilet_bj1'
+					end
+				else
+					act 'Resist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				act 'Go to the men''s room with them': gt 'gschool_events1', 'toilet_bj1'
+			end
+			killvar 'temperson'
+		end
+	else
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big10.jpg"></center>'
+		if grupTipe = 1 or grupTipe = 2:
+			'You look at Dan with contempt "What the fuck pervert." He''s not impressed in the slightest by your attitude.'
+			act 'Continue':
+				*clr & cla
+				pcs_mood -= 20
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big9.jpg"></center>'
+				'Vitek suddenly grabs you by the hair and says. "Why don''t we go somewhere where you can put that mouth of yours to good use for a change."'
+
+				!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+				$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+				!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+				$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+				killvar '$availble_rescuers'
+
+				if $temperson = 'ivan':
+					'As you try and pull away Ivan comes over and pulls Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "You want to go for real instead of in the ring?"'
+					'Ivan steps up close, crowding him. "Anytime." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'marcus':
+					'As you try and pull away Marcus comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'lazar':
+					'As you try and pull away Lazar comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+				elseif $temperson = 'erast':
+					'As you try and pull away Erast comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Erast steps up close, crowding him, the only boy in school that can make Vitek look small as he looks down at Vitek. "Or I will make you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'nush':
+					'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+					'The Vitek looks down at her and narrows his eyes. "Mind your own fucking business Nush!"'
+					'Anushka scoffs at him. "I''m making it my business, now... back... the... fuck... off..." Vitek grabs her by her shoulders and just shoves her out of the way, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				else
+					act 'Flip him off':
+						*clr & cla
+						grupvalue[1] += 1
+						grupvalue[2] += 1
+						grupvalue[4] += 1
+						inhib_exp += 2
+						'<center><img <<$set_imgh>> src="images/locations/pc/reactions/fuckoff3.jpg"></center>'
+						'You sneer at him and look at his friends before looking back at him and flip him off. "As if I would stoop to letting your disgusting ass paw at me." His friends howl with laughter as he fumes at you. You turn and walk away with a laugh.'
+						act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+					end
+					act 'Why not':
+						*clr & cla
+						grupvalue[1] -= 10
+						grupvalue[2] -= 5
+						grupvalue[3] -= 10	
+						gs 'fame', 'pav', 'sex', 10
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+						'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+						'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+						*nl
+						if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+						act 'Start sucking':
+							*clr & cla
+							gs 'boyStat', 'A9'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A10'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A11'
+							gs 'cum_call', 'mouth', $boy,1
+							swallow += 3
+							'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+							'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Vitek''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+							'Finally, you feel a jet of sperm hit your throat and Vitek moans. "That''s right bitch! Swallow it all like a good little slut." Vitek seems satisfied and tucks his cock back in his pants and swaps place with the Vasily that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+							*nl
+							'You immediately switch Dan''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Vasily. As you get up off your knees, you hear Dan laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+							gs 'arousal', 'bj', 20, 'group', 'sub'
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Continue': gt 'gschool_events', 'leave_break_events2'
+						end
+					end
+				end
+				killvar 'temperson'
+			end
+		else
+			'You look at Dan and the other gopniks with fear, you know this could go bad very easily. "Stop please, I don''t like it." He just laughs at what you say.'
+			act 'Wait to see what they do':
+				*clr & cla
+				pcs_mood -= 20
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big9.jpg"></center>'
+				'Vitek suddenly grabs you by the hair and says. "Why don''t we go somewhere where you can put that mouth of yours to good use for a change."'
+
+				!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+				$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+				!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+				$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+				killvar '$availble_rescuers'
+
+				if $temperson = 'ivan':
+					'As you try and pull away Ivan comes over and pulls Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "You want to go for real instead of in the ring?"'
+					'Ivan steps up close, crowding him. "Anytime." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'marcus':
+					'As you try and pull away Marcus comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'lazar':
+					'As you try and pull away Lazar comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'erast':
+					'As you try and pull away Erast comes over and pulls the Vitek off you and turns to him. "Leave her alone!"'
+					'The Vitek turns towards him and narrows his eyes. "Or what pussy?"'
+					'Erast steps up close, crowding him, the only boy in school that can make Vitek look small as he looks down at Vitek. "Or I will make you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'nush':
+					'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+					'The Vitek looks down at her and narrows his eyes. "Mind your own fucking business Nush!"'
+					'Anushka scoffs at him. "I''m making it my business, now... back... the... fuck... off..." Vitek grabs her by her shoulders and just shoves her out of the way, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+				else
+					act 'Run off':
+						*clr & cla
+						grupvalue[1] -= 1
+						grupvalue[2] -= 2
+						grupvalue[3] += 1
+						grupvalue[4] -= 3
+						inhib_exp += 2
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall02.jpg"></center>'
+						'You manage to pull away from him and as soon as you do, you take off running down the hall from them. You hear them cry out as you run and hear them starting to chase you. You run past a classroom as a teacher comes out who yells at you to stop running but you don''t stop, then you hear the teacher yelling at those chasing you. You keep running until you don''t hear anything. Finally you stop and lean against the wall catching your breath, looking down the empty hall.'
+						act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+					end
+					act 'Why not':
+						*clr & cla
+						grupvalue[1] -= 10
+						grupvalue[2] -= 5
+						grupvalue[3] -= 10	
+						gs 'fame', 'pav', 'sex', 10
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+						'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+						'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+						*nl
+						if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+						act 'Start sucking':
+							*clr & cla
+							gs 'boyStat', 'A9'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A10'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A11'
+							gs 'cum_call', 'mouth', $boy,1
+							swallow += 3
+							'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+							'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Vitek''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+							'Finally, you feel a jet of sperm hit your throat and Vitek moans. "That''s right bitch! Swallow it all like a good little slut." Vitek seems satisfied and tucks his cock back in his pants and swaps place with the Vasily that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+							*nl
+							'You immediately switch Dan''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Vasily. As you get up off your knees, you hear Dan laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+							gs 'arousal', 'bj', 20, 'group', 'sub'
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Continue': gt 'gschool_events', 'leave_break_events2'
+						end
+					end
+				end
+				killvar 'temperson'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'rand_gopnic2':
+	menu_off = 1
+	if grupTipe = 4:
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big156.jpg"></center>'
+		'You step away from Arkadi, pulling out of his reach as you turn around. You point your finger at him. "Don''t make me hurt you! You know I will."'
+		'He laughs a bit and steps up closer again, crowding you a bit, but keeps his hands to himself. "Come on <<$pcs_nickname>> you know you want to have some fun, so stop acting like you are not all hot and bothered by this. We can help you with that itch."'
+		act 'Back off':
+			*clr & cla
+			grupvalue[1] += 1
+			grupvalue[2] += 1
+			grupvalue[4] += 5
+			inhib_exp += 2
+			'<center><video autoplay loop src="images/locations/pavlovsk/school/lunch/buttflash.mp4"></video></center>'
+			'You snort at him and look at his friends before looking back at him. You wiggle your middle finger at him, flipping him off while pretending you are wiggling your finger for another reason. "If I needed something that small to satisfy my itch, I could just use this." His friends howl with laughter as he fumes at you. You turn and walk away with a laugh, flashing your ass at them as you do, teasing them on what they are missing out on.'
+			act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+		end
+		act 'Why not':
+			*clr & cla
+			grupvalue[1] -= 10
+			grupvalue[2] -= 5
+			grupvalue[3] -= 10	
+			gs 'fame', 'pav', 'sex', 5
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+			'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+			'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+			*nl
+			if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+			act 'Start sucking':
+				*clr & cla
+				gs 'boyStat', 'A157'
+				gs 'cum_call', 'mouth', $boy,1
+				gs 'boyStat', 'A189'
+				gs 'cum_call', 'mouth', $boy,1
+				gs 'boyStat', 'A156'
+				gs 'cum_call', 'mouth', $boy,1
+				swallow += 3
+				'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+				'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Arkadi''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+				'Finally, you feel a jet of sperm hit your throat and Arkadi moans. "That''s right bitch! Swallow it all like a good little slut." Arkadi seems satisfied and tucks his cock back in his pants and swaps place with the Niko that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+				*nl
+				'You immediately switch Roman''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Niko. As you get up off your knees, you hear Arkadi laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+				gs 'arousal', 'bj', 20, 'group', 'sub'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Continue': gt 'gschool_events', 'leave_break_events2'
+			end
+		end
+	elseif fame['pav_slut'] > 250:
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big10.jpg"></center>'
+		'You look at Arkadi with contempt "What the fuck do you want?" He''s not impressed in the slightest, your loose reputation undermining any authority you try to impose.'
+		act 'Continue':
+			*clr & cla
+			pcs_mood -= 20
+			gs'stat'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/rand_scoolboy5.jpg"></center>'
+			'"I''ll show you what the fuck I want slut." Roman suddenly grabs you by the hair and presses your face against a desk. "What I want is your lips around my dick, right now. Everyone already knows you''re a <<$gnikname>>, so you better start acting like it or there will be consequences." He turns to his friends and says "Come on boys, this whore doesn''t understand her place in life. It''s about time we show her."'
+
+			!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+			$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+			!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+			$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+			killvar '$availble_rescuers'
+
+			if $temperson = 'ivan':
+				'As you try and pull away Ivan comes over and pulls Roman off you and turns to him. "Leave her alone!"'
+				'The Roman turns towards him and narrows his eyes. "Touch me again and I will fuck you up."'
+				'Ivan steps up close, crowding him. "I''d like to see you try." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'marcus':
+				'As you try and pull away Marcus comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+				'The Roman turns towards him and narrows his eyes. "Or what blackass?"'
+				'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'lazar':
+				'As you try and pull away Lazar comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+				'The Roman turns towards him and narrows his eyes. "Or what pussy?"'
+				'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'erast':
+				'As you try and pull away Erast comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+				'The Roman turns towards him and narrows his eyes. "You think just because your big you are scary? huh? I''ll fucking show you scary, so how about your make me big man."'
+				'Erast steps up close, crowding him. "I don''t want to hurt your... little man." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			elseif $temperson = 'nush':
+				'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+				'The Roman looks down at her and narrows his eyes. "Mind your own fucking business slut! Unless you want a go instead"'
+				'Anushka scoffs at him and holds up her pinky finger. "If I wanted some dick, I''d want something bigger than you small fry." Roman grabs violently her by her shoulders, but before he can do anything Arkadi puts his hands on Roman''s shoulder and shakes his head no to him. Roman looks back at Anushka and glares at her. "Fuck it, slut isn''t worth it." But before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+				act 'Leave': gt 'gschool_events', 'leave_break_events2'
+			else
+				gs 'willpower', 'bj', 'resist'
+				if will_cost <= pcs_willpwr:
+					act 'Resist (<<will_cost>> Willpower)':
+						*clr & cla
+						gs 'willpower', 'pay', 'resist'
+						gs 'stat'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
+						'You manage to pull away from him, but the others are blocking you. You back up, but eventually find your back against one of the walls and you turn your head away from him. The boy leans in close to you. "Just do as you''re told or this will be a lot worse for you."'
+						gs 'willpower', 'bj', 'resist'
+						if will_cost <= pcs_willpwr:
+							act 'Threaten to scream (<<will_cost>> Willpower)':
+								*clr & cla
+								gs 'willpower', 'pay', 'resist'
+								gs 'stat'
+								'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/resistgop.jpg"></center>'
+								'"I''ll scream and when the teachers arrive, I will tell them that you tried to rape me." He fumes and leans in real close. "You''ll regret this slut! I promise." He relents and leaves and the others go with him, all giving you looks you would rather not think about.'
+								act 'Continue': gt 'gschool_events', 'leave_break_events2'
+							end
+						else
+							act 'Threaten to scream (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+						end
+						act 'Go to the men''s room with them':gt 'gschool_events1', 'toilet_bj2'
+					end
+				else
+					act 'Resist (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+				end
+				act 'Go to the men''s room with them': gt 'gschool_events1', 'toilet_bj2'
+			end
+			killvar 'temperson'
+		end
+	else
+		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big10.jpg"></center>'
+		if grupTipe = 1 or grupTipe = 2:
+			'You look at Arkadi with contempt "What the fuck pervert." He''s not impressed in the slightest by your attitude.'
+			act 'Wait to see what they do':
+				*clr & cla
+				pcs_mood -= 20
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big9.jpg"></center>'
+				'Roman suddenly grabs you by the hair and says. "Why don''t we go somewhere where you can put that mouth of yours to good use for a change."'
+
+				!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+				$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+				!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+				$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+				killvar '$availble_rescuers'
+
+				if $temperson = 'ivan':
+					'As you try and pull away Ivan comes over and pulls Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Touch me again and I will fuck you up."'
+					'Ivan steps up close, crowding him. "I''d like to see you try." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'marcus':
+					'As you try and pull away Marcus comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Or what blackass?"'
+					'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'lazar':
+					'As you try and pull away Lazar comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Or what pussy?"'
+					'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'erast':
+					'As you try and pull away Erast comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "You think just because your big you are scary? huh? I''ll fucking show you scary, so how about your make me big man."'
+					'Erast steps up close, crowding him. "I don''t want to hurt your... little man." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'nush':
+					'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+					'The Roman looks down at her and narrows his eyes. "Mind your own fucking business slut! Unless you want a go instead"'
+					'Anushka scoffs at him and holds up her pinky finger. "If I wanted some dick, I''d want something bigger than you small fry." Roman grabs violently her by her shoulders, but before he can do anything Arkadi puts his hands on Roman''s shoulder and shakes his head no to him. Roman looks back at Anushka and glares at her. "Fuck it, slut isn''t worth it." But before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				else
+					act 'Flip him off':
+						*clr & cla
+						grupvalue[1] += 1
+						grupvalue[2] += 1
+						grupvalue[4] += 1
+						inhib_exp += 2
+						'<center><img <<$set_imgh>> src="images/locations/pc/reactions/fuckoff3.jpg"></center>'
+						'You sneer at him and look at his friends before looking back at him and flip him off. "As if I would stoop to letting your disgusting ass paw at me." His friends howl with laughter as he fumes at you. You turn and walk away with a laugh.'
+						act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+					end
+					act 'Why not':
+						*clr & cla
+						grupvalue[1] -= 10
+						grupvalue[2] -= 5
+						grupvalue[3] -= 10	
+						gs 'fame', 'pav', 'sex', 10
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+						'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+						'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+						*nl
+						if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+						act 'Start sucking':
+							*clr & cla
+							gs 'boyStat', 'A157'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A189'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A156'
+							gs 'cum_call', 'mouth', $boy,1
+							swallow += 3
+							'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+							'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Arkadi''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+							'Finally, you feel a jet of sperm hit your throat and Arkadi moans. "That''s right bitch! Swallow it all like a good little slut." Arkadi seems satisfied and tucks his cock back in his pants and swaps place with the Niko that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+							*nl
+							'You immediately switch Roman''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Niko. As you get up off your knees, you hear Arkadi laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+							gs 'arousal', 'bj', 20, 'group', 'sub'
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Continue': gt 'gschool_events', 'leave_break_events2'
+						end
+					end
+					killvar 'temperson'
+				end
+			end
+		else
+			'You look at Arkadi and the other gopniks with fear, you know this could go bad very easily. "Stop please, I don''t like it." He just laughs at what you say.'
+			act 'Wait to see what they do':
+				*clr & cla
+				pcs_mood -= 20
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big9.jpg"></center>'
+				'Roman suddenly grabs you by the hair and says. "Why don''t we go somewhere where you can put that mouth of yours to good use for a change."'
+
+				!!Make a list of possible rescuers. None is repeated several times to that there always is a large chance that no one comes to the rescue.
+				$availble_rescuers = 'none|none|none|none|erast'+iif(npc_rel['A3'] > 60, '|ivan','')+iif(npc_rel['A146'] > 50, '|marcus','')+iif(npc_rel['A149'] > 70, '|lazar','')+iif(npc_rel['A144'] > 50, '|nush','')
+
+				!!Choose a random person to come to the playeres reque, which includes the posiiblety that no one will.
+				$temperson = func('shortgs', 'rand_pick', 'delimit', 'string', $availble_rescuers)
+
+				killvar '$availble_rescuers'
+
+				if $temperson = 'ivan':
+					'As you try and pull away Ivan comes over and pulls Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Touch me again and I will fuck you up."'
+					'Ivan steps up close, crowding him. "I''d like to see you try." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Ivan and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'marcus':
+					'As you try and pull away Marcus comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Or what blackass?"'
+					'Marcus steps up close, snorts. "You think you scare me? Back home I dealt with more dangerous assholes than you." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Marcus and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'lazar':
+					'As you try and pull away Lazar comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "Or what pussy?"'
+					'Lazar steps up close, crowding him. "Or I will fucking kick your ass right here!" They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Lazar and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'erast':
+					'As you try and pull away Erast comes over and pulls the Roman off you and turns to him. "Leave her alone!"'
+					'The Roman turns towards him and narrows his eyes. "You think just because your big you are scary? huh? I''ll fucking show you scary, so how about your make me big man."'
+					'Erast steps up close, crowding him. "I don''t want to hurt your... little man." They start shoving each other, but before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Erast and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				elseif $temperson = 'nush':
+					'As you try and pull away Anushka comes over and steps between the two of you facing him. "Leave her alone!"'
+					'The Roman looks down at her and narrows his eyes. "Mind your own fucking business slut! Unless you want a go instead"'
+					'Anushka scoffs at him and holds up her pinky finger. "If I wanted some dick, I''d want something bigger than you small fry." Roman grabs violently her by her shoulders, but before he can do anything Arkadi puts his hands on Roman''s shoulder and shakes his head no to him. Roman looks back at Anushka and glares at her. "Fuck it, slut isn''t worth it." But before more can happen a teacher interrupts. "What''s going on here? Break it up, all of you." You word a thank you to Anushka and slip away.'
+					act 'Leave': gt 'gschool_events', 'leave_break_events2'
+				else
+					act 'Run off':
+						*clr & cla
+						grupvalue[1] -= 1
+						grupvalue[2] -= 2
+						grupvalue[3] += 1
+						grupvalue[4] -= 3
+						inhib_exp += 2
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/gschool_hall02.jpg"></center>'
+						'You manage to pull away from him and as soon as you do, you take off running down the hall from them. You hear them cry out as you run and hear them starting to chase you. You run past a classroom as a teacher comes out who yells at you to stop running but you don''t stop, then you hear the teacher yelling at those chasing you. You keep running until you don''t hear anything. Finally you stop and lean against the wall catching your breath, looking down the empty hall.'
+						act 'Walk away': gt 'gschool_events', 'leave_break_events2'
+					end
+					act 'Why not':
+						*clr & cla
+						grupvalue[1] -= 10
+						grupvalue[2] -= 5
+						grupvalue[3] -= 10	
+						gs 'fame', 'pav', 'sex', 10
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+						'You are in the mood anyways, so why not? Hopefully it isn''t too quick. They lead you to the men''s room and one of the guys drives everyone else out; it''s just you and the gopniks in here now. One of them leans against the door to block anyone else from coming in while the rest all start unzipping their pants and pulling out their dicks.'
+						'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way.'
+						*nl
+						if fame['pav_slut'] > 200: 'On one wall you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+						act 'Start sucking':
+							*clr & cla
+							gs 'boyStat', 'A157'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A189'
+							gs 'cum_call', 'mouth', $boy,1
+							gs 'boyStat', 'A156'
+							gs 'cum_call', 'mouth', $boy,1
+							swallow += 3
+							'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+							'You kneel down and wrap your <<$pc_desc[''lips'']>> lips around Arkadi''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+							'Finally, you feel a jet of sperm hit your throat and Arkadi moans. "That''s right bitch! Swallow it all like a good little slut." Arkadi seems satisfied and tucks his cock back in his pants and swaps place with the Niko that was at the door, who comes over and pulls his cock out, ready to get his turn.'
+							*nl
+							'You immediately switch Roman''s cock who is standing next to you and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside as well, and soon you finish off the last Niko. As you get up off your knees, you hear Arkadi laugh. "You''re the best cock sucker we got <<$pcs_nickname>>!" said as they leave you alone in the bathroom, more horny than when you started. You say to yourself out loud. "Fucking assholes!" You then clean up and leave.'
+							gs 'arousal', 'bj', 20, 'group', 'sub'
+							gs 'arousal', 'end'
+							gs 'stat'
+							act 'Continue': gt 'gschool_events', 'leave_break_events2'
+						end
+					end
+					killvar 'temperson'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'toilet_bj1':
+	*clr & cla
+	menu_off = 1
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+	'You know perfectly well that the group of boys are not going to let you escape. You meekly let the boys drag you to the men''s room, hoping for a miracle to save you. It never comes. When you arrive at the men''s room, one of the guys drives everyone else out; it''s just you and the gopniks in here now. He goes outside and keeps watch while two of the others reach for their pants. Several more come in to watch.'
+	if fame['pav_slut'] > 200:
+		'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way. On one wall, you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+	else
+		'The walls of the restroom are covered in crude texts, quite a few of them involving your classmates in some way.'
+	end
+	act 'Start sucking':
+		*clr & cla
+		gs 'boyStat', 'A9'
+		gs 'cum_call', 'mouth', $boy,1
+		gs 'boyStat', 'A10'
+		gs 'cum_call', 'mouth', $boy,1
+		gs 'boyStat', 'A11'
+		gs 'cum_call', 'mouth', $boy,1
+		swallow += 3
+		'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+		'You know there''s only one way they will let you go, so you dutifully kneel down. Vitek takes his cock out of his pants. A Dan stands to your right and takes his cock out too. You wrap your <<$pc_desc[''lips'']>> lips around Vitek''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+		'Finally, you feel a jet of sperm hit your throat and Vitek says in a menacing voice "Swallow it all, whore. If you miss a drop, you''re licking it up from the ground." You diligently swallow his sperm, doing your best to lick it all up from his dick and your lips. Vitek seems satisfied and tucks his cock back in his pants and swaps place with Vasily who was at the door, Vasily comes over and pulls his cock out, ready to get his turn.'
+		*nl
+		'You immediately switch Dan''s cock and receive another mouthful from him. You carefully swallow his load as well, which earns you a nod of approval and a pat on the head. "Good little whore." He moves aside and you finish off Vasily. As you get up off your knees, you hear Dan laugh. "Do you understand your place in life now? That place is right here, on your knees, whenever we say so. Got that?" You obediently nod, fully aware of the nasty taste of semen in the your mouth.'
+		gs 'arousal', 'bj', 20, 'group', 'sub'
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Continue': gt 'gschool_events', 'leave_break_events2'
+	end
+end
+
+if $ARGS[0] = 'toilet_bj2':
+	*clr & cla
+	menu_off = 1
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/bathroom/boysbathroom.jpg"></center>'
+	'You know perfectly well that the group of boys are not going to let you escape. You meekly let the boys drag you to the men''s room, hoping for a miracle to save you. It never comes. When you arrive at the men''s room, one of the guys drives everyone else out; it''s just you and the gopniks in here now. He goes outside and keeps watch while two of the others reach for their pants. Several more come in to watch.'
+	if fame['pav_slut'] > 200:
+		'The walls of the restroom are covered in crude texts, quite a few of them involving you in some way. On one wall, you see written, in particularly large letters, "<b><<$pcs_nickname>> <<$pcs_lastname>> = <<$gnikname>>"</b>.'
+	else
+		'The walls of the restroom are covered in crude texts, quite a few of them involving your classmates in some way.'
+	end
+	act 'Start sucking':
+		*clr & cla
+		gs 'boyStat', 'A157'
+		gs 'cum_call', 'mouth', $boy,1
+		gs 'boyStat', 'A189'
+		gs 'cum_call', 'mouth', $boy,1
+		gs 'boyStat', 'A156'
+		gs 'cum_call', 'mouth', $boy,1
+		swallow += 3
+		'<center><video autoplay loop src="images/locations/pavlovsk/school/building/sex/rand_scoolboy6.mp4"></video></center>'
+		'You know there''s only one way they will let you go, so you dutifully kneel down. Arkadi takes his cock out of his pants. A Roman stands to your right and takes his cock out too. You wrap your <<$pc_desc[''lips'']>> lips around Arkadi''s hard cock and start to suck. Not forgetting the others, you spend some time alternating between all the cocks, stroking the ones you''re not sucking with your hands.'
+		'Finally, you feel a jet of sperm hit your throat and Arkadi seems satisfied and tucks his cock back in his pants and swaps place with Niko who was at the door, niko comes over and pulls his cock out, ready to get his turn.'
+		*nl
+		'You immediately switch Roman''s cock and receive another mouthful as Roman says in a menacing voice "Swallow it all, whore. If you miss a drop, you''re licking it up from the ground." You diligently swallow his sperm, doing your best to lick it all up from his dick and your lips. He moves aside and you finish off Niko. As you get up off your knees, you hear Roman laugh. "Do you understand your place in life now? That place is right here, on your knees, whenever we say so. Got that?" You obediently nod, fully aware of the nasty taste of semen in the your mouth.'
+		gs 'arousal', 'bj', 20, 'group', 'sub'
+		gs 'arousal', 'end'
+		gs 'stat'
+		act 'Continue': gt 'gschool_events', 'leave_break_events2'
+	end
+end
+
+!!Sweet talk function
+!!I have a request for you, now that we have cha as a stat and spots that raise it can you adjust the sweet_talk I am thinking
+!!cha 1-20 = -20
+!!cha 21-40 = 0
+!!41-60 = +10
+!!61-80 = +20
+!!81-90 = +30
+!!91+ = +40
+!!so charisma matters on sweet talking
+if $ARGS[0] = 'sweet':
+	if $ARGS[1] = 'normal' or $ARGS[1] = '':
+		if class['school_grade_average'] >= 90:
+			Sweet_talk = 10
+		elseif class['school_grade_average'] >= 80:
+			Sweet_talk = 5
+		elseif class['school_grade_average'] >= 70:
+			Sweet_talk = 0
+		elseif class['school_grade_average'] >= 60:
+			Sweet_talk = -5
+		elseif class['school_grade_average'] >= 50:
+			Sweet_talk = -10
+		else
+			Sweet_talk = -20
+		end
+		if grupTipe = 1:
+			Sweet_talk += 10
+		elseif grupTipe = 2:
+			Sweet_talk += 5
+		elseif grupTipe = 3:
+			Sweet_talk += 20
+		elseif grupTipe = 4:
+			Sweet_talk -= 10
+		end
+		if pcs_chrsm < 20:
+			Sweet_talk -= 20
+		elseif pcs_chrsm < 40:
+!! no change
+		elseif pcs_chrsm < 60:
+			Sweet_talk += 10
+		elseif pcs_chrsm < 80:
+			Sweet_talk += 20
+		elseif pcs_chrsm < 90:
+			Sweet_talk += 30
+		else
+			Sweet_talk += 40
+		end
+		sweet_talk += rand(0,10)
+		if hotcat < 5: Sweet_talk += (hotcat - 5) * 5
+	elseif $ARGS[1] = 'sex':
+		if class['school_grade_average'] >= 90:
+			Sweet_talk = -20
+		elseif class['school_grade_average'] >= 80:
+			Sweet_talk = -10
+		elseif class['school_grade_average'] >= 70:
+			Sweet_talk = 0
+		elseif class['school_grade_average'] >= 60:
+			Sweet_talk = 5
+		elseif class['school_grade_average'] >= 50:
+			Sweet_talk = 10
+		else
+			Sweet_talk = 20
+		end
+!!I tweaked the stats, I think it was backwards before with the nerds have a -40 which would have made sex more likely not less likely. I think now it is correct nerds less likely to get sex and the others more likely to get sex
+		if grupTipe = 1:
+			Sweet_talk -= 10
+		elseif grupTipe = 2:
+			Sweet_talk -= 10
+		elseif grupTipe = 3:
+			Sweet_talk += 40
+		elseif grupTipe = 4:
+			Sweet_talk -= 20
+		end
+		if pcs_chrsm < 20:
+			Sweet_talk -= 20
+		elseif pcs_chrsm < 40:
+!! no change
+		elseif pcs_chrsm < 60:
+			Sweet_talk += 10
+		elseif pcs_chrsm < 80:
+			Sweet_talk += 20
+		elseif pcs_chrsm < 90:
+			Sweet_talk += 30
+		else
+			Sweet_talk += 40
+		end
+		Sweet_talk += rand(15,35)
+!!tweaked hotcat as well, this one the better looking Sveta is the more likely they will accept sex, it was backwards before I think.
+		if hotcat < 5: Sweet_talk -= (hotcat - 5) * 5
+	end
+end
+
+
+--- gschool_events1 ---------------------------------
+

+ 5 - 5
locations/gschool_grounds.qsrc

@@ -24,11 +24,11 @@ if $ARGS[0] = 'main':
 	'Pavlovsk''s only school, where all the local children go for their education. Next to the school is the athletic field and a parking lot for the teachers, with a large grove of trees just beyond them.' 
 	'Hidden behind these trees is the old school building, which was supposed to be renovated and used for advance classes after the new one was built, but budget cuts meant the project was cancelled and now the old building stands empty and abandoned. It''s a popular spot for students to skip class or hang out outside of school.'
 
-	if ((hour = 6 and minut >= 30) or (hour >= 7 and hour < 18)) and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and suspended['on'] ! 1:
+	if ((hour = 6 and minut >= 30) or (hour >= 7 and hour < 18)) and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and suspended['on'] ! 1:
 		'With the school open you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
 	end
 
-	if day = nyp_day and month = 12 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0:
+	if day = nyp_day and month = 12 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 		if hour >= 14 and hour < 17:
 			'All of the boys and girls are standing near the school. Everyone did their best to look good today, wearing their nicest clothes. Someone calls out to you. "Hey <<$pcs_nickname>>, are you coming to the New Year''s Eve party or not? You haven''t paid the 1000 <b>₽</b> entry fee yet!"'
 
@@ -142,7 +142,7 @@ if $ARGS[0] = 'main':
 
 !!	act 'Go to the Principals Office': gt
 
-	if week < 6 and hour >= 6 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0 and SchoolBlock = 0 and suspended['on'] ! 1:
+	if week < 6 and hour >= 6 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and SchoolBlock = 0 and suspended['on'] ! 1:
 		if PCloStyle2 = 4 or Enable_sforma = 1:
 			if hour = 6:
 				if minut < 30:
@@ -189,7 +189,7 @@ if $ARGS[0] = 'main':
 
 	if joint > 0 and jointhigh = 0: act 'Smoke a joint behind the school building': gs 'drugs', 'joint' & gt $loc, $loc_arg
 
-	if week = 6 and hour = 8 and StoryLine > 0 and SchoolAtestat = 0 and detention_set = 1 and SchoolBlock = 0: act 'Go to detention': gt 'gschool_detention', 'start'
+	if week = 6 and hour = 8 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and detention_set = 1 and SchoolBlock = 0: act 'Go to detention': gt 'gschool_detention', 'start'
 
 	if christinaQW['dompath'] = 4: gt 'gschool_grounds', 'KristinaFight'
 
@@ -368,7 +368,7 @@ if $ARGS[0] = 'sports':
 		'You could go for a run here if you were wearing sports clothes and shoes.'
 	end
 
-	if hour >= 9 and hour < 18 and StoryLine > 0 and SchoolAtestat = 0 and kanikuli = 0: 'With the school open, you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
+	if hour >= 9 and hour < 18 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0: 'With the school open, you can go to the <a href="exec: minut += 1 & gt ''gschool_grounds'', ''change_room''">changing rooms</a> by the gym and change your outfit.'
 
 	if week = 6 and SchoolSorev = 2 and hour = 10 and SchoolBlock = 0:
 		*nl

+ 2 - 2
locations/gschool_jock_chats.qsrc

@@ -207,7 +207,7 @@ if $ARGS[0] = 'christina':
 				'Her face turns bright red with anger, and she hisses at you, "You fucking bitch. How did you get that?! If you show anybody..."'
 				'"I wont...if you tell Lariska it''s ok to hang out with me outside of school. I mean, I would hate to see these pictures fall into Lizaveta''s hands..."'
 				'Her face turns even more red, if that were possible. "Fine," she spits out. "But I swear, if I ever even hear about these pictures again, I will fucking break you into tiny pieces!"'
-				'"Oh, you wont, as long as you keep your word," you say with a fake smile that doesn''t quite reach your eyes. "Now do be a dear and let her know she is free to do whatever she wants outside of school, will you?'
+				'"Oh, you wont, as long as you keep your word," you say with a fake smile that doesn''t quite reach your eyes. "Now do be a dear and let her know she is free to do whatever she wants outside of school, will you?"'
 				'"Oh, and if you try and punish her for this, I will know," the threat clear on your face. Turning on your heels, you head off to your next class, smiling.'
 			else
 				christinaQW['dompath'] = 3
@@ -219,7 +219,7 @@ if $ARGS[0] = 'christina':
 				'Glaring at you, her hands balled into fists, she says quietly "What the fuck do you want from me, bitch?"'
 				'"Oh, I haven''t decided yet. When I do, I''ll let you know. I''m sure whatever I decide I want, you''ll give it to me without a fuss."'
 				'Her face turns even more red, if that were possible. "Fine," she spits out. "But I swear, if I ever even hear about these pictures again, I will fucking break you into tiny pieces!"'
-				'"Oh, you wont, as long as you keep your word," you say with a fake smile that doesn''t quite reach your eyes." Turning on your heels, you head off to your next class, smiling.'
+				'"Oh, you wont, as long as you keep your word," you say with a fake smile that doesn''t quite reach your eyes. Turning on your heels, you head off to your next class, smiling.'
 			end
 		elseif christinaQW['dompath'] = 3:
 			'Christina takes one look at you coming over to talk with her and says, "What now?"'

+ 12 - 12
locations/gschool_sex.qsrc

@@ -1,5 +1,5 @@
 # gschool_sex
-!2021/05/02
+!2022/02/09
 !!After school bjs for gopnik friends
 if $ARGS[0] = 'suck':
 	menu_off = 1
@@ -507,7 +507,7 @@ if $ARGS[0] = 'rand_bj':
 			pose = 0
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_tualet5.jpg"></center>'
 			'You pull away from his dick and get up. Leaning over a toilet and resting your hands on the wall, you invitingly shake your ass and encourage him. "Come on baby, I need you to fuck me right now! I''m so horny right now, please fuck me!"'
-			'Your classmates have totally quietened down now, no longer making any brash remarks. This is going to be a day to remember for them. Minutes ago, they were all hoping you would give <<$boydesc>> a rough time. Now they all want to be him.'
+			'Your classmates have totally quietened down now, no longer making any brash remarks. This is going to be a day to remember for them. Minutes ago, they were all hoping you would give him a hard time. Now they all want to be him.'
 			if $pantyworntype ! 'none':
 				act 'Remove panties':
 					*clr & cla
@@ -515,7 +515,7 @@ if $ARGS[0] = 'rand_bj':
 					'You don''t want your panties to get in the way and so quickly slide them down your legs and stuff them in your pocket.'
 					gs 'dinSex', 'wear_condom'
 					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_tualet4.jpg"></center>'
-					'<<$boydesc>> does not need any more encouragement and rubs his cock against your sopping fuckhole, slamming it in all the way on the first thrust. He then begins to fuck you in short, furious strokes and soon the room is filled with the sloppy sound of his balls slapping against your clit.'
+					'He does not need any more encouragement and rubs his cock against your sopping fuckhole, slamming it in all the way on the first thrust. He then begins to fuck you in short, furious strokes and soon the room is filled with the sloppy sound of his balls slapping against your clit.'
 					gs 'arousal', 'vaginal', 5
 					gs 'stat'
 					act 'Mount him':
@@ -532,7 +532,7 @@ if $ARGS[0] = 'rand_bj':
 			else
 				gs 'dinSex', 'wear_condom'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_tualet4.jpg"></center>'
-				'<<$boydesc>> does not need any more encouragement and rubs his cock against your sopping fuckhole, slamming it in all the way on the first thrust. He then begins to fuck you in short, furious strokes and soon the room is filled with the sloppy sound of his balls slapping against your clit.'
+				'He does not need any more encouragement and rubs his cock against your sopping fuckhole, slamming it in all the way on the first thrust. He then begins to fuck you in short, furious strokes and soon the room is filled with the sloppy sound of his balls slapping against your clit.'
 				gs 'arousal', 'vaginal', 5
 				gs 'stat'
 				act 'Mount him':
@@ -553,11 +553,11 @@ if $ARGS[0] = 'rand_sex':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool1.jpg"></center>'
-	'You know there are some unfinished houses behind the school that are usually abandoned. You take <<$boydesc>> there, away from the curious eyes of his friends so you can have some alone time. Your pussy is soaking wet right now and you bend over, inviting him to ram his dick into you and fuck you good.'
+	'You take him to the old abandoned school, away from the curious eyes of his friends so you can have some alone time. Your pussy is soaking wet right now and you bend over, inviting him to ram his dick into you and fuck you good.'
 	act 'Spread your legs':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool2.jpg"></center>'
-		'<<$boydesc>>, being the gentleman that he is, isn''t just looking for a quick fuck. He lays you down on your back and puts his face between your legs, rubbing his fingers over your dripping pussy lips. Then he starts to kiss your lips, teasingly running his tongue over them between kisses. After he finds your clitoris a few times, your moans grow louder and you arch your back. He backs down just enough for you to not orgasm. For the next few minutes, he keeps edging you with an evil grin on his face, ignoring your begging.'
+		'He, being the gentleman that he is, isn''t just looking for a quick fuck. He lays you down on your back and puts his face between your legs, rubbing his fingers over your dripping pussy lips. Then he starts to kiss your lips, teasingly running his tongue over them between kisses. After he finds your clitoris a few times, your moans grow louder and you arch your back. He backs down just enough for you to not orgasm. For the next few minutes, he keeps edging you with an evil grin on his face, ignoring your begging.'
 		gs 'arousal', 'cuni', 10
 		gs 'stat'
 		act 'He fucks your pussy':
@@ -567,7 +567,7 @@ if $ARGS[0] = 'rand_sex':
 			gs 'cum_call', '', $boy, 1
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool3.jpg"></center>'
 			$orgasm_or = 'yes'
-			$orgasm_txt = 'Taking you upstairs to a window sill, <<$boydesc>> tells you to lay down on your back on the ledge. Once you oblige, he spreads your legs and slowly slides his cock into your dripping pussy, beginning to fuck you in low, long strokes. Every thrust puts him in a little deeper and when he bottoms out in you, he begins to fuck you in earnest. You''ve given into your pleasure a long time ago; you are nothing but putty in his hands, letting him fuck you however he wants as long as you get off on it. Before too long you reach your orgasm and grasp your arms tightly around his neck to keep yourself from falling out of the window. Your spasming pussy is milking his cock and you can tell he''s getting close.'
+			$orgasm_txt = 'Taking you upstairs to a window sill, he tells you to lay down on your back on the ledge. Once you oblige, he spreads your legs and slowly slides his cock into your dripping pussy, beginning to fuck you in low, long strokes. Every thrust puts him in a little deeper and when he bottoms out in you, he begins to fuck you in earnest. You''ve given into your pleasure a long time ago; you are nothing but putty in his hands, letting him fuck you however he wants as long as you get off on it. Before too long you reach your orgasm and grasp your arms tightly around his neck to keep yourself from falling out of the window. Your spasming pussy is milking his cock and you can tell he''s getting close.'
 			gs 'dinsex', 'vaginal_sex', 10
 			gs 'stat'
 			act 'Take his load in your mouth':
@@ -578,7 +578,7 @@ if $ARGS[0] = 'rand_sex':
 				gs 'arousal', 'end'
 				gs'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool7.jpg"></center>'
-				'<<$boydesc>> pulls you up from the window sill and tells you to get down on your knees before him. "Open your mouth, <<$pcs_nickname>>." he says and you happily oblige. He shoves his dick inside your mouth and you enthusiastically begin to suck him off, wanting to feel him squirt his load. Unable to withstand your sweet torture any longer, <<$boydesc>> growls and you feel the squirts of his cum land on your tongue. It was too much for you and some of it dribbles down your chin and onto your chest, despite your best efforts to swallow it all.'
+				'He pulls you up from the window sill and tells you to get down on your knees before him. "Open your mouth, <<$pcs_nickname>>." he says and you happily oblige. He shoves his dick inside your mouth and you enthusiastically begin to suck him off, wanting to feel him squirt his load. Unable to withstand your sweet torture any longer, he growls and you feel the squirts of his cum land on your tongue. It was too much for you and some of it dribbles down your chin and onto your chest, despite your best efforts to swallow it all.'
 				*nl
 				'After he admires his handiwork for a second, he notices the time. "Oh crap! <<$pcs_nickname>>, we''re going to be late for class!"'
 				'You both quickly get dressed and run as fast as you can to make it to class on time.'
@@ -589,10 +589,10 @@ if $ARGS[0] = 'rand_sex':
 			*clr & cla
 			if analplugin = 1:
 				analplugin = 0
-				'<<$boydesc>> plays with your butt plug for a moment before pulling it out. Your anus gapes slightly from being filled for so long. He reassures you, "Don''t worry babe, I''ll be filling that soon enough."'
+				'He plays with your butt plug for a moment before pulling it out. Your anus gapes slightly from being filled for so long. He reassures you, "Don''t worry babe, I''ll be filling that soon enough."'
 			end
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool4.jpg"></center>'
-			'<<$boydesc>> wants something a little different today and carefully rubs the head of his dick against your anus. The head of his cock is quite large, and it''s quite difficult to get in. "He licked me so good he deserves this." you tell yourself.'
+			'He wants something a little different today and carefully rubs the head of his dick against your anus. The head of his cock is quite large, and it''s quite difficult to get in. "He licked me so good he deserves this." you tell yourself.'
 			'You whine from pain when his cock enters you and ask him to take it slow for a moment so you can get used to his size. He''s happy to oblige and rubs your pussy slowly in the meantime, occasionally darting a finger in. It feels so good! With him massaging you like this, you feel the pain subsiding quickly. It still hurts a little, but when he begins to move his hips you moan loudly - not from pain, but pleasure!'
 			gs 'arousal', 'anal', 5
 			gs 'stat'
@@ -600,7 +600,7 @@ if $ARGS[0] = 'rand_sex':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/building/sex/boysex_scool5.jpg"></center>'
 				'After a few minutes of gentle ass fucking, he pulls you off the window ledge and gets on his back. You don''t need any invitation and straddle him before he''s even fully on the ground, guiding his cock back to your asshole. You control the pace now and you spit in your hand quickly and rub it on his dick before you slowly slide down on it. It''s still not completely pain-free. "No surprise given his size" you think to yourself.'
-				'<<$boydesc>> is definitely encouraged by your eagerness to put his cock back in your asshole. Even though you thought you could control the pace, he proves you wrong and begins to piston his hips against your stretched hole. You squirm, but the pleasant feelings start to take over again when he thrusts a few fingers into your pussy. He can feel his cock through the thin partition, rubbing it when his cock enters you once more.'
+				'He is definitely encouraged by your eagerness to put his cock back in your asshole. Even though you thought you could control the pace, he proves you wrong and begins to piston his hips against your stretched hole. You squirm, but the pleasant feelings start to take over again when he thrusts a few fingers into your pussy. He can feel his cock through the thin partition, rubbing it when his cock enters you once more.'
 				gs 'arousal', 'anal', 10
 				gs 'stat'
 				act 'Continue': 
@@ -1258,7 +1258,7 @@ if $ARGS[0] = 'femdom_petka_doggy':
 	'You grin. "Tell me you like taking my cock up your ass."'
 	'He moans in pleasure. "Yes, it feels so good."'
 	'You slap his ass and stop moving. "Beg me to fuck your ass."'
-	'He glances back at you. "Please fuck my ass" he begs. Since he is begging, you start really fucking his ass hard and fast. He both groans in pain and moans in pleause, but it sounds like the moans are louder.'
+	'He glances back at you. "Please fuck my ass" he begs. Since he is begging, you start really fucking his ass hard and fast. He both groans in pain and moans in pleasure, but it sounds like the moans are louder.'
 	gs 'arousal', 'anal_strap_give', 5, 'dom'
 	gs 'stat'
 	act 'Fuck your buttslut':

+ 3 - 3
locations/hookup.qsrc

@@ -447,7 +447,7 @@ if $ARGS[0] = 'bj_react1.2':
 						gs'hookup','generous_lick'
 					else
 						'"Saving yourself for marriage but still give blowjobs to strangers?" he asks pointedly.'
-						if StoryLine = 1: 
+						if mid($start_type,1,2) = 'sg': 
 							'"I don''t know," you shrug. "Ask my mom why it matters so much."'
 						else
 							'You shrug. "I''m still a virgin aren''t I?"'
@@ -507,7 +507,7 @@ if $ARGS[0] = 'bj_react2':
 						gs'hookup','generous_lick'
 					else
 						'"Saving yourself for marriage but still give blowjobs to strangers?" he asks pointedly.'
-						if StoryLine = 1: 
+						if mid($start_type,1,2) = 'sg': 
 							'"I don''t know. Ask my mom why it matters so much," you shrug.'
 						else
 							'You shrug. "I''m still a virgin aren''t I?"'
@@ -666,7 +666,7 @@ if $ARGS[0] = 'bj2':
 						'"Sorry, but I''m saving myself for marriage," you say apologetically, reaching for your clothes.'
 						if rand(0,1) = 1:
 							'"Saving yourself for marriage but still give blowjobs to strangers?" he asks pointedly.'
-							if StoryLine = 1: 
+							if mid($start_type,1,2) = 'sg': 
 								'"I don''t know. Ask my mom why it matters so much," you shrug.'
 							else
 								'You shrug. "I''m still a virgin aren''t I?"'

+ 1 - 1
locations/hookup_after.qsrc

@@ -1817,7 +1817,7 @@ if $ARGS[0] = 'sleep':
 		gs'sleep','simple'
 	end	
 	
-	if StoryLine = 1 and home_owned[2] = 1: sveta_punishment['no_come_home'] = 1
+	if mid($start_type,1,2) = 'sg' and home_owned[2] = 1: sveta_punishment['no_come_home'] = 1
 	gt'hookup_morning','morning'
 end
 --- hookup_after ---------------------------------

+ 2 - 2
locations/hookup_morning.qsrc

@@ -22,7 +22,7 @@ if $ARGS[0] = 'morning':
 		'Your mind stirs and you slowly come to consciousness. Your first thoughts are...'
 		act'<i>Yawn</i>':gt'hookup_morning','yawn_wake'
 	end
-	if kanikuli = 0 and StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
 		act'School!':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/romance/misc/wakeup2.mp4"></video></center>'
@@ -150,7 +150,7 @@ if $ARGS[0] = 'confused':
 		'"Yeah," you mumble back.'
 		gs'hookup_morning','wakeup'
 	end
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		act'Mom!':gt'hookup_morning','mom'
 	end
 end

+ 1 - 1
locations/hunterLoveSex.qsrc

@@ -3056,7 +3056,7 @@ if $ARGS[0] = 'din_hunters_sex_misionary_bonus':
 	i = rand(1,4)
 	j = rand(1,3)
 	h = rand(1,3)
-	if pcs_agil > 50 and musle >= salo:'Throw legs <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_bonus1''">head</a> .'
+	if pcs_agil > 50 and strenbuf >= salo:'Throw legs <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_bonus1''">head</a> .'
 	*pl
 	if h < 3:'Having had enough of this position he asks you...'
 	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'

+ 8 - 2
locations/igor_schedule.qsrc

@@ -43,7 +43,10 @@ if SchoolAtestat = 0 and kanikuli = 0:
 			end
 		end
 	elseif week = 6:
-		if hour < 8:
+		if igor_DimaNos_day = daystart:
+			!! Igor is at a date with Dimka wont be availebel whole day.
+			locat['igor']  = 11
+		elseif hour < 8:
 			!!Bedroom - Asleep
 			locat['igor']  = 1
 		elseif hour = 8 and minut < 30:
@@ -131,7 +134,10 @@ else
 			end
 		end
 	elseif week = 6:
-		if hour < 8:
+		if igor_DimaNos_day = daystart:
+			!! Igor is at a date with Dimka wont be availebel whole day.
+			locat['igor']  = 11
+		elseif hour < 8:
 			!!Bedroom - Asleep
 			locat['igor']  = 1
 		elseif hour = 8 and minut < 30:

+ 1 - 1
locations/ilyroom.qsrc

@@ -17,7 +17,7 @@ act 'Leave':
 	gt 'city_industrial'
 end
 
-if StoryLine = 0 or altQS = 1:
+if $start_type[1] ! 'nomagic':
 	if poverKAR = 1:
 		'As you approach the door, you hear a faint rustling behind you. You turn and see Gustav. He walks up to you and says, "This is Ilyushkin''s apartment. Take this camera and film. Now we''ll get him."'
 

+ 9 - 29
locations/intro_city.qsrc

@@ -1,9 +1,9 @@
 # intro_city
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'city'
+$start_type[1] = 'nomagic'
 
 if $ARGS[0] = 'start':
 
@@ -63,48 +63,26 @@ if $ARGS[0] = 'start':
 	pcs_sleep = 100
 	willpowermax = 100
 
-	$start_type = 'nt'
-	NTstart = 1
+	gs 'set_home', 1 & gt 'korr'
 	
 	gt 'intro_city', 'city_intro'
 end
 
 if $ARGS[0] = 'city_intro':
+	$loc = 'intro_city'
+	$loc_arg = '2'
 	!! Intro to starting city
 	!!variables for apartment living
 	pcs_hairlng = 100
-	!!Default Names
-	$pcs_firstname = 'Svetlana'
-	$pcs_lastname = 'Lebedev'
-	$pcs_nickname = 'Sveta'
-
-	!!Player names are set here
-	$temp_firstname = '<<$pcs_firstname>>'
-	$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
-	if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
-	killvar '$temp_firstname'
-
-	$temp_lastname = '<<$pcs_lastname>>'
-	$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
-	if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
-	killvar '$temp_lastname'
-
-	$temp_nickname = '<<$pcs_nickname>>'
-	$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
-	if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
-	killvar '$temp_nickname'
-
 	*clr & cla
 	!!pic of apartment or Gazelle?
 	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to the big city of St. Petersburg. Today is the day you move into your own apartment and start this new phase of your life.'
 	'You think back to your school days and what kind of student you were...'
 
-	act 'Continue': gt 'intro_city', 'vlad_intro'
+	act 'Continue': gt 'intro_city_select', 'start'
 end
 
 if $ARGS[0] = '2':
-	$loc = 'intro_city'
-	$loc_args = '2'
 !!	Just hair and eye color here for now; the dialog will be update as more options are added
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
 	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
@@ -115,7 +93,7 @@ if $ARGS[0] = '2':
 	'<center>Customize your:</center>'
 	'<center><a href="exec:gs ''intro_customization'', ''hair''"><img src="images/system/1_openings/shared/icon_hair.png"></a> <a href="exec:gs ''intro_customization'', ''eyes''"><img src="images/system/1_openings/shared/icon_eye.png"></a></center>'
 	
-	act 'Done': gt 'intro_city', 'city_intro'
+	act 'Done': gt 'intro_city', 'vlad_intro'
 end
 
 if $ARGS[0] = 'vlad_intro':
@@ -240,7 +218,9 @@ if $ARGS[0] = 'family_goodbye':
 end
 
 if $ARGS[0] = 'welcome_intro':
+	gs 'intro_initialization_city'
 	!! Welcome to Girl Life speech
+	MagikDostup = 1
 	showstat 1
 	showobjs 1
 	gs 'obj_din', 'old'

+ 1 - 2
locations/intro_city_m.qsrc

@@ -1,8 +1,7 @@
 # intro_city_m
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'city_m'
 
 'Not yet available!!'

File diff suppressed because it is too large
+ 205 - 293
locations/intro_city_select.qsrc


+ 10 - 43
locations/intro_city_tg.qsrc

@@ -1,9 +1,9 @@
 # intro_city_tg
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'city_tg'
+$start_type[1] = 'tg'
 
 if $ARGS[0] = 'start':
 	menu_off = 1
@@ -166,8 +166,6 @@ if $ARGS[0] = 'roadPRE':
 end
 
 if $ARGS[0] = 'otelPRE':
-	$temp_firstname = '<<$pcs_firstname>>'
-	$temp_lastname = '<<$pcs_lastname>>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/1_tf/6.jpg"></center>'
 	'Your trip to the hotel is quite uneventful compared to your tomb raiding adventure.'
 	*nl
@@ -247,10 +245,9 @@ if $ARGS[0] = 'otelPRE':
 										'The girl''s face drops. "Damn it!" She looks into your eyes. "Okay... Mikhail, we have to go somewhere else, there are too many people that might get hurt here. Gustav, come here!" The girl calls out to the corridor.'
 										*nl
 										'A tall man enters the room'
-										StoryLine = 0
 										MagikDostup = 0
 										$pcs_firstname = 'Mikhail'
-										$pcs_lastname = 'Kuznetsov'
+										$pcs_lastname = 'Ivanov'
 										age = 35
 										vidage = 35
 										year = 2016
@@ -387,12 +384,15 @@ if $ARGS[0] = 'tatianaPRE':
 								*nl
 								'"As for your family, not to worry. I''ll arrange everything. We will fabricate your death to get Reinhold off your back. To make your transition easier I''ll cover your memory of the family, they will only be ghostly memories, you won''t even remember where you lived. Don''t worry, I won''t erase your entire memory and leave you a useless vegetable."'
 								act 'There must be another way!':
+									$loc = 'intro_city_tg'
+									$loc_arg = 'custom'
 									*clr & cla
 									'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_tatiana.jpg"></center>'
 									'"There must be another way!" you panic. You tug at the restraints on the bed.'
 									*nl
-									'Tatiana''s face becomes serious. "Do not argue. It is the only way available to me. You will need a to use a new name, think it over in your dreams and tell me when you wake up, otherwise I will give you a pretty name. Now go to sleep." Says Tatiana as she puts her hand on your chest. Your vision immediately fades.'
-									act 'Sleep': gt 'intro_city_tg', 'custom'
+									'Tatiana''s face becomes serious. "Do not argue. It is the only way available to me. You will need a to use a new name, think it over in your dreams and tell me when you wake up, otherwise I will give you a pretty name. Now go to sleep." Says Tatiana as she puts her hand on your chest. Your vision immediately fades and you dream about a girl you never knew and what she did at school...'
+									
+									act 'Dream': gt 'intro_city_select', 'start'
 								end
 							end
 						end
@@ -405,7 +405,7 @@ end
 
 if $ARGS[0] = 'custom':
 	$loc = 'intro_city_tg'
-	$loc_args = 'custom'
+	$loc_arg = 'custom'
 !!	This is to bypass the next part if the avatar system was used
 !!	It will be changed to bypass the head options, once more body options are added
 
@@ -440,40 +440,6 @@ if $ARGS[0] = 'sleepPRE':
 		*nl
 		'"Well, yes. I won''t argue about that." Tatiana agrees. "It''s your life and you decide what you do with it, but for the time being, you cannot go back to your old life, so deal with it. On a side note, I already took care of an alibi. Today Mikhail crashed his car into the pit and died, it''s on the news." With these words, Tatiana picked up the remote and turned on the TV.'
 
-		!!Default Names
-		$pcs_firstname = 'Svetlana'
-		$pcs_lastname = 'Lebedev'
-		$pcs_nickname = 'Sveta'
-
-		!!Player names are set here
-		if $temp_firstname = '':
-			$temp_firstname = 'Svetlana'
-		else
-			$temp_firstname = '<<$pcs_firstname>>'
-		end
-		$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
-		if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
-		killvar '$temp_firstname'
-
-		
-		if $temp_lastname = '':
-			$temp_lastname = 'Lebedev'
-		else
-			$temp_lastname = '<<$pcs_lastname>>'
-		end
-		$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
-		if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
-		killvar '$temp_lastname'
-
-		if $temp_nickname = '':
-			$temp_nickname = 'Sveta'
-		else
-			$temp_nickname = '<<$pcs_nickname>>'
-		end
-		$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
-		if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
-		killvar '$temp_nickname'
-
 		act 'Watch TV':
 			cla
 			*clr
@@ -506,6 +472,7 @@ if $ARGS[0] = 'sleepPRE':
 				'Also, you might want to steer clear of those Gopnik, they might just look like petty criminals having a drink, but they have connections and you''re just a pretty young girl now.'
 
 				act 'Out of the car':
+					gs 'intro_initialization_city'
 					cla
 					showstat 1
 					showobjs 1

+ 86 - 90
locations/intro_customization.qsrc

@@ -7,12 +7,10 @@ if $ARGS[0] = 'start':
 	!act 'Set attributes': gt 'intro_customization','modatt'
 	!act 'Set skills': gt 'intro_customization','modskl'
 	act 'Set appearance':gt 'intro_customization','modapp'
-	act 'Set relationships': gt 'intro_customization','modrel'
 	act 'Set purse': gt 'intro_customization','modpur'
 	act 'Set items': gt 'intro_customization','modite'
 	act 'Set money (<<money>>₽)': money = input 'Set Cash Amount' & gt'intro_customization','start'
-	if custom_csb ! 1: act 'Return to preset character menu': gt 'intro_sg_select', 'charselect'
-	if start < 10:
+	if mid($start_type,1,2) = 'sg':
 		gs 'intro_sg_select_custom', 'start'
 	else
 		act 'Confirm these options':
@@ -21,13 +19,7 @@ if $ARGS[0] = 'start':
 				dynamic $currentpursetype + '_purses[<<currentpursenumber>>] = 1'
 				gs 'obj_din', 'old'
 			end
-			if $start_type = 'sg':
-				gt 'intro_sg', 'four'
-			elseif $start_type = 'sg_m':
-				gt 'intro_sg_m', 'four'
-			else
-				gt 'intro_sg_tg', 'intro_7'
-			end
+			gt $loc, $loc_arg
 		end
 	end
 end
@@ -559,56 +551,58 @@ end
 if $ARGS[0] = 'hair':
 	cls
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
-	*nl
-	if pcs_hairlng <= 1:
-		$hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''begin'', ''hair''">very short</a>,'
-	elseif pcs_hairlng <= 31:
-		$hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''begin'', ''hair''">short</a>,'
-	elseif pcs_hairlng <= 81:
-		$hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''begin'', ''hair''">chin length</a>,'
-	elseif pcs_hairlng <= 161:
-		$hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''begin'', ''hair''">shoulder length</a>,'
-	elseif pcs_hairlng <= 261:
-		$hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''begin'', ''hair''">breast length</a>,'
-	elseif pcs_hairlng <= 401:
-		$hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''begin'', ''hair''">back length</a>,'
-	elseif pcs_hairlng <= 601:
-		$hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''begin'', ''hair''">hip length</a>,'
-	elseif pcs_hairlng <= 801:
-		$hair = 'You have <a href="exec:pcs_hairlng = 1001 & gs ''begin'', ''hair''">ass length</a>,'
+	if player_avatar = 1:
+		'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
 	else
-		$hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''begin'', ''hair''">extremely long</a>,'
-	end
-
-	if pcs_haircol = 0 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'black hair' & $hair3 = 'black hair'
-	if pcs_haircol = 1 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'brown hair' & $hair3 = 'brown hair'
-	if pcs_haircol = 2 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'Red hair' & $hair3 = 'red hair'
-	if pcs_haircol = 3 and curly <= 0:$hair += ' <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''begin'', ''hair''">straight</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.'& $hair2 = 'blond hair' & $hair3 = 'blond hair'
-	if pcs_haircol = 0 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">black</a> hair.'& $hair2 = 'curls' & $hair3 = 'black curls'
-	if pcs_haircol = 1 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">brown</a> hair.'& $hair2 = 'curls' & $hair3 = 'brown curls'
-	if pcs_haircol = 2 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">red</a> hair.'& $hair2 = 'curls' & $hair3 = 'red hair'
-	if pcs_haircol = 3 and curly > 0:$hair += ' <a href="exec:defcurly = 0 & curly = 0 & gs ''begin'', ''hair''">curly</a>, <a href="exec:gs ''begin'', ''pcs_haircol'' & gs ''begin'', ''hair''">blonde</a> hair.' &$hair2 = 'curls' & $hair3 = 'blond curls'
-	'<center>Adjust your hair to match your avatar. Please note that, at present, hair choices are overridden by your starting personality choice (e.g. volleyball players will always have straight blond hair).</center>'
+		'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
+	end
 	*nl
-	nathcol = pcs_haircol
+	
 	if player_avatar = 1:
-		if avatar_hair = 1:
-			'<center>Please note that this choice is given only once and you will not be able to change it without starting a new game!</center>'
-			'<center>You have <i><<$av_hair>>.</i> <a href="exec:avatar_hair = 0 & gs ''begin'', ''hair''">Revert to default</a>.</center>'
-		else
-			'<center><i><<$hair>></i> You may also <a href="exec:gs ''begin'', ''hair_input'' & gs ''begin'', ''hair''">manually enter a description</a></center>.'
-		end
+		'<center>Adjust your hair to match your avatar.</center>'
+		'<center>Please note that this choice is given only once and you will not be able to change it without starting a new game!</center>'
 	end
-	if $start_type = 'sg':
-		act'<center><b>Done</b></center>': gt 'intro_sg', 'four'
-	elseif $start_type = 'sg_m':
-		act'<center><b>Done</b></center>': gt 'intro_sg_m', 'six'
-	elseif $start_type = 'sg_tg':
-		act'<center><b>Done</b></center>': gt 'preCSB', 'intro_6_looks'
+
+	*nl
+
+	if pcs_hairlng > 1000:
+		$hair = 'You have <a href="exec:pcs_hairlng = 1 & gs ''intro_customization'', ''hair''">extremely long</a> hair,'
+	elseif pcs_hairlng > 800:
+		$hair = 'You have <a href="exec:pcs_hairlng = 1001 & gs ''intro_customization'', ''hair''">ass length</a> hair,'
+	elseif pcs_hairlng > 600:
+		$hair = 'You have <a href="exec:pcs_hairlng = 801 & gs ''intro_customization'', ''hair''">hip length</a> hair,'
+	elseif pcs_hairlng > 400:
+		$hair = 'You have <a href="exec:pcs_hairlng = 601 & gs ''intro_customization'', ''hair''">back length</a> hair,'
+	elseif pcs_hairlng > 260:
+		$hair = 'You have <a href="exec:pcs_hairlng = 401 & gs ''intro_customization'', ''hair''">breast length</a> hair,'
+	elseif pcs_hairlng > 160:
+		$hair = 'You have <a href="exec:pcs_hairlng = 261 & gs ''intro_customization'', ''hair''">shoulder length</a> hair,'
+	elseif pcs_hairlng > 80:
+		$hair = 'You have <a href="exec:pcs_hairlng = 161 & gs ''intro_customization'', ''hair''">chin length</a> hair,'
+	elseif pcs_hairlng > 30:
+		$hair = 'You have <a href="exec:pcs_hairlng = 81 & gs ''intro_customization'', ''hair''">short</a> hair,'
 	else
-		act'<center><b>Done</b></center>': gt 'preCUST', 'TGStart'
+		$hair = 'You have <a href="exec:pcs_hairlng = 31 & gs ''intro_customization'', ''hair''">very short</a> hair,'
 	end
+
+	*nl
+
+	if pcs_haircol = 0 and curly <= 0:$hair += ' it is <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''intro_customization'', ''hair''">straight</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">black</a>.'& $hair2 = 'black hair' & $hair3 = 'black hair'
+	if pcs_haircol = 1 and curly <= 0:$hair += ' it is <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''intro_customization'', ''hair''">straight</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">brown</a>.'& $hair2 = 'brown hair' & $hair3 = 'brown hair'
+	if pcs_haircol = 2 and curly <= 0:$hair += ' it is <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''intro_customization'', ''hair''">straight</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">red</a>.'& $hair2 = 'Red hair' & $hair3 = 'red hair'
+	if pcs_haircol = 3 and curly <= 0:$hair += ' it is <a href="exec:defcurly = 1 & curly = 2147483647 & gs ''intro_customization'', ''hair''">straight</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">blonde</a>.'& $hair2 = 'blond hair' & $hair3 = 'blond hair'
+	if pcs_haircol = 0 and curly > 0:$hair += ' it is <a href="exec:defcurly = 0 & curly = 0 & gs ''intro_customization'', ''hair''">curly</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">black</a>.'& $hair2 = 'curls' & $hair3 = 'black curls'
+	if pcs_haircol = 1 and curly > 0:$hair += ' it is <a href="exec:defcurly = 0 & curly = 0 & gs ''intro_customization'', ''hair''">curly</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">brown</a>.'& $hair2 = 'curls' & $hair3 = 'brown curls'
+	if pcs_haircol = 2 and curly > 0:$hair += ' it is <a href="exec:defcurly = 0 & curly = 0 & gs ''intro_customization'', ''hair''">curly</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">red</a>.'& $hair2 = 'curls' & $hair3 = 'red curls'
+	if pcs_haircol = 3 and curly > 0:$hair += ' it is <a href="exec:defcurly = 0 & curly = 0 & gs ''intro_customization'', ''hair''">curly</a> and <a href="exec:gs ''intro_customization'', ''pcs_haircol'' & gs ''intro_customization'', ''hair''">blonde</a>.' &$hair2 = 'curls' & $hair3 = 'blond curls'
+
+	if player_avatar = 1:
+		'<center><i><<$hair>></i> You may also <a href="exec:gs ''intro_customization'', ''hair_input'' & gs ''intro_customization'', ''hair''">manually enter a description</a> if you would prefer.</center>'
+	else
+		'<center><i><<$hair>></i></center>'
+	end
+	nathcol = pcs_haircol
+	act'<center><b>Done</b></center>': gt $loc, $loc_arg
 end
 
 if $ARGS[0] = 'pcs_haircol':
@@ -624,7 +618,11 @@ end
 if $ARGS[0] = 'lip':
 	cls
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
-	'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
+	if player_avatar = 1:
+		'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
+	else
+		'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
+	end
 	*nl
 	if pcs_lip = 0:$pcs_lip = 'you have thin<<$pcs_lipbalm>> lips.' & $liptalk = 'thin lips' & $liptalk2 = 'thin lips' & $liptalk3 = 'thin lips'
 	if pcs_lip = 1:$pcs_lip = 'You have normal<<$pcs_lipbalm>> lips.' & $liptalk = 'soft lips' & $liptalk2 = 'delicate lips' & $liptalk3 = 'tender lips'
@@ -635,9 +633,9 @@ if $ARGS[0] = 'lip':
 	*nl
 	'<center><i><<$pcs_lip>></i></center>'
 	*nl
-	if pcs_lip < 4:'<center><a href="exec:pcs_lip += 1 & gs ''begin'', ''lip''">Bigger lips</a></center>'
-	if pcs_lip > 0:'<center><a href="exec:pcs_lip -= 1 & gs ''begin'', ''lip''">Smaller lips</a></center>'
-	act'<center><b>Done</b></center>': gt'$loc','$loc_args'
+	if pcs_lip < 4:'<center><a href="exec:pcs_lip += 1 & gs ''intro_customization'', ''lip''">Bigger lips</a></center>'
+	if pcs_lip > 0:'<center><a href="exec:pcs_lip -= 1 & gs ''intro_customization'', ''lip''">Smaller lips</a></center>'
+	act'<center><b>Done</b></center>': gt $loc, $loc_arg
 end
 
 if $ARGS[0] = 'eyes':
@@ -660,28 +658,26 @@ if $ARGS[0] = 'eyes':
 	if pcs_lashes = 1:$pcs_lashes = 'with normal eyelashes'
 	if pcs_lashes = 2:$pcs_lashes = 'with long eyelashes'
 	if pcs_eyesize > 3:pcs_eyesize = 3
-	if pcs_eyesize = 0:$glaza = 'You have small <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = '<<$pcs_eyecol>> eyes' & $glaza3 = '<<$glacol2>> eyes'
-	if pcs_eyesize = 1:$glaza = 'You have expressive <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'expressive <<$pcs_eyecol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes'
-	if pcs_eyesize = 2:$glaza = 'You have large <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'big <<$pcs_eyecol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes'
-	if pcs_eyesize = 3:$glaza = 'You have huge <a href="exec:gs ''begin'', ''eye color'' & gs ''begin'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'great <<$pcs_eyecol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes'
+	if pcs_eyesize = 0:$glaza = 'You have small <a href="exec:gs ''intro_customization'', ''eye color'' & gs ''intro_customization'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = '<<$pcs_eyecol>> eyes' & $glaza3 = '<<$glacol2>> eyes'
+	if pcs_eyesize = 1:$glaza = 'You have expressive <a href="exec:gs ''intro_customization'', ''eye color'' & gs ''intro_customization'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'expressive <<$pcs_eyecol>> eyes' & $glaza3 = 'expressive <<$glacol2>> eyes'
+	if pcs_eyesize = 2:$glaza = 'You have large <a href="exec:gs ''intro_customization'', ''eye color'' & gs ''intro_customization'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'big <<$pcs_eyecol>> eyes' & $glaza3 = 'high <<$glacol2>> eyes'
+	if pcs_eyesize = 3:$glaza = 'You have huge <a href="exec:gs ''intro_customization'', ''eye color'' & gs ''intro_customization'', ''eyes''"><<$pcs_eyecol>></a> eyes, <<$pcs_lashes>>.<<$glass>>' & $glaza2 = 'great <<$pcs_eyecol>> eyes' & $glaza3 = 'great <<$glacol2>> eyes'
 
 	if player_avatar = 1:
-		'<center>Adjust your eyes and eyelashes to match your avatar. Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
-	else
-		'<center>Please note, glasses choice may be overridden by your starting personality choice (e.g. bookworms/nerds will always start with glasses).</center>'
+		'<center>Adjust your eyes and eyelashes to match your avatar.</center>'
 	end	
 	*nl
 	'<center><i><<$glaza>></i></center>'
 	*nl
-	if pcs_lashes < 2:'<center><a href="exec:pcs_lashes += 1 & gs ''begin'', ''eyes''">Lengthen lashes</a></center>'
-	if pcs_lashes > 0:'<center><a href="exec:pcs_lashes -= 1 & gs ''begin'', ''eyes''">Shorten lashes</a></center>'
-	if pcs_eyesize < 3:'<center><a href="exec:pcs_eyesize += 1 & gs ''begin'', ''eyes''">Larger eyes</a></center>'
-	if pcs_eyesize > 0:'<center><a href="exec:pcs_eyesize -= 1 & gs ''begin'', ''eyes''">Smaller eyes</a></center>'
-	if glass = 0:'<center><a href="exec:glass = 1 & gs ''begin'', ''eyes''">Wear glasses</a></center>'
-	if glass = 1:'<center><a href="exec:glass = 0 & gs ''begin'', ''eyes''">Remove glasses</a></center>'
+	if pcs_lashes < 2:'<center><a href="exec:pcs_lashes += 1 & gs ''intro_customization'', ''eyes''">Lengthen lashes</a></center>'
+	if pcs_lashes > 0:'<center><a href="exec:pcs_lashes -= 1 & gs ''intro_customization'', ''eyes''">Shorten lashes</a></center>'
+	if pcs_eyesize < 3:'<center><a href="exec:pcs_eyesize += 1 & gs ''intro_customization'', ''eyes''">Larger eyes</a></center>'
+	if pcs_eyesize > 0:'<center><a href="exec:pcs_eyesize -= 1 & gs ''intro_customization'', ''eyes''">Smaller eyes</a></center>'
+	if glass = 0:'<center><a href="exec:glass = 1 & gs ''intro_customization'', ''eyes''">Wear glasses</a></center>'
+	if glass = 1:'<center><a href="exec:glass = 0 & gs ''intro_customization'', ''eyes''">Remove glasses</a></center>'
 	
 	
-	act'<center><b>Done</b></center>': gt'$loc','$loc_args'
+	act'<center><b>Done</b></center>': gt $loc, $loc_arg
 end
 
 if $ARGS[0] = 'eye color':
@@ -735,24 +731,24 @@ if $ARGS[0] = 'birthday':
 	end
 
 	*nl
-	'<center><a href="exec:birthday += 5 & gs ''begin'', ''birthday''">+5 Days</a></center>'
-	'<center><a href="exec:birthday += 1 & gs ''begin'', ''birthday''">+1 Day</a></center>'
-	'<center><a href="exec:birthday -= 1 & gs ''begin'', ''birthday''">-1 Day</a></center>'
-	'<center><a href="exec:birthday -= 5 & gs ''begin'', ''birthday''">-5 Days</a></center>'
-	'<center><a href="exec:birthmonth = 1 & gs ''begin'', ''birthday''">January</a></center>'
-	'<center><a href="exec:birthmonth = 2 & gs ''begin'', ''birthday''">February</a></center>'
-	'<center><a href="exec:birthmonth = 3 & gs ''begin'', ''birthday''">March</a></center>'
-	'<center><a href="exec:birthmonth = 4 & gs ''begin'', ''birthday''">April</a></center>'
-	'<center><a href="exec:birthmonth = 5 & gs ''begin'', ''birthday''">May</a></center>'
-	'<center><a href="exec:birthmonth = 6 & gs ''begin'', ''birthday''">June</a></center>'
-	'<center><a href="exec:birthmonth = 7 & gs ''begin'', ''birthday''">July</a></center>'
-	'<center><a href="exec:birthmonth = 8 & gs ''begin'', ''birthday''">August</a></center>'
-	'<center><a href="exec:birthmonth = 9 & gs ''begin'', ''birthday''">September</a></center>'
-	'<center><a href="exec:birthmonth = 10 & gs ''begin'', ''birthday''">October</a></center>'
-	'<center><a href="exec:birthmonth = 11 & gs ''begin'', ''birthday''">November</a></center>'
-	'<center><a href="exec:birthmonth = 12 & gs ''begin'', ''birthday''">December</a></center>'
-
-	act'<center><b>Done</b></center>': $locM, $loc_argsM
+	'<center><a href="exec:birthday += 5 & gs ''intro_customization'', ''birthday''">+5 Days</a></center>'
+	'<center><a href="exec:birthday += 1 & gs ''intro_customization'', ''birthday''">+1 Day</a></center>'
+	'<center><a href="exec:birthday -= 1 & gs ''intro_customization'', ''birthday''">-1 Day</a></center>'
+	'<center><a href="exec:birthday -= 5 & gs ''intro_customization'', ''birthday''">-5 Days</a></center>'
+	'<center><a href="exec:birthmonth = 1 & gs ''intro_customization'', ''birthday''">January</a></center>'
+	'<center><a href="exec:birthmonth = 2 & gs ''intro_customization'', ''birthday''">February</a></center>'
+	'<center><a href="exec:birthmonth = 3 & gs ''intro_customization'', ''birthday''">March</a></center>'
+	'<center><a href="exec:birthmonth = 4 & gs ''intro_customization'', ''birthday''">April</a></center>'
+	'<center><a href="exec:birthmonth = 5 & gs ''intro_customization'', ''birthday''">May</a></center>'
+	'<center><a href="exec:birthmonth = 6 & gs ''intro_customization'', ''birthday''">June</a></center>'
+	'<center><a href="exec:birthmonth = 7 & gs ''intro_customization'', ''birthday''">July</a></center>'
+	'<center><a href="exec:birthmonth = 8 & gs ''intro_customization'', ''birthday''">August</a></center>'
+	'<center><a href="exec:birthmonth = 9 & gs ''intro_customization'', ''birthday''">September</a></center>'
+	'<center><a href="exec:birthmonth = 10 & gs ''intro_customization'', ''birthday''">October</a></center>'
+	'<center><a href="exec:birthmonth = 11 & gs ''intro_customization'', ''birthday''">November</a></center>'
+	'<center><a href="exec:birthmonth = 12 & gs ''intro_customization'', ''birthday''">December</a></center>'
+
+	act'<center><b>Done</b></center>': gt $locM, $locM_arg
 end
 
 --- intro_customization ---------------------------------

+ 10 - 16
locations/intro_initialization.qsrc

@@ -64,23 +64,12 @@ gs 'telefon', 'setup'
 
 VersionCheck = 5030
 
-if $start = 'city':
-	birthyear = year - age
-	birthmonth = 4
-	birthday = 1
-	pcs_dob = birthyear * 10000
-	pcs_dob += (birthmonth * 100)
-	pcs_dob += birthday
-else
-
-	pcs_dob = birthyear * 10000
-	pcs_dob += (birthmonth * 100)
-	pcs_dob += birthday
+pcs_dob = birthyear * 10000
+pcs_dob += (birthmonth * 100)
+pcs_dob += birthday
 
-	age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
-	if ((month * 100) + day) < pcs_dob mod 10000: age -= 1
-		
-end
+age = year - ((pcs_dob - (pcs_dob mod 10000)) / 10000)
+if ((month * 100) + day) < pcs_dob mod 10000: age -= 1
 
 if age < 17:
 	vidage = age
@@ -476,6 +465,11 @@ else
 	cyccustom = 1
 end
 
+!!re-initialize appearance to get correct values
+gs 'AppearanceSystem', 'UpdateBaseAppearnce'
+gs 'body', 'RegularUpdate'
+gs 'AppearanceSystem'
+
 pcs_horny = 0
 killvar 'opPRE'
 killvar 'tgs_skipinto'

+ 141 - 30
locations/intro_initialization_city.qsrc

@@ -93,22 +93,19 @@ nathcol = pcs_haircol
 pcs_pubecol = pcs_haircol & pcs_pubecol[1] = 1
 oldsavepcs_haircol = 1
 
-gs 'body_shape', 'initial'
+gs 'body', 'initial'
 
 !! Adding underwear and default shoes and assigning them
 
-if $ARGS[1] ! 'CSB' and goth_clothing ! 1:
-	cheap_panties[1] = 1
-	cheap_bras[1] = 1
-	$pantyworntype = 'cheap'
-	pantywornnumber = 1
-	$braworntype = 'cheap'
-	brawornnumber = 1
-	gm_shoe[6] = 1
-	danilovich_shoe[21] = 1
-	$shoeworntype = 'gm'
-	shoewornnumber = 6
-end
+cheap_panties[1] = 1
+cheap_bras[1] = 1
+$pantyworntype = 'cheap'
+pantywornnumber = 1
+$braworntype = 'cheap'
+brawornnumber = 1
+gm_shoe[6] = 1
+$shoeworntype = 'gm'
+shoewornnumber = 6
 
 !!	Starting clothing set
 cheap_panties[12] = 1
@@ -123,6 +120,7 @@ gm_outfits_b[30] = pcs_hips
 cats_dress[1] = 1
 cats_dress_h[1] = 100
 cats_dress_b[1] = pcs_hips
+
 if goth_clothing = 1:
 	kats_panties[28] = 1
 	kats_bras[28] = 1
@@ -132,27 +130,44 @@ if goth_clothing = 1:
 	brawornnumber = 28
 	danilovich_outfits[91] = 1
 	danilovich_outfits_h[91] = 100
-	danilovich_shoe[21] = 1
-	gm_shoe[9] = 1
 	shoewornnumber = 9
 	$shoeworntype = 'gm'
+	dolls_dress[7] = 1
+	dolls_dress_h[7] = 100
+	dolls_dress_b[7] = pcs_hips
+	dolls_shoe[1] = 1
+	bomba_dress[4] = 1
+	bomba_dress_h[4] = 100
+	bomba_dress_b[4] = pcs_hips
+	bomba_dress[23] = 1
+	bomba_dress_h[23] = 100
+	bomba_dress_b[23] = pcs_hips
 	bomba_outfits[16] = 1
 	bomba_outfits_h[16] = 100
 	bomba_outfits_b[16] = pcs_hips
-	bomba_outfits[37] = 1
-	bomba_outfits_h[37] = 100
-	bomba_outfits_b[37] = pcs_hips
+	bomba_outfits[31] = 1
+	bomba_outfits_h[31] = 100
+	bomba_outfits_b[31] = pcs_hips
 	sportsclothingnumber = 91
-	gs 'clothing', 'wear', 'bomba_outfits', 37
+	gs 'clothing', 'wear', 'bomba_dress', 4
 elseif pcs_inhib < 5:
 	gm_outfits[30] = 1
 	gm_outfits_h[30] = 100
 	gm_outfits_b[30] = pcs_hips
+	gm_outfits[2] = 1
+	gm_outfits_h[2] = 100
+	gm_outfits_b[2] = pcs_hips
+	gm_outfits[54] = 1
+	gm_outfits_h[54] = 100
+	gm_outfits_b[54] = pcs_hips
+	coco_outfits[5] = 1
+	coco_outfits_h[5] = 100
+	coco_outfits_b[5] = pcs_hips
 	danilovich_outfits[81] = 1
 	danilovich_outfits_h[81] = 100
-	cats_dress[1] = 1
-	cats_dress_h[1] = 100
-	cats_dress_b[1] = pcs_hips
+	cats_dress[14] = 1
+	cats_dress_h[14] = 100
+	cats_dress_b[14] = pcs_hips
 	sportsclothingnumber = 81
 	gs 'clothing', 'wear', 'cats_dress', 1
 elseif pcs_inhib < 10:
@@ -161,6 +176,15 @@ elseif pcs_inhib < 10:
 	gm_outfits_b[15] = pcs_hips
 	danilovich_outfits[76] = 1
 	danilovich_outfits_h[76] = 100
+	flamingos_outfits[9] = 1
+	flamingos_outfits_h[9] = 100
+	flamingos_outfits_b[9] = pcs_hips
+	nerdvana_outfits[38] = 1
+	nerdvana_outfits_h[38] = 100
+	nerdvana_outfits_b[38] = pcs_hips
+	gm_office[11] = 1
+	gm_office_h[11] = 100
+	gm_office_b[11] = pcs_hips
 	gm_dress[4] = 1
 	gm_dress_h[4] = 100
 	gm_dress_b[4] = pcs_hips
@@ -175,6 +199,15 @@ elseif pcs_inhib < 15:
 	gm_dress[7] = 1
 	gm_dress_h[7] = 100
 	gm_dress_b[7] = pcs_hips
+	gm_dress[16] = 1
+	gm_dress_h[16] = 100
+	gm_dress_b[16] = pcs_hips
+	dolls_outfits[12] = 1
+	dolls_outfits_h[12] = 100
+	dolls_outfits_b[12] = pcs_hips
+	dolls_outfits[3] = 1
+	dolls_outfits_h[3] = 100
+	dolls_outfits_b[3] = pcs_hips
 	sportsclothingnumber = 106
 	gs 'clothing', 'wear', 'gm_dress', 7
 elseif pcs_inhib < 20:
@@ -183,83 +216,155 @@ elseif pcs_inhib < 20:
 	gm_outfits_b[55] = pcs_hips
 	danilovich_outfits[102] = 1
 	danilovich_outfits_h[102] = 100
+	danilovich_outfits[64] = 1
+	danilovich_outfits_h[64] = 100
+	flamingos_dress[109] = 1
+	flamingos_dress_h[109] = 100
+	flamingos_dress_b[109] = pcs_hips
+	gm_outfits[99] = 1
+	gm_outfits_h[99] = 100
+	gm_outfits_b[99] = pcs_hips
 	gm_dress[7] = 1
 	gm_dress_h[7] = 100
 	gm_dress_b[7] = pcs_hips
 	sportsclothingnumber = 43
-	gs 'clothing', 'wear', 'gm_dress', 7
+	gs 'clothing', 'wear', 'gm_outfits', 99
 elseif pcs_inhib < 25:
 	gm_outfits[58] = 1
 	gm_outfits_h[58] = 100
 	gm_outfits_b[58] = pcs_hips
+	gm_outfits[181] = 1
+	gm_outfits_h[181] = 100
+	gm_outfits_b[181] = pcs_hips
+	bomba_outfits[1] = 1
+	bomba_outfits_h[1] = 100
+	bomba_outfits_b[1] = pcs_hips
+	flamingos_dress[59] = 1
+	flamingos_dress_h[59] = 100
+	flamingos_dress_b[59] = pcs_hips
 	danilovich_outfits[87] = 1
 	danilovich_outfits_h[87] = 100
 	gm_dress[39] = 1
 	gm_dress_h[39] = 100
 	gm_dress_b[39] = pcs_hips
 	sportsclothingnumber = 1
-	gs 'clothing', 'wear', 'gm_dress', 39
+	gs 'clothing', 'wear', 'flamingos_dress', 59
 elseif pcs_inhib < 30:
 	gm_outfits[91] = 1
 	gm_outfits_h[91] = 100
 	gm_outfits_b[91] = pcs_hips
 	danilovich_outfits[96] = 1
 	danilovich_outfits_h[96] = 100
+	flamingos_dress[89] = 1
+	flamingos_dress_h[89] = 100
+	flamingos_dress_b[89] = pcs_hips
+	fashionista_outfits[17] = 1
+	fashionista_outfits_h[17] = 100
+	fashionista_outfits_b[17] = pcs_hips
+	scandalicious_dress[2] = 1
+	scandalicious_dress_h[2] = 100
+	scandalicious_dress_b[2] = pcs_hips
 	gm_dress[57] = 1
 	gm_dress_h[57] = 100
 	gm_dress_b[57] = pcs_hips
 	sportsclothingnumber = 48
-	gs 'clothing', 'wear', 'gm_dress', 57
+	gs 'clothing', 'wear', 'flamingos_dress', 89
 elseif pcs_inhib < 35:
 	gm_outfits[95] = 1
 	gm_outfits_h[95] = 100
 	gm_outfits_b[95] = pcs_hips
 	danilovich_outfits[48] = 1
 	danilovich_outfits_h[48] = 100
+	scandalicious_dress[18] = 1
+	scandalicious_dress_h[18] = 100
+	scandalicious_dress_b[18] = pcs_hips
+	dolls_outfits[36] = 1
+	dolls_outfits_h[36] = 100
+	dolls_outfits_b[36] = pcs_hips
+	cats_dress[67] = 1
+	cats_dress_h[67] = 100
+	cats_dress_b[67] = pcs_hips
 	gm_dress[63] = 1
 	gm_dress_h[63] = 100
 	gm_dress_b[63] = pcs_hips
 	sportsclothingnumber = 40
-	gs 'clothing', 'wear', 'gm_dress', 63
+	gs 'clothing', 'wear', 'dolls_outfits', 36
 elseif pcs_inhib < 40:
 	gm_outfits[124] = 1
 	gm_outfits_h[124] = 100
 	gm_outfits_b[124] = pcs_hips
 	danilovich_outfits[45] = 1
 	danilovich_outfits_h[45] = 100
+	scandalicious_dress[45] = 1
+	scandalicious_dress_h[45] = 100
+	scandalicious_dress_b[45] = pcs_hips
+	cats_dress[203] = 1
+	cats_dress_h[203] = 100
+	cats_dress_b[203] = pcs_hips
+	cats_outfits[196] = 1
+	cats_outfits_h[196] = 100
+	cats_outfits_b[196] = pcs_hips
 	gm_dress[89] = 1
 	gm_dress_h[89] = 100
 	gm_dress_b[89] = pcs_hips
 	sportsclothingnumber = 45
-	gs 'clothing', 'wear', 'gm_dress', 89
+	gs 'clothing', 'wear', 'cats_dress', 203
 elseif pcs_inhib < 45:
 	gm_outfits[131] = 1
 	gm_outfits_h[131] = 100
 	gm_outfits_b[131] = pcs_hips
 	danilovich_outfits[38] = 1
 	danilovich_outfits_h[38] = 100
+	scandalicious_dress[7] = 1
+	scandalicious_dress_h[7] = 100
+	scandalicious_dress_b[7] = pcs_hips
+	market_outfits[2] = 1
+	market_outfits_h[2] = 40
+	market_outfits_b[2] = pcs_hips
+	cats_dress[219] = 1
+	cats_dress_h[219] = 100
+	cats_dress_b[219] = pcs_hips
 	gm_dress[109] = 1
 	gm_dress_h[109] = 100
 	gm_dress_b[109] = pcs_hips
 	sportsclothingnumber = 38
-	gs 'clothing', 'wear', 'gm_dress', 109
+	gs 'clothing', 'wear', 'market_outfits', 2
 elseif pcs_inhib < 50:
 	gm_outfits[145] = 1
 	gm_outfits_h[145] = 100
 	gm_outfits_b[145] = pcs_hips
 	danilovich_outfits[17] = 1
 	danilovich_outfits_h[17] = 100
+	scandalicious_dress[96] = 1
+	scandalicious_dress_h[96] = 100
+	scandalicious_dress_b[96] = pcs_hips
+	market_outfits[10] = 1
+	market_outfits_h[10] = 40
+	market_outfits_b[10] = pcs_hips
+	nerdvana_outfits[60] = 1
+	nerdvana_outfits_h[60] = 100
+	nerdvana_outfits_b[60] = pcs_hips
 	gm_dress[123] = 1
 	gm_dress_h[123] = 100
 	gm_dress_b[123] = pcs_hips
 	sportsclothingnumber = 143
-	gs 'clothing', 'wear', 'gm_dress', 123
+	gs 'clothing', 'wear', 'scandalicious_dress', 96
 else
 	gm_outfits[149] = 1
 	gm_outfits_h[149] = 100
 	gm_outfits_b[149] = pcs_hips
 	danilovich_outfits[15] = 1
 	danilovich_outfits_h[15] = 100
+	scandalicious_dress[46] = 1
+	scandalicious_dress_h[46] = 100
+	scandalicious_dress_b[46] = pcs_hips
+	scandalicious_outfits[16] = 1
+	scandalicious_outfits_h[16] = 100
+	scandalicious_outfits_b[16] = pcs_hips
+	market_outfits[12] = 1
+	market_outfits_h[12] = 40
+	market_outfits_b[12] = pcs_hips
+	market_outfits
 	gm_dress[149] = 1
 	gm_dress_h[149] = 100
 	gm_dress_b[149] = pcs_hips
@@ -267,8 +372,9 @@ else
 	scandalicious_bikinis_h[55] = 60
 	scandalicious_bikinis_b[55] = pcs_hips
 	sportsclothingnumber = 15
-	gs 'clothing', 'wear', 'gm_dress', 149
+	gs 'clothing', 'wear', 'scandalicious_dress', 46
 end
+
 if swim_start = 99:
 	allure_swimsuit[99] = 1
 	allure_swimsuit_h[99] = 60
@@ -372,6 +478,11 @@ else
 	cyccustom = 1
 end
 
+!!re-initialize appearance to get correct values
+gs 'AppearanceSystem', 'UpdateBaseAppearnce'
+gs 'body', 'RegularUpdate'
+gs 'AppearanceSystem'
+
 pcs_horny = 0
 killvar 'opPRE'
 killvar 'tgs_skipinto'

+ 9 - 5
locations/intro_sg.qsrc

@@ -1,8 +1,9 @@
 # intro_sg
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
+$start_type = 'sg'
+$start_type[1] = 'nomagic'
 
 if $ARGS[0] = 'start':
 	menu_off = 1
@@ -20,6 +21,8 @@ if $ARGS[0] = 'Two':
 end
 
 if $ARGS[0] = 'Three':
+	$loc = 'intro_sg'
+	$loc_arg = 'four'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_7.jpg"></center>'
 	'Like it does for most girls, you reached the milestone of puberty when you were 13 years old. You had your first period, which sucked... but that was just the start of your changes.'
 	*nl
@@ -30,10 +33,8 @@ if $ARGS[0] = 'Three':
 end
 
 if $ARGS[0] = 'four':
-	gs 'intro_sg_select', 'sg_settings'
-	gs 'intro_initialization'
 	$loc = 'intro_sg'
-	$loc_args = 'four'
+	$loc_arg = 'four'
 
 
 	'<center><b><font color = maroon>Character Face</font></b></center>'
@@ -47,6 +48,9 @@ if $ARGS[0] = 'four':
 end
 
 if $ARGS[0] = 'five':
+	gs 'intro_sg_select', 'sg_settings'
+	gs 'intro_initialization'
+	MagikDostup = 1
 	showstat 1
 	showobjs 1
 	gs 'obj_din', 'old'

+ 3 - 3
locations/intro_sg_m.qsrc

@@ -1,8 +1,8 @@
 # intro_sg_m
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
+$start_type = 'sg_m'
 
 if $ARGS[0] = 'four':
 	*clr & cla
@@ -134,7 +134,7 @@ if $ARGS[0] = 'six':
 	*clr & cla				
 	hour = 18
 	$loc = 'intro_sg_m'
-	$loc_args = 'six'
+	$loc_arg = 'six'
 	'<center><b><font color = maroon>Character Face</font></b></center>'
 	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/character_creation_2.jpg"></center>'

+ 131 - 237
locations/intro_sg_select.qsrc

@@ -1,7 +1,6 @@
 # intro_sg_select
 
 if $ARGS[0] = 'start':
-	StoryLine = 1
 	ml_update_1 = 1
 	birthyear = 1999
 	yearlefttemp = 1
@@ -15,27 +14,26 @@ if $ARGS[0] = 'start':
 
 !!	Body
 	pcs_hgt = 170
-	salo = 80
 	dick = 0
 	pcs_energy = 60
 	pcs_hydra = 60
 	pcs_sleep = 70
 !!	Stats
-	pcs_stren = 30
+	pcs_stren = 25
 	strenbuf = 10
-	pcs_agil = 30
+	pcs_agil = 25
 	agilbuf = 10
-	pcs_vital = 30
+	pcs_vital = 25
 	vitalbuf = 10
-	pcs_intel = 30
-	pcs_sprt = 30
-	pcs_react = 30
-	pcs_chrsm = 30
-	pcs_prcptn = 30
+	pcs_intel = 25
+	pcs_sprt = 25
+	pcs_react = 25
+	pcs_chrsm = 25
+	pcs_prcptn = 25
 	pcs_magik = 0
 
 	pcs_heels = 5
-	pcs_makupskl = 20
+	pcs_makupskl = 10
 	pcs_pubes = 30
 	pcs_leghair = 12
 	pcs_makeup = 1
@@ -99,11 +97,13 @@ if $ARGS[0] = 'start':
 	*nl
 	'Your <<$npc_usedname[''A30'']>> lives in the same building as you do, though you rarely see her except when you pass her in the stairwell. She is your mother''s sister. <<$npc_usedname[''A54'']>>, as everyone calls him, is best friends with your stepfather. <<$npc_firstname[''A11'']>> <<$npc_lastname[''A11'']>>, your childhood friend, is the same age as you and grew up living in the same apartment building on the floor above yours. His father, <<$npc_firstname[''A112'']>>, is an old friend of your mother.'
 
-	act 'Re-enter name/s': gt 'intro_sg_select', 'SGStart'
+	act 'Re-enter name/s': gt 'intro_sg_select', 'start'
 	act 'Continue':	gt 'intro_sg_select', 'SGStart2'
 end
 
 if $ARGS[0] = 'SGStart2':
+	$locM = 'intro_sg_select'
+	$locM_arg = 'SGStart2'
 !!make sure this image shows up above the text that shows your birthday
 	!date_toggle = args[1]
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_2.jpg"></center>'
@@ -117,11 +117,8 @@ if $ARGS[0] = 'SGStart2':
 		$startdob = 'Your birthday: <B><<birthmonth>>/<<birthday>>/<<birthyear>></B> (MM/DD/YYYY)'
 	end
 
-	if player_avatar = 0:
-		'<a href="exec:gt ''begin'', ''birthday''"><<$startdob>></a>.'
-	else
-		'<<$startdob>>'
-	end
+	'<a href="exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
+
 	act 'Confirm':
 		cls
 		'<center><img <<$set_imgh>> src="images/system/1_openings/shared/pre_3.jpg"></center>'
@@ -416,6 +413,10 @@ if $ARGS[0] = 'nerd':
 		pcs_lip = 1
 		pcs_lashes = 0
 	end
+	pcs_intel = 40
+	pcs_compskl = 20
+	pcs_chess = 20
+	pcs_gaming = 20
 	pcs_skin = 20
 	pcs_inhib = 10
 	pcs_heels = 10
@@ -426,10 +427,11 @@ if $ARGS[0] = 'nerd':
 	npc_rel['A29'] += 10
 	grupvalue[1] = 200
 	grupvalue[2] = 100
-	grupvalue[3] = 700
+	grupvalue[3] = 800
 	grupvalue[4] = 100
 	grupvalue[6] = 600
-	genbsize = 22
+	genbsize = 13 
+!!b cup for ideal bmi
 	traits['nerd_points'] = 60
 	traits['nerd_status'] = 2
 	traits['nerd_lernHome'] = 5
@@ -443,12 +445,11 @@ if $ARGS[0] = 'nerdqueen':
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 8
-		pcs_intel = 40
 		pcs_chrsm = 40
 		pcs_sprt = 40
 		pcs_icesktng = 10
-		pcs_humint = 10
-		pcs_persuas = 10
+		pcs_humint = 20
+		pcs_persuas = 20
 		pcs_makupskl = 30
 		pcs_inhib = 20
 		pcs_heels = 25
@@ -462,7 +463,7 @@ if $ARGS[0] = 'nerdqueen':
 		npc_rel['A18'] = 1
 !!make sure this coming after the gs code above will still set christina to a 1 relationship, if I did this code correctly, if not look for this code in other spots and fix it pls
 		grupvalue[1] = 300
-		grupvalue[3] = 800
+		grupvalue[3] = 900
 		grupvalue[6] = 700
 		kosmetica = 10
 		stanok = 10
@@ -472,30 +473,25 @@ if $ARGS[0] = 'nerdqueen':
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 50
-		genbsize = 17
+		pcs_skin = 400
+		genbsize = 22
+!!d cup for ideal bmi
 		salo = 87
 		willpowermax = 90
-		gs 'grades', 'grade_award', 'school', 'math', 75
+		gs 'grades', 'grade_award', 'school', 'math', 85
 		gs 'grades', 'grade_award', 'school', 'rus', 90
 		gs 'grades', 'grade_award', 'school', 'lit', 80
 		gs 'grades', 'grade_award', 'school', 'art', 75
-		gs 'grades', 'grade_award', 'school', 'bio', 75
-		gs 'grades', 'grade_award', 'school', 'pe', 70
-		gs 'grades', 'grade_award', 'school', 'eng', 80
-		gs 'grades', 'grade_award', 'school', 'geo', 75
-		gs 'grades', 'grade_award', 'school', 'sci', 75
+		gs 'grades', 'grade_award', 'school', 'bio', 80
+		gs 'grades', 'grade_award', 'school', 'pe', 60
+		gs 'grades', 'grade_award', 'school', 'eng', 85
+		gs 'grades', 'grade_award', 'school', 'geo', 80
+		gs 'grades', 'grade_award', 'school', 'sci', 80
 		gs 'grades', 'grade_award', 'school', 'shop', 55
-		gs 'grades', 'grade_award', 'school', 'comp', 75
+		gs 'grades', 'grade_award', 'school', 'comp', 80
 		gs 'grades', 'grade_award', 'school', 'mus', 75
-		gs 'grades', 'grade_award', 'school', 'his', 75
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gs 'grades', 'grade_award', 'school', 'his', 80
+		gt $loc, $loc_arg
 	end
 end
 
@@ -514,9 +510,11 @@ if $ARGS[0] = 'goodstudent':
 		pcs_instrmusic = 10
 		pcs_artskls = 10
 		money += 2000
-		pcs_skin = 20
-		salo = 115
-		grupvalue[3] = 750
+		pcs_skin = 200
+		salo = 108
+		genbsize = 18
+!!c cup for ideal bmi
+		grupvalue[3] = 850
 		grupvalue[6] = 700
 		gs 'npc_relationship', 'socialgroup_setting', 0, 0, 5, 0, 0, 0
 		npc_rel['A29'] += 20
@@ -535,13 +533,7 @@ if $ARGS[0] = 'goodstudent':
 		gs 'grades', 'grade_award', 'school', 'comp', 90
 		gs 'grades', 'grade_award', 'school', 'mus', 90
 		gs 'grades', 'grade_award', 'school', 'his', 90
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -554,13 +546,13 @@ if $ARGS[0] = 'computergeek':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 10
 		if glass < 1 : glass = 1
-		pcs_intel = 55
+		pcs_intel = 45
 		pcs_compskl = 40
 		pcs_comphckng = 20
 		pcs_gaming = 30
 		internet = 20
-		pcs_skin = 30
-		salo = 38
+		pcs_skin = 200
+		salo = 33
 		pcs_inhib = 20
 		npc_rel['A152'] += 10
 		npc_rel['A153'] += 10
@@ -582,13 +574,7 @@ if $ARGS[0] = 'computergeek':
 		gs 'grades', 'grade_award', 'school', 'comp', 95
 		gs 'grades', 'grade_award', 'school', 'mus', 85
 		gs 'grades', 'grade_award', 'school', 'his', 85
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -600,12 +586,12 @@ if $ARGS[0] = 'chessplayer':
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'nerd'
 		alterstrtimg = 11
-		pcs_intel = 55
+		pcs_intel = 45
 		pcs_prcptn = 40
 		pcs_react = 40
 		pcs_chess = 40
-		pcs_skin = 35
-		salo = 120
+		pcs_skin = 250
+		salo = 105
 		pcs_inhib = 15
 		chessyear = year
 		chessmonth = month
@@ -625,13 +611,7 @@ if $ARGS[0] = 'chessplayer':
 		gs 'grades', 'grade_award', 'school', 'comp', 85
 		gs 'grades', 'grade_award', 'school', 'mus', 80
 		gs 'grades', 'grade_award', 'school', 'his', 85
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -641,7 +621,9 @@ if $ARGS[0] = 'jock':
 	pcs_vital = 40
 	pcs_react = 40
 	pcs_agil = 40
-	genbsize = 17
+	genbsize = 12
+!!b cup for ideal bmi
+	pcs_skin = 400
 	kosmetica = 10
 	stanok = 10
 	shampoo = 20
@@ -664,7 +646,7 @@ if $ARGS[0] = 'jock':
 	fashionista_purses[11] = 1
 	bag = 1
 	grupvalue[1] = 400
-	grupvalue[2] = 700
+	grupvalue[2] = 800
 	grupvalue[3] = 100
 	grupvalue[4] = 300
 	grupvalue[6] = 200
@@ -694,12 +676,11 @@ if $ARGS[0] = 'volleyball':
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 12
-		pcs_react = 50
-		pcs_vital = 50
-		pcs_stren = 45
-		pcs_agil = 50
-		pcs_skin = 50
-		salo = 68
+		pcs_react = 45
+		pcs_agil = 45
+		genbsize = 17
+!!c cup for ideal bmi
+		salo = 80
 		pcs_vball = 50
 		gsAboVolley += 30
 		npc_rel['A13'] += 10
@@ -719,13 +700,7 @@ if $ARGS[0] = 'volleyball':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -740,23 +715,19 @@ if $ARGS[0] = 'dancer':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 13
 		pcs_sprt = 45
-		pcs_vital = 50
-		pcs_react = 50
-		pcs_agil = 55
+		pcs_agil = 50
 		pcs_chrsm = 35
 		pcs_perform = 35
 		pcs_makupskl = 40
-		pcs_skin = 80
+		pcs_skin = 500
 		pcs_tan = 5
-		salo = 50
-		genbsize = 12
+		salo = 60
 		if player_avatar = 0:
 			pcs_hairlng = 200
 			pcs_eyesize = 2
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 60
 		pcs_danc = 50
 		pcs_heels = 30
 		pcs_inhib = 25
@@ -781,13 +752,7 @@ if $ARGS[0] = 'dancer':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 80
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -799,13 +764,10 @@ if $ARGS[0] = 'runner':
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 14
-		pcs_vital = 60
+		pcs_vital = 50
 		pcs_agil = 50
-		pcs_stren = 45
 		pcs_inhib = 25
-		salo = 58
-		pcs_skin = 40
-		genbsize = 12
+		salo = 60
 		pcs_run = 50
 		gsAboBeg += 30
 		npc_rel['A3'] += 10
@@ -813,7 +775,7 @@ if $ARGS[0] = 'runner':
 		npc_rel['A8'] += 5
 		npc_rel['A18'] = 1
 		npc_rel['A131'] += 10
-		grupvalue[2] = 750
+		grupvalue[2] = 850
 		willpowermax = 140
 		school_clothing = 7
 		gs 'grades', 'grade_award', 'school', 'math', 55
@@ -829,13 +791,7 @@ if $ARGS[0] = 'runner':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -847,17 +803,18 @@ if $ARGS[0] = 'football':
 	act 'Confirm this option':
 		gs 'intro_sg_select', 'jock'
 		alterstrtimg = 15
-		pcs_stren = 50
-		pcs_react = 50
-		pcs_vital = 50
+		pcs_stren = 45
+		pcs_react = 45
+		pcs_vital = 45
 		salo = 80
-		pcs_skin = 50
+		genbsize = 17
+!!c cup for ideal bmi
 		pcs_kick = 20
 		pcs_ftbll = 50
 		npc_rel['A131'] += 10
 		npc_rel['A149'] += 10
 		npc_rel['A34'] += 10
-		grupvalue[2] = 800
+		grupvalue[2] = 900
 		willpowermax = 140
 		$currentpursetype = 'fashionista'
 		currentpursenumber = 11
@@ -877,13 +834,7 @@ if $ARGS[0] = 'football':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -901,7 +852,7 @@ if $ARGS[0] = 'cool':
 	stanok = 20
 	tampon = 20
 	money += 1000
-	grupvalue[1] = 700
+	grupvalue[1] = 800
 	grupvalue[2] = 300
 	grupvalue[3] = 100
 	grupvalue[4] = 200
@@ -918,7 +869,7 @@ if $ARGS[0] = 'cool':
 		pcs_lip = 2
 		pcs_lashes = 1
 	end
-	pcs_skin = 50
+	pcs_skin = 500
 	pcs_tan = 5
 	npc_rel['A33'] += 10
 	grupTipe=1
@@ -933,9 +884,10 @@ if $ARGS[0] = 'socialite':
 		gs 'intro_sg_select', 'cool'
 		alterstrtimg = 16
 		pcs_chrsm = 45
-		genbsize = 32
+		genbsize = 18
+!!c cup for ideal bmi
 		pcs_humint = 40
-		pcs_makupskl = 35
+		pcs_makupskl = 40
 		pcs_heels = 30
 		pcs_perform = 20
 		pirsC = 1
@@ -947,7 +899,7 @@ if $ARGS[0] = 'socialite':
 		school_clothing = 6
 		if player_avatar ! 1: pcs_hairlng = 200
 		npc_rel['A140'] += 10
-		salo = 68
+		salo = 80
 		willpowermax = 110
 		gs 'grades', 'grade_award', 'school', 'math', 65
 		gs 'grades', 'grade_award', 'school', 'rus', 90
@@ -962,13 +914,7 @@ if $ARGS[0] = 'socialite':
 		gs 'grades', 'grade_award', 'school', 'comp', 65
 		gs 'grades', 'grade_award', 'school', 'mus', 65
 		gs 'grades', 'grade_award', 'school', 'his', 65
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -990,9 +936,10 @@ if $ARGS[0] = 'beautiful':
 			pcs_lashes = 2
 		end
 		school_clothing = 6
-		pcs_skin = 70
+		pcs_skin = 600
 		pcs_tan = 50
-		genbsize = 37
+		genbsize = 22
+!!d cup for ideal bmi
 		pcs_inhib = 25
 		kosmetica = 50
 		falselashesplain = 10
@@ -1008,8 +955,8 @@ if $ARGS[0] = 'beautiful':
 		pirsC = 2
 		PirsC2_owned = 1
 		gs 'npc_relationship', 'socialgroup_setting_boys', 10, 10, 10, 10, 10, 0
-		salo = 63
-		grupvalue[1] = 800
+		salo = 80
+		grupvalue[1] = 900
 		grupvalue[4] = 300
 		gs 'fame', 'pav', 'sex', 20
 		willpowermax = 110
@@ -1026,13 +973,7 @@ if $ARGS[0] = 'beautiful':
 		gs 'grades', 'grade_award', 'school', 'comp', 60
 		gs 'grades', 'grade_award', 'school', 'mus', 60
 		gs 'grades', 'grade_award', 'school', 'his', 60
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1042,7 +983,8 @@ if $ARGS[0] = 'gopnik':
 	pcs_vital = 35
 	pcs_react = 35
 	pcs_agil = 35
-	genbsize = 22
+	genbsize = 13
+!!b cup for ideal bmi
 	pcs_inhib = 25
 	pcs_heels = 10
 	pcs_makupskl = 25
@@ -1056,7 +998,7 @@ if $ARGS[0] = 'gopnik':
 	grupvalue[1] = 100
 	grupvalue[2] = 300
 	grupvalue[3] = 100
-	grupvalue[4] = 700
+	grupvalue[4] = 800
 	grupvalue[6] = 100
 	gs 'npc_relationship', 'socialgroup_setting', 0, 0, -10, 25, 0, 0
 	npc_rel['A129'] -= 30
@@ -1073,7 +1015,7 @@ if $ARGS[0] = 'gopnik':
 		pcs_lip = 2
 		pcs_lashes = 1
 	end
-	pcs_skin = 40
+	pcs_skin = 400
 	pcs_vag = 1
 	pcs_throat = 1
 	stat['hj'] = 10
@@ -1099,7 +1041,7 @@ if $ARGS[0] = 'gopnikstart':
 		pcs_punch = 35
 		pcs_kick = 35
 		pcs_def = 35
-		salo = 80
+		salo = 100
 		school_clothing = 5
 		npc_rel['A9'] += 10
 		npc_rel['A10'] += 10
@@ -1111,7 +1053,7 @@ if $ARGS[0] = 'gopnikstart':
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
 		npc_rel['A34'] -= 10
-		grupvalue[4] = 800
+		grupvalue[4] = 900
 		willpowermax = 130
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1126,13 +1068,7 @@ if $ARGS[0] = 'gopnikstart':
 		gs 'grades', 'grade_award', 'school', 'comp', 25
 		gs 'grades', 'grade_award', 'school', 'mus', 25
 		gs 'grades', 'grade_award', 'school', 'his', 25
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1153,8 +1089,7 @@ if $ARGS[0] = 'troublemaker':
 		pcs_def = 20
 		pcs_humint = 10
 		pcs_persuas = 10
-		pcs_skin = 40
-		salo = 75
+		salo = 65
 		pirsD = 4
 		PirsD4_owned = 1
 		$currentpursetype = 'dolls'
@@ -1174,7 +1109,6 @@ if $ARGS[0] = 'troublemaker':
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
 		npc_rel['A34'] -= 10
-		grupvalue[4] = 750
 		willpowermax = 120
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1189,13 +1123,7 @@ if $ARGS[0] = 'troublemaker':
 		gs 'grades', 'grade_award', 'school', 'comp', 25
 		gs 'grades', 'grade_award', 'school', 'mus', 25
 		gs 'grades', 'grade_award', 'school', 'his', 25
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1216,6 +1144,7 @@ if $ARGS[0] = 'vitekgf':
 		pcs_agil = 30
 		pcs_chrsm = 40
 		genbsize = 32
+!!e cup for ideal bmi
 		pcs_humint = 20
 		pcs_makupskl = 30
 		pcs_heels = 30
@@ -1236,14 +1165,14 @@ if $ARGS[0] = 'vitekgf':
 		npc_rel['A28'] -= 10
 		npc_rel['A29'] -= 20
 		npc_rel['A33'] -= 10
-		grupvalue[4] = 600
+		grupvalue[4] = 700
 		if player_avatar = 0:
 			pcs_hairlng = 200
 			pcs_eyesize = 2
 			pcs_lip = 2
 			pcs_lashes = 1
 		end
-		pcs_skin = 50
+		pcs_skin = 500
 		pcs_tan = 5
 		pcs_vag = 1
 		pcs_throat = 1
@@ -1271,13 +1200,7 @@ if $ARGS[0] = 'vitekgf':
 		vitekvisit = 5
 		npc_sex['A9'] += 5
 		willpowermax = 100
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1300,7 +1223,9 @@ if $ARGS[0] = 'alternative':
 		pcs_vital = 40
 		pcs_agil = 40
 		pcs_react = 40
-		salo = 50
+		genbsize = 18
+!!c cup for ideal bmi
+		salo = 75
 		pcs_chrsm = 35
 		pcs_humint = 20
 		pcs_persuas = 10
@@ -1323,7 +1248,7 @@ if $ARGS[0] = 'alternative':
 			pcs_lashes = 1
 		end
 		school_clothing = 4
-		pcs_skin = 60
+		pcs_skin = 500
 		pcs_tan = 5
 		pcs_inhib = 35
 		pcs_vag = 1
@@ -1348,8 +1273,7 @@ if $ARGS[0] = 'alternative':
 		npc_rel['A28'] -= 10
 		npc_rel['A29'] -= 10
 		npc_rel['A33'] += 10
-		grupvalue[1] = 200
-		grupvalue[2] = 400
+		grupvalue[1] = 300
 		willpowermax = 120
 		gs 'grades', 'grade_award', 'school', 'math', 25
 		gs 'grades', 'grade_award', 'school', 'rus', 25
@@ -1364,18 +1288,11 @@ if $ARGS[0] = 'alternative':
 		gs 'grades', 'grade_award', 'school', 'comp', 25
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 25
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
 if $ARGS[0] = 'outcast':
-	pcs_prcptn = 35
 	pcs_inhib = 10
 	pcs_makupskl = 0
 	grupvalue[1] = 100
@@ -1411,10 +1328,11 @@ if $ARGS[0] = 'friendless':
 		gs 'intro_sg_select', 'outcast'
 		gs 'npc_relationship', 'socialgroup_setting', -10, -10, -10, -10, -10, 0
 		alterstrtimg = 22
-		genbsize = 17
+		genbsize = 12
+!!b cup for ideal bmi
 		pcs_chrsm = 20
 		pcs_observ = 20
-		pcs_skin = 10
+		pcs_skin = 100
 		pcs_makupskl = 10
 		npc_rel['A11'] -= 20
 		grupvalue[1] = 50
@@ -1434,13 +1352,7 @@ if $ARGS[0] = 'friendless':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1458,7 +1370,8 @@ if $ARGS[0] = 'uglyduckling':
 		uglyduck_flag = 1
 		alterstrtimg = 23
 		if glass < 1 : glass = 1
-		genbsize = 2
+		genbsize = 28
+!!e cup for ideal bmi
 		pcs_inhib = 5
 		pcs_skin = 1
 		if player_avatar = 0:
@@ -1482,13 +1395,7 @@ if $ARGS[0] = 'uglyduckling':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1515,7 +1422,7 @@ if $ARGS[0] = 'goodgirl':
 		pcs_makupskl = 10
 		money += 1000
 		shampoo = 10
-		pcs_skin = 30
+		pcs_skin = 200
 		$currentpursetype = 'gm'
 		currentpursenumber = 6
 		dolls_purses[6] = 1
@@ -1528,7 +1435,8 @@ if $ARGS[0] = 'goodgirl':
 		end
 		school_clothing = 3
 		salo = 48
-		genbsize = 17
+		genbsize = 13
+!!b cup for ideal bmi
 		willpowermax = 150
 		gs 'grades', 'grade_award', 'school', 'math', 80
 		gs 'grades', 'grade_award', 'school', 'rus', 80
@@ -1543,13 +1451,7 @@ if $ARGS[0] = 'goodgirl':
 		gs 'grades', 'grade_award', 'school', 'comp', 80
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 80
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1582,9 +1484,11 @@ if $ARGS[0] = 'slut':
 		grupvalue[3] = 50
 		grupvalue[4] = 100
 		alterstrtimg = 25
-		pcs_makupskl = 50
+		pcs_makupskl = 30
+		pcs_danc = 20
 		pcs_heels = 50
-		genbsize = 32
+		genbsize = 22
+!!d cup for ideal bmi
 		kosmetica = 30
 		falselashesplain = 20
 		$currentpursetype = 'cats'
@@ -1608,7 +1512,7 @@ if $ARGS[0] = 'slut':
 		end
 		school_clothing = 2
 		pcs_perform = 20
-		pcs_skin = 60
+		pcs_skin = 400
 		pcs_tan = 20
 		pcs_vag = 10
 		pcs_ass = 10
@@ -1648,13 +1552,7 @@ if $ARGS[0] = 'slut':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -1677,17 +1575,19 @@ if $ARGS[0] = 'goth':
 		npc_rel['A155'] += 5
 		grupvalue[4] = 300
         alterstrtimg = 28
-		genbsize = 17
-		salo = 45
+		genbsize = 13
+!!b cup for ideal bmi
+		salo = 55
 		pcs_chrsm = 35
 		pcs_intel = 35
 		pcs_sprt = 45
 		pcs_observ = 5
 		pcs_heels = 30
 		pcs_makupskl = 50
-		pcs_artskls = 10
+		pcs_danc = 10
+		pcs_artskls = 20
 		pcs_sewng = 20
-		pcs_skin = 50
+		pcs_skin = 500
 	    pcs_inhib = 25
 		willpowermax = 100
 		if player_avatar = 0:
@@ -1720,13 +1620,7 @@ if $ARGS[0] = 'goth':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 80
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if $start_type = 'sg':
-			gt 'intro_sg', 'four'
-		elseif $start_type = 'sg_m':
-			gt 'intro_sg_m', 'four'
-		else
-			gt 'intro_sg_tg', 'four'
-		end
+		gt $loc, $loc_arg
 	end
 end
 

+ 9 - 15
locations/intro_sg_select_custom.qsrc

@@ -34,13 +34,7 @@ if $ARGS[0] = 'start':
 		gs 'grades', 'grade_award', 'school', 'comp', 55
 		gs 'grades', 'grade_award', 'school', 'mus', 55
 		gs 'grades', 'grade_award', 'school', 'his', 55
-		if start = 1:
-			gt 'intro_sg', 'four'
-		elseif start = 2:
-			gt 'intro_sg_m', 'start'
-		else
-			gt 'intro_tg', 'start'
-		end
+		gt $loc, $loc_arg
 	end
 end
 
@@ -280,11 +274,11 @@ end
 if $ARGS[0] = 'modrel_setup':
 	if npc_rel['<<$ARGS[1]>>'] < 0: npc_rel['<<$ARGS[1]>>'] = 0
 	if npc_rel['<<$ARGS[1]>>'] > 100: npc_rel['<<$ARGS[1]>>'] = 100
-	'<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''intro_sg_select_custom'', $loc_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''intro_sg_select_custom'', $loc_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''intro_sg_select_custom'', $loc_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''intro_sg_select_custom'', $loc_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''intro_sg_select_custom'', $loc_arg">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''intro_sg_select_custom'', $loc_arg">100</a></TD>'
+	'<TR bgcolor=#ffffff><TD><<$npc_firstname[''<<$ARGS[1]>>'']>> <<$npc_lastname[''<<$ARGS[1]>>'']>>: <<npc_rel[''<<$ARGS[1]>>'']>></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 0 & gt ''intro_sg_select_custom'', $locM_arg">zero</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 10 & gt ''intro_sg_select_custom'', $locM_arg">minus 10</a></TD><TD bgcolor=#ff9999><a href="exec:npc_rel[''<<$ARGS[1]>>''] -= 5 & gt ''intro_sg_select_custom'', $locM_arg">minus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 5 & gt ''intro_sg_select_custom'', $locM_arg">plus 5</a></TD><TD bgcolor=#99ff99><a href="exec:npc_rel[''<<$ARGS[1]>>''] += 10 & gt ''intro_sg_select_custom'', $locM_arg">plus 10</a></TD><TD><a href="exec:npc_rel[''<<$ARGS[1]>>''] = 100 & gt ''intro_sg_select_custom'', $locM_arg">100</a></TD>'
 end
 
 if $ARGS[0] = 'modrel_pop':
-	$loc_arg = 'modrel_pop'
+	$locM_arg = 'modrel_pop'
 	'<center><b>Popular kids relationship levels</b></center>'
 	*nl
 	*nl
@@ -308,7 +302,7 @@ if $ARGS[0] = 'modrel_pop':
 end
 
 if $ARGS[0] = 'modrel_ath':
-	$loc_arg = 'modrel_ath'
+	$locM_arg = 'modrel_ath'
 	'<center><b>Jocks relationship levels</b></center>'
 	*nl
 	*nl
@@ -330,7 +324,7 @@ if $ARGS[0] = 'modrel_ath':
 end
 
 if $ARGS[0] = 'modrel_ner':
-	$loc_arg = 'modrel_ner'
+	$locM_arg = 'modrel_ner'
 	'<center><b>Nerds relationship levels</b></center>'
 	*nl
 	*nl
@@ -350,7 +344,7 @@ if $ARGS[0] = 'modrel_ner':
 end
 
 if $ARGS[0] = 'modrel_gop':
-	$loc_arg = 'modrel_gop'
+	$locM_arg = 'modrel_gop'
 	'<center><b>Gopnik kids relationship levels</b></center>'
 	*nl
 	*nl
@@ -377,7 +371,7 @@ end
 
 
 if $ARGS[0] = 'modrel_out':
-	$loc_arg = 'modrel_out'
+	$locM_arg = 'modrel_out'
 	'<center><b>Outcast kids relationship levels</b></center>'
 	*nl
 	*nl
@@ -391,7 +385,7 @@ if $ARGS[0] = 'modrel_out':
 end
 
 if $ARGS[0] = 'modrel_tea':
-	$loc_arg = 'modrel_tea'
+	$locM_arg = 'modrel_tea'
 	'<center><b>Teacher relationship levels</b></center>'
 	*nl
 	*nl
@@ -415,7 +409,7 @@ if $ARGS[0] = 'modrel_tea':
 end
 
 if $ARGS[0] = 'modrel_oth':
-	$loc_arg = 'modrel_oth'
+	$locM_arg = 'modrel_oth'
 	'<center><b>Others relationship levels</b></center>'
 	*nl
 	*nl

+ 58 - 21
locations/intro_sg_tg.qsrc

@@ -1,16 +1,17 @@
 # intro_sg_tg
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
+$start_type[1] = 'tg'
+$start_type = 'sg_tg'
 
 if $ARGS[0] = 'start':
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/npc_ivan.jpg"></center>'
-	'You are Peter Ivanov.'
+	'You are Mikhail Ivanov.'
 	'<<$startdob>>'
-	'Your parents died shortly after you were born. Your only remaining relative, your great uncle Ivan, took you in. Your uncle has always made it clear that he took you in as a courtesy to your parents, not to become one himself. You two never became close, causing a lonely childhood.'
+	'Your parents died shortly after you were born. Your only remaining relative, your great uncle Ivan (pictured), took you in. Your uncle has always made it clear that he took you in as a courtesy to your parents, not to become one himself. You two never became close, causing a lonely childhood.'
 	act 'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/1.jpg"></center>'
@@ -124,11 +125,9 @@ end
 
 if $ARGS[0] = 'intro_5':
 	*clr & cla
-	if $month = 'August': $cbpre_text1 = ' the end of'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/6.jpg"></center>'
-	'A couple months pass. You and <<$pcs_nickname>> continue to talk, and you learn even more about her life. As<<$cbpre_text1>> summer break approaches, you bring up the idea of meeting up. <<$pcs_nickname>> is excited at the prospect and you agree to meet at the café where her mother works.'
+	'A couple months pass. You and <<$pcs_nickname>> continue to talk, and you learn even more about her life. During your summer holidays you bring up the idea of meeting up. <<$pcs_nickname>> is excited at the prospect and you agree to meet at the café where her mother works.'
 
-	killvar '$cbpre_text1'
 	act 'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/7.jpg"></center>'
@@ -145,16 +144,17 @@ if $ARGS[0] = 'intro_5':
 				'<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg"></center>'
 				'You get off the train next to a small road in the middle of nowhere. A dirt road leads to a small village made up of rickety wooden houses and even more ruined ones. Unsure of which house belongs to <<$pcs_nickname>>''s family, you pull out your phone to text her that you have arrived.'
 				'A few minutes later, an excited teenage girl comes rushing down one of the dirt roads. You double-check a picture of <<$pcs_nickname>> on your phone, as this is the first time you have seen her with your own eyes.'
-				act 'Take a look at her picture': gt 'intro_sg_tg', 'intro_6_looks'
+				act 'Take a look at her picture': gt 'intro_sg_tg', 'settings'
 			end
 		end
 	end
 end
 
 if $ARGS[0] = 'settings':
+	$locM = 'intro_sg_tg'
+	$locM_arg = 'intro_6_looks'
 	*clr & cla
 
-	StoryLine = 1
 	ml_update_1 = 1
 	!! NPC Data and Relations
 	gs 'npcstatic1'
@@ -172,7 +172,6 @@ if $ARGS[0] = 'settings':
 	gs 'npc_relationship', 'default_family_friends', 'cursedschoolboy'
 
 	!! Sveta was an outcast (good girl start)
-	gs 'preSYS', 'outcast'
 	gs 'npc_relationship', 'socialgroup_setting', -5, -5, 0, -20, 0, 0
 
 	npc_rel['A25'] -= 5
@@ -265,7 +264,7 @@ if $ARGS[0] = 'settings':
 	brothersawpirsF = 0
 
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/16.jpg"></center>'
-	'Your name is Peter Ivanov. You''ve got blond hair and blue eyes. Your parents died shortly after you were born and your great uncle Ivan took you in. He works at a construction company out of one of the suburbs of St. Petersburg. He''s a man''s man and has never been very close to you, choosing to let you make your own way as long as it does not embarrass him publicly. You''ve grown to be quite independent, but lack any real defining qualities.'
+	'Your name is Mikhail Ivanov. You''ve got blond hair and blue eyes. Your parents died shortly after you were born and your great uncle Ivan took you in. He works at a construction company out of one of the suburbs of St. Petersburg. He''s a man''s man and has never been very close to you, choosing to let you make your own way as long as it does not embarrass him publicly. You''ve grown to be quite independent, but lack any real defining qualities.'
 
 	!date_toggle = args[1]
 	if birthday < 10 and birthmonth < 10:
@@ -279,12 +278,22 @@ if $ARGS[0] = 'settings':
 	end
 
 	*nl
+
+	'<a href="exec:gt ''intro_customization'', ''birthday''"><<$startdob>></a>.'
+
 	gt 'intro_sg_tg', 'intro_6_looks'
 end
 
 if $ARGS[0] = 'intro_6_looks':
 	$loc = 'intro_sg_tg'
-	$loc_args = 'intro_6_looks'
+	$loc_arg = 'intro_6_looks'
+	killvar '$startdob'
+	!killvar 'date_toggle'
+
+	$holyday = '<b>Summer holidays</b>'
+
+	kanikuli = 5
+
 	*clr & cla
 	if player_avatar = 1:
 		'<center><img HEIGHT = 478 src="images/avatar.jpg"></center>'
@@ -300,7 +309,7 @@ if $ARGS[0] = 'intro_6_looks':
 
 	
 	act 'Meet her': gt 'intro_sg_tg', 'intro_7'
-	act 'Customise Sveta': gt 'intro_customization', 'start'
+	act 'Customise Sveta': $loc_arg = 'intro_7' & gt 'intro_customization', 'start'
 end
 
 
@@ -455,6 +464,11 @@ end
 
 if $ARGS[0] = 'intro_9':
 	*clr & cla
+	!!background: black
+	bcolor = rgb(0, 0, 0)
+	lcolor = rgb(106, 90, 205)
+	fcolor = rgb(255, 255, 255)
+
 	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/11.jpg"></center>'
 	'...'
 	wait 1500
@@ -563,7 +577,7 @@ if $ARGS[0] = 'intro_9':
 														'Startled, you reach up to your face, tracing out the features. You didn''t get a chance to become familiar with her face, but it feels about right. This whole time, the death of <<$pcs_nickname>> didn''t feel real, like she was still around somehow. Maybe it''s because you now "are" <<$pcs_nickname>>, but even now you don''t feel a sense of loss or guilt.'
 														'"Having a template to work off of really helped. Not even a geneticist could tell you two apart; you are identical from your fingerprints down to your DNA. Of course, that means your new ''equipment'' down there is fully functional as well, so if you don''t want to be a mommy, you should start thinking about contraceptives. You should probably also stay away from any male relatives if you don''t want to end up with a kid with eleven toes or something."'
 														'You angrily look at Tatiana, "So you think I''m a complete woman? On the outside I''ll look like one, but guess what, I''m still a man!"'
-														'"Well, yes. I won''t argue about that." Tatiana agrees. "You can decide what you want to do with your life, but you might want to play the part of <<$pcs_firstname>> until graduation at least. On a side note, I already took care of an alibi. Yesterday, "<<$pcs_firstname>>" was found half-dead on the edge of the woods while the leftovers of Peter''s body were found deeper in. It''s in the news." With these words, she tosses a newspaper onto the bed, an article circled out.'
+														'"Well, yes. I won''t argue about that." Tatiana agrees. "You can decide what you want to do with your life, but you might want to play the part of <<$pcs_firstname>> until graduation at least. On a side note, I already took care of an alibi. Yesterday, "<<$pcs_firstname>>" was found half-dead on the edge of the woods while the leftovers of Mikhail''s body were found deeper in. It''s in the news." With these words, she tosses a newspaper onto the bed, an article circled out.'
 
 														act 'Read the newspaper':
 															*clr & cla
@@ -585,12 +599,31 @@ if $ARGS[0] = 'intro_9':
 																	*clr & cla
 																	'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/start_csb.jpg"></center>'
 																	'Welcome to the Cursed Schoolboy version! You may have lost your masculinity and your old life, but you''ve gained new possibilities in return! Will you try to live your new life as a mere schoolgirl, or do you have grander aspirations with your newfound knowledge of magic? The choice is yours!'
-																	!!'Now, would you like to dive right into the action? Or would you rather take some time to get used to your new body and life?'
 
-																	act 'Start main game!': gt 'intro_sg_tg', 'intro_end'
 
-																	!! [Will lead into the prologue, which is currently WIP]
-																	!! act 'Let''s keep this intro going!':
+																	!!This is the default start
+																	act 'Start at the end of August':
+																		month = 8
+																		$month = 'August'
+																		grandmaQW['last_month_paid'] = month
+																		day = 26
+																		week = 5
+																		hour = 9
+																		kanicont = 6
+																		gt 'intro_sg_tg', 'intro_end'
+																	end
+
+																	act 'Start at the beginning of June':
+																		month = 6
+																		$month = 'June'
+																		grandmaQW['last_month_paid'] = month
+																		day = 1
+																		week = 3
+																		kanicont = 92
+																		Gspassed = 1
+																		dostupindorf = 1
+																		gt 'intro_sg_tg', 'intro_end'
+																	end
 																end
 															end
 														end
@@ -626,7 +659,7 @@ if $ARGS[0] = 'pav_start':
 	'<center><h2>Pavlovsk</h2></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
 	*nl
-	'<center>A provincial town in a rural area of Russia, it looks much like all the other towns in the region. Population: about 15000 inhabitants.</center>'
+	'<center>A provincial town in a rural area of Russia, it looks much like all the other towns in the region. Population: about 15000 inhabitants. This is where you live with your parents, it is ideal if you are due back to school but it might be a bit boring to spend all summer here.</center>'
 
 	act 'Continue': $starting_location = 'pavlovsk' & gt 'intro_sg_tg', 'game_start'
 	act 'Change location': gt 'intro_sg_tg', 'gad_start'
@@ -637,7 +670,7 @@ if $ARGS[0] = 'gad_start':
 	'<center><h2>Gadukino</h2></center>'
 	'<center><img <<$set_imgh>> src="images/system/1_openings/shared/site_pavlovsk.jpg"></center>'
 	*nl
-	'<center>A small farming village with many rickety wooden houses and even more ruins of houses. This village has seen better times.</center>'
+	'<center>A small farming village with many rickety wooden houses and even more ruins of houses. This village has seen better times. It might be a good place to spend your summer holidays but it is not convenient if you are due to return to school.</center>'
 
 	act 'Continue': $starting_location = 'gadukino' & gt 'intro_sg_tg', 'game_start'
 	act 'Change location': gt 'intro_sg_tg', 'pav_start'
@@ -651,7 +684,7 @@ if $ARGS[0] = 'game_start':
 	act 'Continue':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/system/1_openings/4_csb/15.jpg"></center>'
-		'Over the next week, you slowly became accustomed to your new life. You aren''t used to being a girl just yet, but you''ve come to think of yourself as <<$pcs_nickname>> instead of Peter, and <<$pcs_nickname>>''s family as your own.'
+		'Over the next week, you slowly became accustomed to your new life. You aren''t used to being a girl just yet, but you''ve come to think of yourself as <<$pcs_nickname>> instead of Mikhail, and <<$pcs_nickname>>''s family as your own.'
 		'There were a few incidents where you acted in some decidedly non-feminine ways. Luckily Tatiana''s alibi has proved helpful here as well, covering your mistakes.'
 		*nl
 		'You''ve noticed some other mental changes apart from just thinking of yourself as <<$pcs_firstname>>. Perhaps it is a result of your new gender, but with your new body has come an attraction towards men. You are a little unsettled by these changes, but you can''t feel repulsed by these new desires any more than you could have been repulsed for finding girls attractive before.'
@@ -665,8 +698,11 @@ if $ARGS[0] = 'game_start':
 
 			act 'Continue':
 				cla
+				gs 'intro_sg_select', 'sg_settings'
+				gs 'intro_initialization'
 				showstat 1
 				showobjs 1
+				gs 'obj_din', 'old'
 
 				!!Stuff from the backpack, phone
 				prezik = 3
@@ -681,6 +717,7 @@ if $ARGS[0] = 'game_start':
 				gs 'stat'
 
 				act 'Start your new life':
+					music_loop = 0
 					if $starting_location = 'pavlovsk': gt 'bedrPar'
 					if $starting_location = 'gadukino': gt 'gadhouse', 'start'
 				end

+ 10 - 26
locations/intro_uni.qsrc

@@ -1,9 +1,9 @@
 # intro_uni
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'uni'
+$start_type[1] = 'nomagic'
 
 !!if $ARGS[0] = 'elective_choice':
 !!	
@@ -13,7 +13,7 @@ $start_type = 'uni'
 if $ARGS[0] = 'start':
 	!! Intro to starting uni
 	$loc = 'intro_uni'
-	$loc_args = 'custom'
+	$loc_arg = 'custom'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/city/island/university/uni_day.jpg"></center>'
 	'The big day has finally arrived! Your family piled into your stepfather''s Gazelle pickup and you all traveled from your hometown, Pavlovsk, to the big city of St. Petersburg. Today is the day you move into the University dorms to start this new phase of your life.'
@@ -24,29 +24,8 @@ end
 
 if $ARGS[0] = 'custom':
 	$loc = 'intro_uni'
-	$loc_args = 'custom'
-	pcs_hairlng = 100
-	!!Default Names
-	$pcs_firstname = 'Svetlana'
-	$pcs_lastname = 'Lebedev'
-	$pcs_nickname = 'Sveta'
-
-	!!Player names are set here
-	$temp_firstname = '<<$pcs_firstname>>'
-	$pcs_firstname = input("What is your first name? (Leave blank for Svetlana)")
-	if $pcs_firstname = '':$pcs_firstname = '<<$temp_firstname>>'
-	killvar '$temp_firstname'
-
-	$temp_lastname = '<<$pcs_lastname>>'
-	$pcs_lastname = input("What is your family name? (Leave blank for Lebedev)")
-	if $pcs_lastname = '':$pcs_lastname = '<<$temp_lastname>>'
-	killvar '$temp_lastname'
-
-	$temp_nickname = '<<$pcs_nickname>>'
-	$pcs_nickname = input("What is your nickname? (Leave blank for Sveta)")
-	if $pcs_nickname = '':$pcs_nickname = '<<$temp_nickname>>'
-	killvar '$temp_nickname'
-
+	$loc_arg = 'custom'
+	*clr & cla
 !!	Just hair and eye color here for now; the dialog will be update as more options are added
 	'<center><b><font color = maroon>CHARACTER CUSTOMIZATION</font></b></center>'
 	'<center><b>Allows you to alter hair and eyes, use to match fixed profile picture if in use.</b></center>'
@@ -245,7 +224,12 @@ if $ARGS[0] = 'family_goodbye':
 end
 
 if $ARGS[0] = 'welcome_intro':
+	gs 'intro_initialization_city'
 	!! Welcome to Girl Life speech
+	MagikDostup = 1
+	showstat 1
+	showobjs 1
+	gs 'obj_din', 'old'
 	*clr & cla
 	'<center><img <<$set_imgh>> src="images/system/1_openings/6_uni/uni_start.jpg"></center>'
 	'Welcome to Girl Life. Guide <<$pcs_nickname>> through the many challenges of University life. Manage schoolwork, a job, and relationships with the people you meet on your journey.'

+ 1 - 2
locations/intro_uni_m.qsrc

@@ -1,8 +1,7 @@
 # intro_uni_m
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'uni_m'
 
 'Not yet available!!'

+ 2 - 2
locations/intro_uni_tg.qsrc

@@ -1,9 +1,9 @@
 # intro_uni_tg
 
-music_loop = 0
-CLOSE ALL
 gs 'themes', 'indoors'
+killvar '$start_type'
 $start_type = 'uni_tg'
+$start_type[1] = 'tg'
 
 'Not yet available!!'
 

+ 2 - 2
locations/journal.qsrc

@@ -191,13 +191,13 @@ if $ARGS[0] = 'records':
 	'<center><a href="exec: gt ''journal_quests'', ''start''">Quests</a></center>'
 	'<br><center><a href="exec: gt ''journal'', ''locations''">Locations</a></center>'
 	'<br><center><a href="exec: gt ''journal'', ''friends_family''">Friends & Family</a></center>'
-	if SchoolAtestat = 0 and storyline = 1 and SchoolBlock = 0: '<br><center><a href="exec: gt ''journal'', ''school''">School</a></center>'
+	if SchoolAtestat = 0 and mid($start_type,1,2) = 'sg' and SchoolBlock = 0: '<br><center><a href="exec: gt ''journal'', ''school''">School</a></center>'
 	if university['student'] = 1: '<br><center><a href="exec: gt ''journal'', ''uni''">University</a></center>'
 	'<br><center><a href="exec: gt ''journal'', ''clothing''">Clothing information</a></center>'
 	
 	'<center><h2>Relationships</h2></center>'
 	
-	if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 	
 		if grupTipe < 5 and grupvalue[grupTipe] > 700:
 			$journal_school_standing = ' You are well respected and liked within your clique.'

+ 1 - 1
locations/journal_quests.qsrc

@@ -9,7 +9,7 @@ if $ARGS[0] = 'start':
 	'<center><h1>Quests</h1></center>'
 
 !!to check Sveta is at school. All school quests must pass this and it should become a category as we expand
-	if StoryLine = 1 and SchoolAtestat = 0 and SchoolBlock = 0:
+	if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0:
 		'<center><h1>Cheerleading</h1></center>'
 		*nl
 		if (month > 11 or month < 6) and cheerleadingQW['quest_stage'] = 0:

+ 16 - 12
locations/katjaEv.qsrc

@@ -100,20 +100,24 @@ if $ARGS[0] = '1':
 	pcs_mood = 100
 	menu_off = 1
 	gs 'stat'
-	'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
-	if month=1 or month=2 or month=12 or month=11:
-		'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_home.jpg"></center>'
-		if katjaQW['horny'] > 60 and rand (1,3) = 1: 
-			if katjaQW['pantiesQWstage'] >= 5 or katjaQW['take_of_panties_day'] = daystart:
-				*clr & '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_go_home_no_tanga.jpg"></center>' & 'You walk through the streets of Pavlovsk together with Kate to her house. You and chatted about all sorts of trivia and have fun. Suddenly Kate stopped and turned around looking at you, giving you a mischievous look and lifting her skirt, showing you her tender pussy, she seems to have forgotten her panties.'
-			elseif katjaQW['pantiesQWstage'] > 0:
-				*clr & '<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_go_home_tanga.jpg"></center>' & 'You walk through the streets of Pavlovsk together with Kate to her house. You and chatted about all sorts of trivia and have fun. Suddenly Kate stopped and turned around looking at you, giving you a mischievous look and lifting her skirt, showing you her panties. '
-			end
+
+	if katjaQW['horny'] > 60 and rand (1,3) = 1 and katjaQW['pantiesQWstage'] > 0: 
+		if katjaQW['pantiesQWstage'] >= 5 or katjaQW['take_of_panties_day'] = daystart:
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_go_home_no_tanga.jpg"></center>'
+			'You walk through the streets of Pavlovsk together with Katja to her house. You and chatted about all sorts of trivia and have fun. Suddenly Katja stopped and turned around looking at you, giving you a mischievous look and lifting her skirt, showing you her tender pussy, she seems to have forgotten her panties.'
+		else
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_go_home_tanga.jpg"></center>'
+			'You walk through the streets of Pavlovsk together with Katja to her house. You and chatted about all sorts of trivia and have fun. Suddenly Katja stopped and turned around looking at you, giving you a mischievous look and lifting her skirt, showing you her panties. '
 		end
+	else
+		if month=1 or month=2 or month=12 or month=11:
+			'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big14.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/katja_home.jpg"></center>'
+		end	
+		'You walk through the streets of Pavlovsk together with Katja to her house. You chat about all sorts of trivia and have fun.'
 	end
-	'You walk through the streets of Pavlovsk together with Katja to her house. You chat about all sorts of trivia and have fun.'
 
 	if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0:'Katja is very interested in how you are doing with your pro-dancing. In her opinion it is a very private team and there have been many rumors about Albina''s team.'
 	if kotovLoveQW > 0:'Katja asks you about your relationship with Victor Kotov, expressing her opinion about it. According to her, Victor is rude and a true gangster.'

+ 1 - 1
locations/kuhrPar.qsrc

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

+ 4 - 2
locations/mainQW.qsrc

@@ -54,7 +54,7 @@ act 'Investigate':
 				'"We met Reinhold there, he represents the council of the highest order. They are the old ones and hold council on the highest matters of magic we must be careful not to upset them or attract the attention of demons."'
 				'"Woah! Demons?'
 				'"Demons, you know, creatures from other plains of existence. It''s possible that Rikudo was a demon, but demons unlike him are beings with terrible force, blunt and aggressive. Something like beasts woven from pure magic. Much like the fae, they have different types and they possess different magics and skills, but these are not cute or friendly."'
-				if StoryLine = 0 and magikDostup = 0:
+				if $start_type[1] = 'tg':
 					'"Got it. Hey, you can turn me back into a man?"'
 					'"I can''t. I drew the energy you were emitting from the amulet, I don''t hold anything like the energy required and you have only access to the smallest hint of the potential of the amulet. It might be possible if your magical energies are much higher and you somehow pass me all your energy that I can reverse the spell, but this is unlikely and could put you back in the position you were in when we met. I''m sorry."'
 				end
@@ -63,8 +63,10 @@ act 'Investigate':
 
 				act 'Leave':
 					minut += 15
-					if StoryLine = 0:
+					if mid($start_type,1,4) = 'city':
 						gt 'city_residential'
+					elseif mid($start_type,1,3) = 'uni':
+						gt 'city_island'
 					else
 						gt 'pav_residential'
 					end

+ 2 - 2
locations/miroslava.qsrc

@@ -483,7 +483,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 			end
 		end
 
-		if npc_rel['A60'] >= 15 and MiraLoc ! 3 and (npc_QW['A63'] < 11 or npc_QW['A60'] >= 11 or mirasex > 1) and StoryLine = 1 and grandmaQW['block'] = 0:
+		if npc_rel['A60'] >= 15 and MiraLoc ! 3 and (npc_QW['A63'] < 11 or npc_QW['A60'] >= 11 or mirasex > 1) and mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
 			if mira_guest = 0:
 				act 'Invite to your grandparent''s':
 					menu_off = 1
@@ -563,7 +563,7 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 		end
 
 		if npc_rel['A60'] >= 15 and Mira_no = 0 and (npc_QW['A63'] < 11 or npc_QW['A60'] >= 11 or mirasex > 1):
-			if mira_guest = 0 and mira_temp >= 1 and mira_temp <= 2 and mira_go_blok = 0 and MiraLoc ! 3 and StoryLine = 1 and grandmaQW['block'] = 0:
+			if mira_guest = 0 and mira_temp >= 1 and mira_temp <= 2 and mira_go_blok = 0 and MiraLoc ! 3 and mid($start_type,1,2) = 'sg' and grandmaQW['block'] = 0:
 				menu_off = 1
 				*clr & cla
 				minut += 1

+ 1 - 1
locations/miroslavahome.qsrc

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

+ 14 - 4
locations/mirror.qsrc

@@ -146,8 +146,13 @@ if $ARGS[0] = 'start':
 
 
 		!########## main desc ##########
-		if daystart < 10 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:'In the mirror, you see a strange woman''s face looking back at you that exactly copies all your actions. You can hardly accept the idea that this is now you.'
-		if daystart >= 10 and daystart < 30 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:'In the mirror you see a woman''s face to which you have become accustomed to. But sometimes, you get the feel that this is not your face.'
+		if $start_type[1] = 'tg':
+			if daystart < 10:
+				'In the mirror, you see a strange woman''s face looking back at you that exactly copies all your actions. You can hardly accept the idea that this is now you.'
+			elseif daystart < 30:
+				'In the mirror you see a woman''s face to which you have become accustomed to. But sometimes, you get the feel that this is not your face.'
+			end
+		end
 		'<<$pcs_apprnc>>'
 		'<<$hair>>'
 		'<<$pcs_makeup>>. Your<<$pcdesc_eyesizeinsertive>> eyes are <<$pcdesc_eyecolour>> <<$pcs_lashes>>, and you have <<$pcdesc_fulllipswordy>>.'
@@ -175,8 +180,13 @@ if $ARGS[0] = 'start':
 			'<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
 		end
 		*nl
-		if daystart < 10 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:'In the mirror, you see a strange woman''s face looking back at you that exactly copies all your actions. You can hardly accept the idea that this is now you.'
-		if daystart >= 10 and daystart < 30 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:'In the mirror you see a woman''s face to which you have become accustomed to. But sometimes, you get the feel that this is not your face.'
+		if $start_type[1] = 'tg':
+			if daystart < 10:
+				'In the mirror, you see a strange woman''s face looking back at you that exactly copies all your actions. You can hardly accept the idea that this is now you.'
+			elseif daystart < 30:
+				'In the mirror you see a woman''s face to which you have become accustomed to. But sometimes, you get the feel that this is not your face.'
+			end
+		end
 		'<<$hair>>'
 		'<<$pcs_makeup>>. Your<<$pcdesc_eyesizeinsertive>> eyes are <<$pcdesc_eyecolour>> <<$pcs_lashes>>, and you have <<$pcdesc_fulllipswordy>>.'
 		'<<$skin>>'

+ 2 - 2
locations/mitka.qsrc

@@ -43,7 +43,7 @@ if $ARGS[0] = '':
 		'You and Mitka are best friends.'
 	end
 	! School girl Sveta already knows Mitka
-	if StoryLine = 1:
+	if mid($start_type,1,2) = 'sg':
 		$mitkaInvitation = 'Listen, we have a fresh batch of our home brew. Come drink with us at eight o''clock. We meet by the forest road outside the village. We''ll hang out with some friends, and have fun. What do you say?'
 		
 		'He is barely older than you, you remember him from your childhood. You both used to swim in the local river together.'
@@ -127,7 +127,7 @@ if $ARGS[0] = 'sex_chat':
 		*nl
 		'Mitka scratches his balls and adds with a grin: "Hey <<$pcs_nickname>>, do you want to have some fun?"'
 		if pcs_vag = 0:
-			if StoryLine = 1:
+			if mid($start_type,1,2) = 'sg':
 				gs 'willpower', 'bj', 'resist'
 				if will_cost <= pcs_willpwr:
 					act 'I don''t know. My mother is obsessed with me staying a virgin. (<<will_cost>> Willpower)':

+ 1 - 0
locations/natbelEv.qsrc

@@ -118,6 +118,7 @@ if $ARGS[0] = 'carrybooks':
 				'Natasha obediently opens her legs for you. Showing off her pretty pussy. Not wasting any time you start playing with her, first rubbing her lips, then focussing more on her clit as you watch closely while Natasha''s pussy gets wetter and wetter.'
 				act 'Stuff her panties':
 					*clr & cla
+					NatbelQW['panty_stuff_day'] = daystart
 					'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/stuffpanties.mp4"></video></center>'
 					'You stop playing with her pussy and grab her panties, handing them over to her. "Put them inside your pussy."'
 					'Natasha looks at you in confusion for a second but then starts to slowly push them into her pussy.'

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