Our Newsletter

Loading...Loading...


 

July 2010
S M T W T F S
« Mar    
 123
45678910
11121314151617
18192021222324
25262728293031

LISP & VBA

(This page needs some work, but we wanted to make the files available again quickly.)

Revit Local File Creator (875) - **UPDATED 4/29/2010** Version 1.9.7: This handy tool simplifies and standardizes the process of creating local files from central files. More importantly it keeps the average user AWAY FROM THE CENTRAL FILE!. It includes a detailed help file to assist with configuration. You can find introductory details at the author's website here: http://tech.kdcad.com/?p=151 Version 1.9.7 fixed a bug in the "open with which version of Revit" option. This version now recognizes multiple file locations correctly.

PDF to TIFF Converter (315) - Converts PDF files to single-bit TIFF format for import into AutoCAD drawings. Converts a single file or an entire directory of PDFs.

Arc to Circle (504) - Simple LISP routine to create a complete circle from an arc.

AutoTrim (301) - Trims the gap between intersection points from a selection set. Thanks to AUGI Moderator Peter Jamtgaard, July 13, 2004 for this great trimming LISP file. A sample dwg is included.

Block Stretcher (438) - Simple command line routine for stretching blocks along a specified axis. Very handy for resizing door or window blocks on the fly.

Got Xrefs? (682) - Designed to run in a "batch mode", this routine will search a dwg file and create a log file of any xref's attached. Typically used when batch-binding xrefs to check for xrefs that failed to bind. By default, the log file is saved to C:\\Temp\\HASXREF.LOG

Hide Attributes (326) - **Special Thanks to John Uhden (cadlantic.com) and Joe Burke (acadx.com) for helping iron out the rough spots! As it stands this routine will hide all attributes in all blocks in Model Space. A couple modification options can be found in the file.

Handy Collection LISPs (545) - This is a handy collection of LISP routines. Explore and have fun!

Zoom to Ellipse (198) - This routine will recenter and zoom to all ellipse entities in a drawing one ellipse at a time. Can be easily modified to look for other entities.

OBS-IT (1078) - NOTES: OBSIT creates an archive point for the current drawing by saving it out and adding and OBS+date" prefix (eg "Drawing1.dwg" is saved out as "OBS 01.07.03 Drawing1.dwg"). You continue to work in "Drawing1.dwg".

Save as Revision (662) - Saves current drawing with new revision number. Last (2) digits of drawing name are replace with either A) the next consecutive number or B) with a number the users chooses. In Theory the chosen number would represent a new version "branch".

Lock Viewports (993) - This routine offers some simple viewport locking and unlocking tools. VPL locks all viewports in the current layout, VPU unlocks them, VPAL locks all viewports in all layouts.

Square Foot to Text (619) - Adds up square footage of mulitple polylines and prompts for selection text to modify. Assumes some text is in place to be modified as in a table or chart.

Quick QLeader (566) - Places leaders and annotation on layer of your choice without taking you away from the current layer. If layer is not present, QQL will create it using your specifications. Directions for modifying the layer can be found in the LISP file.

Final Save (713) - This routine is a modified version of Final_Save.lsp. In this version, there are two command formats - Alert Mode and Quiet Mode. Alert Mode: From the command line, PSFSV will perform a Final Save on all Layout Tabs - zooming to extents on each tab and parking on the first layout before saving. In this mode, an alert box pops up to tell you that the drawing has not been saved properly and another to tell you its done. Quiet Mode: From another routine or script, you can call QPSFSV ('Q' for Quietmode) which will run PSFSV without the alerts. If a drawing has not been saved properly, the final "QSAVE" is skipped and the drawing name is written out to a file that you can check after your batch has run.

Delete Layer Filters - LISP version (559) - Use this routine to delete those pesky layer filters.

Delete Layer Filters - VBA version (610) - Use this to delete those really pesky layer filters - this version is much faster than the LISP version. Useful as a startup routine.

Translate Layers (472) - TRANSLAY will translate your layernames, linetypes, and colors to those of your clients based on the contents of the Translation Spreadsheet. It can be used in a single drawing by typing TRANSLAY at the command line and manually selecting the Translation File and LineType file, or it can be used in a scripted process in this format: (translay ) I does require an Excel spreadsheet to function. Instructions and formatting can be found in the LISP.