LISP - ATTACH EXISTING TEXT TO AN EXISTING BLOCK AS AN ATTRIBUTE

[Anonymous]

Hello,

Need some help creating a LISP for the following.

A) I have a block. This Block has an Attribute defined (tag) named as number
B) I have a text in the drawing. I want to convert/attach this text as an attribute (as a value to the tag named number) to the above block . 

C) Also, I want the text layer to be retained as it was originally (when it was just a text) after it is moved to an attribute of that block

Any help on this would be really appreciated. Thank you in advance.

[john.uhden]

That was stupid of me.  I tried testing without the missing get_ents function.

Could you please PM it to me?  Thanks.

I am guessing that the simple magic is '(66 . 1) plus the SEQEND.