求一个关于快捷加载程序、配置文件……的lisp

fire9527

CAD由于办公环境不佳，经常需要更换电脑，每次都要给CAD设置一堆东西（设置自动启动项、输入配置、reinit快捷键文件），混迹论坛有些时日，知道有些程序能实现部分我的需求，苦于不懂编程，不知哪位大哥能进行一个资源整合，即写一个lisp程序，实现运行程序后（把程序拖进CAD窗口即运行）：
1.能将某文件夹中的所有程序写进启动项（包括其中所有**.lsp、**.VLX、**.fas文件）
2.能将指定的.arg配置文件输入，并置为当前3.运行renit命令，勾选.PGP，确定

以上这3个步骤不知浪费了我多少时间，期待大侠出手相助！

669423907

(load "??.lsp")
(load "??.vlx")
(load "??.fas")
(arxload "??.arx")
(command "-vbarun" "凸轮.dvb!tulun")

;http://bbs.mjtd.com/forum.php?mod=viewthread&tid=32705
(vla-put-activeprofile (vla-get-profiles(vla-get-preferences (vlax-get-acad-object))) "这里是ARG文件名不带后缀名")



建议把你要用到的一切到方到CAD的“Fonts”里，并件一个名为 acad.lsp 的文件，
(setvar"acadlspasdoc"1)     ;; 将acad.lsp加载到每一个打开的图形中

fire9527

顶起来

野狼谷/〈M〉

好像用的人不多

xgr

写个安装程序即可以解决，本论坛有，搜索一下。

simpleye

在CAD中保存你设置的配置文件，想用时再导入就可以了。我就这样做的。

fire9527

669423907 发表于 2013-4-6 20:57
(load "??.lsp")
(load "??.vlx")
(load "??.fas")

多谢多谢！

360527010

669423907 发表于 2013-4-5 22:12
(load "??.lsp")
(load "??.vlx")
(load "??.fas")

请问（load "??.lsp"）是否有数量限制？为什么我用到第二十个的时候就加载不成功了呢