chiark / gitweb /
nook-case: BaseTestRest
[reprap-play.git] / nook-case.scad
1 // -*- C -*-
2
3 include <utils.scad>
4
5 nook_th = 12.41 + 0.50;
6 nook_w = 127.12 + 0.75;
7 nook_h = 123.44 + 21.88 + 21.05 + 0.75;
8
9 usb_w = 12.5;
10 usb_below = 2.5;
11
12 open_recess_w = 12.5;
13 open_recess_h = 2.5;
14
15 nook_cnr_rad = 10;
16
17 case_th = 2.5;
18 ledge_w = 4;
19 tape_th = 1.75;
20 tape_inside = 2.0;
21
22 gap = 0.5 * [1,1];
23
24 tape_w = 15;
25
26 test_pillar = 4;
27
28 engage_l0 = 10;
29 engage_l1 = 10;
30 engage_l2 = 3;
31
32 tooth_inward = gap[0] * 1.0;
33 tooth_x = nook_w * 1/6;
34 tooth_w = 15;
35
36 $test = false;
37
38 $fa = $test ? 10 : 3;
39 $fs = $test ? 0.1 : 1;
40
41 // calculated
42
43 tooth_height = nook_th;
44 ledge_h = case_th;
45 lid_th = case_th;
46 tooth_th = case_th;
47
48 spp0 = [0,0];
49 spp1 = spp0 + case_th * [-1,0];
50 spp9 = spp0 + ledge_h * [0,-1];
51 spp8 = spp9 + nook_th * [0,-1];
52 spp7 = spp8 + case_th * [-1,-1];
53
54 spp11y = spp1[1] - tape_th;
55 spp4y  = 0.5 * (spp0[1] + spp7[1]);
56 spp3y = spp4y + tape_inside/2;  spp5y = spp4y - tape_inside/2;
57 spp2y = spp3y + tape_th;        spp6y = spp5y - tape_th;
58
59 spp20 = spp8 + nook_cnr_rad * [1,0];
60 spp20x = spp20[0];
61
62 tppA = spp0 + gap;
63 tppB = spp1 + [0, gap[1]];
64 tppC = tppB + lid_th * [0,1];
65 tppD = [ spp20x, tppC[1] ];
66 tppE = [ spp20x, tppB[1] ];
67 tppF = tppA + ledge_w * [1,0];
68 tppG = tppF + ledge_h * [0,-1];
69 tppH = [ tppA[0], tppG[1] ];
70
71 tppJx = tppA[0] + tape_th;
72
73 tppK = [ tppC[0], tppG[1] ];
74 spp31 = tppK - [0, gap[1]];
75 spp30 = [ spp8[0], spp31[1] ];
76
77 nom_cnr = 0.5 * [nook_w, nook_h, 0] - nook_cnr_rad * [1,1,0];
78
79 etxa = nom_cnr[0] - engage_l2;
80 etxb = etxa - engage_l1;
81 etxc = -(nom_cnr[0] - engage_l2);
82
83 tapa = nom_cnr[1] - engage_l2;
84 tapb = tapa - tape_w;
85
86 opra = nom_cnr[1] - engage_l2;
87 oprb = opra - open_recess_w;
88
89 tppS = tppB + [-gap[0], 0];
90 tppP = [ tppS[0] - tooth_th, tppC[1] ];
91 tppQ = tppP + tooth_height * [0,-1] + tooth_inward * [1,0];
92 tppR = [ tppS[0] + tooth_inward, tppQ[1] ];
93 tppM = (tppQ + tppR) * 0.5 + tooth_th * 0.5 * [0,1];
94
95 module RightSideMainProfile() {
96   rectfromto(spp7, spp0);
97   rectfromto(spp7, spp20);
98 }
99
100 module LeftSideMainProfile() {
101   rectfromto(spp7, spp30);
102   rectfromto(spp7, spp20);
103 }
104
105 module TopTapeCutout() {
106   polygon([ tppA,
107             tppA + [-40, 0],
108             tppG + [-40,-1],
109             [ tppJx, tppH[1]-1 ],
110             [ tppJx, tppC[1]+1 ],
111             [ tppA[0], tppC[1]+1 ]]);
112 }
113
114 module RightTopMainProfile() {
115   l = [ tppA, tppB, tppC, tppD, tppE, tppF, tppG, tppH ];
116   polygon(l);
117 }
118
119 module LeftTopMainProfile() {
120   l = [ tppC, tppD, tppE, tppF, tppG, tppK ];
121   polygon(l);
122 }
123
124 module SideTapeCutout1(y0,y1) {
125   rectfromto([ spp7[0]-1, y0 ],
126              [ spp8[0]+1, y1 ]);
127 }
128
129 module SideTapeCutout() {
130   SideTapeCutout1(spp6y, spp5y);
131   SideTapeCutout1(spp3y, spp2y);
132   SideTapeCutout1(spp3y, spp2y);
133   SideTapeCutout1(spp11y, spp1[1] + 1); // obsolete I think
134 }
135
136 module ToothProfile(){
137   polygon([tppA,
138            tppB,
139            tppS + [-0.1,0],
140            tppP,
141            tppC]);
142   hull(){
143     polygon([tppP,
144              tppM,
145              tppS]);
146     translate(tppM)
147       circle(r= tooth_th/2);
148   }
149 }
150
151 module Demo(){ ////toplevel
152   translate([0,0,-2]) LeftSideMainProfile(); 
153   translate([0,0,-2]) color("yellow") LeftTopMainProfile();
154   color("red") difference(){
155     LeftSideMainProfile();
156     SideTapeCutout();
157   }
158   translate([0,0,0]) color("purple") difference(){
159     LeftTopMainProfile();
160     TopTapeCutout();
161   }
162   translate([nook_cnr_rad*2 + 5, 0,0]) mirror([1,0,0]) {
163     color("red") RightSideMainProfile();
164     color("purple") RightTopMainProfile();
165     color("grey") translate([0,0,-2]) ToothProfile();
166   }
167   //%SideTapeCutout();
168 }
169
170 module FaceCore(z0,z1, extra_left, extra_right){
171   difference(){
172     for (mx=[0,1]) mirror([mx,0,0]) {
173         for (my=[0,1]) mirror([0,my,0]) {
174             translate(-nom_cnr) {
175               rotate_extrude(angle=90, convexity=10)
176                 translate(-[1,0,0] * nook_cnr_rad)
177                 children(mx);
178             }
179           }
180         translate([nook_w/2, 0,0])
181           linextr_y_xz(-nom_cnr[1]-0.1, nom_cnr[1]+0.1)
182           children(1-mx);
183       }
184     for (my=[0,1]) mirror([0,my,0]) {
185         translate([-nook_w/2, 0,0])
186           mirror([1,0,0])
187           linextr_y_xz(tapb, tapa)
188           children(2);
189       }
190   }
191   for (my=[0,1]) mirror([0,my,0]) {
192       translate([0, -nook_h/2, 0]) {
193         linextr_x_yz(-nom_cnr[0]-0.1,    etxc + extra_left)  children(0);
194         linextr_x_yz(etxc - extra_right, etxb + extra_right) children(1);
195         linextr_x_yz(etxb - extra_left,  etxa + extra_left)  children(0);
196         linextr_x_yz(etxa - extra_right, nom_cnr[0]+0.1)     children(1);
197       }
198     }
199   if (!$test) {
200     linextr(z0,z1)
201       rectfromto(-nom_cnr, nom_cnr);
202   }
203 }
204
205 module Base(){ ////toplevel
206   difference(){
207     FaceCore(spp7[1],spp8[1], 0.3, 0) {
208       LeftSideMainProfile();
209       RightSideMainProfile();
210       SideTapeCutout();
211     }
212     translate([0, -nook_h/2, 0])
213       mirror([0,1,0])
214       linextr_x_yz(-usb_w/2, usb_w/2)
215       rectfromto(spp8 + [-40, usb_below], [40, 40]);
216     translate([nook_w/2, 0, 0])
217       linextr_y_xz(oprb, opra)
218       translate(spp0)
219       rectfromto([-40, -open_recess_h], [40, 1]);
220   }
221 }
222
223 module Top(){ ////toplevel
224   FaceCore(tppE[1],tppD[1], -gap[0], gap[0] + 0.3) {
225     LeftTopMainProfile();
226     RightTopMainProfile();
227     TopTapeCutout();
228   }
229   translate([tooth_x, nook_h/2, 0])
230     linextr_x_yz(-tooth_w/2, +tooth_w/2)
231     mirror([1,0])
232     ToothProfile();
233 }
234 module TopPrint(){ ////toplevel
235   rotate([0,0,90]) rotate([180,0,0]) Top();
236 }
237 module BasePrint(){ ////toplevel
238   rotate([0,0,90]) Base();
239 }
240
241 module TestExtrude(){
242   difference(){
243     linextr_y_xz(-test_pillar, tape_w+test_pillar) children(0);
244     linextr_y_xz(           0, tape_w            ) children(1);
245   }
246 }
247
248 module BaseTestRest(){ ////toplevel
249   cube([30,15, spp8[1]-spp7[1]]);
250 }
251
252 module Demo3(){ ////toplevel
253   color("purple") Top();
254   color("red") Base();
255 }
256
257 module TestSide(){ ////toplevel
258   TestExtrude() { LeftSideMainProfile(); SideTapeCutout(); }
259 }
260
261 module TestTop(){ ////toplevel
262   TestExtrude() { LeftTopMainProfile(); TopTapeCutout(); }
263 }
264 module TestTopPrint(){ ////toplevel
265   rotate([180,0,0]) TestTop();
266 }