[aim-sun]

Уважаемые форумчане, я знаю о возможности использования команды Measure для размещения блоков вдоль полилинии, это можно использовать для отчерчивания, например , брусчатки пешеходных дорожек. Вдоль прямой я плохенько, но сделал, а вдоль дуги - совсем беда, блоки не разворачиваются вдоль оси. Может кто знает как это сделать?......
Вот я нашел пост об этом "Размещение блоков вдоль выбранного объекта с заданными интервалами.
Имя блока для вставки: Ввести имя существующего в рисунке блока
Согласовать ориентацию блока с ориентацией объекта? [Да/Нет] <Д>: Ввести д или н, либо нажать ENTER
Ответ д означает, что горизонтальные оси вставляемых блоков будут параллельны размечаемому объекту в точках деления или совпадать с направлениями касательных в этих точках. Ответ н означает, что блоки вставляются с нулевым углом поворота.
Длина сегмента:
После задания длины сегмента AutoCAD расставляет вдоль объекта блоки с выбранным интервалом. Переменные атрибуты при вставке блока игнорируются."......
На выходе получил полную лажу: блоки разбросанные в пространстве и не привязаны словно йоги - нифига!

[Valery Brelovsky]

Сколько работаю с этой командой всегда работает корректно. И блоки поворачиваются. Выложи чертежик с примером блоков вдоль дуги и разбросанным в пространстве. Так будет понятнее.

[Profan]

А как там дела обстоят с базовой точкой вставки блока?

[aim-sun]

Нет, это не возможно!! Очень уж большие расстояния между обьектами получаются. Надо как-то привязать к дуге этот блок. Видимо правильно привязки выставить надо.
Вот ведь парадокс нарисовался протянутую руку ухватить не могу...
С базовой точкой дела вообще никак не обстоят. Это в свойствах блока? Задать ее надо?
Друзья мои, я старый человек, могу бредить, если вы поняли, как выглядит дорожка из брусчатки напишите уже сразу алгоритм, а я отвечу коньяком в своем офисе на Тверской или вообще по-любому!!!

[Valery Brelovsky]

Если с базовой точкой ни как то это проблема. Блоки привязываются к линии по базовой точке. И если она не известно где то и блоки разместятся не на линии, а не известно где.
Рекомендую выложить файл сюда в форум и тогда можно будет всё упорядочить.

[aim-sun]

Прекрасно! С заданием базовой точки все встало на места и замечательно закрутилось. Спасибо и МАСТЕРУ и ГУРУ. Примите мою искреннюю благодарность и визитную карточку: ОАО "Парк" (Ланддизайн)Мельников Эдуард.......

[Profan]

я старый человек, могу бредить

Интересно. Вот я - 1949 года рождения. Бредить я могу, это видно и на этом форуме. А вот старый ли я - вот вопрос. Если старый - так чего же я тут тараканюсь? А если не старый - почему мне лень учиться и работать?

[Valery Brelovsky]

Сообщение от aim-sun Прекрасно! С заданием базовой точки все встало на места и замечательно закрутилось. Спасибо и МАСТЕРУ и ГУРУ. Примите мою искреннюю благодарность и визитную карточку: ОАО "Парк" (Ланддизайн)Мельников Эдуард.......

В дополнение.
Я пользуюсь для таких целей макросом
^C^C^P(command "_measure" pause "b" "R38" "" 13)(princ)
R38 - это имя блока (должен присутствовать в чертеже)
13 это растояние которое можно выставить какое нужно.
И тогда процесс использования команды _measure станет более комфортным.

[aim-sun]

[VVA]

aim-sun Наши архитекторы мостят брусчатку с помощью Express'овской _superhatch. Можно штриховать блоками, можно растрами. Попробуй, может понравится.

[aim-sun]

Спасибо за дружеский совет Владимир! Я попробывал. Super hatch конечно нужна, тут двух мнений быть не может. Да, какая приятная компания тут у вас :-)

[VVA]

Присоединяйся, будет еще лучше

[skkkk]

Занялся написанием макроса для разметки полилинии блоками из текста с последующим взрывом текстов-блоков и поворотом этих текстов командой _torient с опцией Most readable. Проделал все перечисленные операции, составил макрос:

Код:

[Выделить все]

^C^C_measure;\_b;g11;;150;_explode;_p;;torient;_p;;;

Нажимаю новоиспеченную кнопочку и вижу в текстовом окне следующее:

Команда: _measure Выберите объект для разметки: Длина сегмента или [Блок]: _b Имя блока для вставки: g11 Согласовать ориентацию блока с ориентацией объекта? [Да/Нет] <Д>: Длина сегмента: 150 Команда: _explode Выберите объект: _p *Неверный выбор* Требуется точка или Последний/Все/Группа Выберите объект:

то есть зависает при попытке последнего набора.
Делаю все операции вручную - на запрос выбора блоков набираю _p - всё в порядке. В чем может тут дело быть? пробовал вместо _p набирать п - результат тот же.
Прилагаю файл с нужным блоком.

Добавлено:
Попробовал через _xplode

Код:

[Выделить все]

^C^C_measure;\_b;g11;;150;_xplode;_p;;;;torient;_p;;;

- взрывает нормально, все блоки, но при вводе макросом _p на запрос команды torient в набор попадает только один мтекст

Команда: _measure Выберите объект для разметки: Длина сегмента или [Блок]: _b Имя блока для вставки: g11 Согласовать ориентацию блока с ориентацией объекта? [Да/Нет] <Д>: Длина сегмента: 150 Команда: _xplode Выберите объекты для разделения на составляющие. Выберите объекты: _p найдено: 9 Выберите объекты: Найдено 9 объектов. Расчленять по Отдельности/<Все>: Задайте опцию [Все/Цвет/Слой/Тип линий/вЕс линий/По объекту/Расчленить] <Расчленить>: Объекты - расчленение выполнено. Команда: torient Select TEXT, MTEXT, ATTDEF, or BLOCK inserts w/attributes... Выберите объекты: _p найдено: 1 Выберите объекты: New absolute rotation <Most Readable>: 1 objects modified.

причем при выполнении этой же последовательности вручную также выделяется только один мтекст - тут хоть чуть логика прослеживается - видимо, _xplode обрабатывает объекты по одному, а _explode все разом - но макрос повторяет действия вручную. А вот в первом случае я не понимаю...

[VVA]

Макрос получился такой

Код:

[Выделить все]

^C^C(mip:mark);PICKFIRST;1;_measure;\_b;g11;;150;_xplode;_p;;;;(SSSETFIRST nil (mip:get-last-ss));torient;;

Недостающие функции на лиспе здесь

[skkkk]

Спасибо, VVA, отлично работает. Но мне вот любопытно: почему команды с опциями, отработанные вручную, не находят отражения в макросе? Впервые такое встречаю, хотя подобных макросов у меня полно.

[Jeriko]

Доброго времени суток.
Вопрос вот в чем, при использовании команды _measure, расставляемые блоки встают по другую сторону полилинии относительно начального блока. Как это можно исправить и как сделать так, чтобы все блоки были перпендикулярны кривой по которой я их расставляю?
PS: чертеж прилагается.

[VVA]

Jeriko, Или
1. Реверсируй полилинию (ENTREVS)
2. Или имей 2 блока для полилиний, отрисованных "слева-направо" и "справа-налево"

[Jeriko]

А как сделать так, чтобы блоки вставали перпендикулярно кривой?

[skif58]

Jeriko, так:
Команда: _measure
Выберите объект для разметки:
Длина сегмента или [Блок]: Б
Имя блока для вставки: 1
Согласовать ориентацию блока с ориентацией объекта? [Да/Нет] <Д>:
Длина сегмента: 10

[VVA]

Jeriko, Иллюстрация п. 2 из #17. Два блока: ПК90 и ПК180. Если блоки ставятся не в ту сторону, меняй в _measure имя блока на другое

[Olga_@@@]

и по-ангельски

Select object to measure:
Specify length of segment or [Block]: b
Enter name of block to insert: 1
Align block with object? [Yes/No] <Y>: y
Specify length of segment: 10

[Jeriko]

Понял свою ощибку. я блоки создавал изначально под углом, вот и получилась у меня кривая расстановка)
Всем спасибо за ответы и за помощь.

[VVA]

Jeriko, См. пример в #20. Блоки поворачиваются на угол касательной к кривой в каждой точке. Поэтому нужно сначала правильно создать сам блок. См. как созданы блоки ПК90 и ПК180 с 0 углом поворота.

[Jeriko]

А научить автокад самону правильно, по возрастающей расставлять номера пикетов (ПК01+00, ПК02+00...ПК99+00) это из области фантастики?

[Olga_@@@]

Вы пытаетесь Civil заново изобрести? следующий вопрос про переходные кривые будет?

[Jeriko]

Я пытаюсь облегчить себе работу в автокаде. Для работы в Civil 3D у меня нет как и самой программы, так и навыков работы в ней.

[skif58]

Сообщение от Jeriko А научить автокад самону правильно, по возрастающей расставлять номера пикетов (ПК01+00, ПК02+00...ПК99+00) это из области фантастики?

Неа. Например, этот лисп и пикеты проставит и профиль построит.

[Olga_@@@]

Jeriko, а, что Вы проектируете? Может быть Вам обычный Автокад не совсем подходит?

[skif58]

Offtop: Olga_@@@, а у Вас правда три собаки?

[Jeriko]

skif58 Так этот лисп для построения профилей? Мне необходимо проставить пикетаж на плане, как показанно на чертеже в моем первом сообщении. Используя данный лисп я могу это сделать?

Olga_@@@ Я разрабатываю стройгенпланы для организации кап ремонта магистральных трубопроводов. В принципе возможностей автокада для этого вполне хватает, но проставлять пикетаж по трассе длиной в 30-50км, довольно утомительно и долго, поэтому хотелось бы этот процесс автоматизировать

[skif58]

Сообщение от Jeriko skif58 Мне необходимо проставить пикетаж на плане, как показанно на чертеже в моем первом сообщении. Используя данный лисп я могу это сделать?

Нееет, - это я для примера первый попавшийся привел, - ну, что это вообще возможно. Им строится профиль и проставляется пикетаж по указанным 3D точкам, но только по прямым в плане между точками, на кривых пикетаж сразу съедет.

[Jeriko]

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

[Кулик Алексей aka kpblc]

А разве это уже имеет отношение к команде _.measure?

[Jeriko]

не имеет, но тем плодить не хочется.

Сообщение от Jeriko не имеет, но тем плодить не хочется.

А их плодить и не надо... Надо поиском просто воспользоваться: извлечение данных

[Кулик Алексей aka kpblc]

Jeriko, темы не хочется плодить? А ты уверен, что потом твои запросы и ответы на них хоть кто-то найдет?
Offtop: Неужели трудно подумать о тех, кто "идет следом"?

[Jeriko]

Кто ищет, тот всегда найдет
Если по теме, то ты прав, мой вопрос не имеет прямого отношения к команде _measure, поэтому создам отдельную тему.