X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=filamentspool.scad;h=c5b625cecd12bcc49b282bc0be71db68e95b1e99;hp=5fdd147e41fbe8fe74e3e84178f6cdc33b59616e;hb=c90650b346f2a8dbee7b816b9eb77beef2ff7861;hpb=f6038e5cc0cfb046fdbaf699f5be49807eb5c2a7

diff --git a/filamentspool.scad b/filamentspool.scad
index 5fdd147..c5b625c 100644
--- a/filamentspool.scad
+++ b/filamentspool.scad
@@ -1,3 +1,4 @@
+// -*- C -*-
 
 fdia=1.75;
 
@@ -12,14 +13,20 @@ ratchettoothheight=5;
 ratchettoothsmoothr=1;
 ratchettoothslope=0.75;
 overlap=0.5;
-cupbigrad=35;
+cupbigrad=20;
+
+xstraightmul = 1.75;
+
+propxshift = 0;
+
+doveclipheight = 10;
 
 teethh=3;
 teethgapx=4+fdia;
 
 prongstalkxwidth=3;
 
-stalklength=40;
+stalklength=35;
 overclipcupgap=5;
 overclipdepth=15;
 overcliproundr=2.0;
@@ -47,8 +54,6 @@ totalwidth = armendwallthick*2 + channelwidth;
 totalheight = channeldepth + armendbasethick;
 stalkwidth = prongwidth + prongstalkxwidth;
 
-doveclipheight = totalheight;
-
 module ArmEnd(length=120){
   translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
     rotate([0,0,-90])
@@ -59,9 +64,11 @@ module ArmEnd(length=120){
     translate([0, -armendwallthick, -armendbasethick])
       cube([length, totalwidth, totalheight]);
     translate([-1, 0, 0])
+      cube([length+1 - ratchettooth, channelwidth, channeldepth+1]);
+    translate([-1, 0, ratchettoothheight])
       cube([length+2, channelwidth, channeldepth+1]);
   }
-  for (dx = [0 : ratchetstep : length - stalklength]) translate([dx,0,0]) {
+  for (dx = [0 : ratchetstep : length - ratchetstep]) translate([dx,0,0]) {
     translate([ratchettoothsmoothr+0.5, armendwallthick/2, 0]) minkowski(){
       rotate([90,0,0])
 	cylinder($fn=20, r=ratchettoothsmoothr, h=armendwallthick);
@@ -70,7 +77,7 @@ module ArmEnd(length=120){
 			[	0,	0,	1,	0	],
 			[	0,	0,	0,	1	]])
 	cube([ratchettooth - ratchettoothsmoothr*2,
-	      channelwidth, ratchettoothheight]);
+	      channelwidth, ratchettoothheight - ratchettoothsmoothr]);
     }
   }
 }
@@ -90,14 +97,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,17 +128,18 @@ 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])
-    rotate([0,0,-(10 + fdia)])
+  translate([0, overclipcupgap, 0])
+    rotate([0,0, 102 + fdia])
     FilamentTeeth(fdia=fdia, h=teethh);
 }
 
@@ -165,6 +173,10 @@ module CupSecuringClip(){
   }
 }
 
+module ArmDoveClipPin(){
+  DoveClipPin(h=doveclipheight);
+}
+
 //ArmEnd();
 //FilamentCup();
 //CupSecuringClip();