LSP routines
Here are some lsp source files which were published in AutoCAD forums.
Please press 'DOWNLOAD' button to get them. Use APPLOAD command in AutoCAD to load.
Please remember to join our "Cards for Orphans" or "Kids with Cancer" causes at any time to support us. Thank you.
RENAMEFILE
Command: RENAMEFILE
Rename multiple drawing files based on title block attribute information.
Discussion: Lisp For AutoCAD DWG filename?
DELML
Command: DELML
Delete objects from multiple layouts by selecting objects in current layout in a window selection.
Command: PSTML
Copy objects in current layout and paste it into multiple layouts.
Discussion: Lisp to delete objects from layouts
LPT
Command: LPT
Link the master point with secondary points with polylines in orthogonal mode.
Discussion: Draw polylines from a master point to secondary points
FMA
Command: FMA
Select blocks with multiple attributes. Fill in all attributes matching a certain pattern with prefix and in a number sequence.
Discussion: Automatically number several attributes of a block
ATTHIDE
Command: ATTHIDE
Turn off attributes individually or globally. Turn on all attributes.
Discussion: Hide multiple attributes
DIMP2X
Command: DIMP2X
Replace "\P" in dimension overrides with "\X" so the second line moves under the dimension line.
Discussion: Quick way input Text Dimension underLine
TAFT
Command: TAFT
Calculate area by multiple length and width in a text of a block object, then add them up and put a summary text in the drawing.
Discussion: Block Calculation
COLORMATCH
Command: COLORMATCH
Change all objects including nested block entities in a certain color to another color. Need load CHZ20.vlx first.
Discussion: All object type color change
AUTOPIPE
Command: AUTOPIPE
Add pipe tee, pipe band and pipe joint details to selected polylines.
Discussion: Drawing joints in a pipeline
VISIBLE
Command: VISIBLE
Show all objects if UNHIDE or UNISOLATEOBJECTS command doesn't work.
Discussion: Invisible polylines
FBCHECK
Command: FBCHECK
Check Mleader content in copper or fiber counts in terms of Cable Order and Cable Position.
If there is an error in the Mleader content, it will put a red text on top of it and indicate which line is incorrect and what is the mistake.
It also summize how many errors found in the selection in the command line.
Cable Position is in 1 -12 circle.
Cable Order is in a continous sequence start from 1. Its last number matches the Cable Size which is defined in the first line.
Discussion Link: Compare Number Position to Reference Table
MCLIP
Clip a block into a few pieces with multiple polylines.
Discussion: Triming data outside of selected block/polygons (in layer)
EXPIDETEXT
REVTEXT
Command: REVTEXT
Reverse characters in a text string.
For example, ABCDEFG becomes GFEDCBA.
It supports Unicode. It can be used to revert right-writing language such as Arabic or Hebrew before converting text into polylines.
Discussion: Adding PDFs / Logos to be printed on Fabric and CNC cut.
SETTEXTFIELD
Command: PFT
Use command PFT to source text object first,
then use command PFT again to put its value as a field into another text object which can be in a different layout.
Discussion: Text field value from Layout1 to Layout2
DWG2MS
Command: DWG2MS
To make the autocad dwg file compatible with microstation software. It does following steps in one go.
Burst all nested blocks/attribute blocks in the drawing
Make all associative hatches as non associative
Make all associative dimensions as non associative
Clean/Purge the drawing
You need download EXPLODEALL and get a free registration code to do Step 1.
Discussion: Need Lisp routine for DWG compatability with MS