l1 = cad.getlastobj()
cad.line(originx + width, originy, originx + width, originy + length)
l2 = cad.getlastobj()
cad.line(originx + width, originy + length, originx, originy + length)
l3 = cad.getlastobj()
cad.line(originx, originy + length, originx, originy)
l4 = cad.getlastobj()
cad.add(sketch, l1)
cad.add(sketch, l2)
cad.add(sketch, l3)
cad.add(sketch, l4)
cad.fillet2d(sketch, originx, originy, 0, rad)
cad.fillet2d(sketch, originx + width, originy, 0, rad)
cad.fillet2d(sketch, originx + width, originy + length, 0, rad)
cad.fillet2d(sketch, originx, originy + length, 0, rad)
cad.reorder(sketch)
cad.extrude(sketch, height * scale)
cad.setcolor(100, 200, 55)
make_rect(originx, originy, width, length, corner_rad, height, scale)
b1 = cad.getlastobj()
box2_width = width * .6
box2_length = length * .6
make_rect(((originx + width * .5) - box2_width * .5),
((originy + length * .5) - box2_length * .5), box2_width,
box2_length, corner_rad * .75, height, scale)
b2 = cad.getlastobj()
cad.cut(b1, b2)
cad.view_extents()
pitch_angle = (circle_division * (pi * 2)) / 360
angle = 0
count = 0
while (count < num_teeth):
t1 = tooth_form(tilt, .5)
cad.rotate(t1, 0, 0, 0, 0, 1, 0, angle)
cad.cut(obj, t1)
obj2 = cad.getlastobj()
cad.remove(obj)
obj = obj2
angle = angle + pitch_angle
cad.changed()
count = count + 1
cad.remove(obj)
return obj2
units = 25.4 #units are in mm normally so multiply inch units by this
b1 = blank(.49, .3, .1)
cad.translate(b1, 0, 0, 0)
gear1 = polar_array(b1, 4, 72)
cad.rotate(gear1, 0, 0, 0, 1, 0, 0, pi)
cad.rotate(gear1, 0, 0, 0, 0, 1, 0, (2.5 * pi) / 180)
cad.setcolor(0, 188, 180)
gear2 = polar_array(b1, 4, 72)
cad.scale(gear1, 0, 0, 0, units)
cad.scale(gear2, 0, 0, 0, units)
cad.translate(gear2, 0, .009 * units, 0)
cad.cut(obj,t1)
obj2 = cad.getlastobj()
cad.remove(obj)
obj = obj2
angle = angle + pitch_angle
cad.changed()
count = count +1
cad.remove(obj)
return obj2
units = 25.4 #units are in mm normally so multiply inch units by this
b1 = blank(.49,.3,.1)
cad.translate(b1,0,0,0)
gear1= polar_array(b1,4,72)
cad.rotate(gear1,0,0,0,1,0,0,pi)
cad.rotate(gear1,0,0,0,0,1,0,(2.5*pi)/180)
cad.setcolor(0,188,180)
gear2= polar_array(b1,4,72)
cad.scale(gear1,0,0,0,units)
cad.scale(gear2,0,0,0,units)
cad.translate(gear2,0,.009*units,0)
cad.sketch()
sketch = cad.getlastobj()
cad.line(originx,originy,originx+width,originy)
l1= cad.getlastobj()
cad.line(originx+width,originy,originx+width,originy+length)
l2= cad.getlastobj()
cad.line(originx+width,originy+length,originx,originy+length)
l3= cad.getlastobj()
cad.line(originx,originy+length,originx,originy)
l4= cad.getlastobj()
cad.add(sketch,l1)
cad.add(sketch,l2)
cad.add(sketch,l3)
cad.add(sketch, l4)
cad.fillet2d(sketch,originx,originy,0, rad)
cad.fillet2d(sketch,originx+width,originy,0,rad)
cad.fillet2d(sketch,originx+width,originy+length,0,rad)
cad.fillet2d(sketch,originx,originy+length,0,rad)
cad.reorder(sketch)
cad.extrude(sketch,height*scale)
cad.setcolor(100, 200, 55)
make_rect(originx,originy,width,length,corner_rad,height,scale)
b1= cad.getlastobj()
box2_width=width*.6
box2_length=length*.6
make_rect(((originx+width*.5)-box2_width*.5),((originy+length*.5)-box2_length*.5),box2_width,box2_length,corner_rad*.75,height,scale)
b2 = cad.getlastobj()
cad.cut(b1,b2)
cad.view_extents()
