(info: hole_circle: equally spaced, uses helix.ngc) o sub # = #1 # = #2 (=2000) # = #3 (=10) # = #4 (=3 2:cw, 3:ccw) # = #5 (=1 1:in, 0:out) # = #6 # = #7 # = #8 (=0.5) # = #9 (Circle diameter) # = #10 (=0 start theta) # = #11 (hole diameter) # = #12 (=4 N holes) # = #13 (=0) # = #14 (= 0) # = #15 (= 0) #= #16 (= 0) # = #17 (=1) # = #18 (=0) # = #19 (=0) o call [#][#][#][#] # = [#5410 + .001] # = 0 # = [360/#] # = 0 (notused helix item) # = 0 (notused helix item) # = [# / 2] o while [# LT #] # = [# + # * COS[#]] # = [# + # * SIN[#]] ocall [#][#][#][#][#][#][#][#][#][#][#][#][#][#][#][#][#][#] # = [# + 1] # = [# + #] #<_feature:> = # (using _feature: here disables stop) (that would occur in helix at spin sub call) o endwhile o endsub