10 ratchettoothsmoothr=1;
11 ratchettoothslope=0.75;
24 ratchetpawl=ratchetstep-ratchettooth-bigslop*2;
26 include <doveclip.scad>
27 include <cliphook.scad>
29 channelwidth = prongthick + slop;
30 channeldepth = prongwidth + ratchettoothheight;
31 totalwidth = armendwallthick*2 + channelwidth;
32 totalheight = channeldepth + armendbasethick;
33 stalkwidth = prongwidth + prongstalkxwidth;
35 doveclipheight = totalheight;
37 module ArmEnd(length=120){
38 translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
40 DoveClipPairBase(h=doveclipheight);
44 translate([0, -armendwallthick, -armendbasethick])
45 cube([length, totalwidth, totalheight]);
47 cube([length+2, channelwidth, channeldepth+1]);
49 for (dx = [0 : ratchetstep : length - stalklength]) translate([dx,0,0]) {
50 translate([ratchettoothsmoothr+0.5, armendwallthick/2, 0]) minkowski(){
52 cylinder($fn=20, r=ratchettoothsmoothr, h=armendwallthick);
53 multmatrix([ [ 1, 0, ratchettoothslope, 0 ],
57 cube([ratchettooth - ratchettoothsmoothr*2,
58 channelwidth, ratchettoothheight]);
63 module FilamentCupHandle(){
64 pawlusewidth = ratchetpawl-ratchettoothsmoothr*2;
66 cube([stalklength, stalkwidth, prongthick]);
67 translate([stalklength, stalkwidth/2, 0])
68 cylinder(r=stalkwidth/2, h=prongthick, $fn=20);
69 translate([ratchettoothsmoothr, stalkwidth, 0]) {
71 cylinder($fn=20,r=ratchettoothsmoothr, h=1);
72 multmatrix([ [ 1, -ratchettoothslope, 0, 0 ],
77 ratchettoothheight - ratchettoothsmoothr,
84 module FilamentCupCup(){
85 xstraight = cupbigrad;
86 linear_extrude(height=prongthick) {
87 FlatArc(0,0, cupbigrad,cupbigrad+prongwidth, 89,271, $fn=80);
89 for (my=[0,1]) mirror([0,my,0]) {
90 translate([0,cupbigrad,0])
91 cube([xstraight, prongwidth, prongthick]);
95 module FilamentCup() {
98 dx = cupbigrad + prongwidth;
99 dy = cupbigrad + prongwidth + overclipcupgap;
101 translate([dx, dy, 0])
103 translate([0, -1, 0]);
104 cube([prongwidth, dy+1, prongthick]);
106 midrad = cupbigrad + prongwidth/2;
108 propshift = stalklength - overclipheight - prongthick;
109 proptaken = propshift;
110 echo(cupbigrad, dx, midrad, propshift, proptaken);
112 translate([propshift, -1, 0])
114 dy - sqrt(midrad*midrad - proptaken*proptaken),