NEW DEBUG TOOL:

- A mapping debug proc which overlays the map where the areas where intercoms can listen. NOT FOR INGAME USE! It is also rather processor heavy and will take about 5s or so to process everything.

git-svn-id: http://tgstation13.googlecode.com/svn/trunk@1162 316c924e-a436-60f5-8080-3fe189b3f50e
This commit is contained in:
baloh.matevz
2011-03-06 00:43:16 +00:00
parent 1d0d835710
commit 755b282d83
2 changed files with 36 additions and 4 deletions

View File

@@ -87,8 +87,10 @@
src.verbs += /obj/admins/proc/toggletintedweldhelmets
// Mapping helpers
src.verbs += /client/proc/camera_view
src.verbs += /client/proc/sec_camera_report
src.verbs += /client/proc/do_not_use_these //-errorage
src.verbs += /client/proc/camera_view //-errorage
src.verbs += /client/proc/sec_camera_report //-errorage
src.verbs += /client/proc/intercom_view //-errorage
// Admin helpers
src.verbs += /client/proc/cmd_admin_attack_log

View File

@@ -20,6 +20,7 @@
//- Check if the area has too much empty space. If so, make it smaller and replace the rest with maintenance tunnels.
var/camera_range_display_status = 0
var/intercom_range_display_status = 0
/obj/debugging/camera_range
icon = '480x480.dmi'
@@ -29,8 +30,18 @@ var/camera_range_display_status = 0
src.pixel_x = -224
src.pixel_y = -224
/obj/debugging/marker
icon = 'areas.dmi'
icon_state = "yellow"
/client/proc
do_not_use_these()
set category = "Mapping"
set name = "-None of these are for ingame use!!"
..()
camera_view()
set category = "Mapping"
set name = "Camera Range Display"
@@ -56,7 +67,7 @@ var/camera_range_display_status = 0
set name = "Sec Camera Report"
if(!master_controller)
alert(usr,"Master_controller not found.","Air Report")
alert(usr,"Master_controller not found.","Sec Camera Report")
return 0
var/list/obj/machinery/camera/CL = list()
@@ -78,4 +89,23 @@ var/camera_range_display_status = 0
output += "<li>overlapping sec. cameras at \[[C1.x], [C1.y], [C1.z]\] ([C1.loc.loc]) Networks: [C1.network] and [C2.network]</font></li>"
output += "</ul>"
usr << browse(output,"window=airreport;size=1000x500")
usr << browse(output,"window=airreport;size=1000x500")
intercom_view()
set category = "Mapping"
set name = "Intercom Range Display"
if(intercom_range_display_status)
intercom_range_display_status = 0
else
intercom_range_display_status = 1
for(var/obj/debugging/marker/M in world)
del(M)
if(intercom_range_display_status)
for(var/obj/item/device/radio/intercom/I in world)
for(var/turf/T in orange(7,I))
var/obj/debugging/marker/F = new/obj/debugging/marker(T)
if (!(F in view(7,I.loc)))
del(F)