AutoLISP调用AutoCAD绘图命令

AutoLISP调用AutoCAD绘图命令

画直线段

(command “line” p1 p2 p3 “”)

(command “line” p1 p2 p3 “C”)

画圆

(command “circle” p0 R)

(command “circle” p0 “D” D)

画多段线

(command “pline” p1 p2 “A” p3 “L” p4 “A” p5 “L” p6 “”)

（弧沿逆时针方向绘制，且自动与直线相切。）

画边数为sides的正多边形

(command “polygon” sides “E” p1 p2)

（已知多边形某边所在两点）

(command “polygon” sides p0 “I” p)

（多边形内接于P点所在的圆）

(command “polygon” sides p0 “C” p)

（多边形外切于P点所在的圆）

画圆环

(command “donut” D1 D2 p0 “”)

画椭圆

(command “ellipse” p1 p2 p3)

(command “ellipse” “c” p0 p1 p2)

画弧

(command “arc” p1 p2 p3)

（三点画弧）

(command “arc” ps “c” p0 pe)

（默认沿逆时针方向画弧）

(command “arc” ps “c” p0 “A” A)

（角度A以逆时针方向为正）

书写文字

(command “text” p H A “技术要求” )

（左对齐）

(command “text” “c” p H 0 “技术要求” )

（居中对齐，字高为H）

(command “text” “A” p1 p2 “技术要求” )

（两边对齐，字高为默认值）

目标选择

“L” : 选择最后一个实体对象（Last选择）

“W” p1 p2 : 选择以p1和p2为角点的矩形内的实体对象（Window选择） p : 选择p点所在的实体对象 （point选择）

打剖面线

(command “hatch” “u” A dist “N” “w” p1 p2 “”)

(command \ p \ \ A dist \ \ 镜像实体对象

(command “mirror” 目标选择 “” p1 p2 “”)

阵列

(command “array” 目标选择 “” “R” 3 4 x y)

(复制3行4列)

(command “array” 目标选择 “” “p” p0 N 360 (阵列份数为N)

(此行中p是区域内一点) “”)

本文来源：https://www.bwwdw.com/article/v64d.html