X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=dungeonquest-cone.scad;h=b56ff918e159c95142943a5716a194ce0ba9f3a3;hp=c6953f8ff9185b20737074d3a640094a548abbfc;hb=77c39f4394b1ede3825b88234a0d9832cc6d3b78;hpb=49af160728289c80d178aac9e9c4b0ead4688070

diff --git a/dungeonquest-cone.scad b/dungeonquest-cone.scad
index c6953f8..b56ff91 100644
--- a/dungeonquest-cone.scad
+++ b/dungeonquest-cone.scad
@@ -1,6 +1,19 @@
+// -*- C -*-
+
 basesz=12;
 height=14.7;
 topsz=0.5;
 dsz=0;
 
-cylinder(h=height, r1=basesz/2-dsz, r2=topsz/2-dsz, $fn=50);
+module One(){ ////toplevel
+  cylinder(h=height, r1=basesz/2-dsz, r2=topsz/2-dsz, $fn=50);
+}
+
+module Four(){ ////toplevel
+  for (x=[0,1]) {
+    for (y=[0,1]) {
+      translate([x*(basesz+3), y*(basesz+3), 0])
+	One();
+    }
+  }
+}