paste object multiple times in insertion point of selected blocks (or to any objects that has insertion snap)

[james9710]

Hi, can anyone help me to create a lisp with the following requirement:

I will copy any object with basepoint (lets say a circle, copy with basepoint at center), then paste it at the insertion point of selected blocks.

 

or simply to say, paste object multiple times in insertion point of selected blocks (or to any object that has insertion snap)

[BIGAL]

It is probably best to post some sort of sample dwg so we can see what it is your trying to do.

[mhupp]

Had this laying around sounds like what you want to do. used it mostly on circles but will work on any entity. it calculates the mid point so might want to replace line 8 - 11 with just a getpoint.

 

 

COB.lsp

[james9710]

Perfect! thank you so much @mhupp. i have hundreds of attribute block (we are working on large scale projects) and needs to put value in each differently. so i need to temporarily put marking  (like circle with thickness of 1 and turned on the line weight display) and delete the circle when i'm done in each block.. when i zoom extent i can easily identify if i missed an attribute block if there's still circle on it. How i wish i could learn coding so i can contribute too.