5 spoolinnerrad = (spoolinnerdia - 0.2) / 2;
6 spoolouterrad = spoolinnerrad + 61.5;
8 include <doveclip.scad>
23 hubbasestalkwidth = 4;
26 hubbaserad = spoolinnerrad + 10;
27 hubmainrad = spoolinnerrad - spoolradslop;
34 plugwmax = plugwmin + plugh * plugslope * 2;
43 topblockbasedepth = 5;
52 pinstraightlen = 30-pintaperlen;
54 spoolouterpad = AxlePin_holerad()*2 * 1.5;
55 spoolbarlen = spoolwidth +
56 2*(Washer_thick() + hubbasethick + AxlePin_holerad()
57 + spoolinnerslop + spoolouterpad);
59 axlepin_x = spoolwidth/2 + hubbasethick +
60 Washer_thick() + spoolinnerslop + AxlePin_holerad()*0.5;
62 trestleheight = spoolouterrad + spoolradclear - barz;
63 trestlebase = trestleheight * 1.2;
71 bdx = dw / cos(a) + bdy * plugslope;
73 tdx = bdx + tdy * plugslope;
74 translate([-d,0,0]) rotate([90,0,90]) linear_extrude(height=plugl+0.1+d*2){
75 polygon([[-(plugwmin/2 + bdx), bdy],
76 [-(plugwmax/2 + tdx), plugh + tdy],
77 [+(plugwmax/2 + tdx), plugh + tdy],
78 [+(plugwmin/2 + bdx), bdy]]);
82 module Bar(){ ////toplevel
84 biggestw = spoolw + 50;
89 translate([spoolw/2, 0, 0])
91 translate([-1, -50, -50])
92 cube([spoolw/2+1.1, 100, 100]);
96 translate([-biggestw/2, -50, 0])
97 cube([biggestw, 100, 100]);
100 translate([axlepin_x, 0, -50])
101 cylinder(r=AxlePin_holerad(), 100, $fn=15);
104 translate([0,0,barz]) {
105 translate([-100,0,0])
106 rotate([0,90,0]) cylinder(r=axlerad, h=200, $fn=60);
111 module FtAxlePin(){ ////toplevel
112 AxlePin(axlerad, (axlerad + barwasherrad*2)/3 * 2);
115 module AxleWasher(){ ////toplevel
116 Washer(axlerad, barwasherrad);
119 module Trestle(){ ////toplevel
120 legang = atan2(trestlebase/2, trestleheight);
121 eplen = sqrt(trestleheight*trestleheight + trestlebase*trestlebase*0.25);
122 topblockw = plugwmax + trestleplugd*2 + topblockthick*2;
124 pinholebasew = pinbasew + pindwidth*2;
125 pinholeh = pinmaxh + pindh;
131 rotate([0,0, -90-legang])
132 ExtenderPillars(length=eplen+trestlelegw,
137 translate([-trestlebase/2, -trestleheight, 0])
138 cylinder(r=trestlelegw/2*1.2, h=trestlefoot);
141 translate([-topblockw/2, -topblockbasedepth, 0])
143 topblockbasedepth + plugh + topblockthick
144 + (pinmaxh - pinminh)*0.5,
147 translate([-trestlebase/2, -trestleheight, 0])
148 ExtenderPillars(length=trestlebase, width=trestlebaseh*2, height=legw);
150 translate([-300, -trestleheight-50, -1])
154 Plug(d=trestleplugd);
157 translate([0,0,plugl/2]) rotate([0,rot,0]) translate([0,0,-plugl/2]) {
159 plugh - (pinmaxh - pinminh)*1.00,
160 (plugl - pinholebasew*2)/3]) {
161 translate([-(topblockw*0.25+1), 0, pinholebasew/2])
162 rotate([-90,0,0]) %Pin();
163 translate([-(topblockw+1), 0, 0]) {
165 linear_extrude(height = topblockw*2.0+2) {
166 polygon([[-1.0 * pinholebasew, -0.01],
167 [-0.5 * pinholebasew, pinholeh],
178 module Pin(){ ////toplevel
183 linear_extrude(height=0.1) {
186 [pinbasew*0.5*(pinminh/pinmaxh), 0]]);
188 translate([0,0,pintaperlen])
189 linear_extrude(height=pinstraightlen) {
200 module HubEnd(){ ////toplevel
201 thick = hubmainthick+hubbasethick;
204 for (ang=[0 : 60 : 359]) {
206 translate([hubmainrad - hubwalls/2, -hubbasestalkwidth/2, 0])
207 cube([hubbaserad - (hubmainrad - hubwalls/2),
208 hubbasestalkwidth, hubbasethick]);
209 ExtenderPillar(length = hubmainrad-hubwalls/2,
210 height = hubbasethick + hubmainthick,
211 pillarw = hubpillarw);
214 cylinder(r=axlerad+hubwalls, h=thick);
215 cylinder(r=hubmainrad-0.1, h=hubbaseweb);
217 cylinder(r=hubmainrad, h=thick, $fn=100);
219 cylinder(r=hubmainrad-hubwalls, h=thick+2);
222 cylinder(r=hubbaserad, h=hubbasethick, $fn=50);
224 cylinder(r=hubbaserad-hubwalls, h=hubbasethick+2);
228 cylinder(r=axlerad+axleslop, h=thick+2, $fn=50);
233 module TestKit(){ ////toplevel
234 translate([60,0,0]) mirror([1,0,0]) Pin();
235 translate([60,15,0]) mirror([1,0,0]) Pin();
236 translate([0,40,0]) intersection(){
238 translate([-50,-10,-1]) cube([100,100,100]);
241 translate([-60,10,0]) Bar();
242 cube(50,center=true);
244 %translate([50,40, AxlePin_zoffset()]) FtAxlePin();
245 %translate([0,-20,0]) AxleWasher();
249 rotate([0,90,0]) translate([0,0,-spoolwidth/2])
251 cylinder(r=spoolouterrad, h=spoolwidth);
252 translate([0,0,-1]) cylinder(r=spoolinnerrad, h=spoolwidth+2);
256 module Demo(){ ////toplevel
260 color("red") translate([spoolbarlen/2,0,0])
261 rotate([90,0,90]) Trestle();
263 translate([spoolwidth/2 + hubbasethick + spoolinnerslop*2/3, 0, barz])
264 rotate([0,90,0]) AxleWasher();
265 color("orange") translate([axlepin_x, 0, barz])
266 rotate([90,0,90]) FtAxlePin();
268 translate([spoolwidth/2 + hubbasethick + spoolinnerslop*1/3, 0, barz])
269 rotate([0,-90,0]) HubEnd();
272 %translate([0,0,barz]) DemoSpool();
282 //ExtenderPillars(80,12,8, baseweb=true);