開機自動載入lisp程式製作精靈

lee50310 · 发表于 2022-6-17 10:52:35

本帖最后由 lee50310 于 2022-6-19 17:46 编辑

<<*** 開機自動載入lisp程式製作精靈  by lee50310 addoc3.fas 版本V3.0    ***>>>
執行指令:addoc       使用說明指令: selp

說明:
將要自動載入的lsp程式放入例 D:\TEMP 資料夾內
並執行指令:addoc 選此料夾後, 程式便將放入資料夾內
的所有lisp檔(*.LSP ,*.FAS ,*.VLX) 一併加入至目的路徑夾
C:\Users\Boss\AppData\Roaming\Autodesk\AutoCAD 2018\R22.0\cht\Support
(ps: 此路徑夾會依個人電腦  的使用者及CAD版本不同而有所變)
此路徑下產生 acaddoc.lsp 自動載入程式 "

例: 要載入的兩個LISP 程式放在 D:\TEMP3  資料夾內  如圖1
<圖1>

執行指令:addoc 愈載程式來源資料夾選擇 D:\TEMP3 如

<圖2>

如動態圖所示 (ps: 動態圖因之前已新加載過一次到acaddoc.lsp 所以再加載第二次會詢問是否要覆蓋之前的加載資料)
選否及取消則離開 ,若選是則覆蓋之前的

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

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

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

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

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

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

lee50310 · 发表于 2022-6-17 10:53:08

本帖最后由 lee50310 于 2022-6-19 17:56 编辑

若選是 , 目的資料acaddoc.lsp會存放此路徑下
C:\Users\Boss\AppData\Roaming\Autodesk\AutoCAD 2018\R22.0\cht\Support
(ps: 此路徑夾會依個人電腦的使用者及CAD版本不同而有所變)

所加載產生的 acaddoc.lsp 內容如圖3

<圖3>

lee50310 · 发表于 2022-6-17 11:13:10

本帖最后由 lee50310 于 2022-6-19 17:39 编辑

程式訊息說明:

(1) 當目的資料夾無acaddoc.lsp 時, 程式會自動創建並顯示訊息 , 加入的筆數及目的路徑位置如圖4

<圖4>

(2) 若之前在 acaddoc.lsp 已經有建立載入程式 , 則會找到程式內容的 (1) (2)  式文字串
由此依據即可判斷是否建置過及找到建置過的起始點與結束點
;;<PROGN_START>;;       -------(1)
.....
.....
;;<PROGN_END>;;          -------(2)
找到之前建立的程式會詢問是否變更此內容
按是則變更  , 否及取消鍵則離開如圖5
(圖5)

若按是鍵變更則新載入lisp程式會加在既有程式之後