谁能帮我改下下面程序,调不出来了 谢谢啊
;;;圆弧三次,画弯头用的(defun c:rt()
(setq r1 (getdist "圆弧半径:<可量取>"))
(setq r2 (* r1 0.5))
(setq r3 (* r1 1.5))
(initcommandversion 2)
(setvar "filletrad" r1)
(command ".fillet" "m")
(setvar "filletrad" r2)
(command ".fillet" "m")
(setvar "filletrad" r3)
(command ".fillet" "m")
)
pause command 还没结束就 开始下个命令所以错了
(initcommandversion 2) 是我上网查的 网址
http://bbs.mjtd.com/thread-77901-1-1.html 本帖最后由 yangist 于 2015-1-7 07:56 编辑
鱼与熊掌 发表于 2015-1-6 18:22 static/image/common/back.gif
pause command 还没结束就 开始下个命令所以错了
噢 会了pause pause 谢谢
页:
[1]