면적 구하는 리습인데요 한글이 ?로 나와요.

심플하게 필요한 것만 나와서 애용하는 면적 리습인데요
CAD 새로 깔고 나서부터
실행하면 면적은 잘 나오는데 그 후에 모든 한글이 ?로 나와요.
regen 해도 소용없고..
CAD를 껐다켜야 한글이 보여요.
어디가 잘 못된 걸까요?

(defun C:AQ()
(setvar "cmdecho" 0)
(SSGET)
(command "AREA" "E" (SSGET "P"))
(setq ar (getvar "area"))
(SETQ AR1 (/ AR 1.0))
(prompt "AREA (M2) =")(prin1 (SETQ AR2 (RTOS (/ AR1 1000000.0) 2 2)))
(PROMPT " AREA (PY) = ")(prin1 (setq ar3 (RTOS (/ ar1 3305800.0) 2 2)))
(PROMPT " CLICK TEXT POINT…….")
(princ)
(SETQ PO (GETPOINT))
(COMMAND "STYLE" "TEXT" "돋움" "" "" "" "" "" "")(PRIN1)
(SETQ TESI (* 3.0 (GETVAR "LTSCALE")))
(SETQ ART1 (STRCAT AR2 " M2″))
(SETQ ART2 (STRCAT AR3 " 평"))
(command "layer" "M" "AA-AREA-TEXT" "c" "7″ "" "")
(COMMAND "TEXT" "BC" PO tesi "" ART1)(PRIN1)
(COMMAND "TEXT" "TC" PO TESI "" ART2)(PRIN1)