--/#+# 'засос кровососа' (v5.1) -------------------------------------------
    if self.object:clsid() == clsid.bloodsucker_s and self.object.health > 0.25 then
      local oTarget = self.object:get_enemy()
      if oTarget and IsStalker(oTarget) and self.object:see(oTarget) then
        --/ если у кровососа есть враг/цель и кровосос его видит то ...
        local iDist = self.object:position():distance_to(oTarget:position())
        if iDist <= 3 then --/ дистанция для анимации 'засоса'
          local iTime = time_global()
          local vDir = self.object:direction() --/ вектор взгляда кровососа
          local iHitPower = 0.1 --/ величина силы хита (для апдейта)
          local is_Actor = oTarget:id() == db.actor:id() --/ жертва == актор?
          --/ таймер для анимации и хита ...
          if (self.timer_anim or 0) < iTime then
            self.timer_anim = iTime + 2000 --/ таймер анимации ~ 2 сек
            if self.object:animation_count() > 0 then
              self.object:clear_animations()
            end
            self.object:add_animation("vampire_0", true) --/ варианты: "vampire_0" | "idle"
            --/ озвучка 'засоса'
            local oSnd = sound_object("monsters\\bloodsucker\\vampire_sucking")
            oSnd:play_no_feedback(self.object, sound_object.s2d, 0, vector(), 5.0)
            iHitPower = 15 --/ задаем силу хита (для снижения здоровья)
            self.pp_kiss = nil --/ сброс 'флага' постэффекта
            if is_Actor then
              --/ добавляем актору постэффект
              level.add_pp_effector("total_recall.ppe", game.time(), false) --/или "alcohol.ppe"
              --/ разворот актора на кровососа (нужно ли?)
              local vDirN = vector():set(vDir)
              oTarget:set_actor_direction(vDirN)
            end
          end
          --/ хит жертве (в течении времени таймера анимации ~2+2 сек)
          if (self.timer_hit or 0) < iTime and (self.timer_anim and self.timer_anim + 2000 >= iTime) then
            self.timer_hit = iTime + 500 --/ таймер хита ~ 0.5 сек
            local vDirHit = vector_rotate_y(vDir,179.0)
            local h = hit()
            h.draftsman = self.object
            h.direction = vDirHit --/ направление хита ('толкаем' на кровососа)
            h:bone("bip01_spine") --/ для учета 'брони'
            h.power     = iHitPower/iDist --/ чем ближе - тем больше 'отсасывает' здоровья
            h.impulse   = 120/iDist --/ чем ближе - тем сильнее 'засос' (притягивает)
            h.type      = hit.wound --/ как вариант: hit.strike
            oTarget:hit(h) --/ наносим хит жертве
          end
        end
      end
    end
    --/<-----------------------------------------------------------------------

--/------------------------------------------------------------------
--/ Поворот камеры актора по направлению к позиции (vPos)
--/ [iTime] - продолжительность поворота (опционально)
--/ [iErr] - погрешность поворота (опционально)
--/------------------------------------------------------------------
function Actor_CamRotate(vPos,iErr,iTime)
  if not vPos then return end --/>
  if not iErr then iErr = 0.05 end --/ погрешность поворота
  local vPosCam = device().cam_pos --/ вектор направления взгляда актора
  local iAngleRun = vPosCam:getH() --/ начальный 'угол'
  local iAngleEnd = vPos:sub(vPosCam):getH() --/ конечный 'угол'
  local iAngleInt = iAngleEnd - iAngleRun --/ диапазон поворота (angle-interval)
  if math.abs(iAngleInt) <= iErr then
    return --/> поворот не требуется
  end
  local iPi = math.pi
  if iAngleRun > iPi then --/ > 180 град?
    if iAngleInt < 0 and iAngleInt > iPi then --/ реверс
      iAngleRun = iAngleRun - iPi*2
      iAngleInt = iAngleEnd - iAngleRun
    end
  elseif math.abs(iAngleInt) > iPi then --/ поворот > 180 град?
    if iAngleEnd > iPi then --/ реверс
      iAngleEnd = iAngleEnd - iPi*2
      iAngleInt = iAngleEnd - iAngleRun
    end
  end
  --/ определяем продолжительность поворота ('плавность')
  local iTimeInt = iTime --or iPi*1000 --/ time-interval (при iPi*1000 => ~3 сек)
  if math.abs(iAngleInt) <= iErr then
    return --/> поворот не требуется
  elseif not iTimeInt then --/ 'плавность' не задана
    iTimeInt = math.abs(iAngleInt *1000) --/ вращаем с пост.скоростью (~180град/3сек)
  end
  local iTimeRun = time_global()
  local iTimeEnd = iTimeRun + iTimeInt
  --/ поворот камеры актора
  local function CamRotate()
    local iTime = time_global()
    local iAngle = iAngleRun + iAngleInt *(iTime - iTimeRun)/iTimeInt
    db.actor:set_actor_direction(-iAngle) --/ задаем угол поворота (рад)
    if iTime > iTimeEnd then --/ проверка окончания времени
      return true --/> довернули (end call)
    end
  end
  --/ запуск call-функции поворота камеры актора
  level.add_call(CamRotate, function() end)
end
--/------------------------------------------------------------------

  this.Actor_CamRotate(self.object:position(), 0.05, 2000)