数字地面模型论文数字高程模型论文 ：矿山数字地图信息自动提取研究摘 要：数字高程模型数据是建立数字地面模型的基础。实现数字地图地形信息的自动提取就是本文所要解决的问题。 AUTOLISP是 一种潜入AUTOCAD内部的LISP语言。通过AUTOLISP语言实现 了从数字地图上提取离散点和等高线信息。 随着网络技术的发展，设 计、开发工作的数字化、异地也是必然的发展趋势， CAD软件二次 开发工程的实现将更加灵活、有效。关键词：数字地面模型；数字高程模型；等高线；离散点0前言地理信息系统与机助制图技术的完善和发展， 改变了人们对传统 地图的定义和认识以及地图的生产工艺， 同时也出现了崭新的地图形 式一数字地图。第四界全国地图学会议以来，许多地图制图单位和计算机行业联 手，开发了多项制图软件。一部分能在屏幕显示和打印输出，一部分 能与制版接口，实现地图制印的自动化。虽然如此，我国还处于起步阶段，也可以说我国的数字地图的应 用规模并没有同各行业计算机应用的逐步普及同步发展。通过对某些测绘部门的调查发现，在利用解析制图仪完成地形制图后， 绝大部分 用户往往只索取地形等高线图，而对于同时产生的DTM都不屑一顾， 其实，在实际工作中DTM可更有效地进行地形要素分析，还可进行 三维立体显示和辅助航片自动转绘、 纠正，等高线自动绘制等方面的 运作。所以，这也是我国测绘及有关部门对数字地图应用还没有足够 重视的体现。因此，现在提供DEM数据已经成为各测绘部门的基本任务和日 常工作之一。为了推动 DEM的发展，本论文从DEM数据来源及数 据质量要求，并结合AUTOLISP开发AUTOCAD技术，对自动提取 矿山数字地图信息的实现进行了讨论和研究。1方法实现1.1获取离散点所在图层选择集SS1AutoLISP提供了一些用来操作选择集的函数。其中ssget函数提供了一个最通用的方法来生成一个选择集。它可以提示用户选择实体，并返回这个所选择的实体的集合。应用到该例子中，该数字地图 的离散点共有两个层的：8310 ”和LSD ”则可用一下语句来获取离散 点的选择集：运行后可以很容易得到两个选择集：.8310 ”层的 ss1 =.LSD ” 层的 ss1 =这两个选择集就是所需要的离散点的选择集。下一步的提取实体 数据就以这两个选择集为基础。1.2获取选择集各实体的实体数据表函数sslength返回一个选择集中实体的数量，函数ssmemb测试某个制定的实体是否是一个选择集的成员。因此我们可以利用下面 的语句获得选择集内各成员所对应的实体的实体名。(setq 1st ()(setq n (ssle ngth ss1)(setq i n)(while (= i 1)(setq ent (ss name ss1 (- i 1)(setq i (- i 1)(textpage)(setq 1st (cons ent 1st)我们可以得出在LSD ”层选择集内各实体的实体名字。各实体的 名字得到了，就可以依次得到各实体的实体数据表。各离散点数据表得到后，下一步就是从这些数据的项目中选取我 们所需要的信息，即各点的三维坐标。这就涉及到从表中选择数据的 问题。Assoc函数可以在一个表中查找某个制定类型的组，如果在这个 表中没有提供指定的DXF组码(或者不是一个有效的DXF组)，assoc 函数会返回nil。1.3等咼线信息提取等高线上的地形信息存储与离散点信息存储方式不同，导致了提 取方法的相应改变。首先，同一条等高线上存储有许多高程点，因此首要的任务就是 将这些高程点的信息都提取出来。这需要在同一对象名作多次循环， 直至找出所有的高程点。实现的代码段如下：(while (/= (setq entll (assoc 10 en tl) nil)(setq entll (assoc 10 entl)(setq entl (subst (0) entll en tl)(setq entlll (co ns (cdr en tll) en tlll)但这样提取的高程点信息只是二维信息，因此地形信息并不完整。这就引发下列问题：同一等咼线上的咼程点的咼程都等于该等咼线的标咼信息，即组码为38的属性信息。因此，应当将该标高加到每个高程点信息中去。 具体实现如下：(setq entllll (list (cdr (assoc 38 entl)(while (/= (setq entll (assoc 10 en tl) nil)(setq entll (assoc 10 en tl)(setq entl (subst (0) entll en tl)(setq en tll (appe nd en tll en tllll)(setq entlll (co ns (cdr en til) en till)）这样就可提取完整的等咼线信息。1.4提取信息的存储提取以后，被存储在表里，因此，最后一步工作就是将表里面的 数据写入文件，保存起来。那么，就一定要用到文件处理函数。生成的地形信息被保存在指定路径中的文本文挡中。这样就完成了地形信息提取的全过程。以上就是保存起来的地形信息数据（8310 ”层若干点）。2总结与展望CAD是个通用的计算机辅助设计和绘图软件包 AutoCAD软件包 因其功能强大广泛应用于我国各领域，但在使用中也遇到一些问题， 由于AutoCAD是一种通用软件，而我国各行业都有相应的设计规范 和标准，为满足各行业的需求，提高绘图效率，我们相应就要对CAD 进行二次开发。当今CAD技术的主要潮流是参数化造型与变量化造型，而CAD的二次开发技术也正是基于这两大理论之上的。随着网络技术的发 展、设计、开发工作的数字化、异地化也是必然的发展趋势，CAD软件二次开发工程的实现将更加灵活、有效。参考文献:1 徐凯，张预中.CAD二次开发技术D 江南大学机械工程学院，2004.:2 康博创作室.VisualLISP实用教程M.北京：人民邮电 出版社，1999:3 赵景亮，李志刚.AutoCAD2004与AutoLISP二次开发技 术M北京：清华大学出版社，2004:4 李志林，朱庆.数字高程模型M.武汉：武汉测绘科技 大学出版社，2000.:5 何翠群.AutoCAD二次开发的探讨.江西南昌工程学院J . 职教论坛，2004 , (11):6叶海建.DEM.模型生成效率分析.中国农业大学计算机网络中心J.中国农业大学学报，1999 , (4)7唐新明，林宗坚，吴岚.基于等咼线和咼程点建立 DEM的精度评价方法探讨D