MCAD-Library/triangles.scad

65 lines
1.6 KiB
OpenSCAD

/**
* Simple triangles library
*
* Authors:
* - Eero 'rambo' af Heurlin 2010-
*
* License: LGPL 2.1
*/
/**
* Standard right-angled triangle
*
* @param number o_len Length of the opposite side
* @param number a_len Length of the adjacent side
* @param number depth How wide/deep the triangle is in the 3rd dimension
* @param boolean center Whether to center the triangle on the origin
* @todo a better way ?
*/
module triangle(o_len, a_len, depth, center=false)
{
centroid = center ? [-a_len/3, -o_len/3, -depth/2] : [0, 0, 0];
translate(centroid) linear_extrude(height=depth)
{
polygon(points=[[0,0],[a_len,0],[0,o_len]], paths=[[0,1,2]]);
}
}
/**
* Standard right-angled triangle (tangent version)
*
* @param number tan_angle Angle of adjacent to hypotenuse (ie tangent)
* @param number a_len Length of the adjacent side
* @param number depth How wide/deep the triangle is in the 3rd dimension
* @param boolean center Whether to center the triangle on the origin
*/
module a_triangle(tan_angle, a_len, depth, center=false)
{
triangle(tan(tan_angle) * a_len, a_len, depth, center);
}
// Tests:
module test_triangle() { triangle(5, 5, 5); }
module test_a_triangle() { a_triangle(45, 5, 5); }
module test_triangles()
{
// Generate a bunch of triangles by sizes
for (i = [1:10])
{
translate([i*7, -30, i*7])
{
triangle(i*5, sqrt(i*5+pow(i,2)), 5);
}
}
// Generate a bunch of triangles by angle
for (i = [1:85/5])
{
translate([i*7, 22, i*7])
{
a_triangle(i*5, 10, 5);
}
}
}