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=3fa84e83e48d39a12f266b79ed2463ce44bb186c;hpb=8966a9ea553ba1d092d6e0b682a9c52b4c29fdf1

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();
+    }
+  }
+}