toolbox-inserts: UniversalJoint: wip

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/toolbox-inserts.scad b/toolbox-inserts.scad
index 0535f182dadde7b039b938ca38e5155a264da751..87a05da9a5fae771fad786d7fdae1337b7d63bfb 100644 (file)
--- a/toolbox-inserts.scad
+++ b/toolbox-inserts.scad
@@ -507,11 +507,13 @@ module RatchetHandleHolder() { ////toplevel
 
 module UniversalJointPositive() { ////toplevel
   hl = universal_joint_main_len/2;
+  slope = (universal_joint_d_fat - universal_joint_d_end) / hl;
+
   for (mx = [0, 1]) {
     mirror([mx, 0, 0]) {
-      multmatrix([[1, 0, 0, 0],
-                 [0, 1, 0, 0],
-                 [0, 0, 1, 0]]) {
+      multmatrix([[1,      0, 0, 0],
+                 [0,      1, 0, 0],
+                 [-slope, 0, 1, 0]]) {
        if (mx == 0) {
          linextr_x_yz(-hl -8, -hl +1)
            circle(r = 8.2 /2);