Re: 叫AutoCAD畫sin- 函數圖形的程式

看板Cad_Cae (電腦輔助設計)作者 (sjgau)時間16年前 (2008/08/29 10:02), 編輯推噓1(101)
留言2則, 2人參與, 最新討論串3/5 (看更多)
叫 AutoCAD 自動畫 y= sin(x) 函數圖形的程式, 你可以改 no, x1, x2 你也可以改 sin(x) --> 變成你 想要的任何函數, 如果你不會改,我可以免費幫你。 如果你想要學 AutoLISP 程式設計, 我可以免費 教你。 透過 e-mail 或是 meeting 教你 e-mail: sjgau4311@gmail.com ; file name: d:\plot-sin.lsp ; plot y= f(x) 的函數圖形 ; x= x1 to x2 step dx do ... ; dx= (x2 - x1)/no ; no= ???, 以下為設定 16個等分 (setq no 16) ; 以下為設定 x1, x2, dx= ??? (setq x1 0 x2 pi) (setq dx (/ (- x2 x1) no)) ; 為了避免浮點數的運算誤差,導致最後一個點被忽略, ; 必須把 x2 往外面推出去 一點點 ; x2= x2 + 0.1*dx (setq x2 (+ x2 (* 0.1 dx))) (command "spline") ; for x= x1 to x2 step dx do ... (setq x x1) (while (<= x x2) ; plot y= sin(x) 的函數圖形 (setq y (sin x)) (command (list x y)) (setq x (+ x dx)) ); end while (command "" "" "") (princ) ; end of file -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 118.231.24.58

08/31 01:01, , 1F
高老師....推
08/31 01:01, 1F

08/31 11:07, , 2F
謝謝 我上課的時候 只花一個小時 就讓完全沒有經驗的人學會
08/31 11:07, 2F
文章代碼(AID): #18jrYqIu (Cad_Cae)
文章代碼(AID): #18jrYqIu (Cad_Cae)