AutoCAD 在測(cè)繪制圖中的更好應(yīng)用

【文章摘要】
AutoCAD 作為繪圖軟件的一種, 在測(cè)繪行業(yè)中得到廣泛應(yīng)用。本文主要介紹了AutoCAD 操作的基本功能及二次開發(fā)的應(yīng)用。簡(jiǎn)單地討論了AutoCAD 中的塊、菜單等的應(yīng)用，通過實(shí)際野外的測(cè)量方法在繪圖工作中的運(yùn)用所總結(jié)出來的經(jīng)驗(yàn)。通過本文的介紹希望能給使用AutoCAD 制圖的用戶特別是多年從事野外測(cè)繪工作且對(duì)電腦不太熟悉的（40 歲以上）人員帶來更大的方便。
【關(guān)鍵詞】
AutoCAD ；AutoLISP ；塊；菜單
1 概述
近年來，測(cè)繪領(lǐng)域機(jī)助制圖的研究取得了飛速發(fā)展，通過繪圖儀輸出的圖形從過去簡(jiǎn)單的工程制圖到現(xiàn)在的各種比例尺的地形圖、地藉圖、宗地圖，以及非常復(fù)雜的小比例尺土地利用現(xiàn)狀圖等。AutoCAD 已經(jīng)成為測(cè)繪制圖工作中的一種基礎(chǔ)軟件。但是AutoCAD 中的繪圖命令成百上千，往往難以完全為我們所掌握。若能將這幾百條命令活學(xué)活用并與其它軟件相結(jié)合將給我們的繪圖工作帶來意想不到的效果。以下將從AutoCAD 菜單，塊和LISP 語言的開發(fā)，結(jié)合其它軟件作業(yè)等幾個(gè)方面介紹在實(shí)際工作中使用AutoCAD 的一些好方法希望能夠給廣大用戶的操作帶來方便。
2 AutoCAD 在測(cè)繪制圖中的應(yīng)用
2.1 塊的應(yīng)用
計(jì)算機(jī)的發(fā)展, 特別是AutoCAD 這些繪圖軟件的出現(xiàn)為測(cè)繪行業(yè)注入了新生命, 測(cè)繪制圖由以前的手工繪制轉(zhuǎn)變成現(xiàn)在的計(jì)算機(jī)成圖, 效率有了明顯的提高. 但要是沒利用好AutoCAD 這個(gè)軟件, 出圖的效率反而會(huì)事倍功半. 大家知道在測(cè)繪制圖中, 特別是地形圖等一些圖中常會(huì)大量重復(fù)出現(xiàn)一些圖式符號(hào), 比如燈桿，上水, 下水，管線符號(hào)及獨(dú)立符號(hào)（如：獨(dú)立樹）等. 在AutoCAD 中若是一個(gè)一個(gè)畫這些符號(hào), 會(huì)浪費(fèi)大量的時(shí)間和精力. 假如我們能創(chuàng)建一個(gè)圖形符號(hào)庫, 這些庫中放有經(jīng)常要繪制的符號(hào), 當(dāng)需要的時(shí)候繪圖員直接從庫中調(diào)用相應(yīng)的符號(hào)即可, 達(dá)到了事半功倍的效果.
AutoCAD 提供了此項(xiàng)功能. 先把常用的符號(hào)嚴(yán)格按地形圖圖式以米為單位單獨(dú)畫好存圖. 下面以畫上水符號(hào)為例, 在AutoCAD 中創(chuàng)建新圖, 在新圖中任意位置畫一個(gè)半徑為1 米的圓, 再捕捉四分圓點(diǎn)，畫一直線。再把這個(gè)上水符號(hào)保存起來, 起名為“上水.dwg ”。 然后通過插入塊操作即可把圖式符號(hào)插入到需要的位置了。以塊形式插入的圖的缺省基點(diǎn)是絕對(duì)坐標(biāo)（0，0），即原點(diǎn)，它處于任何新圖形的左下角。若所畫的圖形沒有指定基點(diǎn)時(shí)，那么當(dāng)把此圖形以塊形式插入到當(dāng)前圖形中時(shí)，AutoCAD 用缺省基點(diǎn)（原點(diǎn)） 作為插入基點(diǎn)。當(dāng)然也可以指定基點(diǎn)，象上水這類是圓形的符號(hào)把基點(diǎn)定在圓心是最好了，插的時(shí)候直接放到位置。其實(shí)做好圖式后，在命令行鍵入“base”，會(huì)提示“Base point <0.0000，0.0000，0.0000> ：” 捕捉圓心點(diǎn)就行了，這樣圖式的基點(diǎn)就是圓心了。
在測(cè)繪制圖中除了一些圖式符號(hào)的使用有重復(fù)性, 還有一些，如圖框等，不管什么樣的工程圖，畫完后出圖時(shí)都要加個(gè)圖框，由于出圖用途不一樣，會(huì)用到從A0 到A4 等各式各樣的圖框，我們可以把不同大小的圖框分別做好，存放在圖框庫文件夾里，名字也編成如A3.DWG， A2.DWG，宗地圖.DWG 等等，用的時(shí)候按名字插入即可。
當(dāng)然還有很多測(cè)繪上的常用的符號(hào)也可象這樣做成文件，比如指北針等。中國(guó)有句老話叫做“磨刀不誤砍柴工”，平時(shí)花點(diǎn)時(shí)間把這些圖存放在一個(gè)文件夾下， 把這個(gè)文件夾下的圖當(dāng)成圖塊，用的時(shí)候插入到圖中即可，即方便又省時(shí)。
塊的使用使AutoCAD 的操作變得更加靈活，我們?cè)诠ぷ髦谐３Ｓ龅竭@樣的問題，如在測(cè)繪制圖中將兩種相似的符號(hào)混淆了，把上水的符號(hào)和下水的符號(hào)記反了，成圖時(shí)發(fā)現(xiàn)圖中是上水的地方都成了下水符號(hào)，這時(shí)我們要是一個(gè)一個(gè)的把下水符號(hào)換成上水符號(hào)，肯定是費(fèi)時(shí)的一件事了，而且極容易出錯(cuò)。AutoCAD 中塊能重新定義，所以這時(shí)我們只要把塊進(jìn)行重新定義，插入的塊也隨之更新。這樣既減少了修改工作的工作量，也避免校核人員一個(gè)一個(gè)的檢查是否修改完畢。
2.2 LISP 語言的開發(fā)
AutoLISP 是AutoCAD 的高級(jí)宏編程語言，是LISP 編程語言（目前存在的最古老的計(jì)算機(jī)編程語言之一）的派生語言。該語言易于掌握，而功能又強(qiáng)大。AutoCAD 內(nèi)置了 LISP 解釋器，用此解釋器可以在命令行中輸入 AutoLISP 代碼，或從外部文件中加載 AutoLISP 代碼。AutoLISP 應(yīng)用程序或例行程序可以與 AutoCAD 進(jìn)行多種方式的交流。這些例行程序可以提示用戶輸入信息，可以直接訪問內(nèi)置的 AutoCAD 命令，也可以在圖形數(shù)據(jù)庫中修改或創(chuàng)建對(duì)象。通過創(chuàng)建 AutoLISP 例行程序，可將特殊要求的命令添加到 AutoCAD 中。許多標(biāo)準(zhǔn)的 AutoCAD 命令實(shí)際上也是 AutoLISP 應(yīng)用程序。
AutoLISP 語言是當(dāng)今世界上CAD 軟件中被廣泛采用的設(shè)計(jì)語言之一。AutoCAD 自面世以來經(jīng)過不斷努力和創(chuàng)新經(jīng)歷不同版本的升級(jí)，逐漸完善。但是由于用戶使用水平的不斷提高和滿足不同行業(yè)發(fā)展的需要，AUTODESK 公司在著重考慮了用戶在設(shè)計(jì)過程中的創(chuàng)新思想和獨(dú)立的工程設(shè)計(jì)后，將AUTOLISP 語言嵌套在AutoCAD 內(nèi)部，使用戶充分利用AutoCAD 進(jìn)行二次開發(fā)，實(shí)現(xiàn)直接增加和修改AutoCAD 命令，隨意擴(kuò)大圖形編輯功能，建立圖形庫和數(shù)據(jù)庫，并對(duì)當(dāng)前圖形進(jìn)行直接訪問和修改，開發(fā)CAD 軟
圖1
件包等功能。嵌入了AUTOLISP 以后使僅作為交互式圖形編輯軟件的AutoCAD 變成能真正進(jìn)行計(jì)算機(jī)輔助設(shè)計(jì)和繪圖的AutoCAD 軟件。方便了用戶，進(jìn)一步提高生產(chǎn)效率，并且通過批量作業(yè)提高數(shù)據(jù)的統(tǒng)一性和標(biāo)準(zhǔn)化。
AutoCAD 已經(jīng)為我們提供了豐富的繪圖和編輯命令，但是這些命令并不是針對(duì)測(cè)量專業(yè)而設(shè)置的。有些測(cè)量方面常用的功能AutoCAD 并不具備，但可以利用LISP 語言對(duì)AutoCAD 作二次開發(fā)，開發(fā)出適應(yīng)測(cè)量專業(yè)特點(diǎn)的新命令。這里只舉幾個(gè)簡(jiǎn)單的例子加以說明： 在地形測(cè)量中，（1）如果我們測(cè)量了某一矩形建筑物的四個(gè)點(diǎn)，則很容易把這個(gè)建筑物繪制出來。但大多數(shù)情況是，我們只測(cè)量了這個(gè)建筑物的一條邊，丈量了建筑物的寬度， 這種情況，顯然AutoCAD 提供的LINE 或PLINE 命令是無法實(shí)現(xiàn)的。（2）在地形測(cè)量中，加固陡坎、末加固陡坎、鐵路、電力線路，圍墻，界址線等等地貌符號(hào)和圖式符號(hào)的繪制，AutoCAD 沒有提供相應(yīng)的繪圖命令，為此，我們都可以編制相應(yīng)的LISP 程序來自動(dòng)處理完成。(3) 在編輯土地利用現(xiàn)狀圖時(shí)，經(jīng)常需要知道某一宗地的面積，同樣也可以編制一個(gè)LISP 程序， 它的功能是把圍繞宗地四周的線提出來， 首尾相接，構(gòu)成封閉的多邊形，計(jì)算其面積并顯示出來。
我們可以編制若干個(gè)LISP 程序，每一個(gè)程序完成一個(gè)相應(yīng)的功能，把這些程序嵌入AutoCAD 內(nèi)部，調(diào)用AutoCAD 時(shí)同時(shí)裝入內(nèi)存，我們就可以象調(diào)用其它AutoCAD 命令一樣，隨意調(diào)用，方便、靈活地完成各種編輯工作。
下面是我在工作中遇到的實(shí)際問題， 用LISP 編寫小程序來解決的例子。在單體放樣和竣工測(cè)量工作中，驗(yàn)線其實(shí)就是實(shí)測(cè)樓位，用它來檢查和比較實(shí)際樓位與定位圖理論樓位的位移量，所以在畫圖時(shí)除了顯示樓位坐標(biāo)，還得有實(shí)測(cè)與理論兩個(gè)坐標(biāo)的對(duì)照表。首先我先做好一個(gè)坐標(biāo)對(duì)照表。如下圖1 ：
此表格是依據(jù)上級(jí)機(jī)關(guān)發(fā)下來的樣圖做的。把此圖存入圖庫，然后利用LISP 寫了一個(gè)小程序。如下：
(defun c:yx(/ pt os pt1 pt2 pt3 n0 n1 n2 nm sp1 sp2 e)
(setq os (getvar "osmode"))
(setq sp1 (* 4 hgt))
(setq sp2 (* 9 hgt))
(setq sp3 (* 10 hgt))
(setq n10 "+")
(setq sp4 (* 6 hgt))
(setq sp666 (* 9 hgt))
(setq sp777 (* 6 hgt))
(setq n0 (* 2.2 hgt))
(setq e "T")
(setvar "osmode" 0)
(setq pt1 (getpoint "\nPick a point to define the 1st text:"))
(setvar "osmode" 0)
(while e
(setvar "osmode" 33)
(setq pt8 (getpoint "\nPick 實(shí)測(cè)坐標(biāo) point:"))
(setq pt9 (getpoint "\nPick 原定位坐標(biāo) point:"))
(setvar "osmode" 0)
(setq e pt8)
(if (= e " ")
(progn
(command "redraw")
(setvar "osmode" os)
(setq e nil)
)
)
(setq nm (getstring "\nPlease input this point name:"))
(setq n1 (cadr pt8))
(Setq n2 (car pt8))
(setq n3 (cadr pt9))
(Setq n4 (car pt9))
(setq n1 (atof (rtos n1 2 3)))
(setq n2 (atof (rtos n2 2 3)))
(Setq n5 (- n1 n3))
(Setq n6 (- n2 n4))
(Setq n7 (sqrt (+(* n5 n5) (* n6 n6))))
(setq pt2 (polar pt1 0 sp1))
(setq pt3 (polar pt2 0 sp3))
(setq pt4 (polar pt3 0 sp3))
(setq pt5 (polar pt4 0 sp2))
(setq pt6 (polar pt5 0 sp3))
(setq pt66 (polar pt5 0 sp666))
(setq pt7 (polar pt6 0 sp4))
(setq pt77 (polar pt6 0 sp777))
(setq pt8 (polar pt7 0 sp4))
(command "text" pt1 hgt 0 nm)
(command "text" pt2 hgt 0 (rtos n1 2 3))
(command "text" pt3 hgt 0 (rtos n2 2 3))
(command "text" pt4 hgt 0 (rtos n3 2 3))
(command "text" pt5 hgt 0 (rtos n4 2 3))
(if (<= n5 0)
(command "text" pt6 hgt 0 (rtos n5 2 3))
(progn
(command "text" pt66 hgt 0 n10)
(command "text" pt6 hgt 0 (rtos n5 2 3))))
(if (<= n6 0)
(command "text" pt7 hgt 0 (rtos n6 2 3))
(progn
(command "text" pt77 hgt 0 n10)
(command "text" pt7 hgt 0 (rtos n6 2 3))))
(command "text" pt8 hgt 0 (rtos n7 2 3))
(setq pt1 (polar pt1 -1.5708 n0))
)
)
執(zhí)行此程序后，按提示操作，可得實(shí)測(cè)坐標(biāo)和理論坐標(biāo)的對(duì)照表，還有X、Y 及兩坐標(biāo)點(diǎn)的位移量。一般情況下，在執(zhí)行這個(gè)程序時(shí)，實(shí)測(cè)的樓位已推算好了， 定位的理論樓位也應(yīng)在圖中有顯示，所以執(zhí)行程序后，在提示輸入實(shí)測(cè)坐標(biāo)和提示輸入理論坐標(biāo)時(shí)，只要捕捉點(diǎn)就行，這樣也免去再次輸入坐標(biāo)時(shí)出錯(cuò)。
我們編寫LISP 程序是為了給工作帶來方便，提高工作效率。所以我們?cè)诰帉?br /> 圖2
圖3
LISP 程序時(shí)需要十分的慎重，編寫完以后，一定要進(jìn)行試驗(yàn)，并且試驗(yàn)應(yīng)具有一定的規(guī)模和次數(shù)，及時(shí)發(fā)現(xiàn)問題及時(shí)進(jìn)行改正。經(jīng)過以上步驟，我們可以把寫好的LISP 程序放入到一個(gè)文件夾中，需要用的時(shí)候可以使用“工具”菜單中的“程序調(diào)入”，會(huì)出現(xiàn)如下對(duì)話框（圖2）
在“文件”中找出需要的程序，“載入” 就可以了。
2.3 自定義菜單
AutoCAD 提供了自定義菜單功能，執(zhí)行具有特定應(yīng)用背景的經(jīng)常性任務(wù)時(shí)，菜單自定義非常有用。可在菜單中添加適當(dāng)?shù)倪x項(xiàng)，用一個(gè)菜單項(xiàng)執(zhí)行完成任務(wù)所需的多個(gè)步驟，簡(jiǎn)化復(fù)雜操作，從而提高生產(chǎn)效率。
菜單由菜單文件定義，用戶可以修改現(xiàn)有菜單文件也可以自己創(chuàng)建。我們可以自己創(chuàng)建個(gè)屏幕菜單，把塊的插入及LISP 程序的執(zhí)行加入其中，如下圖3
這樣操作一目了然，比較直觀方便， 使我們的成圖效率更高。
3 結(jié)束語
AutoCAD 技術(shù)的應(yīng)用在縮短測(cè)繪成圖的周期、節(jié)省人力、物力和財(cái)力、提高質(zhì)量及效率方面發(fā)揮著巨大的作用。它消除了傳統(tǒng)的采用繪圖工具在空白圖紙上繪制的手工作圖方式或使用繪圖儀作業(yè)的一些弊端如：精度不高、速度慢、效率低、成品難以修改等。因此熟練掌握AutoCAD 的操作技巧，不但能夠提高工作效率還大大的提高工作質(zhì)量。達(dá)到既好又快又省的目的，為個(gè)人和集體創(chuàng)利潤(rùn)，為社會(huì)創(chuàng)效益，中國(guó)夢(mèng)，我的夢(mèng)。
總之，AutoCAD 在測(cè)繪制圖中所發(fā)揮的作用是得到業(yè)界認(rèn)可的。可以說AutoCAD 是測(cè)繪的通用軟件。比如目前流行的CASS 等一些軟件，都是在AutoCAD 的基礎(chǔ)平臺(tái)上開發(fā)出來的，是更適合測(cè)繪行業(yè)的軟件。所以說學(xué)好AutoCAD 的基本操作是提高測(cè)繪制圖的前提。我們要學(xué)好AutoCAD 軟件，使它能更好地為測(cè)繪行業(yè)服務(wù)。
【參考文獻(xiàn)】
[1] 康博創(chuàng)作室編著.AutoCAD R14 中文版使用指南. 北京. 清華大學(xué)出版社，1999
[2] 章憶文編著.AutoLISP 程序員參考手冊(cè)．北京. 海洋出版社，1991