3 opening_height = 7.84 - 0.3 + 0.60;
4 opening_depth = 6.0; // 7.88;
6 opening_topprotr = 1.54;
12 retain_hgap_adjust = 1.5;
14 retain_stalk_len = 8.0;
16 retain_bend_gap = 2.0;
17 retain_empir_angle = -10;
18 retain_pushmore_adj = 0.0;
20 hgap_empir_adjust = -0.5 -2.50;
40 peg_inner_thick = 1.0;
47 ins_irad = openingcnr_dia/2 + gap;
48 ins_orad = openingcnr_dia/2 + opening_height - gap;
49 ins_th = ins_orad - ins_irad;
51 handle_x0 = ins_irad + hgap_empir_adjust;
52 handle_h = bot_overlap + ins_th;
53 handle_y0 = -ins_orad-bot_overlap;
54 handle_y1 = handle_y0 + handle_h;
56 handle_x1 = handle_x0 + bot_w + handle_w;
58 topprotr_y = -ins_irad + opening_topprotr;
60 retain_mxy = [handle_x0 - retain_rad - retain_hgap_adjust,
61 -ins_orad + retain_rad - retain_protr];
63 retain_cutout_h = retain_rad * 2 + retain_bend_gap;
65 overret_gaplen = retain_cutout_h / cos(retain_empir_angle);
67 peg_width = retain_stalk_len -
68 (handle_x0 - retain_mxy[0]) / cos(retain_empir_angle)
71 peg_height = retain_cutout_h - (retain_rad + retain_stalk_h)
72 + retain_pushmore_adj;
74 retain1_len = retain_len + retain_stalk_len;
75 retain1_base = total_len - retain1_len;
79 module InsertSection(){
81 translate([-ins_irad, -ins_irad])
83 square([opening_depth - ins_irad, 0.1]);
84 translate([-ins_irad - topprotr_rad,
85 topprotr_y - topprotr_rad])
86 circle(r=topprotr_rad, $fn=10);
88 translate([0, -ins_orad]) square([ins_irad+1, ins_th]);
90 translate([0, -ins_irad])
92 square([100, opening_depth]);
95 circle(r= ins_irad, $fn=20);
100 module HandleSection(){
103 translate([handle_x0, handle_y0])
104 square([bot_w, handle_h]);
105 for (y= [handle_y1 - handle_rh/2,
106 handle_y1 - ins_th + handle_rh/2]) {
107 translate([handle_x1 - handle_rh/2, y])
108 circle(r= handle_rh/2, $fn=20);
112 for (x= [handle_x0 + bot_w + handle_rcut/2,
113 handle_x1 - handle_rh/2 - handle_rcut/2]) {
114 translate([x, handle_y1])
115 circle(r = handle_rcut/2, $fn=20);
120 for (y= [handle_y1 - handle_rh/2,
121 handle_y1 - 3*handle_rh/2])
122 translate([handle_x1 - handle_rh/2, y])
123 circle(r = handle_rh/2, $fn=20);
125 translate([ handle_x1 - handle_rh*2,
126 handle_y1 - handle_rh/2 ])
127 circle(r = handle_rh/2, $fn=20);
130 module RetainSection(){
131 translate(retain_mxy) {
132 rotate(retain_empir_angle) {
133 circle(r=retain_rad, $fn=20);
134 translate([0, -retain_pushmore_adj])
135 square([retain_stalk_len + 1, retain_stalk_h]);
140 module PegSection(delta){
142 translate([0, -delta/2])
144 peg_height + delta]);
145 translate([peg_width - 0.1,
146 peg_height/2 - peg_inner_thick/2])
147 square([0.1, peg_inner_thick]);
151 module PegSectionForDemo(delta){
152 translate(retain_mxy)
153 rotate(retain_empir_angle)
154 translate([retain_stalk_len - peg_width - peg_width_slop/2,
155 retain_stalk_h - retain_pushmore_adj])
159 module RetainCutout(gapping=false){
160 translate(retain_mxy) {
161 rotate(retain_empir_angle) {
162 translate([-50, -retain_rad]) {
163 square([50 + retain_stalk_len,
170 module GappingSection(){
180 module WithRetainSection(){
191 module BasicSection(){
196 module PegSectionSlice(lambda) {
197 delta = peg_wedge_more * (1-lambda) + -peg_wedge_less * lambda;
198 z = peg_len * lambda;
200 linear_extrude(height=0.1)
206 for (i = [0 : iters-1]) {
209 PegSectionSlice(lambda);
210 PegSectionSlice(lambda + 1/iters);
216 rotate([0,-90,0]) Peg();
220 mirror([1,0,0]) PegPrintL();
224 bs1 = retain_len + overret_gaplen + 4;
227 linear_extrude(height= retain_len)
230 translate([0,0, bs1])
231 linear_extrude(height= basics_len)
234 translate([0,0, bs1+0.1]) mirror([0,0,1]) {
235 intersection_for (sl=[0,1]) {
236 multmatrix([[1,0,0,0],
240 linear_extrude(height= overret_gaplen + 10, convexity=100)
245 linear_extrude(height=total_len, convexity=100) GappingSection();
247 translate([0,0, retain1_base]) {
249 linear_extrude(height=retain1_len, convexity=100)
251 translate([retain_mxy[0], retain_mxy[1], 0])
252 rotate([0,0, retain_empir_angle])
253 translate([retain_stalk_len, -30, 0])
254 multmatrix([[1,0,-1,0],
264 color("red") translate([0,0,-3]) BasicSection();
265 color("blue") translate([0,0,3]) WithRetainSection();
266 color("orange") translate([0,0,7]) PegSectionForDemo(0);
270 linear_extrude(height=2) {
272 translate([0, -handle_y0 + topprotr_y + 10])
279 translate([2,0,0]) PegPrintR();
281 linear_extrude(height=retain_len, convexity=100) WithRetainSection();
287 //WithRetainSection();