Community
If there's just the one Attribute, something like this, perhaps....
(while T
(command "_.insert"
"YourBlockName"
pause ; for insertion point
"" "" "" ; default scales/rotation
(if (attnum)
(itoa (setq attnum (1+ attnum)))
(itoa (setq attnum (getint "First number value: ")))
)
)
)
That's assuming integer number values, X & Y scale factors of 1, and rotation of 0 -- adjust as required, with pauses or variable values or something. Provide replies to any additional prompts that will appear for a dynamic Block, if any [I don't have those -- this is based on ordinary-Block Insert behavior].
That would be for inserting a bunch of them, automatically repeating until the User hits Escape. [However, if called up again in the same editing session, it would not ask for a number again, but would continue with the next one.] If you just want to do one at a time, doing other things in between, take the (while) wrapper off. Just make sure the 'attnum' variable is not localized in the (defun) function definition if that's how you do it, and that it's not also used as a variable name in other routines that could override its value [if that seems at all likely, use a more routine-particular name].
No Layer or error controls or anything yet....
5spot wrote:
....what i'm trying to do or wishing i could make is an attibute number block that when
i insert it i can input the number i want but then when i insert it again it will pick up from
the last number i use. anyone please?
....
Kent Cooper, AIA 
Just for your consideration --
While using the picking of a point as a test in the (while) function has its advantages, it also has the small disadvantage that you can't see the Block to drag it into place dynamically, since the insertion point is specified outside the Insert command. In either case, the User needs to do something other than pick a point to stop the loop -- with T as the test, I think it has to be Escape, while with stevor's suggestion, Enter/space will also do it. Dragging visually, as one can with Insert generally, may not be important depending on other circumstances, but it's one possible reason to choose one approach over another.
@stevor wrote:....
One mod is the insert point, to exit the function, by replacing the 'T' with the getpoint:
(while (setq bip (getpoint "\n Pick Insert Point: ")) ; stops if a no pick
....
Kent Cooper, AIA
@Anonymous wrote:
would you be so kind to explain how this works for dummies?
i apploaded the lisp to the autocad, and now, how do i use the auto number lisp? with the -insert command i inserted the prepared attributed block, but it still asks me to enter the value manually.....
Turn ATTDIA off [set the System Variable to 0] to have it not ask you, but take the value that the routine feeds in.
If you haven't done this already, it would need to be either included in some larger routine [which could, for example, set the appropriate Layer, and various other things, in addition to this part], or at least defined into a command, such as [in simplest terms]:
(defun C:IBINA (); = Insert Block w/ Incremented Number Attribute
(while T
(command "_.insert"
"YourBlockName"
pause ; for insertion point
"" "" "" ; default scales/rotation
(if attnum
(itoa (setq attnum (1+ attnum)))
(itoa (setq attnum (getint "First number value: ")))
); if
); command
); while
); defun
Then after saving that into a .lsp file and APPLOADing it, you would use the command name IBINA [change that to anything you prefer] to use it.
It could also ask for a Block name, rather than have it built in, and could use assorted other improvements/enhancements.
It's for a Block that's not defined for uniform scaling -- if yours is, remove one of the three "" Enters in that one line.
NOTE: There was a mistake in the original -- it had:
(if (attnum)
but the attnum should not have been in parentheses [corrected above].
Kent Cooper, AIA
@Anonymous wrote:
... it is possible to make a program that auto number atributes from one dynamic block based on block lenght for example?
....
Welcome to these Forums!
That is a different enough thing from the subject of this thread that I suggest you start a new one. But when you do, fill in some more information, such as:
Are these Blocks already inserted and dynamically adjusted in length, and you want to edit an Attribute on that basis, after the fact rather than in the process of inserting as on this thread?
Is the "M1" the name of the Block [as suggested by your ' all of them are calle[d] "M1" ', or the value in an Attribute in it [as suggested by the changes you want to make]?
Kent Cooper, AIA
Forums Links
Can't find what you're looking for? Ask the community or share your knowledge.
Post to forums
