[changed] school social group as requested by nutluck

[added] decay to the school social group of -1 and a cap of +5 per day

locations/cikl.qsrc

@@ -1270,7 +1270,48 @@ if storyline = 1:
 
 
 	if SchoolAtestat = 0:
-		if month = 12 and day > 25:
+		if kanikuli = 0 and week < 6:			
+			!!Maximum increase for grupvalues is 5 (6 - 1 decay)
+			if oldgrupvalue_set = 0:
+				oldgrupvalue_set = 1
+				old_grupvalue[1] = grupvalue[1]
+				old_grupvalue[2] = grupvalue[2]
+				old_grupvalue[3] = grupvalue[3]
+				old_grupvalue[4] = grupvalue[4]
+			else
+				if old_grupvalue[1] + 6 < grupvalue[1]: grupvalue[1] = old_grupvalue[1] + 6
+				if old_grupvalue[2] + 6 < grupvalue[2]: grupvalue[2] = old_grupvalue[2] + 6
+				if old_grupvalue[3] + 6 < grupvalue[3]: grupvalue[3] = old_grupvalue[3] + 6
+				if old_grupvalue[4] + 6 < grupvalue[4]: grupvalue[4] = old_grupvalue[4] + 6
+			end
+			
+			!!Decay for the school groups
+			if grupvalue[1] > 0:
+				grupvalue[1] -= 1
+			else
+				grupvalue[1] = 0
+			end
+			if grupvalue[2] > 0:
+				grupvalue[2] -= 1
+			else
+				grupvalue[2] = 0
+			end
+			if grupvalue[3] > 0:
+				grupvalue[3] -= 1
+			else
+				grupvalue[3] = 0
+			end
+			if grupvalue[4] > 0:
+				grupvalue[4] -= 1
+			else
+				grupvalue[4] = 0
+			end		
+
+			old_grupvalue[1] = grupvalue[1]
+			old_grupvalue[2] = grupvalue[2]
+			old_grupvalue[3] = grupvalue[3]
+			old_grupvalue[4] = grupvalue[4]			
+		elseif month = 12 and day > 25:
 			if day < 31:
 				$holyday = '<b>Winter Break in <<32-day>> days.</b>'
 			else
@@ -1345,7 +1386,7 @@ if storyline = 1:
 			elseif day = 11:
 				kanikuli = 1
 				$holyday = '<b>Last day of Autumn Break.</b>'
-			end
+			end 
 		end
     elseif SchoolAtestat = -1:
         if ParHomeBlock = 1:

locations/gschool_socialchg.qsrc

@@ -15,13 +15,13 @@ if $ARGS[0] = 'test':
 	elseif grupvalue[4] < 20 and grupTipe = 4: 
 		gt 'gschool_socialchg', 'gopnik outcast'		
 	elseif pav_slut < 100:
-		if grupvalue[1] > 50 and grupTipe ! 1: 
+		if grupvalue[1] > 80 and grupTipe ! 1: 
 			gt 'gschool_socialchg', 'coolkid'
-		elseif grupvalue[2] > 50 and grupTipe ! 2: 
+		elseif grupvalue[2] > 80 and grupTipe ! 2: 
 			gt 'gschool_socialchg', 'jock'
-		elseif grupvalue[3] > 50 and grupTipe ! 3: 
+		elseif grupvalue[3] > 80 and grupTipe ! 3: 
 			gt 'gschool_socialchg', 'nerd'
-		elseif grupvalue[4] > 50 and grupTipe ! 4: 
+		elseif grupvalue[4] > 80 and grupTipe ! 4: 
 			gt 'gschool_socialchg', 'gopnik'
 		end
 	elseif pav_slut < 125 and grupvalue[4] > 50 and grupTipe ! 4:
@@ -37,14 +37,9 @@ if $ARGS[0] = 'test':
 		killvar 'gopnik_initiation'
 		killvar 'gopnik_initiation_day'
 		gt 'gschool_socialchg', 'gopnik miss'
-		!! one chance more?
 	end
-
 end
 
-!!if Pav_slut >= 125 and a cool kid, nerd, or jock.
-!!if pav_slut >= 150 and a gopnik
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
 
 if $ARGS[0] = 'Pavlovsk slut':
 	cla & *clr
@@ -52,37 +47,30 @@ if $ARGS[0] = 'Pavlovsk slut':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/shamewalk.jpg"></center>'
 	'As you walk down the school hallway, you notice almost everyone is eyeing you. Some sneer at you, others laugh, a few turn away in disgust. You are used to this treatment with your sexual escapades, but not to this level. No one wants to greet you and most seem to actively avoid you, you are starting to feel a bit uncomfortable at all the staring eyes. As you approach you locker you see someone has spray painted ''Slut'' on it in big red letters. You hear someone walking up behind you and you turn around to see who it might be.'
-!!This is add on to the above text based on what social group Sveta use to be.
+
 	grupvalue[1] = 0
 	grupvalue[2] = 0
 	grupvalue[3] = 0
-	gs 'gschool_socialchg', 'group_rel_change','cool kids', -20
-	gs 'gschool_socialchg', 'group_rel_change','jocks', -20
-	gs 'gschool_socialchg', 'group_rel_change','nerds', -20
-	if pav_slut > 149 and grupTipe ! 4:
-		grupvalue[4] = 0
-		gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
-	end
+	grupvalue[4] = 0
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','cool kids', -20
+!!	gs 'gschool_socialchg', 'group_rel_change','jocks', -20
+!!	gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
+!! 	gs 'gschool_socialchg', 'group_rel_change','nerds', -20
 
 	if grupTipe = 1:
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/coolslut.jpg"></center>'
 		'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe in complete disgust. Just as you''re about to ask what is going on, Irina cuts you off. "Shut your cum hole slut, I don''t want to smell you cum breath. We''ve all heard about what you have been up too. Your ass is out, you are no longer welcome around us anymore. Go hang out with the other outcasts or find Sonia so that the two of you can blab about the latest cock you sucked, I am sure you two have a lot in common now." With that Irina turns and walks away, Dimka gives you a final look and shakes his head.'
 		'"What a waste, fucking slut." Then he spits at you feet before leaving as well. You hear most of the rest of the students laughing, as you look around. Not being part of the popular clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	elseif grupTipe = 2:
-		!!jock social group
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/jockslut.jpg"></center>'
 		'Christina, Lariska, and Lina walk up to you, Lariska and Lina are looking at you in disgust while Christina is smirking. She shoves you hard up against your locker. "What are you doing here slut? Shouldn''t you be in the boys bathroom sucking a bunch of cocks? We all heard that is all you do, suck cocks and let anyone fuck you, just like a whore. At least the whores know to get payed but you just give it away for free." She says, mockingly laughing, Lariska, Lina and several other students nearby join in, openly mocking you.'
 		'"Stay away from us and go hang out with the other losers, I am sure you and Sonia have a lot in common now slut." Then she leans in close "Or I will show you what happens to sluts that don''t know their place." With that they turn and walk away. Not being part of the jock clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	elseif grupTipe = 3:
-		!!nerd social group
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
 		'A couple of students stand infront of you, wanting to get a better look at the slut based on what''s written on your locker, when you look at them they start laughing and then quickly hurry away from you as if you''ve been struck with the plague. You turn and try to find some of your friends, most seem to be hiding or when they see you coming hurry off. You finally manage to catch up to Gerasim. As you''re about to say something he turns to you. "Please go away, I don''t know what got into you. But the things they say you have done." He looks disgusted. "I''m sorry but I can''t be seen hanging out with you, I''ve got enough problems without you making it worse."'
 		'When he notices the dejected look on your face as he''s told you off, ending with that you are an outcast he sighs a little. "I''m sorry I really am, but this is your own fault, I don''t know what you were thinking doing all those sex things and I don''t care, but please leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you, as he wheels himself away from you decidedly. As you look around, most of the other students either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	elseif grupTipe = 4:
-		!!gopnik social group
-		grupvalue[4] = 0
-		gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
-
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/gopnikslut.jpg"></center>'
 		'Paulina, Lera, and Lena are standing next to you. Lera is snickering, Paulina looks annoyed, just like she''s preparing to beat you up while Lera looks at you with disgust. Paulina shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently hanging out, partying and having a good time wasn''t enough for you. No you had to go around and be the pathetic town slut. Don''t act all surprised, we''ve all heard about how you will let any guy fuck you in whatever hole they desire. Spineless sluts have no place with us, so stay the fuck away from us or I will beat the shit out of you." With that Paulina shoves you against you locker and walks away.'
 		'Lena gives you a final look of disgust and shoves you once again while Lera gives you a few parting words before walking away. "If you ever get the idea to approach us, we will feed you to some guys that will pull a train on you so hard, one even a slut like you won''t enjoy." Not being part of the gopnik clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
@@ -93,28 +81,12 @@ if $ARGS[0] = 'Pavlovsk slut':
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
 
-!!if grupvalue[1] >= 51 or higher and Sveta is not currently a cool kid then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
 if $ARGS[0] = 'coolkid':
 	cla & *clr
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
 	'As you walk down the school hallway, you stop at your locker. You sense someone standing next to you and you turn to see Albina, Andrey and Stasya there. They give you friendly smiles. Albina speaks "Hey <<$pcs_nickname>>, we have been talking and you seem like you have the right attitude to be one of us. So what do you say, do you want to join the popular clique?" They seem to be waiting on your response.'
-	act 'Yes':
-		cla & *clr
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
-		'You nod your head, "Yes I would love it, I love hanging out with you guys."'
-		'Albina gives you a hug, once she lets go Andrey wraps an arm around your shoulder and starts leading you to your next class. "From now on you are one of us." Stasya gives you a friendly smile, as the four of you walk to your next class.'
-		grupvalue[2] -= 20
-		grupvalue[3] -= 20
-		grupvalue[4] -= 20
-		grupTipe = 1
-		gs 'gschool_socialchg', 'group_rel_change','cool kids', 5
-		gs 'stat'
-
-		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
-	end
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
@@ -122,94 +94,136 @@ if $ARGS[0] = 'coolkid':
 		'Albina frowns but then nods. "Suit yourself then." With that she turns and leaves, Andrey just shakes his head at you and does the same.'
 		'Stasya gives you a once over. "I told you guys she wasn''t cool enough." Then shakes her head at you. "Loser!" and with that follows the others, leaving you behind to wonder if you made the right choice.'
 
-		grupvalue[1] -= 20
+		grupvalue[1] -= rand(30,50)
 		gs 'gschool_socialchg', 'group_rel_change','cool kids', -5
 		gs 'stat'
 
+		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
+	end
+	act 'Yes':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joincool.jpg"></center>'
+		'You nod your head, "Yes I would love it, I love hanging out with you guys."'
+		'Albina gives you a hug, once she lets go Andrey wraps an arm around your shoulder and starts leading you to your next class. "From now on you are one of us." Stasya gives you a friendly smile, as the four of you walk to your next class.'
+		
+		grupvalue[2] -= 20
+		grupvalue[3] -= 40
+		grupvalue[4] -= 50
+		
+		if grupTipe = 2 or grupvalue[2] < 0: grupvalue[2] = 0
+		if grupTipe = 3 or grupvalue[3] < 0: grupvalue[3] = 0
+		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
+		
+		grupTipe = 1
+		
+!!		gs 'gschool_socialchg', 'group_rel_change','cool kids', 5
+		gs 'stat'
+
 		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 	end
 end
-!!if grupvalue[2] >= 51 or higher and Sveta is not currently a jock then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
+
 if $ARGS[0] = 'jock':
 	cla & *clr
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinjock.jpg"></center>'
 	'As you walk down the school hallway, you stop at your locker. You sense someone standing next to you and you turn to see Lariska and Lina there. They give you friendly smiles. Lariska speaks "Hey <<$pcs_nickname>>, we have been talking and you seem like you have the right attitude to be one of us. So what do you say, do you want to join us, the jock clique?" They seem to be waiting on your response.'
-	act 'Yes':
-		cla & *clr
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinjock.jpg"></center>'
-		'You nod your head, "Yes I would love to, I love hanging out with you guys."'
-		'Lariska gives you a hug. "From now on you are one of us." Lina gives you a friendly smile, with that they walk you to your next class.'
-		grupvalue[1] -= 20
-		grupvalue[3] -= 20
-		grupvalue[4] -= 20
-		gs 'gschool_socialchg', 'group_rel_change','jocks', 5
-		grupTipe = 2
-		gs 'stat'
-
-		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
-	end
 	act 'No':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
 		'You shake your head no. "I like hanging out with you guys, but I don''t think that is a good idea."'
 		'Lariska frowns but then nods. "Suit yourself then." With that she turns and leaves.'
 		'Lina gives you a once over. "Well at least Christina will be happy." and with that she follows after Lariska, leaving you behind to wonder if you made the right choice.'
-		grupvalue[2] -= 20
+		grupvalue[2] -= rand(30,50)
 		gs 'gschool_socialchg', 'group_rel_change','jocks', -5
 		gs 'stat'
 
+		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
+	end
+	act 'Yes':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinjock.jpg"></center>'
+		'You nod your head, "Yes I would love to, I love hanging out with you guys."'
+		'Lariska gives you a hug. "From now on you are one of us." Lina gives you a friendly smile, with that they walk you to your next class.'
+		
+		grupvalue[1] -= 20
+		grupvalue[3] -= 50
+		grupvalue[4] -= 30
+		
+		if grupTipe = 1 or grupvalue[1] < 0: grupvalue[1] = 0
+		if grupTipe = 3 or grupvalue[3] < 0: grupvalue[3] = 0
+		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
+		
+		grupTipe = 2
+		
+!!		gs 'gschool_socialchg', 'group_rel_change','jocks', 5
+		gs 'stat'
+
 		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 	end
 end
-!!if grupvalue[3] >= 51 or higher and Sveta is not currently a nerd then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
+
 if $ARGS[0] = 'nerd':
 	cla & *clr
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinnerd.jpg"></center>'
 	'As you walk down the school hallway, you stop at your locker. You sense someone standing next to you and you turn to see Artem, Feofan, Petka, Gerasim, Zinaida, and Julia there. They give you friendly smiles. Artem speaks "Hey <<$pcs_nickname>>, we have been talking and we like you. We were wondering if you would like to come hang out with us at our game night?" They seem to be waiting on your response.'
+	act 'No':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
+		'You shake your head no. "I like hanging out with you guys, but I''m just not interested in doing a game night, sorry."'
+		'Artem frowns but then nods. "Oh, ok. Well maybe some other time." With that he turns and the rest follow, looking a little depressed. Looks like they was really expecting and hoping you to join them. It makes you feel a little bad and leaves you to wonder if you made the right choice.'
+		grupvalue[3] -= rand(30,50)
+!!		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
+		gs 'stat'
+
+		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
+	end	
 	act 'Yes':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joinnerd.jpg"></center>'
 		'You nod your head, "Yes I would love it, I love hanging out with you guys. A game night sounds like a lot of fun."'
 		'Most of them start talking at once, they seem as excited as you are about you joining them. You understand this means you are part of their group now. Finally Feofan talks loud enough the rest let him talk. "That''s great <<$pcs_nickname>> meet us at the community center library tonight after school. See you then." With that they all start leaving and going to class, most saying they look forward to seeing you tonight.'
-		grupvalue[2] -= 20
-		grupvalue[1] -= 20
-		grupvalue[4] -= 20
-		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
+		
+		grupvalue[1] -= 50
+		grupvalue[2] -= 40
+		grupvalue[4] -= 50
+		
+		if grupTipe = 1 or grupvalue[1] < 0: grupvalue[1] = 0
+		if grupTipe = 2 or grupvalue[2] < 0: grupvalue[2] = 0
+		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
+				
 		grupTipe = 3
+		
 		nerd_night_game = 1
 		nerd_night_game_day = daystart
-		gs 'stat'
-
-		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
-	end
-!!need a code so after school a new option pops up go to game night is an option.
-	act 'No':
-		cla & *clr
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
-		'You shake your head no. "I like hanging out with you guys, but I''m just not interested in doing a game night, sorry."'
-		'Artem frowns but then nods. "Oh, ok. Well maybe some other time." With that he turns and the rest follow, looking a little depressed. Looks like they was really expecting and hoping you to join them. It makes you feel a little bad and leaves you to wonder if you made the right choice.'
-		grupvalue[3] -= 20
-		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
+		
+!!		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
 		gs 'stat'
 
 		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 	end
 end
 
-!!if grupvalue[4] >= 51 or higher and Sveta is not currently a gopnik then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
 if $ARGS[0] = 'gopnik':
 	cla & *clr
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joingopnik.jpg"></center>'
 	'As you walk down the school hallway, you stop at your locker. You sense someone standing next to you and you turn to see Viktor and Lena there. Viktor gives you a hungry once over and Lena gives you a smirk. Viktor speaks "Hey <<$pcs_nickname>>, we have been talking and you seem like you have the right attitude to hang with us. So what do you say, want to come to one of our exclusive parties tonight?" They seem to be waiting on your response.'
+	act 'No':
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
+		'You shake your head no. "I like hanging out with you guys, but I''m just not in the partying mood tonight.""'
+		'Viktor''s eyes darken a bit. "What, you too good for us all of a sudden? Well fuck you then!" With that he storms away, Lena looks at you like you are a complete idiot and then follows her brother, leaving you behind to wonder if you made the right choice.'
+		grupvalue[4] -= rand(30,50)
+		gs 'gschool_socialchg', 'group_rel_change','gopniks', -5
+		gs 'stat'
+
+		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
+	end
 	act 'Yes':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/joingopnik.jpg"></center>'
@@ -219,25 +233,11 @@ if $ARGS[0] = 'gopnik':
 		gopnik_initiation = 1
 		gopnik_initiation_day = daystart
 		gs 'stat'
-!!need so it triggers an event so their is a new option if Sveta goes to the apartment garages at that time tonight.
-
-		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
-	end
-	act 'No':
-		cla & *clr
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/nerdslut.jpg"></center>'
-		'You shake your head no. "I like hanging out with you guys, but I''m just not in the partying mood tonight.""'
-		'Viktor''s eyes darken a bit. "What, you too good for us all of a sudden? Well fuck you then!" With that he storms away, Lena looks at you like you are a complete idiot and then follows her brother, leaving you behind to wonder if you made the right choice.'
-		grupvalue[4] -= 20
-		gs 'gschool_socialchg', 'group_rel_change','gopniks', -5
-		gs 'stat'
 
 		act 'Go to morning class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 	end
 end
 
-!!if grupvalue[1] <= 20 or lower and Sveta is currently a cool kid then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
 if $ARGS[0] = 'coolkid outcast':
 	cla & *clr
 	menu_off = 1
@@ -245,66 +245,91 @@ if $ARGS[0] = 'coolkid outcast':
 	'Irina and Dimka walk up to you. Dimka is smirking at you while Irina looks you over from head to toe shaking her head. Just as you''re about to ask what is going on, Irina cuts you off. "Save it, we don''t care. I don''t know what happened to you, but you use to be cool. Now? Well you made your choice, you''re out, no longer welcome to hang with us." With that Irina turns and walks away, Dimka gives you a final look and shakes his head.'
 	'"Now you''re back where you always belonged, as an outcast with the other losers." He says before leaving as well. You hear most of the rest of the students laughing, as you look around. Not being part of the popular clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>*You have lost your social group and become an outcast.*</font>'
-	grupTipe = 5
+
 	grupvalue[1] = 0
-	grupvalue[2] = 0
-	grupvalue[3] = 0
-	grupvalue[4] = 0
-	gs 'gschool_socialchg', 'group_rel_change','cool kids', -20
+	grupvalue[2] -= 50
+	grupvalue[3] -= 30
+	grupvalue[4] -= 10
+	
+	if grupvalue[2] < 0: grupvalue[2] = 0
+	if grupvalue[3] < 0: grupvalue[3] = 0
+	if grupvalue[4] < 0: grupvalue[4] = 0
+	
+	grupTipe = 5
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','cool kids', -20
 	gs 'stat'
 
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
-!!if grupvalue[2] <= 20 or lower and Sveta is currently a jock then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
+
 if $ARGS[0] = 'jock outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
 	'Christina, Lariska, and Lina walk up to you, Lariska and Lina are looking at you like you did something wrong, while Christina is smirking. She shoves you hard up against your locker. "What are you doing here slut? Shouldn''t you be in the boys bathroom sucking a bunch of cocks? We all heard that is all you do, suck cocks and let anyone fuck you, just like a whore. At least the whores know to get payed but you just give it away for free." She says, mockingly laughing, Lariska, Lina and several other students nearby join in, openly mocking you. "Stay away from us and go hang out with the other losers, I am sure you and Sonia have a lot in common now slut." Then she leans in close "Or I will show you what happens to sluts that don''t know their place." With that they turn and walk away. Not being part of the jock clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>*You have lost your social group and become an outcast.*</font>'
-	grupTipe = 5
-	grupvalue[1] = 0
+	
+	grupvalue[1] -= 50
 	grupvalue[2] = 0
-	grupvalue[3] = 0
-	grupvalue[4] = 0
-	gs 'gschool_socialchg', 'group_rel_change','jocks', -20
+	grupvalue[3] -= 30
+	grupvalue[4] -= 20
+	
+	if grupvalue[1] < 0: grupvalue[1] = 0
+	if grupvalue[3] < 0: grupvalue[3] = 0
+	if grupvalue[4] < 0: grupvalue[4] = 0
+	
+	grupTipe = 5
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','jocks', -20
 	gs 'stat'
 
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
-!!if grupvalue[3] <= 20 or lower and Sveta is currently a nerd then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
+
 if $ARGS[0] = 'nerd outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
 	'A couple of students stand infront of you, wanting to get a better look at the slut based on what''s written on your locker, when you look at them they start laughing and then quickly hurry away from you as if you''ve been struck with the plague. You turn and try to find some of your friends, most seem to be hiding or when they see you coming hurry off. You finally manage to catch up to Gerasim. As you''re about to say something he turns to you. "Please go away, I don''t know what got into you. But the things they say you have done." He looks disgusted. "I''m sorry but I can''t be seen hanging out with you, I''ve got enough problems without you making it worse." When he notices the dejected look on your face as he''s told you off, ending with that you are an outcast he sighs a little. "I''m sorry I really am, but this is your own fault, I don''t know what you were thinking doing all those sex things and I don''t care, but please leave me alone." The last part he says loudly enough for others to hear, which causes some of the other students to laugh at you, as he wheels himself away from you decidedly. As you look around, most of the other students either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>*You have lost your social group and become an outcast.*</font>'
-	grupTipe = 5
-	grupvalue[1] = 0
-	grupvalue[2] = 0
+	
+	grupvalue[1] -= 50
+	grupvalue[2] -= 30
 	grupvalue[3] = 0
-	grupvalue[4] = 0
-	gs 'gschool_socialchg', 'group_rel_change','nerds', -20
+	grupvalue[4] -= 40
+	
+	if grupvalue[1] < 0: grupvalue[1] = 0
+	if grupvalue[2] < 0: grupvalue[2] = 0
+	if grupvalue[4] < 0: grupvalue[4] = 0
+	
+	grupTipe = 5
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','nerds', -20
 	gs 'stat'
 
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
 end
-!!if grupvalue[4] <= 20 or lower and Sveta is currently a gopnik then this happens.
-!!If the above is true then the next day Sveta goes to school when she first goes inside the school this triggers.
+
 if $ARGS[0] = 'gopnik outcast':
 	cla & *clr
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/events/outcast.jpg"></center>'
 	'Paulina, Lera, and Lena are standing next to you. Lera is snickering, Paulina looks annoyed, just like she''s preparing to beat you up while Lera looks at you with disgust. Paulina shakes her head at you and finally speaks up. "I don''t know what your problem is, but apparently hanging out, partying and having a good time wasn''t enough for you. No you had to go around and be the pathetic town slut. Don''t act all surprised, we''ve all heard about how you will let any guy fuck you in whatever hole they desire. Spineless sluts have no place with us, so stay the fuck away from us or I will beat the shit out of you." With that Paulina shoves you against you locker and walks away. Lena gives you a final look of disgust and shoves you once again while Lera gives you a few parting words before walking away. "If you ever get the idea to approach us, we will feed you to some guys that will pull a train on you so hard, one even a slut like you won''t enjoy." Not being part of the gopnik clique anymore the other students are ready to prey on your weakness as they either start mocking you or actively look away. You grab your stuff and hurry to your next class.'
 	'<font color = red>*You have lost your social group and become an outcast.*</font>'
-	grupTipe = 5
-	grupvalue[1] = 0
-	grupvalue[2] = 0
-	grupvalue[3] = 0
+	
+	grupvalue[1] -= 40
+	grupvalue[2] -= 30
+	grupvalue[3] -= 50
 	grupvalue[4] = 0
-	gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
+	
+	if grupvalue[1] < 0: grupvalue[1] = 0
+	if grupvalue[2] < 0: grupvalue[2] = 0
+	if grupvalue[3] < 0: grupvalue[3] = 0
+	
+	grupTipe = 5
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
 	gs 'stat'
 
 	act 'Go to class': school_period = 0 & gt 'gschool_lessons', 'schedule'
@@ -433,6 +458,7 @@ if $ARGS[0] = 'keep_playing_on':
 end
 
 if $ARGS[0] = 'gopnik initiation':
+	*clr & cla
 	menu_off = 1
 	!!this should be a new option that shows up at the apartment complex garages at 20:00 hours if joining the gopniks triggered it. Once it is triggered it doesn''t show up again unless Sveta triggers the gopnik invite again for some reason.
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/events/gopnikinvite/lenameet.jpg"></center>'
@@ -521,7 +547,6 @@ if $ARGS[0] = 'walkoff':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/events/gopnikinvite/liqstoreout.jpg"></center>'
 	'You shake your head again. "Sorry I wasted your time then." With that you walk off, while Lena and Lera shout out all kind of names at you. You know you''ve made a target of yourself to the gopniks but you''re no thief. You don''t even know why you thought joining them was a good idea in the first place.'
 
-	!!have this auto dump you after the text back onto the residential street of Pavlovsk
 	act 'Leave the gang': gt 'pavResidential'
 end
 
@@ -622,18 +647,24 @@ if $ARGS[0] = 'noslut':
 	gs 'gschool_socialchg', 'group_rel_change','gopniks', -10
 	gs 'stat'
 
-	!!have this auto dump you after the text back onto the residential street of Pavlovsk
 	act 'Leave the gang': gt 'pavResidential'
 end
 
 if $ARGS[0] = 'gopnik party':
+	*clr & cla
 	menu_off = 1
-	grupvalue[2] -= 20
-	grupvalue[3] -= 20
-	grupvalue[1] -= 20
-	gs 'gschool_socialchg', 'group_rel_change','gopniks', 5
+	grupvalue[1] -= 50
+	grupvalue[2] -= 30
+	grupvalue[3] -= 50
+		
+	if grupTipe = 1 or grupvalue[1] < 0: grupvalue[1] = 0
+	if grupTipe = 2 or grupvalue[2] < 0: grupvalue[2] = 0
+	if grupTipe = 3 or grupvalue[3] < 0: grupvalue[3] = 0
+				
 	grupTipe = 4
 
+!!	gs 'gschool_socialchg', 'group_rel_change','gopniks', 5
+
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/hall.jpg"></center>'
 	'You follow Lena and Lera who talk the whole way about how awesome that was and about how you did a good job. Upon arriving at old school, Lena and Lara slip through the busted front door, down the main hallway. Straight to see Vitek, who is waiting in the old school offices, with the rest of the gopniks.'
 	minut += 10
@@ -1307,6 +1338,7 @@ if $ARGS[0] = 'tRadomir':
 end
 
 if $ARGS[0] = 'tValentin':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big43.jpg"></center>'
 	'You approach Valentin. He smiles and greets you, "Hi <<$pcs_nickname>>. Are you enjoying yourself?"'
 	'You smile back and greet him back, "Hi Valentin. Yeah, it''s been pretty fun so far."'
@@ -1368,6 +1400,7 @@ if $ARGS[0] = 'tValentin':
 end
 
 if $ARGS[0] = 'tArkadi':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big41.jpg"></center>'
 	'You notice Arkadi doesn''t seem to be all that happy, as he listens to Radomir. You approach him, wanting to cheer him up, "What''s up?" you ask.'
 	'Arkadi looks at you, spits on the side and says, "Nothing much. Just another boring day here in Pavlovsk. Man this place sucks monkey balls."'
@@ -1404,6 +1437,7 @@ if $ARGS[0] = 'tArkadi':
 end
 
 if $ARGS[0] = 'tAnushka':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big144.jpg"></center>'
 	'You sit down on the sofa next to Anushka. She gives you a big grin, "Hiya <<$pcs_nickname>> what have you been up to?" You notice a blunt that''s been placed on the table.'
 	'You shrug your shoulders, "Nothing much. Been talking to people, having fun."'
@@ -1413,6 +1447,18 @@ if $ARGS[0] = 'tAnushka':
 	minut += 2
 	gs 'stat'
 
+	act 'No thanks':
+		*clr & cla
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/gophangout/party/smokemakeout.jpg"></center>'
+		'You shake your head, "No, no I''m not in the mood for that. I was just surprised there was anything of it left unsmoked."'
+		'Anushka smiles, and if to prove you right. Lites it up and takes a long drag off it. Then she grabs Alyona and they kiss or share smoke, or a bit of both for a bit."'
+		'Feeling a bit akward watching it you decided to leave. "Well, I should go mingle, you girls have fun." You are not even sure if they heard your or even care.'
+		minut += 2
+		gs 'stat'
+
+		act 'Move away': gt 'gschool_socialchg', 'lounge'
+	end
+	
 	act 'Sure':
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/gophangout/party/smoking.jpg"></center>'
@@ -1439,20 +1485,10 @@ if $ARGS[0] = 'tAnushka':
 			act 'Move away': gt 'gschool_socialchg', 'lounge'
 		end
 	end
-	act 'No thanks':
-		*clr & cla
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/gophangout/party/smokemakeout.jpg"></center>'
-		'You shake your head, "No, no I''m not in the mood for that. I was just surprised there was anything of it left unsmoked."'
-		'Anushka smiles, and if to prove you right. Lites it up and takes a long drag off it. Then she grabs Alyona and they kiss or share smoke, or a bit of both for a bit."'
-		'Feeling a bit akward watching it you decided to leave. "Well, I should go mingle, you girls have fun." You are not even sure if they heard your or even care.'
-		minut += 2
-		gs 'stat'
-
-		act 'Move away': gt 'gschool_socialchg', 'lounge'
-	end
 end
 
 if $ARGS[0] = 'tAlyona':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/gophangout/party/nushaly.jpg"></center>'
 	'You sit down on the sofa next to Alyona, while Anushka smiles at you and takes another long hit of the joint she is smoking. "So I''ve heard about that little adventure of yours earlier today. Must''ve been excited."'
 	'You nod, "Yeah, it was very fun. It was a pretty wild thing to do."'
@@ -1486,6 +1522,7 @@ end
 
 
 if $ARGS[0] = 'tEkaterina':
+	*clr & cla
 	'<center><img <<$set_imgh>> src="images/pc/npc_headshots/big46.jpg"></center>'
 	'Seeing Ekaterina standing by herself you walk over to her thinking about to check up if everything is alright with her.'
 	'"Is everything okay?" you ask as you come close.'
@@ -1531,15 +1568,25 @@ if $ARGS[0] = 'tEkaterina':
 end
 
 if $ARGS[0] = 'gopnik slut':
-	grupvalue[2] -= 20
-	grupvalue[3] -= 20
-	grupvalue[1] -= 20
-	gs 'gschool_socialchg', 'group_rel_change','gopniks', 5
+	*clr & cla
+	menu_off = 1
+	minut += 10
+	gs 'stat'
+	grupvalue[1] -= 50
+	grupvalue[2] -= 30
+	grupvalue[3] -= 50
+		
+	if grupTipe = 1 or grupvalue[1] < 0: grupvalue[1] = 0
+	if grupTipe = 2 or grupvalue[2] < 0: grupvalue[2] = 0
+	if grupTipe = 3 or grupvalue[3] < 0: grupvalue[3] = 0
+				
 	grupTipe = 4
+	
+!!	gs 'gschool_socialchg', 'group_rel_change','gopniks', 5
+
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/oldschool/hall.jpg"></center>'
 	'You follow Lena and Lera who don''t really talk to you during the walk to the old school, you get the feeling you might have made a mistake. But you agreed to be the party slut and you are not sure they would even let you backout now. Once at the old school they slip through the busted front door, down the main hallway, that leads to the old offices and teachers lounge.'
-	minut += 10
-	gs 'stat'
+	
 
 	act 'Join the party':
 		cla & *clr
@@ -1723,14 +1770,15 @@ if $ARGS[0] = 'group_rel_change':
 	if $ARGS[1] = 'gopniks': ntemp = 4
 	if $ARGS[1] = 'outcasts': ntemp = 5
 	if $ARGS[1] = 'teachers': ntemp = 6
-	temp = arrsize('grupTipe')
-:gs_socloop
-	temp -= 1
-	if grupTipe[temp] = ntemp:
-		npc_rel[$school_static_num[temp]] += ARGS[2]
-		npc_rel[$school_static_num[temp]] = min(npc_rel[$school_static_num[temp]],100)
-		npc_rel[$school_static_num[temp]] = max(npc_rel[$school_static_num[temp]],0)
+	temp = arrsize('npc_dna')
+	
+	:gs_socloop
+	if npc_grupTipe['A<<temp>>'] = ntemp:
+		npc_rel['A<<temp>>'] += ARGS[2]
+		npc_rel['A<<temp>>'] = min(npc_rel['A<<temp>>'],100)
+		npc_rel['A<<temp>>'] = max(npc_rel['A<<temp>>'],0)
 	end
+	temp -= 1
 	if temp > 1: jump 'gs_socloop'
 end