mirror of
https://github.com/yogstation13/Yogstation.git
synced 2025-02-26 09:04:50 +00:00
10d4ec7210
* someone fucking broke tails again thanks guys * Radiation from contamination no longer produces power * oops teehee
127 lines
4.3 KiB
Plaintext
127 lines
4.3 KiB
Plaintext
/datum/radiation_wave
|
|
var/source
|
|
var/turf/master_turf //The center of the wave
|
|
var/steps=0 //How far we've moved
|
|
var/intensity //How strong it was originaly
|
|
var/range_modifier //Higher than 1 makes it drop off faster, 0.5 makes it drop off half etc
|
|
var/move_dir //The direction of movement
|
|
var/list/__dirs //The directions to the side of the wave, stored for easy looping
|
|
var/can_contaminate
|
|
var/collectable_radiation = FALSE //If this radiation is collectable by a rad collector, passed from creating radiation pulse
|
|
|
|
/datum/radiation_wave/New(atom/_source, dir, _intensity=0, _range_modifier=RAD_DISTANCE_COEFFICIENT, _can_contaminate=TRUE, _collectable_radiation=FALSE)
|
|
|
|
source = "[_source] \[[REF(_source)]\]"
|
|
|
|
master_turf = get_turf(_source)
|
|
|
|
move_dir = dir
|
|
__dirs = list()
|
|
__dirs+=turn(dir, 90)
|
|
__dirs+=turn(dir, -90)
|
|
|
|
intensity = _intensity
|
|
range_modifier = _range_modifier
|
|
can_contaminate = _can_contaminate
|
|
collectable_radiation = _collectable_radiation
|
|
|
|
START_PROCESSING(SSradiation, src)
|
|
|
|
/datum/radiation_wave/Destroy()
|
|
. = QDEL_HINT_IWILLGC
|
|
STOP_PROCESSING(SSradiation, src)
|
|
..()
|
|
|
|
/datum/radiation_wave/process(delta_time)
|
|
master_turf = get_step(master_turf, move_dir)
|
|
if(!master_turf)
|
|
qdel(src)
|
|
return
|
|
steps += delta_time
|
|
var/list/atoms = get_rad_atoms()
|
|
|
|
var/strength
|
|
if(steps>1)
|
|
strength = INVERSE_SQUARE(intensity, max(range_modifier*steps, 1), 1)
|
|
else
|
|
strength = intensity
|
|
|
|
if(strength<RAD_BACKGROUND_RADIATION)
|
|
qdel(src)
|
|
return
|
|
|
|
radiate(atoms, FLOOR(strength, 1))
|
|
|
|
check_obstructions(atoms) // reduce our overall strength if there are radiation insulators
|
|
|
|
/datum/radiation_wave/proc/get_rad_atoms()
|
|
var/list/atoms = list()
|
|
var/distance = steps
|
|
var/cmove_dir = move_dir
|
|
var/cmaster_turf = master_turf
|
|
|
|
if(cmove_dir == NORTH || cmove_dir == SOUTH)
|
|
distance-- //otherwise corners overlap
|
|
|
|
atoms += get_rad_contents(cmaster_turf)
|
|
|
|
var/turf/place
|
|
for(var/dir in __dirs) //There should be just 2 dirs in here, left and right of the direction of movement
|
|
place = cmaster_turf
|
|
for(var/i in 1 to distance)
|
|
place = get_step(place, dir)
|
|
atoms += get_rad_contents(place)
|
|
|
|
return atoms
|
|
|
|
/datum/radiation_wave/proc/check_obstructions(list/atoms)
|
|
var/width = steps
|
|
var/cmove_dir = move_dir
|
|
if(cmove_dir == NORTH || cmove_dir == SOUTH)
|
|
width--
|
|
width = 1+(2*width)
|
|
|
|
for(var/k in 1 to atoms.len)
|
|
var/atom/thing = atoms[k]
|
|
if(!thing)
|
|
continue
|
|
if (SEND_SIGNAL(thing, COMSIG_ATOM_RAD_WAVE_PASSING, src, width) & COMPONENT_RAD_WAVE_HANDLED)
|
|
continue
|
|
if (thing.rad_insulation != RAD_NO_INSULATION)
|
|
intensity *= (1-((1-thing.rad_insulation)/width))
|
|
if (thing.rad_insulation == RAD_FULL_INSULATION)
|
|
if(intensity <= 5000)
|
|
intensity = log(intensity+1)/RAD_CONTAMINATION_STR_COEFFICIENT*width
|
|
else
|
|
intensity = (log(intensity+1)+RAD_MINIMUM_CONTAMINATION)/RAD_CONTAMINATION_STR_COEFFICIENT + 350
|
|
|
|
/datum/radiation_wave/proc/radiate(list/atoms, strength)
|
|
var/contamination_chance = (strength-RAD_MINIMUM_CONTAMINATION) * RAD_CONTAMINATION_CHANCE_COEFFICIENT * min(1, 1/(steps*range_modifier))
|
|
for(var/k in 1 to atoms.len)
|
|
var/atom/thing = atoms[k]
|
|
if(!thing)
|
|
continue
|
|
thing.rad_act(strength, collectable_radiation)
|
|
|
|
// This list should only be for types which don't get contaminated but you want to look in their contents
|
|
// If you don't want to look in their contents and you don't want to rad_act them:
|
|
// modify the ignored_things list in __HELPERS/radiation.dm instead
|
|
var/static/list/blacklisted = typecacheof(list(
|
|
/turf,
|
|
/obj/structure/cable,
|
|
/obj/machinery/atmospherics,
|
|
/obj/item/ammo_casing,
|
|
/obj/item/implant,
|
|
/obj/singularity
|
|
))
|
|
if(!can_contaminate || blacklisted[thing.type])
|
|
continue
|
|
if(thing.flags_1 & RAD_NO_CONTAMINATE_1 || SEND_SIGNAL(thing, COMSIG_ATOM_RAD_CONTAMINATING, strength) & COMPONENT_BLOCK_CONTAMINATION)
|
|
continue
|
|
if(prob(contamination_chance) && strength > 0 && thing.rad_insulation != RAD_FULL_INSULATION) // Only stronk rads get to have little baby rads
|
|
if(SEND_SIGNAL(thing, COMSIG_ATOM_RAD_CONTAMINATING, strength) & COMPONENT_BLOCK_CONTAMINATION)
|
|
continue
|
|
var/rad_strength = log(strength/RAD_MINIMUM_CONTAMINATION) * RAD_MINIMUM_CONTAMINATION * RAD_CONTAMINATION_STR_COEFFICIENT
|
|
if(rad_strength>0)
|
|
thing.AddComponent(/datum/component/radioactive, rad_strength, source)
|