dcl 사용법 궁금합니다.

오늘 dcl에 대해 처음으로 공부하는데요
dcl이 실행이 안되서 질문 올립니다.

(defun c:aa()
(setq id (load_dialog “aaa.dcl”))
(new_dialog “aaa” id)
(action_tile “li” “(setq lll ”line”) (done_dialog 1)”)
(setq ok (start_dialog))
(unload_dialog id)
(if (= ok 1)
   (command lll)
   )
(princ)
)
;———aa.lsp 파일이 잇고

aaa : dialog
{ label = “dcl 강의”;
:button
{label = “line”;
key = “li”;
}
ok_cancel;
}

;———–aaa.dcl파일이 있을때
두개의 파일다 연습 이라는 폴더에 위치해있고 aa.lsp파일을 로드한다음

aa명령어를 쳤는데 왜 아무런 대화상자가 안뜨는 건가요??