Questions from beginner to advanced. Tell us about good sources of free lisp and post your own routines for testing.Code posting guidelines
The "AutoLISP, VBA, the CUI & Customisation" forum has become a very lively part of the AutoCAD Forums and probably needs a structural review in order to acommodate growth in the future. I'm...
Code posting guidelines
When you are posting AutoLISP or VBA code in these forums, there are some simple guidellines you should observe in order to make life easier for you and for others.
This what wrote it is not working any one help me to fix
(setq a( getvar "player"))
(setvar "Ortho" 1)
(setvar "snap" 1)
(setvar "player" a)
i do a lot of projections when doing elevations / sections
and what i do is have the 2 viewports in model space in which the top vport shows the plan while the bottom shows the...
I have a following query
I have a dwg file with page number which are in format.
Hi I want draw lines it has create new layer and snap end point and Ortho on once I right click or cancel it has to go back to old layer and snap off and Ortho off
I want lisp to draw line create new layer and Ortho on snap end
One I right click or cancel it has to go back old layer and Ortho and snap off
I need a LISP to draw an Xline on a specific layer when I envoke the XL command. I am a total noob on this but is there a way to do this?
One of my routine work is to highlight only part view of a drawing that has changes, to our consultants.
This involves creating individual viewports, of a specific view, out of that drawing...
As posted over at theSwamp, I thought I'd share it with you nice folks too :)
I've seen quite a few of these kind of programs knocking around, so I thought I'd give it a go at writing my own -...
Is it possible to select multiple blocks in the drawing, and instead set up one, choosing the insert. Desired block exists in the sketch. I will I enter their name.
I am looking for the following Lisp.
1 Select Block I make a set of data blocks in the DWG
2 Zomm first block in the set (this block is deleted from the set)
3 I will perform some action with...
I say 30 variables that I want to write the values without quotation marks.
* only a comma between values
(setq ax1 (strcat "Euro" "," "EU7X50" "," euro))
(setq ax2 (strcat "Hol2.5x25" ","...
Currently, the user can:
Insert a Block at all Points from a File (txt/csv)
Insert a Point at all Points from a File (txt/csv)
Following this thread and this thread, I thought I'd write a complementary function to allow the user to operate on numbers inside text.
I am trying to produce a 3D solid routine that combines a UCS 3 point function in it. The first 3 points control the ucs, the following points should be given by user and a extrude must be made. The...
I'm looking for a lisp routine that is capable of searching the content of my view ports for the highest numeric attribute value with a specific tag. For example we have blocks set up with...
I have a LISP routine, GOCHNGPLT, that I wonder if it can be combined with another, GETPLOTDEVICES, so that GOCHNGPLT only runs if it has to? I don't understand either AutoLISP or VisualLISP...
I have 96 different hatches.
I have a template block with only 2 lines of text: Area and Name.
I want this block to appear in the middle(ish) of a hatch when i click on it, with "Name"...
I'm trying to create a dimension when two toggles are picked in unison. Can someone tell me why this gives me a "too many arguments" error please?
(if (and (= toggle1$ "1")( = toggle2$...
Can someone help me create a LISP routine for dimensioning 3D piping?
Here is what I am trying to accomplish,
1. set the OSNAP to "node"
2. set the UCS origin using 3 points
3. create a linear...
Morning Lee, on 1/13/2012 you created a LISP routine which help enormously. I'm wondering if i could trouble you to show me what needs to change in the code below to apply the LISP to the Y & Z axis...
Is there a code to find out current cad version or identification code ?
Hi, maybe I'm doing a stupid mistake and can't see it, but could you please tell me why this works:
(defun c:test (/ thisdrawing mspace ptx pty ptz newptx mylist line_pt1 line_pt2)
Does anyone have a lisp that will change all the objects within all the blocks in a given dwg to layer "0" (while maintaing the block on the layer it was inserted into)? I have tried FixBlock, but it...
and if so... how?
Thanks in advance
Hi, I would like to ask for some help, if there's a way of achieving the same results as the following LISP in a faster way, what I need is to obtain the Z coordinate of the tip of the cylindrical...
Use this control to limit the display of threads to those newer than the specified time frame.
Allows you to choose the data by which the thread list will be sorted.
Order threads in...
Note: when sorting by date, 'descending order' will show the newest results first.
Conceived, created and cared for by David Watson © 1996–2014