리습 면적 글자가 겹쳐져서 나오는데..도와주세요~

(DEFUN C:AY()
  (SETVAR “CMDECHO” 1)
  (SETVAR “REGENMODE” 0)
  (COMMAND “AREA” “e” pause)
  (setvar “lunits” 2)
  (setvar “luprec” 2)
  (SETQ PP (GETPOINT “n Pick the point : “)
        TS (GETVAR “TEXTSIZE”)
        AREA (GETVAR “AREA”)
        AA (/ AREA 1000000.)
        AREA1 (RTOS AA 2 2)
        AREA2 (RTOS (* AA 0.3025) 2 2)
        AA (STRCAT  “면적(M2) : ” AREA1 “” “”)
        AB (STRCAT  “면적(PY) : ” AREA2 “” “”)
 )
  (COMMAND “TEXT” PP 1000 “0” AA)
  (COMMAND “TEXT” PP 1000 “0” AB)
)


요렇게 되어있는데..글자가 계속 겹쳐져서 나와요ㅠㅠ
뭐가 잘못된건가요??
고수님들 도움 요청합니다..