實(shí)驗(yàn)報(bào)告格式

1、預(yù)習(xí)分操作分報(bào)告分總成績實(shí) 驗(yàn) 報(bào) 告學(xué) 號 姓 名 同 組 者 實(shí)驗(yàn)名稱 Autolisp 道路工程輔助設(shè)計(jì) 指導(dǎo)老師 班 級 實(shí)驗(yàn)日期 實(shí)驗(yàn)報(bào)告具體內(nèi)容一般應(yīng)包括：一、實(shí)驗(yàn)?zāi)康暮鸵?二、實(shí)驗(yàn)原理;三、主要儀器設(shè)備(軟件);四、實(shí)驗(yàn)內(nèi)容及實(shí)驗(yàn)數(shù)據(jù)記錄;五、實(shí)驗(yàn)數(shù)據(jù)處理與分析;六、問題與建議一、 實(shí)驗(yàn)?zāi)康倪M(jìn)行道路平曲線設(shè)計(jì)，根據(jù)設(shè)計(jì)結(jié)果進(jìn)行Autolisp圖形繪制。二、 實(shí)驗(yàn)內(nèi)容根據(jù)單交點(diǎn)平曲線設(shè)計(jì)計(jì)算公式進(jìn)行平曲線設(shè)計(jì)并繪圖。算例：某公路曲線偏角實(shí)測為30o47'28''，為保證曲線內(nèi)側(cè)一樓房不拆除，需控制曲線外距不大于8m。按預(yù)先選定緩和曲線長40m的要求進(jìn)行平曲

2、線設(shè)計(jì)計(jì)算與繪圖（AutoLisp 編程根據(jù)逐樁坐標(biāo)計(jì)算僅繪制局部坐標(biāo)系下第一回旋曲線段和圓曲線段，參考教材p106）。三、 實(shí)驗(yàn)儀器、設(shè)備及材料數(shù)字計(jì)算機(jī)，AutoCAD繪圖軟件。四、實(shí)驗(yàn)內(nèi)容及實(shí)驗(yàn)數(shù)據(jù)記錄 、已知下列示意圖：、實(shí)驗(yàn)步驟編輯此程序如下：(defun c:QX(/ a E Ls l x y) (setq a (getangle "n Enter angle:") (setq E (getdist "n Enter distance:") (setq Ls (getdist "n Enter distance:") (s

3、etq A (- (/ 1.0000 (cos (/ a 2.0000) 1) (setq B (- 0 E) (setq C (* (/ 1.0000 (cos (/ a 2.0000) (/ (* Ls Ls) 24) (setq R (/ (+ (- 0 B) (sqrt (- (* B B) (* 4.0000 A C) (* 2.0000 A) (setq l 2) (setq P1 (list 0 0) (while (<= l 40) (setq x (- l (/ (* l l l l l) (* (* 40 R R) (* Ls Ls) (setq y (/ (* l l l) (* 6.0000 R Ls) (setq P2 (list x y) (Command "LINE" P1 P2 "") (setq l (+ l 2) (setq P1 (list x y) ) )、在CAD軟件通過繪圖，得出實(shí)驗(yàn)結(jié)果，圖形如下所示五、實(shí)驗(yàn)數(shù)據(jù)處理與分析 無數(shù)據(jù)處理六、