블럭삽입 파일별에서 폴더로 삽입이 가능할까요?

최근 설계를 다시 시작해서 예전에 사용하던 리습을 가져와 사용중인데
블럭 삽입 방법이 복잡해 글을 올립니다.

현재 사용 중인 블럭삽입 리습은 파일수가 100개면 리습도 100개를 생성해서 사용하여야 합니다.

사용중인 블럭 삽입 리습
(defun C:*a01()
(setvar “cmdecho” 0)
(setq cxy (getpoint “na01 : “))
(command “insert” “C:/A01.dwg” cxy “” “” “” “”)
)
(defun C:*a02()
(setvar “cmdecho” 0)
(setq cxy (getpoint “na02 : “))
(command “insert” “C:/A02.dwg” cxy “” “” “” “”)
)

이방법 말고 명령어 사용시 폴더속에 a01.dwg ~ a101.dwg파일들이 들어있을떄 “a01″을 입력시 삽입되도록 가능할까요?