(defun c:rex()
(setq a1 (getvar “OSMODE”))
(command “ortho” “off”)
(princ)
(setq p1 (getpoint “n 대각 한쪽 끝선 :”))
(setq p2 (getcorner p1 “n 대각 반대편 끝선 :”))
(setq p12 (list (car p1) (cadr p2)))
(setq p21 (list (car p2) (cadr p1)))
(command “osnap” “”)
(command “pline” p1 p2 p21 p12 p1 p21 p2 p12 “”)
(setvar “OSMODE” a1)
)
전에 어떤분이 만드신 리습 수정해서 쓰는데
여기에 text 달수있을까요 ? x 박스에 T(top) C (center) B(bottom)
으로해서 위치 별로 텍스트를 달려면 어떻게 하면될까요.
고수님들 도와주세요