Выноска длины полилинии

Подкину "дровишек" (полилинии же).

Нумерация вершин полилинии

PS: Ежели будет решение, сброшу ссылку на https://dwg.ru/

PS2: Отбой. "Ложная тревога".

 

Я эту тему на dwg.ru видел, отвечать не стал, так как надоела уже эта нумерация.

 

Добрый день.

Как изменить, чтобы текст выводил в две строки, верхняя "марка кабеля" нижняя "L=", это получается с мультивыноской,
1. прописываю "_leader" на "_mleader", мвыноску делает, но текст не выдаёт?
2. где в коде прописать для мтекста высоту текста, стиль, выравнивание, также свойства и для мультивыноски?

Спасибо.

 

меткой характерной линии и всё

 

Пожалуйста!
Пробуйте.

 

Добрый день.

1. Куда добавить прибавку дополнительных Х метров, чтобы в мвыноске итоговые суммировались L=длина полилинии+Х м?
2. Получится, чтобы длина в мвыноске менялась, если изменилась длина полилинии, т.е. автоматически или после реген?


Спасибо.

 

А что такое Х метров? Откуда они берутся?

Возможно, но надо подумать.

 

Х метров это цифра, число, например 3. Чтобы в мвыноске итоговое значение суммировалось: длина полилинии 14.16 м и +3 м - "L=17.16 м"

 

Лайк поставить не забудьте. Я старался.

 

Этот вариант совсем другой. Приходиться больше действий для ввода делать (каждый раз вводить Х доп метры, марку кабеля).
Но тоже пригодится.

Лучше в самом коде mll.LSP прописать Х доп метры (а уже для каждого варианта вручную менять эту цифру).

Надо начинать самому autolisp изучать.

Спасибо за потраченное время.

 

1. Учите, и обрящете, толцыте, и отверзется.
2. Учитесь формулировать вашу задачу и запросы.
3. Попробуйте такой вариант:

 

1958, подскажите, плз, как в вашем len_line.LSP из поста #3 подправить длину в м, потому что по факту длина выдаётся в мм (а подписывается в м),
т.е. 500 мм записываются как 550 м, а надо, чтобы было 0.50 м. Спасибо!

 

Могу сказать, что это "изюминка" проектировщиков - чертить все в мм.
Замените строчку (vl-cmdf "_leader" pt pause "" (strcat (rtos len_curve 2 2) " м") "")
на (vl-cmdf "_leader" pt pause "" (strcat (rtos (/ len_curve 1000) 2 2) " м") "")

 

Да черчу в мм, а все вычисления произвожу в м, в м кв. Спасибо за подсказку и быструю реакцию. Ставлю лайк!

--- Сообщения объединены, Jan 31, 2023, Оригинальное время сообщения: Jan 31, 2023 ---

1958, попыталась поменять мм на м в другом Вашем лиспе LL.lsp
строчку (setq s (strcat "L" k "=" (rtos s 2 2) "m"))
заменяю на (setq s (strcat "L" k "=" (rtos (/ len_curve 1000) 2 2) " м")),
но, наверное, неправильно, ставится всё одной длиной, прошу помощи...

 

Должно быть так: (setq s (strcat "L" k "=" (rtos (/ s 1000) 2 2) "m"))

 

Спасибо, 1958!

 

1958, Ваш лисп LL.lsp проставляет длину всех полилиний, отрезков, дуг, окр. и т.д. автоматом в чертеже без выбора (так что применять надо с осторожностью, т.к. может подписать и то, что не нужно), а есть возможность добавить в лисп возможность одиночного и множественного выбора, а высоту текста назначить по умолчанию, например, 2.5 (или текущим стилем текста)? И можно убрать L и k, оставить только значение длины. Спасибо.

 

Здорово, огромное спасибо, 1958, за лисп LLL, если можно, маленький нюанс, текст немного далеко от линии, где-то на 3.5, а лучше было бы на 1.5 мм... и перевод в м у меня опять не получился...

 

Найдите строчку (setq pt (polar p (+ a (/ pi 2)) (* 2 h))). Поиграйтесь с последней 2.