在圖面階段作業期間的特定時間內啟動並執行指令或函數時,載入 AutoLISP 常式。
AutoCAD 系列產品和 AutoCAD LT 會自動載入三個使用者可定義檔案的內容:
使用者可定義的檔案 | Windows | Mac OS | ||
---|---|---|---|---|
AutoCAD | AutoCAD LT | AutoCAD | AutoCAD LT | |
acad.lsp | ✓ | -- | ✓ | -- |
acaddoc.lsp | ✓ | -- | ✓ | -- |
acadlt.lsp | -- | ✓ | -- | -- |
acadltdoc.lsp | -- | ✓ | -- | -- |
與目前的自訂檔搭配的 MNL 檔 | ✓ | -- | ✓ | -- |
依預設,當產品啟動時,acad.lsp 或 acadlt.lsp 檔只會載入一次,而 acaddoc.lsp 或 acadltdoc.lsp 檔會隨每個個別文件 (或圖面) 一起載入。基於此,您可以將 acad.lsp 或 acadlt.lsp 檔的載入與應用程式的啟動關聯,而將 acaddoc.lsp 或 acadltdoc.lsp 檔的載入與文件 (或圖面) 的開啟關聯。透過變更 ACADLSPASDOC 系統變數的設定,您可以修改載入這些啟動檔的預設方式。
如果這些檔案中的其中一個定義特殊類型的函數 S::STARTUP,則此常式將在完全初始化圖面後立即執行。另一個替代方案是,APPLOAD 指令提供「啟動套件」選項,可以載入指定的應用程式而無需編輯任何檔案。
產品並未提供 acad.lsp 或 acadlt.lsp 和 acaddoc.lsp 或 acadltdoc.lsp 啟動檔。這些檔案需由使用者建立並維護。
當您載入 AutoLISP 檔案時,無論您實際上是否使用指令,檔案中的指令定義都會佔用記憶體。而使用 AutoLISP 的 autoload 函數,您同樣可以使用指令,但卻不必將整個常式載入記憶體。將以下程式碼加入 acaddoc.lsp 或 acadltdoc.lsp 檔中,以自動從 cmds.lsp 檔載入 CMD1、CMD2 和 CMD3 等指令,以及從 newcmd.lsp 檔載入 NEWCMD 指令。
(autoload "CMDS" '("CMD1" "CMD2" "CMD3")) (autoload "NEWCMD" '("NEWCMD"))
當您第一次在指令提示下輸入自動載入的指令時,AutoLISP 會從關聯的檔案中載入整個指令定義。AutoLISP 針對 ObjectARX 應用程式也提供 autoarxload 函數。
如果您經常使用特定的 AutoLISP 常式,可以建立一個 acad.lsp 或 acadlt.lsp 檔。啟動 AutoCAD 時,它會在支援檔搜尋路徑中搜尋 acad.lsp 或 acadlt.lsp 檔。如果找到 acad.lsp 或 acadlt.lsp 檔,則將其載入記憶體。
因為 acad.lsp 或 acadlt.lsp 用於應用程式特定的啟動常式,所以所有在 acad.lsp 或 acadlt.lsp 檔中定義的函數與變數只能在第一個圖面中使用。您可以將所有文件中均可用的常式從 acad.lsp 或 acadlt.lsp 檔移至 acaddoc.lsp 或 acadltdoc.lsp 檔。
acad.lsp 或 acadlt.lsp 和 acaddoc.lsp 或 acadltdoc.lsp 的建議功能可以使用 ACADLSPASDOC 系統變數取代。如果將 ACADLSPASDOC 系統變數設為 0 (預設設定),則 acad.lsp 或 acadlt.lsp 檔只會載入一次,即在應用程式啟動時載入。如果設定為 1,則當建立新圖面或開啟既有圖檔時會重新載入 acad.lsp 或 acadlt.lsp 檔。
acad.lsp 或 acadlt.lsp 檔可以包含一個或多個常式的 AutoLISP 程式碼,也可以只包含一系列 load 函數呼叫。後者是比較理想的方式,因為修改較為容易。如果將以下的程式碼另存為 acad.lsp 或 acadlt.lsp 檔,則每次您啟動產品時,都會載入 mysessionapp1.lsp、databasesynch.lsp 和 drawingmanager.lsp 檔。
(load "mysessionapp1") (load "databasesynch") (load "drawingmanager")
acaddoc.lsp 或 acadltdoc.lsp 檔是為了與每個文件 (或圖面) 的初始化作業相關聯。如果您想要在每次啟動新圖檔 (或開啟既有的圖面) 時都將 AutoLISP 的常式資源庫載入,此檔案就非常有用。
每次開啟圖面時,AutoCAD 都會在資源庫路徑中搜尋 acaddoc.lsp 或 acadltdoc.lsp 檔。如果找到了,AutoCAD 就會將它載入記憶體。無論如何設定 ACADLSPASDOC,acaddoc.lsp 或 acadltdoc.lsp 檔始終會與圖面一起載入。
大多數使用者會針對所有基於文件的 AutoLISP 常式使用單一 acaddoc.lsp 或 acadltdoc.lsp 檔。程式會按照資源庫路徑定義的順序搜尋 acaddoc.lsp 或 acadltdoc.lsp 檔,因此,使用此功能,每個圖面目錄中都可以有一個不同的 acaddoc.lsp 或 acadltdoc.lsp 檔,它可為特定類型的圖面或工作載入特定的 AutoLISP 常式。
acaddoc.lsp 或 acadltdoc.lsp 檔可以包含一個或多個常式的 AutoLISP 程式碼,也可以只包含一系列 load 函數呼叫。後者是比較理想的方式,因為修改較為容易。如果將以下程式碼另存成 acaddoc.lsp 或 acadltdoc.lsp 檔,則每次開啟新文件時,都會載入 mydocumentapp1.lsp、build.lsp 和 counter.lsp 檔案。
(load "mydocumentapp1") (load "build") (load "counter")
產品在載入自訂 (CUI/CUIx) 檔時會搜尋檔名相符的 MNL 檔。如果找到了,AutoCAD 就會將該檔案載入記憶體。此功能可確保載入進行使用者介面元素適當作業所需的 AutoLISP 函數。
例如,如果產品載入名為 custom.cuix 的自訂檔,它會尋找名為 custom.mnl 的檔案,該檔案會在自訂檔中定義使用者介面元素所使用的許多 AutoLISP 函數。載入 acaddoc.lsp 檔之後,才載入 MNL 檔。
(command "menu" "newmenu") (princ "Newmenu utilities… Loaded.") (Princ)
在此範例中,princ 函數的呼叫可用於顯示狀態訊息。第一次使用 princ 會於指令提示下顯示以下內容:
Newmenu utilities... Loaded.
第二個 princ 呼叫用來結束 AutoLISP 函數。如果沒有第二個 princ 呼叫,訊息會顯示兩次。如前所述,您可以在 load 函數的呼叫中包括 onfailure 引數做為額外的預防措施。
您可以定義 S::STARTUP 函數,以在初始化圖面後執行任何需要的設置作業。
啟動 LISP檔 (acad.lsp 或 acadlt.lsp、acaddoc.lsp 或 acadltdoc.lsp) 在圖面完全初始化前,會連同所有自動載入的 MNL 檔一起載入到記憶體。一般而言,這並不會造成問題,除非您想使用 command 函數,該函數在完成初始化圖面之前並不保證可以使用。
如果使用者定義的函數 S::STARTUP 包含在 acad.lsp 或 acadlt.lsp、acaddoc.lsp 或 acadltdoc.lsp 或 MNL 檔中,則當您進入新圖面或開啟既有圖面時就會呼叫它。因此,您可以在 AutoLISP 啟動檔中包括 S::STARTUP 的定義,以執行所有設置作業。
例如,如果您想要加入一則訊息,然後切換至 BHATCH 指令,以取代標準 HATCH 指令,則可使用包含以下內容的 acaddoc.lsp 或 acadltdoc.lsp 檔:
(defun C:HATCH ( ) (alert "Using the BHATCH command!") (princ "\nEnter OLDHATCH to get to real HATCH command.\n") (command "BHATCH") (princ) ) (defun C:OLDHATCH ( ) (command ".HATCH") (princ) ) (defun-q S::STARTUP ( ) (command "undefine" "hatch") (princ "\nRedefined HATCH to BHATCH!\n") )
在初始化圖面之前,可使用 defun 函數重新定義 HATCH 和 OLDHATCH。在初始化圖面之後,會呼叫 S::STARTUP 函數,而 HATCH 的標準定義則會被取消。
因為 S::STARTUP 函數可在多個位置 (acad.lsp 或 acadlt.lsp、acaddoc.lsp 或 acadltdoc.lsp、MNL 檔或從上述任何檔案中載入的任何其他 AutoLISP 檔) 定義,所以有可能會覆蓋先前定義的 S::STARTUP 函數。
下列範例示範一種能確保您的啟動函數可以和其他函數一起使用的方法。
(defun-q MYSTARTUP ( )
... 您的啟動函數 ...
) (setq S::STARTUP (append S::STARTUP MYSTARTUP))
以上程式碼將您的啟動函數附加至既有 S::STARTUP 函數的程式碼中,然後重新定義 S::STARTUP 函數以包括您的啟動程式碼。此新定義的函數可以正常運作,不會受到之前 S::STARTUP 函數的影響。