新手 cadlisp的 有个问题 在线等大神指导
看一下这代码 是画抛物线的 可是为什么cad画出来的却有问题 哪里有问题啊(defun c:ddf (/ p0 p1 xx mm yy)
(setq xx 0 mm 0)
(setq p0 (list xx mm))
(command "pline")
(repeat 10
(setq xx (+ xx 1))
(setq yy (* xx xx))
(setq p1 (list xx yy))
(command p0 p1)
(setq p0 p1)
)
(command "")
) y=x^2理论上应该(1,1)(2,4)。。。。。。(10,100) 可是查询了点坐标 只发现首尾两个点是正确的想不通啊 求大神指导 你把捕捉关掉试试。
页:
[1]