将中心对准tw

magan · 发表于 2022-7-5 18:58:00

非常感谢，先生。。。。。。。。。。。。。。。。。。。。。。。
真是难以置信。我已经试了很多天了。非常感谢。

但是，当它在某些计算机的其他绘图中打开时，它只会分解整个几何体，并说：糟糕的论点，
我面临的第二个问题是，有时它会重复结果，并将其作为圆圈计算。例如，对于实体中的3个孔，is显示8个圆。先生，请在这方面帮助我。

hanhphuc · 发表于 2022-7-5 19:03:30

这种单击方法的缺点
1.ssget道口可能会收集其他物品。
2、分解后的实体包含许多物体，可能看起来像一个圆，也可能是一个椭圆？
3、我们不能保证圆是正确的孔位。

我不确定重复的结果。错误的参数等。。
可以附着图形。另存为2007更通用

备注：如果孔不是攻丝器，可以尝试bpoly方法单击孔，然后ssget。
这样会更准确，也可以收集到矩形中心。我的0.02美元

magan · 发表于 2022-7-5 19:03:59

哦，当然，先生。
你的帮助是无价的。
作为一名学生，我将永远感激你。

先生，如果你不介意的话，我想再问你一个问题，这使得输出很难使用。
先生，我正在试图得到连续线上的半径和中心。
我想做的另一件事是，我想将整个数据保存在单个或单独的数据文件（.dat）中。但是，因为我们的代码是在循环中工作的，所以保存在中的数据。dat文件被覆盖在同一个文件中。dat文件。意味着它只保存最后一个结果，而不是全部。

我现在用它来保存内容。dat文件：

（setq fo（open“D:/n\u HORE.dat”“w”））
（princ mtw fo）
（关闭fo）
（普林斯）

我这样做的最终目标是得到孔的数量、孔的最小直径以及所有孔之间的距离。如果可能的话，请帮帮我。

marko_ribar · 发表于 2022-7-5 19:06:55

也许，试试这个：

copy


CIRCLE 1: ([color="red"]1.19302[/color] (-38.7769 5.2797 2.65292))
CIRCLE 2: ([color="red"]1.19302[/color] (-38.7769 5.2797 0.0))

“a”代表“append”。。。

amili · 发表于 2022-7-5 19:12:53

嘿这段代码对我也很有用。。。Thanx hanhphuc回答，Thanx magan回答这个问题。
我在这段代码中面临的问题是，我保存在excel文件中的数据没有正确保存。此外，我们通过该代码得到的圆心坐标（x y z）保存为单个数字，即这些坐标之间的简单空间（例如（20 10 10））。所以，我希望中心的坐标应该保存在不同的单元格中。请帮帮我。。。我需要它。

hanhphuc · 发表于 2022-7-5 19:13:06

你好，阿米莉欢迎来到CADTutor
我的理解是你希望每个细胞都分开？
为方便起见，另存为csv格式
圆_#，半径，X，Y，Z

第#6页更新

amili · 发表于 2022-7-5 19:17:55

非常感谢您，先生，，，，这对我来说太特别了，我无法向您解释。再次感谢您，先生。如果你不介意的话，我想再问你一些关于我工作的问题。

和圆孔一样，矩形孔也可以吗？
如果是，则我必须从该矩形中获取以下数据：
1、矩形中心
2、矩形点
3、矩形的长度和宽度。

为供参考，我附上我的绘图截图以及预期输出的excel文件。如果这些可以用Autolisp来完成，我将非常幸运。
请帮帮我。

sonali · 发表于 2022-7-5 19:20:21

嘿，阿米莉。。。。
你的问题解决了，thanx给hanhphuc和lee mac。在支柱#6中，将AcDbCircle替换为AcDbPolyline。

但是，韩，我想问你一件事，生成的数据文件不断地保存以前的数据，尽管文件被删除了。因此，在数据fie中收集了一些以前的垃圾值。我想删除那些不必要的值。

在这方面你能帮忙吗？？

hanhphuc · 发表于 2022-7-5 19:24:54

很抱歉回复太晚。。
具有
（打开fn“w”）；这将覆盖以前的数据。
除非
（打开fn“a”）；这会不断追加数据

我不确定Windows是否限制了它？（有些电脑甚至无法通过lisp在目录中创建文件。）

sonali · 发表于 2022-7-5 19:25:59

谢谢你的回复。

是的，先生，我试过“w”和“a”。但是，它不起作用。在您的程序中，如果我们只获取圆的数据，则不会重复数据。但是，当我试图分别在两个不同的csv文件中获取多段线和圆时，问题来了。所以，请帮我做点什么。

[编程交流] 将中心对准tw

发表回复

精选推荐