From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 15 Sep 2012 22:42:31 +0000 (+0100)
Subject: doveclip fix pin dimensions
X-Git-Tag: filamentspool-v2-release~852
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=commitdiff_plain;h=077795c844ab3ea07f3c4b624bbd2a1abc5da8a8

doveclip fix pin dimensions
---

diff --git a/doveclip.scad b/doveclip.scad
index 2522f53..52f1230 100644
--- a/doveclip.scad
+++ b/doveclip.scad
@@ -15,18 +15,19 @@ basepinclear = 1.0;
 toothgap = webthick + webgap*2;
 basethick = toothheight;
 
-module DoveClipPin(height=height) {
-  translate([0,0, height/2]) intersection(){
+module DoveClipPin(h=pindepth) {
+  pinheight = nomrad*2 + jawthick*2;
+  translate([0,0, pinheight/2]) intersection(){
     union(){
       for (m=[0,1]) {
-	mirror([0,0,m]) translate([0,0,height/2]) rotate([90,0,0])
-	  cylinder($fn=20, r1=minrad, r2=maxrad, h=pindepth);
+	mirror([0,0,m]) translate([0,0,pinheight/2]) rotate([90,0,0])
+	  cylinder($fn=20, r1=minrad, r2=maxrad, h=h);
       }
-      translate([-webthick/2, -pindepth, -height/2-1])
-	cube([webthick, pindepth, height+2]);
+      translate([-webthick/2, -h, -pinheight/2-1])
+	cube([webthick, h, pinheight+2]);
     }
-    translate([-maxrad-1, -pindepth-1, -height/2])
-      cube([maxrad*2+2, pindepth+2, height]);
+    translate([-maxrad-1, -h-1, -pinheight/2])
+      cube([maxrad*2+2, h+2, pinheight]);
   }
 }
 
diff --git a/filamentspool.scad b/filamentspool.scad
index 43870e6..c2353fd 100644
--- a/filamentspool.scad
+++ b/filamentspool.scad
@@ -166,6 +166,10 @@ module CupSecuringClip(){
   }
 }
 
+module ArmDoveClipPin(){
+  DoveClipPin(h=doveclipheight);
+}
+
 //ArmEnd();
 //FilamentCup();
 //CupSecuringClip();