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

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

LISP. Очистка чертежа от мусора

Ответ
Поиск в этой теме
Непрочитано 18.08.2014, 16:15 11 |
LISP. Очистка чертежа от мусора
gomer
 
строю, ломаю
 
Украина
Регистрация: 03.04.2008
Сообщений: 5,515

Выкладываю пилотный проект программы по очистке чертежа. Код не мой, я просто собрал кое-что до кучи
Надеюсь кому-нибудь да поможет

Применение
- Загрузить CleanDWG.vlx в автокад или CleanDWG.des в bricscad
- В командной строке набрать CLEANDWG

Замеченные ошибки
В Autocad 2013 En русские буквы в диалоговом окне отображаются некорректно. Обсуждение проблемы тут

Критика и предложения приветствуются

История изменений
31.03.2014 Программа обновлена до версии 1.3

Миниатюры
Нажмите на изображение для увеличения
Название: CleanDWG13.png
Просмотров: 7698
Размер:	39.4 Кб
ID:	147269  

Вложения
Тип файла: zip CleanDWG13.zip (19.1 Кб, 12439 просмотров)


Последний раз редактировалось gomer, 16.03.2016 в 18:02.
Просмотров: 181393
 
Непрочитано 19.11.2021, 07:25
#121
Gotch


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


Добрый день друзья.
Существует ли данная чистилка для акада 2021?
пробовал ее запустить на 2021 вылетает с ошибками
скрины ошибок приложил
Миниатюры
Нажмите на изображение для увеличения
Название: cleandwg ошибки акад 2021 1.jpg
Просмотров: 203
Размер:	16.1 Кб
ID:	242900  Нажмите на изображение для увеличения
Название: cleandwg ошибки акад 2021 2.jpg
Просмотров: 200
Размер:	16.5 Кб
ID:	242901  
Gotch вне форума  
 
Непрочитано 19.11.2021, 07:52
#122
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


Чему равна системная переменная LISPSYS? Попробуй поставить в 0
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 19.11.2021, 07:55
#123
Gotch


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


она стояла 0 и сейчас так же 0
Gotch вне форума  
 
Непрочитано 19.11.2021, 09:47
#124
freese

ingénieur
 
Регистрация: 21.07.2008
Сообщений: 762


Цитата:
Сообщение от Gotch Посмотреть сообщение
Добрый день друзья.
Существует ли данная чистилка для акада 2021?
пробовал ее запустить на 2021 вылетает с ошибками
скрины ошибок приложил
загружать надо скомпилированный vlx, он отрабатывает нормально в 2021
freese вне форума  
 
Непрочитано 19.11.2021, 11:13
#125
Gotch


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


Запустил vlx
имею вот такие ошибки
Миниатюры
Нажмите на изображение для увеличения
Название: cleandwg ошибки акад 2021 3.jpg
Просмотров: 199
Размер:	20.5 Кб
ID:	242913  Нажмите на изображение для увеличения
Название: cleandwg ошибки акад 2021 4.jpg
Просмотров: 195
Размер:	19.5 Кб
ID:	242914  
Gotch вне форума  
 
Непрочитано 03.08.2022, 13:43
#126
nekt0Engineer


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


Доброго времени суток !
Подскажите, почему у меня данный LISP не работает? AutoCAD 2021. Ввожу команду CLEANDWG и ничего не происходит, возле командной строки сразу появляется три надписи: "отмена команды пользователем. Очистка завершена. Команда:"
Как исправить ? LISP загружал так же как и остальные до этого, все работают кроме этого
nekt0Engineer вне форума  
 
Непрочитано 03.08.2022, 15:04
#127
nekt0Engineer


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


Цитата:
Сообщение от freese Посмотреть сообщение
загружать надо скомпилированный vlx, он отрабатывает нормально в 2021
и как это сделать ?
nekt0Engineer вне форума  
 
Непрочитано 11.11.2022, 10:48 Работает!
#128
haza81


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


Спасибо! Помогло! Мучался с этой xepнeй последние лет 6 наверно.
Заработало у меня на 2008 автокаде!
haza81 вне форума  
 
Непрочитано 15.03.2023, 13:11
#129
jackUAROBEY

Проектировщик ВК
 
Регистрация: 18.09.2014
Анапа
Сообщений: 55


А под нанокад такая программка есть?
jackUAROBEY вне форума  
 
Непрочитано 15.03.2023, 13:13
#130
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


Попробуй эту запустить. Возможно, сработает.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 15.03.2023, 13:19
#131
jackUAROBEY

Проектировщик ВК
 
Регистрация: 18.09.2014
Анапа
Сообщений: 55


не не работает. VLX не видит а лисп не работает

----- добавлено через ~6 мин. -----
Команда: APPLOAD
APPLOAD,ЗАГПРИЛ - Загрузка приложения...
C:CLEANDWG
CleanDWG.lsp загружен. Команды: CLEANDWG

nil
Команда: CleanDWG

CLEANDWG - CLEANDWG
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
GETCFG функция не определена
Очистка документа...
Всего удалено визуальных объектов: 0
Очистка завершена
jackUAROBEY вне форума  
 
Непрочитано 15.03.2023, 13:57
#132
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


А, ну это не лечится. Только полная переделка всех обращений к getcfg / setcfg, раз уж они не реализованы в NC. ИМХО к автору.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 15.03.2023, 14:41
#133
kacugu

начинающий инженер-гидротехник
 
Регистрация: 18.04.2010
Санкт-Петербург
Сообщений: 893


Цитата:
Сообщение от jackUAROBEY Посмотреть сообщение
А под нанокад такая программка есть?
Вот в этой теме на форуме нанокада выкладывали что-то похожее
https://forum.nanocad.ru/index.php?/...i-ne-pomogaet/
kacugu вне форума  
 
Непрочитано 13.05.2023, 22:48
#134
Project-gaz

Проектировщик газопроводов
 
Регистрация: 14.07.2017
Москва
Сообщений: 7
Отправить сообщение для Project-gaz с помощью Skype™


У меня Autocad 2017. Загружал файл CleanDWG.vlx. После нажатия кнопки ок в окне программы, в командной строке пишет:

Команда: _CLEANDWG
Очистка документа...
Всего удалено визуальных объектов: 0
no function definition: vlax-vla-object->ename"no function definition: vlax-vla-object->ename"

Если загружать CleanDWG.lsp, то пишет "Очистка документа...", но тоже ничего не чистит.
После сохранения размер файла (с одним отрезком) в 5МБ не изменился.
Может я что-то делаю не так?
Project-gaz вне форума  
 
Непрочитано 14.05.2023, 01:30
#135
skkkk


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


Цитата:
Сообщение от Project-gaz Посмотреть сообщение
no function definition: vlax-vla-object->ename
Похоже на то, что перед запуском _CLEANDWG нужно ввести в комстроке (vl-load-com).
Хотя, очень странно, что в компилированном лиспе от gomer'a не прописан этот вызов функции, которая загружает vla-расширение (в CleanDWG.lsp - есть), и дело может быть в другом.
skkkk вне форума  
 
Непрочитано 14.05.2023, 12:16
#136
Project-gaz

Проектировщик газопроводов
 
Регистрация: 14.07.2017
Москва
Сообщений: 7
Отправить сообщение для Project-gaz с помощью Skype™


skkkk, Когда ввожу к. строке "vl-load-com" пишет неизвестная команда. lsp и vlx загружены
Project-gaz вне форума  
 
Непрочитано 14.05.2023, 12:53
#137
Сергей812


 
Регистрация: 10.08.2013
Сообщений: 11,004


Цитата:
Сообщение от Project-gaz Посмотреть сообщение
Когда ввожу к. строке "vl-load-com" пишет неизвестная команда.
чистильщиками реестра не пользовались перед этим?

----- добавлено через ~3 мин. -----
можно попробовать принудительно загружать vl.arx. Если и при этом не будет работать - переустановка акада скорее всего.
Сергей812 вне форума  
 
Непрочитано 14.05.2023, 14:06
#138
Project-gaz

Проектировщик газопроводов
 
Регистрация: 14.07.2017
Москва
Сообщений: 7
Отправить сообщение для Project-gaz с помощью Skype™


Сергей812, реестр вроде не чистил. А где взять этот vl.arx? и куда его установить?
Project-gaz вне форума  
 
Непрочитано 14.05.2023, 14:25
#139
Александр Ривилис

программист, рыцарь ObjectARX
 
Регистрация: 09.05.2005
Киев
Сообщений: 2,405
Отправить сообщение для Александр Ривилис с помощью Skype™


Цитата:
Сообщение от Project-gaz Посмотреть сообщение
skkkk, Когда ввожу к. строке "vl-load-com" пишет неизвестная команда. lsp и vlx загружены
В командной строке нужно вводить не vl-load-com, а (vl-load-com) (т.е. со скобками, так как это вызов lisp-функции, а не команда).
Александр Ривилис вне форума  
 
Непрочитано 14.05.2023, 14:29
#140
Project-gaz

Проектировщик газопроводов
 
Регистрация: 14.07.2017
Москва
Сообщений: 7
Отправить сообщение для Project-gaz с помощью Skype™


Александр Ривилис, Ввожу команду (vl-load-com), ничего не происходит:

Команда: *Прервано*
Команда: (vl-load-com)


Cleandwg пишет тоже самое:
Команда: _CLEANDWG
Очистка документа...
Всего удалено визуальных объектов: 0
no function definition: vlax-vla-object->ename"no function definition: vlax-vla-object->ename"

----- добавлено через ~2 мин. -----
Команда ARX - Файлы показывает, что vl.arx загружен
Project-gaz вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Очистка чертежа от мусора

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Почему очистка чертежа не выполняется при наличии Object Enabler? Xara AutoCAD 15 03.07.2014 11:50
Создание шаблона и очистка чертежа Сержик AutoCAD 9 14.02.2013 23:06
LISP. Как запустить LISP программу при создании чертежа по шаблону? (Автоматическое заполнение основной надписи) Do$ LISP 25 22.06.2011 15:39
очистка скана от мусора grozd62 Прочее. Программное обеспечение 4 04.04.2011 21:41
LISP для очистки чертежа от дублирующихся объектов Nikolays AutoCAD 5 13.12.2010 16:59