> 1 <

Автор Сообщение

xdrivers

Members


Статус

1 сообщений

Где: Russia
Род занятий:
Возраст:

#7650   2015-06-17 16:34 GMT+3 часа(ов)      
Здравствуйте!
Мне нужна такая программа, которая измеряет расстояние между двумя точками и затем меняет значение указанного текста на вычисленное.
Примерно так:
(defun dist_all ()
(setq pt1 (getpoint "\n Start point >"))
(while t
(setq pt2 (getpoint pt1"\n Next point >"))
(setq x (distance pt1 pt2))
(print x)
(command ".__mtedit")
(command "._ctrlA")
(command "._ctrlv")
)
)
Только у меня она не работает после 7 строки. Надо чтобы значение Х, было введено вместо выделенного текста.

gomer

Members


Статус

23 сообщений

Где: Ukraine
Род занятий:
Возраст:

#7651   2015-06-28 00:24 GMT+3 часа(ов)      
Почитайте про функцию entmod
> 1 <


Онлайн :

0 пользователь(ей), 13 гость(ей) :




Реклама на сайте: