면적리습- 텍스트정렬 수정부탁드려요.

(defun C:RT()
       (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 3)))
       (PROMPT ”      AREA (PY) =”)(prin1 (SETQ AR3 (RTOS (/ ar1 3305800.0) 2 3)))
       (PROMPT ”      CLICK TEXT POINT…….”)
       (princ)
       (SETQ PO (GETPOINT))
       (COMMAND “STYLE” “T3” “돋움” “” “” “” “” “” “”)(PRIN1)
       (SETQ TESI (* 4 (GETVAR “LTSCALE”)))
       (SETQ ART1 (STRCAT AR2 ” ㎡”))
       (SETQ ART2 (STRCAT AR3 ” 평”))
       (COMMAND “TEXT” “BL” PO tesi “” ART1)(PRIN1)
       (COMMAND “TEXT” “TL” PO TESI “” ART2)(PRIN1)
)
M2와 평 텍스트가 좌측정렬로 나옵니다. 우측정렬로 수정가능할까요?