From 67d98c625aefbc4be69abfa4b3dfcdf309e0528c Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 25 Nov 2012 00:59:18 +0000
Subject: [PATCH] dungeonquest-cone: One and Four toplevels

---
 Makefile               |  2 +-
 dungeonquest-cone.scad | 15 ++++++++++++++-
 2 files changed, 15 insertions(+), 2 deletions(-)

diff --git a/Makefile b/Makefile
index 4942b59..8f6bc0c 100644
--- a/Makefile
+++ b/Makefile
@@ -8,7 +8,7 @@ PLAY ?= $(CWD)
 
 CONFIG=slic3r-config.ini
 
-USING_AUTOS ?= filamentspool xeno-drivebay-bracket
+USING_AUTOS ?= filamentspool xeno-drivebay-bracket dungeonquest-cone
 AUTO_TOPLEVELS := $(foreach m,$(USING_AUTOS),$(shell $(PLAY)/toplevel-find $m))
 
 scads:		$(addsuffix .auto.scad, $(AUTO_TOPLEVELS))
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();
+    }
+  }
+}
-- 
2.30.2