我了解他的意思和 需求，
因為，我真的畫過工程圖。
(defun dtor(d1 / )
(* (/ d1 180.0) pi)
); end of dtor()
; -----------------------------------------------
; draw a arc by CDR, C:圓心，D:方向, R:半徑
(defun c:arc-cdr( / pc p1 t1 t2 t3 p2 p3)
(setq pc (getpoint "\n 弧的圓心: "))
(setq p1 (getpoint "\n 大概的方向: "))
(setq t1 (angle pc p1))
(setq r1 (getdist "\n 輸入兩點 決定半徑: "))
(setq t2 (+ t1 (dtor 15.0)))
(setq t3 (- t1 (dtor 15.0)))
(setq p2 (polar pc t3 r1))
(setq p3 (polar pc t2 r1))
(setq p1 (polar pc t1 r1))
(command "arc" p2 p1 p3)
(princ)
); end of c:arc-cdr
※ 引述《zerod (雷洛德)》之銘言：
: 自己在利用autocad練習製圖實習的應用幾何時
: 常常卡在要利用某一線段長度來畫弧
: 不知道有沒有其他方法可以在設定直徑及半徑時
: 直接參考或抓取線段長度來畫圓或畫弧
: 謝謝
--
e-mail: sjgau4311@gmail.com
我的課程介紹網頁：
http://www.csie.ntu.edu.tw/train/teacher_display.php?num=18
AutoCAD 台灣地區菁英講師獲選
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.83.7.107