常用的LISP调用CAD命令的语句怎么写

zhh101

      我是一个LISP初学者,我想向各位高手请教一些常用的LISP调用CAD命令的语句怎么写并给解释一下,比如(COMMAND "LINE"  点1  点2 "")这是画直线, (COMMAND "PLINE"  点1  点2  点3  点4  "C")这是画四边形,(COMMAND "Circle"  圆心  半径)画圆   . 象 复制(COPY),镜像(MIRROR),偏移(offset),移动(move),旋转,拉伸,画圆弧,选择对象(SELECT)等等常用的CAD命令LISP怎么写我不是很清楚,二楼的朋友刚才说了复制(COMMAND "COPY"  选择集 ""  基点 位移点) ,还有镜像(COMMAND  ".MIRROR"  选择集  ""  基点  位移点  "") 的语句,但我不知里面的意思.所以我想那位朋友能给我指点一下,谢谢!

ZZXXQQ

(COMMAND ".COPY" SST "" PA PC)
(COMMAND ".MIRROR" SST "" PA PC "")

zhh101

谢谢你能多次的指点我,我真的非常感谢你,在这里你能否在回答我一个问题,我想编一个程序,就是选择一个选择集里面有圆弧,直线,先复制位移一定的距离(Y轴方向),在判断选择集里最左边的点(直线或圆弧上的点),也就是X坐标最小的点,从这一点X轴方向过一定的距离在镜像这个选择集.

ZZXXQQ

镜像的是复制后的图素还是先前的选择集？

zhh101

是复制后的图素

rdhhb

command函数可以用vl-cmdf代替.

其不内之处如下:

command 不能调用setq 函数

vl-cmdf 可以调用,如vl-cmdf "_.point" (setq p1 getpoint "\n拾取一点:"))