[0] Будущее AutoLISP. Должен ли я изучать LISP или VB ? AutoLISP, определенно, будет поддерживаться в будущих версиях AutoCAD. VB был представлен, чтобы упростить Автоматизацию делопроизводства: ACAD <-> Excel/Access.

Оба языка имеют свои достоинства и недостатки. Рекомендуется ознакомиться с обоими. VB более графический а AutoLISP более логичный.. Объектная концепция VBA, кажется, проще для изучения, но Вы не можете выполнять в нем команды как в AutoLISPе.
Новый VBA (в R14.1) чрезвычайно быстр. См. также [5.2].

Будущее AutoLISP в работе с Visual Lisp. Для более подробной информации см. [5.3]

[1] Где найти AutoLISP программы в Интернет? Некоторые большие сайты, посвященные shareware для AutoCAD:

Другие места с AutoLISP коллекциями:

[1.1] Сохраняются ли статьи из comp.cad.autocad где-нибудь? Не имеется никакого архива comp.cad.autocad, но существуют некоторые поисковые машины, которые сохраняют статьи из новостей. В частности:

[1.2] Autodesk's SDK До AutoCAD R12 SDK было доступно непосредственно от Autodesk. SDK2 поставлялись с международной версией AutoCAD R12 бесплатно. Эти SDK включали в себя много ADS и AutoLISP исходников и библиотек.

С AutoCAD R13 Autodesk обеспечивает специальную сеть разработчиков, сравнимую с Микрософт, - ADN. Новый компакт-диск (CD) c SDK сопоставим со старым SDK, но преимущественно предназначен для ObjectARX разработчиков.
Войдите в контакт с Вашим близжайшим представителем Autodesk для получения.

Некоторые LISPы есть на http://xarch.tu-graz.ac.at/autocad/code/adesk/SDK2/

В США, членство в ADN стоит $ 495.00 ежегодно.

+ [2] Лучшие книги для изучения AutoLISP.

Помимо этого есть еще много книг о AutoLISP.

Рекомендуемые книги по LISP (не AutoLISP!):

[2.1] Интерактивная AutoLISP документация, Winhelp [был удален в предыдущей версии] Все руководства по R14 преобразованы в формат Winhelp.

Существующие AutoLISP Winhelp файлы можно найти с: R14 (целый набор) Visual Lisp от Autodesk preview, см. [5.3] старым Visual Lisp редактором (1.0 - бесплатный), см. [1] Vital LISP, ('справка' (help) поставляемая и с демо версиеи), см. [6.1]

Для DOS существует резидентная программа - LISPHLP.EXE
(активируется Ctrl-RightShift-R, 1988)

LSPDOC: At http://xarch.tu-graz.ac.at/autocad/lsp_tools/#lspdoc - это утилита которая автоматически создает Winhelp для LISP файлов.

[2.2] Стиль программирования в AutoLISP Большинство примеров, которые напечатаны в журналах или размещены на различных сайтах Web написаны ужасно, делая процесс обучения AutoLISP даже тяжелее для новичков. LISP-код должен легко читаться, во всяком случае из-за его краткости и бесчисленного числа круглых скобок. Текст программ Autodesk всегда понятно написаны иногда даже слишком. :)

Автоматические форматировщики, или так называемый beautifiers (см.[6.3]) автоматически форматируют код согласно стандарту. На R12 CD-ROM в SDK2 ACG.DOC или на http://xarch.tu-graz.ac.at/autocad/docs/acg.txt находится превосходная документация Autodesk относительно кодирования, комментирования и международных стандартов для обеспечения удобства читаемости LISP-кода.

Наиболее важные пункты: Комментируйте ваш код. используя ";;; " в 1 строке, ";; " внутри кода ";" для конечных комментариев (в строке 39) Следуйте за стандартами выравнивания что дает автоматическим форматировщикам лучше записать структурный код, чтобы он стал более читаемым. Особенно это важно для SETQ, DEFUN, IF, COND, PROGN Старайтесь избегать глобальных переменных. Если Вы используете их (для эффективности), то пометьте их, поместите их между звездочками, например: *GLOBAL* Не забудь объявить переменные (после "/" в списке параметров DEFUN). Для отладки их можно не помещать (временно). Всегда располпгаете первым символ подчеркивания в любой строке (команде и опции) которые передаются в COMMAND и OSNAP. Имеются много коммерческих программ, которые не работают в международных версиях. (command "_PEDIT" ss "_J") лучше чем (command "PEDIT" ss "J") Защита имен: с тех пор как AutoLISP не обеспечивает никакой защиты пространства имен, легко перезаписать системные функции. Используйте уникальные короткие префиксы по крайней мере, когда Вы публикуете или отдаете ваш код.
Я использую UR- для функций и UR: для переменных. ADGE и Autodesk требует даже 4 префиксных символа. Так Ваши имена будут защищены от перезаписывания другими функциями. Всегда используйте символ подчеркивания с строками (commands and options) передаваемым COMMAND и OSNAP. Итак много коммерческих программ не работающих в международных версиях. (command "_PEDIT" ss "_J") лучшее чем (command "PEDIT" ss "J") Не используй слишком много SETQ: LISP был первоначально языком функций, без любых переменных. Имеются достаточно конструкций которые работают эффективно со списками без потребности немедленного сохранения значений в переменных. (См. пример кода [21]...)
Но для удобочитаемости и целей отладки Вы должны всегда устанавливать переменные. В старом LISP было правило: Любая хорошая функция не дольше быть больше 6 строк.(LISP - второй самый старый компьютерный язык, он изобретен Джоном McCarthy в MIT в 1958) Предпочтительно используй CONS вместо APPEND: три CONS, и один REVERSE лучше чем APPEND. Для приемов с конкатенированием (опущением nil) смотрите esp. Serge's тексты: например удаление в [20.1] или сравнение стиля в [23.1]) Используйте английские символы и комментарии Не используйте T, MIN, MAX или LAST как переменные! Это функции системы!

[3] Как мне отладить программы на AutoLISP? [3.1] AutoLISP-отладчики: ACOMP для R10, распространяется бесплатно. Вы можете его использовать и для более поздних версий но возможности будут ограничены R10 версией, например не поддерживается WCMATCH функция.

Vital LISP Professional поддерживают IDE (это лучший!).

Ld, AutoLISP Debugger для R14, R13c4 и R12/Dos от Cz (новый и бесплатный) at http://www.cadstudio.cz/ftp.htm См. [5] AutoLISP компиляторы

[3.2] Модульный стиль и функция TRACE Лучшая поддержка, которую Вы можете иметь для отладки - это запись вашего кода в хорошо разработанном, модульном стиле, выделяя различные задачи в отдельные функции и затем свободно использовать вложенные вызовы функций. Это позволит Вам использовать функцию TRACE что необходимо, чтобы обнаружить любые ошибки. [3.3] Вы можете включить функцию BREAK и отладочный-вывод в свой исходный текст.

Примеры:

;;; Отладочные функции (defun break (s) (if *BREAK* (progn (princ "BREAK>> (stop with )nBREAK>> ")(princ s) (while (/= (setq s (getstring "nBREAK>> ")) "") (print (eval (read s))))))) ;исправлена v1.3! (defun dbg-print (s) ;принимает и атомы и списки (if *DEBUG* (if (listp s) (MAPCAR 'print s) (print s)))) (defun C:DEBUG () (setq *DEBUG* (not *DEBUG*))) ;переключатель вкл./выкл. (defun C:BREAK () (setq *BREAK* (not *BREAK*))) (defun CONT () (setq *BREAK* nil)) ;продолжать не прерываясь ;;;Пример (setq *BREAK* T *DEBUG* T) (defun C:TEST () (foreach x '("1" "1.0" "1e-3") (break "in foreach") ; останавливает если *BREAK* вкл., Вы можете ; задать значение x и будет выводиться его значение ; пока не введете Enter (setq x (atof x)) ; это код обработки x (dbg-print x) ; вывод нового значения x ; если *DEBUG* - вкл. ) ) Command: TEST BREAK>> (stop with ) BREAK>> in foreach BREAK>> x 1.0 BREAK>> (CONT) ; отключить функцию break nil BREAK>> 1.0 1.0 0.001 Вы можете также выключить отладочный-вывод BREAK>> (setq *DEBUG* nil) чтобы проскочить большие циклы.

[4] Как мне защитить свои AutoLISP программы? "Вы действительно нужно защитить их? Если Вы хотите распространить код среди своих друзей, то почему бы просто не отдать им код? Ваш исходный текст в любом случае защищен авторским правом. Работая с другими Вы получаета возможность получения новых идей и писать более совершенные программы.
Многие из моих утилит были улучшены моими друзьями, а я улучшил многие их утилиты." (Dennis)

FAS Безопасность:
Недавно в группах новостей было широкое обсуждение , начатое Tony Tanzillo, по поводу FAS безопастности. FAS оказлся более защищенным чем ARX, т.к. сначала кодируется а потом компилируется. C и Java декомпиляторы существуют а LISP-ых пока нет. Имена переменных, строчные и цифровые значения являются более незащищенными чем сам алгоритм. Откомпилорованный код в FAS с опцией Optimized/Internal не сохраняет имена переменных.

Вывод:
Серьезное шифрование теперь обеспечивается Autodesk, чтобы помочь профессиональным AutoLISP-разработчикам. Kelvinate [4.1] делает LISP файлы нечитаемыми и быстрее загружаемыми. Protected [4.2] - легко расшифровывается. Другие не расшифровываются. Если LISPы зашифрованы Convert -e$GUARD, то могут быть расшифрованы только с её же помощью.

[5] AutoLISP компиляторы Рассматриваться будут три AutoLISP компилятора. Может вскоре появяться более совершенные (Allegro CL и Lispworks для Windows с поддержкой ActiveX)

[6] AutoLISP редакторы и прочие утилиты [6.1] AutoLISP редакторы

[6.2] Средства проверки соответствия круглых скобок Средства проверки соответствия круглых скобок можно больше не использовать. Редакторы должны уметь это делать.

[6.3] Форматировщики кода Внешние:

[7] Проблемы и ошибки в AutoLISP (особенно в R13) Не имеется почти никаких известных серьезных ошибок в AutoLISP. Интерпретатор Autolisp непосредственно (ACADL.EXE/.EXP) работает несомненно хорошо. Некоторые ограничения основаны на принципах работы AutoCAD и Proteus(DCL). Некоторые программы LISP-поддержки (например DDMODIFY.LSP) часто дефектны. По вопросам о Visual Lisp см. README.txt содержащий перечень всех известных ошибок и ограничений. Сбои при использовании реакторов являются ошибками автокада.

Windows: (acad_strlsort '("-1" "+1")) -> ("-1" "+1"), DOS: (acad_strlsort '("-1" "+1")) -> ("+1" "-1") Both: (mapcar 'ascii ("-" "+")) -> (45 43) Более подробно см. http://xarch.tu-graz.ac.at/autocad/docs/strlsort-bug.html

Что еще? См. неофициальный перечень ошибок AutoCAD поддерживаемый Steve Johnson для большинства дефектных программ AutoLISP, http://www.awa.com/nct/software/13bug04.html (esp: 33, 124, 126, 127, 139, 153, 158, 165, 176, 182, 192, 193, 238, 240, 254, 272, 295)

Числа с плавающей точкой являются double (64-разрадные IEEE). Все внуртренние AutoLISP и AutoCAD численные вычисления осуществляются в double формате, который является достаточно точным. По крайнее мере первые 14 разрядов десятичного числа точны.

Однако, во время выполнений геометрических сравнений часто случаются несоответствия, например при сравнениях: (equal pt1 pt2 1e-6) ; 0.000001 ошибка погрешности вычисления вместо (equal pt1 pt2), особенно это справедливо к действиям над углами.
См. http://www.autodesk.com/support/techdocs/td30/td301207.htm

Далее перечисленны ошибки, которые приводят к краху AutoLISP либо возвращают ложные результаты. Они являются лишь следствием плохой реализации языка.

AND и OR AND и OR не должны возвратить значение NIL вместо T. См. http://xarch.tu-graz.ac.at/autocad/docs/and-bug.html

MAX и MIN должен обрабатывать строки, т.к. < and > принимает и обрабатывает строки.

См. выше ACAD_STRLSORT (сортитровка строк)

Об ошибках переполнения стека см.[14]

[8] Сортировка в AutoLISP Обзор алгоритмов сортировки см. на http://xarch.tu-graz.ac.at/autocad/lisp/#sort

В LISP обычно используют сортировку с объединением (использован в (str-sort) в примере TABLES.LSP от AutoDesk) потому что это естественный метод для связи списков. Обычно (например в C) вы используете сортировку методом кучи (heap) (для любых данных) или qsort (для случайных данных) и сортировку методом вставки для маленьких списков (<7) или подсписков внутри алгоритма.

Имеется LISP-коды для сортировки методами оболочки (shell), пузырьков (bubble), вставки (insertion), и быстрая сортировка (quick). Они доступны для любых данных, списков и индексов списков. В LISP Вы можете передавать предикатную функцию, чтобы jceotcndkznm сортировre, которая вычисляется как run-time (здесь называется 'метод' "method"). Именно поэтому Вам нудна только одна функция сортировки для различных типов данных (то есть чисел, точек, строк, ...)

(sort data method) ;метод: less-than-predicate ;числа по умолчанию: '< Некоторые примеры см. на http://xarch.tu-graz.ac.at/autocad/lisp/sort/ur_sort.lsp: сортировка 100 элементов: bubble sort: 13.639008 сек/ 30.08% insertion sort: 13.368042 сек/ 29.48% (быстрый для сортиров. списков) shell sort: 13.478973 сек/ 29.73% (плохая реализация) merge sort: 2.232971 сек/ 4.92% quick sort: 2.433960 сек/ 5.37% vlx-sort: 0.099976 сек/ 0.22% (Vital LISP встроенный) acad_strlsort: 0.089996 сек/ 0.20% (AutoLISP встроенный, для строк)

[9] Рекурсия Это - не часто задаваемый вопрос, а очень интересный момент в LISP, потому что LISP, непосредственно определен рекурсивным, и это - часто самый простой способ ясно сформулировать проблемы.

Там это объясняется более подробно:

(defun fact (n) (cond ((zerop n) 1) (T (* n (fact (1- n))))))

Примечания: Обратите внимание: имеется также самоизменяющийся пример этой функции, см. http://xarch.tu-graz.ac.at/autocad/lisp/self-mod.lsp

[10] Итерации с помощью MAPCAR, ... То же самое что с рекурсией, это не часто задаваемый вопрос, но это необходимо знать.
Итерационные операторы в AutoLISP: WHILE, REPEAT, FOREACH и MAPCAR. Мы используем их широко в этом FAQ, потому что они позволяют сократить код.

Имеется пример короткого кода с LAMBDA, QUOTE, MAPCAR... от Vladimir Nesterowsky:

>> "There are 14 paths and 12 pigs. >> How can there be 24 ducks?" >> Имеется ли lisp-команда, которая позволит мне выбирать >> строки текста, и распознают число(а) в каждой строке, >> чтобы, скажем, увеличить каждое номер в два раза? >> Оставляя структуру предложения неповрежденной? Это - один способ. (Я уверен, что имеются много других способов) (defun mult2 (strng) ; (c) by Vladimir Nesterowsky (strlgather (mapcar '(lambda (s / n) (if (zerop (setq n (atof s))) s (rtos (* n 2)))) (strlparse strng " ")) ; parse by spaces " ")) ; gather back with spaces

пояснения на http://members.tripod.com/~vnestr/mapcar.txt

;;; перемещение строк и столбцов в матрице (defun transpose (l) ; (c) by Doug Wilson (apply 'mapcar (cons 'list l)))

пояснения на http://xarch.tu-graz.ac.at/autocad/lisp/transpose.002.html

Секция 1 из 3 - Предыдущая - Следующая