Площади каждого типа поверхности выполнены штриховками (данные о площади которых извлекаются и обсчитываются), оконтуренных полилиниями, все разложено по отдельным слоям. При корректировке контуров за вершины полилиний, штриховки так и лезут под курсор, вперед своих же контуров, поэтому постоянно приходится выбирать их, подкидывать к ним аналогичные (selectsimilar) и скрывать.Уже после корректировки геометрии штриховкам возвращается видимость, чтобы оценить корректность построения - не отвалилась ли ассоциативность штриховки где-нибудь. И так по нескольку раз за цикл корректировки.
«Хватит это терпеть» - сказала моя лень. Повтор однотипных команд - есть явный признак того, что пора писать макрос.
Для быстрого выбора одного конкретного типа объектов (в данном случае - штриховок) в один клик мне известен только один способ.
Видели таких «атлетов», которые после первого визита в тренажерный зал на полчаса, затем два часа крутятся у зеркала, разглядывая воображаемые мышцы?
Так и я, посетив на пол часа форум DWG.RU нашел способ запускать команду «Выбор» с преднастроенной фильтрацией выбора объектов и возомнив себя «lisp-о-писцем» накрафтил целую палитру пресетов команды Выбор с фильтрами по типам объектов, свойствам объектов и их сочетаниями. Большинство кнопок на этой палитре пылятся без дела, но некоторые из них пользую регулярно.
Взяв макрос одной из кнопок, отфильтровывающий при выборе все типы объектов, кроме штриховок, я дописал в него подкоманду Всё («В»), двумя Enter-ами («;») принял подкоманду и закончил выбор, и уже к готовому набору выбранных штриховок применил «hideobjects». Таким образом получил макрос, буквально в один клик позволяющий легко отправить отдыхать все штриховки, содержащиеся в чертеже, пока полилинии делят границы влияния.
Макрос подхватывает штриховки даже на заблокированных слоях, а вот во внешние ссылки и блоки пробраться не может, так как фактически это уже другие типы объектов и при выборе и они отфильтровываются. Но и того, что есть, вполне достаточно для комфортной работы.
Текст макроса кнопки на палитре:
^C^C(sssetfirst nil (ssget '((0 . "HATCH")))) в;;HIDEOBJECTS;
#AutoCAD #AutoCAD_imho #lisp #лайфхак