3 spoolwidth = 80; // fixme needs to be measured
4 spoolinnerrad = 25; // fixme needs to be checked
5 spoolouterrad = 60; // fixme needs to be checked
7 include <doveclip.scad>
24 plugwmax = plugwmin + plugh * plugslope * 2;
31 topblockbasedepth = 5;
39 pintaperlen = plugwmax * 0.85;
42 spoolouterpad = AxlePin_holerad()*2 * 1.5;
43 spoolbarlen = spoolwidth +
44 2*(Washer_thick() + hubbasethick + AxlePin_holerad()
45 + spoolinnerslop + spoolouterpad);
47 axlepin_x = spoolwidth/2 + hubbasethick +
48 Washer_thick() + spoolinnerslop + AxlePin_holerad()*0.5;
50 trestleheight = spoolouterrad + spoolradclear - barz;
51 trestlebase = trestleheight * 1.2;
59 bdx = dw / cos(a) + bdy * plugslope;
61 tdx = bdx + tdy * plugslope;
62 translate([-d,0,0]) rotate([90,0,90]) linear_extrude(height=plugl+0.1+d*2){
63 polygon([[-(plugwmin/2 + bdx), bdy],
64 [-(plugwmax/2 + tdx), plugh + tdy],
65 [+(plugwmax/2 + tdx), plugh + tdy],
66 [+(plugwmin/2 + bdx), bdy]]);
70 module Bar(){ ////toplevel
72 biggestw = spoolw + 50;
77 translate([spoolw/2, 0, 0])
79 translate([-1, -50, -50])
80 cube([spoolw/2+1.1, 100, 100]);
84 translate([-biggestw/2, -50, 0])
85 cube([biggestw, 100, 100]);
88 translate([axlepin_x, 0, -50])
89 cylinder(r=AxlePin_holerad(), 100, $fn=15);
92 translate([0,0,barz]) {
94 rotate([0,90,0]) cylinder(r=barrad, h=200, $fn=30);
99 module FtAxlePin(){ ////toplevel
100 AxlePin(barrad, (barrad + barwasherrad*2)/3 * 2);
103 module AxleWasher(){ ////toplevel
104 Washer(barrad, barwasherrad);
107 module Trestle(){ ////toplevel
108 legang = atan2(trestlebase/2, trestleheight);
109 eplen = sqrt(trestleheight*trestleheight + trestlebase*trestlebase*0.25);
110 topblockw = plugwmax + trestleplugd*2 + topblockthick*2;
112 pinholebasew = pinbasew + pindwidth*2;
113 pinholeh = pinmaxh + pindh;
119 rotate([0,0, -90-legang])
120 ExtenderPillars(length=eplen+trestlelegw,
125 translate([-trestlebase/2, -trestleheight, 0])
126 cylinder(r=trestlelegw/2*1.2, h=plugl);
129 translate([-topblockw/2, -topblockbasedepth, 0])
131 topblockbasedepth + plugh + topblockthick
132 + (pinmaxh - pinminh)*0.6 + pindh,
135 translate([-trestlebase/2, -trestleheight, 0])
136 ExtenderPillars(length=trestlebase, width=trestlebaseh*2, height=legw);
138 translate([-300, -trestleheight-50, -1])
139 cube([600, 50, plugl+2]);
142 Plug(d=trestleplugd);
145 translate([0,0,plugl/2]) rotate([0,rot,0]) translate([0,0,-plugl/2]) {
147 plugh + pindh - (pinmaxh - pinminh)*0.75,
148 (plugl - pinholebasew*2)/3]) {
149 translate([-(topblockw*0.25+1), 0, pinholebasew/2])
150 rotate([-90,0,0]) %Pin();
151 translate([-(topblockw+1), 0, 0]) {
153 linear_extrude(height = topblockw*1.0+2) {
154 polygon([[-1.0 * pinholebasew, -0.01],
155 [-0.5 * pinholebasew, pinholeh],
166 module Pin(){ ////toplevel
171 linear_extrude(height=0.1) {
174 [pinbasew*0.5*(pinminh/pinmaxh), 0]]);
176 translate([0,0,pintaperlen])
177 linear_extrude(height=pinstraightlen) {
188 module TestKit(){ ////toplevel
189 translate([30,0,0]) Pin();
190 translate([30,30,0]) Pin();
191 translate([0,40,0]) intersection(){
193 translate([-50,-10,-1]) cube([100,100,100]);
196 translate([-60,0,0]) Bar();
197 cube(50,center=true);
202 rotate([0,90,0]) translate([0,0,-spoolwidth/2])
204 cylinder(r=spoolouterrad, h=spoolwidth);
205 translate([0,0,-1]) cylinder(r=spoolinnerrad, h=spoolwidth+2);
213 translate([spoolbarlen/2,0,0]) rotate([90,0,90]) Trestle();
214 translate([spoolwidth/2 + hubbasethick + spoolinnerslop/4, 0, barz])
215 rotate([0,90,0]) AxleWasher();
216 translate([axlepin_x, 0, barz]) rotate([90,0,90]) FtAxlePin();
219 %translate([0,0,barz]) DemoSpool();
229 //ExtenderPillars(80,12,8, baseweb=true);