|
||
| Правила | Регистрация | Пользователи | Сообщения за день | | Поиск | | Справка по форуму | Файлообменник | |
|
Поиск в этой теме |
13.04.2010, 10:38 | #1 | |
Реализовать чертеж Решето с помощью Автолиспа
Регистрация: 12.04.2010
Сообщений: 12
|
||
Просмотров: 3259
|
|
||||
Регистрация: 12.04.2010
Сообщений: 12
|
(command "insert" "my_ramka" "0,0" 1 1 0 1 1 "ПГТУ АСУз-04" "ФИО" "ФИО" "Файзрахманов Р.А.")
(defun C:PEREM() (setq F(open "input.txt" "R") R1 (atof(read-line F)) R2 (atof(read-line F)) R6 (atof(read-line F)) R8 (atof(read-line F)) R9 (atof(read-line F)) A1 (atof(read-line F)) A2 (atof(read-line F)) ) Вот отрывок кода на лиспе. Здесь ребята чертили деталь золотник... Размеры изначально занесли в input.txt ввиде списка Содерджание файла 99.0 46.0 32.0 22.4 16.0 10.0 08.2 |
|||
|
||||
Инженер-строитель Регистрация: 15.08.2007
Киров
Сообщений: 2,204
|
Вот примерно. Думаю, доработаешь как надо.
Код:
Цитата:
Ширина основной детали Длина основной детали Сторона отверстия Расстояние между отверстиями по оси OX Расстояние между отверстиями по оси OY |
|||
|
||||
Регистрация: 12.04.2010
Сообщений: 12
|
Мне вот нужно чтобы загрузив файл lisp автокад вычертил автоматом чертеж.
Т.е должна быть уже в коде определена точка левого нижнего угла прямоугольника. И что такое nth lst И еще при загрузке показывает ошибку Command: ; Ошибка: Синтаксическая ошибка Последний раз редактировалось BBLainer, 20.04.2010 в 11:40. |
|||
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
как с помощью lisp'a открыть чертеж, на который поставлен пароль? | annt | LISP | 2 | 09.03.2010 21:41 |
Помогите опознать приложение, в котором выполнен чертеж | lunsky | AutoCAD | 6 | 02.07.2008 19:06 |
Как сделать правильный чертеж | pk77 | Разное | 64 | 03.04.2007 16:36 |