資源描述：
《編程實(shí)例清華CAD二次開發(fā)LISP.ppt》由會員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、第8章編程實(shí)例8.1設(shè)置作圖環(huán)境編程作圖和交互作圖一樣，也需要設(shè)置作圖的環(huán)境，例如圖紙的范圍、繪圖的單位、目標(biāo)捕捉的類型、圖層、顏色、線型、線寬、字樣等，如果缺少對作圖環(huán)境的設(shè)置，只能是利用加載程序時(shí)AutoCAD提供的默認(rèn)環(huán)境。設(shè)置一個(gè)合適的作圖環(huán)境不僅可以提高作圖的精度和效率，有時(shí)還會影響到所繪制的圖紙是否符合企業(yè)的規(guī)范和滿足生產(chǎn)的需要。用程序?qū)崿F(xiàn)設(shè)置作圖環(huán)境的功能可以通過command函數(shù)調(diào)用相關(guān)的命令，或者通過setvar函數(shù)改變相應(yīng)系統(tǒng)變量的當(dāng)前值或當(dāng)前狀態(tài)。有些功能只能通過上述一種途徑實(shí)現(xiàn)，有些功能可以通過上述兩種途徑實(shí)現(xiàn)。1.設(shè)置圖紙的范圍例如設(shè)置A3圖紙的作圖范
2、圍（1）通過command函數(shù)設(shè)置圖紙的范圍(command"limits""0,0""420,297")或者(command"limits"'(00)'(420297))或者(command"limits"(list00)(list420297))這時(shí)p1、p2分別是作圖范圍的左下和右上角點(diǎn)，上式可改寫為：(command"limits"p1p2)0,0420,297（2）通過setvar函數(shù)設(shè)置圖紙的范圍系統(tǒng)變量limmin和limmax分別對應(yīng)于圖紙的左下和右上角點(diǎn)，只需用setvar函數(shù)設(shè)置它們以新的值即可。(setvar"limmin"'(00))或者(setvar"
3、limmin"(list00))或者(setvar"limmin""0,0")或者(setvar"limmin"p1)設(shè)置圖紙的右上角點(diǎn)的表達(dá)式如下：(setvar"limmax"'(420297))或者(setvar"limmax"(list420297))或者(setvar"limmax""420,297")或者(setvar"limmax"p2)2.設(shè)置繪圖的長度和角度單位例如將繪圖的長度單位設(shè)置為十進(jìn)制、3位小數(shù)，角度單位設(shè)置為十進(jìn)制的度（?）十進(jìn)制、2位小數(shù)、X軸正方向?yàn)??、逆時(shí)針方向?yàn)檎?。?）通過command函數(shù)設(shè)置繪圖的長度和角度單位(command"uni
4、ts"23120"N")command的參數(shù)說明如下：units：AutoCAD設(shè)置繪圖單位的命令；2：長度單位為十進(jìn)制；3：3位小數(shù)；1：角度單位為十進(jìn)制的度；2：2位小數(shù)；0：X軸正方向?yàn)??；N：非順時(shí)針，即逆時(shí)針為正。（2）通過setvar函數(shù)設(shè)置設(shè)置繪圖的長度和角度單位(setvar"lunits"2)；長度單位為十進(jìn)制(setvar"luprec"3)；長度單位3位小數(shù)(setvar"aunits"1)；角度單位為十進(jìn)制的度(setvar"auprec"2)；角度單位為長2位小數(shù)(setvar"angbase"0.0)；X軸正方向?yàn)??(setvar"angdir"
5、0)；逆時(shí)針方向?yàn)檎?.設(shè)置目標(biāo)捕捉的類型交互操作時(shí)，目標(biāo)捕捉類型的選項(xiàng)是字符串，它以編碼的形式記錄在系統(tǒng)變量osmode內(nèi)，代碼的具體含義是：0：NONe（不標(biāo)捕捉任何類型的對象）1：ENDpoint（線段和圓弧的端點(diǎn)）2：MIDpoint（線段和圓弧的中點(diǎn)）4：CENter（圓、橢圓和圓弧的中心點(diǎn)）ENDpointMIDpointCENter8：NODe（結(jié)點(diǎn)，用point命令生成的點(diǎn)）16：QUAdrant（圓和圓弧的象限點(diǎn)）32：INTersection（線段和圓弧的交點(diǎn)）NODeQUAdrantINTersection64：INSertion（圖塊或字符串的插入點(diǎn)）1
6、28：PERpendicular（垂足）INSertionPERpendicular256：TANgent（切點(diǎn)）512：NEArest（對象上的最近點(diǎn)）1024：QUIck（快速捕捉）2048：APParentIntersection（在觀察方向上相交的點(diǎn)）4096：EXTension（延長線上的點(diǎn)）8192：PARallel（與所選對象平行的點(diǎn)）TANgentAPParentIntersectionEXTensionPARallel（1）通過command函數(shù)設(shè)置設(shè)置目標(biāo)捕捉的類型(command"osnap""endpoint,midpoint,center")；捕捉端點(diǎn)
7、、中點(diǎn)和中心(command"osnap""none")；不捕捉任何類型（2）通過setvar函數(shù)設(shè)置目標(biāo)捕捉的類型(setvar"osmode"7)；7是捕捉端點(diǎn)、中點(diǎn)和中心的代碼之和(setvar"osmode"0)；不捕捉任何類型將osmode設(shè)置為0（不捕捉任何類型）是通常的設(shè)置。假定osmode的當(dāng)前值為1，將捕捉直線或圓弧的端點(diǎn)。在這種情況下，如果指定的是p點(diǎn)，而p點(diǎn)處剛好有一條直線，那么實(shí)際獲取的是該直線距p點(diǎn)較近的那個(gè)端點(diǎn)，而不是p點(diǎn)本身。所以應(yīng)該用setvar函數(shù)將osmo
