안녕하세요. 캐드 혼자 독학중은 초보입니다…
LINE의 끝점은 구하는 방법은 알았는대 LINE의 중심점을 구하는방법을 모르겠습니다…
이미 복사해놓은 객체를 각 라인의 중심과 끝점의 중심에 복사하고싶습니다.
(defun C:s1()
(setq ob (ssget))
(setq n (sslength ob) i 0)
(repeat n
(setq P1 ( cdr (assoc 10 (entget (ssname ob i)))))
(setq P2 ( cdr (assoc 11 (entget (ssname ob i)))))
(setq P4 ——————–[ 라인(ob)의 중심점 ] – 이부분을 너무너무 못하겠습니다.
(command “pasteclip” “_m2p” P4 P1 )
(command “pasteclip” “_m2p” P4 P2 )
(setq i (+ 1 i))
);re
);defun
선배님들 도와주세요ㅠㅠ
선배님 도움 주셔서 너무 감사합니다.