-// PRUSA iteration3
-// X ends
-// GNU GPL v3
-// Josef Průša <josefprusa@me.com>
-// Václav 'ax' Hůla <axtheb@gmail.com>
-// http://www.reprap.org/wiki/Prusa_Mendel
-// http://github.com/prusajr/PrusaMendel
-
-include <configuration.scad>
-use <bushing.scad>
-use <inc/bearing-guide.scad>
-use <y-drivetrain.scad>
-
-//height and width of the x blocks depend on x smooth rod radius
-x_box_height = 52 + 2 * bushing_xy[0];
-x_box_width = (bushing_xy[0] <= 4) ? 17.5 : bushing_xy[0] * 2 + 9.5;
-
-module x_end_motor(){
-
- mirror([0, 1, 0]) {
-
- x_end_base([3, 3, min((bushing_xy[0] - 4) * 2, 3), 0], thru=false);
-
-
- translate([0, -z_delta - 2, 0]) difference(){
- union(){
- intersection() {
- translate([-15, -34, 30]) cube([20, 60, x_box_height], center = true);
- union() {
- translate([-13.75, -14 + z_delta / 2, 24]) cube_fillet([17.5, 14 + z_delta, 55], center = true, vertical=[0, 0, 3, 1.5], top=[0, 3, 6, 3], $fn=16);
- translate([-10, -34, 9]) intersection(){
- translate([0, 0, -5]) cube_fillet([10, 37, 28], center = true, vertical=[0, 0, 0, 0], top=[0, 3, 5, 3]);
- translate([-10/2, 10, -26]) rotate([45, 0, 0]) cube_fillet([10, 60, 60], radius=2);
- }
- }
- }
- translate([-15.5, -32, 30.25]) rotate([90, 0, 0]) rotate([0, 90, 0]) nema17(places=[1, 0, 1, 1], h=11);
- }
-
- // motor screw holes
- translate([21-5, -21-11, 30.25]){
- // belt hole
- translate([-30, 11, -0.25]) cube([11, 36, 24], center = true);
- //motor mounting holes
- translate([-28.5, 0, 0]) rotate([0, 0, 0]) rotate([0, 90, 0]) nema17(places=[1, 1, 0, 1], holes=true, shadow=5, $fn=7, h=8);
- }
- }
- //smooth rod caps
- translate([-22, -10, 0]) cube([17, 2, 15]);
- translate([-22, -10, 45]) cube([17, 2, 10]);
- }
-}
-
-module x_end_base(vfillet=[3, 3, 3, 3], thru=true, len=40, offset=0){
-
- difference(){
- union(){
- translate([-10 - bushing_xy[0], -10 + len / 2 + offset, 30]) cube_fillet([x_box_width, len, x_box_height], center=true, vertical=vfillet, top=[5, 3, 5, 3]);
-
- translate([0, 0, 4 - bushing_xy[0]]) {
- //rotate([0, 0, 0]) translate([0, -9.5, 0])
- translate([z_delta, 0, 0]) render(convexity = 5) linear(bushing_z, x_box_height);
- // Nut trap
- //difference(){
- translate([-2, 17, 4]) cube_fillet([20, 16, 8], center = true, vertical=[7, 0, 0, 0], $fn=4);
- //bottom hole
- //}
- }
- }
- // here are bushings/bearings
- translate([z_delta, 0, 4 - bushing_xy[0]]) linear_negative(bushing_z, x_box_height);
-
- // belt hole
- translate([-5.5 - 10 + 1.5, 22 - 9 + offset, 30]) cube([max(idler_width + 2, 11), 55, 27], center = true);
-
- translate([-10 - bushing_xy[0], offset, 0]) {
- if(thru == true){
- translate([0, -11, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
- translate([0, -11, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
- } else {
- translate([0, -7, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
- translate([0, -7, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
- }
- }
- translate([0, 0, 4 - bushing_xy[0]]) { // m5 nut insert
- translate([0, 17, -10]) rotate([0,0,45]){
- cylinder(h = 40, r=2.75);
- //nut slid in
- translate([3, 0, 14]) cube([9.2*2, 9.2*sqrt(3/4)+0.4, 4.1], center = true);
- }
- }
- }
- //threaded rod
- translate([0, 17, 0]) %cylinder(h = 70, r=2.5+0.2);
-}
-
-module x_end_idler(){
- difference() {
- x_end_base(len=45 + z_delta / 3, offset=-10 - z_delta / 3);
- // idler hole
- translate([-20, -15 - z_delta / 2, 30]) {
- rotate([0, 90, 0]) cylinder(r=m4_diameter / 2, h=33, center=true, $fn=7);
- translate([15 - 2 * single_wall_width, 0, 0]) rotate([90, 0, 90]) cylinder(r=m4_nut_diameter_horizontal / 2, h=3, $fn=6);
-
- }
- translate([-6 - x_box_width, 11, 20]) cube([x_box_width + 1, 11, 21]);
- }
- %translate([-14, -9, 20]) x_tensioner();
-}
-
-module x_tensioner(len=62, idler_height=20) {
- difference() {
- idlermount(len=len, rod=m4_diameter / 2, idler_height=idler_height, narrow_len=46, narrow_width=idler_width + 2 - single_wall_width);
- translate([3, -14.7, idler_height / 2]) cube([10, 3.3, m4_diameter * 1.55], center=true);
- }
- translate([-(idler_width + 2 - single_wall_width) / 2, -13.1, 0]) cube([idler_width + 2 - single_wall_width, single_wall_width, 20]);
-}
-
-
-translate([-40, 0, 4 - bushing_xy[0]]) x_tensioner();
-mirror([0, 0, 0]) x_end_idler(thru=true);
-translate([50, 0, 0]) x_end_motor();
-
-module pushfit_rod(diameter, length){
- cylinder(h = length, r=diameter/2, $fn=30);
- translate([0, -diameter/4, length/2]) cube([diameter, diameter/2, length], center = true);
-
- translate([0, -diameter/2-1.2, length/2]) cube([diameter, 1, length], center = true);
-}
-
-if (idler_bearing[3] == 1) {
- translate([-25, -20 - idler_bearing[0] / 2, 0]) {
- render() bearing_guide_inner();
- translate([idler_bearing[0]+10, 0, 0])
- render()bearing_guide_outer();
- }
-}
+// PRUSA iteration3
+// X end prototype
+// GNU GPL v3
+// Josef Průša <iam@josefprusa.cz> and contributors
+// http://www.reprap.org/wiki/Prusa_Mendel
+// http://prusamendel.org
+
+// Also includes code from Wilson and Wilson2, (c) Marty Rice
+// https://github.com/mjrice/wilson
+
+// todo: make x-end height global and make anything relying implicitly
+// on the height of the x-end use that for positioning.
+
+// bearing height, strain relief (&& maybe make dependent upon the bearing diameter)
+
+// major issues with rev 3
+
+// - motor side screw hole conflicts with switch / other rear mount is
+// inaccessible without removing the leadscrew from the nut
+
+// - New idler anti-pitching ribs are too big (new idler I wasn't
+// using is larger so the existing ones worked fine for that one...)
+// NOTE: new idler is meant for integrated toothed idler...
+
+use <bushing.scad>
+include <configuration.scad>
+
+pushfit_d = bushing_xy[0] * 2 + 0.25; //smooth_rod_d + 0.25;
+rod_distance = 50;
+x_box_height = 5 + rod_distance + bushing_xy[0] * 2 + 0.25;
+hex_nut_r = 4.75;
+thinwall = 3;
+
+module vertical_bushing_base(bushing){
+ bushing_size = bushing[1]*2 + 2 * thinwall;
+ translate(v=[-2-bushing_size/4,0,x_box_height/2]) cube(size = [4+bushing_size/2,bushing_size,x_box_height], center = true);
+ cylinder(h = x_box_height, r=bushing_size/2, $fn = 90);
+}
+
+module vertical_bushing_holes(bushing){
+ bushing_cut_extra = 0.2; // padding so it's not too tight
+ translate(v=[0,0,-4]) cylinder(h = x_box_height + 3, r=bushing[1] + bushing_cut_extra, $fn = 60);
+ translate(v=[0,0,x_box_height-4]) cylinder(h=x_box_height,r=bushing[1]-1,$fn=60);
+ // TODO: make translate(z) use x_box_height to correctly position slit
+ #rotate(a=[0,0,-50]) translate(v=[8,0,24/*was 31.5 mjr*/]) cube(size = [10,2 /*was 1 mjr*/ ,x_box_height+13], center = true);
+ translate([0,0,-1]) cylinder(h=9,r1=bushing[1]+thinwall/2+1,r2=4,$fn=60);
+ //#translate([0,0,49]) cylinder(h=9,r2=bushing[1]+thinwall/2,r1=4,$fn=60);
+}
+
+
+module nut_trap_base () {
+ cube(size=[16,21,8],center=true);
+ translate ([2,0,0]) cylinder(h=8,r=12.5,$fn=50,center=true);
+}
+
+module nut_trap () {
+ union() {
+ // center post of brass nut
+ cylinder(h=12,r=5.45,$fn=50,center=true);
+ // holes for m3 screws in brass nut
+ translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ #rotate([0,0,90]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ rotate([0,0,180]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ #rotate([0,0,270]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ }
+}
+
+module x_end_base(){
+// Main block
+height = x_box_height;
+// TODO: calculate correct translate(y) + cube(y) using size of bearing
+translate(v=[-15,-10,height/2]) cube(size = [17,45,height], center = true);
+// Bearing holder
+ vertical_bushing_base(bushing_z);
+//Nut trap
+ translate(v=[-4+zmotor_delta_x,-17-zmotor_delta_y,4]) nut_trap_base ();
+ // Cube
+// #translate(v=[-2-2,-17,4]) cube(size = [8,16,8], center = true);
+ // Hexagon
+// #translate(v=[0,-17,0]) rotate([0,0,30]) cylinder(h = 8, r=8, $fn = 6);
+}
+
+module x_end_holes(){
+ vertical_bushing_holes(bushing_z);
+ // Belt hole
+ translate(v=[-1,0,0]){
+ // Stress relief
+ translate(v=[-5.5-10+1.5,-bushing_z[1]-4,30]) cube(size = [20,1,28], center = true);
+ // Cut out for belt (this is NOT centered because the motor isn't centered)
+ difference(){
+ translate(v=[-5.5-10+1.5,-10,30]) cube(size = [10,46,28], center = true);
+
+ // Nice edges
+ translate(v=[-5.5-10+1.5,-10,30+23]) rotate([0,45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30+23]) rotate([0,-45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30-23]) rotate([0,45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30-23]) rotate([0,-45,0]) cube(size = [10,46,28], center = true);
+
+}
+}
+
+
+ pushrod_extra_z = 2.5;
+// Bottom pushfit rod
+#translate(v=[-15,-41.5,bushing_xy[0]+pushrod_extra_z]) rotate(a=[-90,0,0]) pushfit_rod(pushfit_d,50);
+// Top pushfit rod
+translate(v=[-15,-41.5,rod_distance+bushing_xy[0]+pushrod_extra_z]) rotate(a=[-90,0,0]) pushfit_rod(pushfit_d,50);
+// Nut trap
+translate(v=[zmotor_delta_x,-17-zmotor_delta_y,3]) rotate ([0, 0, 45]) nut_trap ();
+// #translate(v=[0,-17,-0.5]) cylinder(h = 4, r1=3.4, r2=2.9, $fn=25);
+// translate(v=[0,-17,3]) rotate([0,0,30]) cylinder(h = 10, r=hex_nut_r, $fn = 6);
+}
+
+
+// Final prototype
+module x_end_plain(){
+ difference(){
+ x_end_base();
+ x_end_holes();
+ }
+}
+
+x_end_plain();
+
+
+module pushfit_rod(diameter,length){
+ translate([0,-0.3,0]) cylinder(h = length, r=diameter/2, $fn=30);
+ translate([0,0.3,0]) cylinder(h = length, r=diameter/2, $fn=30);
+// difference(){
+// translate(v=[0,-diameter/2.85,length/2]) rotate([0,0,45]) cube(size = [diameter/2,diameter/2,length], center = true);
+// translate(v=[0,-diameter/4-diameter/2-0.4,length/2]) rotate([0,0,0]) cube(size = [diameter,diameter/2,length], center = true);
+// }
+
+}
+
HCoop / clinton / prusa3.git / blobdiff