These progs held in AutoCad 2002/MySupport_Custom folder (12 May 2003).
3dspiral.lsp An Autodesk download that is hard to find now since their most recent website reorg (dumping PointA). Sourced from www.mcneel.com. as 'spiral.lsp' and name changed.
Intiated by 'spiral' or '3dspiral'. You nominate the center point, horizontal growth per rotation and vertical growth per rotation. It appears to me that if you specify:-
* Hor growth and zero vertical growth gives you a flat spiral making the ealier 'spiral.lsp' (listed below) redundundant.
* Zero hor growth with vertical growth gives parallel sides and
* Hor and vert growth gives a spiral with a different dia at the bottom and the top.
It is by the same author. Watch if you keep both that 'spiral' is an initiator for both.
I had heard it said there was a 2D and a 3D version of spiral and when I found this at mcneel.com it was named spiral.zip and I changed the name to 3dspiral.
The comments on application written below for spiral.lsp apply.
spiral.lsp Autodesk (ex R12) Download
Makes a flat planer spiral like a galaxy spiral or looking down on a seashell.
Afterwards use UCS (New) to move the origin to the outer end of the spiral then UCS (New) again to rotate the x axis. This has the effect of putting the drawing plane perpendicular to the end of the spiral with the z axis tangential. Draw a CIRCLE, RECTangle or any shape providing you ensure it is a closed polyline finally. Use the OSNAP when you commence drawing the profile to ensure it is precicely placed on the end of the spiral. I used the solids EXTRUDE command selecting the 'Path' option at the 'Length of extrusion' prompt picking the spiral somewhat near the profile (at this stage the end of the spiral is the start of the extrusion path). I suppose surface command options exist as an alt to a solid extrusion.
TRAPS: Make sure all SNAP, OSNAP are OFF or the when you are using spiral.lsp to create your spiral or it will fail as lines being created will snap onto a nearby line endpoints instead of being placed where the author was directing them. Some more detailed lisp might defensively check for innapropriate settings and change them (and maybe even change them back to the original settings afterward) but this adds greatly to the code complexity.
The profile of the extrusion can be as 'high' as you like parallel to the center axis of the spiral (think of the length of a rolled up newspaper) but the width must be small enough (think of the thickness of a newspaper) so the profile does not 'self-intersect'.
helix.lsp Assoc. Prof Tony Hotchkiss. CADDigest Article download. Initiator is 'hlx'.
Makes a thread as a surface model. Has 'hole' through center like a cardboard tube. I capped the exposed end with a circular region. May be a better surfacing command to fill in the end circle.
spring.fas Fastload Autolisp file. From Spaug Tip of Month 2000 to 2002 somewhere (www.spaug.org)
To be looked at. But a pic showed it as a coil spring with flats on the top and bottom
tap.lsp and tap.dcl From Spaug Tip of Month 2000 to 2002 somewhere (www.spaug.org)
Two fles, an Autocad AutoLisp and Dialog Definition Language, probably doing the same thing.
to be looked at.
thread.lsp Jim Fitzgerald, Terry Rawkins and others Creates 3D solid (ACIS) threads. Rated ok in R14, A2000 and worked for me in A2002
Solids equivalent to Tony Hotchkiss's surface modelling helix.lsp. Good.
tthelix.lsp Originally helix.lsp. 8/89 Tony Tanzillo. Sourced from www.spaug.org 1999 Monthly Tips. Directed to it by David at www.cadtutor.com
Draws 3D helical springs and coils of varying width. Initiator is 'helix'.
User inputs start angle, outside diameter of coil, wire diameter, pitch, number of turns.
Note: Every line of Tony's code is commented. His site is www.cadzone.com. He sells handy utilities and provides some free downloads (but this is not on his site).
trng.lsp Four training lisps on spirals/helixes on a page in CadTutor combined int on file to load.
cad_tutor/trng_lisps/trng.txt The code as a text file to view. Save as .LSP to use. Instructions are in the initial comments.
cad_tutor/trng_lisps/trng_lisps.htmlA page with showing the expected output and some extra notes on methods of loading the programs for beginners.