topic Re: How to ncopy multiple at same place or pause the ncopy command? in Visual LISP, AutoLISP and General Customization Forum

How to ncopy multiple at same place or pause the ncopy command?

darkfprh — Mon, 07 Feb 2022 07:49:33 GMT

Hi I want to copy some entities from xref and paste same place.

(command "ncopy" pause pause "0,0" "0,0")

So I tired to pause the command until selection in over.

But select multiple entities, it doesn't work... Please help me

Re: How to ncopy multiple at same place or pause the ncopy command?

ВeekeeCZ — Mon, 07 Feb 2022 08:39:02 GMT

Not so easy to do. Possibly like this

(while (setq e (cadr (nentsel))) (command "ncopy" e "" "" ""))

But is it really necessary? I mean, how difficult is it to hit enter a couple of times.

Anyway, just a few threads lower @pbejse posted a nice example of code how this could be done without the need to fight with ncopy. HERE

(vl-load-com)
(defun c:demo (/ obj tmp)
  (while (setq obj	(nentselp "\nSelect object to copy "
		) ;_ end of nentselp
      )
    (progn
      (setq tmp (entmakex (entget (car obj))))
      (vla-transformby
	(vlax-ename->vla-object tmp)
	(vlax-tmatrix (caddr obj))
      )
      (Vla-put-layer (vlax-ename->vla-object (entlast)) (getvar 'clayer))
    )
  )
)

Re: How to ncopy multiple at same place or pause the ncopy command?

darkfprh — Mon, 07 Feb 2022 09:17:30 GMT

Thank you so much! It works well 🙂

Re: How to ncopy multiple at same place or pause the ncopy command?

cadomatic — Sun, 07 Apr 2024 12:39:40 GMT

very nice!
is there a way to select all objects in the selected object layer and transform them in one click?

Re: How to ncopy multiple at same place or pause the ncopy command?

ancrayzy — Thu, 11 Apr 2024 00:50:18 GMT

Thank you so much.