osnap<br>osnap?<br>osnap<br>osnap<br>osnap<br>osnap…

  죄송합니다. cad에서 리본메뉴와 클래식매뉴를 훈련하다가 osnap 를 설정하다가 이상한 모형이 생기네요.

아래파일과 같이 교차접과 이상한 그림이 자꾸 나옵니다. 이것이 안보이게 하는 방법이 없습니까.
도데체 외이런지 알수가 없네요.

아니는 분 빠른 답변 을 바랍니다.
                   2016년     1월      9일

cad2011오늘 처음 열었슴다. 그런데 치수선상에 오스냅 마크를 인식못하네요 갈쳐주세요

전에 2002 쓸땐 이런적이 한번도 없었는데요
스냅에서 intersection만 포인트가 잡히질 않아서요
다른 파일에선 되는데 그 파일에서만 잡히지 않는데
그 파일이 손상돼서 그런가요? 이럴땐 어떻게 하시나요?

1.아래 lsp을 쓰고 나면.osanp 체크 된것이 없어지고,layer lock 해놓은 것이 unlockd이 됩니다. 방법이 없나요

defun c:at (/ radd L:1 L:22 L1 L2 L3 dist dist11 dist22 dist1)
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(command "color" "bylayer")
(if (tblsearch "layer" "3″)
(command "layer" "s" "3″ "")
(progn
(command "layer" "new" "3″ "color" "3″ "3″ "")
(command "layer" "s" "3″ "")
)
)
; (command "layer" "unlock" "*" "")
(prompt "n Automatic 3… ")
(setq radd (getvar "filletrad"))
(setq radd (fix radd))
(prompt "n How much Fillet Radius <")
(prin1 radd)
(setq L:1 (getdist "> : "))
(if (/= L:1 nil)
(progn
(setvar "filletrad" L:1)
(setq radd L:1)
)
(setq L:1 radd)
)
(setq old_osnap (getvar "osmode"))
(command "osnap" "QUA,MID")
(setq L1 (getpoint "n Pick First line point : "))
(setq L2 (getcorner L1 "n Pick Second point : "))
(setvar "osmode" old_osnap)
(setq L3 (list (car L1) (cadr L2)))
(setq dist11 (distance L3 L1))
(setq dist22 (distance L2 L3))

(if (< dist11 dist22)
(setq dist dist11)
(setq dist dist22)
)

(if (< dist L:1)
(setq L:1 (* 3 (/ dist 4)))
)

(if (or (= (car L1) (car L2)) (= (cadr L1) (cadr L2)))
(command "line" L1 L2 "")
(progn
(command "pline" L1 "w" "0″ "" L3 L2 "")
(command "fillet" "r" L:1)
(command "fillet" "p" "L")
(setvar "filletrad" radd)
)
)
(if (tblsearch "layer" "3″)
(command "chprop" "l" "" "la" "3″ "c" "bylayer" "")
(progn
(command "layer" "new" "3″ "color" "3″ "3″ "")
(command "chprop" "l" "" "la" "3″ "c" "bylayer" "")
)
)
(setvar "blipmode" 0)
)

at 라는 lsp을 쓰면은,osnap의 체크된 부분이 없어짐니다.
아래 lsp에서 어떻게 해야 되는지…
(defun c:at (/ radd L:1 L:22 L1 L2 L3 dist dist11 dist22 dist1)
(setvar "cmdecho" 0)
(setvar "blipmode" 0)
(command "color" "bylayer")
(if (tblsearch "layer" "3″)
(command "layer" "s" "3″ "")
(progn
(command "layer" "new" "wire" "color" "3″ "3″ "")
(command "layer" "s" "3″ "")
)
)
; (command "layer" "unlock" "*" "")
(prompt "n Automatic wire… ")
(setq radd (getvar "filletrad"))
(setq radd (fix radd))
(prompt "n How much Fillet Radius <")
(prin1 radd)
(setq L:1 (getdist "> : "))
(if (/= L:1 nil)
(progn
(setvar "filletrad" L:1)
(setq radd L:1)
)
(setq L:1 radd)
)
(command "osnap" "QUA,MID")
(setq old_osnap (getvar "osmode"))
(setq L1 (getpoint "n Pick First line point : "))
(setq L2 (getcorner L1 "n Pick Second point : "))
(setvar "osmode" old_osnap)
(setq L3 (list (car L1) (cadr L2)))
(setq dist11 (distance L3 L1))
(setq dist22 (distance L2 L3))

(if (< dist11 dist22)
(setq dist dist11)
(setq dist dist22)
)

(if (< dist L:1)
(setq L:1 (* 3 (/ dist 4)))
)

(if (or (= (car L1) (car L2)) (= (cadr L1) (cadr L2)))
(command "line" L1 L2 "")
(progn
(command "pline" L1 "w" "0″ "" L3 L2 "")
(command "fillet" "r" L:1)
(command "fillet" "p" "L")
(setvar "filletrad" radd)
)
)
(if (tblsearch "layer" "3″)
(command "chprop" "l" "" "la" "3″ "c" "bylayer" "")
(progn
(command "layer" "new" "wire" "color" "3″ "3″ "")
(command "chprop" "l" "" "la" "wire" "c" "bylayer" "")
)
)
(setvar "blipmode" 0)
)

osnap을 잡고 쓰느네요
end를 잡고 쓰고 있거든요
설정을 end를 체크해서 잡아놨는데.
도면에서 작업을 하면 end가 안 잡히고
아무것도 스냅이 안 걸립니다.

쓸때마다 계속 걸어야 하더라구요

어떻게 해야 되는지요