From c6da13a7750af70c367ad1c28b0259ba81291831 Mon Sep 17 00:00:00 2001
From: kintel <kintel@b57f626f-c46c-0410-a088-ec61d464b74c>
Date: Tue, 9 Feb 2010 23:54:14 +0000
Subject: Box with all sides rounded

git-svn-id: http://svn.clifford.at/openscad/trunk@422 b57f626f-c46c-0410-a088-ec61d464b74c

diff --git a/libraries/rounder.scad b/libraries/rounder.scad
new file mode 100644
index 0000000..1eb080c
--- /dev/null
+++ b/libraries/rounder.scad
@@ -0,0 +1,31 @@
+// Library: rounder.scad
+// Version: 1.1
+// Author: Marius Kintel (Idea by Zach Hoeken)
+// Copyright: 2010
+// License: BSD
+
+// EXAMPLE USAGE:
+// roundedBox(20, 30, 40, 5);
+
+// size is a vector [w, h, d]
+module roundedBox(size, radius)
+{
+  cube([size[0], size[1]-radius*2, size[2]-radius*2], center=true);
+  cube([size[0]-radius*2, size[1], size[2]-radius*2], center=true);
+  cube([size[0]-radius*2, size[1]-radius*2, size[2]], center=true);
+
+  rot = [ [0,0,0], [90,0,90], [90,90,0] ];
+  for (axis = [0:2]) {
+    for (x = [radius-size[axis]/2, -radius+size[axis]/2],
+         y = [radius-size[(axis+1)%3]/2, -radius+size[(axis+1)%3]/2]) {
+      rotate(rot[axis]) 
+        translate([x,y,0]) 
+          cylinder(h=size[(axis+2)%3]-2*radius, r=radius, center=true);
+    }
+  }
+  for (x = [radius-size[0]/2, -radius+size[0]/2],
+       y = [radius-size[1]/2, -radius+size[1]/2],
+       z = [radius-size[2]/2, -radius+size[2]/2]) {
+    translate([x,y,z]) sphere(radius);
+  }
+}
-- 
cgit v0.10.1