這是一個直接加載到CAD裡面去的,輸AA就直接生成圖層,輸圖層簡碼就會單顯其圖層,
還加以自己重新編,想什麼就寫什麼。很方便。大家用用,有什麼意見?
贴出部分内容
(defun C:PP()
(command "layer" "S" "-PP夾板" "")
(slay "-PP夾板" 4) )
(defun C:FPP()
(command "layer" "F" "-PP夾板" "") )
(defun C:TPP()
(command "layer" "T" "-PP夾板" "") )
(defun C:OPB()
(command "layer" "T" "-PP夾板" "")
(command "layer" "S" "-PP夾板" "")
(command "layer" "F" "*" "") )
繁體的
[此贴子已经被cslelch1于2006-4-26 8:12:50编辑过]
|