Исправлен TargetPosRecalculateRange