List: Not listing, straight up: right?
While surfing the apt stuff this morning I found a program called cone.apt. I looked appropriate to GH's problem. Edited version is listed below. For some reason the loop limit doesn't kick in so it goes on past the desired depth. Other than that it appears to work at least under sim. partno cone from spiral $$ This program profiles a cone by spiralling around $$ the surface. It uses a parametric equation for a $$ helix, and decreases the spiral's radius as it $$ generates the spiral. clprnt machin/emc $$machin/pmill cutter/0.125, .0625 $$ 1/8" ball nose d1=4 $$included angle of cone d2=.75 $$start dia d3=.52 $$end dia d4=.0i $$spiral feed per rev d5=5 $$degree increments endz=(d2-d3)/2/tanf(d1/2)$$depth of cone goto/0,0,0 theta=0 tanAng=tanf(d1/2) loopst agn) z=-(d4/360)*theta x=(d2/2+z*tanAng)*cosf(theta) y=(d2/2+z*tanAng)*sinf(theta) goto/x,y,z theta=theta+d5 if(endz+z)quit,quit,agn,quit) loopnd fini It does need a few edits to work, etc Fn, G5n, M2 | M30 and truncating the code at the desired depth. Dave ------------------------------------------------------------------------------ Try before you buy = See our experts in action! The most comprehensive online learning library for Microsoft developers is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CSS3, MVC3, Metro Style Apps, more. Free future releases when you subscribe now! http://p.sf.net/sfu/learndevnow-dev2 _______________________________________________ Emc-users mailing list Emc-users@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/emc-users