请教黄总这个程序为何标注不了?
(defun c:T1()(SETQ pt (GETPOINT"\n请点选圆孔位置:"))
(COMMAND "CIRCLE" pt 6)
(SETQ Et (ENTLAST))
(COMMAND "DIMDIAMETER" Et "t" "2-%%c12" pause)
) Et中缺少点坐标
可改成
(command "DIMDIAMETER" (list Et (polar pt 0 6)) "T" "2-<>" PAUSE) 谢谢Z版主的帮助.
页:
[1]