需要帮助(复制到新Dra
我需要完成的。我想将这一切都编码到一个lisp中,但我在使用“New”或“Qnew”命令以及使它们在lisp例程中工作时遇到了麻烦。1.带窗口选择的Copybase(完成)
(command "copybase" "0,0" "W" pause pause "")2。从模板创建新图形。我需要用一个每次都可以覆盖的文件名来自动命名。我已经完成了自动命名的代码,并且工作正常,但我无法运行“New”命令。
(command "setvar""users1""-CNC")
(command "setvar""users2""CNC/")
(setq AA (GETVAR "USERS1"))
(SETQ AB (GETVAR "USERS2"))
(setq CT (getvar "CTAB"))
(setq DP (getvar "DWGPREFIX"))
(SETQ TM (STRCAT DP AB CT AA))""
(command "new" TM )
(command "tilemode" "1")
3。粘贴剪辑并将内容从复制库中的基点插入到特定点。(完成)
我不能使用-wblock,我更喜欢使用它,让一切都正常工作。我正在做的是从构造集中提取一个CNC图形,在某个时间点,draworder命令在图形中被使用,它不再与我们的“CNC”软件兼容。在导致问题的图形中的某些内容上使用wblock caries。
我曾尝试使用draworderctl(0)、sortents(0)、treedepth(0)禁用draworder,但没有成功。
我知道复制零件,然后将其粘贴到新图纸中,然后重命名。这是我不想做的很多额外步骤。
谢谢 我做了一些研究,看起来这需要在VBA中完成,因为当打开一个新图形时,lisp会停止。
有人能帮我吗? 我仍在寻求帮助。任何人
页:
[1]