mirror of
https://github.com/Aurorastation/Aurora.3.git
synced 2026-08-22 20:43:10 +01:00
cadd19beac
* SDQL2 update * fix that verb * cl * fix that * toworld * this is pointless * update info * siiiiick.. * vv edit update * fix that * fix editing vars * fix VV * Port the /TG/ globals controller. * part 1 * part 2 * oops * part 3 * Hollow Purple * sadas * bsbsdb * muda na agaki ta * ids 1-15 * 16-31 * 41-75 * bring me back to how things used to be before i lost it all * the strength of mayhem * final touches * cl * protect some vars * update sdql2 to use glob * stuff? * forgot that is not defined there * whoops * observ * but it never gets better * a --------- Co-authored-by: Matt Atlas <liermattia@gmail.com>
94 lines
2.2 KiB
Plaintext
94 lines
2.2 KiB
Plaintext
/obj/effect/bhole
|
|
name = "black hole"
|
|
icon = 'icons/obj/objects.dmi'
|
|
desc = "FUCK FUCK FUCK AAAHHH"
|
|
icon_state = "bhole3"
|
|
opacity = 1
|
|
unacidable = 1
|
|
density = 0
|
|
anchored = 1
|
|
|
|
/obj/effect/bhole/New()
|
|
spawn(4)
|
|
controller()
|
|
|
|
/obj/effect/bhole/proc/controller()
|
|
while(src)
|
|
|
|
if(!isturf(loc))
|
|
qdel(src)
|
|
return
|
|
|
|
//DESTROYING STUFF AT THE EPICENTER
|
|
for(var/mob/living/M in orange(1,src))
|
|
qdel(M)
|
|
for(var/obj/O in orange(1,src))
|
|
qdel(O)
|
|
var/turf/T = loc
|
|
var/base_turf = T.baseturf
|
|
for(var/turf/simulated/ST in orange(1,src))
|
|
if(ST.type == base_turf)
|
|
continue
|
|
ST.ChangeTurf(base_turf)
|
|
|
|
sleep(6)
|
|
grav(10, 4, 10, 0 )
|
|
sleep(6)
|
|
grav( 8, 4, 10, 0 )
|
|
sleep(6)
|
|
grav( 9, 4, 10, 0 )
|
|
sleep(6)
|
|
grav( 7, 3, 40, 1 )
|
|
sleep(6)
|
|
grav( 5, 3, 40, 1 )
|
|
sleep(6)
|
|
grav( 6, 3, 40, 1 )
|
|
sleep(6)
|
|
grav( 4, 2, 50, 6 )
|
|
sleep(6)
|
|
grav( 3, 2, 50, 6 )
|
|
sleep(6)
|
|
grav( 2, 2, 75,25 )
|
|
sleep(6)
|
|
|
|
|
|
|
|
//MOVEMENT
|
|
if( prob(50) )
|
|
src.anchored = 0
|
|
step(src,pick(GLOB.alldirs))
|
|
src.anchored = 1
|
|
|
|
/obj/effect/bhole/proc/grav(var/r, var/ex_act_force, var/pull_chance, var/turf_removal_chance)
|
|
if(!isturf(loc)) //blackhole cannot be contained inside anything. Weird stuff might happen
|
|
qdel(src)
|
|
return
|
|
for(var/t = -r, t < r, t++)
|
|
affect_coord(x+t, y-r, ex_act_force, pull_chance, turf_removal_chance)
|
|
affect_coord(x-t, y+r, ex_act_force, pull_chance, turf_removal_chance)
|
|
affect_coord(x+r, y+t, ex_act_force, pull_chance, turf_removal_chance)
|
|
affect_coord(x-r, y-t, ex_act_force, pull_chance, turf_removal_chance)
|
|
return
|
|
|
|
/obj/effect/bhole/proc/affect_coord(var/x, var/y, var/ex_act_force, var/pull_chance, var/turf_removal_chance)
|
|
//Get turf at coordinate
|
|
var/turf/T = locate(x, y, z)
|
|
if(isnull(T)) return
|
|
|
|
//Pulling and/or ex_act-ing movable atoms in that turf
|
|
if( prob(pull_chance) )
|
|
for(var/obj/O in T.contents)
|
|
if(O.anchored)
|
|
O.ex_act(ex_act_force)
|
|
else
|
|
step_towards(O,src)
|
|
for(var/mob/living/M in T.contents)
|
|
step_towards(M,src)
|
|
|
|
//Destroying the turf
|
|
if( T && istype(T,/turf/simulated) && prob(turf_removal_chance) )
|
|
var/turf/simulated/ST = T
|
|
var/base_turf = get_base_turf_by_area(src)
|
|
if(ST.type != base_turf)
|
|
ST.ChangeTurf(base_turf)
|