local anoms = {} --таблица с аномалиями
local anoms_cls = {
                            [clsid.zone_bfuzz_s] = true,  -- здесь вписываешь clsid аномалий.Может список неполный,просто для примера,добавишь отсутствующие.Или на секции потом поменяешь,как удобнее будет
                            [clsid.zone_mbald_s] = true,
                            [clsid.zone_galant_s] = true,
                            [clsid.zone_mincer_s] = true,     
                           }

function anoms_list() -- добавить в net_spawn актора,при каждой загрузке будет составляться список
local lv_actor = level.name() -- название локи,на которой находится актор
  for i = 1,65535 do   --перебор всех объектов, в цикле будет к каждой цифре до 65634 применяться действия ниже
    local obj = alife():object(i) --i тут вместо id объекта, ниже проверка,есть ли в игре объект с таким id
        if obj and is_anom(obj) then --проверка,существует ли объект и является ли аномалией (сама функция ниже)
            local lv_anom = alife():level_name(game_graph():vertex(obj.m_game_vertex_id):level_id())  -- название локи аномалии
               if lv_anom == lv_actor then -- если аномалия находится на локе с актором
                   table.insert(anoms,obj.id, "enabled") --добавляем id аномалии в таблицу,enabled и disable - так будет помечаться,включена или отключена аномалия.Таблица будет выглядеть так : {[id аномалии] = enabled}
               end
         end
  end
end

function is_anom(obj) --проверка по таблице с clsid,является ли аномалией объект
    if anoms_cls[obj:clsid()] then
         return true
    end
         return false
end

function en_dis_anoms() -- добавить в update актора,вкл-откл аномалии
   for i,v in pairs(anoms) do  --перебор аномалий в таблице
       local obj = level.object_by_id(i)
       local dist = db.actor:position():distance_to(obj:position())  --дистанция между актором и аномалией   
       local radius = 50  --радиус,в котором надо держать аномалии включенными
           if dist < radius and anoms[obj:id()] == "disabled" then  --если дистанция меньше радиуса и аномалия откл
             obj:enable_anomaly()  --вкл
             anoms[obj:id()] = "enabled"  -- пометить как включенную в таблице
             news_manager.send_tip(db.actor, "ON "..obj:name(), 0, "default", 8000)  --просто тестовое сообщение,потом уберешь
           elseif dist > radius and anoms[obj:id()] == "enabled" then --если дистанция больше радиуса и аномалия вкл
              obj:disable_anomaly()  --откл
              anoms[obj:id()] = "disabled"  -- пометить как отключенную в таблице
             news_manager.send_tip(db.actor, "OFF "..obj:name(), 0, "default", 8000)
           end  
    end
end