地形图缩编中植被符号的抽稀方法.doc

地形图缩编中植被符号的抽稀方法 　　摘要：本文简述了在南方CASS9.0软件下，软件自带功能及AUTOLISP编程实现地形图缩编中植被符号的抽稀方法。 　　 关键词：地形图；缩编；植被符号；抽稀；骨架线；比例尺；AUTOLISP；编程 　　 Abstract: This paper describes in the South CASS9.0 software, software function and AUTOLISP programming topographic map generalization of vegetation sparse symbolic approach. 　　 Keywords: topographic map; generalization; vegetation symbols; thinning; skeleton; scale; AUTOLISP; programming 　　中图分类号： P284 文献标识码：A 文章编号：2095-2104（2013） 　　1 引言 　　在城市建设过程中，各个部门对地形图的比例尺要求也不相同。为了避免重复测绘，不同比例尺地形图通常采用缩编的方法获得，这样既经济又缩短了工期。本文基于南方CASS9.0平台，阐述了1：500地形图缩编为1：2000过程中植被符号的抽稀方法。 　　2CASS软件下植被符号的抽稀方法 　　2.1植被符号的自动缩放和抽稀 　　缩编的第一步是更改比例尺，其步骤为：点击菜单文件 “绘图处理”中 “改变当前图形比例尺”， 出现“输入新比例尺1:”后输入“2000”， 出现“是否自动改变符号大小？(1)是 (2)否 ”时直接回车，文字、图块的大小、线形的宽度都由1：500直接改为1：2000的样式了。 　　 骨架线（ASSIST层）是数字地图导入GIS的一种概念性数据结构和支撑技术。同时，也是CASS的一种底层数据结构。这种数据结构使得CASS的地图编辑可以直接针对骨架线进行。任何线状地物或面状地物，只要骨架线的数据（位置等）发生改变，与骨架线相关的所有符号也会发生相应的改变。 　　植被符号以块的形式存在于图形中，在改变比例尺的过程中，如果植被符号的骨架线是闭合的，其内部的植被符号图块的X、Y、Z比例由原来的0.5改变为2.0，符号被整体放大4倍，并按新的间距（1：500符号间距的4倍）重新布设符号，实现符号的自动抽稀；如果植被符号的骨架线不闭合或者没有骨架线，符号自动放大4倍，但符号的间距还是原来的间距，这种情况下就需要人工处理了。 　　2.2植被符号的人工抽稀 　　在植被符号的骨架线不闭合或者没有骨架线的情况下，改变比例尺后需要人工处理。其方法是：1，骨架线不闭合情况下修改骨架线对象特性，使其闭合，输入命令recass及选项S，选中骨架线后点击鼠标右键，完成植被符号的重构。2，没有骨架线的情况下，使用多段线沿植被符号的最外围画线并使其闭合，用相同符号已有的骨架线刷刚画的线，使其变为骨架线，删除骨架线内的符号，同样使用命令recass即可。 　　 　　AUTOLISP编程实现植被符号的抽稀方法 　　3.1AUTOLISP语言简介 　　LISP (LISTProcossing Language)是一种计算机的表处理语言，是迄今为止人工智能学科领域广泛应用的一种程序语言。而AUTOLISP语言是一种嵌在AUTOCAD内部的LISP编程语言，它是LISP语言和AUTOCAD的有机集合的产物，它采用了与LISP语言中的Common LISP 最相近的语法和习惯约定，它可以直接调用几乎全部AUTOCAD 命令。 　　3.2程序的实现 　　在CAD命令行中输入vlide进入到LISP的编辑界面中，新建一个LSP文件，写入下列代码，并保存为fhcx.lsp。 　　(defun c:fhcx () 　　(vl-load-com) 　　(setvar cmdecho 0) 　　 (setvar osmode 0) 　　(setq blc (getvar userr1)) 　　(setq blxs (* 0.001 blc)) 　　 (setq xzl (- (* 0.02 blc) 1.5)) 　　(setq yzl (- (* 0.01 blc) 1.5)) 　　(setq s1 (entsel \n请选择一个植被符号:)) 　　(command zoom e ) 　　(setq tyb (entget(car s1))) 　　 (setq gjz0 (assoc 0 tyb)) 　　 (setq tkm (assoc 2 tyb)) 　　 (setq tcm (assoc