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

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

LISP. Быстрое рисование. QUICKDRAW

Ответ
Поиск в этой теме
Непрочитано 08.06.2009, 11:54 7 |
LISP. Быстрое рисование. QUICKDRAW
VVA
 
Инженер LISP
 
Минск
Регистрация: 11.05.2005
Сообщений: 6,990

Развитие идеи, изложенной ttt и кода Rory Love, опубликованного Vova, здесь.
Внесены некоторые доработки по предложению Largo_GT, Valery Brelovsky, Yuriy, Disney, и др. участников форума. некоторые доработки под себя опубликовал Yuriy здесь
Принцип работы программы:
Выбираете примитив-образец и рисуете такие-же примитивы с такими же свойствами. Кроме того, при повторе (пробел, клавиша ENTER, или правая кнопка мыши) рисование по примитиву-образцу будет повторяться (повторное указание не требуется).
Короткие имена:
QR - QUICKDRAW с восстановлением свойств
Q - QUICKDRAW
История:
22.07.2009 - Добавлена обработка временных привязок при установке OSNAPCOORD = 2
02.09.2009 - Добавлена обработка linetype scale и SPLINE
10.09.2009 - Добавлена обработка Mtext и Table
09.11.2009 - Восстановление PLINEWID
24.11.2009 - HPDOUBLE in USER DEFINE PATTERN
05.04.2010 - HPSPACE in USER DEFINE PATTERN
07.06.2010 - Add MLINE. Correct GetDynamicBlockPropertyList function
21.05.2010 - Add True Color
23.08.2011 - Add XLINE and RAY
14.10.2015 - Add MLEADER

PS. Начиная с 2011 версии появилась аналогичная команда _ADDSELECTED

Вложения
Тип файла: lsp quickdraw.LSP (21.8 Кб, 553 просмотров)

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

Последний раз редактировалось VVA, 14.10.2015 в 17:30.
Просмотров: 51127
 
Автор темы   Непрочитано 01.09.2010, 22:59
#81
VVA

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


Думаю что скорее всего нет. Здесь на форуме есть разработчики, можно попробовать им задать вопрос. Я не имею опыта работы с СПДС.
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 28.10.2010, 11:13
#82
MeshIN

Изыскания и САПР
 
Регистрация: 05.07.2008
Ижевск
Сообщений: 297


Отличная программа - после обновления Bricscad до версии V11 стала работать и в нем.
MeshIN вне форума  
 
Непрочитано 21.02.2011, 11:20
#83
Nike

Шаражпроектхалтурмонтаж
 
Регистрация: 29.10.2004
Талды-Париж
Сообщений: 5,989


Уважаемый VVA!
А можно ли добавить возможность создания объектов "Autodesk СПДС модуля"?
Nike вне форума  
 
Непрочитано 16.08.2011, 12:09
#84
Largo GT

Архитектор
 
Регистрация: 11.03.2009
Новороссийск
Сообщений: 99


to VVA обнаружил что
Код:
[Выделить все]
 Сообщение AutoCAD
---------------------------
XLINE cannot be used with QUICKDRAW
Если не сложно добавьте пожалуйста поддержку XLINE

Последний раз редактировалось Largo GT, 18.08.2011 в 10:10.
Largo GT вне форума  
 
Автор темы   Непрочитано 23.08.2011, 10:51
#85
VVA

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


Обновил #1
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 23.08.2011, 11:40
#86
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Наверное я что то пропустил.
В 2011 и 2012 (не помню но вроде и в 2010) есть команда _addselected - это то же?
Если не то в чем разница, если да то кто у кого стырил?
Jonas вне форума  
 
Автор темы   Непрочитано 23.08.2011, 12:45
#87
VVA

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


Да, похоже это то же.

Цитата:
Сообщение от Jonas Посмотреть сообщение
если да то кто у кого стырил?
Цитата из #1
Цитата:
История:
22.07.2009 - Добавлена обработка временных привязок при установке OSNAPCOORD = 2
02.09.2009 - Добавлена обработка linetype scale и SPLINE
10.09.2009 - Добавлена обработка Mtext и Table
09.11.2009 - Восстановление PLINEWID
...
А если пройтись по ссылке из #1, то там дата 09-01-2005
Вот и сравнивай
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 23.08.2011, 12:56
#88
Jonas

конструктор машиностроитель
 
Регистрация: 14.05.2007
Новосибирск
Сообщений: 893


Цитата:
Сообщение от VVA Посмотреть сообщение
А если пройтись по ссылке из #1, то там дата 09-01-2005
Вот и сравнивай
Так предъявляйте Афтодеску, пускай поделиться прибылью.
Jonas вне форума  
 
Непрочитано 26.08.2011, 12:57
#89
Largo GT

Архитектор
 
Регистрация: 11.03.2009
Новороссийск
Сообщений: 99


Цитата:
Сообщение от VVA Посмотреть сообщение
Обновил #1
спасибо VVA, а autodesk пусть не жадничает
Largo GT вне форума  
 
Непрочитано 21.03.2013, 11:25
#90
Valery Brelovsky

Инженер дорожник
 
Регистрация: 22.10.2007
Израиль
Сообщений: 1,859


Цитата:
Сообщение от VVA Посмотреть сообщение
PS. Начиная с 2011 версии появилась аналогичная команда _ADDSELECTED
Недавно обнаружил это дополнение. Попробовал работать и сравнил с работой Лиспа QUICKDRAW. Могу сказать что уступает Лиспу. Первое при работе с блоком задаёт много вопросов по масштабам углу поворота. С лиспом работал с 2009 и когда не было нужды масштабировать блок выбранный по QUICKDRAW. Блок в чертеже имеет уже нужный масштаб, который был определён при первой вставке блока и по QUICKDRAW уже практически нет необходимости. По QUICKDRAW за точкой вставки идёт угол поворота и всё. Работа с полилинией. По QUICKDRAW я черчу аналогичную линию с теми спойствами которые определены в уже нарисованной линии, по _ADDSELECTED линия чертится той толщины которая была определена в предыдущей команде остальноё вроде как надо. При выборе прямоугольника _ADDSELECTED чертит линию QUICKDRAW прямоугольник.
При работе с обычным текстом по _ADDSELECTED текст появляется после написания текста и нажатия ВВод. По QUICKDRAW текст видим как и при работе с командой _текст.
Valery Brelovsky вне форума  
 
Непрочитано 24.02.2014, 02:08
#91
Клетчатый


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


В AutoCAD2014/Windows8 программа вызывает этот глюк...
Клетчатый вне форума  
 
Непрочитано 14.10.2015, 14:32
#92
config


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


Доброго времени суток! Вопрос к автору, VVA. А нельзя ли в программу добавить черчение по образцу объекта - мультивыноски. Спасибо!
config вне форума  
 
Автор темы   Непрочитано 14.10.2015, 17:30
#93
VVA

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


config, Обновил #1. Пробуй
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 14.10.2015, 18:36
#94
config


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


Цитата:
Сообщение от VVA Посмотреть сообщение
config, Обновил #1. Пробуй
Кто бы сомневался. Как часики. Спасибо огромное за программу! За отзывчивость! За оперативность! Удачи!
config вне форума  
 
Непрочитано 27.03.2022, 21:57
#95
nikkomp


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


Здравствуйте просьба кто умеет делать лиспы, на основе этой проги нельзя ли сделать этакую лайт, что бы он только выставлял текущими свойства объекта а чем чертить это уж решал пользователь сам, кто пользовался Vetcad этакий аналог комманды _MOPC_VC
nikkomp вне форума  
 
Автор темы   Непрочитано 28.03.2022, 14:22
#96
VVA

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


Цитата:
Сообщение от nikkomp Посмотреть сообщение
этакий аналог комманды _MOPC_VC
Код:
[Выделить все]
 
 ;_Устанавливает текущими свойства
(defun C:SETPR ( / e1)(if (setq e1 (car(entsel)))(props e1))(princ))
 ;_Восстанавливает значения
(defun C:RP ()(RESTOREPROPS))
Нужны функции из файла, выложенного в #1. Можно добавить в редакторе в конец файла
SETPR - устанавливает свойства
RP - восстанавливает значения
__________________
Как использовать код на Лиспе читаем здесь
VVA вне форума  
 
Непрочитано 05.09.2022, 13:19
#97
nikkomp


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


Цитата:
Сообщение от VVA Посмотреть сообщение
SETPR - устанавливает свойства
RP - восстанавливает значения
Понравилось что можно восстанавливать значение свойств "по слою", но он работает если ты изменил перед этим командой SETPR, а нельзя ли лисп чтобы он восстанавливал значение "по слою" и если изменил текущие свойства вручную через панель
nikkomp вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Готовые программы > LISP. Быстрое рисование. QUICKDRAW

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ламерские вопросы по LISP и DCL TheBuTeK LISP 7 03.07.2016 22:15
Запуск Lisp команды в новом документе BlackHarp LISP 1 26.03.2009 23:06
LISP на _purge Малюк LISP 12 23.12.2007 18:15
Библиотека доступа к содержимому растров из LISP - существуе kp+ LISP 6 16.10.2007 21:45
загрузка DOS прог через LISP Gaa LISP 15 12.08.2005 19:19