Народная 2010 разработка

Dennis_Chikin · 24 Апреля 2014

"Что у нее внутри, и как это сделать лучше". Для тех, кто уже разбирается в скриптах, конфигах, текстурах и "других страшных словах" ©, и имеет желание и время действительно делать их лучше.
См. подробности в первом посте.

Тема НЕ является ни столом заказов, ни службой техподдержки, ни справочным бюро.

Изменено 28 Апреля 2014 пользователем Dennis_Chikin

Arhara · 9 Октября 2010

Shadowman,

Прописать деф в профили спавна нужным неписям - и никаких лишних проверок.

не, проще - просто функцию на СМС

[death]

on_info = %=архара_диалог. смс_сепатор_умер%

Изменено 9 Октября 2010 пользователем Arhara

Trapper023 · 12 Октября 2010

sarcus писал(а):
***FATAL***: Too many lmap-textures (limit: 8 textures or 32M).
Reduce pixel density (worse) or use more vertex lighting (better)

Сейчас немного поумничаю. К гигантскому труду комрадов по приведению текстур в порядок по МипМапам и альфа-каналам не имеет никакого отношения. Корень проблем в папках levels.

Итак, немного вольный перевод этого сообщения:

"Слишком много lmap-текстур (предел 8 текстур или 32 Мб (общего объема одновременно используемых))

Уменьшите (хуже -рекомендация) качество плотности пикселей или используйте больше вершин освещения (лучше -рекомендация)."

Навскидку - это на новых добавленных локациях?

Тут надо смотреть отдельно. На память не помню сколько этих лайтмапов для оригинала (около 4?), но тема серьезная, так как в новых добавленных локациях этих lmap-textures до 21 шт. по 1024 Кб.

Кстати было обсуждение _http://www.gameru.net/forum/index.php?showtopic=18751 и macron отметил что, у dx9-рендера с отражениями большие проблемы и для совместимости с r2 многое выглядит убого.

Сразу оговорюсь тему по ссылке не читал, только глянул.

Рекомендаций тоже пока нет, кроме того что многие параметры надо индивидуально пытаться подогнать через user.ltx

Там есть строки, которые ползунками не регулируются. Какие уже не помню - надо по форумам искать.

r__detail_density 0.5, например.

Что-то кажется kolmogor в рендерах подравлял для рендера dx9.

solvador, -- А как же быстрый "мудрый" совет при подобных бяках локи проходить на статике? Нет - сообщение движка по ограничению directX - и довольно четкое указание на причины сбоя и рекомендации исправления недочета картодела.

Изменено 12 Октября 2010 пользователем Trapper023

neexist · 12 Октября 2010

На динамическом освещении объектов эта надпись также появляется.

solvador, предыдущий оратор не привёл цитату из лога целиком, хотя там 2 строчки очень важные.

Как выглядит цитата целиком (полное динамическое, средние настройки):

Клиент: Создание...

Загрузка текстур...

* t-report - base: 900, 280758 K

* t-report - lmap: 10, 10241 K

***FATAL***: Too many lmap-textures (limit: 8 textures or 32M).

Reduce pixel density (worse) or use more vertex lighting (better).

Интересующая нас строка - это как раз репорт о том, сколько использовалось lmap-текстур. Их количество - превышает предельно допустимую нагрузку для движка. Отсюда падение fps.

Я не говорю, что это является прямой причиной вылета. Косвенной - да. Из-за переполнения памяти, различных стеков и иже с ними. Серьёзность этой надписи в том как раз, что карты были сделаны не по канонам, т.е., движку придётся изыскивать какие-то дополнительные ресурсы, как следствие, выше требование к железу, как следствие, ниже fps.

А в "Зове Припяти" несколько другой движок, там ограничение на lmap-текстуры несколько выше. Да и потом..вспомните, что весь "Зов Припяти" - это 3 огромаднейшие карты, там 8 лайтмапами на карту не справишься при всём желании.

Кстати, вопрос, может, и не в тему - а возможно ли на движке ЗП (я знаю, сейчас соль адаптируют под него) сделать карты по тому же принципу - карт немного, зато огромные?

Изменено 15 Октября 2010 пользователем neexist

deadmoroz · 12 Октября 2010

От себя хочу добавить, что вылеты с логом, подобным тому, что привёл sarcus, мне доводилось видеть ещё до того, как появилась идея подправить текстуры.

Trapper023

Спасибо за наводку на build_details.dds. Правда в чистой солянке все эти файлы в правильном формате (DXT1 с мип-мапами). А вот в Инсталляторе граф.примочек для НС от 03.09.2010 от solvador (гугл знает) и др. текстурпаках аналогичного назначения прсутствуют build_details.dds в DXT5 и/или без мип-мапов.

Изменено 13 Октября 2010 пользователем deadmoroz

Kolmogor · 14 Октября 2010

Shadowman,

по-видимому вывод этого сообщения идет еще с древнейших времен и слабых компьютеров. Сейчас на это сообщение уже можно не обращать внимания.

Ну и кстати в подчищенном движке ЗП это сообщение убрали

Цитата
* t-report - base: 1624, 771224 K
* t-report - lmap: 20, 20482 K

Сообщения нет.

Как соблюсти написано в: Reduce pixel density (worse) or use more vertex lighting (better). Компилировать карту с другими настройками. Но совершенно не нужно.

RayTwitty · 17 Октября 2010

Решил сделать 4-ый апгрейд к СКАТу-15. Смысл - убрать зависимость костюма от артов.

Скрипт я дополнил, но вот не знаю правильно ли.

exo_mil_exoskeleton_dmx - это костюм заменяемый

dmx_skat15_upgrade - новый блок апгрейда

Исходный скрипт (Показать)

--\\*"НаноЭкзоСкелет "Скат-15М""..С Системой Жизненной Поддержки (СЖП) и С возможностью апгрейда..Меченый(Стрелок)..
local t_upd = 0
local f_1 = false
local f_1_end = false

local f_2 = false
local f_2_end = false

local f_3 = false
local f_3_end = false

local f_4 = false
local f_4_end = false

local is_pleer = false

local con_skat_1 = 1
local con_skat_2 = 1
local con_skat_3 = 1

local flag_skat_1 = false
local flag_skat_2 = false
local flag_skat_3 = false

function on_actor_update()
--    on_sub_actor_update()    
    local outfit = db.actor:item_in_slot(6)

if not is_pleer then
    --    meceniy_outfit.is_pleer = false
            player_ogg.start_pleer_post_save()
            is_pleer = true
        end

if not outfit or not string.find(outfit:section(),"exo_mil_exoskeleton_add") then
        return
    end

if t_upd<time_global() then
        t_upd=time_global()+1000

if flag_skat_1 then        
            local e_up1 = db.actor:object("exo_mil_exoskeleton_add")
            if e_up1 then
                e_up1:set_condition(con_skat_1)
get_console():execute("1")
            end
            flag_skat_1 = false
        elseif flag_skat_2 then        
            local e_up2 = db.actor:object("exo_mil_exoskeleton_addr")
            if e_up2 then
                e_up2:set_condition(con_skat_2)
get_console():execute("2")
            end
            flag_skat_2 = false
        elseif flag_skat_3 then        
            local e_up3 = db.actor:object("exo_mil_exoskeleton_addrs")
            if e_up3 then
                e_up3:set_condition(con_skat_3)
get_console():execute("3")
            end
            flag_skat_3 = false
        end

system_outfit()
        if outfit:section() == "exo_mil_exoskeleton_addr" then
            new_system_rad()
        elseif outfit:section() == "exo_mil_exoskeleton_addrs" then
            new_system_rad()
            new_system_power()

new_anti_dot()
        end
    end

end

function on_sub_actor_update()
    update_spawn()
end

function update_spawn()
            alife():create("doc_1",vector():set(-198.597,4.488,168.971),25633,1363)
            alife():create("art_acumm",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_8",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_10",vector():set(-89.387,-2.457,-25.271),19105,2875)
            alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
            spawner()
end

function on_item_drop(obj)
    if obj:section() == "doc_1" then
        doc_use()
    elseif obj:section() == "doc_8" then
        doc_use_2()
    elseif obj:section() == "doc_10" then
        doc_use_3()
    end
end

function doc_use()
    local e1 = db.actor:object("exo_mil_exoskeleton")
    if e1 then
        con_skat_1 = e1:condition()
        alife():release(alife():object(e1:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_add")
        flag_skat_1 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
        alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
        update_spawn_2()
    else
        amk.spawn_item_in_inv("doc_1")
    end
end

function update_spawn_2()
    alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
end

function doc_use_2()
    local e2 = db.actor:object("exo_mil_exoskeleton_add")
    if e2 then
        con_skat_2 = e2:condition()
        alife():release(alife():object(e2:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addr")
        flag_skat_2 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_8")
    end
end

function doc_use_3()
    local e3 = db.actor:object("exo_mil_exoskeleton_addr")
    if e3 then
        con_skat_3 = e3:condition()
        alife():release(alife():object(e3:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addrs")
        flag_skat_3 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_10")
    end
end

function spawner()
    alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
end

function system_outfit()
    local act = db.actor
    if (act.health > 0.5) and (act:get_bleeding() <= 0.3) then 
        f_1 = false        f_1_end = false
        return 
    end
    if (act.health <= 0.5) and (not f_1) then    
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Ваше Состояние Здоровья ниже 50% от Обычного Состояния, если у вас есть мед. препараты, то Система Жизненой Поддержки произведет лечение".."\n", nil, nil, 30000)
    elseif (act:get_bleeding() > 0.3) and (not f_1) then    
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."У вас сильное кровотечение, если у вас есть мед. препараты, то Система Жизненой Поддержки произведет лечение".."\n", nil, nil, 30000)
    end
    f_1 = true
    if (act.health <= 0.5) and act:object("medkit") then
        act:eat(act:object("medkit"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("medkit_army") then
        act:eat(act:object("medkit_army"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("medkit_scientic")   then
        act:eat(act:object("medkit_scientic"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("suvorotka")   then
        act:eat(act:object("suvorotka"))
        f_1 = false
    elseif act:get_bleeding() > 0.3 and act:object("bandage") then
        act:eat(act:object("bandage"))
        f_1 = false
    end
    if not f_1 then
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены мед. препараты. Произвожу применение.".."\n")
        f_1_end = false
        return
    elseif not f_1_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".." Мед. препараты не обнаруженны.".."\n")
        f_1_end = true
    end
end

function new_system_rad()
    local act = db.actor
    if act.radiation < 0.75 then 
        f_2 = false        f_2_end = false
        return 
    end
    if not f_2 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Полученная доза радиации близка к критичной, если у вас есть антидоты, то Система Жизненой Поддержки выведет радиацию из организма при опасной потере здоровья".."\n", nil, nil, 30000)
    end
    f_2 = true
    local anti_1 = act:object("antirad") 
    if (act.health <= 0.6) and anti_1 then
        act:eat(anti_1)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены антидоты. Система Жизненой Поддержки производит применение \"антирадиантов\".".."\n")
        f_2 = false
        f_2_end = false
        return
    elseif (act.health <= 0.6) and not f_2_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Антидоты не обнаруженны.".."\n")
        f_2_end = true
    end

end

function new_anti_dot()
    local act = db.actor
    if db.actor.psy_health >= 0.5 then
        f_3 = false        f_3_end = false
        return
    end

if not f_3 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Полученная доза пси-излучения привела к вашему зомбированию. Если у вас есть антидоты, то Система Жизненой Поддержки выведет пси-излучение из организма ".."\n", nil, nil, 30000)
    end
    f_3 = true
    local a1 = act:object("antizombie") 
    if a1 then
        act:eat(a1)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены антидоты. Система Жизненой Поддержки производит применение \"антирадиантов\".".."\n")
        f_3 = false
        f_3_end = false
        return
    elseif not f_3_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Антидоты не обнаруженны.".."\n")
        f_3_end = true
    end
end

function new_system_power()
    local act = db.actor
    if act.power > 0.25 then 
        f_4 = false        f_4_end = false
        return 
    end

if not f_4 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Вы устали. Ищу энергетики".."\n", nil, nil, 30000)
    end
    f_4 = true
    local el = act:object("energy_drink") 
    if el then
        act:eat(el)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаруженны энергетики. Произвожу введение в тело носителя.".."\n")
        f_4 = false
        f_4_end = false
        return
    elseif not f_4_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".." Энергетиков нет. Отдохните.".."\n")
        f_4_end = true
    end
end

function exo_in_section(item)
    local itm = item:section()
    if itm == "exo_mil_exoskeleton_addr" then
        alife():create(itm, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(), db.actor:id())
        alife():release(alife():object(item:id()))
    end
end

function have_item_namber(itm,need_namber)
    return amk_utils.inventory_search(itm, need_namber)
end

function delete_some_somth(section, count)
    news_manager.relocate_item(db.actor, "out", section, count)
    db.actor:iterate_inventory(
    function(dummy, item)
    if (count > 0) and (item:section() == section) then
        alife():release(alife():object(item:id()))
        count = count - 1
    end
    end,
    db.actor)
end

function dbglog(fmt,...)    
    local msg = string.format(fmt, ...)    
    local msg_no_ws = string.gsub(msg, "%s", "_" )    
    get_console():execute("dbg:" .. msg_no_ws)
end

function do_heal(a,str)
    if a then
        play_snd([[meceniy\outfit\est_med]])
    else
        play_snd([[meceniy\outfit\net_med]])
    end
    news_manager.send_tip(db.actor, str, nil, nil, 30000)
end

function play_snd(snd)
    local snd_obj = xr_sound.get_safe_sound_object(snd)
    snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)
end

--\\*"НаноЭкзоСкелет "Скат-15М""..С Системой Жизненной Поддержки (СЖП) и С возможностью апгрейда..Меченый(Стрелок)..
local t_upd = 0
local f_1 = false
local f_1_end = false

local f_2 = false
local f_2_end = false

local f_3 = false
local f_3_end = false

local f_4 = false
local f_4_end = false

local is_pleer = false

local con_skat_1 = 1
local con_skat_2 = 1
local con_skat_3 = 1

local flag_skat_1 = false
local flag_skat_2 = false
local flag_skat_3 = false

function on_actor_update()
--    on_sub_actor_update()    
    local outfit = db.actor:item_in_slot(6)

        if not is_pleer then
    --    meceniy_outfit.is_pleer = false
            player_ogg.start_pleer_post_save()
            is_pleer = true
        end


    if not outfit or not string.find(outfit:section(),"exo_mil_exoskeleton_add") then
        return
    end

    if t_upd<time_global() then
        t_upd=time_global()+1000

        if flag_skat_1 then        
            local e_up1 = db.actor:object("exo_mil_exoskeleton_add")
            if e_up1 then
                e_up1:set_condition(con_skat_1)
get_console():execute("1")
            end
            flag_skat_1 = false
        elseif flag_skat_2 then        
            local e_up2 = db.actor:object("exo_mil_exoskeleton_addr")
            if e_up2 then
                e_up2:set_condition(con_skat_2)
get_console():execute("2")
            end
            flag_skat_2 = false
        elseif flag_skat_3 then        
            local e_up3 = db.actor:object("exo_mil_exoskeleton_addrs")
            if e_up3 then
                e_up3:set_condition(con_skat_3)
get_console():execute("3")
            end
            flag_skat_3 = false
        end

        system_outfit()
        if outfit:section() == "exo_mil_exoskeleton_addr" then
            new_system_rad()
        elseif outfit:section() == "exo_mil_exoskeleton_addrs" then
            new_system_rad()
            new_system_power()

            new_anti_dot()
        end
    end

end



function on_sub_actor_update()
    update_spawn()
end

function update_spawn()
            alife():create("doc_1",vector():set(-198.597,4.488,168.971),25633,1363)
            alife():create("art_acumm",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_8",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_10",vector():set(-89.387,-2.457,-25.271),19105,2875)
            alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
            spawner()
end


function on_item_drop(obj)
    if obj:section() == "doc_1" then
        doc_use()
    elseif obj:section() == "doc_8" then
        doc_use_2()
    elseif obj:section() == "doc_10" then
        doc_use_3()
    end
end

function doc_use()
    local e1 = db.actor:object("exo_mil_exoskeleton")
    if e1 then
        con_skat_1 = e1:condition()
        alife():release(alife():object(e1:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_add")
        flag_skat_1 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
        alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
        update_spawn_2()
    else
        amk.spawn_item_in_inv("doc_1")
    end
end

function update_spawn_2()
    alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
end

function doc_use_2()
    local e2 = db.actor:object("exo_mil_exoskeleton_add")
    if e2 then
        con_skat_2 = e2:condition()
        alife():release(alife():object(e2:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addr")
        flag_skat_2 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_8")
    end
end


function doc_use_3()
    local e3 = db.actor:object("exo_mil_exoskeleton_addr")
    if e3 then
        con_skat_3 = e3:condition()
        alife():release(alife():object(e3:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addrs")
        flag_skat_3 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен.", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_10")
    end
end

function spawner()
    alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
end

function system_outfit()
    local act = db.actor
    if (act.health > 0.5) and (act:get_bleeding() <= 0.3) then 
        f_1 = false        f_1_end = false
        return 
    end
    if (act.health <= 0.5) and (not f_1) then    
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Ваше Состояние Здоровья ниже 50% от Обычного Состояния, если у вас есть мед. препараты, то Система Жизненой Поддержки произведет лечение".."\n", nil, nil, 30000)
    elseif (act:get_bleeding() > 0.3) and (not f_1) then    
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."У вас сильное кровотечение, если у вас есть мед. препараты, то Система Жизненой Поддержки произведет лечение".."\n", nil, nil, 30000)
    end
    f_1 = true
    if (act.health <= 0.5) and act:object("medkit") then
        act:eat(act:object("medkit"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("medkit_army") then
        act:eat(act:object("medkit_army"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("medkit_scientic")   then
        act:eat(act:object("medkit_scientic"))
        f_1 = false
    elseif (act.health <= 0.5) and act:object("suvorotka")   then
        act:eat(act:object("suvorotka"))
        f_1 = false
    elseif act:get_bleeding() > 0.3 and act:object("bandage") then
        act:eat(act:object("bandage"))
        f_1 = false
    end
    if not f_1 then
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены мед. препараты. Произвожу применение.".."\n")
        f_1_end = false
        return
    elseif not f_1_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".." Мед. препараты не обнаруженны.".."\n")
        f_1_end = true
    end
end

function new_system_rad()
    local act = db.actor
    if act.radiation < 0.75 then 
        f_2 = false        f_2_end = false
        return 
    end
    if not f_2 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Полученная доза радиации близка к критичной, если у вас есть антидоты, то Система Жизненой Поддержки выведет радиацию из организма при опасной потере здоровья".."\n", nil, nil, 30000)
    end
    f_2 = true
    local anti_1 = act:object("antirad") 
    if (act.health <= 0.6) and anti_1 then
        act:eat(anti_1)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены антидоты. Система Жизненой Поддержки производит применение \"антирадиантов\".".."\n")
        f_2 = false
        f_2_end = false
        return
    elseif (act.health <= 0.6) and not f_2_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Антидоты не обнаруженны.".."\n")
        f_2_end = true
    end

end

function new_anti_dot()
    local act = db.actor
    if db.actor.psy_health >= 0.5 then
        f_3 = false        f_3_end = false
        return
    end

    if not f_3 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Полученная доза пси-излучения привела к вашему зомбированию. Если у вас есть антидоты, то Система Жизненой Поддержки выведет пси-излучение из организма ".."\n", nil, nil, 30000)
    end
    f_3 = true
    local a1 = act:object("antizombie") 
    if a1 then
        act:eat(a1)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаружены антидоты. Система Жизненой Поддержки производит применение \"антирадиантов\".".."\n")
        f_3 = false
        f_3_end = false
        return
    elseif not f_3_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Антидоты не обнаруженны.".."\n")
        f_3_end = true
    end
end


function new_system_power()
    local act = db.actor
    if act.power > 0.25 then 
        f_4 = false        f_4_end = false
        return 
    end

    if not f_4 then
        news_manager.send_tip(act, "%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Вы устали. Ищу энергетики".."\n", nil, nil, 30000)
    end
    f_4 = true
    local el = act:object("energy_drink") 
    if el then
        act:eat(el)
        do_heal(true,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".."Обнаруженны энергетики. Произвожу введение в тело носителя.".."\n")
        f_4 = false
        f_4_end = false
        return
    elseif not f_4_end then
        do_heal(false,"%c[10,241,129,129]".."Система Жизненной Поддержки:".."\\n".."%c[10,241,129,129]".." Энергетиков нет. Отдохните.".."\n")
        f_4_end = true
    end
end




function exo_in_section(item)
    local itm = item:section()
    if itm == "exo_mil_exoskeleton_addr" then
        alife():create(itm, db.actor:position(), db.actor:level_vertex_id(), db.actor:game_vertex_id(), db.actor:id())
        alife():release(alife():object(item:id()))
    end
end

function have_item_namber(itm,need_namber)
    return amk_utils.inventory_search(itm, need_namber)
end

function delete_some_somth(section, count)
    news_manager.relocate_item(db.actor, "out", section, count)
    db.actor:iterate_inventory(
    function(dummy, item)
    if (count > 0) and (item:section() == section) then
        alife():release(alife():object(item:id()))
        count = count - 1
    end
    end,
    db.actor)
end

function dbglog(fmt,...)    
    local msg = string.format(fmt, ...)    
    local msg_no_ws = string.gsub(msg, "%s", "_" )    
    get_console():execute("dbg:" .. msg_no_ws)
end

function do_heal(a,str)
    if a then
        play_snd([[meceniy\outfit\est_med]])
    else
        play_snd([[meceniy\outfit\net_med]])
    end
    news_manager.send_tip(db.actor, str, nil, nil, 30000)
end

function play_snd(snd)
    local snd_obj = xr_sound.get_safe_sound_object(snd)
    snd_obj:play_no_feedback(db.actor, sound_object.s2d, 0, vector(), 1.0)
end

Имененный мной (добавил коменты где изменял) (Показать)

--\\*"НаноЭкзоСкелет "Скат-15М""..С Системой Жизненной Поддержки (СЖП) и С возможностью апгрейда..Меченый(Стрелок)..
local t_upd = 0
local f_1 = false
local f_1_end = false

local f_2 = false
local f_2_end = false

local f_3 = false
local f_3_end = false

local f_4 = false
local f_4_end = false

local is_pleer = false

local con_skat_1 = 1
local con_skat_2 = 1
local con_skat_3 = 1
local con_skat_4 = 1 -- DMX UPGRADE

local flag_skat_1 = false
local flag_skat_2 = false
local flag_skat_3 = false
local flag_skat_4 = false -- DMX UPGRADE

function on_actor_update()
--    on_sub_actor_update()    
    local outfit = db.actor:item_in_slot(6)

if not is_pleer then
    --    meceniy_outfit.is_pleer = false
            player_ogg.start_pleer_post_save()
            is_pleer = true
        end

if not outfit or not string.find(outfit:section(),"exo_mil_exoskeleton_add") then
        return
    end

if t_upd<time_global() then
        t_upd=time_global()+1000

if flag_skat_1 then        
            local e_up1 = db.actor:object("exo_mil_exoskeleton_add")
            if e_up1 then
                e_up1:set_condition(con_skat_1)
get_console():execute("1")
            end
            flag_skat_1 = false
        elseif flag_skat_2 then        
            local e_up2 = db.actor:object("exo_mil_exoskeleton_addr")
            if e_up2 then
                e_up2:set_condition(con_skat_2)
get_console():execute("2")
            end
            flag_skat_2 = false
        elseif flag_skat_3 then        
            local e_up3 = db.actor:object("exo_mil_exoskeleton_addrs")
            if e_up3 then
                e_up3:set_condition(con_skat_3)
get_console():execute("3")
            end
            flag_skat_3 = false
        elseif flag_skat_4 then        -- DMX UPGRADE ON
            local e_up4 = db.actor:object("exo_mil_exoskeleton_dmx")
            if e_up4 then
                e_up4:set_condition(con_skat_4)
get_console():execute("4")
            end
            flag_skat_4 = false     -- DMX UPGRADE OFF
        end

system_outfit()
        if outfit:section() == "exo_mil_exoskeleton_addr" then
            new_system_rad()
        elseif outfit:section() == "exo_mil_exoskeleton_addrs" then
            new_system_rad()
            new_system_power()

new_anti_dot()
        elseif outfit:section() == "exo_mil_exoskeleton_dmx" then -- DMX UPGRADE ON
            new_system_rad()
            new_system_power()

new_anti_dot()                                        -- DMX UPGRADE OFF
        end
    end

end

function on_sub_actor_update()
    update_spawn()
end

function update_spawn()
            alife():create("doc_1",vector():set(-198.597,4.488,168.971),25633,1363)
            alife():create("art_acumm",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_8",vector():set(-33.133,3.548,-64.111),198,1960)
            alife():create("doc_10",vector():set(-89.387,-2.457,-25.271),19105,2875)
            alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
            spawner()
end

function on_item_drop(obj)
    if obj:section() == "doc_1" then
        doc_use()
    elseif obj:section() == "doc_8" then
        doc_use_2()
    elseif obj:section() == "doc_10" then
        doc_use_3()
    elseif obj:section() == "dmx_skat15_upgrade" then  -- DMX UPGRADE
        doc_use_4()
    end
end

function doc_use()
    local e1 = db.actor:object("exo_mil_exoskeleton")
    if e1 then
        con_skat_1 = e1:condition()
        alife():release(alife():object(e1:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_add")
        flag_skat_1 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен", nil, nil, 10000)
        alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
        update_spawn_2()
    else
        amk.spawn_item_in_inv("doc_1")
    end
end

function update_spawn_2()
    alife():create("art_acumm",vector():set(-89.387,-2.457,-25.271),19105,2875)
end

function doc_use_2()
    local e2 = db.actor:object("exo_mil_exoskeleton_add")
    if e2 then
        con_skat_2 = e2:condition()
        alife():release(alife():object(e2:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addr")
        flag_skat_2 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_8")
    end
end

function doc_use_3()
    local e3 = db.actor:object("exo_mil_exoskeleton_addr")
    if e3 then
        con_skat_3 = e3:condition()
        alife():release(alife():object(e3:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_addrs")
        flag_skat_3 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("doc_10")
    end
end

function doc_use_4()     -- DMX UPGRADE ON
    local e4 = db.actor:object("exo_mil_exoskeleton_addrs")
    if e3 then
        con_skat_4 = e4:condition()
        alife():release(alife():object(e4:id()))
        amk.spawn_item_in_inv("exo_mil_exoskeleton_dmx")
        flag_skat_4 = true
        news_manager.send_tip(db.actor, "Апгрейд Закончен", nil, nil, 10000)
    else
        amk.spawn_item_in_inv("dmx_skat15_upgrade")
    end
end                      -- DMX UPGRADE OFF