From ef7f200643a27512b3d1a890773d2b53e9fb47d7 Mon Sep 17 00:00:00 2001
From: maride <maride@darknebu.la>
Date: Thu, 23 Nov 2017 18:37:17 +0100
Subject: [PATCH] Add die

---
 Die.scad | 84 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 84 insertions(+)
 create mode 100644 Die.scad

diff --git a/Die.scad b/Die.scad
new file mode 100644
index 0000000..5b2250d
--- /dev/null
+++ b/Die.scad
@@ -0,0 +1,84 @@
+SPHERE_RESOLUTON=36;
+
+difference() {
+    // rounded cube, die "body"
+    intersection() {
+        cube([10, 10, 10], center=true);
+        sphere(8, $fn=SPHERE_RESOLUTON);
+    }
+    
+    // 1
+    rotate([0, 0, 0]) {
+        translate([5, 0, 0]) {
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+
+    // 6
+    rotate([0, 0, 180]) {
+        translate([5, 0, 0]) {
+            translate([0, 3, 0])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, 0])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+
+    // 2
+    rotate([0, 0, 90]) {
+        translate([5, 0, 0]) {
+            translate([0, 3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+
+    // 5
+    rotate([0, 0, 270]) {
+        translate([5, 0, 0]) {
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+
+    // 3
+    rotate([0, 90, 0]) {
+        translate([5, 0, 0]) {
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+    
+    // 4
+    rotate([0, 270, 0]) {
+        translate([5, 0, 0]) {
+            translate([0, 3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, 3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, 3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+            translate([0, -3, -3])
+            sphere(1, $fn=SPHERE_RESOLUTON);
+        }
+    }
+}
\ No newline at end of file