请问各位高手CAD命令在VL中的问题

dadaodui

请问各位老师，关于cad命令在vl程序中的表达式，包括命令中有关的参数，主要常用的，如copy等，是否有这样的书或文章，最好能在这下载，急！谢谢大家了。

aqin

;;你可以自己来获取命令的执行参数，方法是：
;;在vlide环境中写以下语句：
(command "aaa" );;其中aaa为要使用的命令如line，(command "line")
;;执行该语句
;;此时在autocad环境的命令栏中会提示你下一步操作：如Specify next point or [Undo]:
;;根据提示作出回应，一个命令需要回应几步就需要几个参数，可以根据提示确定命令的各个参数
;;如以下我的执行过程：
(command "line")
命令行提示：
Specify next point or [Undo]:
Specify next point or [Undo]:
可以判断需要2个点：
所以我定义：
(setq pt1'(1 0 0 ))
(setq pt2'(10 0 0)) 所以用lisp写的完整命令就是：
(setq pt1'(1 0 0 ))
(setq pt2'(10 0 0))
(command "line" pt1 pt2 nil);;nil表示命令结束