// -*- C -*-
-fdia=1.75;
+fdia=2.85;
slop=0.5;
bigslop=slop*2;
+function selsz(sm,lg) = fdia < 2 ? sm : lg;
+function usedove() = selsz(true,false);
+
exteffrad = 70;
-hubeffrad = 30;
-hubbigrad = 20;
-hublwidth = 3;
+hubeffrad = selsz(30, 60);
+hubbigrad = selsz(20, 50);
+hublwidth = selsz(3, 5);
hubstemwidth = 2;
hublthick = 10;
-hubaxlelen = 25;
-hubaxlerad = 5;
+hubaxlerad = selsz(5, 17/2);
totalheightfromtower = 240;
axletowerfudgebend = 0;
axleaxlefudgebend = 3;
axlepadlen = 1.0;
-prongthick=5;
-prongwidth=5;
+prongthick=selsz(5,7);
+prongwidth=selsz(5,7);
ratchetstep=15;
ratchettooth=3;
ratchettoothheight=5;
ratchettoothsmoothr=1;
ratchettoothslope=0.75;
overlap=0.5;
-cupbigrad=20;
-
-xstraightmul = 1.75;
+cupwidth=selsz(40,60);
+cupheight=selsz(55,75);
propxshift = 0;
prongstalkxwidth=3;
-stalklength=35;
+stalklength=selsz(35,55);
overclipcupgap=5;
overclipdepth=15;
overcliproundr=2.0;
-overclipthick=0.5;
+overclipthick=1.0;
+overclipcupnextgap=20;
+
+hubaxlelen = selsz(25, cupwidth);
overclipsmaller=-2.5;
overclipbigger=0.0;
axlepintabrad = 5;
washerthick = 1.2;
+washerthinthick = 0.8;
+washerverythinthick = 0.4;
washerrad = hubaxlerad + 7.5;
+frictionwasherarmwidth = 3;
+frictionwasherextrapush = 1.0;
ratchetpawl=ratchetstep-ratchettooth-bigslop*2;
+nondove_armbase = 100;
+nondove_armhole_x = 60;
+nondove_armhole_hole = 4;
+
include <doveclip.scad>
include <cliphook.scad>
include <filamentteeth.scad>
+include <axlepin.scad>
channelwidth = prongthick + slop;
channeldepth = prongwidth + ratchettoothheight;
stalkwidth = prongwidth + prongstalkxwidth;
module ArmEnd(length=120){ ////toplevel
- translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
- rotate([0,0,-90])
- DoveClipPairBase(h=doveclipheight);
+ if (usedove()) {
+ translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
+ rotate([0,0,-90])
+ DoveClipPairBase(h=doveclipheight);
+ }
+ } else {
+ difference(){
+ translate([1, -armendwallthick, -armendbasethick])
+ mirror([1,0,0])
+ cube([nondove_armbase+1, totalwidth, totalheight]);
+ translate([-nondove_armbase + nondove_armhole_x,
+ -armendwallthick + totalwidth/2,
+ -armendbasethick -1])
+ cylinder(r= nondove_armhole_hole/2, h=totalheight+2, $fn=10);
+ }
}
difference(){
}
module FilamentCupCup(){
- xstraight = cupbigrad * xstraightmul;
- linear_extrude(height=prongthick) {
- FlatArc(0,0, cupbigrad,cupbigrad+prongwidth, 89,271, $fn=80);
- }
for (my=[0,1]) mirror([0,my,0]) {
- translate([0,cupbigrad,0])
- cube([xstraight, prongwidth, prongthick]);
+ translate([0,cupwidth/2,0])
+ cube([cupheight + prongwidth, prongwidth, prongthick]);
}
}
module FilamentCup() { ////toplevel
FilamentCupHandle();
- dx = cupbigrad + prongwidth;
gapy = prongwidth;
- dy = cupbigrad + gapy + overclipcupgap;
+ dy = cupwidth/2 + gapy + overclipcupgap;
- translate([dx, dy, 0])
+ translate([0, dy, 0])
FilamentCupCup();
translate([0, -1, 0]);
- cube([prongwidth, dy+1, prongthick]);
+ cube([prongwidth, dy+1+cupwidth/2, prongthick]);
- midrad = cupbigrad + prongwidth/2;
+ midrad = cupwidth/2 + prongwidth/2;
propshift = stalklength - overclipdepth - prongthick + propxshift;
proptaken = propshift;
- echo(cupbigrad, dx, midrad, propshift, proptaken);
+ echo(midrad, propshift, proptaken);
translate([propshift, -1, 0]) {
// something is wrong with the y calculation
cube([prongwidth,
- dy - sqrt(midrad*midrad - proptaken*proptaken) - prongwidth/2,
+ gapy+2,
prongthick]);
}
- translate([0, overclipcupgap, 0])
- rotate([0,0, 102 + fdia])
- FilamentTeeth(fdia=fdia, h=teethh);
+ for (y = [overclipcupgap, overclipcupgap+overclipcupnextgap]) {
+ translate([0, y, 0])
+ rotate([0,0, 102 + fdia])
+ FilamentTeeth(fdia=fdia, h=teethh);
+ }
+ for (x = [-0.3, -1.3]) {
+ translate([cupheight + overclipcupnextgap*x, dy+cupwidth/2 + prongthick, 0])
+ rotate([0,0, 12 + fdia])
+ FilamentTeeth(fdia=fdia, h=teethh);
+ }
}
module CupSecuringClipSolid(w,d,h1,h2){
CupSecuringClipSolidSmooth(xrad=overclipthick, xdepth=0);
translate([-wingswidth/2, -wingsize/2, 0])
cube([wingswidth, wingsize, wingthick]);
+ translate([-wingsize/2, -wingswidth/2, 0])
+ cube([wingsize, wingswidth, wingthick]);
}
translate([0,0,-0.1])
CupSecuringClipSolidSmooth(xrad=0, xdepth=0.2);
DoveClipPin(h=doveclipheight);
}
+module TowerDoveClipPin(){ ////toplevel
+ DoveClipPin(h=towercliph/2);
+}
+
module Hub(){ ////toplevel
difference(){
cylinder($fn=60, h=hublthick, r=hubbigrad);
hb=doveclipheight);
}
-module AxlePin(){ ////toplevel
- 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 FsAxlePin(){ ////toplevel
+ AxlePin(hubaxlerad, washerrad*2, axlepinrad, axlepintabrad, slop);
}
module Axle(){ ////toplevel
pillarswidth = DoveClipPairSane_width(towerclipcount);
-if(0)
rotate([0,0, -( axleaxlefudgebend + atan(slop/hubaxlelen) ) ])
translate([-axlehorizoffset, -axlevertheight, 0]) {
rotate([0,0,-axletowerfudgebend])
union(){
translate([-1, 0, 0])
rotate([0,90,0])
- cylinder(r = axlerad, h = 1 + axleclearlen + 3 + 2);
+ cylinder($fn=60,
+ r = axlerad,
+ h = 1 + axleclearlen + axlepinrad*2 + 2);
mirror([1,0,0]) rotate([0,90,0])
- cylinder(r = washerrad, h = 3);
-if(0)
+ cylinder(r = axlerad*1.75, h = 3);
intersection(){
- mirror([1,0,0]) rotate([0,90,0])
- cylinder(r = towercliph - shift,
- h = pillarswidth/2 + axlehorizoffset);
+ mirror([1,0,0])
+ translate([axlehorizoffset - pillarswidth/2, 0, 0])
+ rotate([0,90,0])
+ cylinder($fn=60,
+ r = towercliph - shift,
+ h = pillarswidth);
translate([-50, -joinbelowallow, -50])
cube([100, joinbelowallow+50, 100]);
}
}
}
+module washer(thick){
+ Washer(hubaxlerad, washerrad, thick, slop);
+}
+
module AxleWasher(){ ////toplevel
+ washer(thick=washerthick);
+}
+
+module AxleThinWasher(){ ////toplevel
+ washer(thick=washerthinthick);
+}
+
+module AxleVeryThinWasher(){ ////toplevel
+ washer(thick=washerverythinthick);
+}
+
+module AxleFrictionWasher(){ ////toplevel
difference(){
cylinder(h=washerthick, r=washerrad);
translate([0,0,-1]) cylinder(h=washerthick+2, r=hubaxlerad+slop);
}
+ frarmr = hubbigrad;
+ frarmw = frictionwasherarmwidth;
+ frarmpawlr = hublwidth;
+ frarmpawlpush = slop*4 + frictionwasherextrapush;
+ for (ang=[0,180]) rotate([0,0,ang]) {
+ translate([washerrad-1, -frarmw/2, 0])
+ cube([frarmr - washerrad + 1, frarmw, washerthick]);
+ intersection(){
+ translate([frarmr - frarmpawlr, -50, 0])
+ cube([frarmpawlr, 100, 50]);
+ rotate([0,90,0])
+ cylinder(h = 50, r = frarmpawlpush, $fn=36);
+ }
+ }
}
module TowerExtender(){ ////toplevel
pillarw = towerpillarw);
}
+module FilamentCupPair(){ ////toplevel
+ FilamentCup();
+ translate([cupheight + prongthick*3,
+ cupwidth/2*1.7,
+ 0])
+ rotate([0,0,180]) FilamentCup();
+}
+
//ArmEnd();
//FilamentCup();
+//FilamentCupPair();
//CupSecuringClip();
-//Hub();
+Hub();
//ArmExtender();
//Axle();
//AxleWasher();
//AxlePin();
+//AxleFrictionWasher();
~ianmdlvl / reprap-play.git / blobdiff