自动脚本

Andrea · 发表于 2004-11-29 18:03:05

重新重新嗨..
我正在尝试制作一个运行到打印的自动脚本
，
并为每个打开的图形关闭。
任何想法如何？？

本帖以下内容被隐藏保护；需要你回复后，才能看到！

游客，如果您要查看本帖隐藏内容请回复

rkmcswain · 发表于 2016-8-15 15:47:11

您可以在 AcadDoc.lsp 文件中使用类似的东西。

(defun-q mystartup ()
   (vl-cmdf "-layout" "set" "layout1")
   (vl-cmdf "-Plot" "_Y" "layout1" "DWG to PDF.pc3" "ANSI A (11.00 x 8.50 Inches)" "inches" "landscape" "_No" "Layout" "1:1" "0.00,0.00" "_Yes" "monochrome.ctb" "_Yes" "_No" "_No" "_No" "" "_Yes" "_Yes")
   (vl-cmdf "._close" "_No")
)
(setq s::startup (append s::startup mystartup))

根据需要更改相应的部件。

自动脚本

发表回复

精选推荐