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

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Разорвать объекты в точках пересечения. BreakObjects.

LISP. Разорвать объекты в точках пересечения. BreakObjects.

Ответ
Поиск в этой теме
Непрочитано 19.03.2008, 14:32 5 | 1
LISP. Разорвать объекты в точках пересечения. BreakObjects.
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,990

Набор команд для разрыва объектов в точках пересечения.
Автор: Charles Alan Butler (CAB)
Опубликовано: Break All or Some (там же выкладываются последние изменения)
Описание: Разрывает все выбранные объеты в точках пересечения.
Допустимые объекты: отрезки, полилинии, сплайны, эллипсы, круги, дуги.
Команды:
  • MyBreak - DCL для выбора нужной команды
  • BreakAll - Разрывает выбранные объекты на пересечениях друг с другом
  • BreakwObject - Разрывает выбранные объекты единственным объектом
  • BreakObject - Разрывает единственный объект другим объектом
  • BreakWith - Разрывает выбранные объекты другими выбранными объектами
  • BreakTouching - Разрывает объекты в точках пересечения с выбранным объектом
  • BreakSelected - Разрывает выбранные объекты в точках пересечения с не выбранными объектами
  • BreakRemove - Break selected object with any objects that touch it & remove every other new segment, start with selected object

Лицензия и права:
Цитата:
;;;===========================================================
;;; THIS SOFTWARE IS PROVIDED "AS IS" WITHOUT EXPRESS OR IMPLIED ;
;;; WARRANTY. ALL IMPLIED WARRANTIES OF FITNESS FOR ANY PARTICULAR ;
;;; PURPOSE AND OF MERCHANTABILITY ARE HEREBY DISCLAIMED. ;
;;; ;
;;; You are hereby granted permission to use, copy and modify this ;
;;; software without charge, provided you do so exclusively for ;
;;; your own use or for use by others in your organization in the ;
;;; performance of their normal duties, and provided further that ;
;;; the above copyright notice appears in all copies and both that ;
;;; copyright notice and the limited warranty and restricted rights ;
;;; notice below appear in all supporting documentation. ;
;;;===========================================================


Актуальная версия 2.2a (для локализованных версий исправлен недочет в соответсвии с постом #81
Цитата:
Update to Version 2.2
Updated to fix a bug when closed objects are broken and one of the break points are at the end/start point of the closed object.
Версия 2.3 адаптирована для работы с Брикскад (см #103)

*** Добавлено 30.09.2009
Аналогичная программа Дениса Флюстикова: Фрагмент чертежа по прямоуг.,кругл. или ломаной границе
*** Добавлено 20.04.2014
ObjectARX. Утилита TotalBreaker - разбиение примитивов в точках взаимного пересечения. или здесь
Break all objects selected with each other. (TotalBreaker)

Вложения
Тип файла: lsp BreakObjects17.LSP (21.3 Кб, 1432 просмотров)
Тип файла: lsp BreakObjects18.LSP (34.3 Кб, 966 просмотров)
Тип файла: lsp BreakObjects21.LSP (39.5 Кб, 1326 просмотров)
Тип файла: lsp BreakObjects22a.LSP (41.5 Кб, 2417 просмотров)
Тип файла: lsp BreakObjects23.LSP (41.7 Кб, 1021 просмотров)

__________________
Как использовать код на Лиспе читаем здесь

Последний раз редактировалось VVA, 07.01.2020 в 11:06. Причина: версия 23
Просмотров: 113919
 
Непрочитано 23.08.2013, 17:22
#81
skkkk


 
Регистрация: 20.03.2008
Сообщений: 2,653


В версии 21 из шапки темы
(ssget "_+.:E:S" ...............
а в 22-й
(ssget "+.:E:S" ...............
И так в трех местах по коду.
Может поэтому ругается "***неверная строка режима ssget"?
skkkk вне форума  
 
Автор темы   Непрочитано 26.08.2013, 10:49
#82
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


skkkk, Сергей, спасибо за дефектацию. Обновил версию в шапке
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 02.09.2013, 19:48
#83
skkkk


 
Регистрация: 20.03.2008
Сообщений: 2,653


VVA, было б за что!
А кто-нибудь может подсказать, что, собственно, означают эти плюс и точка? А также остальные, недокументированные (со слов Полещука в книге "AutoLISP и Visual LISP в среде AutoCAD") режимы ssget:
"M"
"#"
":O"
":?"
":$"
И еще: как можно (если можно вообще) комбинировать 2 режима, из которых один с двоеточием, а другой - без, например, "_W" и "_:L"?
skkkk вне форума  
 
Непрочитано 18.09.2013, 05:01
#84
АлексЮстасу

топограф, технолог
 
Блог
 
Регистрация: 24.05.2009
Москва
Сообщений: 3,030


Почему-то приложенный файл - далеко не самый сложный и большой - программа не может обработать. Линии только из активных слоев. Задумывается на десятки минут, дождаться результата не удается.
Запускал версию 22а, 21.
Если данные перекинуть в новый файл на основе шаблона acadiso.dwt, передвинуть линии в положительные координаты, то после минут 20 работы фатальная ошибка - не хватает места на диске.
Вложения
Тип файла: dwg
DWG 2004
nonregular2.dwg (203.5 Кб, 2670 просмотров)

Последний раз редактировалось АлексЮстасу, 18.09.2013 в 05:21.
АлексЮстасу вне форума  
 
Непрочитано 18.09.2013, 08:25
#85
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Цитата:
Сообщение от АлексЮстасу Посмотреть сообщение
не хватает места на диске.
почистиnь нужно диск с:?
gomer вне форума  
 
Непрочитано 18.09.2013, 12:40
#86
АлексЮстасу

топограф, технолог
 
Блог
 
Регистрация: 24.05.2009
Москва
Сообщений: 3,030


Цитата:
Сообщение от gomer Посмотреть сообщение
почистиnь нужно диск с:?
"Свободно 602 Гб".
Да и о чем разговор? В файле всего тысяча с небольшим однотипных элементов.
Да, разбивается на примерно 5000 элементов. но не 50 тысяч же, а на 5.
АлексЮстасу вне форума  
 
Непрочитано 18.09.2013, 18:29
#87
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Цитата:
Сообщение от АлексЮстасу Посмотреть сообщение
"Свободно 602 Гб".
посмотрите настройки свопа. но похоже вы кобылу по галактической орбите гоняете, а нужно мерина
gomer вне форума  
 
Непрочитано 18.09.2013, 19:02
#88
АлексЮстасу

топограф, технолог
 
Блог
 
Регистрация: 24.05.2009
Москва
Сообщений: 3,030


Цитата:
Сообщение от gomer Посмотреть сообщение
посмотрите настройки свопа. но похоже вы кобылу по галактической орбите гоняете, а нужно мерина
На Вашем компьютере за какое время этот файл разбился?
АлексЮстасу вне форума  
 
Непрочитано 18.09.2013, 19:46
#89
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


чуть больше минуты, но это не автокад, а брикскад
gomer вне форума  
 
Автор темы   Непрочитано 20.04.2014, 10:08
#90
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


Обнаружил аналог - TotalBreaker . Добавил ссылку в первый пост
Почитать можно на http://www.caduser.ru/forum/index.ph...D=44&TID=50850 и http://www.theswamp.org/index.php?topic=46723.0
Цитата:
Поэтому в программе я использовал переработанный и усовершенствованный движок основанный на алгоритме "поиска ближайшего соседа".
Таким образом мне удалось достичь достаточно высокой производительности. Так, например, 20 000 примитивов (на машине с процессором класса Intel Core 2 Duo) обрабатывается в среднем за 6 секунд.
и
Цитата:
Tested on AC2012-64 bit. Everything work fine. Not tested on big file-maybe 100 crossings. Looks safe to install.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 11.04.2016, 17:34
#91
CEBEP


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


Подскажите, есть ли версия для Акада 2016 (у меня не работает на нем (( )
CEBEP вне форума  
 
Автор темы   Непрочитано 11.04.2016, 22:37
#92
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


CEBEP, про какую конкретно версию идет речь?
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 11.04.2016, 23:24
#93
CEBEP


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


BreakObjects. Все что в шапке:на 2016 подгружаю любую из них-не работает. на 2014 работало всё.
CEBEP вне форума  
 
Непрочитано 12.04.2016, 01:01
#94
Sleekka

-
 
Регистрация: 24.07.2005
Москва
Сообщений: 1,335


"command" "command-s" ?
Sleekka вне форума  
 
Непрочитано 12.04.2016, 08:34
#95
trushev


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


Цитата:
Сообщение от Sleekka Посмотреть сообщение
"command" "command-s" ?
или установить LEGACYCODESEARCH = 1?
trushev вне форума  
 
Непрочитано 12.04.2016, 09:04
#96
CEBEP


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


LEGACYCODESEARCH-Вкл

Сообщение выдает такое:
Команда: MYBREAK
; ошибка: неверный тип аргумента: FILE nil

----- добавлено через 25 сек. -----
Цитата:
Сообщение от Sleekka Посмотреть сообщение
"command" "command-s" ?
Не знаю что таке и куда совать =))
CEBEP вне форума  
 
Автор темы   Непрочитано 12.04.2016, 16:35
#97
VVA

Инженер LISP
 
Регистрация: 11.05.2005
Минск
Сообщений: 6,990
<phrase 1= Отправить сообщение для VVA с помощью Skype™


CEBEP, Проверил на 2016 BreakObjects22a.LSP. У меня работает
Поищи в %AppData%\Roaming файлы BreakAll.dcl и удали все, что найдешь. Они создаются программно. Может у тебя тут сбоит.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 13.04.2016, 10:58
#98
CEBEP


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


Цитата:
Сообщение от VVA Посмотреть сообщение
CEBEP, Проверил на 2016 BreakObjects22a.LSP. У меня работает
Поищи в %AppData%\Roaming файлы BreakAll.dcl и удали все, что найдешь. Они создаются программно. Может у тебя тут сбоит.
Спасибо за участие, не помогло =(
CEBEP вне форума  
 
Непрочитано 08.06.2018, 18:17
#99
poobschatso


 
Регистрация: 28.04.2018
Беларусь
Сообщений: 169


Цитата:
Сообщение от CEBEP Посмотреть сообщение
LEGACYCODESEARCH-Вкл

Сообщение выдает такое:
Команда: MYBREAK
; ошибка: неверный тип аргумента: FILE nil

----- добавлено через 25 сек. -----

Не знаю что таке и куда совать =))
от имени администратора акад запусти и пути пропиши в доверенных
может дело в винде а не в акаде
poobschatso вне форума  
 
Непрочитано 31.12.2019, 03:02
#100
modest-bp


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


Здравствуйте!
Очень полезная была утилита MyBreak, сросся с ней за время работы на 2014 автокаде, но теперь, после обновления до 2019, похоже, придётся с нею расстаться: не работает (error: no function definition: VLAX-ENAME->VLA-OBJECT)

Total Breaker тоже, похоже, остановился в развитии на 2014 версии када.

Подскажите, пожалуйста, знает ли кто-нибудь аналогичную утилиту, которая бы работала на 2019 версии автокада?
modest-bp вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Разорвать объекты в точках пересечения. BreakObjects.

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нужен LISP для разрыва линий в точках пересечений ilka_t LISP 18 15.03.2013 16:35
деление множества линий в точках пересечения shurup Программирование 4 24.03.2008 15:11
Координаты точки пересечения line и pline (LISP) paradoxvaha LISP 3 10.07.2007 13:04
Как разорвать объектыв точках, образованных дивайдом? Бали AutoCAD 6 03.07.2007 17:39