MTEXT 의 폭비율 수정하는 리습 질문 드립니다.

폭비율 변경하는 리습관련해서 질문드립니다.

DTEXT는 폭비율 (장평?)이 수정이 되는데,  MTEXT는 안되네요,,
MTEXT 어떤것을 수정해야 되는지 고수님의 도움이 필요합니다.

{T0.9;ABCDEF}

MTEXT내 속성에서 0.9 만 바꾸는 리습이 있을까요?

아래 리습은 DTEXT의 폭비율을 바꿔주는 리습입니다. 요걸로 MTEXT의 폭비율 수정이 가능한지요?


(DEFUN C:TW( / SS1 HT NUM INDEX ENTL CO ENTL1 ASS)
        (SETQ SS1 (SSGET ))
        (SETQ HT (GETREAL "ENTER NEW TEXT WIDTH ?:"))
        (SETQ NUM (SSLENGTH SS1))
        (SETQ INDEX 0)
        (REPEAT NUM
                (SETQ ENTL (ENTGET (SSNAME SS1 INDEX)))
                (SETQ INDEX (1+ INDEX))
                (SETQ ASS (ASSOC 0 ENTL))
                (IF (= "TEXT" (CDR ASS))
                   (PROGN
                        (SETQ ASS1 (ASSOC 41 ENTL))
                        (SETQ CO (CONS (CAR ASS1) HT))
                        (SETQ ENTL1 (SUBST CO ASS1 ENTL))
                        (ENTMOD ENTL1)
                    )
                )
             )
        )