12/21 modernizations from TG live (#103)

* sync (#3)

* shuttle auto call

* Merge /vore into /master (#39)

* progress

* Compile errors fixed

No idea if it's test worthy tho as conflicts with race overhaul and
narky removal.

* Update admins.txt

* efforts continue

Fuck grab code, seriously

* grab code is cancer

* Execute the Narkism

Do not hesitate.

Show no mercy.

* holy shit grab code is awful

* have I bitched about grab code

My bitching, let me show you it

* código de agarre es una mierda

No really it is

* yeah I don't even know anymore.

* Lolnope. Fuck grab code

* I'm not even sure what to fix anymore

* Self eating is not an acceptable fate

* Taste the void, son.

* My code doesn't pass it's own sanity check.

Maybe it's a sign of things to come.

* uncommented and notes

* It Works and I Don't Know Why (#38)

* shuttle auto call

* it works and I don't know why

* Subsystem 12/21

Most Recent TG subsystem folder

* globalvars 12/21

Tossed out the flavor_misc and parallax files

* Onclick 12/21

as well as .dme updates

* _defines 12/21

ommited old _MC.dm

* _HELPERS 12/21

Preserved snowflake placement of furry sprites

* _defeines/genetics

reapplied narkism holdover for snowflake races.

* Oops forgot mutant colors

* modules porting 12/21 + Sounds/icons

Admin, Client and most of mob life files ommitted

* enviroment file

* Admin optimizations

ahelp log system kept

* Mob ports 12/21

Flavor text preserved

* datums ported 12/21

* Game ported 12/21

* batch of duplicate fixes/dogborg work

Dogborgs need to be modernized to refractored borg standards.

* moar fixes

* Maps and futher compile fixes

code/modules/events/ghost_role.dm

@@ -1,3 +1,6 @@
+#define MAX_SPAWN_ATTEMPT 3
+
+
 /datum/round_event/ghost_role
 	// We expect 0 or more /clients (or things with .key) in this list
 	var/list/priority_candidates = list()
@@ -8,18 +11,24 @@
 /datum/round_event/ghost_role/start()
 	try_spawning()
 
-/datum/round_event/ghost_role/proc/try_spawning(sanity = 0)
+/datum/round_event/ghost_role/proc/try_spawning(sanity = 0, retry = 0)
 	// The event does not run until the spawning has been attempted
 	// to prevent us from getting gc'd halfway through
 	processing = FALSE
 
 	var/status = spawn_role()
-	if(status == WAITING_FOR_SOMETHING)
+	if((status == WAITING_FOR_SOMETHING))
+		if(retry >= MAX_SPAWN_ATTEMPT)
+			message_admins("[role_name] event has exceeded maximum spawn attempts. Aborting and refunding.")
+			if(control && control.occurrences > 0)	//Don't refund if it hasn't
+				control.occurrences--
+			return
+		var/waittime = 300 * (2^retry)
 		message_admins("The event will not spawn a [role_name] until certain \
-			conditions are met. Waiting 30s and then retrying.")
-		spawn(300)
+			conditions are met. Waiting [waittime/10]s and then retrying.")
+		spawn(waittime)
 			// I hope this doesn't end up running out of stack space
-			try_spawning()
+			try_spawning(0,++retry)
 		return
 
 	if(status == MAP_ERROR)
@@ -60,3 +69,4 @@
 
 	return candidates
 
+#undef MAX_SPAWN_ATTEMPT