Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

DR-PK-ROAD 2.4

Нанести пикеты вдоль трассы (полилиния, 3d-полилиния, фигура)

  1. Alexandr-GR
    LISP-Приложение. Позволяет проставить пикеты вдоль выбранной трассы.
    select.gif
    done.png Возможные примитивы: 3d полилиния, полилиния, характерная линия, фигура

    2017-04-01_10-25-24.png

    done.png В качестве засечки используется блок. Если блок без атрибута, то в качестве подписи значения пикета используется текст
    *Высота текста и размер засечки(блока) регулируется в соответствии со значением масштаба.​
    (1:500 - 0.5 ед., 1:1000 - 1ед., 1:2000 - 2ед. и т.д.)

    done.png Можно нанести все пикеты. Только вершины(поворотные точки). Только пикеты.

    done.png Возможность сохранения списка координат (формат: Пикет, Х,У, отметка) в папке с чертежом
    2017-04-01_10-55-11.png 2017-04-01_10-58-32.png


    МАКРОС НА КНОПКУ: ^C^C^P(if (not C:DRPK)(load "DR-PK-ROAD_2_1" ));^PDRPK;

    Как использовать приложения можно посмотреть, например, вот здесь.
    geossp, i77artur, 53Rafa и 20 другим нравится это.

Пoследние рецензии

  1. derebass
    derebass
    5/5,
    Версия: 2.4
    Огромное спасибо автору. Очень помогает в работе.
  2. Enot
    Enot
    3/5,
    Версия: 2.1
    Косячок получается с разбивкой 3D-полилинии на те же десятки по пикетажу. Программа берет просто длину линии, которая как известно больше ее горизонтального проложения, т.е. пикетажной длины, и режет ее на заданные куски.
    В итоге пикетажная длина разбитой линии получается больше ее проектной пикетажной длины, и все отметки улетают.
    Иными словами, для продольника с уклонами, которые нельзя игнорировать, вещь совершенно бесполезная.
    Или я чего-то недопонимаю?
    1. Alexandr-GR
      Ответ автора
      Исправил. Спасибо.
  3. alex227
    alex227
    5/5,
    Версия: 2.1
    Спасибо!Супер!
  4. vetaldk
    vetaldk
    5/5,
    Версия: 2.0
    Спасибо
  5. Романыч
    Романыч
    5/5,
    Версия: 2.0
    Респект Александру!
  6. Scylion
    Scylion
    5/5,
    Версия: 1.2
    Это елементарно. Но выручило =) Спасибо огромное!
  7. Gege
    Gege
    5/5,
    Версия: 1.2
    супер. Подскажите макрос для кнопки. ^C^C^P(if (not C:DRPK)(load "DR-PK-ROAD_1_2" ) );^DRPK; я вводил такой, но кнопка не появляется. в чем ошибка?
  8. Katerina 42
    Katerina 42
    5/5,
    Версия: 1.2
    Ускоряет процесс разбивки пикетажа по кривым линиям в 2 нажатия кнопки
  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление