我建议初学者不必执行此任务，但可以通过CUI命令将命令宏指定给AutoCAD用户界面。有关一些信息，请参阅以下链接：
http://www.cadtutor.net/corner/2006/january.php
http://www.cadalyst.com/cad/autocad/create-your-own-autocad-commands-circles-and-lines-autocad-tutorial-6308
从本质上讲，宏自动执行此命令行输入序列：
Command: _xline Specify a point or : a
Enter angle of xline (0) or :r
Select a line object:
Enter angle of xline <0>: 90
Specify through point:
令人遗憾的是，这条线索中的所有三个建议都有各自的优缺点。
XLine可能需要修剪。
UCS图元可能并不总是设置有用的坐标系。见附件中的行
“相对于最后一个对象”可能不适用于直线段上的所有位置（即交点、多段线顶点等）。见附件中的多边形。
这一领域值得Autodesk或其他AutoCAD程序员的额外关注。尽管上面的评论看起来很无聊，但考虑到这篇文章的参与者，它并不是深不可测的。
接受。图纸
这是一个很好的例子，感谢您指出不足之处。但我仍然可以使用ucs方法在附件中绘制一条垂直线（请参阅附件）。
显然，右侧的顶点会导致ucs行为异常。ucs符号看起来也很奇怪。如果你有时间解释的话，我很乐意听到原因。
接受。图纸
将UCS设置回World，然后检查该新线的起点和终点的Z值：
LINE Layer: "0"
Space: Model space
Handle = 209
from point, X= 1.9404Y= 5.4967Z= 2.4967
to point, X= 4.3341Y=-2.4822Z=-5.4822
Extrusion direction relative to UCS:
X= 0.0000Y=-0.7071Z= 0.7071
In Current UCS, Length = 8.3302,Angle in XY Plane = 287
3D Length=11.5349,Angle from XY Plane = 316
Delta X = 2.3937, Delta Y = -7.9789, Delta Z =-7.9789
当初始线与世界XY共面时：
LINE Layer: "0"
Space: Model space
Handle = 1ea
from point, X= 0.0000Y= 0.0000Z= 0.0000
to point, X=10.0000Y= 3.0000Z= 0.0000
Extrusion direction relative to UCS:
X= 0.0000Y=-0.7071Z= 0.7071
Length =10.4403,Angle in XY Plane = 17
Delta X =10.0000, Delta Y = 3.0000, Delta Z = 0.0000
UCS Entity命令从初始线读取不明显的信息（请参见相对于UCS的拉伸方向）。
页:
1
[2]