(defun c:tar(/)
(while
(setq Wss (entsel “nSelect Change of Text : “))
(if (= “TEXT” (cdr (assoc 0 Wss)) )
(progn
(setq t1 (entget (car Wss)))
(setq t2 (assoc 1 t1))
(PRINC t2)
;(setq t3(cdr(assoc 1 t2)))
;(PRINC t3)
) ;;progn
)
) ;; while
)
선택된 텍스트에서 텍스트를 숫자화 하려고 빼내려는데,
t3부분에서 에러가 나는군요..
어떻게 숫자화 할 수 있는지 가르켜 주셨으면 합니다.
눌러진 숫자(문자)를 차례로 더해서
합을 구해 특정 위치에 쓰고 싶습니다..
혼자 해 보려니 너무 안 되고. 시간만 4시간 날렸습니다. ㅠ
도와 주십시요.. 감사합니다.