lock-inframe-bracket.scad

   1 // -*- C -*-
   2
   3 tube_dia = 27.5 + 0.5;
   4 lock_w = 42.5 + 0.5;
   5 lock_d = 28.0 + 0.5;
   6 main_h = 45.0;
   7 backflange_d = 12;
   8
   9 lockshaft_r = [5, 5];
  10 cliprecess_h = 16;
  11 total_h = 45;
  12
  13 back_gap = 7;
  14 main_th = 2.5;
  15 midweb_d = 3;
  16 clip_th = 2.5;
  17 clip_gap = 2.5;
  18 clip_d = 22.0;
  19
  20 mountscrew_dia = 4 + 0.5;
  21 clipbolt_dia = 5 + 0.5;
  22
  23 backflange_th = 3.5;
  24
  25 $fn=50;
  26
  27 // calculated
  28
  29 front_th = main_th;
  30 tube_th = main_th;
  31
  32 tube_or = tube_dia/2 + tube_th;
  33 back_ohw = back_gap/2 + backflange_th;
  34 backflange_ymin = tube_or+backflange_d;
  35
  36 lock_0y = tube_dia/2 + lock_d/2 + midweb_d;
  37
  38 lock_or = [lock_w, lock_d]/2 + [front_th,front_th];
  39
  40 module oval(sz){ // sz[0] > sz[1]
  41   xr = sz[0];
  42   yr = sz[1];
  43   hull(){
  44     for (sx=[-1,+1]) {
  45       translate([sx * (xr-yr), 0])
  46         circle(r=yr);
  47     }
  48   }
  49 }
  50
  51 module MainPlan(){
  52   difference(){
  53     union(){
  54       circle(r = tube_or);
  55       translate([-back_ohw,0]) mirror([0,1])
  56         square([back_ohw*2, backflange_ymin]);
  57     }
  58     circle(r = tube_dia/2);
  59     translate([-back_gap/2,1]) mirror([0,1])
  60       square([back_gap, backflange_ymin+2]);
  61   }
  62   translate([0, lock_0y]){
  63     difference(){
  64       union(){
  65         oval(lock_or);
  66       }
  67       oval([lock_w/2, lock_d/2]);
  68     }
  69   }
  70 }
  71
  72 lockshaft_or = lockshaft_r + [clip_th,clip_th];
  73 cliprecess_ymax = cliprecess_h - lockshaft_r[1];
  74 clip_ymin = cliprecess_ymax - total_h;
  75 clip_ogap = clip_gap + clip_th*2;
  76
  77 module ClipElevationPositive(){
  78   oval(lockshaft_or);
  79   translate([-lockshaft_or[0], 0])
  80     square([lockshaft_or[0]*2, cliprecess_ymax]);
  81   translate([-clip_ogap/2, 0]) mirror([0,1]) square([clip_ogap, -clip_ymin]);
  82 }
  83
  84 module ClipElevationNegative(){
  85   hull(){
  86     for (y=[0, cliprecess_ymax+1])
  87       translate([0, y])
  88         oval(lockshaft_r);
  89   }
  90   translate([-clip_gap/2, 1]) mirror([0,1]) square([clip_gap, 2-clip_ymin]);
  91 }
  92
  93 module ClipElevation(){
  94   difference(){
  95     ClipElevationPositive(1);
  96     ClipElevationNegative(0);
  97   }
  98 }
  99
 100 module ExtrudeClipElevation(extra=0){
 101   translate([0,
 102              lock_0y + lock_d/2 + clip_d + extra,
 103              -clip_ymin])
 104     rotate([90,0,0])
 105     linear_extrude(height= clip_d + extra*2, convexity=100)
 106     children(0);
 107 }
 108
 109 module ThroughHole(r, y, z) {
 110   translate([-50, y, z])
 111     rotate([0, 90, 0])
 112     cylinder(r=r, h=100, $fn=20);
 113 }
 114
 115 module ThroughHoles(){
 116   for (z=[ 1/4, 3/4 ]) {
 117     ThroughHole( mountscrew_dia/2,
 118                  -tube_or -0.5*backflange_d,
 119                  total_h * z );
 120   }
 121
 122   ThroughHole( clipbolt_dia/2,
 123                lock_0y + lock_d/2 + clip_d/2,
 124                total_h - cliprecess_h - clip_th - clip_d/2 );
 125 }
 126
 127 module MainPositive(){
 128   difference(){
 129     union(){
 130       linear_extrude(height=total_h, convexity=100) MainPlan();
 131       ExtrudeClipElevation() ClipElevationPositive();
 132     }
 133     ExtrudeClipElevation(1) ClipElevationNegative();
 134   }
 135 }
 136
 137 module Bracket(){
 138   difference(){
 139     MainPositive();
 140     ThroughHoles();
 141   }
 142 }
 143
 144 //MainPlan();
 145 //ClipElevation();
 146 //MainPositive();
 147 //%ThroughHoles();
 148
 149 Bracket();