基于VLISP的地形地質圖質量控制研究

龍文芹，文施程，楊一洋，董華斌

摘? 要：地形地質圖是搭建地質數據庫的源數據，其成圖質量直接影響到數據庫的建庫效率。本文針對地形地質圖編繪過程中常出現(xiàn)的要素自重疊、自相交以及多邊形不封閉等問題，在AutoCAD環(huán)境下，利用VLISP控制臺，結合圖形中幾何要素屬性特征、實體空間關系特征以及數學基礎理論，編寫了圖形質量檢查lsp應用程序，實現(xiàn)了在AutoCAD環(huán)境下對成圖過程進行質量控制。與傳統(tǒng)人工方式相比較，該方法降低了檢查的難度和繁瑣度，減少了編繪過程的累積誤差，提高了檢查效率及成圖質量。

關鍵詞：地形地質圖；VLSP；應用程序；質量控制

中圖分類號：TP391? ? ? ? ? ?文獻標志碼：A? ? ? ? ? ? ? 文章編號：1672-5603（2023）03-136-04

Study on Quality Control of Topographic Geological Map Based on VLISP

Long Wenqin1，Wen Shicheng2，Yang Yiyang1，Dong Huabin3

（1.Hanshou Natural Resources Bureau， Hanshou Hunan 415900;

2.The Second Surveying and Mapping Institute of Hunan Province，Changsha Hunan 410119;

3.The Third Surveying and Mapping Institute of Hunan Province，Changsha Hunan 410119）

Abstract：Topographic geological map is the source data for building geological database，and its mapping quality directly affects the efficiency of building database.Aiming at the problems of elements self-overlapping，self-intersecting and non-closed polygons that often occur in the process of topographic and geological map compilation，this paper uses VLISP console in AutoCAD environment，combines the attributes of geometric elements，the characteristics of entity space relations and the basic mathematical theory，and writes an lsp application program for graph quality check.The quality control of drawing process is realized in AutoCAD environment.Compared with the traditional manual method，this method reduces the difficulty and complexity of inspection， reduces the accumulated error in the compilation process，and improves the inspection efficiency and the quality of the drawing.

Keywords：Topographic geological map;VLISP;application program;quality control

0 引言

地形地質圖是地質工程常用的圖件，其以地形圖作為基礎底圖，加繪了地質元素，可直觀表示工程區(qū)內的地形、地層、礦產分布、巖層產狀、地質構造等特征[1]。在地質圖數據庫建庫過程中，地形地質圖作為一項重要的基礎數據源，其成圖質量直接決定了數據庫的建庫質量，因此在成圖過程中進行質量控制可有效減少數據庫建庫環(huán)節(jié)的誤差累積，避免質檢過程的反復。

AutoCAD是常用的地質繪圖軟件之一，Visual LISP（簡稱VLISP）是集成在該平臺中的可視化程序開發(fā)環(huán)境[2]，利用VLISP語言編寫功能函數，可根據實際需求在AutoCAD中定制個性化功能，如：自動分割批量繪制土地確權地塊、批量修改宗地注記、確定地質災害點與震裂跡線的距離、批量轉換界址點坐標格式等[3-6]。本文基于AutoCAD平臺，結合VLISP函數、變量、群碼代號及地形地質圖錯誤元素屬性特征，利用VLISP編程，實現(xiàn)對地形地質圖的質量檢查與錯誤標注，進一步提高圖件的生產質量及建庫效率。

1 問題類型

受繪圖習慣以及對多源數據進行格式轉換等影響，在進行地形地質圖件編繪時，較易產生錯誤（粗差）及隨機誤差，主要有要素重疊、要素未閉合、數據斷線、微短線、零星坐標點等。在空間關系中，并非所有的點、線重疊情形均為錯誤，需要結合實際情況進行判斷，因此，對點和線進行重疊檢查，即是檢查冗余數據。由于點、線、多邊形的數據結構具有相關性，因此錯誤具有連續(xù)性特征，問題的累積也會增加存儲負荷，使得數據難以維護。

1.1 點

點是構建線和多邊形的重要元素，是正確表達地形地質位置信息的基礎，基于點的線段相連直接決定了多義線和多邊形的整體結構。點重疊的表現(xiàn)形式主要分兩種情況，一是附著在線要素中的拐點重疊，二是獨立點要素的自重疊。在一個線或多邊形對象中，若存在多個坐標點對重疊，則表示點的重疊導致了該要素中的線段重疊。

1.2 線

線元素主要用于表示地理現(xiàn)象的輪廓、邊界等，是對線狀地物的二維表達，同時也反映了兩個或多個地理坐標點之間的空間關系。線的錯誤類型主要有多義線的自相交、線段之間的重疊、微距離線段[6-7]等情形，而線段之間的重疊又表現(xiàn)為整段線的重疊和部分重疊。對于微距離線段，以1∶500地形地質圖為例，將實際長度小于0.1 m，圖上距離小于0.2 mm的線段作為殘留數據進行剔除。

1.3 多邊形

在AutoCAD平臺中，多邊形閉合有“外觀閉合”和“屬性閉合”之分[8]。“外觀閉合”即圖形外觀表現(xiàn)為閉合圖形，但不能直接判斷線上點要素以及線要素是否重疊；“屬性閉合”的圖形要素是由一組有序且互不重疊的線段和結點構成，其起始點與終結點為同一個點，形成一個“閉合”形狀，只有“屬性閉合”才能對封閉區(qū)域進行有效的面積計算、圖案填充、數據入庫等操作；多邊形斷線也會導致不閉合，對微小間距的斷線進行快速檢索是批量質檢中的難點。此外，多邊形之間因線段相交形成的重疊，以及線段自相交形成的封閉圖形均屬于拓撲錯誤，需進行修改或刪除。

2 質檢方法

在AutoCAD中繪制的圖元（如點、線段、多義線、曲線、文本等等）均有專屬的屬性列表，如表1對圖元“LWPOLYLINE”的屬性列表部分內容進行了舉例說明[9]，“群碼代號”記載著圖元的類型、線型、線寬、圖層名稱、顏色、點坐標、長度、面積、閉合性等屬性特征信息。

本方法的設計路線是在VLISP控制臺中，自定義質檢命令“CHECK”，構造“點、線、多邊形”質檢功能分支，組建“l(fā)sp”格式的質檢應用程序，實現(xiàn)在AutoCAD中的加載，并以快捷命令方式調用相應質檢功能。其中，自定義質檢命令的編碼如下：

（defun C：CHECK （）

（setq outType （getstring "＼n 檢查點P/檢查線L/檢查多邊形S："））

（cond （（= outType "P"） （POINT））

（（= outType "L"） （LINE））

（（= outType "S"） （SURFACE））））

在上述編碼中，“POINT、LINE、SURFACE”分別為檢查“點、線、多邊形”圖形質量的功能函數，函數編寫的基本原理即通過VLISP語言取得所選定圖元的屬性聯(lián)合列表，利用循環(huán)語句讀取并記錄屬性聯(lián)合列表中“群碼代號”所標注的圖形屬性信息，再結合數學公式計算點、線、多邊形之間的空間關系，對圖形錯誤進行標記顯示或自動化批量處理，圖1所示為質檢流程設計。

2.1 檢查點

針對點重疊的兩種形式，可以通過計算兩坐標點之間的平面距離是否為零，或者比對兩點的坐標值是否完全一致來判斷。本部分編寫思路是通過獲取待檢查圖元的“聯(lián)合屬性列表”數據，逐點讀取X、Y坐標值，建立坐標數據集（（X1、Y1），（X2、Y2），（X3、Y3），……，（Xn、Yn）），循環(huán)比較兩坐標數據值是否完全一致，對篩選出的重疊點進行粗型圓圈標記。

2.2 檢查線

檢查線圖元是為了確保其連續(xù)性和準確性，該部分檢查內容主要是多義線的自相交、線段之間的重疊、微距離線段等情形，可通過“聯(lián)合屬性列表”中的屬性信息為基礎開展分析。多義線是由多條線段連接組成的復合線型，多義線自相交即自身部分線段與另一部分線段相交于點，反映了四個頂點、兩條線段之間的空間關系，因自相交形成的一個或多個外觀封閉區(qū)域屬于空間拓撲錯誤，可將平臺中提供的自相交檢查工具融合至本文編寫的功能函數中，作為子功能進行調用；線段重疊基于點重疊，分析思路與點重疊一致，通過比對坐標值，兩個及以上的坐標點有重復的，改變點元素的符號樣式，初判為疑似重疊線的結點；判斷微短距離線段，可通過遍歷“聯(lián)合屬性列表”中的群碼值來獲取線段的長度，將實際長度小于0.1 m，圖上距離小于0.2 mm的視作微距離線段，對其進行線型加粗顯示，以便復核清理。

2.3 檢查多邊形

AutoCAD中的多邊形通常由連續(xù)的點和線段組成，如果多邊形未閉合或多邊形之間的邊界線交叉，則無法構建一個完整且能反應真實地理現(xiàn)象的多邊形結構，并且不能進行有效的面積計算或圖案填充。首尾結點未相接（邊界斷線）、結點重疊（屬性值“未閉合”）是導致多邊形未閉合的主要原因，多個多邊形之間邊界線的交叉反映的是多邊形相交、覆蓋等問題。對邊界斷線和屬性值“未閉合”進行檢查，首先分析線圖元“聯(lián)合屬性列表”群碼“70”的屬性值，當屬性值為“0”時，表明線“未閉合”，對首尾結點進行大圓標記，便于核對。多邊形屬于折線，多邊形相交必然會有線段相交，要判斷兩個線段之間是否有交點，可通過點和線段構成的三角形面積來分析，根據向量乘積原理[10]，計算的面積是有方向的，如果其中一條線段分別與另一條線段的兩個端點構成的三角形面積正負符號不同，則表明兩個端點位于線段的兩側，即兩線段相交，對該兩條線段進行加粗顯示。

3 實驗及效果

根據本文前部分對點、線、多邊形錯誤類型及質量檢查方法的分析，在AutoCAD Visual LISP控制臺編寫了地形地質圖質量檢查應用程序。本文在幾何圖形“工作空間”繪制點、線、多邊形元素，結合要素錯誤類型進行圖形問題預設，對質量檢查功能進行驗證，如圖2（a）所示。通過命令“APPLOAD”添加自定義的質量檢查“l(fā)sp”格式應用程序后，“CHECK”成為平臺中的有效命令，通過該命令，啟動質量檢查功能，對點、線、多邊形的質檢功能進行測試。

點元素質量檢查結果如圖2（b）所示，圓圈標記處分別是獨立分布的重復點、多義線上的重復點以及多邊形邊界線上的重復點；線元素質量檢查如圖2（c）和圖2（d）所示，前者加粗部分表示多義線上有完全重疊和部分重疊的線段，后者圓圈標記的是圖形空間范圍內散落的微短線，此處微短線指的是實際長度小于0.1 m，需對其進行篩查與剔除；多邊形元素的質量檢查如圖2（e）和圖2（f）所示，圖2（e）中圓圈標記處表明與其相關的多邊形未閉合，一處為圖形首尾兩點相接但屬性未閉合，另一處為圖形首尾兩點未相接導致的未閉合，圖2（f）顏色填充區(qū)為地塊1與地塊2相交的部分，通過檢查，自動對相交重疊的部分進行色塊填充標記。

4 結束語

本研究以Visual LISP編程為基礎，針對地形地質圖編繪過程中常見的錯誤類型，綜合參考了圖形幾何要素屬性特征、實體空間關系特征以及數學基礎理論，編寫了圖形質量檢查lsp應用程序，實現(xiàn)了在AutoCAD平臺中搭建簡便易行的圖形質檢方法。該方法適合應用于地質勘查、城市規(guī)劃、工程建設、農業(yè)生產等領域測繪成果的質量檢查，有助于提高圖形成果的準確性與邏輯一致性，能有效保障數據庫的建設效率。

參考文獻/References

[1]孫廣義.采煤概論[M].江蘇：中國礦業(yè)大學出版社，2007.

[2]陳伯雄，馮偉.Visual LISP程序設計：技巧與范例[M].北京：人民郵電出版社，2002.

[3]葛俊濤，高彥濤，賈復生，等.vlisp地塊自動分割算法在土地確權中的應用研究[J].地理空間信息，2022，20（4）：74-76+99.

[4]葉青，何德俊，李冬平，等.基于VLISP實現(xiàn)批量修改CASS宗地注記的方法[J].地理空間信息，2018，16（6）：106-107+111+9.

[5]劉明，李果，劉濱.VLISP函數確定地質災害點與震裂跡線的距離[J].湖南科技大學學報（自然科學版），2013，28（4）：49-54.

[6]楊一洋，張瀟瓏.基于Visual LISP的界址點坐標交換格式轉換研究[J].測繪地理信息，2021，46（3）：137-139.

[7]楊一洋，劉小生，陳毅.利用VisualLisp實現(xiàn)CASS導出異平臺坐標數據[J].江西理工大學學報，2018，39（1）：32-36.

[8]蔡青，馬瑜宏，馬麗新.區(qū)域地質圖數據庫建庫中的質量檢查方法探討[J].山東國土資源，2014，30（3）：92-95.

[9]吳勇進，林美櫻.AutoLISP&DCL基礎篇[M].北京：中國鐵道出版社，2003.

[10]王紅喜.基于向量積的多邊形中心的計算方法[J].西安文理學院學報（自然科學版），2015，18（3）：39-41.