来自黄钰的问题
autolisp如何绘制水平矩形图形?
autolisp如何绘制水平矩形图形?
1回答
2020-04-09 07:03
autolisp如何绘制水平矩形图形?
autolisp如何绘制水平矩形图形?
(defunc:tt()
(setqp1(getpoint"n选取矩形第一点:>"))
(setqp2(getpoint"n选取矩形第二点:>"))
(command"_rectang"p1p2)
(prin1)
)
这是最简单的画矩形的程序