Параметрические изображения объектов проектирования на основе использования языка АВТОЛИСП в среде АВТОКАД. Притыкин Ф.Н. - 19 стр.

UptoLike

Составители: 

19
и возвращает 10, а запись (setq b "R") переменной <b> присваивает зна-
чение строковой константы "R" и возвращает "R", т. е. b = "R".
(list <выражение>...) применяют для присвоения некоторой пере-
менной значений списка (например, координат двух- и трехмерных точек).
Функция list, используя любое количество выражений, формирует из них
строку и возвращает список. Пример: (list 11.2 23) возвращает резуль-
тат (11.2 23).
(setq p1 (list 12 28)) присваивает переменной p1, определяющей
точку в плоскости, значения ее координат: х = 12 и у = 28. Если в команд-
ной строке набрать: Command: !p1, то после этого в командной строке
появится (12, 28, 0).
(setvar <имя переменной> <значение>) используют для при-
своения системной переменной Автокада указанное <значение>. При
этом в записи функции setvar <имя переменной> заключают в кавычки.
Примеры: запись (setvar "DIMTXT" 5) устанавливает размер шриф-
та размерных чисел, равный 5 (см. п. 3.1). "DIMTXT" обозначение сис-
темной переменной, 5 значение системной переменной;
Запись (setvar "FILLETRAD" 5) устанавливает величину радиуса со-
пряжения, равную 5 ед.
Для определения значения системной переменной используют
функцию getvar: (getvar <имя переменной>).
Пример: пусть последний раз радиус сопряжения был задан величи-
ной, равной 5, тогда функция (getvar "FILLETRAD") возвращает 5.
Для извлечения координат х, у и z из списка координат точки, за-
данного функцией list, используют функции car, cadr и caddr.
Примеры: пусть точка р1 задана координатами: (setq p1 (list 10 20
30)). Тогда (car Р1) возвращает значение координаты х = 10, (cadr P1)
возвращает значение координаты у = 20, (caddr P1) возвращает зна-
чение координаты z = 30.
(nth <номер элемента списка> <список>) используют для извле-
чения заданного элемента из заданного списка. Пример:
(nth 10 r) возвращает десятый элемент списка, заданного перемен-
ной r.
и возвращает 10, а запись (setq b "R") переменной  присваивает зна-
чение строковой константы "R" и возвращает "R", т. е. b = "R".
     • (list <выражение>...) применяют для присвоения некоторой пере-
менной значений списка (например, координат двух- и трехмерных точек).
Функция list, используя любое количество выражений, формирует из них
строку и возвращает список. Пример: (list 11.2 23) − возвращает резуль-
тат (11.2 23).
     (setq p1 (list 12 28)) − присваивает переменной p1, определяющей
точку в плоскости, значения ее координат: х = 12 и у = 28. Если в команд-
ной строке набрать: Command: !p1, то после этого в командной строке
появится (12, 28, 0).
     • (setvar <имя переменной> <значение>) используют для при-
своения системной переменной Автокада указанное <значение>. При
этом в записи функции setvar <имя переменной> заключают в кавычки.
     Примеры: запись (setvar "DIMTXT" 5) − устанавливает размер шриф-
та размерных чисел, равный 5 (см. п. 3.1). "DIMTXT" − обозначение сис-
темной переменной, 5 − значение системной переменной;
 Запись (setvar "FILLETRAD" 5) − устанавливает величину радиуса со-
пряжения, равную 5 ед.
    • Для определения значения системной переменной используют
функцию getvar: (getvar <имя переменной>).
    Пример: пусть последний раз радиус сопряжения был задан величи-
ной, равной 5, тогда функция (getvar "FILLETRAD") возвращает 5.
    • Для извлечения координат х, у и z из списка координат точки, за-
данного функцией list, используют функции car, cadr и caddr.
     Примеры: пусть точка р1 задана координатами: (setq p1 (list 10 20
30)). Тогда (car Р1) − возвращает значение координаты х = 10, (cadr P1)
− возвращает значение координаты у = 20, (caddr P1) − возвращает зна-
чение координаты z = 30.
     • (nth <номер элемента списка> <список>) используют для извле-
чения заданного элемента из заданного списка. Пример:
      (nth 10 r) – возвращает десятый элемент списка, заданного перемен-
ной r.



                                   19