----------------------
-- File:   Outfit Marauder
-- Author: Shoker
-- Снятие брони с трупов.
----------------------

local curent_otf = {}
local curent_helm = {}

-- Таблица визуалов
-- ВИЗУАЛ = {"СЕКЦИЯ БРОНИ", "СЕКЦИЯ ШЛЕМА"}
-- Если шлем не нужен, то ничего не пишем.

local visuals = {
-- Бандосы --
stalker_bandit_1 =  {"novice_outfit"} ,
stalker_bandit_2 =  {"novice_outfit"},
stalker_bandit_3 =  {"novice_outfit"} ,
stalker_bandit_3_face_2  =  {"novice_outfit"} ,
stalker_bandit_3_face_3  =  {"novice_outfit"} ,
stalker_bandit_3_mask = {"novice_outfit"} ,                 
stalker_bandit_4 =  {"novice_outfit"},
--------------
-- Долг --
stalker_dolg_1 =  {"novice_outfit"},
stalker_dolg_2 =  {"novice_outfit"},
stalker_dolg_2_face_1 =  {"novice_outfit"},
stalker_dolg_2_face_2 =  {"novice_outfit"},
stalker_dolg_2_mask =  {"novice_outfitt"},
stalker_dolg_3 =  {"novice_outfit"},
stalker_dolg_4 =  {"novice_outfit"},
--------------
-- Свобода --
stalker_freedom_1 =  {"novice_outfit"},
stalker_freedom_2 =  {"novice_outfit"},  
stalker_freedom_2_face_1 =  {"novice_outfit"},
stalker_freedom_2_face_2 =  {"novice_outfit"},
stalker_freedom_2_mask =  {"novice_outfit"},
stalker_freedom_3 =  {"novice_outfit"},  
stalker_freedom_4 =  {"novice_outfit"},
--------------
-- Сталкеры --
stalker_neutral_1 =  {"novice_outfit"},
stalker_neutral_2 =  {"novice_outfit"},  
stalker_neutral_2_face_1 =  {"novice_outfit"},  
stalker_neutral_2_face_2 =  {"novice_outfit"},  
stalker_neutral_2_mask = {"novice_outfit"},
stalker_neutral_3 =  {"novice_outfit"},
stalker_neutral_4 =  {"novice_outfit"},
--------------
-- Армия --
stalker_soldier_1 =  {"novice_outfit"},
stalker_soldier_2 =  {"novice_outfit"},  
stalker_soldier_2_face_1 =  {"novice_outfit"},  
stalker_soldier_3 =  {"novice_outfit"},
stalker_soldier_4 =  {"novice_outfit"},

-- Наёмники --
stalker_merc_2 =  {"novice_outfit"},  
stalker_merc_4 =  {"novice_outfit"},
--------------
-- Монолит --
stalker_monolith_1 =  {"novice_outfit"},  
stalker_monolith_2 =  {"novice_outfit"},
stalker_monolith_3 =  {"novice_outfit"},
stalker_monolith_4 =  {"novice_outfit"},
--------------
}

-- Умер сталкер
function on_kill(npc)
local vis = npc:get_visual_name()
local sec, helm = get_outfit_sect(vis)

if sec~=nil then
local otf = alife():create(sec, npc:position(), npc:level_vertex_id(), npc:game_vertex_id(), npc:id())
table.insert(curent_otf, otf.id)
end

if helm~=nil then
local otf = alife():create(helm, npc:position(), npc:level_vertex_id(), npc:game_vertex_id(), npc:id())
table.insert(curent_helm, otf.id)
end

end

-- Получим секцию брони и шлема
function get_outfit_sect(v)
local s_name = str_explode("\\", v)
local v_name = s_name[3]
local t_vis = visuals[v_name]
if t_vis~=nil then
return t_vis[1], t_vis[2]
else
end
end

-- update
function update()
for k, v in pairs(curent_otf) do
  local obj=level.object_by_id(v)
   if obj~=nil then
      obj:set_condition(math.random(0, 70)/100)
      table.remove(curent_otf , k)
   end
end

for k, v in pairs(curent_helm) do
  local obj=level.object_by_id(v)
   if obj~=nil then
      obj:set_condition(math.random(0, 70)/100)
      table.remove(curent_helm, k)
   end
end

end

function str_explode(div,str,pos1,pos2,clear)
    local t={}
    local cpt, pos

    if pos1 == nil then pos1 = 1 end
    if pos2 == nil then pos2 = pos1 end

    local cpt1 = string.find (str, div, pos1, true)
    local cpt2 = string.find (str, div, pos2, true)

    if cpt1 and cpt2 then

  if cpt2-cpt1 > 5 then
   cpt = cpt1
   pos = pos1
  else
   cpt = cpt2
   pos = pos2
  end

  repeat
   if clear then
    table.insert( t, trim(string.sub(str, 1, cpt-1)) )
   else
    table.insert( t, string.sub(str, 1, cpt-1) )
   end
   str = string.sub( str, cpt+string.len(div) )
   cpt = string.find (str, div, pos, true)
  until cpt==nil
    end
    if clear then
  table.insert(t, trim(str))
    else
  table.insert(t, str)
    end
    return t
end