[added] flags for having joined a different social group + flags for which social group Sveta was in before ending up as an outcast

locations/gschool_socialchg.qsrc

@@ -115,6 +115,7 @@ if $ARGS[0] = 'coolkid':
 		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
 		
 		grupTipe = 1
+		grupTipe['joined_cool'] = 1
 		
 !!		gs 'gschool_socialchg', 'group_rel_change','cool kids', 5
 		gs 'stat'
@@ -156,6 +157,7 @@ if $ARGS[0] = 'jock':
 		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
 		
 		grupTipe = 2
+		grupTipe['joined_jock'] = 1
 		
 !!		gs 'gschool_socialchg', 'group_rel_change','jocks', 5
 		gs 'stat'
@@ -196,6 +198,7 @@ if $ARGS[0] = 'nerd':
 		if grupTipe = 4 or grupvalue[4] < 0: grupvalue[4] = 0
 				
 		grupTipe = 3
+		grupTipe['joined_nerd'] = 1
 		
 		nerd_night_game = 1
 		nerd_night_game_day = daystart
@@ -256,6 +259,7 @@ if $ARGS[0] = 'coolkid outcast':
 	if grupvalue[4] < 0: grupvalue[4] = 0
 	
 	grupTipe = 5
+	grupTipe['before_outcast'] = 1
 	
 !!	gs 'gschool_socialchg', 'group_rel_change','cool kids', -20
 	gs 'stat'
@@ -280,6 +284,7 @@ if $ARGS[0] = 'jock outcast':
 	if grupvalue[4] < 0: grupvalue[4] = 0
 	
 	grupTipe = 5
+	grupTipe['before_outcast'] = 2
 	
 !!	gs 'gschool_socialchg', 'group_rel_change','jocks', -20
 	gs 'stat'
@@ -304,6 +309,7 @@ if $ARGS[0] = 'nerd outcast':
 	if grupvalue[4] < 0: grupvalue[4] = 0
 	
 	grupTipe = 5
+	grupTipe['before_outcast'] = 3
 	
 !!	gs 'gschool_socialchg', 'group_rel_change','nerds', -20
 	gs 'stat'
@@ -328,6 +334,7 @@ if $ARGS[0] = 'gopnik outcast':
 	if grupvalue[3] < 0: grupvalue[3] = 0
 	
 	grupTipe = 5
+	grupTipe['before_outcast'] = 4
 	
 !!	gs 'gschool_socialchg', 'group_rel_change','gopniks', -20
 	gs 'stat'
@@ -662,6 +669,7 @@ if $ARGS[0] = 'gopnik party':
 	if grupTipe = 3 or grupvalue[3] < 0: grupvalue[3] = 0
 				
 	grupTipe = 4
+	grupTipe['joined_gopnik'] = 1
 
 !!	gs 'gschool_socialchg', 'group_rel_change','gopniks', 5