Как разместить равноудаленные друг от друга точки вдоль кривой
Как можно сгенерировать список точек, равноудаленных друг от друга, вдоль кривой?
На самом деле это довольно нетривиальная задача, так как Revit API содержит лишь методы для работы с кривыми основываясь на внутренней параметризации кривых, и не содержит методов для работы с кривыми в системе координат проекта.
Я недавно уже рассказывал о том, как создать кривую, расположенную посередине, между двумя другими кривыми, в которой я основываюсь на вычислении двух кривых в их естественном внутреннем параметризованном пространстве.
Сейчас я расскажу вам, как решить задачу размещения равноудаленных точек вдоль кривой, используя расстояние, измеренное в системе координат проекта, вместо внутренних параметризованных, предложенное одним из разработчиков:
Вопрос: Я пытаюсь вычислить координаты точек, таким образом, чтоб они были равноудалены друг от друга на спалйне.В Revit API есть метод Curve.Evaluate. В качестве параметра ему необходимо передать параметр кривой. Я пытался воспользоваться следующим кодом, чтобы найти параметры кривой, чтобы вычислить координаты точек на требуем расстоянии:
- double param1 = curve.GetEndParameter(0);
- double param2 = curve.GetEndParameter(1);
- double paramCalc = param1 + ((param2 - param1)
- * requiredDist / curveLength);
- XYZ evaluatedPoint = null;
- if (curve.IsInside(paramCalc))
- {
- double normParam = curve
- .ComputeNormalizedParameter(paramCalc);
- evaluatedPoint = curve.Evaluate(
- normParam, true)));
- }
Этот код прекрасно работает с дугами и прямыми линиями, но не со сплайнами.
Такое чувство что нужно обработать узлы сплайна и их фрагменты для корректного вычисления координат точек.
Есть ли какой-нибудь другой способ, чтобы вычислить точки на определенном расстоянии друг от друга на сплайне?
Я создал пример внешней команды, где я выделяю кружками одинаковое расстояние между точками вдоль кривой. Результат выглядит вот так:
Как видите, на дуге точки располагаются равномерно, а на сплайне на различном расстоянии.
Как можно это исправить?
Ответ: Я рад сообщить что это довольно легко реализовать.
Как я уже говорил, недавно я обсуждал генерацию кривой между двумя другими кривыми.
В том примере я двигался по кривой фиксированным шагом в параметризированном пространстве кривой.
Равномерное расстояние в параметризованном пространстве превращается в неравномерное в системе координат проекта, особенно когда сплайн содержит резкие изгибы, как в вашем примере.
Определение точек на равном расстоянии вдоль кривой, в системе координат проекта, вместо параметризованных координат кривой, является чуть более сложной задачей. Вам нужно вычислять кривую по шагам с очень маленьким шагом и измерить сумму расстояний между пройденными точками до тех пор пока не получите требуемой расстояние. Затем пометьте эту точку.
Если количество промежуточных точек, которое можно получить с помощью стандартного в Revit API метода Tesselate будет достаточным, то вы можете использовать это значение в качестве шага для передвижения по кривой. Если же вам нужна более высокая точность, то вы можете генерировать промежуточные точки самостоятельно с помощью метода Evaluate или ComputeDerivatives.
Я реализовал новую внешнюю команду и назвал ее EquiDistantPointEval для демонстрации предложенного алгоритма.
Сначала, вспомогательный метод, который я немного доработал из вашего примера, для создания круглых меток.
- /// <summary>
- /// Создает круг
- /// заданного радиуса в указанной точке.
- /// </summary>
- DetailArc CreateCircle(
- Document doc,
- XYZ location,
- double radius )
- {
- XYZ norm = XYZ.BasisZ;
- double startAngle = 0;
- double endAngle = 2 * Math.PI;
- Plane plane = new Plane( norm, location );
- Arc arc = Arc.Create( plane,
- radius, startAngle, endAngle );
- return doc.Create.NewDetailCurve(
- doc.ActiveView, arc ) as DetailArc;
- }
Внешняя команда содержит следующие шаги:
- Просим пользователя выбрать кривую
- Проверим валидность этой кривой
- Извлечем необходимые данные из выбранной кривой
- Создадим список точек, равноудаленных друг от друга вдоль этой кривой
- Поставим метку в каждой точке из списка
Ниже представлен полный код внешней команды:
- public Result Execute(
- ExternalCommandData commandData,
- ref string message,
- ElementSet elements )
- {
- UIApplication uiapp = commandData.Application;
- UIDocument uidoc = uiapp.ActiveUIDocument;
- Document doc = uidoc.Document;
- Reference r = null;
- try
- {
- r = uidoc.Selection.PickObject(
- ObjectType.Element,
- new CurveSelectionFilter(),
- "Выберите дугу или сплайн" );
- }
- catch( Autodesk.Revit.Exceptions
- .OperationCanceledException )
- {
- return Result.Cancelled;
- }
- if( null == r )
- {
- message = "Не выбрана кривая";
- return Result.Failed;
- }
- Element e = doc.GetElement( r );
- if( null == e || !( e is CurveElement ) )
- {
- message = "Выбранный элемент не является кривой";
- return Result.Failed;
- }
- // Извлекаем данные из выбранной кривой.
- Curve curve = ( e as CurveElement ).GeometryCurve;
- IList<XYZ> tessellation = curve.Tessellate();
- // Создаем список равноудаленных точек.
- List<XYZ> pts = new List<XYZ>( 1 );
- double stepsize = 5.0;
- double dist = 0.0;
- XYZ p = curve.GetEndPoint( 0 );
- foreach( XYZ q in tessellation )
- {
- if( 0 == pts.Count )
- {
- pts.Add( p );
- dist = 0.0;
- }
- else
- {
- dist += p.DistanceTo( q );
- if( dist >= stepsize )
- {
- pts.Add( q );
- dist = 0;
- }
- p = q;
- }
- }
- // Помечаем кружком точку на линии.
- using( Transaction tx = new Transaction( doc ) )
- {
- tx.Start( "Рисуем круги на линии" );
- foreach( XYZ pt in pts )
- {
- CreateCircle( doc, pt, 1 );
- }
- tx.Commit();
- }
- return Result.Succeeded;
- }
В текущей реализации не поддерживаются прямые линии, так как метод Tessellate возвращает только две точки – начало и конец линии.
Вот такой я получил результат на вашей тестовой модели.
Надеюсь я ответил на ваш вопрос.
Здесь вы можете скачать полный исходный код надстройки.
Источник: http://thebuildingcoder.typepad.com/blog/2013/11/placing-equidistant-points-along-a-curve.html
Обсуждение: http://adn-cis.org/forum/index.php?topic=318
Опубликовано 12.11.2013Отредактировано 12.11.2013 в 08:03:31