交叉点之间的长度

Madruga_SP · 发表于 2022-7-5 15:17:02

大家好，

我正在使用IntLen。Lee Mac的lsp。
这是一个优秀的代码！！

但有时在我的项目中工作不正常。

我附上一个文件来解释我的任务和代码。

我想将长度文本插入红色弧的所有交点。

谢谢
测验图纸
IntLenV1-4。lsp

marko_ribar · 发表于 2022-7-5 15:48:28

您的圆弧和某些曲线在DWG中具有不同的高程。。。将其中心Z坐标设置为0.0（圆弧），并使所有内容都平面化，以便曲线彼此相交。。。仍然有一些明显的曲线接触实际上并不相交-你可以在缩放时看到它。。。因此，修改您的DWG，使一切都是它应该是，然后应用李的代码。。。我看到的是创建ss（选择集）的行发生了轻微变化-我将其修改为：

copy


(setq ss (ssget "_CP" (list (trans ll 0 1) (list (car (trans ur 0 1)) (cadr (trans ll 0 1))) (trans ur 0 1) (list (car (trans ll 0 1)) (cadr (trans ur 0 1)))) '((0 . "ARC,CIRCLE,ELLIPSE,*LINE"))))

HTH。，M、 R。

Madruga_SP · 发表于 2022-7-5 16:34:48

非常感谢马科的协助。

现在很有魅力。

谢谢

[编程交流] 交叉点之间的长度

发表回复

精选推荐