Re: [問題] 請問要怎麼畫出愛心的圖案?

看板Cad_Cae (電腦輔助設計)作者 (漱石)時間19年前 (2005/11/03 09:12), 編輯推噓1(101)
留言2則, 1人參與, 最新討論串3/4 (看更多)
※ 引述《sjgau (sjgau)》之銘言: : http://myblog.pchome.com.tw/_/myblog/?blog_id=sjgau&y=2005&m=09&an=11726&acn=3247 : (setvar "cmdecho" 0) : ; plot r= G(theta) : ; r=a(1-sinθ) : (setq a 2.5) : (setq no (getint "Please input no= ")) : (setq t1 (* -1 pi) : t2 (* +1 pi) : dt (/ (- t2 t1) no) : t2 (+ t2 (* 0.1 dt)) : ) : ; for theta= t1 to t2 step dt do ... : ; dt= (t2 - t1)/no : ; no= ? : (command "PLINE") : (setq theta t1) : (while (< theta t2) : ; // r=a(1-sinθ) : (setq r (* a (- 1.0 (sin theta)))) : (setq x (* r (cos theta)) : y (* r (sin theta)) : ) : (setq p1 (list x y)) : (command p1) : (setq theta (+ theta dt)) : ) : (command "") : (princ) : 那麼請問該如何呼叫出 AutoCAD自動畫函數圖形的程式? 3D圖案是否也是用函數建立會比較好看呢? 謝謝指教! -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.164.1.3

11/03 10:03, , 1F
case by case, 屬於上帝的歸上帝,屬於魔鬼的歸魔鬼
11/03 10:03, 1F

11/03 10:04, , 2F
(load "test.lsp")
11/03 10:04, 2F
文章代碼(AID): #13QMGRB3 (Cad_Cae)
文章代碼(AID): #13QMGRB3 (Cad_Cae)