Группы пользователей Autodesk

Автоматическое дописывание слов


Создание плиток

 

Создание плиток 
 

Автоматическое дописывание слов



Пусть необходимо добавить к программе следующий фрагмент кода:

ObjectCreationStyle (strcase (cdr (assoc 3 BoundaryData)))

(if (equal ObjectCreationStyle "COMMAND")

(progn

(setq firstCenterPt(polar rowCenterPt (Degrees->Radians 45) distanceOnPath))

(gp:Create_activeX_Circle)

)

)

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

VLISP может автоматически дописывать длинные слова по их начальным буквам.

Для использования функции дописывания слов в Visual LISP

  • Переместите курсор в конец файла gpdraw.lsp и введите следующий код:
  • ObjectCreationStyle (strcase (cdr (assoc 3 BoundaryData)))

    (if (equal Ob

  • Нажмите CTRL + ПРОБЕЛ.
  • VLISP находит ближайшее соответствие для двух введенных последними букв и автоматически дописывает слово, позволяя не тратить время на ввод оставшихся 17 букв.

  • Допишите строку до конца:
  • (if (equal ObjectCreationStyle "COMMAND")

  • Добавьте следующие строки:
  • (progn

    (setq firstCenterPt(p

  • Нажмите CTRL + ПРОБЕЛ.
  • VLISP подставляет самое последнее слово, начинающееся на «p», которым в данном случае оказывается progn. Однако нам нужно слово polar. Если продолжать нажимать CTRL + ПРОБЕЛ, VLISP начнет циклически перебирать все подходящие слова, использованные в коде. И, в конце концов, будет найдено слово polar.

  • Удалите только что введенный код. Он был нужен только в качестве примера.
  • Функция дописывания слов доступна также и через меню VLISP «Поиск».

     



    Содержание раздела