안녕하십니까?
요즘 날씨 기온차가 심하네요 ㅠ,.ㅠ 감기조심하세요
다름이아니라
텍스트를 추출하여 자동으로 웨이트 계산 되는 리습을 만들려고하는데 좀 힘드네요^^..
텍스트는 추출하는 방법을 알았습니다 ^^ 여기서 도움을 받아서요
EX)PL20x20x300 이라는 텍스트가 있습니다 여기서
제가 구하고자 하는것은 20*20*300*7.85(철비중)*0.000001 이런식입니다
텍스트만 선택해서 자동으로 계산 되게요^^
물론 PL200x500x5000 이렇게 숫자가 일정치는 않습니다
일정한 부분은 “PL” “x” 이것들만 일정합니다 ^^물론 자리수는 항상 일정 하지 않고요 ㅠ,.ㅠ
제가 너무 간단히 생각하는 걸까요?? 실제로 해보니 많은 부분에서 막힙니다 ㅠ,.ㅠ
=======================================
(defun c:ZX ()
(setvar “cmdecho” 1)
(prompt “nPICK WATE TEXT.”)
(setq ent (entget (car (entsel))))
(setq #a (cdr (assoc 1 ent)))
(setq #b ‘(“PL”))
(while(apply ‘or(mapcar ‘(lambda (#x)(vl-string-search #x(setq #a(vl-string-subst “” #x #a))))#b))) ;;<- 이부분은 전혀 이해가 안가네요^^..
(eval #a)
)
======================================
위에 대충 여기저기서 도움 받아 만들어볼라고 하는데 더이상 진행이 안돼네요 ㅠ,.ㅠ 도움 부탁드립니다 짧게남아 몇마디라도 해주시면 ^^ 검색하고 검색해서 제힘으로 만들어 보겠습니다 ^^ 도움 부탁드립니다
공유