首先，將常用的塊用比較容易記的塊名（比如閘閥是zf，防火閥是fhf等等）儲存到指定的資料夾裡面，並在cad裡面將這個路徑設為支援路徑。（注1）
然後，將下列程式碼另存為lsp檔案，再拉進cad繪圖窗口裡面
以上程式碼在所有cad版本內均測試ok
注1
支援路徑就是在選項裡面的，如下圖所示
首先，將常用的塊用比較容易記的塊名（比如閘閥是zf，防火閥是fhf等等）儲存到指定的資料夾裡面，並在cad裡面將這個路徑設為支援路徑。（注1）
然後，將下列程式碼另存為lsp檔案，再拉進cad繪圖窗口裡面
(defun c:fd () ;fd為啟動命令，可以隨便改，但不建議與其他命令重複 ;輸入塊名稱 (if (or (= blkName "") (= blkName nil)) (setq blkName (getstring "\n插入塊的名稱：")) ;else (progn (setq tempName blkName) (setq tempName (getstring (strcat "\n插入塊的名稱<" blkName ">：")) ) (if (or (= tempName "") (= tempName nil)) (setq blkName tempName) ) ) ) (setq bl 1 ) (command "-insert" blkName "S" bl) )以上程式碼在所有cad版本內均測試ok
注1
支援路徑就是在選項裡面的，如下圖所示