BasicBoom
    {
        Apply(x,y,power,dir)
        {
            var/i
            var/turf/T
            T = locate(x,y,orig.z)
            if(T.density)
                return 0
            i = image('fire.dmi',locate(x,y,orig.z))
            world << i
            spawn(10)
                del(i)
            for(var/obj/M in T)
                if(istype(M,/obj/bomb))
                    var/D=M.power
                    var/O=M.loc
                    del(M)
                    ExplodeBM(new /Effect/BasicBoom(O,0,D))
                if(istype(M,/obj/map/wall))
                    for(var/obj/item/D in M.items)
                        D.loc=M.loc
                    spawn(1)
                        del(M)
                    return 0
                    break
                if(istype(M,/obj/item))
                    del(M)
            for(var/mob/M in T)
                M.frozen=1
                M.icon_state="frozen"
            return ..(x,y,power-1,dir)
        }
    }