From 9169e69946bbfa33f9a4bbc1b83f2ec2c8e86437 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 16 Sep 2012 20:04:04 +0100
Subject: [PATCH] filamentspool axle pin is pin

---
 filamentspool.scad | 52 ++++++++++++++++++++++++++++------------------
 1 file changed, 32 insertions(+), 20 deletions(-)

diff --git a/filamentspool.scad b/filamentspool.scad
index a3c75c0..89f3cfb 100644
--- a/filamentspool.scad
+++ b/filamentspool.scad
@@ -57,6 +57,9 @@ towercliph = 16;
 towerclipcount = 3;
 towerpillarw = 5;
 
+axlepinrad = 2;
+axlepintabrad = 5;
+
 washerthick = 1.2;
 washerrad = hubaxlerad + 7.5;
 
@@ -239,7 +242,16 @@ module ArmExtender(){ ////toplevel
 }
 
 module AxlePin(){ ////toplevel
-//  SplitPin();
+  pinr = axlepinrad - slop;
+  intersection(){
+    translate([0, 0, pinr*0.7]) {
+      translate([0, -washerrad, 0]) rotate([-90,0,0])
+	cylinder(r=pinr, h=washerrad*2, $fn=10);
+      translate([-axlepintabrad, hubaxlerad, -axlepinrad])
+	cube([axlepintabrad*2, axlepinrad*2, axlepinrad*2]);
+    }
+    translate([-50,-50,0]) cube([100,100,50]);
+  }
 }
 
 module Axle(){ ////toplevel
@@ -263,27 +275,27 @@ if(0)
   joinbelowallow = 3;
 
   intersection(){
-    difference() {
-      translate([0, 0, shift])
-      %union(){
-	translate([-1, 0, 0])
-	  rotate([0,90,0])
-	  cylinder(r = axlerad, h = 1 + axleclearlen + 3 + 2);
-	mirror([1,0,0]) rotate([0,90,0])
-	  cylinder(r = washerrad, h = 3);
-if(0)
-	intersection(){
+    translate([0, 0, shift]) {
+      difference() {
+	union(){
+	  translate([-1, 0, 0])
+	    rotate([0,90,0])
+	    cylinder(r = axlerad, h = 1 + axleclearlen + 3 + 2);
 	  mirror([1,0,0]) rotate([0,90,0])
-	    cylinder(r = towercliph - shift,
-		     h = pillarswidth/2 + axlehorizoffset);
-	  translate([-50, -joinbelowallow, -50])
-	    cube([100, joinbelowallow+50, 100]);
+	    cylinder(r = washerrad, h = 3);
+if(0)
+	  intersection(){
+	    mirror([1,0,0]) rotate([0,90,0])
+	      cylinder(r = towercliph - shift,
+		       h = pillarswidth/2 + axlehorizoffset);
+	    translate([-50, -joinbelowallow, -50])
+	      cube([100, joinbelowallow+50, 100]);
+	  }
 	}
+	rotate([90,0,0])
+	translate([axleclearlen + axlepinrad/2, 0, -25])
+	  cylinder(r=axlepinrad, h=50);
       }
-      translate([axleclearlen, 0, 0])
-	mirror([0,0,1])
-	rotate([0,0,90])
-	cube([1,1,1]);
     }
     translate([-50,-50,0]) cube([100,100,100]);
   }
@@ -303,4 +315,4 @@ module AxleWasher(){ ////toplevel
 //ArmExtender();
 //Axle();
 //AxleWasher();
-//AxleSplitPin();
+//AxlePin();
-- 
2.30.2