h199101 发表于 2013-4-18 17:36:00

新手 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 "")
)

h199101 发表于 2013-4-18 17:38:37

y=x^2理论上应该(1,1)(2,4)。。。。。。(10,100) 可是查询了点坐标 只发现首尾两个点是正确的想不通啊 求大神指导

ll_j 发表于 2013-4-18 19:53:01

你把捕捉关掉试试。
页: [1]
查看完整版本: 新手 cadlisp的 有个问题 在线等大神指导