cad怎么画二次抛物线 _cad

首先用lisp函数做辅助线，再将辅助线的端头用多段线链接，然后再编辑多段线，把多段线拟合操作，将得到完整的二次抛物线。

文章插图

需要这些哦
cad
autolisp
方式/
1(defun c:ecpwx()
(setq i 0)
(setq a 2.0)
(setq b 3.0)
(setq c 4.0)
(setq x (* (/ b (* a 2.0)) -1.0))
(setq y (+ (* a x x) (* b x) c))
(setq pt0 (list x y))
(while (< i 15)
(setq x (+ x 0.5))
【cad怎么画二次抛物线】 (setq y (+ (* a x x) (* b x) c))
(setq ptn (list x y))
(setq i (1+ i))
(command "pline" pt0 ptn "")
)
(princ)
)
假设二次抛物线函数为y=ax^2+bx+c ，示例函数取值a=2,b=3,c=4 ，每一个点x增量为0.5 ， i值暗示轮回次数， i取值为小于15的0-14之间的次数，暗示辅助线总共画了15条，按照需要可自行更改，然后将函数加载到cad 。