From 7bc880d3a8aeafb76ce736bdeafed74853be5a9c Mon Sep 17 00:00:00 2001
From: "Jan \"Yenya\" Kasprzak" <kas@fi.muni.cz>
Date: Fri, 24 Feb 2017 10:22:17 +0100
Subject: [PATCH] rc landing gear: lighter version

---
 rc-landing-gear.scad | 29 +++++++++++++++++------------
 1 file changed, 17 insertions(+), 12 deletions(-)

diff --git a/rc-landing-gear.scad b/rc-landing-gear.scad
index 71d67f7..877164c 100644
--- a/rc-landing-gear.scad
+++ b/rc-landing-gear.scad
@@ -10,20 +10,22 @@ vyska osy se spodni hranou trupu az cca 30mm pod trupem
 kolma cast asi vpredu
 */
 
-base_d = 80;
+base_d = 83;
 base_w = base_d;
-base_wall = 2;
-base_l = 50;
+base_wall = 0.8;
+base_l = 35;
 
-wheel_h = 40 + base_d/2; // under the base_d/2
-wheel_base = 160;
-
-axle_cube = 10;
+axle_cube = 7;
 axle_hole = 3;
 
-leg_wall = 2;
+leg_wall = 1;
 top_l = axle_cube;
 
+wheel_h = axle_cube/2+base_d/2 - leg_wall; // under the base_d/2
+wheel_base = 110;
+
+
+
 	// bottom arc
 	difference() {
 		$fn = 128;
@@ -33,9 +35,11 @@ top_l = axle_cube;
 		// cut the top half
 		translate([-infty/2, 0, -infty/2]) cube(infty);
 		// angled cut to top_l
-		translate([0, 0, top_l])
-		rotate([atan((base_d/2-base_wall)/(base_l - top_l)), 0, 0])
-		translate([-infty/2, 0, -infty/2]) cube(infty);
+		for (i = [-1, 1]) scale([i, 1, 1])
+			translate([0, 0, base_l])
+		// rotate([atan((base_d/2-base_wall)/(base_l - top_l)), 0, 0])
+			rotate([0, 57, 0])
+				translate([-infty, -infty/2, -infty/2]) cube(infty);
 	}
 
 	// wheel cubes
@@ -52,8 +56,9 @@ top_l = axle_cube;
 	// bottom struts
 	for (x = [-1, 1]) scale([x, 1, 1]) hull() {
 		// center
+		rotate([0, 0, 30])
 		translate([0, -base_d/2 + base_wall/2, 0])
-			cylinder(r = leg_wall/2, h = base_l, $fn = 16);
+			cylinder(r = leg_wall/2, h = (base_l-axle_cube)*(90-30)/90, $fn = 16);
 		// side
 		translate([wheel_base/2-axle_cube+leg_wall/2,
 			-wheel_h+axle_cube/2-leg_wall/2 , 0])
-- 
2.43.0