Денис добавьте в редакторе 3D-объектов запрос на сохранение изменений. При нажатии кнопки  Esc на клавиатуре или при закрытии окна редактора [х] мышкой все набранные строки кода теряются. :o

Денис я опять на счет влияния оператора  "if" на выражения
В 3d виде "Редактор 3D объектов" с конструкцией "if   then" всё работает отлично, выставляю переключатели на 0 или 1 и моделька перестраивается.
Последний переключатель убирает из модельки трубу и гаситель.
А вот 3D-вид IndorCAD похоже не знаком с "if   then" . Моделька не перестраивается или не реагирует на переключатели.

Денис можно распространить влияние оператора  "if"  на выражения, а не только на  "Element".
Я хотел создать такой универсальный объект (Колодец ДП) и отключать чекбоксами ненужные промежуточные блоки. При этом должна пересчитываться высота (глубина) всей конструкции  deltaH.
{Если есть Средний блок СБД-3 }  
if  SBD_31      
  begin
     deltaH=deltaH+rH+0.25;
  end;
И последующие элементы должны были подняться выше. Но этого не происходит.

И ещё есть ли способ расставить по трассе такие колодцы (объекты), может используя макрос ActivX по ведомости (ПК, боковое расстояние, имя объекта).

Денис поправьте пожалуйста в   Экскаватор ЭО-4121.las  5 строку (развернем избушку к лесу...)

BeamObject 'Экскаватор ЭО-4121' {$X=11;Y=6;Z=3;dY=-2.0;dZ=1};


И ещё посмотрите почему этот объект (Стрелка3D) не реагирует на угол поворота?
(У меня такая же проблема с бампером экскаватора строка 209)

Выкладываю Экскаватор и Пень

На счет прототипов функций. Это для меня сложно, я не очень продвинут в программировании. Приведенные примеры мне нравятся, но я не вижу различий. Разве что у первой нет имени (ошибка ?). Зарезервированное слово Result  будет всегда присутствовать, как результат работы функции? А если я хочу описать часть кода  (ElementList)  в функции без параметров и результата.
Ещё подскажите варианты использования if  .. end.  Такую конструкцию можно?
Если Условие  Тогда   ...
                         Иначе  ...
                         Если Условие  Тогда  ...
                                                  Иначе  ...
                         Всё
Всё

Ещё не закончил, но загружу сюда чтоб не потерялся. Он мне тяжело дался. Для нескольких элементов стрелы так и не смог найти формулу вычисления угла. Пришлось строить в автокаде, чтобы подобрать более менее похожую зависимость.

Добавьте в шапку ( описание кода)
ShapeSection → ‘shape’ {Identifier = ShapeExpression  NumberPoint ‘[’ Expression ‘,’ Expression ‘]’ ‘,’ ‘[’ Expression ‘,’ Expression ‘]’...‘;’ }+
                         Пример использования:     Main = 5 [0,1], [0.1,0.9], [0.2,0.25], [0.3,0], [0.05,0]; плоская фигура

Shape → ShapeExpression Size PointExpression PointExpression [Angle] [‘Q’] [Material] [Quality]
      Пример использования:      Main h [0,-L/2,0] rel [0,L,0] AColor;

(описание параметров балки)
Две точки определяют координаты начала и конца балки.
  Пример использования:     координаты абсолютные [2,0,0] [3,0,4]
                                             или первая абсолютная а вторая относительно первой [2,0,0] rel [1,0,4]
         StartPoint = [x1,y1,z1];
         EndPoint = [x2,y2,z2];
         CenterPoint =  StartPoint + (EndPoint-StartPoint)/(1/0.5);


Мне не хватало функции извлечения координат из    Point = [x1,y1,z1];
         например: Get_coord3(Point ) → z1 ; Get_coord1(Point ) → x1

А можно  пользовательскую функцию с параметрами создать?

Сообщений здесь давно не было, может тема уже не актуальна ?
Но я вдохновился и склепал МАЗ 5516
Может кому понадобиться ?

Разрешите в табличном редакторе операцию копирования данных ПК+ (она не активна).
Хочу в Excel ведомость склепать.

В редакторе поперечного профиля при перетаскивании элементов происходит разночтение между отображением планируемого перемещения и результатом.
Поправьте пожалуйста.

Нужно запроектировать кольцевую развязку. Трассу разбил в виде эллипса. Запроектировал продольный профиль. Как сделать чтоб на поперечнике левая обочина меняла ширину и тянулась до центрального вытянутого овала. Так как уклон левой обочины постоянный 1% , а профиль по трассе эллипса переменный на вытянутом овале могут быть бешенные уклоны. Вытянутый овал я сделал трассой и хочу увидеть профиль.

Снимаю вопрос. Увязка разрешила проблему.

При удалении группы её трассы не удаляются ,а разгруппировываются.
Можете добавить пункт в меню "Удаление всех трасс группы ..."

О, то что надо! Спасибо.

На примыканиях при увязке разнонаправленных трасс часто сложно на плане определить где у трассы левая или правая сторона.
В CARD/1 при перемещении перекрестия в активном окне  поперечного профиля на пассивных окнах продольного профиля и плана перемещаются маркеры (бегунки). Они помогают сориентироваться. Можете сделать подобное (хотя бы для окна плана)?

Спасибо Денис.
Вот я попал на ошибку при разрезании трассы, поправьте пожалуйста.
Ранее обнаруживал у себя трассы с подправленным на несколько мм пикетажем и не мог понять "а кто это сделал".

С переключалкой слоя будет меньше телодвижений, так как если активный слой не тот на лету его сменить не удастся. Нужно выйти из команды, переключить слой и опять перейти к редактированию фигур.

Со смещением согласен пускай шаг берется от исходной фигуры

Ещё такие пожелания по операциям над геометрическими фигурами
- Можете добавить выпадающий список для выбора слоя создаваемой линии
- Возможно ли создаваемую линию сместить относительно фигуры (как при создании эквидистантной линии)

Добавьте пункт в контекстное меню [Переместить в другой слой] для выделенных геометрических фигур

Создаю проектную трубу. Редактирую Indor Culvert нажимаю ОК и получаю ошибку. Далее при выборе такой отредактированной трубы получаю ту же ошибку и не могу повторно отредактировать выбранную трубу.

Ведомости у которых возможна привязка к трассе (геологические скважины, дорожные знаки, ...)  не учитывают объекты расположенные за концом трассы (КТ), а объекты до начала трассы (НТ) привязываются к начальному пикету.
Предлагаю добавить чекбокс с возможностью учитывать или нет объекты за пределами трассы. Условно продлить трассу по прямой на заданное расстояние от НТ по начальному азимуту (в обратном направлении) и от КТ по конечному азимуту (в прямом направлении).
Пикетаж объектов расположенные за пределами трассы привязать к НТ (до трассы  НТ-15,274; после трассы НТ+132,967). Или до трассы привязать к НТ, а после к КТ (до трассы  НТ-15,274; после трассы КТ+7,275).
Не забудьте добавить возможность выводить пользовательские атрибуты!

Предлагаю такой

Такое изображение для 3D-вида подойдет?
Порода дерева - Пень
Одиночные и зоны зеленых насаждений  (участки леса вырубленные)?
И если пользователь выбрал породу пень, чтоб высота дерева сбрасывалась хотя бы до 1 м