LISP FOR COPY COMMAND

[krishravi2000]

Hi guys,

I need a help in lisp, I Require a lisp that copies the object or text and paste multiple times till I press enter or escape. In general I want a Lisp that does exactly what a copy (CO) command do but i dont want to change it in the acad.pgp file

[Valentin_CAD]

@krishravi2000 ,

Have you tried using the "Multiple" option under "Mode"?

[Kent1Cooper]

In newer versions, COPY by default does multiples, so you don't need anything.  If it isn't working that way for you, run it and after the object selection when it's asking for the base point, use the mOde option to set that to Multiple.  It will remember that.  In older versions, there's also a simple Multiple option to get it to do that within one running of the command, though it's not that way by default, and it needs to be called for each time.

[imadHabash]

Hi,

You may need to check and review COPYMODE (System Variable) .

[krishravi2000]

Yes sir i tried that as well 

I want use a lisp so that i can use the Lisp command C for multiple copies and autoCAD CO for single copy

[krishravi2000]

The statement mention is true sir but I want two separete commands for single copy and multiple copy 

[krishravi2000]

Hi sir,

I changes copymode to 1 which broughtout the Multiple option outside the mode format but the lisp I created shows "no function definition" 

(Defun c:C() (C:COPY "M")

 

[Valentin_CAD · Accepted solution]

@krishravi2000 ,

Instead of a LISP, (Don't see why you would need this, but) in the CUI create a command and use these macro:

Copy Single = C^C^_copymode;1; $M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) 

Copy Multiple = C^C^_copymode;0; $M=$(if,$(eq,$(substr,$(getvar,cmdnames),1,4),GRIP),_copy,^C^C_copy) 

This may be useful:

• AutoCAD LT 2025 Help | About Special Control Characters in Command Macros | Autodesk

[ВeekeeCZ]

---

@krishravi2000 wrote:

Hi guys,

I need a help in lisp, I Require a lisp that copies the object or text and paste multiple times till I press enter or escape. In general I want a Lisp that does exactly what a copy (CO) command do but i dont want to change it in the acad.pgp file

---

So if you want to exactly what COPY (CO) does, so why you would need (and don't want) to make some change in PGP? 

[pendean · Accepted solution]

@krishravi2000 https://forums.autodesk.com/t5/visual-lisp-autolisp-and-general/change-copy-mode-in-lisp/td-p/124507... 

[krishravi2000]

copy command does single and multiple copies I was in need of lisp so that i can use lisp for multiple copies and use normal autocad command for single copy