kaan/MCAD-Library
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Added an egg shape using egg_outline

Browse source
This commit is contained in:
Elmom 2011-09-07 09:59:02 +03:00
parent b2b431a92b
commit 72400cf62c
1 changed files with 12 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
regular_shapes.scad
View file

@ -1,6 +1,6 @@
/* /*
* OpenSCAD Shapes Library (www.openscad.org) * OpenSCAD Shapes Library (www.openscad.org)
* Copyright (C) 2010-2011 Giles Bathgate * Copyright (C) 2010-2011 Giles Bathgate, Elmo Mäntynen
* *
* This program is free software; you can redistribute it and/or modify * This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by * it under the terms of the GNU General Public License as published by
@ -80,9 +80,10 @@ module ellipse(width, height) {
scale([1, height/width, 1]) circle(r=width/2); scale([1, height/width, 1]) circle(r=width/2);
} }
// The ratio of lenght and width is about 1.39 for a real egg
module egg_outline(width, length){ module egg_outline(width, length){
union(){ translate([0, width/2, 0]) union(){
difference(){ rotate([0, 0, 180]) difference(){
ellipse(width, 2*length-width); ellipse(width, 2*length-width);
translate([-length/2, 0, 0]) square(length); translate([-length/2, 0, 0]) square(length);
} }
@ -216,6 +217,14 @@ module square_pyramid(base_x, base_y,height)
polyhedron(points=[[-w,-h,0],[-w,h,0],[w,h,0],[w,-h,0],[0,0,height]],triangles=[[0,3,2,1], [0,1,4], [1,2,4], [2,3,4], [3,0,4]]); polyhedron(points=[[-w,-h,0],[-w,h,0],[w,h,0],[w,-h,0],[0,0,height]],triangles=[[0,3,2,1], [0,1,4], [1,2,4], [2,3,4], [3,0,4]]);
} }
module egg(width, lenght){
rotate_extrude()
difference(){
egg_outline(width, lenght);
translate([-lenght, 0, 0]) cube(2*lenght, center=true);
}
}
// Tests: // Tests:
test_square_pyramid(){square_pyramid(10, 20, 30);} test_square_pyramid(){square_pyramid(10, 20, 30);}