[求助]：定位写文字的程序出现错误，请高手帮忙！

loner · 发表于 2003-3-25 17:42:35

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(defun c:kk()
(setq pt (getpoint "\nWhere:"))
   (setq x (car pt))
   (setq y (cadr pt))
   (setq z (caddr pt))
   (setq pt1 (list (+ x 3.8 ) (- y 1) z))
      (setq t1 (getstring "\n请输入房屋座落:") )
      (command "text" pt1 0.5 0.0 t1)
)
起始点为(0,0,0)我想在(3.8,-1,0)处写出文字，可程序结果是在(3.8,-2,0)处写出,百思不得其解望哪位高手相助，不甚感激！

ll_j · 发表于 2003-3-25 18:38:07

程序是对的，有可能是捕捉打开了，使用command函数时捕捉是有效的。

loner · 发表于 2003-3-25 19:04:48

真是高手！

账号		自动登录	找回密码
密码			立即注册

[求助]：定位写文字的程序出现错误，请高手帮忙！

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子