菜鸟请教！这是咋了。

okldp

<BR>                         (command "line" '(929649.0 7150.25 0.0) '(935556.0 7150.25 0.0) "")<BR>                         (command "line" '(935556.0 10650.2 0.0) '(929649.0 10650.2 0.0) "")<BR>                         (command "line" '(929649.0 7150.25 0.0) '(929649.0 10650.2 0.0) "")


以上点的坐标第一点是inters函数得到的 其他点是通过polar函数得到的。从坐标值看是能画成直线的


但当文件中图形很多时便画不直了（当图形少时能画直）。不知何故？？？？？？？

lzy9788

你把你的程序传上来了

秋枫

可能是你没有把OSMODE系统变量关掉。或者可以这样：

2. (command "line" "non" '(929649.0 7150.25 0.0)   "non" '(935556.0 7150.25 0.0) "")
3. (command "line" "non" '(935556.0 10650.2 0.0)  "non" '(929649.0 10650.2 0.0) "")
4. (command "line" "non" '(929649.0 7150.25 0.0) "non" '(929649.0 10650.2 0.0) "")

(command "line" "non" '(929649.0 7150.25 0.0)   "non" '(935556.0 7150.25 0.0) "") (command "line" "non" '(935556.0 10650.2 0.0)  "non" '(929649.0 10650.2 0.0) "") (command "line" "non" '(929649.0 7150.25 0.0) "non" '(929649.0 10650.2 0.0) "")

okldp

还真的行，多谢秋枫         多谢！ 不过我还有点不明白的         就是那些交点全是由函数得到的怎么会和捕捉有关系？？ 那个“non”表示什么？？请赐教！！

ljcgq

这个问题我也同样请教过，哈哈那是在选点时中止捕捉。 (setq os(getvar "osmode"))(setvar "osmode" 0) (command "line" '(929649.0 7150.25 0.0) '(935556.0 7150.25 0.0) "")
(command "line" '(935556.0 10650.2 0.0) '(929649.0 10650.2 0.0) "")
(command "line" '(929649.0 7150.25 0.0) '(929649.0 10650.2 0.0) "")(setvar "osmode" os)

可惜你不在

我想要一个减速器上齿轮和轴的绘图程序（LISP）
齿轮只要简单的直齿轮就行了
希望得到各位的帮助，谢谢

xhf

因为捕捉的优先级比较高，我原来也碰到过相同的情况，也是在这里得到MEFLYING斑竹帮助解决的。