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]) {
146 translate([-(topblockw*0.25+1),
147 plugh + pindh - (pinmaxh - pinminh)*0.75,
148 (plugl - pinholebasew*2)/3]) {
149 translate([0,0,pinholebasew/2]) rotate([-90,0,0]) %Pin();
151 linear_extrude(height = topblockw*1.0+2) {
152 polygon([[-1.0 * pinholebasew, -0.01],
153 [-0.5 * pinholebasew, pinholeh],
163 module Pin(){ ////toplevel
168 linear_extrude(height=0.1) {
171 [pinbasew*0.5*(pinminh/pinmaxh), 0]]);
173 translate([0,0,pintaperlen])
174 linear_extrude(height=pinstraightlen) {
185 module TestKit(){ ////toplevel
186 translate([30,0,0]) Pin();
187 translate([30,30,0]) Pin();
188 translate([0,40,0]) intersection(){
190 translate([-50,-10,-1]) cube([100,100,100]);
193 translate([-60,0,0]) Bar();
194 cube(50,center=true);
199 rotate([0,90,0]) translate([0,0,-spoolwidth/2])
201 cylinder(r=spoolouterrad, h=spoolwidth);
202 translate([0,0,-1]) cylinder(r=spoolinnerrad, h=spoolwidth+2);
210 translate([spoolbarlen/2,0,0]) rotate([90,0,90]) Trestle();
211 translate([spoolwidth/2 + hubbasethick + spoolinnerslop/4, 0, barz])
212 rotate([0,90,0]) AxleWasher();
213 translate([axlepin_x, 0, barz]) rotate([90,0,90]) FtAxlePin();
216 %translate([0,0,barz]) DemoSpool();
226 //ExtenderPillars(80,12,8, baseweb=true);