다중의 원들을 한방에 이렇게 만들수 없을까요?

(defun test ( / ss x c1)
(setq ss (ssget (list (cons 0 “Circle”))))
(repeat (setq x (sslength ss))
(setq c1 (entget (ssname ss (setq x (- x 1)))))
(setq cenpt (assoc 10 c1))
(setq cenpt (list (nth 1 cenpt)(nth 2 cenpt) (nth 3 cenpt)))
(command “trim” (cdr (assoc -1 c1)) “” cenpt “”)
) ; repeat
) ;defun
(test)


이 리습의 반대 기능을 하고 싶습니다.
부탁 드리옵니다.

trim multiple outside circle.dwg