고수님들 리습 수정좀 부탁드려요

2. 캐드버전 과 종류  :    오토캐드2010 한글판

3. 운영체제(윈도우)버전과 비트수  : –  Windows xp  64비트

4. 보조프로그램 사용유무 :  – 없음 

캐드 글자 스타일을 한번에 다 바꾸는 리습을 가지고있는데

보이는 글자는 안건드리고 깨져서 나오는 폰트만 특정 글씨체로 바꿀수 있는

리습으로 수정이 될까요?

밑에 저가 현재 사용중인 리습입니다 [모든 글씨 스타일이 울릉도m으로 바뀌는데 깨지는것만
                                                   울름도M으로 바꿀수 있는 리습으로 수정좀 부탁드려요 ㅠ] 


—————————————————————————
(defun C:*()
  (setq !Style (tblnext “STYLE” T))
  (while !Style
    (setq !Style (strcase (cdr (assoc 2 !Style))))
    (command “style” !Style “HY울릉도M” “0” “1” “0” “N” “N”)
    (setq !Style (tblnext “STYLE”))
  )
)