shakey230 发表于 2022-7-6 07:47:28

需要LISP帮助

嗨,伙计们没有Lisp程序的实际经验,但对勒恩来说很难。
 
我需要知道是否有什么可以做以下事情??
 
在图形中-另存为-(相同文件名)-pl.dwg(相同位置)
然后我需要在@0,0,0中X-Ref上一张图。
并将X-Ref重命名为ARCH
 
如果有什么东西甚至完成了第一部分,那将是惊人的,并将极大地赞赏它。
 
谢谢

MSasu 发表于 2022-7-6 08:12:34

您可以通过AutoLISP实现这一点;这个例子应该让您开始:
(vl-load-com)
(setq drawingOld (getvar "DWGNAME")
   drawingNew (strcat (getvar "DWGPREFIX")
                        (vl-filename-base drawingOld)
                        "-pl"
                        (vl-filename-extension drawingOld)))
(command "_SAVEAS" "" drawingNew)

shakey230 发表于 2022-7-6 08:33:05

非常感谢mircea,帮了大忙

MSasu 发表于 2022-7-6 09:01:29

不客气!也许最好在这里继续讨论,而不是开始一个新的线程,因为这是同一个问题。
页: [1]
查看完整版本: 需要LISP帮助