From 7ddb19c86d2bbf41c48ff346b759466cf9e1849c Mon Sep 17 00:00:00 2001
From: SoundScopes <Musical.Flow@LIve.com>
Date: Tue, 14 Oct 2014 07:46:44 +0100
Subject: [PATCH] New admin Verbs

FillSpace & Clear Toxins
---
 code/modules/admin/admin_verbs.dm | 43 ++++++++++++++++++++++++++++++-
 1 file changed, 42 insertions(+), 1 deletion(-)

diff --git a/code/modules/admin/admin_verbs.dm b/code/modules/admin/admin_verbs.dm
index 4b129c56..2560e1e9 100644
--- a/code/modules/admin/admin_verbs.dm
+++ b/code/modules/admin/admin_verbs.dm
@@ -188,7 +188,9 @@ var/list/admin_verbs_debug = list(
 	/client/proc/toggledebuglogs,
 	/client/proc/SDQL_query,
 	/client/proc/SDQL2_query,
-	/client/proc/cmd_dev_reset_gravity
+	/client/proc/cmd_dev_reset_gravity,
+	/client/proc/cleartox,
+	/client/proc/fillspace
 	)
 var/list/admin_verbs_possess = list(
 	/proc/possess,
@@ -961,3 +963,42 @@ var/list/admin_verbs_mod = list(
 		usr << "You now will get advanced debug logs"
 	else
 		usr << "You now won't get advanced debug logs"
+
+/client/proc/cleartox()
+	set category = "Special Verbs"
+	set name = "Clear Toxin/Fire in Zone"
+	if(!check_rights(R_DEBUG))
+		return
+
+	var/datum/gas_mixture/environment = usr.loc.return_air()
+	environment.toxins_archived = null
+	environment.toxins = 0
+	environment.carbon_dioxide = 0
+	environment.carbon_dioxide_archived = null
+	environment.oxygen = 21.8366
+	environment.oxygen_archived = null
+	environment.nitrogen = 82.1472
+	environment.nitrogen_archived = null
+	environment.temperature_archived = null
+	environment.temperature = 293.15
+	environment.update_values()
+	var/turf/simulated/location = get_turf(usr)
+	if(location.zone)
+		for(var/turf/T in location.zone.contents)
+			for(var/obj/fire/F in T.contents)
+				del(F)
+		for(var/obj/fire/FF in world)
+			del(FF)
+
+/client/proc/fillspace()
+	set category = "Special Verbs"
+	set name = "Fill Space with floor"
+	if(!check_rights(R_DEBUG))
+		return
+	var/area/location = usr.loc.loc
+	if(location.name != "Space")
+		for(var/turf/space/S in location)
+			S.ChangeTurf(/turf/simulated/floor/plating)
+	if(location.name == "Space")
+		for(var/turf/space/S in range(2,usr.loc))
+			S.ChangeTurf(/turf/simulated/floor/plating)
\ No newline at end of file