help to update 2 useful LISP
@jtm2020hyo wrote:
....
Bimport:
I need this lisp to import all block inside a selected folder (or folder with a name written in the prompt command line) but without insert block, just IMPORT.
....
If block already exists inside the drawing, then lisp routine should update or replace such block(s).
Here's my take on that one -- BlockImport.lsp with its BIMP command [I already have a custom command named BI, but you can rename this one's command name to that]. Lightly tested. See the comments at the top of the file. It's modified from my own routine similar to their Bimport, called BlockChart, that Inserts one of each drawing in the folder into the current drawing [also attached if it's of any interest], with the Yes-to-redefine feature added.
@Sea-Haven wrote:
Have a look at www.lee-mac.com Steal.lsp ....
[That's not what's needed -- it is to bring Block definitions (this thread's concern, but also other things) from within another drawing, not to import each drawing in a folder as a Block definition, as requested.]
@jtm2020hyo wrote:
both lisp routines do not redefine block.
I need to update all block inside selected drawing to opened (current) drawing
Could it be just a language difference? This part:
(if (wcmatch (getvar 'lastprompt) "*Redefine*")
(command "_yes" nil); then -- answer to redefine, cancel before Inserting
(command); else -- cancel before Inserting
is dependent on the wording of the prompt in which it asks whether you want to redefine the Block if there is already a Block definition by the same name in the current drawing. In a different-language version of AutoCAD, that test would need to be changed, though the "_yes" answer [when appropriate] should not need to be.
@jtm2020hyo wrote:
both lisp routines do not redefine block.
I need to update all block inside selected drawing to opened (current) drawing
Well, there's the problem. Message 1 said "... all block inside a selected folder ...." That's a very different animal, and my suggested routine does a folder-full of them, with the drawings in the folder becoming the definitions of Blocks in the current drawing.
I don't know how to pull a Block definition out of another drawing file using AutoLisp [though I would not claim that there's no way to do it], other than to Insert the whole drawing file that would bring its Block definitions along with it, but that would not redefine any whose names are already in the current drawing. The Design Center can do it with the Redefine-only option, but it may only be possible one Block definition at a time.
@jtm2020hyo wrote:
@Kent1Cooper wrote:
.... Message 1 said "... all block inside a selected folder ...." That's a very different animal, and my suggested routine does a folder-full of them....I don't know how to pull a Block definition out of another drawing file using AutoLisp ....
I just need a batch update (redefine) all my (dynamic, regular, nested) blocks. no matter if is {from} a folder or a drawing. ...I will adapt my needs to whatever.
The problem is that it really does matter, quite a lot, to the procedure involved, whether the definitions are coming from a folder or a drawing. It's not too difficult if they're separate drawing files in a folder [that's what the BlockImport.lsp code in Message 6 is designed to do]. If it's true that you can adapt it for your needs, to get updated Block definitions out of a single drawing instead, then go for it. My guess is that the way to do so, if the Design Center is too cumbersome, would be to first open up that drawing and use something like wb-all.lsp in Message 1 to WBLOCK all its Block definitions out to a new folder, and then use something like BlockImport.lsp to pull those definitions from that new folder into another drawing.
