Added profiles

profiles.scad

@@ -0,0 +1,89 @@
+// ==============================================
+// Miscellaneous profiles (aluminum etc)
+// By Vitaly Mankevich / contraptor.org, (c) 2012
+// LGPL 2.1
+// ==============================================
+//
+// PROFILES (DIMENSIONLESS UNLESS SPECIFIED)
+// -----------------------------------------
+// profile_angle_equal(1, 1/8);
+// profile_angle_unequal(1, 1/2, 1/16);
+// profile_square_tube(1.5, 1/8);
+// profile_rect_tube(1.5, 2, 1/8);
+// profile_channel(1.5, 1, 1/8);
+//
+// profile_8020_fractional_1010(); // inches
+// profile_misumi_metric_2020(); // millimeters
+// profile_makerbeam();  // millimeters
+//
+// EXTRUDED PROFILES
+// -----------------
+// linear_extrude (height = 3.5) profile_square_tube(1.5, 1/8);
+//
+
+$fn = 24;
+
+module profile_angle_equal(side, wall) {
+	difference () {
+		square (side);
+		translate([wall, wall, 0]) square (side - wall);
+	}
+}
+
+module profile_angle_unequal(side_x, side_y, wall) {
+	difference () {
+		square ([side_x, side_y]);
+		translate ([wall, wall, 0]) square ([side_x - wall, side_y - wall]);
+	}
+}
+
+module profile_square_tube(side, wall) {
+	difference () {
+		square (side, center = true);
+		square (side-wall*2, center = true);
+	}
+}
+
+module profile_rect_tube(side_x, side_y, wall) {
+	difference () {
+		square ([side_x, side_y], center = true);
+		square ([side_x - wall*2, side_y - wall*2], center = true);
+	}
+}
+
+module profile_channel(base, side, wall) {
+	translate ([0, side/2, 0]) difference () {
+		square ([base, side], center = true);
+		translate ([0, wall/2, 0]) square ([base - wall*2, side - wall], center = true);
+	}
+}
+
+module profile_tslot_generic (pitch, slot, lip, web, hole) {
+	// pitch = side width, slot = slot width, lip = thickness of the lip, web = thickness of the web, core = side of the center square, hole = center hole diameter
+	difference () {
+		union() {
+			difference () {
+				square (pitch, center=true);
+				square (pitch - lip*2, center=true);
+				square ([pitch, slot], center=true);
+				square ([slot, pitch], center=true);
+			}
+			rotate ([0, 0, 45]) square ([pitch*1.15, web], center=true);
+			rotate ([0, 0, -45]) square ([pitch*1.15, web], center=true);
+			square (core, center=true);
+		}
+		circle (hole/2, center = true);
+	}
+}
+
+module profile_8020_fractional_1010 () {
+	profile_tslot_generic (pitch = 1, slot = 0.26, lip = 0.1, web = 0.13, core = 0.45, hole = 0.28);
+}
+
+module profile_misumi_metric_2020 () {
+	profile_tslot_generic (pitch = 20, slot = 5.2, lip = 2, web = 2.6, core = 9, hole = 5.6);
+}
+
+module profile_makerbeam () {
+	profile_tslot_generic (pitch = 10, slot = 2.5, lip = 1, web = 2, core = 1, hole = 0);
+}