ВУЗ:
10. Список литературы.
11. Виды и объем работ, выполненных с использованием ЭВМ и САПР.
12. Приложения.
Состав и объем графического материала и разделов пояснительной за-
писки, применительно к специальности, определяется методическими указа-
ниями профилирующей кафедры.
Оформление графической части проекта и его пояснительной записки
должно отвечать требованиям Единой системы конструкторской документа-
ции (ЕСКД).
Законченный дипломный проект (работа), подписанный студентом,
консультантами и руководителем, представляется заведующему кафедрой
для предварительной защиты, которая проводится не позднее чем за семь
дней до заседания Государственной аттестационной комиссии (ГАК). Пред-
варительная защита проводится на заседании комиссии в составе руководите-
ля проекта (работы) и одного, двух преподавателей кафедры.
Окончательная защита выпускной квалификационной работы произво-
дится в определенные установленные сроки на заседании Государственной
аттестационной комиссии.
2.4.3. Пример использования АвтоЛиспа
В наиболее ходовой системе АвтоКад имеется возможность програм-
мирования чертежных работ на языке высокого уровня – АвтоЛисп. Язык
АвтоЛисп включает встроенные функции и обеспечивает возможность реа-
лизации операций над двух- и трехмерными графическими объектами. Ис-
пользование АвтоЛиспа для автоматизации рутинных чертежных операций с
созданием графической базы данных позволяет пользователю уделять
больше внимания задачам расчета. АвтоЛисп содержит некоторое число за-
ранее определенных встроенных функций и функций, определенных пользо-
вателем. Каждая функция вызывается как список, первым элементом которо-
го является имя функции, а остальные элементы – аргументами функции.
В качестве примера рассмотрим алгоритм отрисовки условного обозна-
чения аппарата колонного тарельчатого типа, представленный ниже. После
вызова программы командой q диалог пользователя с системой имеет вид:
Команда: Введите длину
Команда: Укажите точку привязки
Аппарат вычерчивается после завершения ввода.
;Функция черчения колонного аппарата
(defun c:q()
(setq l (getreal «n\ Введите длину »))
(setq p (getpoint «\n Укажите точку привязки »))
(setq b (polar p (/ pi 2)))
(setq b1 (polar b 0.0 1))
92
Страницы
- « первая
- ‹ предыдущая
- …
- 90
- 91
- 92
- 93
- 94
- …
- следующая ›
- последняя »
