npc_base_table = {}
anom_base_table = {}
art_base_table = {}
monstr_base_table = {}
npc_mark_table = {}
anom_mark_table = {}
art_mark_table = {}
monstr_mark_table = {}
npc_last_mark = 0
anom_last_mark = 0
art_last_mark = 0
monstr_last_mark = 0
npc_nul_mark_time = 0
monstr_nul_mark_time = 0

function init_mark()
end

function update_mark()
    --Базовые параметры о ГГ
    act_pos = db.actor:position()
    act_dir = device().cam_dir
    cam_pos = device().cam_pos
    hud = get_hud()
    
    --Убрать все метки если проигрывается катсцена или есть инфопорция "hide_all_ui_mark"
    hide_all_mark = false
    if (act_pos:distance_to_sqr(cam_pos) > 4) or (has_alife_info("hide_all_ui_mark")) then hide_all_mark = true end
    
    --Угол обзора ГГ
    fov = math.floor(device().fov+0.02)
  
    --Коэффициент растягивания изображения меток по горизонтали (3:4 = 1, 9:16 = 0,75 )
    rise = (device().height*1024)/(device().width*768)
    
    --Функции обновления меток на экране
    update_npc()
    update_anom()
    update_art()
    update_monstr()
end

function update_npc()
    local index_mark = 1
    
    --Обновление/добавление меток НПС
    if not hide_all_mark then
    for id_base, npc_base_pos in pairs(npc_base_table) do
  local dist = act_pos:distance_to_sqr(npc_base_pos)
  if dist < 900 then
   local npc_pos = vector():set(npc_base_pos.x,npc_base_pos.y,npc_base_pos.z)
   local npc_dir = npc_pos:sub(act_pos)
   local yaw = yaw_degree3d(act_dir, npc_dir)
   if yaw < 35 then
    if index_mark < 33 then
     anglI = math.atan2(act_dir.z, act_dir.x) - math.atan2(npc_dir.z, npc_dir.x)
     anglII = math.atan2(math.sqrt(npc_dir.x*npc_dir.x+npc_dir.z*npc_dir.z), npc_dir.y) - math.atan2(math.sqrt(act_dir.x*act_dir.x+act_dir.z*act_dir.z), act_dir.y)
     Xcoord = math.floor(512 + 512*math.tan(anglI)/math.cos(anglII)*512/360*rise)
     Ycoord = math.floor(384 + 384*math.tan(anglII)*384/200)
     if index_mark > npc_last_mark then
      hud:AddCustomStatic("npc_hud_mark_"..tostring(index_mark))
      npc_mark_table[index_mark] = hud:GetCustomStatic("npc_hud_mark_"..tostring(index_mark)):wnd()
     end
     npc_mark_table[index_mark]:SetWndRect(Frect():set(Xcoord-8,Ycoord-8,Xcoord+8,Ycoord+8))
     index_mark = index_mark + 1
    end
   end
  end
    end
    end
    
    npc_last_mark = index_mark - 1
    
    --Удаление лишних меток НПС
    if index_mark < 33 then
  for i=index_mark,32 do
   if npc_mark_table[i] then
    hud:RemoveCustomStatic("npc_hud_mark_"..tostring(i))
    npc_mark_table[i] = nil
   end
  end
    end
    
    --Очистка таблицы НПС
    if index_mark == 1 then
  npc_nul_mark_time = npc_nul_mark_time + 1
  if npc_nul_mark_time > 100 then
   npc_base_table = {}
   npc_nul_mark_time = 0
  end
    else
  npc_nul_mark_time = 0
    end
    
end