From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sat, 24 Feb 2024 02:03:23 +0000 (+0000)
Subject: mudguard-bracket: maybe done?
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ianmdlvl/git?a=commitdiff_plain;h=80eb64195318f3c22e78a79a488a4c65a6992051;p=reprap-play.git

mudguard-bracket: maybe done?

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

diff --git a/mudguard-bracket.scad b/mudguard-bracket.scad
index 0494881..240e0ce 100644
--- a/mudguard-bracket.scad
+++ b/mudguard-bracket.scad
@@ -26,11 +26,12 @@ beam_h = 15;
 beam_th = 4.5;
 wings_height = 15;
 retainer_th = 3;
-clamp_main_th = 3;
+clamp_main_th = 4;
 clamp_depth = 4;
 bracket_buttress = 2.5;
 
 retainer_x_gap = 0.25;
+retainer_big_gap = 2.5;
 
 $fs = 0.1;
 $fa = 3;
@@ -146,11 +147,15 @@ module WingElevation(){
 }
 
 module BracketButtressPlan(){
-  hull(){
-    rectfromto([ -bracket_top_xsz/2, -beam_th ],
-	       [ +bracket_top_xsz/2, 0        ]);
-    rectfromto([ -wing_top_ea_x, -wings_height ],
-	       [ +wing_top_ea_x, 0 ]);
+  difference(){
+    hull(){
+      rectfromto([ -bracket_top_xsz/2, -beam_th ],
+		 [ +bracket_top_xsz/2, 0        ]);
+      rectfromto([ -wing_top_ea_x, -wings_height ],
+		 [ +wing_top_ea_x, 0 ]);
+    }
+    rectfromto([ -wing_top_ea_x + wings_main_th/2, -beam_th - retainer_th - retainer_big_gap ],
+	       [ +wing_top_ea_x + wings_main_th/2, -beam_th ]);
   }
 }
 
@@ -229,7 +234,7 @@ module Clamp(){ ////toplevel
     intersection(){
       hull(){
 	Tubes(dr=clamp_main_th);
-	Tubes(dr=clamp_main_th, 5);
+	Tubes(dr=clamp_main_th, dyz=tube_dia/2 );
       }
       linextr(bracket_bot_z, bracket_top_z)
 	rectfromto([ -100, clamp_near_y ],