lisp바로 실행되게 하는 방법

레이어 필터 같은 리습을 캐드를 열자마자 실행되게 하려면 어떻게 해야 하나요?
(if
(setq %1
(member ‘(102 . “{ACAD_XDICTIONARY”)
(entget (cdr (assoc 330 (entget (tblobjname “LAYER” “0”)))))
)
)
(if
(setq %2
(member ‘(3 . “ACAD_LAYERFILTERS”)
(entget (cdr (assoc 360 %1)))
)
)
(dictremove (cdr (assoc 360 %1)) “ACAD_LAYERFILTERS”)
)
Nil
)
받은건 이건데 실제로 되지 않는거 같네요.