坐标表
基于此lisp,我想添加另一个选项,该选项将允许我根据单击圆的顺序输出圆的坐标,或者为其提供多段线上点的坐标nf(不一定是圆)目前,lisp仅通过“X到X+”或“Y到Y+”返回圆或点的坐标
我没有太多的编码经验,非常感谢您的帮助
PcT 25.02.2012 XY-副本。Lsp 您正在寻找两个或三个选项,但在一个程序中,重新输出到屏幕上的一个框、一个表或一个文件,例如csv。
这适用于pline pts
普林公司。lsp
你可以用几种方法一个接一个地拾取圆,以获得顺序。在拾取顺序中使用ssget“F”选项增益,或者只拾取任意数量的圆。
粗略地添加圆
(setq clst '() )
(while (/= (setq cenpt (cdr (assoc 10 (entget (car (entsel "\npick circle")))))) nil)
(setq clst (cons cenpt clst))
)
(princ clst)
谢谢你,比加尔。
我需要重新输出到屏幕上的一个框中。
我更喜欢pline选项,而不是选择圆形。
无论如何,有没有改变Lisp程序,我发送的会做吗?
我喜欢lisp中的主要内容是,如果你移动圆,它会自动更新坐标。 现在理解你的问题,你想使用字段和可能的表格,这是一项任务。我想如果你在谷歌上搜索一下,你就能找到你想要的东西,我手头什么都没有。你能发布dwg或图像吗?这可能有助于别人给出解决方案。
页:
[1]