[教學]簡單自訂LISP快捷鍵

由 **Tiger&蘋果爸** 2012-10-04, 10:29

一般在工作上常常有一些指令的副選項重複使用的機會很高，也就是要先輸入主指令再來輸入副選項，雖然只是多KEY一個鍵盤，但是對於每天使用CAD畫圖的朋友，在工作上能少輸入一個鍵就是效率的提升，這也就是為何會有別名(精簡指令)的緣故。

所以在這裡寫了幾個簡單的LISP，把平常輸入的指令動作，從2個動作簡化為1個動作，以下提供二個範例供各位看倌參考，有問題請隨時提出來討論，也請多多推文支持一下喔~

一、關於指令 LENGTHEN → 差值(DE)，以後使用 LN 即可完成這2個組合動作，並且可以直接輸入差值再來碰選物件。
步驟1.如果要使用 LN (LISP快捷鍵)，則必須透過 LISP才行，而語法也非常簡單，語法如下:
(DEFUN C:LN () (SETVAR "CMDECHO" 0) (PROMPT "調整長度差值") (COMMAND "LENGTHEN" "DE") (PRIN1))

步驟2.將語法寫到系統的程式檔最下一行，以AutoCAD 2009版本為例，使用記事本開啟 acad2009.lsp 即可
程式檔路徑如下:
C:\Program Files\AutoCAD 2009\Support\acad2009.lsp

步驟3.請在指令行輸入(LOAD "acad2009.lsp")，即可使用剛剛設定的 LN (LISP快捷鍵)，以後重新啟動AutoCAD程式時，不需要再輸入(LOAD "acad2009.lsp")， LN 即變成常駐式指令，可以直接使用 LN 來輸入差值。

註：若不想使用LISP快捷鍵方式，也可以使用自訂工具列按鈕的方式，指令巨集如下:
^C^CLENGTHEN;DE;

二、關於指令 STRETCH → 框選(C)，以後使用 SS 即可完成這2個組合動作，讓滑鼠不管從任何方向選取物件都可以框選物件。
步驟1.如果要使用 SS (LISP快捷鍵)，則必須透過 LISP才行，而語法也非常簡單，語法如下:
(DEFUN C:SS () (SETVAR "CMDECHO" 0) (PROMPT "以「框選窗」選取要拉伸的物件...") (COMMAND "STRETCH" "C") (PRIN1))

步驟2.將語法寫到系統的程式檔最下一行，以AutoCAD 2009版本為例，使用記事本開啟 acad2009.lsp 即可
程式檔路徑如下:
C:\Program Files\AutoCAD 2009\Support\acad2009.lsp

步驟3.請在指令行輸入(LOAD "acad2009.lsp")，即可使用剛剛設定的 SS (LISP快捷鍵)，以後重新啟動AutoCAD程式時，不需要再輸入(LOAD "acad2009.lsp")， SS 即變成常駐式指令，可以直接使用 SS 以「框選窗」選取要拉伸的物件。

註：若不想使用LISP快捷鍵方式，也可以使用自訂工具列按鈕的方式，指令巨集如下:
^C^CSTRETCH;C;

相關文章：[教學]LISP快捷鍵-視窗工具