Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Turning a SPLINE to arcs !!

Status
Not open for further replies.

hoja

Technical User
Dec 3, 2003
102
US
Hello, is there a way to turn a spline line unto regular arcs to be read by a CAM program ? The CAM program will not read the spline, only arcs and lines!!! Please help.

I have a copy of the drawing in case someone wants to see it. It's a weird shape, so it was really easy for me to draw the profile edge with a spline line but now my CAM will not read it.

Thanks.
Rod
rod@countintel.com
 
You could explode it but then you end up with lines instead of arcs. If the vertexes are close enough you may be able to Fit curve it with little to no change in the shape. Explode that and you'll get your arcs.
 
Thank you for your reply....that's the thing thought!!! you "cannot" explode the SPLINE !!!
 
Has anyone herd of the DIVIDE command? apparently when you have a SPLINE you can type divide, and type a number of segments....I'm just not sure how use it to turn my spline into arcs.!!! please advice

Thanks
Rod
 
I have used this with great success in the past...

(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
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top