// -*- 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);
+
+num_arms = selsz(3,4);
+
exteffrad = 70;
-hubeffrad = 30;
-hubbigrad = 20;
-hublwidth = 3;
+hubeffrad = selsz(30, 50);
+hubbigrad = selsz(20, 45);
+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;
+nondove_armhole_support = 7;
+nondove_armhole_wall = 4;
+nondove_armhole_slop = 0.5;
+nondove_armhole_slop_x = 0.5;
+
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;
+ 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;
+ 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, baselen + 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);
- 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]) {
+ difference() {
+ if (usedove()){
+ 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
}
}
+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();
+FilamentCup();
+//FilamentCupPair();
//CupSecuringClip();
//Hub();
//ArmExtender();
//Axle();
//AxleWasher();
//AxlePin();
+//AxleFrictionWasher();
~ianmdlvl / reprap-play.git / blobdiff