<![CDATA[
<p><b>※ <span style="color: #ee2323;">말머리 필수</span> (말머리 누락시 통보없이 게시 글이 삭제될 수 있습니다.)</b></p><p> </p><p><b>※ 회원정보는 최소한 '<span style="color: #ee2323;">운영진 공개</span>'로 지정</b></p><p> </p><p><b>※ 캐드나 리습 관련 질문일 경우 <span style="color: #ee2323;">반드시 캐드 종류와 버전 명기</span> (<b>ex> 오토캐드2022 / 윈10 64비트)</b></b></p><p><b>   <캐드 / 윈도우 종류 및 버전 :                            /                               ></b></p><p> </p><p><b>※ 질문은 최대한 성의있고 자세하게 (답변자가 되묻게 질문하지 말아주세요.)</b></p><p> </p><p><span style="color: #000000;"><b>※ 이외는 자유롭게 글 남겨 주시면 됩니다.</b></span></p><p> </p><p> </p><p>안녕하세요.</p><p>객체를 복사후에 지정한 지점에 붙여넣기를 하면은 무조건 아래방향은 입력한 수치만큼 이동하는 리습을 원합니다.</p><p>감사합니다.</p><p> </p><div class="figure-img" data-ke-type="image" data-ke-style="alignCenter" data-ke-mobilestyle="widthOrigin"><img src="https://t1.daumcdn.net/cafeattach/n4jE/66a3a51b4085aa4e9255d2bec674befab14fd57b" class="txc-image" data-img-src="https://t1.daumcdn.net/cafeattach/n4jE/66a3a51b4085aa4e9255d2bec674befab14fd57b" data-origin-width="873" data-origin-height="606"></div><div class="figure-file" data-ke-type="file" data-file-src="https://t1.daumcdn.net/cafeattach/n4jE/0d35cee4ab00802057332138242680debc2c29c2?download" data-file-name="복사+붙여넣기+수치값만큼이동.dwg" data-file-size="189441" data-mimetype="image/vnd.dwg" data-ke-align="alignCenter"><a href="javascript:checkVirus('grpid%3Dn4jE%26fldid%3DESJj%26dataid%3D25312%26fileid%3D2%26regdt%3D20240325224240')"><div class="image"></div><div class="desc"><div class="filename"><span class="name">복사+붙여넣기+수치값만큼이동</span><span class="type">.dwg</span></div><div class="size">185.00KB</div></div></a></div>
<!-- -->]]>
카페 게시글
검색이 허용된 게시물입니다.
다음검색
첫댓글 (defun c:test ( / ss a b _dist1)
(setvar 'Cmdecho 0)
(setq ss (ssget "-G"))
(setq a (trans (getpoint "\n기준점은:.....") 1 0))
(setq b (trans (getpoint a "\이동할점은:....") 1 0))
(setq _dist1 0.05)
(if _dist2
(setq _dist1 _dist2)
)
(setq _dist2 (getreal (strcat "\n <"(vl-princ-to-string _dist1)">이동거리는:....")))
(if _dist2
(command "move" ss "" a (list (car b) (- (cadr b) _dist2) (caddr b)))
(command "move" ss "" a (list (car b) (- (cadr b) _dist1) (caddr b)))
)
(setvar 'Cmdecho 1)
(princ)
)
닭발에소주님 답변 감사합니다.
제가 방금 작성 해 주신 리습을 실행 시켜보았는데요.
한번씩 수치를 입력을 하면은, 입력한 수치값이 적용이 안되고 "0"으로 작동이 되는것처럼 객체와 객체가 간격이 띄어지지가 않습니다.
혹시나 싶어서 시험해봤는데 이상없이 동작하네요
@닭발에소주 넵 감사합니다. 제가 다시 확인하겠습니다.
command문에 osnap처리를 해주면 제대로 동작하겠네요.