autolisp程序語言在房產(chǎn)測量中的應(yīng)用

1、<p>　　Autolisp程序語言在房產(chǎn)測量中的應(yīng)用</p><p>　　【摘要】房產(chǎn)測量是采集和表述房屋和房屋用地有關(guān)信息的一門技術(shù)。房產(chǎn)測量工作主要包括外業(yè)數(shù)據(jù)采集和內(nèi)業(yè)數(shù)據(jù)整理兩個(gè)過程。內(nèi)業(yè)主要工作之一是根據(jù)外業(yè)采集的數(shù)據(jù)繪制出房屋的草圖，然后再依據(jù)草圖來賦予該房屋的各種屬性。以前傳統(tǒng)的繪圖方法比較繁瑣且不精確，現(xiàn)在我們最主要用到得成圖軟件是AutoCAD。利用該軟件成圖過程中，我們可以利用Au

2、toCAD支持AutoLISP編程語言這一特點(diǎn)，編寫出一些小程序以方便房產(chǎn)測量內(nèi)業(yè)工作的進(jìn)行，達(dá)到提高精度和效率的作用。</p><p>　　【關(guān)鍵詞】房產(chǎn)測量，AutoCAD成圖軟件，AutoLISP編程語言。</p><p><b>　　Abstract</b></p><p>　　Real-Estate Surveeying are co

3、llected and the expression information about housing and housing sites of a technology. Real-Estate Surveeying include foreign trade data collection and data management within the industry, the two processes. To work wit

4、hin one of the owners is based on data collected outside the industry, the housing draw sketches, and then according to the draft plan to give the house a variety of attributes. Comparison of traditional drawing methods

5、previously cumbersome and impre</p><p><b>　　目錄</b></p><p><b>　　1緒論1</b></p><p>　　1.1問題的提出1</p><p>　　1.2 文章的組織2</p><p>　　2房產(chǎn)測量的研究

6、背景2</p><p>　　2.1房產(chǎn)測量的目的和內(nèi)容2</p><p>　　2.2房產(chǎn)測量外業(yè)3</p><p>　　2.3房產(chǎn)測量內(nèi)業(yè)4</p><p>　　2.4房產(chǎn)測量的關(guān)鍵技術(shù)4</p><p>　　3 AutoLISP語言簡化房產(chǎn)測量工作的實(shí)現(xiàn)過程5</p><p>　　

7、3.1房產(chǎn)測量作業(yè)模式5</p><p>　　3.1.1房產(chǎn)測量傳統(tǒng)作業(yè)模式5</p><p>　　3.1.2房產(chǎn)測量新作業(yè)模式5</p><p>　　3.1.3對房產(chǎn)測量新作業(yè)模式的改進(jìn)6</p><p>　　3.2 AutoLISP編程語言6</p><p>　　3.2.1 AutoLISP編程語言的特點(diǎn)

8、6</p><p>　　3.2.2加載和運(yùn)行AutoLISP程序7</p><p>　　3.2.3 AutoLISP變量8</p><p>　　3.3 AutoLISP語言與AutoCAD軟件的結(jié)合8</p><p>　　3.3.1 AutoCAD的語言開發(fā)環(huán)境8</p><p>　　3.3.2 AutoLI

9、SP語言用于AutoCAD二次開發(fā)的特點(diǎn)9</p><p>　　3.4利用AutoLISP編程語言實(shí)現(xiàn)房產(chǎn)草圖的簡易繪制9</p><p>　　4便于房產(chǎn)測量草圖繪制方法的設(shè)計(jì)10</p><p>　　4.1設(shè)計(jì)思路10</p><p>　　4.2房產(chǎn)測量草圖主要要素的提取10</p><p>　　4.2.1

10、房產(chǎn)測量草圖墻厚的快速標(biāo)注10</p><p>　　4.2.2房產(chǎn)測量草圖權(quán)屬面積的獲取11</p><p>　　4.2.3房產(chǎn)測量草圖開門程序設(shè)計(jì)12</p><p><b>　　5結(jié)論13</b></p><p><b>　　致謝14</b></p><p>&

11、lt;b>　　參考文獻(xiàn)15</b></p><p><b>　　1緒論</b></p><p><b>　　1.1問題的提出</b></p><p>　　隨著我國房地產(chǎn)業(yè)的不斷發(fā)展，房產(chǎn)測量日益成為人們關(guān)注的熱點(diǎn)之一。房產(chǎn)測量的功能與特點(diǎn)也越來越受到社會各界的關(guān)注。</p><p&g

12、t;　　從2009年12初到現(xiàn)在一直在整理過去用傳統(tǒng)方法生產(chǎn)的房產(chǎn)測繪資料。在整理過程中發(fā)現(xiàn)，傳統(tǒng)的作業(yè)模式與現(xiàn)在的作業(yè)模式相比，存在太多的弊端。對于房屋的產(chǎn)權(quán)人來說，最關(guān)心的是所購房屋的實(shí)際產(chǎn)權(quán)面積有多少。也就是說，房產(chǎn)測量的精度的高低直接影響產(chǎn)權(quán)面積的計(jì)算。而且房產(chǎn)測量質(zhì)量直接與相關(guān)法律相關(guān)，因?yàn)榉慨a(chǎn)測量的功能之一就是為房地產(chǎn)的產(chǎn)權(quán)、產(chǎn)籍、產(chǎn)業(yè)管理，商品房的開發(fā)、交易等管理提供房屋和房屋用地的權(quán)屬界線、權(quán)屬界址點(diǎn)、房地產(chǎn)面積、各種產(chǎn)

13、別以及有關(guān)權(quán)屬、權(quán)源、產(chǎn)權(quán)糾紛等數(shù)據(jù)、圖卡、表、冊等資料。根據(jù)《中華人民共和國測繪法》和《測繪質(zhì)量監(jiān)督管理辦法》等有關(guān)法律法規(guī)，“測繪產(chǎn)品必須經(jīng)過檢查驗(yàn)收，質(zhì)量合格的方能提供使用”。國務(wù)院測繪行政主管部門建立的測繪產(chǎn)品質(zhì)量監(jiān)督檢驗(yàn)測試中心和各省級測繪主管部門建立的測繪產(chǎn)品質(zhì)量監(jiān)督檢驗(yàn)站，是負(fù)責(zé)實(shí)施測繪產(chǎn)品質(zhì)量監(jiān)督檢驗(yàn)的工作機(jī)構(gòu)。房產(chǎn)測繪資料根據(jù)一定的周期會不斷的更新，而且隨著時(shí)間跟房產(chǎn)測量技術(shù)的不斷發(fā)展和更新，不同時(shí)期對同一幢房屋進(jìn)行測

14、算，得到的測算結(jié)果一般會不同，但是一般會在允許誤差范圍之內(nèi)。當(dāng)然也有出入比較大的，一般用新方法測算的相較之下會更接近實(shí)際，而用傳</p><p>　　傳統(tǒng)房產(chǎn)測量外業(yè)在精度上也沒有現(xiàn)在的高，這也是造成面積誤差大的原因之一。傳統(tǒng)房產(chǎn)測量外業(yè)數(shù)據(jù)獲取用到的最主要的工具是卷尺。用這種工具去丈量房屋的邊長，通常誤差比較大。尺子本身就有好幾項(xiàng)改正數(shù)：尺長改正、溫度改正等。外界環(huán)境影響比較大，再加上人為因素造成的誤差，這些所

15、有的因素都是傳統(tǒng)房產(chǎn)測量精度不高的來源。</p><p>　　傳統(tǒng)房產(chǎn)測量內(nèi)業(yè)處理相對現(xiàn)在模式來說也比較簡單。它除去了復(fù)雜的共用面積的分?jǐn)偰Ｊ?，也不存在外半墻的分?jǐn)?。通常是除去共有墻，其他都?xì)w為自有墻，統(tǒng)一劃入權(quán)屬面積中。所以如果一幢房屋經(jīng)過新舊兩種模式測算后面積往往會差，這也是不可避免的。在面積計(jì)算上，傳統(tǒng)的方法是用純手工計(jì)算的。對于不規(guī)則多邊形，傳統(tǒng)的方法往往是將其分割成多個(gè)規(guī)則矩形來計(jì)算，在計(jì)算過程的誤差又

16、會在不同程度上累積。最后從總體上來看，誤差比較大。這種情況在以前是一種普遍的現(xiàn)象，是不可避免的。</p><p>　　要達(dá)到高精度的房產(chǎn)測繪成果，必需在硬件設(shè)備和軟件上進(jìn)行改進(jìn)。隨著經(jīng)濟(jì)的迅速發(fā)展，現(xiàn)在的房產(chǎn)測繪外業(yè)使用的設(shè)備都是非常先進(jìn)的。在房產(chǎn)平面控制測量時(shí)，其精度已達(dá)到末級相鄰基本控制點(diǎn)的相對點(diǎn)位中誤差不超過±0.025m的要求。在軟件方面，房產(chǎn)測量現(xiàn)在最主要使用的繪圖軟件是AutoCAD。Aut

17、oCAD是由美國Autodesk歐特克公司于二十世紀(jì)八十年代初為微機(jī)上應(yīng)用CAD技術(shù)而開發(fā)的繪圖程序軟件包，經(jīng)過不斷的完善，現(xiàn)已經(jīng)成為國際上廣為流行的繪圖工具。AutoCAD具有良好的用戶界面，通過交互菜單或命令行方式便可以進(jìn)行各種操作。它的多文檔設(shè)計(jì)環(huán)境，讓非計(jì)算機(jī)專業(yè)人員也能很快地學(xué)會使用。在不斷實(shí)踐的過程中更好地掌握它的各種應(yīng)用和開發(fā)技巧，從而不斷提高工作效率。AutoCAD具有十分強(qiáng)大的平面繪圖功能。利用AutoCAD自身的輔助

18、命令及房產(chǎn)測量外業(yè)采集到得數(shù)據(jù)，繪制出符合標(biāo)準(zhǔn)的房產(chǎn)草圖，并完成相關(guān)的操作。AutoCAD允許用戶定制菜單和工具欄，并能利用內(nèi)嵌語言AutoLISP、Visual LISP、VBA、ADS、ARX等進(jìn)行二次開發(fā)。房產(chǎn)草圖繪制過程，具有重復(fù)性，也比較繁瑣，但是又要求十分嚴(yán)格</p><p>　　然而作為一般的房產(chǎn)測量工作者，編寫程序確實(shí)是一個(gè)比較新的挑戰(zhàn)，再加上人們對這一領(lǐng)域往往不是很熟悉，在時(shí)間、精力以及現(xiàn)實(shí)情況

19、上，很多人往往堅(jiān)持原來的繁瑣的房產(chǎn)草圖繪制模式。這種做法往往是不明智的。我們從事的房產(chǎn)測量工作是重復(fù)的長期的過程，好的方法可以讓我們達(dá)到事半功倍的效果，再加上AutoLISP編程語言并不是一個(gè)復(fù)雜的語言。AutoLISP編程語言對程序編寫的環(huán)境要求比較簡單，只要是一般的文書編輯軟件，可編輯ASCII檔案者都適用。AutoLISP編程語言不同于其他編程語言，AutoLISP代碼是不需要編譯的，用戶可以在命令行中直接輸入代碼并立即看到結(jié)果。

20、AutoLISP編程語言的這種特性為我們在繪制房產(chǎn)草圖的過程中提供了很大的便利。房產(chǎn)草圖在繪制時(shí)要求層次清晰，功能明確。一幅標(biāo)準(zhǔn)的房產(chǎn)草圖包含了該房屋的各種不同屬性，我們在繪圖之前就要根據(jù)不同的功能屬性建立不同的圖層，以方便管理和編輯。利用AutoLISP編程語言編寫的程序可以很方便的對某個(gè)需要編輯的圖層進(jìn)行統(tǒng)一編輯，從而省去了不必要的重復(fù)工作，提高了工作效率和質(zhì)量。所以在房產(chǎn)測量中運(yùn)用AutoLISP編程語言編寫一些小程序來輔助生產(chǎn)&

21、lt;/p><p><b>　　1.2 文章的組織</b></p><p>　　文章由以下幾個(gè)部分構(gòu)成：</p><p>　　第一章：緒論。首先分析了傳統(tǒng)房產(chǎn)測量外業(yè)、內(nèi)業(yè)精度低的各種來源；其次比較現(xiàn)在新模式下房產(chǎn)測量的優(yōu)勢；最后在新模式的基礎(chǔ)上引出運(yùn)用AutoLISP編程語言來輔助房產(chǎn)內(nèi)業(yè)工作，以達(dá)到去重就簡，高效率、高質(zhì)量完成生產(chǎn)需要的結(jié)果。&

22、lt;/p><p>　　第二章：房產(chǎn)測量的研究背景。首先介紹了房產(chǎn)測繪的目的和內(nèi)容，然后再全面介紹了房產(chǎn)測繪的相關(guān)知識：包含房產(chǎn)測量外業(yè)、房產(chǎn)測量內(nèi)業(yè)、房產(chǎn)測量的關(guān)鍵技術(shù)以房產(chǎn)測量數(shù)據(jù)成果的利用等內(nèi)容。</p><p>　　第三章：AutoLISP語言簡化房產(chǎn)測量工作的實(shí)現(xiàn)過程。主要涉及房產(chǎn)測量新舊模式的特點(diǎn)及比較等方面，最后引出了AutoLISP編程語言的相關(guān)內(nèi)容和運(yùn)用AutoLISP編程語

23、言簡化房產(chǎn)測量內(nèi)業(yè)工作的實(shí)現(xiàn)。</p><p>　　第四章：便于房產(chǎn)測量草圖繪制方法的設(shè)計(jì)。根據(jù)房產(chǎn)測量草圖主要要素的提取來確定所要編寫的具有針對性程序的思路。最后用具體實(shí)例來說明AutoLISP編程語言在房產(chǎn)測量中的應(yīng)用。</p><p>　　第五章：全文總結(jié)了AutoLISP編程語言在房產(chǎn)測量中的應(yīng)用現(xiàn)狀，也提出了論文中存在的不足及需要改進(jìn)的地方。</p><p&g

24、t;　　2房產(chǎn)測量的研究背景</p><p>　　2.1房產(chǎn)測量的目的和內(nèi)容</p><p>　　房屋通常是人們最關(guān)心的事物，是人們生活能夠得以穩(wěn)定的重要因素。人們所居住的房屋的好壞直接影響到生活的質(zhì)量以及社會的長治久安。然而對于居住的房屋，人們不僅僅會關(guān)心房屋的好壞，房屋的實(shí)際面積及產(chǎn)權(quán)歸屬也都是人們非常關(guān)注的問題。要解決這些相關(guān)的問題，必須要有關(guān)于房屋的信息才行。房屋的這方面的相關(guān)信息

25、就要靠房產(chǎn)測量手段才能獲取。</p><p>　?。?）房產(chǎn)測量的目的和任務(wù)</p><p>　　房屋是人們生產(chǎn)和生活的場所，房屋和房屋用地是人們生產(chǎn)和生活的基本物質(zhì)要素，這一要素信息的采集和表述，必須經(jīng)過房地產(chǎn)測量，所以房地產(chǎn)測量是房地產(chǎn)管理工作的重要基礎(chǔ)。準(zhǔn)確而完整的房地產(chǎn)測繪成果是審查確認(rèn)房屋的產(chǎn)權(quán)、產(chǎn)籍、保障產(chǎn)權(quán)人合法權(quán)益的重要依據(jù)，也是發(fā)展房地產(chǎn)業(yè)，進(jìn)行城市建設(shè)和管理的必不可少的

26、基礎(chǔ)資料。</p><p>　　房產(chǎn)測量的目的和任務(wù)就是采集和表述房屋以及房屋用地的有關(guān)信息，為房地產(chǎn)管理，尤其是為房屋的產(chǎn)權(quán)、產(chǎn)籍管理提供準(zhǔn)確可靠的成果資料。同時(shí)也為房地產(chǎn)開發(fā)、征收稅費(fèi)、城鎮(zhèn)規(guī)劃建設(shè)以及為市政工程等提供數(shù)據(jù)和資料。[1]</p><p>　?。?）房產(chǎn)測量的作用</p><p>　　《房產(chǎn)測量規(guī)范》是為房產(chǎn)產(chǎn)權(quán)、產(chǎn)籍管理、房地產(chǎn)開發(fā)利用、交易、征

27、收稅費(fèi)，以及為城鎮(zhèn)規(guī)劃建設(shè)提供數(shù)據(jù)和資料。歸納起來有以下三個(gè)方面的作用。</p><p><b>　　1）法律方面的作用</b></p><p>　　房地產(chǎn)測量為房地產(chǎn)的產(chǎn)權(quán)產(chǎn)籍管理、房地產(chǎn)開發(fā)提供房屋和房屋用地的權(quán)屬界址、產(chǎn)權(quán)面積、權(quán)源及產(chǎn)權(quán)糾紛等資料，是進(jìn)行產(chǎn)權(quán)登記、產(chǎn)權(quán)轉(zhuǎn)移和產(chǎn)權(quán)糾紛的依據(jù)，確認(rèn)以后的房地產(chǎn)成果資料具有法律效力。</p><p

28、>　　在國際上，這種不動產(chǎn)的地籍測量都認(rèn)定為一種政府行為的官方測量，或者說是為產(chǎn)權(quán)主提供官方證明。</p><p>　　2）財(cái)政經(jīng)濟(jì)方面的作用</p><p>　　房地產(chǎn)測量成果包括房地產(chǎn)的數(shù)量、質(zhì)量、利用現(xiàn)狀等資料，是為進(jìn)行房地產(chǎn)評估、征收房地產(chǎn)稅費(fèi)、房地產(chǎn)開發(fā)、房地產(chǎn)交易、房地產(chǎn)抵押，以及保險(xiǎn)服務(wù)等方面提供數(shù)據(jù)和資料。</p><p>　　3）社會服務(wù)方面

29、的作用</p><p>　　GB/T17986.1~17986.2——2000《房產(chǎn)測量規(guī)范》系列標(biāo)準(zhǔn)的服務(wù)對象，著重點(diǎn)和主要目標(biāo)是滿足產(chǎn)權(quán)和產(chǎn)籍管理的需求，以及房地產(chǎn)其他管理方面的需求，但是隨著社會主義市場經(jīng)濟(jì)的形成和發(fā)展，房地產(chǎn)測繪也會進(jìn)入市場，房地產(chǎn)測繪的服務(wù)將面向社會，它不僅為房地產(chǎn)業(yè)服務(wù)，而且也可為城鎮(zhèn)規(guī)劃、建設(shè)、市政工程、公共事業(yè)、環(huán)保、綠化、治安、消防、文教衛(wèi)生、水利、交通、財(cái)政稅收、金融、保險(xiǎn)、工

30、商管理、旅游、街道照明、上、下水工程、通訊、燃?xì)夤?yīng)等城鎮(zhèn)事業(yè)提供基礎(chǔ)資料和有關(guān)信息。這是保證信息共享、避免重復(fù)測繪，重復(fù)投入的重要措施。[1]</p><p>　　要詳細(xì)了解房產(chǎn)測量的相關(guān)內(nèi)容，還要對房產(chǎn)測量有關(guān)名詞的解釋有所了解：</p><p>　　a）房地產(chǎn)測量：房地產(chǎn)測量是采集和表述房屋和房屋用地有關(guān)信息的一門技術(shù)。</p><p>　　b）采集和表述：采

31、集是指采用測繪科學(xué)技術(shù)，按照房地產(chǎn)管理的要求和需要，對房屋和房屋用地的有關(guān)信息進(jìn)行調(diào)查和測量。表述是指對房屋和房屋用地的幾何、地理、物理特性，用數(shù)字、文字、符合、影像進(jìn)行描述，供產(chǎn)權(quán)人和有關(guān)人士使用。</p><p>　　c）房屋和房屋用地：房屋必須占用土地，房屋和房屋用地習(xí)慣稱房地產(chǎn)，房屋和土地是不可移動的、價(jià)值巨大的、經(jīng)久耐用的個(gè)人財(cái)產(chǎn)和社會財(cái)富。房屋包括主體房屋、房屋附屬設(shè)施和房屋維護(hù)物。主體房屋包括一般房

32、屋、架空房屋、窯洞、地下室、蒙古包等建筑物；房屋附屬設(shè)施包括廊（有柱走廊、檐廊、挑廊、門廊、架空通廊）、陽臺（封閉陽臺、不封閉陽臺）、門（門、門斗、門墩、門頂）、室外樓梯、臺階等；房屋維護(hù)物包括圍墻、柵欄、欄桿、籬笆、鐵鋼絲、溝、坎、河、渠等。房屋用地是指房屋占地和生產(chǎn)生活所用土地的總稱。包括房屋的占地面積、院落面積，還包括房屋附屬設(shè)施和房屋維護(hù)物所占的面積。房屋用地是房地產(chǎn)測繪必不可少的要素，因?yàn)樗菍Ψ课荻ㄎ缓兔枋龅囊罁?jù)和基礎(chǔ)。&l

33、t;/p><p><b>　　2.2房產(chǎn)測量外業(yè)</b></p><p>　　房產(chǎn)測量的外業(yè)是個(gè)比較復(fù)雜的過程，包含多個(gè)程序，每個(gè)程序之間相互關(guān)聯(lián)，緊密聯(lián)系，無論哪個(gè)程序出了差錯，都會影響整個(gè)測量工作的進(jìn)行。房產(chǎn)測量外業(yè)主要任務(wù)是采集內(nèi)業(yè)所需的所有數(shù)據(jù)以及確定房屋的各種屬性和地理位置。房產(chǎn)測量外業(yè)主要包括以下幾個(gè)方面。</p><p>　?。?）房

34、產(chǎn)平面控制測量</p><p>　　房產(chǎn)測量的第一步就是在測區(qū)建立一個(gè)高精度的、有一定密度的、可以長期使用的、覆蓋全區(qū)的平面控制網(wǎng)。這是保證房產(chǎn)測量成果質(zhì)量的基礎(chǔ)。</p><p>　　平面控制點(diǎn)可以利用已有符合房產(chǎn)測量規(guī)范的現(xiàn)有成果，必要時(shí)則應(yīng)自行布測房產(chǎn)平面控制網(wǎng)。</p><p>　　不論是利用其他單位的成果，還是自己建立的控制，都應(yīng)按照《房產(chǎn)測量規(guī)范》的規(guī)定

35、和要求進(jìn)行檢核，這是房產(chǎn)測量的基礎(chǔ)，也是今后建立房地產(chǎn)信息系統(tǒng)的基礎(chǔ)。</p><p>　　所有的測量都離不開一個(gè)基準(zhǔn)，即所謂的測量基準(zhǔn)。測量基準(zhǔn)是測繪過程及測繪成果所用基準(zhǔn)的總稱。它包括大地基準(zhǔn)、長度基準(zhǔn)、天文基準(zhǔn)、高程基準(zhǔn)、重力基準(zhǔn)、海深基準(zhǔn)、投影基準(zhǔn)等，它是在測繪中選用的參照系和起算數(shù)據(jù)。國家標(biāo)準(zhǔn)《房產(chǎn)測量規(guī)定》中所講的測量基準(zhǔn)只包括房地產(chǎn)測量過程中及其成果直接使用的基準(zhǔn)，主要是坐標(biāo)系統(tǒng)和高程基準(zhǔn)。房產(chǎn)測量

36、一般不測高程，所以本文不作房產(chǎn)高程測量基準(zhǔn)的介紹。</p><p>　　房產(chǎn)測量的坐標(biāo)系統(tǒng)應(yīng)采用1980年西安坐標(biāo)系或地方坐標(biāo)系。采用地方坐標(biāo)系時(shí)，應(yīng)和國家坐標(biāo)系聯(lián)測。</p><p>　　從長遠(yuǎn)和全局考慮，國家也要求全國應(yīng)采用統(tǒng)一的國家大地坐標(biāo)系統(tǒng)，并使各城市的城市控制網(wǎng)成為國家控制網(wǎng)的一部分。但是由于歷史的原因，在相當(dāng)長一段時(shí)期內(nèi)我國沒有形成和提供覆蓋全國的高精度的國家大地控制網(wǎng)成果，

37、而城市由于規(guī)劃和建設(shè)的需要，許多大中城市都先后建立了自己獨(dú)立的地區(qū)性的大地控制網(wǎng)，形成了自己的大地坐標(biāo)系統(tǒng)和平面坐標(biāo)系統(tǒng)。這些城市控制網(wǎng)一般質(zhì)量好，投影變形很小，能滿足大比例尺測圖和施工放樣的需要。這些城市控制成果一般也能滿足城鎮(zhèn)地籍測繪和房產(chǎn)測繪平面控制需要。在大中城市一般采用地方坐標(biāo)系統(tǒng)，但是為了從分利用現(xiàn)有的成果資料，保持城市測繪成果資料的統(tǒng)一和共享，也為了房產(chǎn)測繪成果能為城市的經(jīng)濟(jì)建設(shè)、為相關(guān)行業(yè)服務(wù)，所以在國家標(biāo)準(zhǔn)《房產(chǎn)測量規(guī)

38、范》中提倡使用國家統(tǒng)一的坐標(biāo)系統(tǒng)——1980年西安坐標(biāo)系，采用地方坐標(biāo)系的，應(yīng)和國家坐標(biāo)系聯(lián)測，聯(lián)測點(diǎn)不少于三個(gè)，其目的是保證必要時(shí)能將地方坐標(biāo)系轉(zhuǎn)換為國家坐標(biāo)系。</p><p>　　利用房產(chǎn)平面控制網(wǎng)中的已知點(diǎn)對房屋進(jìn)行碎部測量，并在室內(nèi)繪制出房屋的地形圖作為宗地圖的原始資料。</p><p>　　（2）房屋邊長數(shù)據(jù)的野外采集</p><p>　　房產(chǎn)草圖的繪制

39、必需以野外量測的房屋邊長數(shù)據(jù)為依據(jù)。房屋邊長數(shù)據(jù)的采集所需工具為手持激光測距儀，鋼卷尺。由于存在誤差累積的情況，所以一般一邊要盡量少次測完，而且要重復(fù)測量取平均值。量邊時(shí)還要注意內(nèi)外控制好。屋外總長數(shù)據(jù)一般要和屋內(nèi)同一邊總長數(shù)據(jù)做對比，相互檢核，這樣才不會出現(xiàn)錯誤邊長。</p><p><b>　　2.3房產(chǎn)測量內(nèi)業(yè)</b></p><p>　　房產(chǎn)測量外業(yè)數(shù)據(jù)采集完

40、全后，內(nèi)業(yè)相關(guān)工作就著手進(jìn)行。房產(chǎn)草圖的繪制是內(nèi)業(yè)工作的基礎(chǔ)，是十分重要的一個(gè)環(huán)節(jié)。</p><p>　　房產(chǎn)草圖采用雙線表示方法，形象逼真地顯示了房屋的平面信息：房屋套內(nèi)布局、外墻墻厚、套內(nèi)墻厚、權(quán)屬范圍等。</p><p>　　下圖2-1就是一幅標(biāo)準(zhǔn)的房產(chǎn)草圖樣式。</p><p>　　該圖只是一幢房屋中的其中一層。對于不是標(biāo)準(zhǔn)層的層圖，繪制時(shí)要全部繪制出來。從

41、下圖我們可以看出，一幅房產(chǎn)草圖包含的要素也是十分復(fù)雜的。</p><p><b>　　圖2-1</b></p><p>　　2.4房產(chǎn)測量的關(guān)鍵技術(shù)</p><p>　　房產(chǎn)外業(yè)測量和很多測量在程序和操作上一樣，但又不完全一樣，它有它獨(dú)特之處，例如在房產(chǎn)地形圖測繪過程中，碎部點(diǎn)的高程一般都不要求測出來，除非是地形起伏較大的山城或丘陵城市，對地形

42、變化的特征處測定高程特征點(diǎn)的高程，按照國家標(biāo)準(zhǔn)《房產(chǎn)測量規(guī)范》中的規(guī)定進(jìn)行表述，并標(biāo)出其高程值。房產(chǎn)測量內(nèi)業(yè)是整個(gè)工作中的關(guān)鍵，所以內(nèi)業(yè)工作進(jìn)展順利與否直接影響整個(gè)項(xiàng)目的效率和質(zhì)量。所以房產(chǎn)測量的一些關(guān)鍵技術(shù)必須掌握好。</p><p>　?。?）房產(chǎn)測量外業(yè)、內(nèi)業(yè)同步進(jìn)行：在房產(chǎn)測量作業(yè)過程中，外業(yè)和內(nèi)業(yè)往往是同步進(jìn)行的。這樣不但有利于縮短作業(yè)時(shí)間，而且便于檢核，經(jīng)內(nèi)業(yè)檢核出來的問題，可以在下次外業(yè)時(shí)及時(shí)解決。

43、</p><p>　?。?）房屋外框的全局控制：房產(chǎn)測量中，房屋面積計(jì)算是否準(zhǔn)確與房屋外框的控制是直接相關(guān)的。房屋外框沒有控制好，我們計(jì)算出來的面積往往是不對的。所以如何控制外框是關(guān)鍵。在外業(yè)量邊過程中通常是先量出房屋的外邊長，然后再量出室內(nèi)邊長，根據(jù)室內(nèi)邊長總和與外邊長相比較，同一邊的這兩組數(shù)據(jù)之差不能超過3cm。</p><p>　?。?）上下層草圖套用畫法：房產(chǎn)草圖繪制時(shí)，并不是逐層

44、從頭到尾一步一步地繪制。我們都是繪制出一個(gè)標(biāo)準(zhǔn)層的草圖，然后其他層再以這個(gè)標(biāo)準(zhǔn)層為基礎(chǔ)進(jìn)行修改，這樣不但出錯少，效率也高。</p><p>　?。?）利用AutoLISP編程語言輔助繪圖：在繪圖過程中往往有很多重復(fù)的步驟，這時(shí)有必要運(yùn)用AutoCAD加載用AutoLISP編程語言編寫的程序來進(jìn)行圖形的批量編輯。</p><p>　　3 AutoLISP語言簡化房產(chǎn)測量工作的實(shí)現(xiàn)過程<

45、/p><p>　　3.1房產(chǎn)測量作業(yè)模式</p><p>　　房產(chǎn)測量作業(yè)模式在不同的城市，不同時(shí)期都會不同。從我們現(xiàn)在做的房產(chǎn)測量數(shù)據(jù)數(shù)字化的工作中，發(fā)現(xiàn)先前的房產(chǎn)測量工作模式存在的問題還是比較多的。問題的關(guān)鍵還是由于當(dāng)時(shí)的技術(shù)不成熟及設(shè)備不先進(jìn)。現(xiàn)在就不一樣了，隨著社會經(jīng)濟(jì)的不斷發(fā)展，先進(jìn)設(shè)備及技術(shù)的不斷引進(jìn)，使得房產(chǎn)測量工作變得更加嚴(yán)密，更能體現(xiàn)現(xiàn)在市場經(jīng)濟(jì)的需求。</p>

46、<p>　　3.1.1房產(chǎn)測量傳統(tǒng)作業(yè)模式</p><p>　　房產(chǎn)測量傳統(tǒng)作業(yè)模式主要還是體現(xiàn)在內(nèi)業(yè)數(shù)據(jù)處理上。</p><p>　　1.傳統(tǒng)房產(chǎn)測量草圖都是繪制在聚酯薄膜紙上，繪制時(shí)同樣要按照一定的比例。</p><p>　　2.將繪制在聚酯薄膜紙上的草圖復(fù)印多份。畫出房屋各套的權(quán)屬線，及公攤部分的權(quán)屬。標(biāo)出門牌號、戶式號及各功能區(qū)注記。</p

47、><p>　　3.根據(jù)畫出的權(quán)屬線范圍，將權(quán)屬多邊形分割成多個(gè)規(guī)則幾何圖形，計(jì)算出這些幾何圖形的面積，面積和就為該權(quán)屬范圍的面積。</p><p>　　4.用以上同樣的方法計(jì)算出公用部分的面積，依據(jù)分?jǐn)偡绞阶詈笥?jì)算出經(jīng)分?jǐn)偤蟮母魈椎拿娣e。</p><p>　　傳統(tǒng)模式下的房產(chǎn)測量數(shù)據(jù)資料不易保存，容易破損和丟失，而且在計(jì)算過程中誤差累積次數(shù)比較多。在定義權(quán)屬范圍時(shí)也不是

48、很嚴(yán)密，傳統(tǒng)的方法下沒有定義外半墻，除去和其他戶室共用的墻外，其他都為自有墻，與公共部分共用的墻也為自有墻。這種情況下，傳統(tǒng)方法測量的房屋面積一般較現(xiàn)在方法下的大，這就給以后測算帶來了一些問題。</p><p>　　3.1.2房產(chǎn)測量新作業(yè)模式</p><p>　　房產(chǎn)測量新模式與傳統(tǒng)模式相比，在使用設(shè)備，繪圖軟件上都有相當(dāng)大的優(yōu)勢，尤其是在軟件應(yīng)用上體現(xiàn)的更為突出：</p>

49、<p>　　1.現(xiàn)在使用最好的繪圖軟件是AutoCAD，AutoCAD在繪圖上有著非常強(qiáng)大的功能。它有如下特點(diǎn)：</p><p>　　(1)具有完善的圖形繪制功能。</p><p>　　(2)有強(qiáng)大的圖形編輯功能。</p><p>　　(3)可以采用多種方式進(jìn)行二次開發(fā)或用戶定制。</p><p>　　(4)可以進(jìn)行多種圖形格式的

50、轉(zhuǎn)換，具有較強(qiáng)的數(shù)據(jù)交換能力。</p><p>　　(5)支持多種硬件設(shè)備。</p><p>　　(6)支持多種操作平臺</p><p>　　(7)具有通用性、易用性，適用于各類用戶此外，從AutoCAD2000開始，該系統(tǒng)又增添了許多強(qiáng)大的功能，如AutoCAD設(shè)計(jì)中心（ADC）、多文檔設(shè)計(jì)環(huán)境（MDE）、Internet驅(qū)動、新的對象捕捉功能、增強(qiáng)的標(biāo)注功能以及

51、局部打開和局部加載的功能，從而使AutoCAD系統(tǒng)更加完善。</p><p>　　可以采用多種方式對AutoCAD進(jìn)行二次開發(fā)或用戶定制，這一特點(diǎn)我們常常利用來簡化我們房產(chǎn)草圖的繪制過程。</p><p>　　2.現(xiàn)在房產(chǎn)測量權(quán)屬范圍定義與傳統(tǒng)模式下的房產(chǎn)測量權(quán)屬范圍定義有很大改變。現(xiàn)在的權(quán)屬線都是過中線的，即有外半墻部分。最后的外半墻面積會根據(jù)規(guī)范要求進(jìn)行分?jǐn)偅皇窍胍郧澳菢又苯託w入相

52、應(yīng)的戶室。這樣來說更加合理，更能體現(xiàn)現(xiàn)在《房產(chǎn)測量規(guī)范》的要求及市場的要求。</p><p>　　3.由于生產(chǎn)的都是電子產(chǎn)品，并入庫到相應(yīng)的系統(tǒng)中，這樣不僅方便保存及查詢，更能為以后的配圖工作提供很大的便利。</p><p>　　3.1.3對房產(chǎn)測量新作業(yè)模式的改進(jìn)</p><p>　　在房產(chǎn)測量過程中，繪制草圖雖然已經(jīng)有了AutoCAD這個(gè)很強(qiáng)大的軟件，但是房產(chǎn)測

53、量內(nèi)業(yè)有著很多重復(fù)繁瑣的過程。</p><p>　　1.權(quán)屬線生成。當(dāng)房產(chǎn)草圖雙線圖完成后，就要生成權(quán)屬線。而且，對于全算面積、半算面積的權(quán)屬線的線性是不一樣的。全算面積的權(quán)屬線為封閉的實(shí)線多邊形；半算面積的權(quán)屬線為封閉的虛線多邊形。</p><p>　　2.房屋邊長注記。一幅標(biāo)準(zhǔn)的房產(chǎn)草圖，邊長注記是必不可少的。單純用CAD中的命令將是一項(xiàng)很大的工程。</p><p&

54、gt;　　3.開門。草圖畫完了，房子的門就肯定要開。用CAD自帶的修剪命令效率不是很高。</p><p>　　除了以上列出的情況外，還有一些繪圖程序也是具有重復(fù)性的，比如權(quán)屬面積的計(jì)算等。對于這些重復(fù)性的過程，我們可以利用AutoLISP編程語言對CAD進(jìn)行二次開發(fā)或根據(jù)需求編寫一些程序輔助房產(chǎn)測量內(nèi)業(yè)處理。下文就針對利用AutoLISP編程語言編寫一些應(yīng)用程序來輔助繪圖展開介紹。</p><

55、p>　　3.2 AutoLISP編程語言</p><p>　　LISP（List Proccessing Language）是一種計(jì)算機(jī)的表處理語言，是在人工智能科學(xué)領(lǐng)域廣泛應(yīng)用的一種程序設(shè)計(jì)語言。AutoLISP語言室嵌套與AutoCAD內(nèi)部、將LISP語言和AutoCAD有機(jī)地結(jié)合起來的產(chǎn)物。使用AutoLISP可以直接調(diào)用幾乎所有的AutoCAD命令。AutoLISP語言既具備一般高級語言的基本結(jié)構(gòu)和

56、功能，又具有一般高級語言所沒有的強(qiáng)大圖形處理功能，是當(dāng)今世界CAD軟件中被廣泛采用的語言之一。[2]</p><p>　　美國Autodesk公司在AutoCAD內(nèi)部嵌入AutoLISP的目的是為了使用戶充分地利用AutoCAD進(jìn)行二次開發(fā)，實(shí)現(xiàn)直接增加和修改AutoCAD命令，隨意擴(kuò)大圖形編輯功能，建立圖形庫和數(shù)據(jù)庫，并對當(dāng)前圖形進(jìn)行直接訪問和修改，開發(fā)CAD軟件包等。[2]</p><p&

57、gt;　　AutoLISP語言最典型地應(yīng)用之一是實(shí)現(xiàn)參數(shù)化繪圖程序設(shè)計(jì)，包括尺寸驅(qū)動程序和鼠標(biāo)拖動程序等。尺寸驅(qū)動程序是通過改變實(shí)體標(biāo)注的尺寸值來實(shí)現(xiàn)圖形的自動修改，鼠標(biāo)拖動即利用AutoLISP語言提供的（GRREAD[<track>]）函數(shù)，讓用戶直接讀取參數(shù)值以自動改變屏幕圖形大小和形狀。迄今為止，大多數(shù)參數(shù)化程序都是針對二維平面圖編制的。</p><p>　　3.2.1 AutoLISP編程語

58、言的特點(diǎn)</p><p>　　編程語言有很多種類，各自都有其獨(dú)特之處，AutoLISP編程語言具有如下特點(diǎn)：</p><p>　　1. AutoLISP語言是在普通LISP語言基礎(chǔ)上，擴(kuò)充了很多適用于CAD應(yīng)用的特殊功能而形成的，是一種僅能以解釋方式運(yùn)行于AutoCAD內(nèi)部的解釋型程序設(shè)計(jì)語言。</p><p>　　2. AutoLISP語言中的所有成分都是以函數(shù)形

59、式給出的，它沒有語句概念和其它語法結(jié)構(gòu)。執(zhí)行AutoLISP程序就是執(zhí)行一些函數(shù)，再調(diào)用其它函數(shù)。</p><p>　　3. AutoLISP把數(shù)據(jù)和程序統(tǒng)一表達(dá)為表結(jié)構(gòu)，即S—表達(dá)式，故可以把程序當(dāng)作數(shù)據(jù)來處理，也可以把數(shù)據(jù)當(dāng)作程序來執(zhí)行。</p><p>　　4. AutoLISP語言中的程序運(yùn)行過程就是對函數(shù)的求值過程，是在對函數(shù)求值的過程中實(shí)現(xiàn)函數(shù)的功能。</p>&

60、lt;p>　　AutoLISP程序的結(jié)構(gòu)特點(diǎn)：</p><p>　　一般的AutoLISP程序的結(jié)構(gòu)特點(diǎn)是這樣的：AutoLISP中的所有功能都是以表的形式調(diào)用內(nèi)部函數(shù)或用戶函數(shù)來實(shí)現(xiàn)的，其調(diào)用形式為：</p><p>　?。ê瘮?shù)名 變元1 變元2 變元3……變元nF）</p><p>　　括號里的每項(xiàng)之間用空格隔開，變元可以是常數(shù)、變量以及對其它函數(shù)的調(diào)用

61、。我們把這種函數(shù)的調(diào)用形式稱為表達(dá)式。表達(dá)式的書寫規(guī)矩是：</p><p>　　1.前綴表示法。大多數(shù)計(jì)算機(jī)語言采用是“中綴表示法”。而在AutoLISP語言中，采用的是前綴表示法，即把運(yùn)算符放在操作數(shù)之前，并把操作數(shù)（調(diào)用函數(shù)的參數(shù)）和運(yùn)算符（函數(shù)名）用圓括號括起來。如：(setq d(-(*b b)(*4.0 a b))</p><p>　　2.表的第一個(gè)元素必須是函數(shù)名。若是數(shù)值，在

62、括號前應(yīng)帶單引號“＇”。</p><p>　　3.函數(shù)名與第一變元之間以及相鄰兩變元之間必須用空格隔開，計(jì)算機(jī)把表的第一項(xiàng)認(rèn)作函數(shù)名，其余各項(xiàng)認(rèn)作函數(shù)的變元。</p><p>　　4.要注意表達(dá)式中括號和定界符的配對，這是程序中最常見的出錯原因。</p><p>　　5.不能使用多余的括號。</p><p>　　6.除字符常數(shù)中的字母以外，符

63、號名中的大小寫字母是等效的。</p><p>　　AutoLISP是一種書寫非常自由的語言，變元之間可用一個(gè)或多個(gè)空格隔開?？梢砸恍袑懚鄠€(gè)表達(dá)式，也可以一個(gè)表達(dá)式分多行書寫。為了使程序結(jié)構(gòu)直觀，便于閱讀，層次清晰，一般使用縮排形式來編寫程序。</p><p>　　3.2.2加載和運(yùn)行AutoLISP程序</p><p>　　一個(gè)AutoLISP程序通常有兩個(gè)相關(guān)的名

64、稱：程序文件名和函數(shù)名。例如：Train.lsp是一個(gè)文件名，而不是函數(shù)名。所有的AutoLISP文件都以.lsp為文件擴(kuò)展名。在一個(gè)相同的AutoLISP程序文件中可以有一個(gè)或多個(gè)函數(shù)定義。要運(yùn)行一個(gè)函數(shù)，定義該函數(shù)的AutoLISP程序文件必須被裝載。當(dāng)正在圖形編輯器中工作時(shí)，可用下面的命令裝載一個(gè)AutoLISP文件：</p><p>　　Command:(load＂[path]file name＂)<

65、;/p><p>　　AutoLISP文件名和選項(xiàng)的路徑名必須包含在雙引號中，load命令和file name 參數(shù)必須包含在圓括號中。如果不加圓括號，則AutoCAD將試圖裝載一個(gè)圖形或一個(gè)字體文件，而不是裝載一個(gè)AutoLISP程序文件。在load和file name之間不需要空格。AutoCAD成功裝載文件后，將在屏幕的命令提示區(qū)顯示函數(shù)名。</p><p>　　要運(yùn)行程序，只要在Auto

66、CAD命令提示行鍵入該函數(shù)名，并按回車即可(command:函數(shù)名)。如果編程時(shí)函數(shù)名中沒有包含“C:”，則可以通過帶圓括號的函數(shù)名來運(yùn)行程序：</p><p>　　Command：函數(shù)名或Command：（函數(shù)名）</p><p>　　應(yīng)當(dāng)注意為加載一個(gè)AutoLISP程序，在定義其路徑時(shí)采用正斜杠。例如，如果AutoLISP文件Train存在于C：盤的LISP子目錄中，則可以使用如下命

67、令加載文件，也可以使用雙反斜杠代替正斜杠。</p><p>　　Command：(load＂Ｃ:/lisp/train＂)</p><p><b>　　或者</b></p><p>　　Command：(load＂Ｃ:\\lisp\\train＂)</p><p>　　我們也可以使用標(biāo)準(zhǔn)的Windows的拖放功能來裝載應(yīng)

68、用程序。裝載一個(gè)LISP程序，可以從Windows資源管理器中把一個(gè)文件拖放進(jìn)AutoCAD的圖形窗口中，這樣被選中的程序?qū)⒆詣颖患虞d。另一個(gè)裝載程序的方法是：使用Load/Unload Application命令或在AutoCAD命令提示行中輸入Appload命令來調(diào)用。</p><p>　　3.2.3 AutoLISP變量</p><p>　　AutoLISP中按照假設(shè)的數(shù)據(jù)類型賦值給

69、變量。變量將保存其初始值直到它們被賦新值。可以使用AutoLISP的Setq函數(shù)給變量賦值：</p><p>　?。⊿etq 變量1 值1[變量2 值2…]）</p><p>　　Setq函數(shù)向已定的變量名賦值，并將結(jié)果作為值返回。如果在Visual LISP控制臺提示行中使Setq，結(jié)果顯示在控制臺窗口：</p><p>　　_$( Setq abc 95)<

70、;/p><p><b>　　95</b></p><p>　　_$( Setq it＂ＡutoCAD 2008＂)</p><p>　　＂ＡutoCAD 2008＂</p><p>　　在Visual LISP控制臺提示行中輸入如下的變量名，Visual LISP將顯示當(dāng)前的變量值：</p><p>

71、<b>　　_$ abc</b></p><p><b>　　95</b></p><p>　　為了從AutoCAD命令提示行顯示變量的值，必須在變量名前加上“！”。例如：</p><p>　　Command：！abc</p><p><b>　　95</b></p>

72、;<p><b>　　1.Nil 變量</b></p><p>　　Nil是一種沒有賦給數(shù)值的AutoLISP變量。它不同于那些被認(rèn)為是字符串的blank，也不同于數(shù)值0，因此，除了變量的當(dāng)前數(shù)值之外，還可以確定變量是否已經(jīng)被賦值。</p><p>　　每個(gè)變量都將消耗少量的內(nèi)存，因此當(dāng)變量的值不再被使用的時(shí)候，將變量名重新使用或?qū)⒆兞吭O(shè)為nil是一種很

73、好的編程習(xí)慣。將變量設(shè)為nil可以釋放用來存儲變量值所用的內(nèi)存空間。</p><p>　　例如，假如不再需要cyy變量，可以用下列的表達(dá)式從內(nèi)存中釋放變量的值：</p><p>　　_$（setq cyy nil）</p><p><b>　　nil</b></p><p>　　此外，另一個(gè)良好的編程習(xí)慣是盡可能使用局部

74、變量。</p><p><b>　　2.預(yù)定義的變量</b></p><p>　　下列預(yù)定義的變量在Auto LISP應(yīng)用中常見：</p><p>　　PAUSE：定義為有雙反斜杠“\\”組成的字符串。該變量被命令函數(shù)用來暫停用戶的輸入。</p><p>　　PI：定義為常量p(pi)，它的值近似為3.1415926。&

75、lt;/p><p>　　T：定義為常量T，它被用來當(dāng)作非nil的值。</p><p>　　這里要注意的是，用setq函數(shù)能改變這些變量的值。但是，其它應(yīng)用可能要依賴它們的值并希望它們是一致的。因此，建議不要更改這些變量。Visual LISP中的缺省設(shè)置將保護(hù)這些變量，直到它們被重新定義。通過Visual LISP符合服務(wù)特性或設(shè)置Visual LISP環(huán)境選項(xiàng)可以忽略這種保護(hù)。</p&

76、gt;<p>　　3.3 AutoLISP語言與AutoCAD軟件的結(jié)合</p><p>　　3.3.1 AutoCAD的語言開發(fā)環(huán)境</p><p>　　AutoCAD是世界上最流行的通用CAD平臺。在國內(nèi)更是用戶眾多，影響深遠(yuǎn)，尤其是在建筑行業(yè)和機(jī)械行業(yè)擁有數(shù)十萬的應(yīng)用隊(duì)伍，堪稱CAD的標(biāo)準(zhǔn)平臺。自1982年Autodesk公司推出AutoCAD1．0，到今年推出的Aut

77、oCADR14，AutoCAD經(jīng)歷了15年的發(fā)展。</p><p>　　AutoCAD于1986年v2．18版時(shí)提供了AutoLISP程序設(shè)計(jì)的支持，從此開始了可以在一個(gè)通用的CAD平臺上添加自己所需的特殊功能的能力。1987年AutoCADv2．6版推出，AutoLISP得到一些改善，這也正是國內(nèi)流行AutoCAD及AutoCAD環(huán)境下開發(fā)編程的開始。1988年推出的AutoCADR10開始使得AutoLISP

78、程序可以在擴(kuò)展內(nèi)存中允許，這對于編寫稍大一點(diǎn)規(guī)模的應(yīng)用程序提供了可能。AutoCAD第一代開發(fā)工具開發(fā)出的第一代應(yīng)用軟件開始在國內(nèi)流行。 </p><p>　　1990年推出的AutoCADR11第一次在PC版的AutoCAD上提供了C語言開發(fā)環(huán)境（ADS）的支持，這使得在AutoCAD的上開發(fā)大規(guī)模的綜合性的應(yīng)用程序成了可能，AutoCAD下的應(yīng)用程序可以利用標(biāo)準(zhǔn)C語言提供的能力，編制出第一代工具無法實(shí)現(xiàn)的應(yīng)用

79、。真正在國內(nèi)普遍流行用第二代開發(fā)工具開發(fā)AutoCAD，是在1992年推出的AutoCADR12的基礎(chǔ)上進(jìn)行的。1994年推出的AutoCADR12上第一次提供了面向?qū)ο蟮腃＋＋開發(fā)環(huán)境的支持（ARX），這就是AutoCAD第三代開發(fā)工具。AutoCAD本身在內(nèi)核上也發(fā)生了本質(zhì)的變化，盡管最終用戶并不會感覺到，但AutoCAD確實(shí)走向了一個(gè)開放式的面向?qū)ο蟮腃AD平臺，為今后的進(jìn)一步發(fā)展奠定了技術(shù)基礎(chǔ)。很遺憾的是R13上的ARX是個(gè)新生

80、事物，本身不完善，在不同的小版本上的ARX程序不兼容，直至R13C4版才較為穩(wěn)定。ARXSDK發(fā)布的初期所要求的開發(fā)環(huán)境也較為苛刻（要求MSVC2．1～2．2），現(xiàn)在已經(jīng)可以利用MSVC4．x作為開發(fā)環(huán)境。今年剛發(fā)布的AutoCADR14將是經(jīng)三代開發(fā)工具應(yīng)用的舞臺，一方面的R14對ARX的支持更加可靠</p><p>　　3.3.2 AutoLISP語言用于AutoCAD二次開發(fā)的特點(diǎn)</p>&

81、lt;p>　　AutoLISP是AutoCAD內(nèi)嵌的一種解釋語言開發(fā)環(huán)境。AutoCAD從v2．18版開始，一直支持這種開發(fā)環(huán)境。AutoLISP的大部分功能是直接針對AutoCAD，它是一種很好的交互語言，很適合于CAD這類交互性很強(qiáng)的應(yīng)用。</p><p>　　AutoLISP有如下優(yōu)點(diǎn)：</p><p>　　1．語言規(guī)則十分簡單，易學(xué)易用AutoLISP來源了LISP語言，以一

82、種通用的規(guī)則－表（LIST），來描述過程和數(shù)據(jù)。由于這種規(guī)則極其簡單，一個(gè)對計(jì)算機(jī)了解不太深入的工程專業(yè)人員，僅需經(jīng)短期的學(xué)習(xí)，就可以熟練掌握這門語言。LSIP語言的簡潔性是其它許多計(jì)算機(jī)語言所無法相比的，“萬能”的表屏蔽了復(fù)雜的過程，可描述任何數(shù)據(jù)結(jié)構(gòu)。</p><p>　　2．直接針對AutoCAD，易于交互AutoLISP提供的大多數(shù)函數(shù)都是直接針對AutoCAD的操作，用AutoLISP編寫訪問AutoC

83、AD圖形數(shù)據(jù)庫（DWG）圖形數(shù)據(jù)庫的操作</p><p>　　3．解釋執(zhí)行，立竿見影程序員既可以一次運(yùn)行一段AutoLISP代碼，也可以在AutoCAD的Command下逐條鍵入AutoLISP指令，立即得到結(jié)果。</p><p>　　隨著計(jì)算機(jī)技術(shù)的發(fā)展，CAD編程更加復(fù)雜，代碼越來越龐大，AutoLISP的缺點(diǎn)的也愈來愈明顯：</p><p>　　1．功能單一，

84、綜合處理能力差 </p><p>　　2．解釋執(zhí)行，程序運(yùn)行速度慢 </p><p>　　3．缺乏很好的保護(hù)機(jī)制，軟件質(zhì)量不易保證</p><p>　　4．LISP用來表描述一切，并不能很好的反映現(xiàn)實(shí)世界和過程，跟人的思維方式也不太一致。</p><p>　　5．AutoLISP的這些特點(diǎn)，僅適合于有能力的終端用戶做些自己的開發(fā)任務(wù)。<

85、/p><p>　　由于我們做的是房產(chǎn)測量方面簡單的圖形處理，AutoLISP雖然存在這些缺點(diǎn)，但是它的那些優(yōu)點(diǎn)足以達(dá)到我們的要求。</p><p>　　3.4利用AutoLISP編程語言實(shí)現(xiàn)房產(chǎn)草圖的簡易繪制</p><p>　　房產(chǎn)草圖的繪制過程是一個(gè)復(fù)雜繁瑣的過程，復(fù)雜體現(xiàn)在我們要依據(jù)外業(yè)量測的邊長數(shù)據(jù)去恢復(fù)房屋的實(shí)際形狀；繁瑣體現(xiàn)在草圖繪制過程中有很多過程要不斷的

86、重復(fù)進(jìn)行。因?yàn)檫@樣，所以要提高我們繪圖的速度及效率，就得想法找到簡單易操作的方法來輔助房產(chǎn)測量草圖的繪制。</p><p>　　根據(jù)前文介紹的關(guān)于利用AutoLISP編程語言來對AutoCAD進(jìn)行二次開發(fā)的相關(guān)內(nèi)容，我們知道利用AutoLISP編程語言編寫的應(yīng)用程序可以有AutoCAD直接加載調(diào)用。我們可以利用這一點(diǎn)，根據(jù)繪圖的要求編寫一些簡單易懂的程序來幫助我們繪制房產(chǎn)草圖。</p><p&

87、gt;　　在房產(chǎn)草圖的繪制的過程中，最常見的重復(fù)的操作就是給房屋線上標(biāo)注、開門、過權(quán)屬、計(jì)算權(quán)屬面積等。</p><p>　　給房屋線上標(biāo)注時(shí)，如果采用CAD自帶的標(biāo)注命令，耗費(fèi)太多時(shí)間，效率明顯降低。利用AutoLISP編程語言的相關(guān)優(yōu)點(diǎn)設(shè)計(jì)一個(gè)可以批量標(biāo)注的程序，并設(shè)定相應(yīng)的格式。</p><p>　　計(jì)算權(quán)屬面積時(shí)可以利用全算面積部分與半算面積部分線型不同可以在AutoLISP應(yīng)用程

88、序中設(shè)定不同的計(jì)算公式，并實(shí)現(xiàn)自動識別線型計(jì)算權(quán)屬面積。</p><p>　　其他相關(guān)操作同以上根據(jù)不同要求去設(shè)定程序編寫思路。</p><p>　　4便于房產(chǎn)測量草圖繪制方法的設(shè)計(jì)</p><p>　　利用AutoLISP編程語言編寫應(yīng)用程序來輔助房產(chǎn)測量草圖的繪制，不但可以提高工作效率，而且還可以讓我們的圖面整潔清新。要達(dá)到我們想要的效果，設(shè)計(jì)思路是非常重要的。

89、我們必須根據(jù)想要的效果去設(shè)計(jì)，中間可能遇到的問題也要有所準(zhǔn)備。所以這個(gè)過程也不是很簡單的。</p><p><b>　　4.1設(shè)計(jì)思路</b></p><p>　　利用AutoLISP編程語言來設(shè)計(jì)我們需要的應(yīng)用程序，首先要明確我們想達(dá)到的效果，其次根據(jù)畫圖需要確定我們的變量及CAD調(diào)用的命令，再次確定我們要用到的函數(shù)。根據(jù)AutoLISP編程語言特點(diǎn)及繪圖要求，可以

90、用下圖來體現(xiàn)我們的設(shè)計(jì)思路：</p><p>　　4.2房產(chǎn)測量草圖主要要素的提取</p><p>　　4.2.1房產(chǎn)測量草圖墻厚的快速標(biāo)注</p><p>　　以下是房產(chǎn)測量草圖墻厚自動生成的程序：</p><p>　　;※※※※※※※※※※※※※※※(程序[注墻厚])※※※※※※</p><p>　　(defun

91、c:QQ (/ sss plt dist text ent1 ent2)</p><p>　　(while (setq sss (ssget (list (cons 0 "LINE"))))</p><p>　　(setq plt (cadr (grread t 2 2)))</p><p>　　(setq dist (distance (v

92、lax-curve-getclosestpointto</p><p>　　(vlax-ename->vla-object (ssname sss 0))</p><p><b>　　plt</b></p><p><b>　　)</b></p><p>　　(vlax-curve-getcl

93、osestpointto</p><p>　　(vlax-ename->vla-object (ssname sss 1))</p><p><b>　　plt</b></p><p><b>　　)</b></p><p><b>　　)</b></p>

94、<p><b>　　)</b></p><p>　　(setq text (rtos (* 100 dist) 2 0))</p><p>　　(if(< dist 0.1)</p><p>　　(setq pt1 (list (- (car plt) 0.083) (- (cadr plt) 0.125)))</p&g

95、t;<p>　　(setq pt1 (list (- (car plt) 0.235) (- (cadr plt) 0.175)))</p><p><b>　　)</b></p><p>　　(entmake (list '(0 . "CIRCLE")</p><p>　　(cons 10 plt)&

96、lt;/p><p>　　'(40 . 0.4)</p><p>　　'(8 . "數(shù)據(jù)注記")</p><p><b>　　)</b></p><p><b>　　)</b></p><p>　　(entmake (list '(0 .

97、 "TEXT")</p><p>　　'(8 . "數(shù)據(jù)注記")</p><p>　　(cons 10 pt1)</p><p>　　'(40 . 0.35)</p><p>　　(cons 1 text)</p><p>　　'(8 . "數(shù)據(jù)

98、注記")</p><p><b>　　)</b></p><p><b>　　)</b></p><p><b>　　)</b></p><p><b>　　)</b></p><p>　　4.2.2房產(chǎn)測量草圖權(quán)屬面積的

99、獲取</p><p>　　;※※※※※※※※※※※※※※※(程序一[求單元面積])※※※※※※※</p><p>　　(defun c:MJ ()</p><p>　　(setvar "CLAYER" "說明注記")</p><p>　　(setvar "CECOLOR" "

100、;Bylayer")</p><p>　　(setvar "CELTYPE" "Continuous")</p><p>　　(setq pt (getpoint "\n請選定注記位置:"))</p><p>　　(setq pt (polar pt 1.5707963267948966192 1

101、))</p><p>　　(while (setq ss (ssget '((0 . "LWPOLYLINE"))))</p><p><b>　　(progn</b></p><p>　　(setq n 0)</p><p>　　(setq pt (polar pt 1.5707963267

102、948966192 -1.0))</p><p>　　(repeat (sslength ss)</p><p>　　(setq name(ssname ss n))</p><p>　　(setq e(entget name))</p><p>　　(setq e1(cdr(assoc 6 e)))</p><p>

103、　　(command "area" "o" name)</p><p>　　(setq m(getvar "area"))</p><p>　　(if (or (= e1 "6") (= e1 "DASHED") (= e1 "DASHED2")) (setq m(/ m

104、 2)))</p><p>　　(setq qh (strcase(getstring "\n請輸入單元號:")))</p><p>　　(command ".text" "S" "STANDARD" (polar pt 0 (* 5 n)) 0.5 "0" (strcat qh "

105、;=" (rtos m 2 3)))</p><p>　　(setq n(1+ n))</p><p><b>　　)</b></p><p><b>　　)</b></p><p><b>　　)</b></p><p><b>　

106、　)</b></p><p>　　4.2.3房產(chǎn)測量草圖開門程序設(shè)計(jì)</p><p>　　;※※※※※※※※※※※※※※※(程序五[開門])※※※※※※※※</p><p>　　(defun c:KM ()</p><p>　　(command "OSNAP" "NONE")</p&g

107、t;<p>　　(setvar "CLAYER" "房屋層")</p><p>　　(command "layer" "off" "數(shù)據(jù)注記" "off" "權(quán)屬層" "off" "說明注記" "off"

108、; "0" "off" "22"</p><p>　　setvar "CECOLOR" "Bylayer")</p><p>　　(setvar "CELTYPE" "Continuous")</p><p>　　(setq a

109、4(getpoint"\n第一點(diǎn)："))</p><p>　　(setq b4(getpoint"\n第二點(diǎn)："))</p><p>　　(setq ss(ssget "_C" a4 b4))</p><p>　　(setq a (entget(ssname ss 0)))</p><p

110、>　　(setq b (entget(ssname ss 1)))</p><p>　　(setq a1(cdr(assoc 10 a)))</p><p>　　(setq a2(cdr(assoc 11 a)))</p><p>　　(setq b1(cdr(assoc 10 b)))</p><p>　　(setq b2(cdr(a

111、ssoc 11 b)))</p><p>　　(setq a3(polar a4 (+ 4.7123889803846898 (angle a1 a2)) 20))</p><p>　　(setq a4(polar a4 (+ 1.5707963267948966 (angle a1 a2)) 20))</p><p>　　(setq b3(polar b4 (+

112、1.5707963267948966 (angle b1 b2)) 20))</p><p>　　(setq b4(polar b4 (+ 4.7123889803846898 (angle b1 b2)) 20))</p><p>　　(setq m1(inters b1 b2 b4 b3))</p><p>　　(setq m2(inters a1 a2 b4

113、b3))</p><p>　　(setq n1(inters a1 a2 a4 a3))</p><p>　　(setq n2(inters b1 b2 a4 a3))</p><p>　　(command "break" m1 n2)</p><p>　　(command "break" n1 m2)

114、</p><p>　　(command "line" m1 m2 "")</p><p>　　(command "line" n1 n2 "")</p><p>　　(command "layer" "ON" "數(shù)據(jù)注記" &q

115、uot;ON" "權(quán)屬層" "ON" "說明注記" "ON" "0" "ON" "22"</p><p>　　command "osmode" "129")</p><p><b>　　)&l

116、t;/b></p><p><b>　　5結(jié)論</b></p><p>　　隨著社會的發(fā)展，房產(chǎn)測量的重要性在日常生活中越來越被人們關(guān)注。房產(chǎn)測量成果質(zhì)量直接影響到人們的日常生活的正常運(yùn)轉(zhuǎn)。尤其是現(xiàn)在房產(chǎn)測量單位的日益增多，對于房產(chǎn)測量工作的要求是各有不同，但是萬變不離其宗，不管我們用何方法進(jìn)行房產(chǎn)測量，都必須遵守以事實(shí)為依據(jù)的原則，這樣才能保證房產(chǎn)測量成果的真