gschool_socialchg - fourth revision

locations/gdkkru

@@ -25,6 +25,8 @@ act 'Leave': gt 'gdk'
 
 act 'Go to the toilets': gt 'gdktoilet', 'start'
 
+if nerd_night_game = 1 and nerd_night_game_day = daystart and hour = 20: act '<b>Join nerds</b>': gt 'gschool_socialchg','nerd game night'
+
 if hour >= 12 and hour <= 20:
 'At this time of day the community center operates various clubs.'
 

locations/gschool_socialchg

@@ -12,6 +12,19 @@ if $ARGS[0] = 'test':
 	if grupvalue[2] < 20 and grupTipe = 2: gt 'gschool_socialchg', 'jock outcast'
 	if grupvalue[3] < 20 and grupTipe = 3: gt 'gschool_socialchg', 'nerd outcast'
 	if grupvalue[4] < 20 and grupTipe = 4: gt 'gschool_socialchg', 'gopnik outcast'
+	if nerd_night_game = 1 and nerd_night_game_day ! daystart:
+		killvar 'nerd_night_game'
+		killvar 'nerd_night_game_day'
+		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
+		!! next week ?
+	end
+	if gopnik_initiation = 1 and gopnik_initiation_day ! daystart:
+		killvar 'gopnik_initiation'
+		killvar 'gopnik_initiation_day'
+		gs 'gschool_socialchg', 'group_rel_change','outcasts', -5
+		!! one chance more?
+	end
+
 end
 
 !!if Pav_slut >= 125 and a cool kid, nerd, or jock.
@@ -147,6 +160,8 @@ if $ARGS[0] = 'nerd':
 		grupvalue[4] -= 20
 		gs 'gschool_socialchg', 'group_rel_change','nerds', -5
 		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'
@@ -279,6 +294,8 @@ end
 
 if $ARGS[0] = 'nerd game night':
 	cla & *clr
+	killvar 'nerd_night_game'
+	killvar 'nerd_night_game_day'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/library/events/gamenight.jpg"></center>'
 	'Upon entering the room everyone freezes and looks your way. You can feel the anxious gazes as you greet the group sitting around the table having a large map spread across it, small little figures, varies papers, books, and lots and lots of dice..'
 	'As you''re about to ask what they''re doing Feofan speaks up, "Welcome to our little game night <<$pcs_nickname>>! Please take a seat and I will explain the rules to you."'

locations/stat_display

@@ -1187,6 +1187,7 @@ if StoryLine = 1:
 
 	if week = 6 and hour < 9 and detention_set = 1:$stat_msg += '<BR><b>You have a detention this morning and must be at school between 8 and 9.</b>'
 	if gopnik_initiation = 1 and gopnik_initiation_day = daystart and hour > 15 and hour < 21: $stat_msg += '<BR><b>Meet Lena and Lera at the apartment garages at eight</b>'
+	if nerd_night_game = 1 and nerd_night_game_day = daystart and hour > 15 and hour < 21: $stat_msg += '<BR><b>Join nerds at the community center at eight</b>'
 end
 
 if model > 0 and model_week = (daystart - week) / 7: