| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > Процедура удаления разбитых штриховок. Acad lisp

Процедура удаления разбитых штриховок. Acad lisp

Ответ
Поиск в этой теме
Непрочитано 18.01.2021, 18:04 1 | #1
Процедура удаления разбитых штриховок. Acad lisp
Петр-и-Алекс
 
Регистрация: 18.01.2021
Сообщений: 404

Предлагаю процедуру удаления разбитых штриховок в АКАД.
Обычный lisp.
Сценарий процедуры:
1 - указать на чертеже зону, в которой будет произведена очистка. По сути создается исходный набор "отрезков", из которого будут удалены осколки штриховок.
2 - указать образцы отрезков, подобные которым надо удалить.
Будут удалены такие отрезки, которые совпадают с "образцовыми" по слою, по "направлению" и те, что не длиннее "образцовых". Последний фактор позволяет удалять фрагменты, порезанные границами зоны штриховок.
По практике такой специфики отбора достаточно для корректной фильтрации.
Если в образах встретятся отрезки нулевой длины, то они так же будут вычищены из указанной зоны. (Отрезки нулевой длины часто встречаются в штриховках)
При большом количестве отрезков (например более 5'000) в наборе этапа 1, рекомендую указывать в "образцах" не более дюжины отрезков. Иначе время исполнения процедуры может быть существенно.
Лучше сделать еще одну итерацию очистки с другим набором "образцов".
Традиционный lisp, вроде как должен работать во всех версиях Кад.
Первый пост на ресурсе. Если что не так, извиняюсь. Благодарен за советы и отзывы.

----- добавлено через ~15 ч. -----
Коллеги, посоветуйте:
может быть лучше публиковать подобное в этом разделе? https://dwg.ru/dnl/ri35
или может быть есть смысл в публикациях и там и тут?
цель публикаций одна: помочь чем могу большему числу соратников...

Последний раз редактировалось Петр-и-Алекс, 09.02.2021 в 18:24.
Просмотров: 4772
 
Непрочитано 20.03.2021, 13:49
#2
dadatamada


 
Регистрация: 26.08.2011
Сообщений: 16


А где сам lisp? =)
dadatamada вне форума  
 
Автор темы   Непрочитано 24.03.2021, 21:55
#3
Петр-и-Алекс


 
Регистрация: 18.01.2021
Сообщений: 404


случилась авария... файл невзначай потерялся
как только пойму, как восстановить файл - сразу восстановлю.
Петр-и-Алекс вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > Процедура удаления разбитых штриховок. Acad lisp

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Простой макрос выбора и удаления всех штриховок MrBrown Программирование 9 06.06.2014 12:30
Окно атрибутов блоков в Acad 2014 + Lisp gizmo_zx LISP 2 19.03.2014 12:32
Автоматическая замена АПИ (cui) (ACAD, LISP) EfremenkoDO LISP 29 11.01.2013 14:51
Реакторы в ACAD x64 (LISP, ACAD '09 - '10) EfremenkoDO LISP 12 13.10.2010 23:52
ACAD LT + lisp / vba Кулик Алексей aka kpblc LISP 16 30.03.2006 22:04