(setq dwg (getfiled "选择要打开的文件" "" "" 8));打开文件(command "_.saveas" "2004" "d:\\1.dwg");另存文件(command "._close");关闭文件
很简单,使用open和save或者save as命令语句。
使用LSP语法编写就可以了啊