6 lid_thinboxbase_overlap = 5;
7 lid_fatbox_overlap = 12;
11 lid_fatbox_switches_h = 6+4;
13 lid_max_switches_w = 70;
14 lid_switches_y_slop = 3;
33 $peg_inner_slop = 0.75;
34 $peg_outer_slop = -0.9;
35 $peg_outer_slop_engage = 0.1;
40 lid_rail_behindslop = 0.5;
41 lid_rail_strongwall = 2.5;
46 lid_thinboxbase_overlap + lid_fatbox_h + lid_fatbox_switches_h;
47 lid_inner_min_h = lid_fatbox_overlap + lid_fatbox_switches_h;
49 lid_inner_kink = [thinbox_len, thinbox_len*2];
51 lid_inner_w_nom = patbox_side;
52 lid_inner_w = lid_inner_w_nom + lid_side_slop * 2;
54 lid_seatline_w = (lid_inner_w - lid_max_switches_w)/2 - lid_switches_y_slop;
56 lid_seatline_h = lid_fatbox_switches_h;
58 peg_main_height = peg_straight_len + (peg_max_dia - peg_main_dia)/2/peg_slope;
60 thinbox_front_z = lid_fatbox_switches_h + lid_fatbox_h - lid_thinbox_h;
62 raillen = patbox_side/2 + rail_overlap;
64 module LidSideProfile(){
65 polygon([[-lid_top_wall, lid_inner_max_h],
66 [min(lid_inner_kink[0],total_len), lid_inner_max_h],
67 [min(lid_inner_kink[1],total_len), lid_inner_min_h],
68 [total_len, lid_inner_min_h],
69 [total_len, -lid_front_wall],
70 [-lid_top_wall, -lid_front_wall]]);
73 module RailProfile(lslop=0.1){
74 yt_base = thinbox_front_z;
75 yt = yt_base - lid_rail_behindslop;
76 pegx = (lid_inner_w_nom - patbox_centres)/2;
77 sw = lid_rail_strongwall;
79 polygon([[-lslop, yt],
80 [pegx - peg_main_dia/2, yt],
81 [pegx - peg_main_dia/2, yt_base - peg_straight_len],
83 yt_base - peg_straight_len - (pegx - peg_main_dia/2)/peg_slope
88 lid_seatline_h - 1]]);
92 overlap = [0.1, 0.1, 0.1];
96 linear_extrude(height= lid_side_wall)
101 cube(overlap + [total_len, lid_seatline_w, lid_seatline_h]);
104 translate([-0.1, -0.1, -lid_front_wall])
105 cube([total_len+0.1, lid_inner_w/2 + 0.2, lid_front_wall]);
108 translate([-lid_top_wall, -lid_side_wall, -lid_front_wall])
109 cube([lid_top_wall, lid_inner_w/2 + 10, lid_front_wall + lid_inner_max_h]);
113 translate([0,0,-0.1])
114 linear_extrude(height=raillen+0.1) //todo
118 translate([raillen, 0,0])
120 rotate_extrude($fn=50)
121 RailProfile(lslop=0);
122 translate([0, 25-0.1, 0])
123 cube(50, center=true);
127 module Lid(){ ////toplevel
130 translate([0, -lid_inner_w/2, 0]) LidSide();
134 polygon([[-peg_engage_depth, (peg_engage_dia - $peg_outer_slop_engage)/2],
135 [0, (peg_engage_dia - $peg_outer_slop_engage)/2],
136 [0, (peg_main_dia - $peg_outer_slop)/2],
137 [peg_straight_len, (peg_main_dia - $peg_outer_slop)/2],
138 [peg_main_height, (peg_max_dia - $peg_outer_slop)/2],
139 [peg_main_height+peg_top_thick, (peg_max_dia - $peg_outer_slop)/2],
140 [peg_main_height+peg_top_thick, (peg_inner_dia + $peg_inner_slop)/2],
141 [-peg_engage_depth, (peg_inner_dia + $peg_inner_slop)/2]]);
144 module Peg(){ ////toplevel
145 echo($peg_outer_slop_engage);
146 rotate_extrude($fn=50)
151 module Pegs(){ ////toplevel
153 dslops = [0, -0.5, -1.0, -1.5];
154 stride = peg_max_dia + 4;
155 for (i=[0:len(dslops)-1]) {
156 translate([i*stride,0,0])
157 assign($peg_outer_slop_engage= baseslop + dslops[i])
162 module AtFixingCentres(){
164 translate([patbox_side/2 + fc*patbox_centres/2,
171 module TopPattressBox(){
173 translate([0,0, -lid_thinbox_h])
174 cube([patbox_side, patbox_side, lid_thinbox_h]);
176 translate([0,0,-10]) cylinder(r=peg_engage_dia/2, h=20);
183 translate([0,0, thinbox_front_z])
184 rotate([0,180,0]) translate([0, -patbox_side/2, 0])
185 rotate([0,0,90]) union(){
187 color("blue") AtFixingCentres(){
188 rotate([180,0,0]) Peg();
201 //translate([0,0,-lid_fatbox_switches_h]) Lid();