filamentteeth.scad

   1 module FilamentTeeth(fdia, teethw=teethw,
   2                          stembendd=0.5, stembendl=7, teethxl=1.5) {
   3   gapw = fdia-stembendd*2;
   4   teethbigw = gapw + teethw*2;
   5   basew = fdia+teethw*2-stembendd*2;
   6   based = basew/3;
   7
   8   translate([-based, -basew/2, 0]) cube([based, basew, h]);
   9   difference() {
  10     union() {
  11       translate([-d, -teethbigw/2, 0])
  12         cube([d+stembendl + teethw, teethbigw, h]);
  13 //  translate([
  14 //  stembigw = fdia + stembend
  15 //  translate([-d, -stemw,
  16       linear_extrude(height=h) {
  17         translate([stembendl-fdia/2, 0]) circle(fdia/2+teethw, $fn=30);
  18       }
  19     }
  20     translate([0,0,-1]) {
  21       translate([0,-gapw/2])
  22         cube([stembendl+teethxl+1, gapw, h+2]);
  23       linear_extrude(height=h+2) {
  24         translate([stembendl-fdia/2, 0]) circle(fdia/2, $fn=30);
  25       }
  26     }
  27   }
  28
  29   for (mirr=[0:1]) {
  30     mirror([0,mirr,0]) {
  31       translate([stembendl + teethw, gapw/2, 0])
  32         rotate([0,0,30])
  33         cube([teethxl, teethw, h]);
  34     }
  35   }
  36 }
  37