More admin thunderdome stuff. Added teleport to observer and admin areas, also teleporting to the thunderdome now drops all of your crap.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@91 316c924e-a436-60f5-8080-3fe189b3f50e

code/defines/area/Space Station 13 areas.dm

@@ -420,10 +420,14 @@
 	name = "Thunderdome (Team 2)"
 	icon_state = "yellow"
 
-/area/tdome/tdomea
+/area/tdome/tdomeadmin
 	name = "Thunderdome (Admin.)"
 	icon_state = "purple"
 
+/area/tdome/tdomeobserve
+	name = "Thunderdome (Observer.)"
+	icon_state = "purple"
+
 /area/medical/medbay
 	name = "Medbay"
 	icon_state = "medbay"

code/defines/global.dm

@@ -107,6 +107,8 @@ var
 	list/mazewarp = list()
 	list/tdome1 = list()
 	list/tdome2 = list()
+	list/tdomeobserve = list()
+	list/tdomeadmin = list()
 	list/prisonsecuritywarp = list()	//prison security goes to these
 	list/prisonwarped = list()	//list of players already warped
 	list/blobstart = list()

code/game/landmarks.dm

@@ -42,6 +42,10 @@
 		tdome1	+= src.loc
 	if (name == "tdome2")
 		tdome2 += src.loc
+	if (name == "tdomeadmin")
+		tdomeadmin	+= src.loc
+	if (name == "tdomeobserve")
+		tdomeobserve += src.loc
 	//not prisoners
 	if (name == "prisonsecuritywarp")
 		prisonsecuritywarp += src.loc

code/modules/admin/admin.dm

@@ -413,38 +413,99 @@ var/showadminmessages = 1
 	if (href_list["tdome1"])
 		if ((src.rank in list( "Administrator", "Secondary Administrator", "Primary Administrator", "Shit Guy", "Coder", "Host"  )))
 			var/mob/M = locate(href_list["tdome1"])
-			for(var/obj/item/W in M)
+			if (ismob(M))
-				if (istype(W,/obj/item))
+				if(istype(M, /mob/living/silicon/ai))
-					M.u_equip(W)
+					alert("The AI can't be sent to the thunderdome you jerk!", null, null, null, null, null)
-					if (M.client)
+					return
-						M.client.screen -= W
+				for(var/obj/item/W in M)
-					if (W)
+					if (istype(W,/obj/item))
-						W.loc = M.loc
+						if(istype(W, /datum/organ/external))
-						W.dropped(M)
+							continue
-						W.layer = initial(W.layer)
+						M.u_equip(W)
-			// M.revive()
+						if (M.client)
-			M.loc = pick(tdome1)
+							M.client.screen -= W
-			log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Team 1)")
+						if (W)
-			message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Team 1)", 1)
+							W.loc = M.loc
-			M << "\blue You have been sent to the Thunderdome."
+							W.dropped(M)
+							W.layer = initial(W.layer)
+				M.paralysis += 5
+				sleep(5)
+				M.loc = pick(tdome1)
+				spawn(50)
+					M << "\blue You have been sent to the Thunderdome."
+				log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Team 1)")
+				message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Team 1)", 1)
 
 	if (href_list["tdome2"])
 		if ((src.rank in list( "Administrator", "Secondary Administrator", "Primary Administrator", "Shit Guy", "Coder", "Host"  )))
 			var/mob/M = locate(href_list["tdome2"])
-			for(var/obj/item/W in M)
+			if (ismob(M))
-				if (istype(W,/obj/item))
+				if(istype(M, /mob/living/silicon/ai))
-					M.u_equip(W)
+					alert("The AI can't be sent to the thunderdome you jerk!", null, null, null, null, null)
-					if (M.client)
+					return
-						M.client.screen -= W
+				for(var/obj/item/W in M)
-					if (W)
+					if (istype(W,/obj/item))
-						W.loc = M.loc
+						if(istype(W, /datum/organ/external))
-						W.dropped(M)
+							continue
-						W.layer = initial(W.layer)
+						M.u_equip(W)
-			// M.revive()
+						if (M.client)
-			M.loc = pick(tdome2)
+							M.client.screen -= W
-			log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Team 2)")
+						if (W)
-			message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Team 2)", 1)
+							W.loc = M.loc
-			M << "\blue You have been sent to the Thunderdome."
+							W.dropped(M)
+							W.layer = initial(W.layer)
+				M.paralysis += 5
+				sleep(5)
+				M.loc = pick(tdome2)
+				spawn(50)
+					M << "\blue You have been sent to the Thunderdome."
+				log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Team 2)")
+				message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Team 2)", 1)
+
+	if (href_list["tdomeadmin"])
+		if ((src.rank in list( "Administrator", "Secondary Administrator", "Primary Administrator", "Shit Guy", "Coder", "Host"  )))
+			var/mob/M = locate(href_list["tdomeadmin"])
+			if (ismob(M))
+				if(istype(M, /mob/living/silicon/ai))
+					alert("The AI can't be sent to the thunderdome you jerk!", null, null, null, null, null)
+					return
+				M.paralysis += 5
+				sleep(5)
+				M.loc = pick(tdomeadmin)
+				spawn(50)
+					M << "\blue You have been sent to the Thunderdome."
+				log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Admin.)")
+				message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Admin.)", 1)
+
+	if (href_list["tdomeobserve"])
+		if ((src.rank in list( "Administrator", "Secondary Administrator", "Primary Administrator", "Shit Guy", "Coder", "Host"  )))
+			var/mob/M = locate(href_list["tdomeobserve"])
+			if (ismob(M))
+				if(istype(M, /mob/living/silicon/ai))
+					alert("The AI can't be sent to the thunderdome you jerk!", null, null, null, null, null)
+					return
+				for(var/obj/item/W in M)
+					if (istype(W,/obj/item))
+						if(istype(W, /datum/organ/external))
+							continue
+						M.u_equip(W)
+						if (M.client)
+							M.client.screen -= W
+						if (W)
+							W.loc = M.loc
+							W.dropped(M)
+							W.layer = initial(W.layer)
+				if(istype(M, /mob/living/carbon/human))
+					var/mob/living/carbon/human/observer = M
+					observer.equip_if_possible(new /obj/item/clothing/under/suit_jacket(observer), observer.slot_w_uniform)
+					observer.equip_if_possible(new /obj/item/clothing/shoes/black(observer), observer.slot_shoes)
+				M.paralysis += 5
+				sleep(5)
+				M.loc = pick(tdomeobserve)
+				spawn(50)
+					M << "\blue You have been sent to the Thunderdome."
+				log_admin("[key_name(usr)] has sent [key_name(M)] to the thunderdome. (Observer.)")
+				message_admins("[key_name_admin(usr)] has sent [key_name_admin(M)] to the thunderdome. (Observer.)", 1)
 
 	if (href_list["adminauth"])
 		if ((src.rank in list( "Administrator", "Secondary Administrator", "Primary Administrator", "Shit Guy", "Coder", "Host"  )))
@@ -560,6 +621,8 @@ var/showadminmessages = 1
 					foo += text("<A HREF='?src=\ref[src];makeai=\ref[M]'>Make AI</A> | ")
 				foo += text("<A HREF='?src=\ref[src];tdome1=\ref[M]'>Thunderdome 1</A> | ")
 				foo += text("<A HREF='?src=\ref[src];tdome2=\ref[M]'>Thunderdome 2</A> | ")
+				foo += text("<A HREF='?src=\ref[src];tdomeadmin=\ref[M]'>Thunderdome Admin</A> | ")
+				foo += text("<A HREF='?src=\ref[src];tdomeobserve=\ref[M]'>Thunderdome Observer</A> | ")
 				foo += text("<A HREF='?src=\ref[src];sendtoprison=\ref[M]'>Prison</A> | ")
 				foo += text("<A HREF='?src=\ref[src];sendtomaze=\ref[M]'>Maze</A> | ")