any lisp to burst multiple files?

[jtm2020hyo]

I need to use "burst" multiple files inside multiple folders and I need a hero to share a lisp to burst multiple files or folders.

attached burst lisp created by lee mac.

[Anonymous · Accepted solution]

Lee-mac also has a great lisp for selecting multiple files, see: http://www.lee-mac.com/getfilesdialog.html

For all of my batch file processing needs I use his getfiles routine to select the files then use a foreach loop to go through the returned list and write a script to open each file and run whatever processing is required.

(setq scriptFile (open "C:\\acadscript.scr" "W"));use whatever flie name/path you'd like
(foreach dwgname rtn ;for each drawing on the list of drawings to be processed
		;add to the script commands to open the file then perform processing
		(princ (strcat "_.open \"" dwgname "\" ") scriptFile);opens the correct file
		;add princ statements to the script file for drawing processing here
		(princ "_.qsave _.close " scriptFile);save and close the drawing after being processed
)
(close scriptFile);close the editing of the script file
(command "_.script" "C:\\acadscript.scr");run the script file

Hope this helps.

[jtm2020hyo]

please, share any example, I'm newbie.

[hak_vz]

It takes time to create more than 300 posts on this forum. Don't just ask other members to solve your problems. Make some effort and start learning autolisp. If will help you to better understand autocad, and to be able to create some code when needed. When you ask for help, try to write down some code, there will always be someone ready to guide you or give advice.    

[devitg · Accepted solution]

As far as I know  alisp can not be apply to lot dwg,s 

Script do the trick 

Or ODBX , maybe can do BURST. 

[Sea-Haven · Accepted solution]

You will have to create a script it should be pretty simple.

open dwg1

do your burst thing as a normal lisp (Burst all my objects) can be multiple lisps

Close Y

open dwg2

do your burst thing as a lisp (Burst all my objects)

Close Y

open dwg3

do your burst thing as a lisp (Burst all my objects)

Close Y

Use lee's scriptwriter to make the script but with the burst lines as well.