-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path0.21.0.scad
75 lines (65 loc) · 2.03 KB
/
0.21.0.scad
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
// flue pipe
include <OpenSCAD_support/common.scad>
include <OpenSCAD_support/traverse_flue.scad>
include <OpenSCAD_support/traverse_labium.scad>
include <OpenSCAD_support/pipe_version.scad>
// variables
outerDiameter = 25;
innerDiameter = 23;
labiumWidth = 16;
outCut = 6.4;
totalLength = 200;
outerTube = 8; // air supply tube
innerTube = 6;
minWallThickness = 0.8;
floorThickness =1.5;
flueWidth = 0.3;
connector = 2; // [0 / 1 / 2]
// proportions, are most likely good like that
lengthFlue = totalLength / 8;
tubeInsert = outerTube + 2.5; // length
pipeInsert = innerDiameter * 0.1 + 5; // length
// calculations, don't touch in production use
ground = -(lengthFlue + floorThickness);
airSupplyX = -innerDiameter/2 - outCut;
labium_polygon_points =
[[0,-outerDiameter/2],
[innerDiameter/2, -outerDiameter],
[-outCut, -outerDiameter],
[-outCut, 0],
[innerDiameter/2,0]];
height = - ground
+ labiumWidth/2
+ minWallThickness
+ pipeInsert;
echo (height=height);
soundingLength = height - pipeInsert - floorThickness;
// announcing sounding length
echo(str("the sounding length inside the model in mm: ", soundingLength));
// announcing tube length
echo(str("tube needed (in mm): ", totalLength - soundingLength));
// connector points if connector ==2
allP = [[airSupplyX, - outerDiameter/2, ground],
[airSupplyX, - outerDiameter/2, 0],
[-outCut, - outerDiameter/2, - labiumWidth*0.45],
[-outCut -minWallThickness, -outCut -minWallThickness, ground]];
middlePoint = [(allP[0][0] + allP[2][0] + allP[2][0] + allP[3][0]) /4,
(allP[0][1] + allP[2][1] + allP[2][1] + allP[3][1]) /4,
(allP[0][2] + allP[2][2] + allP[2][2] + allP[3][2]) /4];
// logic
difference(){
union(){
basicShape21();
outer_traverse_flue();
high_cut_up_connector();
};
union(){
inner_traverse_flue();
airSupplySpacerTraverse(x=airSupplyX);
labium_cut();
airdome();
};
};
// version number
vertical_version_number ("0.21 gedackt");
echo(version = version());