Вывод оригинал-макета

роенная справка AutoCAD
Выдержка из работы Для реализаций заданных условий в данной программе был использован целый ряд функций языка Auto LISP.
Функция defun определяет создание пользовательских функции.
При выполнении, программа задаёт пользователю необходимые вопросы, в виде текстовых сообщений. На эти вопросы пользователь должен реагировать вводом значений для запрашиваемых переменных. Реализация диалога и одновременно считывание значений вводимых пользователем осуществляется при помощи команд getreal, getstring и getint.
В программе используется функция setq, при помощи которой выполняется присваивание определённых значений различным программным переменным.
Для открытия файла используется функция open. В данной программе файл открывается для чтения, для этого режим задаётся как “r”(read). Последовательное чтение данных из файла осуществляется с помощью функции read-line, которая построчно читает данные из файла. Эти данные затем конвертируются в вещественный тип данных функцией atof. Когда все данные из файла считаны, он закрывается посредством функции close.
Проверка значений переменных проходит с помощью условной функции if, которая на языке Auto LISP оформляется следующим образом:
(if (условие) (действие в случае выполнения условия))