치수리습 관련 질문드립니다.

제가만든 일반치수 리습인데요 .. 이게 DF친다음 F3을 눌러 오스냅 ON/OFF를 한후 치수위치를 찍고 치수기입을 완료한후 UNDO를 하면 DF치기전 오스냅 ON/OFF 상태로 돌아갑니다 .. ㅜㅜ
리습에 관계없이 사용자가 오스냅을 ON/OFF하게 만들고싶은데 어렵네요 ㅜㅜ


(defun c:DF (/ osm cla) 일반치수
  (defun *error* (msg)(princ “error: “)
  (princ msg)
  (setvar “osmode” osm)
  (setvar “clayer” cla)
  (princ)
 )
 
 (command “undo” “be”)
 (SETVAR “CMDECHO” 0)
 (COMMAND “DIMLINEAR” PAUSE PAUSE PAUSE)
 (command “change” “l” “” “p” “la” “DIM” “”)
 (setq osm (getvar “osmode”))
 (setq cla (getvar “clayer”))
 (command “undo” “e”)
 
 (setvar “osmode” osm)
 (setvar “clayer” cla)
 (princ)
);defun end