如何用AutoLisp或者其他方式实现AutoCAD纯键盘操作?

Question

如何用AutoLisp或者其他方式实现AutoCAD纯键盘操作?也就是如何用纯键盘画cad图装X.
由于在工作中使用AutoCAD软件,但是发现左手键盘右手鼠标的操作和纯键盘操作(例如敲代码)相比效率不够高.希望各位大神指点迷津.

Answer 1

最简单粗暴的方法是使用autolisp的command函数把你本来要手动执行的操作都模拟出来，同时配合少量参数输入，比如你要画半径为50的圆，你可以这么写：

(defun c:foo () (command "circle" pause 50))

然后你在命令行输入foo，鼠标选一个点或者键盘输入一个坐标就可以生成一个以那个点为圆心的半径为50的圆了。

当然如果你纯粹是想装下X的话请详细描述一下，有另外的套路。

Answer 2

为50的圆，你可以这么写：

(defun c:foo () (command "circle" pause 50))
然后你在命令行输入foo，鼠标选一个点或者键盘