[建筑]lisp語言在cad道路設(shè)計(jì)中的各種應(yīng)用-預(yù)覽頁
【正文】 但對于不同的曲線，則需編寫同的AutoLISP程序，檢查無誤后才能運(yùn)行，仍顯繁瑣。在AutoCAD繪圖軟件中，可以將曲線上的點(diǎn)先計(jì)算好，再用線、多義線、樣條曲線等方法繪制，這種方法需要進(jìn)行大量計(jì)算，工作量較大，如果用EXCEL軟件來輔助計(jì)算，可以減輕工作量；另外，可以針對具體的曲線類型，用AutoCAD內(nèi)嵌的AutoLISP語言，實(shí)現(xiàn)邊計(jì)算邊繪制的功能。其中，只需增加一個(gè)平凡方程x=x,參數(shù)方程（2）就可以包括相應(yīng)的直接表達(dá)形式（1），同樣（4）可以包括（3）。若給出的點(diǎn)間隔很小，直接用折線段相連就可很好模擬該曲線，如果間隔較大，可以用樣條曲線連接，使之比較光滑?？梢钥紤]從外部輸入表達(dá)式，然后針對該表達(dá)式進(jìn)行計(jì)算，給出相應(yīng)結(jié)果，就能夠解決點(diǎn)坐標(biāo)的計(jì)算問題。由于該函數(shù)不是LISP內(nèi)部函數(shù)，為使之可用，或者在命令行先輸入CAL命令，由系統(tǒng)自動(dòng)載入，這樣，程序中就可以使用該函數(shù)了。=f(x)的曲線繪制直角坐標(biāo)下繪制函數(shù)曲線y=f(x)定義為AutoLISP子程序curve1，該子程序沒有傳入傳出參數(shù)?？梢詫⒌玫降淖鴺?biāo)值轉(zhuǎn)換為字符串，再用角度符號“”連接起來，輸入到命令行。在改變方向處，相鄰兩直線間要求用曲線連接起來，以保證行車順暢安全這種曲線稱平面曲線。由于緩和曲線上各點(diǎn)的曲率半徑及圓心均為變數(shù)，所以在繪制線路平面圖時(shí)，利用繪圖工具無法準(zhǔn)確、有效地繪制出緩和曲線。圖2（b）是沒有加設(shè)緩和曲線的圓曲線。點(diǎn)；HY——緩圓點(diǎn)，即緩和曲線與圓曲線的分界點(diǎn)；QZ——曲中點(diǎn)，即圓曲線的中點(diǎn)；YH——圓緩點(diǎn)，即圓曲線與緩和曲線的分界點(diǎn)；HZ——緩直點(diǎn)，即緩和曲線與直線的分界點(diǎn)；JD——兩直線延長線的交點(diǎn)。它們的關(guān)系為由于緩和曲線的曲率半徑ρ從直線的曲率半徑∝（無窮大）逐漸變化到圓曲線的曲率半徑R，在曲線上任一點(diǎn)P的曲率半徑ρ與曲線的長度l成反比，如圖3所示，以公式表示為式中C為常數(shù)，稱曲率半徑變更率。p——圓曲線移動(dòng)量，即垂線長與圓曲線半徑R之差。為了根據(jù)方程式計(jì)算緩和曲線上的點(diǎn)的坐標(biāo)并繪制緩和曲線，需要使AutoCAD的坐標(biāo)系與緩和曲線的坐標(biāo)系重合。于是可以利用緩和曲線方程式，計(jì)算緩和曲線上的點(diǎn)的坐標(biāo)，并利用樣條曲線命令將各點(diǎn)連成光滑的曲線。計(jì)算緩圓點(diǎn)的坐標(biāo)(mand ucs _z ( 0 alpha))(mand ucs or (list ( 0 TL) 0))(setq L 0.)(mand spline)(while ( L L0) (setq L2 (* L L) L5 (* L2 L2 L))(setq x ( L (/ L5 (* 40 R R L0 L0))) y (/ (* L2 L) (* 6 R L0)))(mand (list x y)) (setq L (+ L 5)) )(setq x x0 y y0 p0 (list x y))(mand )(setq hhqx1 (ssget L))圓曲線為部分圓弧，可以用畫圓弧命令中的“三點(diǎn)式”來繪制。計(jì)算圓緩點(diǎn)的坐標(biāo)(setq p3 (list hyx hyy) p2 (list qzx qzy) p1 (list yhx yhy)) (mand arc p1 p2 p3)。由于緩和曲線的坐標(biāo)位置是通過高次方程計(jì)算得來，具有非線性的特點(diǎn)，因此很難在圖紙上繪制出準(zhǔn)確的位置。 AutoLISP程序開發(fā)思路根據(jù)帶緩和曲線的鐵路曲線特點(diǎn)，本著為使用者創(chuàng)造一個(gè)良好的人機(jī)交互環(huán)境，本程序在每一個(gè)步驟都設(shè)計(jì)了文字提示，用戶只需按照AutoCAD文本框中的提示輸入已知參數(shù)，就能完成整個(gè)繪制過程。以ZH（或HZ）為坐標(biāo)原點(diǎn)，切線為x軸，垂直切線方向?yàn)閥軸：鐵路線路由于受地形、地物或其他因素的限制,往往需要改變方向。在手工繪圖時(shí)代,曲線采用標(biāo)有半徑的曲線板和直尺畫出,誤差很大,但在計(jì)算機(jī)繪圖時(shí)代,經(jīng)常需要精確地繪出線路的圓曲線和緩和曲線,以便準(zhǔn)確地算出線路中心至地面上某點(diǎn)的距離以及復(fù)線地段兩條曲線間的距離,這對于選線和優(yōu)化設(shè)計(jì)有很重要的作用。利用測量得出數(shù)據(jù)1點(diǎn)坐標(biāo)X=，Y=；2點(diǎn)坐標(biāo)X=，Y=；3點(diǎn)坐標(biāo)X=，Y=；4點(diǎn)坐標(biāo)X=，Y=；5點(diǎn)坐標(biāo)X=，Y=。而AutoCAD中的真樣條曲線最接近公路平曲線的形狀，在常用比例尺的情況下，肉眼分辨不出兩者在圖紙上的區(qū)別，所以我們采用真樣條曲線命令Spline繪制緩和曲線。繪制步驟如下：命令：_pline指定起點(diǎn)：，指定下一個(gè)點(diǎn)或〔圓?。ˋ）/半寬（H）/長度（L）/放棄（U）/寬度（W）〕：，指定下一個(gè)點(diǎn)或〔圓弧（A）/閉合（C）/半寬（H）/長度（L）/放棄（U）/寬度（W）〕：，結(jié)束后得到圖1中的ABC折線。到此我們已把含緩和曲線的平曲線部分繪制完成。③把對象捕捉模式中的垂足捕捉模式和結(jié)點(diǎn)捕捉模式選中。以上事例為AutoCAD在公路設(shè)計(jì)中的一個(gè)例子，我們應(yīng)該更加努力的去思考和研究如何利用CAD去解決公路設(shè)計(jì)中的現(xiàn)實(shí)問題。Visual lisp是由Autodesk公司開發(fā)的一種lisp程序語言,Visual lisp功能非常強(qiáng)大,除了本身提供豐富的功能函數(shù)外,還可以使用Activex進(jìn)行組件方式的編程,充分使用第三方所提供的Activex,使得Visual lisp幾乎是無所不能,如可以進(jìn)行數(shù)據(jù)庫訪問、生成Word文檔、Excel報(bào)表等等。原斷面數(shù)。H 為現(xiàn)斷面的循環(huán)數(shù)。（2）自動(dòng)加載方式：在啟動(dòng)CAD時(shí)自動(dòng)加載。
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號-1