wardrobe-hook.scad

   1 // -*- C -*-
   2
   3 module FArcSegment_mask(beta) {
   4   for (i=[0 : 0.75 : 3]) {
   5     rotate(i*beta/4)
   6       polygon([[0, 0],
   7                [1, 0],
   8                [cos(beta/4), sin(beta/4)]]);
   9   }
  10 }
  11
  12 module FArcSegment(xc,yc,inrad,outrad,alpha,delta) {
  13   translate([xc,yc]) {
  14     intersection() {
  15       difference() {
  16         circle(r=outrad);
  17         circle(r=inrad);
  18       }
  19       rotate(alpha) scale(outrad*2) {
  20         FArcSegment_mask(delta);
  21       }
  22     }
  23   }
  24 }
  25
  26 tubeheight = 30;
  27 tubewidth = 15;
  28 mainthick = 4;
  29
  30 clipthick = 2;
  31 clipang = 120;
  32
  33 bend = 5;
  34
  35 tuberad = tubewidth/2;
  36 mainoutrad = tuberad + mainthick;
  37
  38 module Plan(){
  39   dy = tubeheight - tuberad*2;
  40   FArcSegment(0, dy, tuberad, mainoutrad, -1, 181);
  41   FArcSegment(0, 0,  tuberad, mainoutrad, -bend, bend+1);
  42   translate([tuberad, 0]) square(center=false, size=[mainthick,dy]);
  43   FArcSegment(0, 0, tuberad, tuberad + clipthick, 360-clipang, clipang+1);
  44 }
  45
  46 Plan();
  47
  48 //FArcSegment(0, 20, 20,30, 20,160);