flyscreen-handle.scad

   1 // -*- C -*-
   2
   3 opening_height = 7.84 - 0.3 + 0.60;
   4 opening_depth = 6.0; // 7.88;
   5 openingcnr_dia = 2.75;
   6 opening_topprotr = 1.54;
   7
   8 gap = 0.25;
   9
  10 retain_rad = 1.65;
  11 retain_protr = 0.35;
  12 retain_hgap_adjust = 1.5;
  13
  14 retain_stalk_len = 6.5;
  15 retain_stalk_h = 1.5;
  16 retain_bend_gap = 2.0;
  17 retain_empir_angle = -25;
  18 retain_pushmore_adj = 0.75;
  19
  20 hgap_empir_adjust = -0.5 -2.50;
  21
  22 topprotr_rad = 0.35;
  23
  24 bot_overlap = 5;
  25 bot_w = 3;
  26
  27 handle_w = 8;
  28 handle_rh = 3;
  29 handle_rcut = 3;
  30
  31 cutout_gap = 1.5;
  32
  33 total_len = 35;
  34 retaining_len = 10;
  35
  36 overret_hch = 5;
  37
  38 // calculated
  39
  40 ins_irad = openingcnr_dia/2 + gap;
  41 ins_orad = openingcnr_dia/2 + opening_height - gap;
  42 ins_th = ins_orad - ins_irad;
  43
  44 handle_x0 = ins_irad + hgap_empir_adjust;
  45 handle_h = bot_overlap + ins_th;
  46 handle_y0 = -ins_orad-bot_overlap;
  47 handle_y1 = handle_y0 + handle_h;
  48
  49 handle_x1 = handle_x0 + bot_w + handle_w;
  50
  51 topprotr_y = -ins_irad + opening_topprotr;
  52
  53 retain_mxy = [handle_x0 - retain_rad - retain_hgap_adjust,
  54               -ins_orad + retain_rad - retain_protr - retain_pushmore_adj];
  55
  56 retain_cutout_h = retain_rad * 2 + retain_bend_gap;
  57
  58 overret_gaplen = retain_cutout_h / cos(retain_empir_angle);
  59
  60 module InsertSection(){
  61   hull(){
  62     translate([-ins_irad, -ins_irad])
  63       mirror([1, 0])
  64       square([opening_depth - ins_irad, 0.1]);
  65     translate([-ins_irad - topprotr_rad,
  66                topprotr_y - topprotr_rad])
  67       circle(r=topprotr_rad, $fn=10);
  68   }
  69   translate([0, -ins_orad]) square([ins_irad+1, ins_th]);
  70   intersection(){
  71     translate([0, -ins_irad])
  72       mirror([1,1])
  73       square([100, opening_depth]);
  74     difference(){
  75       circle(r= ins_orad);
  76       circle(r= ins_irad, $fn=20);
  77     }
  78   }
  79 }
  80
  81 module HandleSection(){
  82   difference(){
  83     hull(){
  84       translate([handle_x0, handle_y0])
  85         square([bot_w, handle_h]);
  86       for (y= [handle_y1 - handle_rh/2,
  87                handle_y1 - ins_th + handle_rh/2]) {
  88         translate([handle_x1 - handle_rh/2, y])
  89           circle(r= handle_rh/2, $fn=20);
  90       }
  91     }
  92     hull(){
  93       for (x= [handle_x0 + bot_w + handle_rcut/2,
  94                handle_x1 - handle_rh/2 - handle_rcut/2]) {
  95         translate([x, handle_y1])
  96           circle(r = handle_rcut/2, $fn=20);
  97       }
  98     }
  99   }
 100   hull(){
 101     for (y= [handle_y1 -   handle_rh/2,
 102              handle_y1 - 3*handle_rh/2])
 103       translate([handle_x1 - handle_rh/2, y])
 104         circle(r = handle_rh/2, $fn=20);
 105   }
 106 }
 107
 108 module RetainSection(){
 109   translate(retain_mxy) {
 110     rotate(retain_empir_angle) {
 111       circle(r=retain_rad, $fn=20);
 112       square([retain_stalk_len + 1, retain_stalk_h]);
 113     }
 114   }
 115 }
 116
 117 module RetainCutout(gapping=false){
 118   translate(retain_mxy) {
 119     rotate(retain_empir_angle) {
 120       translate([-50, -retain_rad]) {
 121         square([50 + retain_stalk_len,
 122                 retain_cutout_h]);
 123       }
 124     }
 125   }
 126 }
 127
 128 module GappingSection(){
 129   difference(){
 130     union(){
 131       InsertSection();
 132       HandleSection();
 133     }
 134     RetainCutout(true);
 135   }
 136 }
 137
 138 module WithRetainSection(){
 139   difference(){
 140     union(){
 141       InsertSection();
 142       HandleSection();
 143     }
 144     RetainCutout();
 145   }
 146   RetainSection();
 147 }
 148
 149 module BasicSection(){
 150   InsertSection();
 151   HandleSection();
 152 }
 153
 154 module Handle(){
 155   bs0 = retaining_len + overret_gaplen;
 156   bs1 = bs0 + overret_hch;
 157   linear_extrude(height=total_len, convexity=100) GappingSection();
 158   linear_extrude(height=retaining_len, convexity=100) WithRetainSection();
 159   translate([0,0, bs1]) linear_extrude(height= total_len - bs1)
 160     BasicSection();
 161   translate([0,0, bs1+0.1]) mirror([0,0,1]) {
 162     intersection_for (sl=[0,1]) {
 163       multmatrix([[1,0,0,0],
 164                   [0,1,sl,0],
 165                   [0,0,1,0],
 166                   [0,0,0,1]])
 167         linear_extrude(height= overret_gaplen + 10, convexity=100)
 168         BasicSection();
 169     }
 170   }
 171 }
 172
 173 module Demo(){
 174   color("red") translate([0,0,-3]) BasicSection();
 175   color("blue") translate([0,0,3]) WithRetainSection();
 176 }
 177
 178 module Test(){
 179   linear_extrude(height=2) {
 180     WithRetainSection();
 181 //    translate([0, -handle_y0 + topprotr_y + 10])
 182 //      BasicSection();
 183   }
 184 }
 185
 186 //Demo();
 187 //HandleSection();
 188 //InsertSection();
 189 //WithRetainSection();
 190 //BasicSection();
 191 //GappingSection();
 192 Test();
 193 //Demo();
 194 //Handle();