cass怎么把阳台檐廊， 旱地水田符号设置快捷键

QWQW1

cass怎么把阳台檐廊， 旱地水田符号这类设置快捷键，求高手指导

lang851

（(if (null (tblsearch "layer" "构造线"))
(entmake (list'(0 . "LAYER")'(100 . "AcDbSymbolTableRecord")'(100 . "AcDbLayerTableRecord") ' (6 . "CONTINUOUS") '(62 . 7) '(370 . 0) '(70 . 0) '(290 . 1) '(2 . "构造线"))))
(princ)
）
（(if (null (tblsearch "layer" "宗地"))
(entmake (list'(0 . "LAYER")'(100 . "AcDbSymbolTableRecord")'(100 . "AcDbLayerTableRecord") ' (6 . "CONTINUOUS") '(62 . 1) '(370 . 0) '(70 . 0) '(290 . 1) '(2 . "构造线"))))
(princ)
）
#混房命令 HF
(defun c:HF ()
   (command "DD" "141161")
    (princ)
  )
#砖房命令 ZF
(defun c:ZF ()
   (command "DD" "141121")
    (princ)
  )
#一般房屋命令 YB
(defun c:YB ()
   (command "DD" "141101")
    (princ)
  )
#棚房房屋命令 PF
(defun cF ()
   (command "DD" "141500")
    (princ)
  )
#复制命令 Q
(defun c ()
   (command "copy")
    (princ)
  )
#复合线删点 YY
(defun c:YY ()
   (command "ERASEVERTEX")
    (princ)
  )
#偏移命令 D
(defun c ()
   (command "offset")
    (princ)
  )
#构造线命令 1
(defun c:1 ()
(setvar "clayer" "构造线")
   (command "xline")
    (princ)
  )

#圈宗地 ZD
(defun c:ZD ()
(setvar "clayer" "宗地")
   (command "LINE")
    (princ)
  )
#测量尺寸命令 2
(defun c:2 ()
   (command "distuser")
    (princ)
  )
#檐廊命令 YL
(defun c:YL ()
   (command "DD" "143130")
    (princ)
  )
#门顶命令 MD
(defun c:MD ()
   (command "DD" "143800")
    (princ)
  )
#刷新屏幕（放大）命令 3
(defun c:3 ()
   (command "regen")
    (princ)
  )
#楼梯命令 LT
(defun cT ()
   (command "DD" "143400")
    (princ)
)
#保存命令 P
(defun c:P ()
   (command "qsave")
    (princ)
  )

#修改建筑物属性命令 5
(defun c:5 ()
   (command "JZWXX")
    (princ)
  )
#快速搜索命令 6
(defun c:6 ()
   (command "FIND")
    (princ)
  )

#重展建筑物注记命令 4
(defun c:4 ()
   (command "REGENBUILDTEXT")
    (princ)
  )
#删除构造线命令 8
(defun C:8 (/ GOP)
(SETQ GOP (SSGET "X" '((-4 . "<OR") (8 . "构造线") (-4 . "OR>"))))
(command "chprop" GOP "" "c" "51" "")
(progn (sssetfirst nil GOP))
(command "ERASE")
(princ)
)

远方~

欢迎论坛的各位高手解答，会奖励相应的威望和铜板哦

lang851

DD宗cass码画。

1811567

早知本站有，何必用了那么长时间在论文网寻

sunmu

cass安装位置cass9.1forAutoCAD2007/SYSTEM里有一个JCODE.DEF文件，点进去按格式前面写地类缩写，后面写编码，保存后就可以用缩写快捷画了

pucxx

设置方法可以关注学习下面的免费教学视频哦