Try something like this (untested)
Hi Ron Thank you very much because it works very well. I really appreciate your help.
I realized that I had an error when I wrote the initget: on line 3; but I simply removed the "r" which is too much, since it doesn't work with arcs. But now everything is fine. I will study your code to learn from it.
Another detail that I do not know how to solve is when I want to add everything, I have to type "a" to be able to designate objects. How can I make it to be predetermined and work with an enter key?