홈/ 질문/Q 172199
다음
진행 중
익명
등록일: 2022-09-29T13:13:43+09:00 카테고리:

블록의 Z축적값 자동 수정되는 리습이 있을까요?

블록의 Z축적값 자동 수정되는 리습이 있을까요?

동그라미 원형의 블록에 대해서 사분점이 안잡히는것에 대하여 예전에 고캐드에서 얻은 팁으로 설정창에서 Z축적값을 X,Y축적값과 동일하게 설정해주면 된다고해서 그 방식으로 사용하고 있었습니다.(블록 설정창 확인시 X,Y축적값 항상 동일, Z축적값만 다른 숫자)

제가 평소에 설정창을 닫은 상태에서 도면 작업을 하는지라 간혹 무거운 도면치면 설정창 여닫는거 기다리는것도 지치구요..

간단한 리습으로 X축적 또는 Y축적의 값을 Z축적의 값과 동일하게 할 방법 없을까요?

공유

    관련 있는 질문들

    답변을 남겨주세요

    답변을 등록하기 위해서는 로그인이 필요합니다.

    아직 계정이 없으신가요?

    1 답변

    1. aalan
    2. Lv.12 
      (defun c:foo (/ i s)
 (if (and (not (initget 2))
   (setq i (getreal "nEnter block scale: "))
   (setq s (ssget ":L" '((0 . "insert"))))
     )
   (foreach b (vl-remove-if 'listp (mapcar 'cadr (ssnamex s)))
     (entmod (mapcar '(lambda (x)
		 (if (member (car x) '(41 42 43))
		   (cons (car x) i)
		   x
		 )
	       )
	      (entget b)
      )
     )
   )
 )
 (princ)
)

또는 블록에 속성이 있는 경우 


      (defun c:foo (/ i s)
 (if (and (not (initget 2))
   (setq i (getreal "nEnter block scale: "))
   (setq s (ssget ":L" '((0 . "insert"))))
     )
   (foreach b (mapcar 'vlax-ename->vla-object (vl-remove-if 'listp (mapcar 'cadr (ssnamex s))))
     (foreach c '("X" "Y" "Z")
(vl-catch-all-apply 'vlax-put (list b (read (strcat c "ScaleFactor")) i))
     )
   )
 )
 (princ)
)
(vl-load-com)
      • 0