include <utils.scad>
+inrear_d_real = 20;
inrear_d = 15;
-general_d = 8;
+bar_th = 5;
general_th = 5;
between_cables = 150;
around_cables = 20;
-cable_dia = 10;
+cable_dia = 15;
total_d = 40;
above_h = 40;
cable_x = around_cables + cable_dia/2;
total_x = cable_x * 2 + between_cables;
+below_h = above_h;
+
+sit_angle = atan2(inrear_d_real - inrear_d, below_h);
+
module CoreElevation(){
- rectfromto([ 0, 0 ],
- [ total_d, general_th ]);
+ rotate(-sit_angle)
+ rectfromto([ 0, 0 ],
+ [ total_d, general_th ]);
rectfromto([ 0, 0 ],
[ general_th, above_h ]);
+ translate([ inrear_d, -above_h ])
+ rectfromto([ 0,0 ],
+ [ -bar_th, -bar_th ]);
}
module Retainer(){ ////toplevel
for (x = [cable_x, total_x - cable_x])
translate([x, 0, 0])
- linextr(-100, 100)
+ linextr(-below_h/2, 100)
hull(){
translate([ 0, -(general_th + cable_dia/2) ])
circle(r = cable_dia/2);