X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?p=reprap-play.git;a=blobdiff_plain;f=filamentspool.scad;h=4e69f42dbf6effc557838d7be9b7114c3f86962d;hp=46fee725d8b9b4bc77de9d33c8fd3c316cd8ccbb;hb=04e4c2aa25e11210f6e1ffbf4fb34848d2bf30f1;hpb=4568273e8d300c51b1e3fe508ea173a11e932fb9 diff --git a/filamentspool.scad b/filamentspool.scad index 46fee72..4e69f42 100644 --- a/filamentspool.scad +++ b/filamentspool.scad @@ -1,21 +1,37 @@ // -*- C -*- -fdia=1.75; +fdia=2.85; slop=0.5; bigslop=slop*2; -prongthick=5; -prongwidth=5; +function selsz(sm,lg) = fdia < 2 ? sm : lg; +function usedove() = selsz(true,false); + +num_arms = selsz(3,4); + +exteffrad = 70; +hubeffrad = selsz(30, 50); +hubbigrad = selsz(20, 45); +hublwidth = selsz(3, 5); +hubstemwidth = 2; +hublthick = 10; +hubaxlerad = selsz(5, 17/2); +totalheightfromtower = 240; +axletowerfudgebend = 0; +axleaxlefudgebend = 3; +axlepadlen = 1.0; + +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; @@ -26,27 +42,55 @@ teethgapx=4+fdia; 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; wingspoke=3; wingsize=6; wingthick=3; -overclipsmaller=-1.0; -overclipbigger=2.0; - armendwallthick=2.5; armendbasethick=1.2; +axlehorizoffset = 12.5; +axlevertheight = 100; +towercliph = 16; +towerclipcount = 3; +towerpillarw = 5; + +axlepinrad = 2; +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 include include +include channelwidth = prongthick + slop; channeldepth = prongwidth + ratchettoothheight; @@ -54,19 +98,33 @@ totalwidth = armendwallthick*2 + channelwidth; totalheight = channeldepth + armendbasethick; stalkwidth = prongwidth + prongstalkxwidth; -module ArmEnd(length=120){ - translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) { - rotate([0,0,-90]) - DoveClipPairBase(h=doveclipheight); +module ArmEnd(length=120){ ////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(){ 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); @@ -75,7 +133,7 @@ module ArmEnd(length=120){ [ 0, 0, 1, 0 ], [ 0, 0, 0, 1 ]]) cube([ratchettooth - ratchettoothsmoothr*2, - channelwidth, ratchettoothheight]); + channelwidth, ratchettoothheight - ratchettoothsmoothr]); } } } @@ -102,43 +160,45 @@ module FilamentCupHandle(){ } 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() { +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([stalklength + overclipdepth, gapy, 0]) - rotate([0,0,-(10 + 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){ @@ -158,23 +218,213 @@ module CupSecuringClipSolidSmooth(xrad=0, xdepth=0){ } } -module CupSecuringClip(){ +module CupSecuringClip(){ ////toplevel wingswidth = wingspoke*2 + overclipthick*2 + overcliproundr*2 + totalwidth; difference(){ union(){ 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=5); + CupSecuringClipSolidSmooth(xrad=0, xdepth=0.2); } } -module ArmDoveClipPin(){ +module ArmDoveClipPin(){ ////toplevel DoveClipPin(h=doveclipheight); } +module TowerDoveClipPin(){ ////toplevel + DoveClipPin(h=towercliph/2); +} + +module Hub(){ ////toplevel + axlerad = hubaxlerad + slop; + xmin = axlerad+hublwidth/2; + xmax = hubbigrad-hublwidth/2; + hole = hubeffrad - hubbigrad - DoveClip_depth() - hublwidth*2; + holewidth = DoveClipPairSane_width() - hubstemwidth*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]]); + } + } + translate([0,0,-1]) cylinder($fn=60, h=hubaxlelen+2, r=axlerad); + } +} + +module ArmExtender(){ ////toplevel + DoveClipExtender(length=exteffrad-hubeffrad, + ha=doveclipheight, + hb=doveclipheight); +} + +module FsAxlePin(){ ////toplevel + AxlePin(hubaxlerad, washerrad*2, axlepinrad, axlepintabrad, slop); +} + +module Axle(){ ////toplevel + pillarswidth = DoveClipPairSane_width(towerclipcount); + + rotate([0,0, -( axleaxlefudgebend + atan(slop/hubaxlelen) ) ]) + translate([-axlehorizoffset, -axlevertheight, 0]) { + rotate([0,0,-axletowerfudgebend]) + rotate([0,0,-90]) + DoveClipPairSane(h=towercliph, count=towerclipcount, baseextend=3); + translate([0, DoveClip_depth(), 0]) + rotate([0,0,90]) + ExtenderPillars(axlevertheight - DoveClip_depth(), + pillarswidth, towercliph, + pillarw=towerpillarw); + } + + axleclearlen = hubaxlelen + slop*4 + washerthick*2 + axlepadlen; + axlerad = hubaxlerad-slop; + bump = axlerad * 0.2; + shift = axlerad-bump; + joinbelowallow = 3; + + intersection(){ + translate([0, 0, shift]) { + difference() { + union(){ + translate([-1, 0, 0]) + rotate([0,90,0]) + cylinder($fn=60, + r = axlerad, + h = 1 + axleclearlen + axlepinrad*2 + 2); + mirror([1,0,0]) rotate([0,90,0]) + cylinder(r = axlerad*1.75, h = 3); + intersection(){ + 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 + 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 + l = totalheightfromtower - axlevertheight; + echo("TowerExtender",l); + DoveClipExtender(length = l, + ha = towercliph, hb = towercliph, + counta = towerclipcount, countb = towerclipcount, + 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();