razorangel 发表于 2022-7-6 17:22:42

你好,救命物料标签

首先我想说的是,我觉得这些论坛是多么棒!很高兴知道有这么多有帮助和智慧的人在那里。
 
我的希望是在我的工作项目中得到一些帮助。基本上,我已经为自定义工具栏构建了一个宏,可以将块(材质标记)插入到图形中。我希望有一个备用按钮来绘制一条线,第一个点是用户指定的,第二个点也是用户指定的,但将是插入块(这是一个中心有文本的圆)的位置,然后从线的中心修剪线。
 
基本上是有一个带有引线的材质标记。不管它是否在最后将它们组合在一起,都没什么大不了的,但如果它还可以将这两个实体组合成一个未命名的组,那就太棒了。
 
我希望我没有要求太多,但我在谷歌上的搜索一直没有结果。
 
再次提前感谢!

Lee Mac 发表于 2022-7-6 17:42:13

嗨,Razongel,
 
只是一个快速的回复,在阅读您的帖子后,这个Lisp程序可能有一些像你在寻找什么。
 
如果有帮助,请告诉我!
TKTAG。lsp

razorangel 发表于 2022-7-6 17:57:18

李·麦克,
 
非常感谢您的回复,但我想我只需要使用宏命令就可以完成。所有没有发生的事情是修剪线条,并将线条和mtag块分组在一起。来,让我给你看看。
 
 
^C^C_line;\\;_-insert;"N:/Piping Group/_BLOCKS/2d/Toolbar/Mtag.dwg";$m=$(getvar,lastpoint);1;;;\_trim;;$m=$(getvar,lastpoint);

razorangel 发表于 2022-7-6 17:59:12

我仍在试图让它从圆圈内部修剪线条,但运气不好。有什么想法吗?
 
此外,我想在我的宏中包括绘制实体的分组。。。

razorangel 发表于 2022-7-6 18:11:54

可以差一点!我从另一个线程借用了一些代码,但我不喜欢缩放问题。太好了。。。我在想怎么缩小变焦!有什么想法吗?(简单的答案是行不通的——如果你只是去掉缩放和相关命令,它就不会修剪)。
 

^C^C-layer m mtag;;_line;\\;_-insert;"N:/Piping Group/_BLOCKS/2d/Toolbar/Mtag.dwg";$m=$(getvar,lastpoint);1;;;\circle;$m=$(getvar,lastpoint);0.1875;(setq cc (entlast));zoom;o;l;;trim;l;;c;@-0.02,-0.02;@0.04,0.04;;erase;!cc;;zoom;p;

razorangel 发表于 2022-7-6 18:33:15

都明白了!胡特!好吧,没有关于分组的项目,但谁在乎呢?我很高兴它起作用了。
 

^C^C-layer m mtag;;_line;\\;_-insert;"N:/Piping Group/_BLOCKS/2d/Toolbar/Mtag.dwg";$m=$(getvar,lastpoint);1;;;\circle;$m=$(getvar,lastpoint);0.1875;(setq cc (entlast));trim;l;;c;@-0.1,-0.1;@0.1,0.1;;erase;!cc;;
页: [1]
查看完整版本: 你好,救命物料标签