객체마다 제자리 크기(스케일) 일괄조정 하는 리습 없나요??
컨텐츠 정보
- 143 조회
- 1 댓글
- 0 추천
- 0 비추천
-
목록
본문
아무리 검색을 해도 안나오네요..
xicad에는 scalemulti라는 명령어로 해결 한다는데 일단 저는 일반 zwcad를 쓰고 있구요 검색을 해도 안나올뿐더러 리습 공유된거 받아서 써봤는데
분명 제자리에서 스케일 조정이 된다고 하는데 한 기준점을 기준으로 조정이 되더라구요.
제가 말하는 제자리는 객체의 삽입점이라던지 중심점이라던지 그런 기준으로 각각 스케일을 조정하고 싶은건데요 일단 제가 받은 리습 공유 해드리겠습니다.
(defun c:MSS(/ deflt old_b_scale alrim bp ojt)
(setvar “DIMZIN” 0)
(if (= b_scale nil) (setq b_scale 1) (setq old_b_scale b_scale))
(setq deflt (rtos b_scale 2 3))
(setq alrim (strcat “n 스케일값 ? [기본값=” (print deflt) “] : “))
(setq b_scale (getreal alrim))
(if (= b_scale nil) (setq b_scale old_b_scale))
(setq bp (getpoint “n 기준점 ?…”))
(setq ojt (ssget))
(while (/= bp nil) ;반복 구문
(command “scale” ojt “” bp b_scale)
(setq bp (getpoint “n 기준점 ?…”))
(prompt “n 스케일값 ?…”)
(setq ojt (ssget))
);end of wile
);end of defun
관련자료
CATS_Developer님의 댓글
CATS에 객체의 객체의 축척을 수정하는 EES 명령어가 있습니다. 객체의 중심점 기준으로 변경됩니다.
참고해주세요^^ https://cafe.naver.com/autocats/912