Как нарисовать размер лиспом?
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как нарисовать размер лиспом?

Как нарисовать размер лиспом?

Ответ
Поиск в этой теме
Непрочитано 28.03.2009, 11:21 #1
Как нарисовать размер лиспом?
Neo_
 
матрица
 
Регистрация: 06.04.2006
Сообщений: 401

Простите, только стал ковыряться с лиспами, такая проблемка :

в части лиспа не выполняеться такая команда
(COMMAND "_dimlinear"
(list (rtos x1 2 1) (rtos y1 2 1))

(list (rtos x3 2 1) (rtos y3 2 1))
)
либо

(COMMAND "_dimlinear"
(list (rtos x1 2 1) (rtos y1 2 1) 0)

(list (rtos x3 2 1) (rtos y3 2 1) 0)
)

Пишет:

_dimlinear
2D point or option keyword required.
Function cancelled

без rtos тоже самое.

Последний раз редактировалось Neo_, 28.03.2009 в 11:47.
Просмотров: 1828
 
Непрочитано 28.03.2009, 11:52
#2
ShaggyDoc

Thượng Tá Quân Đội Nhân Dân Việt Nam
 
Регистрация: 14.03.2005
44d32'44"С, 33d26'51"В
Сообщений: 13,372


Говорит правильно - требуется точка, а передается список из двух строк. Надо точки передавать.

Вызывай команду с клавиатруры и смотри, что она спрашивает. Потом имитируй это же в программе. Команде DIMLINEAR надо передать точку, точку, опцию, угол, а потом положение размерной линии (точу). Могут и другие варианты оказаться.
ShaggyDoc вне форума  
 
Автор темы   Непрочитано 28.03.2009, 12:11
#3
Neo_

матрица
 
Регистрация: 06.04.2006
Сообщений: 401


но ведь (list 7 0 0) даст точку с координатами x=7 y=0 z=0?
или нет?
я проверил если вводить внутри команды
(list 7 0 0)
(list 10 0 0)
(list 7 5 0)

то все нормально размер проставляется

Последний раз редактировалось Neo_, 28.03.2009 в 12:22.
Neo_ вне форума  
 
Непрочитано 28.03.2009, 15:08
#4
Елпанов Евгений

программист
 
Регистрация: 20.12.2005
Москва
Сообщений: 1,439
Отправить сообщение для Елпанов Евгений с помощью Skype™


передавай либо
'(7 0 0) ;; само собой, можно и в виде (list 7 0 0)
либо
"7,0,0"
и замени COMMAND на vl-load-com
тогда все будет работать...
__________________
Чем гениальнее ваш план, тем меньше людей с ним будут согласны.
/Сунь Цзы/
Елпанов Евгений вне форума  
 
Автор темы   Непрочитано 28.03.2009, 16:31
#5
Neo_

матрица
 
Регистрация: 06.04.2006
Сообщений: 401



поставил vl-load-com
пишет "too many arguments"
Neo_ вне форума  
 
Непрочитано 28.03.2009, 17:23
#6
ShaggyDoc

Thượng Tá Quân Đội Nhân Dân Việt Nam
 
Регистрация: 14.03.2005
44d32'44"С, 33d26'51"В
Сообщений: 13,372


Евгений сделал опечатку - вместо функции command использовать vl-cmdf.

(list 7 0 0) - даст список из чисел, т.е., например, точку.

Но ты же делал

(list (rtos x1 2 1) (rtos y1 2 1) 0) - то есть делал список из двух строк и числа. А это не точка.
ShaggyDoc вне форума  
 
Непрочитано 28.03.2009, 17:43
#7
Елпанов Евгений

программист
 
Регистрация: 20.12.2005
Москва
Сообщений: 1,439
Отправить сообщение для Елпанов Евгений с помощью Skype™


Оопс...
Конечно, не vl-load-com a vl-cmdf.
А в начале программы, поставить (vl-load-com).
__________________
Чем гениальнее ваш план, тем меньше людей с ним будут согласны.
/Сунь Цзы/
Елпанов Евгений вне форума  
 
Автор темы   Непрочитано 28.03.2009, 18:43
#8
Neo_

матрица
 
Регистрация: 06.04.2006
Сообщений: 401


УРАА нашел, банально до ужаса, предыдущая команда не завершалась , была команда полилинии
и не завершена "", как поставил все заработало !!!!!!

Последний раз редактировалось Neo_, 20.12.2009 в 23:03.
Neo_ вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как нарисовать размер лиспом?



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как скрыть 3дтело, чтобы нечто нарисовать "за ним" BM60 AutoCAD 22 22.12.2014 19:00
Как лиспом прописать формулу exel doki LISP 12 30.01.2008 16:34
как нарисовать подобную схему? alldmc AutoCAD 27 29.01.2008 01:27
Как нарисовать вертикальные линии в мультилинии Snow AutoCAD 1 26.09.2003 12:43