리습고수님들 부탁드립니다. qaflags 변수

(defun c:ed() 익스플로드
(setvar “qaflags” 1 )
(setq ss (ssget))
(command “_.explode” ss “”)
(setvar “qaflags” 0 )
(princ)
);defun
;————————————————————

익스플로드 리습인데요
qaflags 변수가 1로변했다가 그다음 익스플로드를 하고, 그다음 qaflags 0으로 바뀌는 리습인데요..
현재 명령어 입력후에 캔슬눌러 취소하면 qaflags 변수가 1로 바뀌더라고요 …
*errer* 함수를 이용해서 취소 했을 시에도 0을 유지하고 싶습니다..

그리고 도중취소 하지 않은경우에도 명령어로 익스플로드 한 이후에 undo로 뒤로 돌아가서 블록이 꺠지기 전으로 돌아갈경우 qaflags 변수가 1로 바뀌어 버리더라구요 ㅜㅜ….

명령어 취소를 하던, undo를 하던 어떤경우에도 qaflags 변수를 0으로 유지하고싶습니다 ..
고수님들 도와주세요 ㅠㅠㅠㅠ 가장 많이 쓰는 명령어인데 문제가 있어 너무 슬프네요 ㅠㅠㅠㅠ