// -*- C -*-
-fdia=1.75;
+fdia=2.85;
+lightduty=false;
slop=0.5;
bigslop=slop*2;
+function selsz(sm,lt,lg) = fdia < 2 ? sm : lightduty ? lt : lg;
+function usedove() = selsz(true,true,false);
+
+num_arms = selsz(3,3,4);
+
+channelslop=selsz(slop,0.75,slop);
+
exteffrad = 70;
-hubeffrad = 30;
-hubbigrad = 20;
-hublwidth = 3;
+hubeffrad = selsz(30, 82, 40);
+hubbigrad = selsz(20, 38, 38);
+hublwidth = selsz(3, 2.5, 4);
hubstemwidth = 2;
hublthick = 10;
-hubaxlelen = 25;
-hubaxlerad = 5;
+hubaxlerad = selsz(5, 28/2, 28/2);
totalheightfromtower = 240;
axletowerfudgebend = 0;
axleaxlefudgebend = 3;
+axlepadlen = 1.0;
-prongthick=5;
-prongwidth=5;
+armend_length = 120;
+
+prongthick=selsz(5,4,5);
+prongwidth=selsz(5,4,5);
+prongribwidth=3;
+prongribheight=selsz(0,0,4);
ratchetstep=15;
ratchettooth=3;
ratchettoothheight=5;
ratchettoothsmoothr=1;
ratchettoothslope=0.75;
overlap=0.5;
-cupbigrad=20;
+cupwidth=selsz(40,25,50);
+cupheight=selsz(55,25,55);
-xstraightmul = 1.75;
+cupstrong_dx=selsz(0,0,-10);
-propxshift = 0;
+propxshift = -6;
doveclipheight = 10;
prongstalkxwidth=3;
-stalklength=35;
+stalklength=selsz(35,25,55);
overclipcupgap=5;
overclipdepth=15;
overcliproundr=2.0;
-overclipthick=0.5;
+overclipthick=1.0;
+overclipcupnextgap=selsz(20,15,20);
+
+hubaxlelen = selsz(25, 62.5, 77.5);
+echo(hubaxlelen);
overclipsmaller=-2.5;
overclipbigger=0.0;
-wingspoke=3;
+wingspoke=2.5;
wingsize=6;
wingthick=3;
-armendwallthick=2.5;
-armendbasethick=1.2;
+armendwallthick=selsz(2.5, 1.8, 2.5);
+armendbasethick=selsz(1.2, 1.2, 1.2);
axlehorizoffset = 12.5;
-axlevertheight = 80;
+axlevertheight = 100;
towercliph = 16;
towerclipcount = 3;
towerpillarw = 5;
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_armhole_x = 32;
+nondove_armhole_hole = 4 + 0.8;
+nondove_armhole_support = 7;
+nondove_armhole_wall = 3.2;
+nondove_armhole_slop = 0.5;
+nondove_armhole_slop_x = 0.5;
+
+nondove_armbase = nondove_armhole_x + nondove_armhole_hole/2 +
+ nondove_armhole_support;
+echo(nondove_armbase);
+
include <doveclip.scad>
include <cliphook.scad>
include <filamentteeth.scad>
+include <axlepin.scad>
-channelwidth = prongthick + slop;
+channelwidth = prongthick + channelslop;
channeldepth = prongwidth + ratchettoothheight;
totalwidth = armendwallthick*2 + channelwidth;
totalheight = channeldepth + armendbasethick;
stalkwidth = prongwidth + prongstalkxwidth;
-module ArmEnd(length=120){ ////toplevel
- translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
- rotate([0,0,-90])
- DoveClipPairBase(h=doveclipheight);
+module ArmEnd(length=armend_length){ ////toplevel
+ 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;
+ baselen = dy+cupwidth/2;
- translate([dx, dy, 0])
+ translate([0, dy, 0])
FilamentCupCup();
- translate([0, -1, 0]);
- cube([prongwidth, dy+1, prongthick]);
+ cube([prongwidth, baselen+1, prongthick]);
- midrad = cupbigrad + prongwidth/2;
+ translate([cupstrong_dx, prongwidth, 0]) {
+ cube([prongwidth, baselen-prongwidth, prongthick]);
+ for (y = [0, .33, .67, 1])
+ translate([0, (baselen - prongwidth) * y, 0])
+ cube([-cupstrong_dx + 1, prongwidth, prongthick]);
+ }
+ if (cupstrong_dx != 0) {
+ rotate([0,0,45])
+ translate([-prongwidth*.55, -prongwidth*2.1, 0])
+ cube([prongwidth*(2.65), prongwidth*4.2, prongthick]);
+ }
+
+ translate([0, -0.2, 0])
+ cube([prongribwidth, baselen, prongthick + prongribheight]);
+
+ if (prongribheight > 0) {
+ translate([-prongwidth, baselen, 0])
+ cube([cupheight/2, prongwidth + prongribheight, prongribwidth]);
+ }
+
+ 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([cupstrong_dx, y + prongwidth, 0])
+ rotate([0,0, 102 + fdia])
+ FilamentTeeth(fdia=fdia, h=teethh);
+ }
+ for (x = [-0.3, -1.3]) {
+ translate([cupheight + overclipcupnextgap*x, baselen + prongwidth, 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);
- translate([0,0,-1])
- cylinder($fn=30, h=hublthick+2, r=(hubbigrad-hublwidth));
- }
axlerad = hubaxlerad + slop;
- difference(){
- cylinder(h=hubaxlelen, r=axlerad+hublwidth);
- translate([0,0,-1]) cylinder($fn=60, h=hubaxlelen+2, r=axlerad);
- }
+ xmin = axlerad+hublwidth/2;
+ xmax = hubbigrad-hublwidth/2;
hole = hubeffrad - hubbigrad - DoveClip_depth() - hublwidth*2;
holewidth = DoveClipPairSane_width() - hubstemwidth*2;
- for (ang=[0,120,240])
- rotate([0,0,ang]) {
- difference() {
- translate([hubeffrad,0,0])
- DoveClipPairSane(h=doveclipheight,
- baseextend = (hubeffrad - DoveClip_depth()
- - hubbigrad + hublwidth));
- if (hole>hublwidth && holewidth > 2) {
- translate([hubbigrad + hublwidth, -holewidth/2, -1])
- cube([hole, holewidth, hublthick+2]);
- }
+ nondove_allwidth = nondove_armhole_wall*2 + totalwidth;
+ difference(){
+ union(){
+ difference(){
+ cylinder($fn=60, h=hublthick, r=hubbigrad);
+ translate([0,0,-1])
+ cylinder($fn=30, h=hublthick+2, r=(hubbigrad-hublwidth));
}
+ cylinder(h=hubaxlelen, r=axlerad+hublwidth);
+ for (ang=[0 : 360/num_arms : 359])
+ rotate([0,0,ang]) {
+ if (usedove()){
+ difference() {
+ translate([hubeffrad,0,0])
+ DoveClipPairSane(h=doveclipheight,
+ baseextend = (hubeffrad - DoveClip_depth()
+ - hubbigrad + hublwidth));
+ if (hole>hublwidth && holewidth > 2) {
+ translate([hubbigrad + hublwidth, -holewidth/2, -1])
+ cube([hole, holewidth, hublthick+2]);
+ }
+ }
+ } else {
+ difference(){
+ translate([0,
+ -nondove_allwidth/2,
+ 0])
+ cube([hubeffrad + nondove_armhole_x
+ + nondove_armhole_hole/2 + nondove_armhole_support,
+ nondove_allwidth,
+ nondove_armhole_wall + totalheight]);
+ translate([hubeffrad - nondove_armhole_slop_x,
+ -nondove_allwidth/2
+ + nondove_armhole_wall - nondove_armhole_slop,
+ nondove_armhole_wall])
+ cube([nondove_armhole_x + 50,
+ totalwidth + nondove_armhole_slop*2,
+ totalheight + 1]);
+ translate([hubeffrad + nondove_armhole_x, 0, -20])
+ cylinder(r= nondove_armhole_hole/2, h=50, $fn=10);
+ }
+ }
+ }
+ for (ang = [0 : 180/num_arms : 359])
+ rotate([0,0,ang]) rotate([90,0,0]) {
+ translate([0,0,-hublwidth/2])
+ linear_extrude(height=hublwidth)
+ polygon([[xmin,0.05], [xmax,0.05],
+ [xmax,hublthick-0.2], [xmin, hubaxlelen-0.2]]);
+ }
}
- xmin = axlerad+hublwidth/2;
- xmax = hubbigrad-hublwidth/2;
- for (ang = [0 : 60 : 359])
- rotate([0,0,ang]) rotate([90,0,0]) {
- translate([0,0,-hublwidth/2])
- linear_extrude(height=hublwidth)
- polygon([[xmin,0.05], [xmax,0.05],
- [xmax,hublthick-0.2], [xmin, hubaxlelen-0.2]]);
- }
+ translate([0,0,-1]) cylinder($fn=60, h=hubaxlelen+2, r=axlerad);
+ }
}
module ArmExtender(){ ////toplevel
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])
pillarw=towerpillarw);
}
- axleclearlen = hubaxlelen + slop*3 + washerthick*2;
+ axleclearlen = hubaxlelen + slop*4 + washerthick*2 + axlepadlen;
axlerad = hubaxlerad-slop;
bump = axlerad * 0.2;
shift = axlerad-bump;
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]);
}
}
rotate([90,0,0])
translate([axleclearlen + axlepinrad/2, 0, -25])
- cylinder(r=axlepinrad, h=50);
+ cylinder(r = axlepinrad + slop, h=50);
}
}
translate([-50,-50,0]) cube([100,100,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();
+}
+
+//----- storarm -----
+
+storarm_hooklen = 8;
+storarm_hookheight = 5;
+storarm_thick = 10;
+storarm_axleslop = 4;
+
+// calculated
+
+storarm_axlerad = hubaxlerad - storarm_axleslop;
+storarm_mainlen = hubaxlelen;
+storarm_totlen = storarm_mainlen + storarm_hooklen;
+
+module StorageArmDiagPartSide(xmin, xmax){
+ xsz = xmax-xmin;
+ yuse = storarm_thick/2;
+
+ intersection(){
+ translate([xmin-1, -storarm_axlerad, storarm_thick/2])
+ rotate([0,90,0])
+ cylinder(r=storarm_axlerad, h=xsz+2, $fn=60);
+ translate([xmin, -yuse, 0])
+ cube([xsz, yuse, storarm_thick]);
+ }
+}
+
+module StorageArmDiagPart(xmin, xmax, shear, adjbot){
+ hull(){
+ StorageArmDiagPartSide(xmin,xmax);
+
+ multmatrix([[1,0,0,0],
+ [shear,1,0,0],
+ [0,0,1,0],
+ [0,0,0,1]])
+ translate([0, -storarm_axlerad*2 + adjbot, 0])
+ mirror([0,1,0])
+ StorageArmDiagPartSide(xmin,xmax);
+ }
+}
+
+module StorageArm(){ ////toplevel
+ shear = storarm_hookheight / (storarm_mainlen/2);
+
+ StorageArmDiagPart(-1, storarm_mainlen/2+1, shear, 0);
+ StorageArmDiagPart(storarm_mainlen/2-1, storarm_mainlen+1, shear/2,
+ storarm_hookheight/2);
+
+ translate([0, storarm_hookheight, 0])
+ StorageArmDiagPart(storarm_mainlen, storarm_totlen,
+ shear/2, -storarm_hookheight/2);
+}
+
+
+module Demo(){
+ translate([-hubeffrad-30,50,0]) Hub();
+ ArmEnd();
+ translate([0,50,0]) FilamentCup();
+}
+
//ArmEnd();
//FilamentCup();
+//FilamentCupPair();
//CupSecuringClip();
//Hub();
//ArmExtender();
//Axle();
//AxleWasher();
//AxlePin();
+//AxleFrictionWasher();
+StorageArm();
+//Demo();
~ianmdlvl / reprap-play.git / blobdiff