topic Re: Macro needed to cleanup drawings in a directory in Visual LISP, AutoLISP and General Customization Forum

Macro needed to cleanup drawings in a directory

muralitharan.s — Mon, 09 May 2016 12:46:01 GMT

Hi All,

I'm new to this forum. I see you all wonderful people helping each other to make others’ lives easier. Hats off all.

There are some bugs in my drawings. They are usually huge in size (~10MB) and working with these drawings are really slow. (Ex. when I try windows copy, It takes too long to complete, most of the time I get FATAL ERRORS). If I do the audit, purge command alone, the file size is not reducing. It remains same.

So, to reduce the size and clear the bug, I usually perform "audit, purge_all, dxfout and close. Then I again audit, purge_all and save the exported dxf file as the native dwg file (overwrite), by doing this, I could able to reduce the file (At the end, It'll be just ~1MB! in it's size) and it also clears the FATAL ERROR bug.

I have to do the same process for ~100 drawings daily. It eats a lot of time to do this task manually.

I don't have knowledge on lisp. Is it possible to write a lisp routine that will work for me???

I'm using AutoCAD mechanical 2012!

Best regards,

Murali

Sorry for my poor English.

Re: Macro needed to cleanup drawings in a directory

rkmcswain — Mon, 09 May 2016 13:32:12 GMT

Are you wanting a routine to do the audit, purge, and dxfout on all 100 drawings automatically, unattended?

Re: Macro needed to cleanup drawings in a directory

muralitharan.s — Mon, 09 May 2016 15:25:22 GMT

Hi rkmcswain, Thanks for your interest on this thread.

If we can automate without manual interuption that would be great! Otherwise, what best we can do, I'll live with that.

I thought of selecting set of drawings from a directory to do the batchprocess.

Re: Macro needed to cleanup drawings in a directory

Anonymous — Tue, 24 May 2016 02:02:59 GMT

Here is a method of batch processing drawings. You might have to create 2 separate script files to do both steps.

Here is an example .BAT file -

echo off
echo Starting AcCoreConsole
c:
cd C:\Program Files\Autodesk\AutoCAD 2016
echo ================================================================================
FOR %%f in ("C:\TEST\*.dwg") DO "C:\Program Files\Autodesk\AutoCAD 2016\AcCoreConsole.exe" /i "%%f" /s "C:\Test\Purge.scr" /l en-US
echo Done!
pause

Here is the script file -

ZOOM
E
ZOOM
.95X
PURGE
ALL
*
N
PURGE
ALL
*
N
PURGE
ALL
*
N
UPDATETHUMBNAIL
31
UPDATETHUMBSNOW
SAVE