pulley135

o103 sub
  (bores 8mm hole clockwise)


#5 = 7.2   (bore diameter - tool diameter)

#3 = 5.0  (safety height)
#7 = 0.5   (depth per cut)
#8 = 0.0   (start depth)
#4 = -6.5 (end depth)

g0 x#1 y[#2+[#5/2]] z#3

o113 while [#8 GT #4]
(down toward the specified depth a bit at a time)
g2 x#1 y[#2 + [#5 / 2]] i0 j[0 - [#5 / 2]] z#8
#8=[#8 - #7]

o113 endwhile

(down to the actual depth)
g2 x#1 y[#2 + [#5 / 2]] i0 j[0 - [#5 / 2]] z#4
(full circle at the actual depth)
g2 x#1 y[#2 + [#5 / 2]] i0 j[0 - [#5 / 2]]
g0 z#3


o103 endsub



o190 sub
(drill pilot hole for hub screw)

g0 x#1 y#2 z5.0

g1 z-1
g0 z1
g1 z-2
g0 z1
g1 z-6.5
g0 z5

o190 endsub



o200 sub
(drill 135 holes for pulley teeth)

g0 z5

#8= 0.0
#9= 60.0  (working radius - 0.6)

o210 while [#8 LT 360.0]

g0 x[SIN[#8] * #9] y[COS[#8] * #9]

g1 z-1
g0 z1
g1 z-3
g0 z1
g1 z-6.5
g0 z2

#8=[#8 + [135/360]]

o210 endwhile

o200 endsub


(main Program)

g40 F200

o103 call [0] [0]
o190 call [-10.825318] [-6.25]
o190 call [10.825318] [-6.25]
o190 call [0] [12.5]
o200 call

g0 x0 y61.048
#8 = 0

o300 while [#8 gt -6.5]

g3 x0 y61.048 j0 z#8

#8 = [#8-0.5]
o300 endwhile

g3 x0 y61.048 j0

g0 z10

M30