本帖最后由 作者 于 2007-6-29 22:34:02 编辑
其实也不是很麻烦呀 你可以编个小程序呀 一个命令就可以了(因为我们平时用的都是0) (defun c:r0() (setq old (getvar "osmode") (setvar "osmode" 0) (command "rectang" "f" 0 (list 0 0) (list 1 1)) (setq a (entlast)) (command "erase" a "") (setvar "osmode" old) (princ) ) 如果你不想返回0半径,可以将红色处的数值改成你要的就可以了 |