캐드2006에서 DD가 안 먹습니다.

2002에서는 잘 되는데 2006에서는
여기서 실행할수 없다면서 안됩니다..ㅋ;
참고로 텍스트 연속으로 수정하는 리습입니다.

(defun c:DD(/ tot ind ent)
(setq tot(ssget)ind 0)
(repeat
(sslength tot)
(setq ent(cdar(entget(ssname tot ind)))ind(1+ ind))
(command”.ddedit” ent””)
)
(princ)
)