从模型空间t复制对象
你好我正在寻找一种方法，将模型空间中的圆（但其中有几个）复制到图纸空间。
我发现了一个实用程序可以做到这一点，但需要解决的限制很少。
[列表=1]
[*]视口比例是否可以算作例程的一部分，以便从布局空间中看到的对象按原样复制（如果视口比例为1:2，则不应为1:1）并位于完全相同的位置。
[*]我只想复制气球的圆，气球实际上是一个属性块，类似于ncopy（它实际上只从整个块中提取选定的实体）。这实际上将生成两个重叠的实体，但一个在图纸空间上，另一个在模型空间上。
[*]现在，我想从图纸空间（无需进入模型空间）完成这一切，这样我就可以选择要从布局模式复制的实体，就像我在视口内双击一样，视口跳入模型空间，选择完成后返回PS。
[/列表]
(Defun c:Ms2Ps ()
(setq CRT (getvar "Tilemode"))
(setvar "Tilemode" 1) ; Change to modelspace
(prompt "\nSelect objects to copy to model space: ")
(setq SS1 (ssget))
(command "_.copybase" "0,0" SS1 "")
(setvar "Tilemode" 0) ;Change to paperspace
(command "_.Pasteclip" "0,0")
(setvar "tilemode" CRT);
);
感谢您的帮助。如果我解释得不够好，请告诉我。 CHSPACE命令？ 上面的CHSPACE打字错误你可以双向使用纸张模型纸张
输入错误警报，我怀疑这是CHSPACE，一个伟大的命令。
它不会做你所希望的一切，因为它会删除被移动的那个。
当然，你可以在相同的坐标下创建一个副本，然后移动其中一个。 我试过CHSPACE命令。它可以工作，但考虑到我的要求（创建副本而不是移动副本、从属性块提取、视口比例调整），它需要不止一个标准命令。可能是处理这些问题的常规。
现在，问题是，你们认为这是可行的还是我离这太远了？ 有人能帮我吗？不管可能与否，至少给我一个线索。 我无法帮助您使用LISP，但是复制对象，使用select命令和上一个选项，选择一组项目，然后可以使用chspace命令，这样您就可以在模型空间和图纸空间中拥有这些项目 史蒂文-g
没错，这是第一部分，我看到它负责视口缩放调整，因此满足了我的两个要求。现在，仅从属性块中提取圆需要ncopy命令。现在，当我使用ncopy时，它会复制并询问我基点/位移。它只允许每次选择一个对象。这似乎太长了，这就是为什么我认为可能有人能够创建一个快速的例程来处理这一切。
不过我喜欢你的建议。
下面是我认为应该如何工作
1） 从视口跳入模型空间（我可能必须锁定显示）
2） 允许我从属性块中提取实体
3） 一旦我完成选择，跳回纸质空间
4） 将它们复制到完全相同的位置的Paperspace中（正如CHSPACE所做的那样）。
5） 命令关闭。 好的，我再次大声思考，我使用LT，所以没有LISP，也没有方法选择块中的单个项目，但我要做的是复制所有内容，将副本转移到纸面空间，然后分解所有内容并删除所有非圆。你是怎么用LISP做到的？？？我不知道 复制所有内容然后分解需要擦除工作，根据块内容的不同，可能需要比简单的ncopy更多的工作。
至于lisp，我也不知道太多（只知道一点，以便能够制作简单的并修改以供我使用），这就是为什么我在这里向lisp大师寻求帮助。。。我知道有很多大师可能想尝试一下。
页:
[1]
2