不知道错误在那里，高手帮我找找

longshou

我开始运动还正确，不止到怎么回事换了机子就不行了，倒角到不了了 (defun c:draw4()
(setq pc (list 500 500) d0 700 e 10 H 60 H1 50 d1 720 R 25)
(command "circle" pc (- (/ d0 2) e))
(command "line" pc (polar pc (* 0.1 pi) d0)"")
(command "line" pc (polar pc (* 0.4 pi) d0) "")
(setq pn (polar pc (* pi 0.1) 400))
(setq pm (polar pc (* 0.4 pi) 400))
(command "fillet" "r" R "fillet" pn (polar pc (* 0.5 pi) (- (/ d0 2) e)))
(command "fillet" "r" R "fillet" pm (polar pc (* 0.5 pi) (- (/ d0 2) e)))
(command "fillet" "r" R "fillet" pn pm)
(command "trim" "w" (polar pc (* (/ pi 4) 3) d1)
(polar pc (* -1 (/ pi 4)) d1) ""
(polar pc 0 (- (/ d0 2) e)) "")
)

longshou

我第一次打开AUTOCAD后加载运行可以画出一个完整的图，可再次打开一个新的CAD窗口后加载运行就只能画到倒圆角的地方，当把所有的CAD界面关闭，重新打开AUTOCAD在加载运行又可以画出完整图，这是怎么回事？

spring

在 (command "line" pc (polar pc (* 0.4 pi) d0) "")后面加上一句
(command "zoom" "E")

maomao2004

(list 500 500)应该超过你的图形界限了


只需象楼上所说那样即可