From 435c550a5e816e564f75790dc290cacf37d6d740 Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sat, 13 Feb 2016 17:27:19 +0000 Subject: [PATCH] cable-splice-clamp: introduce top and basew, and size top thickness by r1 --- cable-splice-clamp.scad | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/cable-splice-clamp.scad b/cable-splice-clamp.scad index dd376d6..55f219a 100644 --- a/cable-splice-clamp.scad +++ b/cable-splice-clamp.scad @@ -58,6 +58,9 @@ top_r = wall_r - (d_OC_r - 1); wall_x_r = wall_r / tan(90-alpha); +top = top_r * r1; +basew = base_r * rnom; + echo(r0,r1, "ratio",r1/r0); module CrossSection(plus=0) { @@ -66,8 +69,8 @@ module CrossSection(plus=0) { [x_T_r * r0, y_T_r * r0], [x_B_r * r1, y_B_r * r1], [x_B_r * r1 + wall_x_r * rnom + plus, y_B_r * r1], - [base_r * rnom + plus, top_r * rnom], - [-0.1, top_r * rnom]]); + [basew + plus, top], + [-0.1, top]]); translate([0, -d_OC_r * r0]) circle(r = r0); } -- 2.30.2