스냅설정 --> xc
스냅해제 --> sf

원래하실려면..snap이라는 명령어도 하셔야 됩니다... 그러나 꽤 귀찬져.. 
이렇게 하면..F8키로 저 경사도의 수직선들을...그릴수 있져...
경사진 평면같은거 그릴때이렇게 많이 하져..

(defun c:XC (/ a b pntl pnt2 angl)
   (prompt "nSnap Mode Basic Line ...")
   (setq a (entsel))
   (setq b (entget (car a)))
   (setq pnt1 (cdr (assoc 10 b)))
   (setq pnt2 (cdr (assoc 11 b)))
   (setq angl (angle pnt1 pnt2))
   (setvar "snapang" angl)) ; end defun