How to explode a spline or convert to polyline 1

[meltman]

I need to export a spline into another software package that cannot read a spline. Is it possible to convert the spline to a polyline? AutoCAD will not allow me to explode the spline either. Suggestions? Thanks,

 

[borgunit]

I have a vlx file that converts spline to plines. Just let me know your email and its on its way.

"Whether you think that you can, or that you can't, you are usually right "
.. Henry Ford

 

[Exxit]

Hi,

"flatten", by Express Tools 1-9

Lothar

ADT 2004
ACAD 2002

 

[meltman]

Thanks to all. Express tools did the job!

 

[meltman]

I just noticed an odd occurance in the flatten command and I want to know if there is a solution. I am creating a spline in the shape of a toroid by copying "_spline" followed by multiple data points and tangent points from an excel worksheet. The spline is perfect in autocad... but when I flatten the spline using Express tools the resultant polyline is altered. For example if the spline (and spreadsheet for that matter) show a space between turns in the toroid of .2" for several turns, the polyline might have a space of 0.15" between turns 3&4 then .25" between turns 4&5. The average is correct but the individual turns are not exactly correct. Has anyone ever seen this before and is there a solution or am I just making a not so bright mistake? If it would be helpful I can send file for analyses. Thanks

 

[CarlB]

A free vlx file to convert splines to polylines (maybe the same one as Borgunit's?) is available at

http://www.dotsoft.com/freestuff.htm

"spl2pl.vlx"

 

[pardal]

Hi Borgunit , please send me such file.

devitg@ciudad.com.ar



Pardal

 

[twlincoln]

You can also isloate the spline(s) and SAVEASR12 DXF...

 

[borgunit]

I think the link above to DOTSOFT was the file I am referring to. I found this in my archives that does a decent job...

(defun C:SPLINE2PLINE (/ SPLINES PLINETYPE OSMODE I SPL ED CODEPAIR)
(if
(setq SPLINES (ssget (list (cons 0 "spline"))))
(progn
(if
(zerop (setq PLINETYPE (getvar "plinetype")))
(setvar "plinetype" 1)
) ;if
(setq OSMODE (getvar "osmode"))
(setvar "osmode" 0)
(setq I 0)
(while
(setq SPL (ssname SPLINES I))
(setq I (1+ I)
ED (entget SPL)
) ;setq
(command ".pline")
(foreach
CODEPAIR
ED
(if
(= 10 (car CODEPAIR))
(command (cdr CODEPAIR))
) ;if
) ;foreach
(command "")
(command ".pedit" "l" "s" "")
) ;while
(if PLINETYPE
(setvar "plinetype" PLINETYPE)
)
(setvar "osmode" OSMODE)
) ;progn
) ;if
(princ)
) ;defun

"Everybody is ignorant, only on different subjects." — Will Rogers