filamentteeth.scad

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