Autocad.

программирование программы AutoCAD автокад

Можно ли в программе (7-8 версии) найти суммарную длину отрезков отмеченных командой "Выбор"
Существующая опция "Список" даёт длину двух самых длинных элементов последовательно.
Опция нужна для подсчёта длины арматуры в плите произвольной формы
Ответы:
Рисуй отрезки командой ПОЛИЛИНИЯ. Потом выберешь и система даст тебе общую длину.
арматура считается несколько другими программами, ну да ладно.
если это не одна полилиния, то общей длины при выборе не будет. команда LIST тоже дает по отдельности длины. (но в принципе, все длины, а не самых длинных отрезков, там нужно нажать Enter)
(defun C:LS ()
 (setq sset (ssget '((0 . "LINE")) ))
 (if sset
   (progn
     (setq tot 0.0)
     (setq num (sslength sset) itm 0)
     (while (< itm num)
       (setq hnd (ssname sset itm))
       (setq ent (entget hnd))
       (setq pt1 (cdr (assoc 10 ent)))
       (setq pt2 (cdr (assoc 11 ent)))
       (setq dis (distance pt1 pt2))
       (setq tot (+ tot dis))
       (setq itm (1+ itm))
     )
     (princ (strcat "\nTotal Distance = " (rtos tot)))
   )
 )
 (princ)
)


12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.