9. Autolisp. Основные математические функции.

Математические функции

(+ число1 число2 ...)

Возвращает сумму всех аргументов

(- число1 число2 ...)

Вычитает число2 из числа1 и возвращает разность. Если более двух аргументов, то из первого аргумента вычитается сумма всех остальных. Если задан один аргумент, то он меняет знак)

(* число1число2 ...)

Возвращает произведение всех чисел

(/ число1 число2 ...)

Делит число1 на число2 и возвращает частное. Если задано более двух аргументов, то первое число делится на произведение всех остальных

a+b (+ a b)

a-b (- a b)

a*b (* a b)

a/b (/ a b)

(a+b)*d/c

(/ (* (+ a b) d) c)

(atan число1 [число2])

Если не задано число2, то возвращает арктангенс переменной число1 в радианах, область допустимых значений - [ pi, -pi] радиан. Если заданы оба числа, то возвращается арктангенс переменной число1/число2 в радианах. Если число2 - нуль, то возвращается + или -1.570796

(abs число) Вычисление абсолютного значения

(cos число) значение косинуса угла

(sin число) значение синуса угла

(mах число1 число2 ...)

Возвращает наибольший аргумент.

(min число1 число2 ...)

Возвращает наименьший аргумент.

(rem число1число2 ...)

Возвращает остаток от деления переменной число1 на переменную число2 (матем. запись: число1 mod число2)

(sqrt число)

Извлекает квадратный корень из аргумента.

Пример: отрезок из точки p1 в точку p2.

(command "line" p1 p2)

Имя команды указывается в кавычках, за которыми через пробелы указываются все необходимые параметры этой команды в соответствии с запросами, выдаваемыми AutoCAD при работе в среде графического редактора.

Пример: построение замкнутой полилинии шириной 1.0, проходящей через точки p1, p2, p3, p4

(command "pline" p1 "w" "1.0" "" p2 p3 p4 "c")

10. Autolisp. Ввод данных и работа со списками.

• (getangle точка "текст запроса-подсказки")

• Возвращает угол между задаваемым пользователем вектором и положительным направлением оси Х.

• (getint "текст запроса-подсказки") Ввод целого числа.

• (getpoint точка "текст запроса-подсказки") Ввод точки.

• Например (getpoint "Введите точку")

• (getreal "текст запроса-подсказки")

• Позволяет вводить действительное число.

• (getreal "Укажите меньший диаметр ")

• (getstring "текст запроса-подсказки")

• Запрашивает ввод текстовой константы.

• (getvar имя переменной)

Возвращает значение системной переменной Автокада. Имя переменной должно быть заключено в кавычки.

Выполнение команд AutoCAD

Пример: отрезок из точки p1 в точку p2.

(command "line" p1 p2)

Имя команды указывается в кавычках, за которыми через пробелы указываются все необходимые параметры этой команды в соответствии с запросами, выдаваемыми AutoCAD при работе в среде графического редактора.

Пример: построение замкнутой полилинии шириной 1.0, проходящей через точки p1, p2, p3, p4

(command "pline" p1 "w" "1.0" "" p2 p3 p4 "c")

Для присвоения переменны определенных значений существует команда SETQ.

Например:

(setq a 5)

РАБОТА СО СПИСКАМИ

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

(list выражение1 выражение2)

Эта функция составляет список из своих аргументов. Например, выражение (list 5.5 8.0) возвращает список, содержащий два числа (точку): (5.5 8.0)

Пример: определение точки p1 с координатами 100,200 имеет вид

(setq p1 (list 100 200))

Функции извлечения элементов списка:

(car список)

Возвращает первый элемент списка.

(cadr список)

Возвращает все элементы списка, кроме первого.

Для извлечения координат двумерной точки удобно пользоваться следующими функциями:

(car a)

Возвращает координату X точки а.

(cadr a)

Возвращает координату Y точки а.