基于CAD图元扩展属性的预计参数数据库构建应用研究.docxVIP

基于CAD图元扩展属性的预计参数数据库构建应用研究 田迎斌112 （1.屮煤科工集团唐山研究院有限公司，河北 唐山，063012； 天地科技股份有限公司唐山分公司，河北 唐山，063012；） 摘要：利用开采沉陷预计软件预测地表沉陷及变形，是“三下采煤”、土地复垦等工 作的重要内容之一。获取工作面基本数据和构建参数库是进行开采沉陷预计的前提和基础。本 文基于CAD二次开发语言Autol isp及VBA,利用CAD图元扩展属性功能，实现了角点坐标及沉 陷预计参数自动提取和数据库自动构建。 关键词：Lisp; VBA；扩展属性；预计参数 目前，针对煤矿开采地表沉陷预测，不少单位研发了基于概率积分法的开采沉陷预计软件。虽 然预计软件运行的平台、开发语言、数据库结构不尽相同，但无一例外都需要从本矿的采矿技术图 纸和资料屮获取相关基础数据作为计算的依据。 预计地表下沉等值线吋需要的数据一般包括：工作血角点坐标、工作血预计参数和绘图网格参 数。在煤矿技术工作中CAD图是应用最广泛的图纸形式。工作面角点坐标、采深、采厚、倾角及下 沉系数q等，可从采矿技术图纸和本矿已有资料中获得。绘图网格参数包括网格定位坐标、网格点 个数和步长等。通过人工或辅助工具将上述数据录入到预计软件数据库中方能进行预计工作，其中, 构建工作面角点坐标数据库和预计参数数据库是一项重要内容。在数据获取和组织过程屮，常常较 大程度依赖人工操作，从而出现数据界常甚至错误，其准确化、自动化、集成化和便捷化程度不够 高。如何快速有效的构建符合预计软件要求的数据库就显得非常重要。 针对上述问题，作者基于CAD的Autolisp及VBA二次开发语言，利用CAD图元扩展属性功 能，实现了角点坐标及预计参数自动提取和数据库自动构建。构建绘图网格参数库较简单，不再进 行详述。仅对构建工作血角点坐标数据库和预计参数数据库的过程进行说明，主要包括4个步骤： （1） 使用闭合多段线创建工作面； （2） 工作面角点次序按顺时针自动编号； （3） 对工作面进行预计参数属性扩展； （4） 自动提取工作面角点坐标，并自动构建角点坐标数据库和预计参数数据库。 1创建工作面 首先依据煤矿采掘工程平面图，将需要参与预汁的工作面使用CAD多段线命令进行圈定。比如, 要对某矿的3上煤层工作面进行开釆沉陷预计，首先创建一个新的图层，图层名可自定义为“3上 煤层”，沿所有需要预计工作面的边界创建闭合的多段线，如图1所示。创建的两个闭合多段线分别 代表了 133上01工作面和133上02工作面，每个工作面都有4个角点。 图1预计工作面 根据所编制预计程序计算规则，绘制工作面时不应出现凹多边形，否则，应对其进一步划分为 两个或多个凸多边形。当使用闭合多段线创建工作面时，有时以逆时针绘制，有时以顺时针绘制, 而根据预计软件要求，一般会要求统一按照某一顺序(顺时针或逆时针)进行数据的组织。所以, 在第4节创建数据库过程川，内部程序将会自动分析判断并将角点坐标按一定规则(顺时针)进行 输出。 2工作面角点次序号自动标注 1图元常规图形数据库结构 在CAD中每绘制一个图元对象后，该图元对象即通过数据表的形式被存储在CAD图形数据库 中，即在CAD内自动建立起了他们完善的图形数据库。图形数据库包含了该图元的各种信息，如图 元名称、图元类型、图元所在图层和图元顶点坐标等。图元数据表是以组码及其后的数据表示的CAD 图形文件屮包含的所有信息。组码的值代表了后面的数据元素的类型及含义，适用于图形对象和非 图形对象。 Lisp语言的强大功能在于能通过对图元对象数据库的访问，从而实现对图元对象的更新、修改 和删除等操作。通过entget函数可以获得图元对象完整的数据关联表，通过表操作函数assoc, car 等实现对数据关联表屮相关信息的获取。 通过查询图1屮133上01工作僧的实体属性，该工作面的常规数据关联表如下： ((-1 . v图元名：7ffff7f3ef0) (0 ? LWPOLYLINE) (330 ? v图元名：7ffff7f29f0) (5 . 267) (100 . AcDbEntity) (67.0) (410 . Model) (8.3 上煤层)(6 . Continuous) (100 . AcDbPolyline) (90.4) (70 . 1) (43 ? 0.0) (38 ? 0.0) (39.0.0) (10 462522.0 11058.9) (40.0.0) (41 . 0.0) (42.0.0) (91 . 0) (10 463734.0 11059.0) (40.0.0) (41.0.0) (42.0.0) (91 .0)(10 463734.0 10874.0) (40.0.0) (41 . 0.0