그룹 무브 기능.

좋은 하루입니다.

한간지 조언좀 부탁드립니다.

해당리습은 무브 기느입니다.

(defun c:aa()
 (if (setq s (ssget '((8 . "welding")))) (command "move" s ""))
 (princ)
)

그룹중에서 LWPOLYLINE 만 줄었다 늘었다 할수있나요??  도면층은위와 동일합니다.

도면층 웰딩 레이어만 선택해서 무브하고싶습니다. 단 폴리라인 시작점은 고정 원을 무브하는데 선길이는

자둥으로 늘렸다가 줄었다 할 수있을까요?

첨부파일과 동일하게 시작점은고정 원과 마주되는 부분 선을 늘었다줄었다하면서 위치를 옮겨야합니다. 

설명이 좀 부족할까요??