方法一:
1.在excel生成座標x,y列;x為分段值控制曲線精度,y為公式計算的對應值;
2.假定excel中x數值在a列,y數值在b列,生成acad的pline繪圖資料,方法如下:
(1)在新的列單元(如c列)輸入公式:=an&","&bn(n為資料的行號),按次辦法將an及bn單元格中的資料在cn單元格中形成(x,y)的形式。關鍵是生成逗號。
(2)拷貝cn的公式(cn單元格按ctrl拖動),形成繪圖資料列。
(3)拷貝繪圖資料列(c列中的資料)。
3.在acad中執行pline命令,輸入pl回車後的命令列處按滑鼠的右鍵,選貼上命令,將從excel中拷貝的資料貼上到此處。
4.完成(pl命令按x1,y1...x2,y2...xn,yn的形式繪製曲線。)
方法二:
直接畫,先三點畫一水平pline線,起、終對應拋物線端點,其中間點高為2倍拋物線的矢高即2f,同時將cad的splintype引數設為5。對該plnie進行編輯,選擇spline項,生成的pline曲線即為您要的拋物線。注意,為了精度,可將splinesegs引數調高。
方法三:
(defun c:pwx ()
(setq pt1 (getpoint"\nthe first point, please"))
(setq pt2 (getpoint"\nthe second point,please"))
(setq pt3 (getpoint"\nthe third point,please"))
(setq n (getdist "\nsegment number"))
(setq f (open "pwx.inp" "w"))
(print (car pt1) f)
(print (cadr pt1) f)
(print (car pt2) f)
(print (cadr pt2) f)
(print (car pt3) f)
(print (cadr pt3) f)
(print fdx f)
(close f)
(command "shell" "pwx")
(setq f (open "pwx.dat" "r"))
(setq a (atof (read-line f)))
(setq b (atof (read-line f)))
(setq c (atof (read-line f)))
(close f)
(setq dx (- (car pt3) (car pt1)))
;(setq n (fix (/ (+ (abs dx) 0.5) fdx)))
(setq ddx (/ dx n))
(command "pline" pt1)
(setq i 1)
(while (<= i n)
(setq x (+ (car pt1) (* ddx i)))
(setq y (+ (* a x x) (* b x) c))
(setq pt (list x y))
(command pt)
(setq i (1+ i))
(command "")
(defun break (message / loop)
(princ message) (setq loop t)
(while loop (princ "\n>:")
(setq query (read-line)) (if (/= query "")
(princ (eal (read query))) (setq loop nil)
) (princ)
評分
拋物線交點式公式 拋物線公式大全
拋物線方程是指拋物線的軌跡方程,是一種用方程來表示拋物線的方法。在幾何平面上可以根據拋物線的方程畫出拋物線。拋物線在合適的座標變換下,也可看成二次函式影象。拋物線方程公式 一般式 ax2 bx c a b c為常數,a 0 頂點式 y a x h 2 k a h k為常數,a 0 交點式 兩根式 y...
android 拋物線動畫
拋物線動畫 根據拋物線方程式得出x軸,y軸的座標 x,y 再根據動畫使其移動,就完成乙個簡單的軌跡動畫.實現思路 自定義個view,隨著x軸的水平移動根據拋物線方程得到y軸的值,利用path畫出一條軌跡 在高出這條拋物線小人的高度再畫一天拋物線,這條拋物線就是小人的運動軌跡。直接上 自定義view ...
拋物線的精靈
拋物線 msprite 需要做拋物線的精靈 startpoint 起始位置 endpoint 中止位置 dirtime 起始位置到中止位置的所需時間 void movewithparabola ccsprite msprite startp cgpoint startpoint endp cgpoi...