龙大哥帮看看这个怎么不能运行
<p>(defun c:a3()<br/>(setq insertpoint (getpoint "\n请输入插入点:"))<br/>(setq insert2 (getreal (strcat "\n输入插入比例<1>:")))<br/>(command "insert" "hja3" insertpoint insert2 "" "" "move" "last" "" insertpoint pause </p><p>"explode" "last" ""))<br/>(princ "\n ***A3图框插入程序已加载<A3>***")<br/>(prin1)<br/></p> <p>谢谢龙大哥你不用解答了我已经知道了</p>
页:
[1]