Suite die

2 files changed, 25 insertions, 0 deletions

diff --git a/src/piecepack.scad b/src/piecepack.scad
index 70da750..ef8806b 100644
--- a/src/piecepack.scad
+++ b/src/piecepack.scad
@@ -55,6 +55,26 @@ module die(suite) {
     }
 }
 
+module suite_die(suites) {
+    difference() {
+        cube(12);
+        translate([0,0,11]) linear_extrude(height=1.5) scale(0.24)
+            import("../graphics/ace.dxf");
+        translate([1,0,0]) rotate([0,-90,0])
+            linear_extrude(height=1.5) scale(0.24)
+            import(str("../graphics/",suites[0],".dxf"));
+        translate([11,0,12]) rotate([0,90,0])
+            linear_extrude(height=1.5) scale(0.24)
+            import(str("../graphics/",suites[1],".dxf"));
+        translate([0,1,0]) rotate([90,0,0])
+            linear_extrude(height=1.5) scale(0.24)
+            import(str("../graphics/",suites[2],".dxf"));
+        translate([0,11,12]) rotate([-90,0,0])
+            linear_extrude(height=1.5) scale(0.24)
+            import(str("../graphics/",suites[3],".dxf"));
+    }
+}
+
 module pawn(suite) {
     difference() {
         cylinder(r=8, h=22);
diff --git a/src/suite_die.scad b/src/suite_die.scad
new file mode 100644
index 0000000..272875c
--- /dev/null
+++ b/src/suite_die.scad
@@ -0,0 +1,5 @@
+use <piecepack.scad>;
+
+suites=["suns","moons","crowns","arms"];
+
+suite_die(suites);