From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 6 Oct 2012 15:00:35 +0000 (+0100)
Subject: filamenttrestle wip
X-Git-Tag: filamentspool-v2-release~752^2~12
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=b96852226f4e31ae9a624a32eeacfc6f36bfe966

filamenttrestle wip
---

diff --git a/filamenttrestle.scad b/filamenttrestle.scad
new file mode 100644
index 0000000..a3643bc
--- /dev/null
+++ b/filamenttrestle.scad
@@ -0,0 +1,27 @@
+// -*- C -*-
+
+spoolwidth = 80;
+
+barrady = 5;
+barradz = 7;
+guidewidth = 3;
+guiderad = 20;
+
+module Bar(){
+  barlen = spoolwidth + guidewidth;
+  barz = barradz * 0.5;
+
+  intersection(){
+    for (mir=[0,1]) {
+      mirror([mir,0,0]) {
+	translate([-1,0,barz])
+	  scale([1,barrady,barradz])
+	  rotate([0,90,0]) cylinder(r=1, h=barlen+2, $fn=30);
+      }
+    }
+    translate([-barlen, -50, 0])
+      cube([barlen*2, 100, 100]);
+  }
+}
+
+Bar();