Erase Dublicate entities

Erase Dublicate entities

GeryKnee
Advocate Advocate
1,509 Views
5 Replies
Message 1 of 6

Erase Dublicate entities

GeryKnee
Advocate
Advocate

Hello,

I need a lisp coda, doing as following :

Compares every object iObj of the selected objects collection with every one next of it objects jObj.

if jObj  is same as iObj (that means ::: jObj sould be created as a COPY of iObs prom a position to the same position),  then erase jObj objext.

Thanks,

Gery

0 Likes
Accepted solutions (1)
1,510 Views
5 Replies
Replies (5)
Message 2 of 6

ronjonp
Mentor
Mentor

Try the OVERKILL command.

Message 3 of 6

GeryKnee
Advocate
Advocate

Yes, that' i need.

But overkill allways opens the options dialog.

sending command -overkill it's working as i wish to.

I wish just to type Ed and to get as i typed -overkill

So i wrote to acad.lsp the following command Ed :


(defun c:Ed (); EraseDublicateObjects / OverKill
(command "-overkill" "")
(princ)
)

 

But i get
ED -overkill Unknown command "-OVERKILL". Press F1 for help.
Command: ED Unknown command "ED". Press F1 for help.

 

How can i fix this?

 

0 Likes
Message 4 of 6

ronjonp
Mentor
Mentor

Perhaps:

(command ".-overkill" "_all" "" "_d")
0 Likes
Message 5 of 6

GeryKnee
Advocate
Advocate

I get


Command: ed
.-overkill Unknown command "-OVERKILL". Press F1 for help.
Command: _all Unknown command "ALL". Press F1 for help.
Command: ED Unknown command "ED". Press F1 for help.
Command: _d Unknown command "D". Press F1 for help.
Command:

 

By typing -OVERKILL i get 
Command: -OVERKILL
Initializing...

and continues properly

 

 

 

 

0 Likes
Message 6 of 6

roland.r71
Collaborator
Collaborator
Accepted solution

What version of ACAD are you using?

It used to be ExpressTools with old versions, which might explain why its not working with command.

0 Likes