Клиент: Синхронизация...
* phase time: 11 ms
* phase cmem: 322966 K
* [win32]: free[3224172 K], reserved[97808 K], committed[872260 K]
* [ D3D ]: textures[63067 K]
* [x-ray]: crt heap[322407 K], process heap[8414 K], game lua[21473 K], engine lua[245 K], render[1037 K]
* [x-ray]: economy: strings[5037 K], smem[28210 K]
stack trace:


[error][      87]    : Параметр задан неверно.

function use_repair_kit(repaired_slot, destr_item)
local result = "without_changes"
if db.actor:item_in_slot(repaired_slot) ~= nil then
    local repair_item = db.actor:item_in_slot(db.repaired_slot)
    local repair_item_section = repair_item:section()
    local repair_item_condition = repair_item:condition()
    local destr_item_section = destr_item:section()
    local destr_item_condition = destr_item:condition()
    
    local actor_rank = db.actor:character_rank()
    if actor_rank > 1000 then actor_rank = 1000 end
-- amk.send_tip("Ранг: " .. actor_rank)

    local tech_complication = technical_complication(repair_item)
-- amk.send_tip("Сложность: " .. tech_complication)
    local amendment = (math.random((actor_rank - tech_complication), (actor_rank - tech_complication + 300)))/1000
    if amendment > 0 then amendment = 0 end
    if repair_item_section == destr_item_section then amendment = amendment*0.7 end
-- amk.send_tip("Поправка: " .. amendment)

    local size_of_repair = (destr_item_condition - 0.15) * (1 - ((1 - db.cond_rk) / 3))
    local repared_condition = repair_item_condition + size_of_repair
    local dif_repared_condition = repared_condition + amendment

    if repared_condition > 0.95 then
        repared_condition = 0.95
        size_of_repair = repared_condition - repair_item_condition
    end

    if dif_repared_condition > 0.95 then
        dif_repared_condition = 0.95
    elseif (dif_repared_condition > 0) and (dif_repared_condition < 0.95) then
        if dif_repared_condition < repair_item_condition then
-- amk.send_tip("Похоже, мы испортили вещь...")
            dif_repared_condition = repair_item_condition - ((repair_item_condition - dif_repared_condition)*((1000 - actor_rank)/1000))
            if dif_repared_condition < 0 then dif_repared_condition = 0 end
        end
    elseif dif_repared_condition <= 0 then
        if dif_repared_condition < repair_item_condition then
-- amk.send_tip("Ты сломал это!!!")
            dif_repared_condition = repair_item_condition - ((repair_item_condition + dif_repared_condition)*((1000 - actor_rank)/1000))
            if dif_repared_condition < 0 then dif_repared_condition = 0 end
        end
    end

    if dif_repared_condition > repair_item_condition then
--        amk.send_tip("Вам удалось улучшить состояние предмета.")
        result = "success"
    elseif dif_repared_condition == repair_item_condition then
--        amk.send_tip("Вам не удалось улучшить состояние предмета.")
        result = "without_changes"
    else
--        amk.send_tip("По неопытности Вы ухудшили состояние предмета.")
        result = "failure"
    end

    repair_item:set_condition(dif_repared_condition)

    if system_ini():r_string(destr_item_section, "slot") == "1" or system_ini():r_string(destr_item_section, "slot") == "2" then

    if system_ini():line_exist(destr_item_section, "ammo_class") then
-- Разрядим оружие и снимем с него аддоны
-- amk.logf("Разрядим разбираемое оружие")

        local destr_item_state = get_weapon_data(alife():object(destr_item:id()))

        local w_ammo_num = destr_item:get_ammo_in_magazine()
-- amk.logf("Оружие снаряжено " .. w_ammo_num .. " патронами")
        local w_ammo_type = destr_item_state.ammo_type
        local ammo_list = system_ini():r_string(destr_item_section, "ammo_class")
        local num = nil
        local ammo_tbl = {}
        for num in string.gfind(ammo_list,"([%w_%-.\\]+)%p*" ) do
            table.insert(ammo_tbl, num)
        end
        local w_ammo_name = ammo_tbl[w_ammo_type+1]
        amk.spawn_ammo_in_inv(w_ammo_name, w_ammo_num)

-- Разберёмся с аддонами
        local scope = 0
        local launcher = 0
        local silence = 0

        if     system_ini():line_exist(destr_item_section, "scope_status") then
            scope = system_ini():r_u32(destr_item_section, "scope_status")
        end
        if     system_ini():line_exist(destr_item_section, "grenade_launcher_status") then
            launcher = system_ini():r_u32(destr_item_section, "grenade_launcher_status")
        end
        if     system_ini():line_exist(destr_item_section, "silencer_status") then
            silence = system_ini():r_u32(destr_item_section, "silencer_status")
        end

        if scope == 2 and bit_and(destr_item_state.addon_flags, 1) == 1 then
            local inst_scope = system_ini():r_string(destr_item_section,"scope_name")
            amk.spawn_item_in_inv(inst_scope)
        end
        if launcher == 2 and bit_and(destr_item_state.addon_flags, 2) == 2 then
            local inst_launcher = system_ini():r_string(destr_item_section,"grenade_launcher_name")
            amk.spawn_item_in_inv(inst_launcher)
        end
        if silence == 2 and bit_and(destr_item_state.addon_flags, 4) == 4 then     
            local inst_silence = system_ini():r_string(destr_item_section,"silencer_name")
            amk.spawn_item_in_inv(inst_silence)
        end
    end
    end
    amk.remove_item_from_inventory(destr_item)
    db.cond_rk_dif = size_of_repair * repair_item_condition
    play_repair_sound()
end
    return result
end

-- Спавним объекты в инвентарь
function spawn_item_in_inv(spawn_item,npc)
    if npc==nil then
        npc=db.actor
    end
    return alife():create(spawn_item,    
            npc:position(),
            npc:level_vertex_id(),    
            npc:game_vertex_id(),
            npc:id())
end


-- Спавним патроны в инвентарь
function spawn_ammo_in_inv(spawn_item,number,npc)
    if npc==nil then
        npc=db.actor
    end
    if number > 0 then
        return se_respawn.create_ammo(spawn_item,    
                npc:position(),
                npc:level_vertex_id(),    
                npc:game_vertex_id(),
                npc:id(),
                number)
    end
end


-- Удаляем объект из игры
function remove_item(remove_item)
    if remove_item~=nil then
        alife():release(alife():object(remove_item:id()), true)
        return true
    end
    return false
end


-- Выбрасываем объект из инвентаря, применимо к ГГ
function drop_item(npc,item)
    if item~=nil then
        npc:mark_item_dropped(item)
    end
end