////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
//////Freeze Mob/Mech Verb -- Ported from NSS Pheonix (Unbound Travels)/////////
////////////////////////////////////////////////////////////////////////////////
//////Allows admin's to right click on any mob/mech and freeze them in place.///
////////////////////////////////////////////////////////////////////////////////
////////////////////////////////////////////////////////////////////////////////
/client/proc/freeze(mob/living/M as mob in mob_list)
	set category = "Special Verbs"
	set name = "Freeze"
	if(!holder)
		src << "Only administrators may use this command."
		return
	if(!mob)
		return
	if(!istype(M))
		alert("Cannot freeze a ghost")
		return
	if(usr)
		if (usr.client)
			if(usr.client.holder)
				if (istype(M, /mob/living/carbon/slime))
					if(!M.paralysis)
						M.adjustToxLoss(2147483647)
						M.AdjustParalysis(2147483647)
						var/adminomaly = new/obj/effect/overlay/adminoverlay
						spawn(50)
							M.overlays += adminomaly
						M << "<b><font color= red>You have been frozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] froze [key_name(M)]")
						log_admin("[key_name(usr)] froze [key_name(M)]")
					else if (M.paralysis)
						M.AdjustParalysis(-2147483647)
						M.blinded = 0
						M.lying = 0
						M.stat = 0
						M << "<b> <font color= red>You have been unfrozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] unfroze [key_name(M)]")
						log_admin("[key_name(usr)] unfroze [key_name(M)]")
						M.revive()
				else if (istype(M, /mob/living/carbon/human))
					var/mob/living/carbon/human/FM = M

					if(!FM.paralysis)
						FM.anchored = 1
						FM.frozen = 1
						FM.AdjustParalysis(2147483647)
						var/adminomaly = new/obj/effect/overlay/adminoverlay
						spawn(50)
							FM.overlays += adminomaly
						FM << "<b><font color= red>You have been frozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] froze [key_name(FM)]")
						log_admin("[key_name(usr)] froze [key_name(FM)]")
					else if (M.paralysis)
						FM.anchored = 0
						FM.frozen = 0
						FM.AdjustParalysis(-2147483647)
						FM.blinded = 0
						FM.lying = 0
						FM.stat = 0

						FM << "<b> <font color= red>You have been unfrozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] unfroze [key_name(FM)]")
						log_admin("[key_name(usr)] unfroze [key_name(FM)]")

				else

					if(!M.paralysis)
						M.anchored = 1
						M.AdjustParalysis(2147483647)
						var/adminomaly = new/obj/effect/overlay/adminoverlay
						spawn(50)
							M.overlays += adminomaly
						M << "<b><font color= red>You have been frozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] froze [key_name(M)]")
						log_admin("[key_name(usr)] froze [key_name(M)]")
					else if (M.paralysis)
						M.anchored = 0
						M.AdjustParalysis(-2147483647)
						M.blinded = 0
						M.lying = 0
						M.stat = 0

						M << "<b> <font color= red>You have been unfrozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
						message_admins("\blue [key_name_admin(usr)] unfroze [key_name(M)]")
						log_admin("[key_name(usr)] unfroze [key_name(M)]")


/client/proc/freezemecha(obj/mecha/O as obj in mechas_list)
	set category = "Special Verbs"
	set name = "Freeze Mech"
	if(!holder)
		src << "Only administrators may use this command."
		return
	var/obj/mecha/M = O
	if(!istype(M,/obj/mecha))
		src << "\red <b>This can only be used on Mechs!</b>"
		return
	else
		if(usr)
			if (usr.client)
				if(usr.client.holder)
					var/adminomaly = new/obj/effect/overlay/adminoverlay
					if(M.can_move == 1)
						M.can_move = 0
						M.overlays += adminomaly
						if(M.occupant)
							M.removeVerb(/obj/mecha/verb/eject)
							M.occupant << "<b><font color= red>You have been frozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
							message_admins("\blue [key_name_admin(usr)] froze [key_name(M.occupant)] in a [M.name]")
							log_admin("[key_name(usr)] froze [key_name(M.occupant)] in a [M.name]")
						else
							message_admins("\blue [key_name_admin(usr)] froze an empty [M.name]")
							log_admin("[key_name(usr)] froze an empty [M.name]")
					else if(M.can_move == 0)
						M.can_move = 1
						M.overlays -= adminomaly
						if(M.occupant)
							M.addVerb(/obj/mecha/verb/eject)
							M.occupant << "<b><font color= red>You have been unfrozen by <a href='?priv_msg=\ref[usr.client]'>[key]</a></b></font>"
							message_admins("\blue [key_name_admin(usr)] unfroze [key_name(M.occupant)] in a [M.name]")
							log_admin("[key_name(usr)] unfroze [M.occupant.name]/[M.occupant.ckey] in a [M.name]")
						else
							message_admins("\blue [key_name_admin(usr)] unfroze an empty [M.name]")
							log_admin("[key_name(usr)] unfroze an empty [M.name]")