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

Made square pyramid actually work

Browse source
This commit is contained in:
Elmom 2011-02-15 07:28:26 +02:00
parent 4db6fc8757
commit 88bf287928
1 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
regular_shapes.scad
View file

@ -194,9 +194,13 @@ module triangle_pyramid(radius)
polyhedron(points=[[-a,-o,-o],[a,-o,-o],[0,radius,-o],[0,0,radius]],triangles=[[0,1,2],[1,2,3],[0,1,3],[0,2,3]]); polyhedron(points=[[-a,-o,-o],[a,-o,-o],[0,radius,-o],[0,0,radius]],triangles=[[0,1,2],[1,2,3],[0,1,3],[0,2,3]]);
} }
module square_pyramid(width,height,depth) module square_pyramid(base_x, base_y,height)
{ {
w=width/2; w=base_x/2;
h=height/2; h=base_y/2;
polyhedron(points=[[-w,-h,0],[-w,h,0],[w,h,0],[w,-h,0],[0,0,depth]],triangles=[[0,1,2],[0,1,4],[0,1,3],[0,2,3]]); 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]]);
} }
// Tests:
test_square_pyramid(){square_pyramid(10, 20, 30);}