<menu_music>music\wasteland2</menu_music>
   <menu_music>music\wasteland3</menu_music>

music\wasteland2_l
music\wasteland2_r
music\wasteland3_l
music\wasteland3_r

function ggun_binder:capture(cone,dist)
  if not cone then cone = 0.999 end -- на деле - cos угла захвата на дистанции dist
  if not dist then dist = 13 end -- дистанция захвата
  local back = 2 --  смещение конуса захвата за спину актора.
  dist = dist + back
  local capt_id = nil
  local capt_obj = nil
  local dist_min = 1.2*dist
  local cone_max = 0.8*cone
  for id,v in pairs (ggunable) do
   local cobj = level.object_by_id(id)
   if cobj and cobj:get_physics_shell() then
    local rvec = cobj:center():sub(device().cam_pos:mad(device().cam_dir, -2.0))
    local r = rvec:magnitude()
    if r < 1.1*dist and r > back + 1 then -- в радиусе захвата, но перед актором
     local proj = rvec:dotproduct(device().cam_dir)
     local cos_a = proj/r
     if cos_a > cone then -- попадает в конус прицеливания
      if cos_a >= cone_max and r < dist_min then  
      -- если предмет хотя бы не дальше от оси прицеливания, чем предыдущий выбранный,  
      -- но ближе по расстоянию, то выбираем его
       dist_min = r
       cone_max = cos_a
       capt_id = id
       capt_obj = cobj
      end
     end
    end
   else
    ggunable[id] = nil
   end
  end
  if capt_id and capt_obj then -- если выбрали подходящий объект для захвата
   self.target = capt_obj -- запомнили
   self.target_id = capt_id -- запомнили id
   self.capture_nomove_counter = 3
   capt_obj:set_const_force(vector():set(0,1,0), capt_obj:mass()*19.62, 65535*65535)
  else
   if not self.sound_nohold:playing() then
    if not self.block_nohold then
     self.sound_nohold:play_at_pos(db.actor, self.gun_end_pos)
     self.block_nohold = true
    end
   end
  end
end

if IsStalker(object) then ... end

if self.object:alive()  then
      if actor_target(self.object) then
         self.target = self.object:id()
      end
end

function actor_target(object)
      if db.actor and object then
       local dangerang = 1/object:position():distance_to(device().cam_pos)
       local ang = horz_angle(device().cam_dir, object:position():sub(device().cam_pos))
       local tgt = ang > -dangerang and ang < dangerang
       if tgt then return true else return false end
      end
      return false
end

function horz_angle(vec1,vec2)
       local x = vec2.x*vec1.x+vec2.z*vec1.z
       local y = -vec2.z*vec1.x+vec2.x*vec1.z
       return math.atan2(y,x)
end

if self.object:alive()  then -- Добавление апдейта для таргета ABILITY
     if actor_target(self.object) then    
      self.target = self.object:id()    
     end    
    end

    if item_name=="hero_ability_1" then    
     give_object_to_actor("hero_ability_1")
     function kill()
      local oNpc = level.object_by_id(self.target)
       if oNpc and  IsStalker(self.target) and db.actor:id()~= self.target then
        oNpc:kill(oNpc)
       end
     end    
     function dell_kluk_final()
      local se_obj = alife():object("self.target")
       if se_obj then
        alife():release(se_obj, true)
       end
     end
    end    

        if self.object:alive()  then -- Добавление апдейта для таргета ABILITY
         if actor_target(self.object) then        
          Hero_ability.on_use_hero_ability(self.target) = self.object:id()        
         end        
        end

        if self.object:alive()  then -- Добавление апдейта для таргета ABILITY
         if actor_target(self.object) then        
          self.target = self.object:id()
          Hero_ability.on_use(self.target)        
         end        
        end

function on_use(sect)    
--Переменные    
local actor=db.actor
local item_name=sect:section() -вот тут ругается если давать инф от мотиватора
local actor_pos=db.actor:position()    
local active_slot=db.actor:active_slot()    
local active_item=db.actor:active_item()    
local pistol_in_slot=db.actor:item_in_slot(2)    
local rifle_in_slot=db.actor:item_in_slot(3)    
local outfit_in_slot=db.actor:item_in_slot(7)    
local helm_in_slot=db.actor:item_in_slot(12)    

     if item_name=="hero_ability_1" then    
      give_object_to_actor("hero_ability_1")
--     local oNpc = level.object_by_id(self.target) -- Сейчас отрубил чтобы не вылетало почем зря но здесь должена быть собственно функция выполняющаяся над объектом, для примера взял убийство - его точно не промаргаешь
--     if oNpc then
--      oNpc:kill(oNpc)
--     end
     end    

end

if self.object:alive()  then
       if actor_target( self.object ) then            
          hero_ability.target_on = self.object:id()
       else
            if   hero_ability.target_on ~= nil then
                if hero_ability.target_on == self.object:id()  then
                    hero_ability.target_on = nil
               end
            end
       end            
     end

target_on = nil

function on_use( sect )        
local item_name=sect:section()     
         if item_name=="medkit" and target_on ~= nil then        
            give_object_to_actor("hero_ability_1")     
            local oNpc = level.object_by_id(target_on)     
           if oNpc then     
              oNpc:kill(oNpc)     
           end     
        end        

end