Files
Aurora.3/code/game/machinery/doppler_array.dm

57 lines
1.5 KiB
Plaintext

var/list/doppler_arrays = list()
/obj/machinery/doppler_array
name = "tachyon-doppler array"
desc = "A highly precise directional sensor array which measures the release of quants from decaying tachyons. The doppler shifting of the mirror-image formed by these quants can reveal the size, location and temporal affects of energetic disturbances within a large radius ahead of the array."
icon = 'icons/obj/computer.dmi'
icon_state = "old_cons"
anchored = 1
density = 1
/obj/machinery/doppler_array/Initialize()
. = ..()
doppler_arrays += src
/obj/machinery/doppler_array/Destroy()
doppler_arrays -= src
return ..()
/obj/machinery/doppler_array/proc/sense_explosion(var/x0,var/y0,var/z0,var/devastation_range,var/heavy_impact_range,var/light_impact_range)
if(stat & NOPOWER) return
if(z != z0) return
var/dx = abs(x0-x)
var/dy = abs(y0-y)
var/distance
var/direct
if(dx > dy)
distance = dx
if(x0 > x) direct = EAST
else direct = WEST
else
distance = dy
if(y0 > y) direct = NORTH
else direct = SOUTH
if(distance > 100)
return
if(!(direct & dir))
return
var/message = "Explosive disturbance detected - Epicenter at: grid ([x0],[y0],[z0]). Epicenter radius: [devastation_range]. Outer radius: [heavy_impact_range]. Shockwave radius: [light_impact_range]."
global_announcer.autosay(message, src.name)
/obj/machinery/doppler_array/power_change()
..()
if(stat & BROKEN)
icon_state = "[initial(icon_state)]-broken"
else
if( !(stat & NOPOWER) )
icon_state = initial(icon_state)
else
icon_state = "[initial(icon_state)]-off"