// prop
-prpp10 = [0,0];
-prpp11 = [0, prop_taper_len];
+$prpp10 = [0,0];
+$prpp11 = [0, prop_taper_len];
-prp_r10 = prl_r10;
+$prp_r10 = prl_r10;
// ---------- modules ----------
EdgeProfile();
}
-module PropProfile(gamma, cut=0, rot=0){ ////toplevel
+function prop_x(gamma) = hp_k / (2 * sin(gamma/2)) - hppT[0];
+
+module PropProfileAssignments(gamma){
// https://en.wikipedia.org/wiki/Solution_of_triangles#Two_sides_and_the_included_angle_given_(SAS)
- k = hp_k;
+ x = prop_x(gamma);
p = phone_height - prlp10[0] - hppB[0];
- x = k / (2 * sin(gamma/2)) - hppT[0];
b = p + x;
- q = phone_height - hppT[0]; // prpp7[0] is 0 by definition
+ q = phone_height - hppT[0]; // $prpp7[0] is 0 by definition
a = q + x;
c = sqrt(a*a + b*b - 2*a*b*cos(gamma));
- alpha = acos( (b*b + c*c - a*a) / (2*b*c) );
+ $prp_alpha = acos( (b*b + c*c - a*a) / (2*b*c) );
- theta = 90 - alpha;
- beta = 180 - alpha - gamma;
+ $prp_theta = 90 - $prp_alpha;
+ beta = 180 - $prp_alpha - gamma;
psi = 90 - beta;
- echo("abc", a,b,c);
+ //echo("abc", a,b,c);
v1 = [ [ cos(psi), -sin(psi) ], // x
[ sin(psi), cos(psi) ] ]; // y
- prpp7 = [0, c + (lpp13[1] - prpp10[1]) ];
+ $prpp7 = [0, c + (lpp13[1] - $prpp10[1]) ];
- prp_r1 = prc_r1;
- prp_r11 = prop_main_th/2;
+ $prp_r1 = prc_r1;
+ $prp_r11 = prop_main_th/2;
- prpp1 = prpp7 + [1,0] *
+ $prpp1 = $prpp7 + [1,0] *
// this is approximate, but will do
(prop_main_th/2 + prop_prop_gap + prcp1[0] - epp4[0]);
- prpp3 = prpp1 +
- v1[0] * -prp_r1 +
+ $prpp3 = $prpp1 +
+ v1[0] * -$prp_r1 +
v1[1] * ((prcp2[1] - prcp1[1]) - prop_prop_gap);
- prpp12 = prpp3 + v1[0] *
- (prop_end_dia + prop_caserecess_taper * (prpp1[1] - prpp3[1]));
- prp_r8 = prop_main_th;
- prpp4 = [ prop_main_th/2, prpp3[1] ];
- prp_r5 = prp_r8;
- prpp5 = [ prpp12[0] - prp_r5,
- prpp3[1] - prop_prong_h + prp_r5 ];
- prpp6 = prpp4 + [0,-1] * (prop_prong_h +
- prop_prong_heel_slope * (prpp5[0] - prpp4[0]));
- prpp8 = prpp4 + [0,-1] * prp_r8;
- prpp9 = prpp8 + [-1,0] * prp_r8;
-
- //#circleat(prpp3,1);
- //#circleat(prpp12,1);
-
- if (!cut) {
- hull(){
- translate(prpp8)
- intersection(){
- circle(prp_r8);
- polygon([[-20,-0], [0,0], [20,20]]);
- }
- rectfromto(prpp6, prpp9);
- translate(prpp5) intersection(){
- circle(prp_r5);
- polygon([[-10,-10], [0,0], [10,0]]);
+ $prpp12 = $prpp3 + v1[0] *
+ (prop_end_dia + prop_caserecess_taper * ($prpp1[1] - $prpp3[1]));
+ $prp_r8 = prop_main_th;
+ $prpp4 = [ prop_main_th/2, $prpp3[1] ];
+ $prp_r5 = $prp_r8;
+ $prpp5 = [ $prpp12[0] - $prp_r5,
+ $prpp3[1] - prop_prong_h + $prp_r5 ];
+ $prpp6 = $prpp4 + [0,-1] * (prop_prong_h +
+ prop_prong_heel_slope * ($prpp5[0] - $prpp4[0]));
+ $prpp8 = $prpp4 + [0,-1] * $prp_r8;
+ $prpp9 = $prpp8 + [-1,0] * $prp_r8;
+
+ children();
+}
+
+module PropProfile(gamma, cut=0, rot=0){ ////toplevel
+ PropProfileAssignments(gamma){
+
+ //#circleat($prpp3,1);
+ //#circleat($prpp12,1);
+
+ if (!cut) {
+ hull(){
+ translate($prpp8)
+ intersection(){
+ circle($prp_r8);
+ polygon([[-20,-0], [0,0], [20,20]]);
+ }
+ rectfromto($prpp6, $prpp9);
+ translate($prpp5) intersection(){
+ circle($prp_r5);
+ polygon([[-10,-10], [0,0], [10,0]]);
+ }
+ rectfromto($prpp12 + [0,-0.1], $prpp3);
+ }
+ hull(){
+ circleat($prpp1, $prp_r1);
+ rectfromto($prpp12 + [0,-0.1], $prpp3);
}
- rectfromto(prpp12 + [0,-0.1], prpp3);
- }
- hull(){
- circleat(prpp1, prp_r1);
- rectfromto(prpp12 + [0,-0.1], prpp3);
}
- }
- // main shaft
- rotate([0,0, rot*-theta]){
- hull(){
- extra = cut ? prop_recess_slop : 0;
- rectfromto(prpp6, prpp9);
- circleat(prpp11, prp_r11 + extra);
- circleat(prpp10, prp_r10 + extra);
+ // main shaft
+ rotate([0,0, rot*-$prp_theta]){
+ hull(){
+ extra = cut ? prop_recess_slop : 0;
+ rectfromto($prpp6, $prpp9);
+ circleat($prpp11, $prp_r11 + extra);
+ circleat($prpp10, $prp_r10 + extra);
+ }
}
}
}
PropProfile(angle, 0,0);
}
+module Prop(){ ////toplevel
+ hw = prop_main_width/2;
+ linextr(-hw, +hw)
+ PropAggregateProfile();
+}
+
module Case(){ ////toplevel
difference(){
union(){
}
}
-module DemoPropAngleProjection(){
- rotate([0,0,90])
- projection(cut=true)
- rotate([0,90,0])
- translate([-prop_x_pos, 0,0])
- children();
+module DemoPropAngleSelect(c){
+ color(c) difference(){
+ union(){ children(); }
+ translate([ prop_x_pos, -400, -200 ])
+ cube([ 400,800,400 ]);
+ }
}
module DemoPropAngle(ang){
- DemoPropAngleProjection() Case();
+ hL = [0, -(phone_height - hppT[0]), hppT[1] - hp_k*2];
+ hC = [0, -(phone_height - hppB[0]), hppB[1]];
+
+ translate(hL)
+ rotate([ang/2,0,0])
+ translate(-hL)
+ translate(hC)
+ rotate([ang/2,0,0])
+ translate(-hC) {
+ DemoPropAngleSelect("red") Case();
+
+ color("orange")
+ translate([prop_x_pos, -prcp1[0], prcp1[1]])
+ PropProfileAssignments(ang) {
+ echo($prpp1);
+ translate([0, $prpp1[0], -$prpp1[1]])
+ rotate([90,0,-90])
+ Prop();
+ }
+ }
+
+ translate([0,0, -hp_k*2])
+ DemoPropAngleSelect("blue")
+ Lid();
}
module DemoPropAngles(){ ////toplevel