객체 복사 xi:Copy

함수 설명

선택한 Entity 또는 Selection Set 을 복사하거나 이동 함

 

구성

(xi:Copy ents p1 p2 CopyOrMove)

    ents : 원본 객체, ssest, entity 모두 가능

    p1 : 기준 점

    p2 : 복사 점

    CopyOrMove : Move T, copy nil

반환 : Selection Set

 

예제)

(if 
   (and
      (setq ss (ssget))
      (setq pt1 (getpoint "\n 복사 기준점 지정: "))
      (setq pt2 (getpoint "\n 목표 점 지정: "))
   )
   (progn
      (setq ss1 (xi:Copy ss pt1 pt2 nil))
      (sssetfirst nil ss1)
   )
)