openscad/dotSCAD
1
0
Fork 0
mirror of https://github.com/JustinSDK/dotSCAD.git synced 2025-01-17 06:08:31 +01:00
Code Issues Releases Wiki Activity

added rounded_square..scad

Browse Source
This commit is contained in:
Justin Lin 2017-04-22 15:13:26 +08:00
parent 6399969e33
commit ef78f04583
1 changed files with 40 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
src/rounded_square.scad Normal file
View File

@ -0,0 +1,40 @@
/**
* rounded_square.scad
*
* Creates a rounded square or rectangle in the first quadrant.
* When center is true the square is centered on the origin.
*
* @copyright Justin Lin, 2017
* @license https://opensource.org/licenses/lgpl-3.0.html
*
* @see https://openhome.cc/eGossip/OpenSCAD/lib-rounded_square.html
*
**/
module rounded_square(size, corner_r, center = false) {
frags = $fn > 0 ?
($fn >= 3 ? $fn : 3) :
max(min(360 / $fa, corner_r * 2 * 3.14159 / $fs), 5);
quarter_frags = 360 / (frags + frags % 4);
step_a = 360 / (frags + frags % 4);
x = len(size) == undef ? size : size[0];
y = len(size) == undef ? size : size[1];
half_x = x / 2;
half_y = y / 2;
half_w = half_x - corner_r;
half_h = half_y - corner_r;
translate(center ? [0, 0] : [half_x, half_y]) polygon(concat(
[[half_x, -half_h], [half_x, half_h]],
[for(a = [step_a:step_a:90 - step_a]) [corner_r * cos(a) + half_w, corner_r * sin(a) + half_h]],
[[half_w, half_y], [-half_w, half_y]],
[for(a = [90 + step_a:step_a:180 - step_a]) [corner_r * cos(a) - half_w, corner_r * sin(a) + half_h]],
[[-half_x, half_h], [-half_x, -half_h]],
[for(a = [180 + step_a:step_a:270 - step_a]) [corner_r * cos(a) - half_w, corner_r * sin(a) - half_h]],
[[-half_w, -half_y], [half_w, -half_y]],
[for(a = [270 + step_a:step_a:360 - step_a]) [corner_r * cos(a) + half_w, corner_r * sin(a) - half_h]]
));
}