Xenomorph highpop spawn balance (#12508)

code/modules/events/alien_infestation.dm

@@ -1,6 +1,8 @@
 /datum/event/alien_infestation
 	announceWhen	= 400
+	var/highpop_trigger = 80
 	var/spawncount = 2
+	var/list/playercount
 	var/successSpawn = 0	//So we don't make a command report if nothing gets spawned.
 
 /datum/event/alien_infestation/setup()
@@ -12,6 +14,9 @@
 
 /datum/event/alien_infestation/start()
 	var/list/vents = list()
+	playercount = length(GLOB.clients)//grab playercount when event starts not when game starts
+	if(playercount >= highpop_trigger) //spawn with 4 if highpop
+		spawncount = 4
 	for(var/obj/machinery/atmospherics/unary/vent_pump/temp_vent in world)
 		if(is_station_level(temp_vent.loc.z) && !temp_vent.welded)
 			if(temp_vent.parent.other_atmosmch.len > 50)	//Stops Aliens getting stuck in small networks. See: Security, Virology