8 hubeffrad = 30; // + 55;
21 ratchettoothsmoothr=1;
22 ratchettoothslope=0.75;
53 ratchetpawl=ratchetstep-ratchettooth-bigslop*2;
55 include <doveclip.scad>
56 include <cliphook.scad>
57 include <filamentteeth.scad>
59 channelwidth = prongthick + slop;
60 channeldepth = prongwidth + ratchettoothheight;
61 totalwidth = armendwallthick*2 + channelwidth;
62 totalheight = channeldepth + armendbasethick;
63 stalkwidth = prongwidth + prongstalkxwidth;
65 module ArmEnd(length=120){
66 translate([ratchettoothsmoothr, channelwidth/2, -armendbasethick]) {
68 DoveClipPairBase(h=doveclipheight);
72 translate([0, -armendwallthick, -armendbasethick])
73 cube([length, totalwidth, totalheight]);
75 cube([length+1 - ratchettooth, channelwidth, channeldepth+1]);
76 translate([-1, 0, ratchettoothheight])
77 cube([length+2, channelwidth, channeldepth+1]);
79 for (dx = [0 : ratchetstep : length - ratchetstep]) translate([dx,0,0]) {
80 translate([ratchettoothsmoothr+0.5, armendwallthick/2, 0]) minkowski(){
82 cylinder($fn=20, r=ratchettoothsmoothr, h=armendwallthick);
83 multmatrix([ [ 1, 0, ratchettoothslope, 0 ],
87 cube([ratchettooth - ratchettoothsmoothr*2,
88 channelwidth, ratchettoothheight - ratchettoothsmoothr]);
93 module FilamentCupHandle(){
94 pawlusewidth = ratchetpawl-ratchettoothsmoothr*2;
96 cube([stalklength, stalkwidth, prongthick]);
97 translate([stalklength, stalkwidth/2, 0])
98 cylinder(r=stalkwidth/2, h=prongthick, $fn=20);
99 translate([ratchettoothsmoothr, stalkwidth, 0]) {
101 cylinder($fn=20,r=ratchettoothsmoothr, h=1);
102 multmatrix([ [ 1, -ratchettoothslope, 0, 0 ],
107 ratchettoothheight - ratchettoothsmoothr,
114 module FilamentCupCup(){
115 xstraight = cupbigrad * xstraightmul;
116 linear_extrude(height=prongthick) {
117 FlatArc(0,0, cupbigrad,cupbigrad+prongwidth, 89,271, $fn=80);
119 for (my=[0,1]) mirror([0,my,0]) {
120 translate([0,cupbigrad,0])
121 cube([xstraight, prongwidth, prongthick]);
125 module FilamentCup() {
128 dx = cupbigrad + prongwidth;
130 dy = cupbigrad + gapy + overclipcupgap;
132 translate([dx, dy, 0])
134 translate([0, -1, 0]);
135 cube([prongwidth, dy+1, prongthick]);
137 midrad = cupbigrad + prongwidth/2;
139 propshift = stalklength - overclipdepth - prongthick + propxshift;
140 proptaken = propshift;
141 echo(cupbigrad, dx, midrad, propshift, proptaken);
143 translate([propshift, -1, 0]) {
144 // something is wrong with the y calculation
146 dy - sqrt(midrad*midrad - proptaken*proptaken) - prongwidth/2,
149 translate([0, overclipcupgap, 0])
150 rotate([0,0, 102 + fdia])
151 FilamentTeeth(fdia=fdia, h=teethh);
154 module CupSecuringClipSolid(w,d,h1,h2){
155 rotate([0,-90,0]) translate([0,-h1/2,-w/2]) linear_extrude(height=w) {
156 polygon(points=[[0,0], [d,0], [d,h2], [0,h1]]);
160 module CupSecuringClipSolidSmooth(xrad=0, xdepth=0){
161 hbase = totalheight + prongstalkxwidth - overcliproundr*2;
163 CupSecuringClipSolid(w=totalwidth,
164 d=overclipdepth + xdepth,
165 h1=hbase - overclipsmaller,
166 h2=hbase + overclipbigger);
167 cylinder($fn=20, h=0.01, r=overcliproundr+xrad);
171 module CupSecuringClip(){
172 wingswidth = wingspoke*2 + overclipthick*2 + overcliproundr*2 + totalwidth;
175 CupSecuringClipSolidSmooth(xrad=overclipthick, xdepth=0);
176 translate([-wingswidth/2, -wingsize/2, 0])
177 cube([wingswidth, wingsize, wingthick]);
179 translate([0,0,-0.1])
180 CupSecuringClipSolidSmooth(xrad=0, xdepth=0.2);
184 module ArmDoveClipPin(){
185 DoveClipPin(h=doveclipheight);
190 cylinder($fn=60, h=hublthick, r=hubbigrad);
192 cylinder($fn=30, h=hublthick+2, r=(hubbigrad-hublwidth));
194 axlerad = hubaxlerad + slop;
196 cylinder(h=hubaxlelen, r=axlerad+hublwidth);
197 translate([0,0,-1]) cylinder($fn=60, h=hubaxlelen+2, r=axlerad);
199 hole = hubeffrad - hubbigrad - DoveClip_depth() - hublwidth*2;
200 holewidth = DoveClip_width() - hubstemwidth*2;
201 for (ang=[0,120,240])
204 translate([hubeffrad,0,0])
205 DoveClipPairSane(h=doveclipheight,
206 baseextend = (hubeffrad - DoveClip_depth()
207 - hubbigrad + hublwidth));
208 if (hole>hublwidth && holewidth > 2) {
209 translate([hubbigrad + hublwidth, -holewidth/2, -1])
210 cube([hole, holewidth, hublthick+2]);
214 xmin = axlerad+hublwidth/2;
215 xmax = hubbigrad-hublwidth/2;
216 for (ang = [0 : 60 : 359])
217 rotate([0,0,ang]) rotate([90,0,0]) {
218 translate([0,0,-hublwidth/2])
219 linear_extrude(height=hublwidth)
220 polygon([[xmin,0.05], [xmax,0.05],
221 [xmax,hublthick-0.2], [xmin, hubaxlelen-0.2]]);