Di. 5 Feb. 2019 09:48:47 CET /home/jens/Documents/polyhaus

polyhaus.scad

@@ -12,107 +12,178 @@ sides=6;
 
 // The House Modules
 module ngon(
-    diameter=5,
+		diameter=5,
-    height=level)
+		height=level,
-    {
+		sides=sides
-        cylinder(
-            h=height,
-            r=diameter/2,
-            $fn=6
-        );
-    };
-
-
-
-module garage(
-    garageheigth=garageheigth,
-    garagediameter=garagediameter)
-    {
-    //color([0.1,0.1,1])
-    #translate(
-        [0,0,-garageheigth]) {
-			living(
-				floorheight=2*floorheigth,
-				ceilingheigth=2*ceilingheigth
-				)
-                   };
-	};
-};
-module ring(
-    ringdiameter=ringdiameter,
-    ringstrength=ringstrength,
-    ringheigth=level
 )
 {
-        difference() {
+	cylinder(
-            ngon(
+			h=height,
-                height=ringheigth,
+			r=diameter/2,
-                diameter=ringdiameter,
+			$fn=sides
-                $fn=6);
+		);
-            %translate ([0,0, -1]) ngon(
-                height=ringheigth+2,
-                diameter=ringdiameter-ringstrength,
-                $fn=6);
-        };
 };
-module living(
+
-    ringdiameter=ringdiameter,
+module garage(
-    ringstrength=ringstrength,
+		garageheigth=garageheigth,
-    ringheigth=level,
+		garagediameter=garagediameter
-    floorstrength=floorstrength,
+		)
-	ceilingstrength=ceilingstrength,
-	wallstrength=wallstrength,
 {
-    #difference() {
+	//color([0.1,0.1,1])
-        %ring();
+#translate([0,0,-garageheigth])
-        translate([0,0,+floorstrength])
+	living(
-ring(ringdiameter=ringdiameter-wallstrength,
+			floorstrength=2*floorstrength,
-    ringstrength=ringstrength-2*wallstrength,
+			ceilingstrength=2*ceilingstrength
-    ringheigth=level-floorstrength-ceilingstrength);
+		  );
-    };
 };
 
-outer_wall_woodwidth=50;
+module ring(
+		ringdiameter=ringdiameter,
+		ringstrength=ringstrength,
+		ringheigth=level
+	   )
+{
+//do the math for the radii
+	angle=(0.5*360/sides);
+	radius_in_circle=(asin(angle)*ringdiameter)-wallstrength;
+	side_length=2*acos(0.5*360/sides)*radius_in_circle;
+	radius_in_diameter=radius_in_circle/ asin(angle);
+#
+	difference() {
+		ngon(
+				height=ringheigth,
+				diameter=ringdiameter,
+				sides=sides
+		);
+		%translate ([0,0, -1]) ngon(
+				height=ringheigth+2,
+				diameter=radius_in_diameter,
+				sides=sides
+		);
+	};
+};
+
+module living(
+		ringdiameter=ringdiameter,
+		ringstrength=ringstrength,
+		ringheigth=level,
+		floorstrength=floorstrength,
+		ceilingstrength=ceilingstrength,
+		wallstrength=wallstrength
+		)
+		{
+
+	angle=(0.5*360/sides);
+	radius_in_circle=(asin(angle)*ringdiameter)-wallstrength;
+	radius_in_diameter=radius_in_circle/ asin(angle);
+	side_length=2*acos(0.5*360/sides)*radius_in_circle;
+#difference() {
+		%ring();
+		translate([0,0,+floorstrength])
+		ring(
+				ringdiameter=radius_in_diameter,
+				ringstrength=ringstrength-2*wallstrength,
+				ringheigth=level-(floorstrength+ceilingstrength));
+		};
+		};
+
+		outer_wall_woodwidth=50;
+		outer_wall_strawwidth=1000;
+
+module spar(
+	width,
+	depth,
+	height
+)
+{
+	translate(
+		[0.5*width,
+		0.5*depth,
+		0] )
+		cube(
+			width,
+			depth,
+			height
+		);
+}
 
-outer_wall_strawwidth=50;
 module outer_wall(
 	ringdiameter=ringdiameter,
-    ringstrength=ringstrength,
+	ringstrength=ringstrength,
-    ringheigth=level,
+	ringheigth=level,
-    floorstrength=floorstrength,
+	floorstrength=floorstrength,
-
+	ceilingstrength=ceilingstrength
-	ceilingstrength=ceilingstrength)
+)
-
 {
-side_length=;
+	angle=0.5*360/sides;
-radius_in_circle=;
+	radius_in_circle=(asin(angle)*ringdiameter)-wallstrength;
-elements=floor(sidelength/(outer_wall_woodwidth+outer_wall_strawwidth));
+	side_length=2*acos(angle)*radius_in_circle;
-	for (side in [1:sides])
+	elements=floor(side_length/(outer_wall_woodwidth+outer_wall_strawwidth));
-{
+	for (side=[1:sides] )
-if (elements%2==1)
+	{
-{
+		echo(side);
-//center the middle one
+		rotate(
-for (spar in [0:elements])
+			[0,0,2*angle]
-{
+		)
-translate (
+		{
-[0,
+						if (elements%2==1)
-radius_inner_circle,
+						{
-spar*(outer_wall_woodwidth+outer_wall_strawwidth
+				echo("DEBUG uneven number");
-]) spar();
+					// center the middle modeline
-translate (
+					for (spar= [0:elements])
-[0,
+					{
-radius_inner_circle,
+						offset= 0.5* outer_wall_strawwidth + spar*(outer_wall_woodwidth+outer_wall_strawwidth);
--spar*(outer_wall_woodwidth+outer_wall_strawwidth
+						translate (
-]) spar();
+								[
-}
+								0,
-}
+								radius_in_circle,
-
+								offset
-}
+								] )
+							spar(
+								width=outer_wall_woodwidth,
+								depth=wallstrength,
+								height=level
+								);
+						translate (
+								[
+								0,
+								radius_in_circle,
+								-offset
+								] )
+							spar();
+					}
+				}
+				if (elements%2==0)
+				{
+				echo("DEBUG even number");
+					// center the middle modeline
+					for (spar= [0:elements])
+					{
+						offset= 0.5* outer_wall_strawwidth + spar*(outer_wall_woodwidth+outer_wall_strawwidth);
+						translate (
+								[0,
+								radius_in_circle,
+								offset] )
+							spar(
+								width=outer_wall_woodwidth,
+								depth=wallstrength,
+								height=level
+								);
+						translate (
+								[0,
+								radius_in_circle,
+								-offset
+								] )
+							spar();
+					}
+				}
+		}
+	}
 };
 
-living();
+//living();
-
+//translate([0,0,level]) living();
-translate([0,0,level]) living();
+//garage();
-garage();
+outer_wall();