[fixes] Updated the custom start social group selector to the new system

locations/preSYS2.qsrc

@@ -394,11 +394,35 @@ end
 if $ARGS[0] = 'modgrup':
 	*clr & cla
 	'Your current social group is <<$soc_grup>>.'
-	act 'Nerd, Geek, Student': $soc_grup = 'nerd' & grupTipe = 3 & gt 'preSYS2','modgrup'
-	act 'Athlete, Jock':$soc_grup = 'jock'& grupTipe = 2 & gt 'preSYS2','modgrup'
-	act 'Popular, Cool, Beautiful':$soc_grup = 'cool' & grupTipe = 1 & gt 'preSYS2','modgrup'
-	act 'Gopnik, Rebel, Punk, Troublemaker':$soc_grup = 'gopnik' & grupTipe = 4 & gt 'preSYS2','modgrup'
-	act 'Outcast, Loser, Goth, Ugly':$soc_grup = 'outcast' & grupTipe = 5 & gt 'preSYS2','modgrup'
+	act 'Nerd, Geek, Student':
+		killvar 'grupvalue'
+		grupvalue[3] = 600
+		grupTipe = 3
+		gt 'preSYS2','modgrup'
+	end
+	act 'Athlete, Jock':
+		killvar 'grupvalue'
+		grupvalue[2] = 600
+		grupTipe = 2
+		gt 'preSYS2','modgrup'
+	end
+	act 'Popular, Cool, Beautiful':
+		killvar 'grupvalue'
+		grupvalue[1] = 600
+		grupTipe = 1
+		gt 'preSYS2','modgrup'
+	end
+	act 'Gopnik, Rebel, Punk, Troublemaker':
+		killvar 'grupvalue'
+		grupvalue[4] = 600
+		grupTipe = 4
+		gt 'preSYS2','modgrup'
+	end
+	act 'Outcast, Loser, Goth, Ugly':
+		killvar 'grupvalue'
+		grupTipe = 5
+		gt 'preSYS2','modgrup'
+	end
 	act 'Return':gt 'preSYS2','start'
 end