autolisp 总是提示“警告: 内置符号的重定义: T”“参数类型错误: numberp: nil”
平面凸轮,我就想画一个120度的基圆圆弧,但是下面的程序一直不对。(setqt0rb120)(while(<=t120)(setqx2(+x0(*rb(cos(/(*t3...
平面凸轮,我就想画一个120度的基圆圆弧,但是下面的程序一直不对。
( setq t 0 rb 120)
( while (<= t 120)
( setq x2 (+ x0 (* rb (cos(/(* t 3.14159)180)))))
( setq y2 (+ y0 (* rb (sin(/(* t 3.14159)180)))))
( command " line "( list x1 y1)(list x2 y2) " " )
( setq x1 x2
y1 y2
t (1+ t))) 展开
( setq t 0 rb 120)
( while (<= t 120)
( setq x2 (+ x0 (* rb (cos(/(* t 3.14159)180)))))
( setq y2 (+ y0 (* rb (sin(/(* t 3.14159)180)))))
( command " line "( list x1 y1)(list x2 y2) " " )
( setq x1 x2
y1 y2
t (1+ t))) 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询