【AutoLISP】介面修改回典型工作區

因為跟不上時代用習慣了AutoCAD的傳統介面，所以我都會將AutoCAD的從預設的介面改成典型的介面，過去修改介面時都會上網找別人的文章來按步驟操作，但是時間一久會忘記自己怎麼設定的，說不定某日連關鍵字都忘了，這次重新設定就來紀錄一下怎麼設定這些東西。

根據網路找到的文章，修改介面的步驟如下：

1. 輸入指令：ribbonclose 關閉大按鈕
2. 輸入指令：menubar，輸入值1，叫出功能列
3. 輸入指令：-toolbar(前面要加減號) -> 輸入ALL -> 輸入S 叫出工具列
4. 儲存工作區

但這篇只是這樣子的話就只是搬運別人的文章而已，所以我要將上面的步驟寫成AutoLISP，往後只要載入.lsp檔案就可以一鍵完成以上步驟。

開始之前先將當前的工作區儲存。

習慣上我會把自動儲存工作區變更勾選起來，方便日後滾動調整工作區。

將上面四個步驟換成LISP語法如下：

1.(command "ribbonclose")

2.(command "menubar" "1")

3.(command "-toolbar" "all" "s")

4.(command "workspace" "sa" "name");name可更改

然後就可以用LISP的語法架構寫成一個小程式如下：

--

(defun c:WS01() ;WS01可以自訂

(setq name (getstring "\n請輸入新工作區名稱:")) ;提示使用者輸入想要的工作區名稱

(command "ribbonclose")

(command "menubar" "1")

(command "-toolbar" "all" "s") ;叫出所有工具列，工具列太多建議手動叫出來

(command "workspace" "sa" name)

(princ)

)

--

將這一段程式碼複製貼上到記事本，存成.lsp的程式檔，在AutoCAD中載入後輸入WS01就可以快速建立一個典型工作區了！

--

補充：

(command "-toolbar" "工具列名稱" "s")