읽어주셔서 감사합니다.

기존 tci명령어를 생각하고 알아보고 있는데, 빠르게 입력해야하는 상황이 생겨 매번 번거롭기도하여 찾고있습니다.

생각한 조건은 아래와 같습니다. 혹시 관련하여 조언주실분 계시다면 대단히 감사하겠습니다!!

1. 입력할 문자를 미리 받는다. (한/영/숫자)
2. 마우스로 출력할 포인트를 지정하면  문자+원 또는 사각형 문자가 동시출력
   됨. EX)  ⓦ

20240516 수정)

제가 정신없게 질문글만 올리고 제가 작성중이던 리습내용을 안올렸네요;;;

(defun c:rs (/ txh txt)
(vl-load-com)
(setq txh (getvar ‘TEXTSIZE))
(setq txt (or txt 1))
(setq txt (cond ((getstring (strcat “문자입력<” (vl-princ-to-string txt) “>:”))) (txt)))
(while (setq txp (getpoint (strcat “위치배치<” (vl-princ-to-string txt) “>:”)))
(command “_text” “_j” “_mc” txp txh “0” txt)
(command “_circle” txp (* txh 1.2))
(setq txt (1+ txt))
)
(princ)
)
;; defun

해당내용으로 리습 ANSI /UTF-8 두가지방식으로 인코딩 저장 후 적용했을 경우

새로 생성된 dwg 파일에서는 적용이 되나, 기존에 다른분이 작성하던 dwg에 적용시

한글/영문/숫자 입력시 모두 원문자 안에 0으로 출력이 되고있습니다. 모자란 실력이라 조언 부탁드리겠습니다!!