chiark / gitweb /
filamenttrestle wip with spool core circular bar
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 17 Oct 2012 17:06:22 +0000 (18:06 +0100)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 17 Oct 2012 17:06:22 +0000 (18:06 +0100)
filamenttrestle.scad

index b0ee2f97b58e4719acb73cb1611e32520ae93e2c..1931c4c909dec2d102eea2f63ed8460dec18688b 100644 (file)
@@ -7,8 +7,7 @@ trestlebase = 80; // fixme needs to be checked
 include <doveclip.scad>
 
 spoolwidthgap = 2;
-barrady = 5;
-barradz = 7;
+barrad = 7;
 guidewidth = 3;
 guiderad = 20;
 
@@ -54,15 +53,15 @@ module Plug(d=0){
 
 module Bar(){ ////toplevel
   spoolw = spoolwidth + spoolwidthgap*2;
-  barz = barradz * 0.5;
+  barz = barrad * 0.5;
   biggestw = spoolw + 50;
 
   intersection(){
     for (mir=[0,1]) {
       mirror([mir,0,0]) {
        translate([0,0,barz]) {
-         scale([1,barrady,barradz]) translate([-1,0,0])
-           rotate([0,90,0]) cylinder(r=1, h=spoolw/2+2, $fn=30);
+         translate([-1,0,0])
+           rotate([0,90,0]) cylinder(r=barrad, h=spoolw/2+2, $fn=30);
          translate([spoolw/2,0,0])
            rotate([0,90,0]) cylinder(r=guiderad, h=guidewidth, $fn=60);
        }
@@ -166,9 +165,9 @@ module TestKit(){ ////toplevel
   }
 }
 
-//Bar();
+Bar();
 //Trestle();
 //Pin();
-TestKit();
+//TestKit();
 //Plug(d=1);
 //ExtenderPillars(80,12,8, baseweb=true);