#=64 #=0.1000 f50 g0 x1 y0 z1 g1 x0 y0 z-.010 ( sub helix [arc_repeats] [step_over] [radius_begin] ) o sub #=[360/#1] #=[#2/#1] #4=#3 (Set initial radius to radius_begin) #=0 o100 repeat [#1] #=[#+#] #4=[#4+#] #=[#4*cos[#]] #=[#4*sin[#]] g2 r#4 x# y# o100 endrepeat o endsub (sub spiral [arc_repeats] [step_over] [radius_begin] [spiral_repeats]) o sub #=#3 o200 repeat [#4] o call [#1] [#2] [#] #=[#+#2] o200 endrepeat o endsub o call [#] [#] [0] [15] g0 z1 g0 x2.5 y2.5 g92 x0 y0 g0 x1.5 g1 x0 y0 z-0.010 o call [#] [#] [0] [15] g92.1 g0 x0 y0 z1 m2