不仅仅是用于AutoCAD的60 Autolisp例程

选择的阴影必须在描述要获取的区域类型的图层中，默认情况下lisp会读取两个图层名称，分别是：“SombreadoCorte“和”SombreadoRelleno“。

lisp 将图层中着色器的所有区域相加“SombreadoCorte”和所有区域的图层阴影“SombreadoRelleno” 并且一旦选择了影线，区域块的属性就会更新，为此必须首先选择块的渐进属性，这是一个不可见的属性，但是在选择之前的 lisp 会显示它并且然后再次隐藏它，这是使用命令“ATTDISP”，然后将选择剪切和填充区域的属性，这些属性将通过找到的区域的值进行更新。

对象的选择是通过一个窗口来完成的，该窗口包括所有insuras，包括该部分的渐进式文本。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： 安盛.
3. 通过窗口选择所有切割和填充的部分，包括相同的渐进式文本。
4. 逐个选择要修改的块的属性，从渐进的属性开始。
5. 在选择剪切和填充属性后，命令将自动结束。

一个示例CAD文件附加到lisp上，以便更好地了解命令。

当我们想要时，它提供了很大的帮助 控制我们的耳环，结果只能显示在屏幕（命令行）上或通过选择文本（该文本的值将根据找到的斜率值进行更改）。

值得强调的是，在折线的情况下，该命令找到仅第一个段的斜率。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： PND
3. 选择线或折线以获得斜率。
4. 如果需要，您可以选择一个文本，以找到的斜率替换其值，否则只按 输入 在屏幕上获得结果。

你可以得到例程 信息

您可以通过一个窗口或一个接一个地选择线条和折线。

找到的长度之和的默认十进制数为2，但可以输入另一个值。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： LPL
3. 输入长度之和的结果的小数位数
4. 选择线或折线以添加其长度
5. 按键 输入 结束选择
6. 选择一个文本以用获得的和之一替换其值 输入 再次在命令行上显示结果

你可以得到例程 信息

要使用此例程，您必须执行以下操作：

在AutoCAD中加载lisp文件。
输入命令的名称： lc
结果将是当前图形的所有图层的命令行中的列表。

这个例程 生成一个指定行数和列数的表，与AutoCAD Table命令类似，但使用较轻，虽然它不会与Excel链接数据 您可以选择使用预定义的值填充表 默认情况下为“0.00”并放置在每个单元格中以供稍后编辑。

这个命令也 允许您使用两个选项生成表，第一个选项允许定义表 通过固定的高度和宽度的细胞 和另一个选项 调整这些值，以便指定数量的行和列 输入窗口的名称。

附加选项包括：

• 默认文字： 您可以告诉命令在每个生成的单元格中插入一个默认值（“0.00”），该值可以自定义，也可以更改为任何其他值。
• 文字高度： 它是插入文本的高度，默认高度值为“0.25”。
• 理由： 的插入文本，所以有两个选项： 适合 （适合细胞）和 中间 （电池的一半）。
• 颜色： 这是插入的文本将具有的颜色，默认情况下，初始颜色是当前定义的颜色。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： 表
3. 根据所选择的生成模式，指示一个点或指示两个点来生成窗口

一定是特别的 保护对象是文本，由于在输出坐标时考虑到插入点， 取决于这些文本的理由如果您确定文本的正确性是正确的，那么输出点就没有问题。

建议选择对象 有一个插入点，如 AutoCAD的块或点导出的坐标是对应的坐标更安全。

如前所述，此例程从点，文本（或Mtext）和块导出坐标，但是 您可以补充源代码以考虑其他实体 例如：圈子，线的初始点以及其他对象 在其数据库中有代码10.

导出的坐标具有格式 P，N，E，C（Point，North = Y，East = X，Cota = Z） 并导出为CSV文件（以逗号分隔），打开文件时，每个值将占用其单独的单元格。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： EPC
3. 选择要导出坐标的对象（请注意，您将选择点，文本和块（如果找到它们）。
4. 指示将在其中生成导出坐标的CSV文件的位置和名称。

你可以得到例程 信息

导出的坐标对应于 线的起点和终点因此，如果这些行被相同点连接，则lisp将读取2乘以相同的坐标。

在这种情况下，如果需要 您应该考虑对坐标进行排序的选项 并删除重复的，导出的坐标有 格式P，N，E，C（Point，North = Y，East = X，Dimension = Z） 以及如何导出到 CSV文件 （用逗号分隔），当打开文件时，每个值将以有序的方式占用其单元格。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： EL3
3. 选择要从中导出起点和终点坐标的线。
4. 表示将生成导出的坐标的CSV文件的位置和名称。

你可以得到例程 信息

为了进口点数， 要导入的点文件必须具有XLS扩展名（从Office 2007之前的版本）或XLSX（版本2007或更高版本） 在文件中，坐标格式为格式： P，N，E，C，D， (P涂抹， N奥尔泰， ESTE， COTA， D说明），如下图所示：

它允许您在3中选择不同类型的方法来在读取坐标中插入点对象。

• 首先是选择插入一个 AutoCAD Point实体 （由POINT命令生成），请记住，AutoCAD中的点的显示取决于您使用DDPTYPE命令定义的点显示类型。
• 第二个选项包括 选择图形中存储的块 作为要在读取坐标中插入的点，默认情况下，例程会创建一个名为“cg-point”的新块，如果图形中有块或图形中没有块，则可以使用该块。
• 第三个选择与点的风​​格有关， 允许您从硬盘导入块请记住，在这种情况下，创建块的尺寸会影响插入时块的可视化。
• 对于点数据（标签），iCe 让您决定要显示的内容，如果只想显示一个点，则只需要选择此选项，与维度文本或点的描述相同。 您可以选择显示3标签数据或不显示.

还 您可以控制插入维度文本中的小数位数，将具有标签的刻度，基点为导入点的位置的相同的旋转和标签相对于点的分离，这些选项可以使用名称存储它们，以便您可以根据您将导入的点数。

所有这些选项将允许您以快速和清晰的方式从Excel文件导入您的积分，值得澄清的是，点标签的文本的方式不依赖于例程， 而是当前图形的当前文本样式和当前图层。

前一段时间我发表由用户开发的程序，但允许进口从文本文件中的坐标但有许多限制，这时候使用这个新的命令将有更多的选择来控制插入点坐标。

附件文件还提供了一个示例块，您可以导入该块，除了具有命令导入坐标所需的正确格式的电子表格外，没有任何不便之处。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： ICE
3. 在对话框中，指定您认为方便导入点的选项。

你可以得到例程 信息

该命令读取csv文件的第一列中的进度，并在绘图文件中搜索具有相同渐变的文本，将其相应的剪切和填充区域插入横截面的右上角。

填挖区默认插入的后缀有：“AC=”和“AR=”，可以通过代码操作，还有小数位数和插入文字的高度。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 它将包含要插入的文本的图层设置为当前图层，例如：“Text-Areas”。
3. 输入命令的名称： arimx
4. 选择包含要导入区域的SCV文件
5. 选择 你想插入 其对应的区域来自csv文件，如果要全部选择，只需按键 输入。

此例程不需要输入任何选项只需调用该命令即可立即显示在AutoCAD命令行中，该列表中包含插入图像的路径。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： 石灰

你可以得到例程 信息

使用此信息更新计划的信头时，这是一个很好的帮助。
在获取的路径中还包括当前选项卡的名称，如果它在模型空间中，它将显示在路由结束处：model，否则将显示当前选项卡。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： 路线
3. 如果您不想仅替换一些文本，请选择要用当前绘图路径的值替换的文本 输入 在命令行上显示路径。

你可以得到例程 信息

8命令为此日期提供不同类型的格式，从简单日期类型到长格式日期类型，其中使用AutoLisp以编程方式获取当前日期的日期名称。

您可以选择类型实体 文本 y 多行文字，这些将以当前日期与所选格式自动替换，可用日期格式如图所示，每个格式由其号码标识，用于在命令行上请求时选择格式的AutoCAD。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： RF
3. 由1号码指示为8，日期输出格式，可以输入问号（?），以显示可用的日期格式
4. 使用所选格式选择要替换的文本
5. 按键 输入 结束命令并更新所选文本

你可以得到例程 信息

除了每个文本之外，它还会添加一个前缀或后缀，例如，如果标注的尺寸（Y坐标）等于 “CT=”, when the elevation text is selected, the command will update the selected text by the value of the elevation obtained, plus the indicated prefix, for example “CT=236.42”, when the progressive text is selected, it will be updated with the value得到的X坐标加上后缀 “0+”，例如“0+10.0”。

该命令附带了渐进式和已定义尺寸的前缀（“0 +”和“CT =”） 并且只能通过修改源代码来更改，此外，如果需要，可以修改此命令，以便在文本中同时添加前缀和后缀。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： PC
3. 表示渐进式（X坐标）和坐标（Y坐标）的值的位置
4. 选择渐进文本
5. 选择尺寸文字

将使用获得的数据更新文本的值

Ax命令有以下选项：

初步要求：
指定区域的内部点或[选择对象/选项] ：

在这里，您必须指明将从中获取区域的内部点，其他选项如下所述：

选择对象： 而不是指示内部点找到空气，通过这个选项，您可以选择封闭的多边形来查找您的区域。

选项​​： 此选项加载“命令选项”对话框，对话框如下：

每个选项如下所述：

小数位数： 区域的小数位数（默认为2）。
要插入的文本的高度：如果您决定在获取的区域中插入文本，则设置将具有所述文本的高度。

区域转换： 此选项允许您使用找到的区域的值执行操作，每个区域被添加，减去，乘以或除以必须在此选项的下半部分指定的因子。
该命令显示转换是否处于活动状态，以及执行哪些操作以及以什么值执行转换。

此选项允许您在绘图处于不同比例或其他绘图单位时自定义区域。

应用阴影： 此选项允许每个指示的区域被遮蔽以更好地查看正在找到的区域，允许验证其是否正确（默认情况下为“开”）。
阴影名称：您必须在指定区域中指明要应用的阴影名称（实际默认值）。

（阴影）比例： 此处指示阴影的比例因子，该因子根据所选阴影的类型而变化。

颜色（阴影）： 将在指定区域应用着色的颜色。

完成阴影： 命令应用程序终止后，以下选项将适用。

保持轮廓： 如果启用，生成的轮廓不会被删除。

保持阴影： 如果启用，则生成的阴影不会被删除。

最终请求：
指定区域的内部点或[选择对象/插入区域文本/选项] ：

插入文字区域： 此选项允许您使用获得的区域插入文本，而不是选择一个来替换它。 找到区域的文本有默认前缀：“Area =”，这个前缀可以在程序代码中修改。

更改文字： 此选项在按下 Enter 键或按下鼠标右键时激活，这将请求选择一个文本，例如如果有一个文本内容如下：“AC=0.00m2”并通过命令已找到 3.25 的区域，然后该命令将替换将其更新为“AC=3.25m2”的文本。 可以看到，AX只替换要替换文本的数值，所以可以有不同前缀的区域文本，例如：“AR=0.00m2”、“AM=0.00m2”、“切割面积” =0.00m2”、“我的面积=0.00m2”等。

有效和无效的轮廓：

有效的大纲

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： AX
3. 指出您要查找的区域内的一个点（必须确保要找到的区域必须完全关闭，否则命令将显示一条错误消息）。
4. 指示内部点数需要多次，命令将愤怒，累积（求和）所有发现的空气。
5. 按Enter键或右键单击以结束命令，并将现有文本中的区域设置。

你可以得到例程 信息

和前面的例程一样，实体的选择是不可见的，而是作为一组被选择的实体存在的，所以必须指明选择模式“上一页”来选择对象。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： SSL
3. 选择要获取图层名称的对象以选择其他实体
4. 通过预测模式使实体的选择有效

你可以得到例程 信息

当涉及去除折线以外的物体时，应特别小心 此命令将删除折线以外的所有对象.

折线选择 必须是封闭的折线，否则例行程序将第一个段的最后一个点加入，通过假想线折叠折线，并消除该线内部或外部的所有内容。

该选项切割是合乎逻辑的， 仅适用于手动切割的对象， 例如，直线，圆，圆弧等，块和其他复合对象不适合这些可以切出的对象。

使用lisp 附上一个示例文件 以便在使用最终文件中的命令之前完成相应的测试。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： PolErase
3. 选择折线 这将作为界定要消除的对象的边缘。
4. 选择一个 删除对象选项，您可以选择以下选项： 窗口 （它只删除完全在外部或内部的对象）， 捕获 （删除甚至与折线边缘相交的对象）， 删除和裁剪 （顾名思义，它将删除折线内部或外部的对象，并将剪切由边框相交的对象。
5. 表示a 点在哪边 （内部/外部）将被擦除或修剪。

你可以得到例程 信息

这个例程在输入层的名称时不区分大小写，所以你可以以任何方式输入，只是它写得很好。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： SCA
3. 输入要选择的对象的图层名称
4. 通过模式选择实体有效 previuos

你可以得到例程 信息

1. 使用comado在AutoCAD中加载lisp文件 APPLOAD 或者通过复制文件并将其粘贴到AutoCAD中。
2. 输入命令的名称： RT
3. 选择要从中获取值的文本。
4. 选择要用以前获得的值替换的文本。

正如你所看到的，例程很简单，但是对于文本编辑来说，这是非常有用的。

应该注意的是，这个例程中使用的语言显然是AutoLisp，在一个新条目中，我们将发布相同的命令，但是在VisualLisp中编写，我们将在其中观察到结构的大小进一步减少。

此新属性只能由此命令访问，因为它不会由“属性”对话框列出。

lisp允许您更改小数位数，或者使用此例程获取较早格式的文本的原始数字， 所以你知道你原来有几个小数位 如果要重置原始值。

值得注意的是 这些原始值仍然存在 即使文件或AutoCAD已关闭，因此您具有原始数据的安全性 你的价值观将永远在那里，即使将原始价值恢复到文本。

这个新命令可以与动作进行比较 更改Excel小数但唯一的观察是，这个财产是内部的，正如我们前面所说的那样 属性窗口尚未准备就绪 显示实体的延长日期。

必须特别考虑 选定的文本是数字文本，也就是说，它们只包含数字，否则它们的值将被转换为“0.00“。

要使用例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： Arede
3. 选择您要执行的选项之一
4. 选择要在其中执行操作的（数字）文本

你可以得到例程 信息

该程序允许您垂直（列）或水平（行）对齐文本，因此，您只需选择第一个，这将作为对齐其他文本的基础。
需要注意的是，作为对齐文本的基础的点是插入点，如果所有文本都以“左”对齐作为插入点，则所有文本都将相对于该点对齐，它将是统一对齐。 如果文本有不同的对齐方式，它们都将相对于它们的插入点对齐，这将导致文本的对齐方式不一致。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： ALIT
3. 选择将从中获取对齐轴的基本文本

4. 选择要对齐的文本

5. 完成后，文本根据第一个选择进行了对齐

你可以得到例程 信息

也就是说，如果我们要更新任何块的属性，对于现有文本，只需首先选择文本，然后选择属性，并根据所选文本的值更新该属性。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： CTA
3. 选择包含要复制的值的文本。

4. 最后选择属性来更改度量

5. 结果如下：

我们可以看到，如果要从特定文本更新属性的值，则此命令非常有用。

例如，如果您有两个文本，一个具有高度0.5，另一个高度为1.00，并输入1.5的百分比，则文本的高度将分别改变为：0.75和1.5。

当需要改变不同高度的许多文本的高度时，这个例程非常有用。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： ch
3. 输入将更改文本高度的百分比，例如：如果输入0.5，则所有文本将减少一半，如果输入2，则所有文本将增长一倍
4. 选择要修改的文本

你可以得到例程 信息

要插入的尺寸是具有属性的块，这些块在图形中创建 毫米. 为了让你可以毫无问题地使用这个 lisp，你必须使用命令“单位”（单位）定义要插入的内容的单位“毫米”（毫米）。

值得说明的是，对于此例程，将正确的高程插入轮廓线时，它们必须具有高程（坐标z> 0），因为高程是从轮廓曲线上指示的点获得的如果轮廓线的高程为0（坐标z = 0），即它们没有高程，则例程将插入具有该值的文本。

按常规要求的规模是指将绘制图纸的规模，要插入基准尺寸标注文字的值，可以通过增加或减少该值，直到尺寸插入测试你想要的文字大小。

这个例程有2附件： EL_TAG.dwg y EL_TAG2.dwg，它是具有上述属性的块，这些文件可以在任何地方复制，尽管建议它们与例程在同一个文件夹中。

为了AutoCAD加载这些文件，必须在对话框中定义AutoCAD位置的路径 选项->支持文件搜索路径。

要使用此例程，您必须执行以下操作：

1. 在AutoCAD中加载lisp文件。
2. 输入命令的名称： CPE
3. 表示水平曲线上方的点，以及要插入尺寸的位置
4. 表示要定义要插入尺寸的旋转的另一个点
5. 如果您不想插入更多的维度，可以继续插入指示插入点的更多维度，按Enter键完成命令

你可以得到例程 信息