Select an attribute in a block and copy with increment in the same attribute of another block

[itacad]

Hi, I've been looking for a long time for a lisp that does what is explained in the subject:

1) select an attribute of a block

2) select anther block (same blockname)

3) paste the value copied in poit 1), increased +1, in the same attribute of the block selected in point 2)

 

I have find a lot of lisp for copy text and a lot of lisp for increase text, but not the combination I described.

Have you ever discussed this?

 

Greetings

[Steven P]

Try ctx+ which I posted here, see if that works

 

You have to select where to put the text but then you would still need to select the 2nd block so same number of mouse clicks

Edited March 21, 2023 by Steven P

[BIGAL]

1 use "nentsel" not "entsel" this gets a attribute rather than a block when picked, get text of attribute and tag name, then use ssget Pt this gets block entity and can get the block name that you just picked. 

2 entsel, or better is use SSGET to force a block pick with correct block name wrap in while

3 as you know tagname then replace textstring with old+1 use entmod or Vla-put-textstring, lots of code for edit correct attribute via tag name.

 

You should be able to work it out from my suggestions as you have started doing your own code.

[itacad]

Great  CTX+ !!!

in the tests I've done it does just what I need!