Can#039；t理解纸张

jjatho · 发表于 2022-7-5 18:54:10

我试着写一些快速的东西，只在图纸上的每个纸空间的一个特定位置放上“初步的”。我发现插入的块基本上到处都是，除了我在Lisp中输入的坐标，每个页面都不同。

我想这可能与每个纸张空间的当前缩放级别有关。我有一个单独的小脚本PSCenter。我写的lsp，它只是在一个图形中的所有纸张空间中循环，并在每个空间上运行“缩放”“范围”，为我将它们全部居中。我从PSCenter添加了代码。lsp至预LIM。lsp在插入块之前将每个页面居中，但仍然具有相同的随机、到处都是的结果。

rkmcswain · 发表于 2022-7-5 19:10:54

你能发布这样做的代码：“只在每个纸空间的特定位置放*初步的*”吗？

jjatho · 发表于 2022-7-5 19:13:26

copy

(cond
((="All" LabelType)
        (princ)
        
        (foreach tab (_layoutlist)
        (setvar 'ctab tab)
        (command "Zoom" "extents")
        (command "_.INSERT" "Preliminary" "S" "1" "R" "0" 4.014386432 3.96875 "")
        
        )
        
        (setvar 'ctab (car (_layoutlist)))
        
        );

rlx · 发表于 2022-7-5 19:19:58

也许你可以这样写：

（setq ss（ssget“X”（list（cons 0“INSERT”）（cons 2#yourblockname#）（cons 410（getvar“CTAB”）））

如果块的大小固定，则可以获取其插入点，然后计算字符串位置的偏移量

gr.Rlx

哎呀，我以为你想相对于已经在那里的块插入它。。。