X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=filamentspool.scad;h=46fee725d8b9b4bc77de9d33c8fd3c316cd8ccbb;hp=28e76fca5e3521f26749050fa5a604f77393c13e;hb=4568273e8d300c51b1e3fe508ea173a11e932fb9;hpb=8a11621220fe54fb68f28d73c0445b3240e56996

diff --git a/filamentspool.scad b/filamentspool.scad
index 28e76fc..46fee72 100644
--- a/filamentspool.scad
+++ b/filamentspool.scad
@@ -1,3 +1,4 @@
+// -*- C -*-
 
 fdia=1.75;
 
@@ -12,7 +13,11 @@ ratchettoothheight=5;
 ratchettoothsmoothr=1;
 ratchettoothslope=0.75;
 overlap=0.5;
-cupbigrad=35;
+cupbigrad=20;
+
+xstraightmul = 1.75;
+
+propxshift = 0;
 
 doveclipheight = 10;
 
@@ -21,7 +26,7 @@ teethgapx=4+fdia;
 
 prongstalkxwidth=3;
 
-stalklength=40;
+stalklength=35;
 overclipcupgap=5;
 overclipdepth=15;
 overcliproundr=2.0;
@@ -90,14 +95,14 @@ module FilamentCupHandle(){
 			[	0,	0,	0,	1	]])
 	  cube([pawlusewidth,
 		ratchettoothheight - ratchettoothsmoothr,
-		prongthick]);
+		prongthick - 1]);
       }
     }
   }
 }
 
 module FilamentCupCup(){
-  xstraight = cupbigrad;
+  xstraight = cupbigrad * xstraightmul;
   linear_extrude(height=prongthick) {
     FlatArc(0,0, cupbigrad,cupbigrad+prongwidth, 89,271, $fn=80);
   }
@@ -121,13 +126,14 @@ module FilamentCup() {
 
   midrad = cupbigrad + prongwidth/2;
 
-  propshift = stalklength - overclipdepth - prongthick;
+  propshift = stalklength - overclipdepth - prongthick + propxshift;
   proptaken = propshift;
   echo(cupbigrad, dx, midrad, propshift, proptaken);
 
   translate([propshift, -1, 0]) {
+    // something is wrong with the y calculation
     cube([prongwidth,
-	  dy - sqrt(midrad*midrad - proptaken*proptaken),
+	  dy - sqrt(midrad*midrad - proptaken*proptaken) - prongwidth/2,
 	  prongthick]);
   }
   translate([stalklength + overclipdepth, gapy, 0])
@@ -165,6 +171,10 @@ module CupSecuringClip(){
   }
 }
 
+module ArmDoveClipPin(){
+  DoveClipPin(h=doveclipheight);
+}
+
 //ArmEnd();
 //FilamentCup();
 //CupSecuringClip();