Adds a paralyze button for easy administration.

code/modules/admin/admin.dm

@@ -1342,3 +1342,19 @@ proc/admin_notice(var/message, var/rights)
 			message_admins(msg)
 	else
 		usr << "You do not have access to this command."
+		
+/datum/admins/proc/paralyze_mob(mob/living/carbon/human/H as mob)
+	set category = "Admin"
+	set name = "Toggle Paralyze"
+	set desc = "Paralyzes a player. Or unparalyses them."
+	
+	var/msg
+	
+	if(check_rights(R_ADMIN|R_MOD))	
+		if (H.paralysis == 0)
+			H.paralysis = 1000
+			msg = "[key_name(usr)] has paralyzed [key_name(H)]."
+		else
+			H.paralysis = 0
+			msg = "[key_name(usr)] has unparalyzed [key_name(H)]."
+		message_admins(msg)

code/modules/admin/admin_verbs.dm

@@ -94,7 +94,8 @@ var/list/admin_verbs_admin = list(
 	/client/proc/change_human_appearance_self,	/* Allows the human-based mob itself change its basic appearance */
 	/client/proc/change_security_level,
 	/client/proc/view_chemical_reaction_logs,
-	/client/proc/makePAI
+	/client/proc/makePAI,
+	/datum/admins/proc/paralyze_mob
 )
 var/list/admin_verbs_ban = list(
 	/client/proc/unban_panel,
@@ -303,7 +304,8 @@ var/list/admin_verbs_mod = list(
 	/datum/admins/proc/show_player_panel,
 	/client/proc/check_antagonists,
 	/client/proc/jobbans,
-	/client/proc/cmd_admin_subtle_message 	/*send an message to somebody as a 'voice in their head'*/
+	/client/proc/cmd_admin_subtle_message, 	/*send an message to somebody as a 'voice in their head'*/
+	/datum/admins/proc/paralyze_mob
 )
 
 var/list/admin_verbs_mentor = list(