From 3383067cf5958242bff20bf998789106ed3f7a49 Mon Sep 17 00:00:00 2001
From: Elena of Valhalla'' Grandi <valhalla@trueelena.org>
Date: Sat, 7 Dec 2013 21:57:37 +0100
Subject: First die: fudge

---
 src/fudge.scad     | 31 +++++++++++++++++++++++++++++++
 src/polyhedra.scad |  8 ++++++++
 2 files changed, 39 insertions(+)
 create mode 100644 src/fudge.scad
 create mode 100644 src/polyhedra.scad

diff --git a/src/fudge.scad b/src/fudge.scad
new file mode 100644
index 0000000..52e0798
--- /dev/null
+++ b/src/fudge.scad
@@ -0,0 +1,31 @@
+use <polyhedra.scad>;
+
+len=16;
+
+module plus(len) {
+    union() {
+        hull() {
+            translate([-len*0.3,0,0]) sphere(len/10);
+            translate([len*0.3,0,0]) sphere(len/10);
+        }
+        hull() {
+            translate([0,-len*0.3,0]) sphere(len/10);
+            translate([0,len*0.3,0]) sphere(len/10);
+        }
+    }
+}
+
+module minus(len) {
+    hull() {
+        translate([0,-len*0.3,0]) sphere(len/10);
+        translate([0,len*0.3,0]) sphere(len/10);
+    }
+}
+
+difference() {
+    d6(len);
+    translate([0,len/2,0]) rotate([90,0,0]) plus(len);
+    translate([0,-len/2,0]) rotate([90,0,0]) plus(len);
+    translate([len/2,0,0]) rotate([0,90,0]) minus(len);
+    translate([-len/2,0,0]) rotate([0,90,0]) minus(len);
+}
diff --git a/src/polyhedra.scad b/src/polyhedra.scad
new file mode 100644
index 0000000..0cee714
--- /dev/null
+++ b/src/polyhedra.scad
@@ -0,0 +1,8 @@
+
+
+module d6(len) {
+    intersection() {
+        cube(len, center=true);
+        sphere(len*0.79);
+    }
+}
-- 
cgit v1.2.3