리습 수정 부탁드리겠습니다.<br>리습 수정 부탁드리겠습니다
컨텐츠 정보
- 191 조회
- 8 댓글
- 0 추천
- 0 비추천
-
목록
본문
리습 수정좀 부탁드리겠습니다.
사칙연산 리습입니다.
1. 일단 기본적으로 계산이 필요한 문자(숫자)를 찍고 아무데나 포인트지점을 찍으면 계산값이 나오는데 그 계산값을 기존 문자를 찍으면 계산 결과 값으로 바뀌게 끔 수정 가능하신 분 계실까요?
2. 곱하기, 나누기, 빼기는 한 번 실행 후 연속적으로 리습 사용이 가능한데, 더하기는 연속 실행이 되지 않습니다. 더하기도 연속실행이 가능하도록 수정가능할까요?
ATTRIB 중 임의 태그의 값을 일괄 변경하는 리습인데 TR_RDAT1의 값이 100X125인데 125X125으로 바꾸고 싶습니다.
리습을 다운받아서 작동을 하니깐 명령어도 없고 안되네요
명령어를 쳐서 예로들어 (defun c:f12(/ ss de) 쳐서 하고 싶은데 어디를 손댈지 모르겠습니다 블록에 들어가지않고 일괄 변경을 하고 싶습니다 다중선택도 되게끔 부탁드리겠습니다
(defun get-ValueAtTag (ob tag / txt)
(foreach att (vlax-safearray->list (vlax-variant-value (vla-getAttributes ob)))
(if (= tag (vla-get-TagString att)) (setq txt (vla-put-TextString att "125X125.")))
)
;;ex
(setq ob (vlax-ename->vla-object (car (entsel "n블럭선택:"))))
(get-ValueAtTag ob "TR_RDAT1″)
관련자료
iiiiiiiiiiiiiiiiiin님의 댓글
안녕하세요~
지난번에 수정해주신 부분에 대해서는 잘 사용하고 있는데 더하기 연속실행이 안된다는 질문을 제대로 이해하지 못하신거 같아서요..
캐드에서 엔터키가 명령어 연속실행 기능이잖아요~ 그런데 빼기, 나누기, 곱하기는 한 번 실행 후 엔터키를 누르면 연속실행이 되는데 더하기는 한 번 실행 후 엔터키를 누르면 재실행이 안되서 또 다시 더하기 키를 눌러야 실행이 되는데 이부분에 대해서 엔터키사용으로 연속실행 가능하게 수정 해주실 수 있을까요? 다시 한 번 부탁드립니다:)
iiiiiiiiiiiiiiiiiin님의 댓글
정말 감사합니다~ 결과값을 기존 문자 선택하면 바뀌게 수정해 주신 덕분에 정말 많이 편해졌어요!!