AutoCAD R12两个新增命令在编程中的应用

上传者：网友
|

翻新时间：2023-04-20

收藏到账号

全屏

AutoCAD R12两个新增命令在编程中的应用

摘要：AutoCAD R12版新增加了BHATCH命令来补充和加强HATCH命令功能。

关键词：AutoCAD R12 命令应用

AutoCAD中填充阴影线图案(PAT文件)是一项十分有用的功能，在各种图形中都可能用到。我们在开发工程地质CAD软件时，经常要在图面上的指定区域内填充岩性花纹图案，而且填充区域不规则。在AutoCAD低版本中,填充花纹命令仅有一条HATCH，使用HATCH时，需选择围成闭合区域的有关实体，若实体选择不全则会使填充出现混乱，特别是当填充区域由若干线、弧、园等实体交叉组合而成时，就要沿闭合区域的各点绘制一条PLINE线，然后以这条线作为填充边界线，在填充完成以后还要将这条线删除，比较麻烦。

AutoCADCAD R12的使用说明书，通过简单的练习就可以掌握。本文想就如何在AUTO LSP中调用这两个命令进行编程的问题做一简单介绍。

BHATCH和BPOLY命令不同于一般的AutoCAD命令，它们是用ADS应用程序开发的，如果想在图形编辑状态下或在AUTO LISP中使用这两个命令, 就要在AutoCAD初始化时加载名为ACADAPP的ADS程序，方法是在当前搜索路径上是否有ACAD.ADS文件，这是一个纯文本的ASCII码文件，在这个文件中如有一行为ACADAPP，那么在进入ACAD图形时自动加载ACADAPP，在AutoCAD的Command:提示符下调用AUTO LISP函数(ADS)，将得到当前已加载的全部ADS应用程序的信息。如已加载ACADAPP，在“Command:”就可以使用BPOLY和BHATCH。

在AUTO LISP语言中，不能像调用一般命令那样用(COMMAND “命令”)来调用BPOLY和BHATCH，而是用(C：BPOLY 点)、(C：BHATCH 点)来调用，执行(C：BHATCH 点)之前要通过SETVAR对几个系统变量进行设置，HPANG是图案填充角度，HPNAME是图案填充名称，HPSCALE是图案填充比例系数。以下是一个简单的填充花纹图案的LISP程序:

程序1清单：

(setq yf$ (getstring (strcat "花纹代号: "))) ;输入花纹代号

(setq bl (getreal "n比例