Adds jani/paranormal ERT and more

code/modules/admin/secrets.dm

@@ -68,9 +68,10 @@
 					<h2><B>IC Events</B></h2>
 					<b>Teams</b><br>
 					<A href='?src=[UID()];secretsfun=infiltrators_syndicate'>Send SIT - Syndicate Infiltration Team</A>&nbsp;&nbsp;
-					<BR><A href='?src=[UID()];secretsfun=striketeam'>Send in the Deathsquad</A>&nbsp;&nbsp;
 					<A href='?src=[UID()];secretsfun=striketeam_syndicate'>Send in a Syndie Strike Team</A>&nbsp;&nbsp;
+					<BR><A href='?src=[UID()];secretsfun=striketeam'>Send in the Deathsquad</A>&nbsp;&nbsp;
 					<A href='?src=[UID()];secretsfun=honksquad'>Send in a HONKsquad</A><BR>
+					<A href='?src=[UID()];secretsfun=gimmickteam'>Send in a Gimmick Team</A><BR>
 					<b>Change Security Level</b><BR>
 					<A href='?src=[UID()];secretsfun=securitylevel0'>Security Level - Green</A>&nbsp;&nbsp;
 					<A href='?src=[UID()];secretsfun=securitylevel1'>Security Level - Blue</A>&nbsp;&nbsp;

code/modules/admin/topic.dm

@@ -2524,6 +2524,10 @@
 				if(usr.client.syndicate_infiltration_team())
 					feedback_inc("admin_secrets_fun_used",1)
 					feedback_add_details("admin_secrets_fun_used","SyndieInfiltrationTeam")
+			if("gimmickteam")
+				if(usr.client.gimmick_team())
+					feedback_inc("admin_secrets_fun_used",1)
+					feedback_add_details("admin_secrets_fun_used","GimmickTeam")
 			if("tripleAI")
 				usr.client.triple_ai()
 				feedback_inc("admin_secrets_fun_used",1)

code/modules/admin/verbs/gimmick_team.dm

@@ -0,0 +1,84 @@
+// Gimmick Team
+// Spawns a group of player-controlled mobs with an outfit specified by the admin, at their location.
+
+/client/proc/gimmick_team()
+	set category = "Event"
+	set name = "Send Gimmick Team"
+	set desc = "Spawns a group of players in the specified outfit."
+	if(!check_rights(R_EVENT))
+		return
+	if(!ticker)
+		alert("The game hasn't started yet!")
+		return
+	if(alert("Do you want to spawn a Gimmick Team at YOUR CURRENT LOCATION?",,"Yes","No")=="No")
+		return
+	var/pick_manually = 0
+	if(alert("Pick the team members manually? If you select yes, you pick from ghosts. If you select no, ghosts get offered the chance to join.",,"Yes","No")=="Yes")
+		pick_manually = 1
+	var/list/teamsizeoptions = list(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
+	var/teamsize = input(src, "How many team members?") as null|anything in teamsizeoptions
+	if(!(teamsize in teamsizeoptions))
+		alert("Invalid team size specified. Aborting.")
+		return
+	var/themission = null
+	while(!themission)
+		themission = sanitize(copytext(input(src, "Please specify a briefing message for the team.", "Specify Mission", ""),1,MAX_MESSAGE_LEN))
+		if(!themission)
+			alert("No mission specified. Aborting.")
+			return
+	var/admin_outfits = subtypesof(/datum/outfit/admin)
+	var/outfit_list = list()
+	for(var/type in admin_outfits)
+		var/datum/outfit/admin/O = type
+		outfit_list[initial(O.name)] = type
+	var/dresscode = input("Select Outfit", "Dress-a-mob") as null|anything in outfit_list
+	if(isnull(dresscode))
+		return
+
+	var/list/players_to_spawn = list()
+	if(pick_manually)
+		var/list/possible_ghosts = list()
+		for(var/mob/dead/observer/G in player_list)
+			if(!G.client.is_afk())
+				if(!(G.mind && G.mind.current && G.mind.current.stat != DEAD))
+					possible_ghosts += G
+		for(var/i=teamsize,(i>0&&possible_ghosts.len),i--) //Decrease with every member selected.
+			var/candidate = input("Pick characters to spawn. This will go on until there either no more ghosts to pick from, or the slots are full.", "Active Players") as null|anything in possible_ghosts // auto-picks if only one candidate
+			possible_ghosts -= candidate
+			players_to_spawn += candidate
+	else
+		to_chat(src, "Polling candidates...")
+		players_to_spawn = pollCandidates("Do you want to play as an event character?")
+
+	if(!players_to_spawn.len)
+		to_chat(src, "Nobody volunteered.")
+		return 0
+
+	var/datum/outfit/O = outfit_list[dresscode]
+	var/turf/T = get_turf(mob)
+	for(var/mob/thisplayer in players_to_spawn)
+		var/mob/living/carbon/human/H = new /mob/living/carbon/human(T)
+		H.name = random_name(pick(MALE,FEMALE))
+		var/datum/preferences/A = new() //Randomize appearance
+		A.real_name = H.name
+		A.copy_to(H)
+		H.dna.ready_dna(H)
+
+		H.mind_initialize()
+		H.mind.assigned_role = "MODE"
+		H.mind.special_role = "Event Character"
+		ticker.mode.traitors |= H.mind //Adds them to extra antag list
+
+		H.key = thisplayer.key
+
+		H.equipOutfit(O, FALSE)
+
+		to_chat(H, "<BR><span class='danger'><B>[themission]</B></span>")
+
+
+	message_admins("[key_name_admin(src)] has spawned a Gimmick Team.", 1)
+	log_admin("[key_name(src)] used Spawn Gimmick Team.")
+	feedback_add_details("admin_verb","SPAWNGIM") //If you are copy-pasting this, ensure the 2nd parameter is unique to the new proc!
+
+// ---------------------------------------------------------------------------------------------------------
+