box_frame/x-end.scad

   1 // PRUSA iteration3
   2 // X ends
   3 // GNU GPL v3
   4 // Josef Průša <josefprusa@me.com>
   5 // Václav 'ax' Hůla <axtheb@gmail.com>
   6 // http://www.reprap.org/wiki/Prusa_Mendel
   7 // http://github.com/prusajr/PrusaMendel
   8
   9 include <configuration.scad>
  10 use <bushing.scad>
  11 use <inc/bearing-guide.scad>
  12 use <y-drivetrain.scad>
  13
  14 //height and width of the x blocks depend on x smooth rod radius
  15 x_box_height = 52 + 2 * bushing_xy[0];
  16 x_box_width = (bushing_xy[0] <= 4) ? 17.5 : bushing_xy[0] * 2 + 9.5;
  17 bearing_height = max ((bushing_z[2] > 30 ? x_box_height : (2 * bushing_z[2] + 8)), x_box_height);
  18
  19 module x_end_motor(){
  20
  21     mirror([0, 1, 0]) {
  22
  23         x_end_base([3, 3, min((bushing_xy[0] - 4) * 2, 3), 0], thru=false);
  24
  25
  26         translate([0, -z_delta - 2, 0]) difference(){
  27             union(){
  28                 intersection() {
  29                     translate([-15, -34, 30]) cube([20, 60, x_box_height], center = true);
  30                     union() {
  31                         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);
  32                         translate([-10, -34, 9]) intersection(){
  33                             translate([0, 0, -5]) cube_fillet([10, 37, 28], center = true, vertical=[0, 0, 0, 0], top=[0, 3, 5, 3]);
  34                             translate([-10/2, 10, -26]) rotate([45, 0, 0]) cube_fillet([10, 60, 60], radius=2);
  35                         }
  36                     }
  37                 }
  38                 translate([-15.5, -32, 30.25]) rotate([90, 0, 0])  rotate([0, 90, 0]) nema17(places=[1, 0, 1, 1], h=11);
  39             }
  40
  41             // motor screw holes
  42             translate([21-5, -21-11, 30.25]){
  43                 // belt hole
  44                 translate([-30, 11, -0.25]) cube([11, 36, 24], center = true);
  45                 //motor mounting holes
  46                 translate([-28.5, 0, 0]) rotate([0, 0, 0])  rotate([0, 90, 0]) nema17(places=[1, 1, 0, 1], holes=true, shadow=5, $fn=small_hole_segments, h=8);
  47             }
  48         }
  49         //smooth rod caps
  50         translate([-22, -10, 0]) cube([17, 2, 15]);
  51         translate([-22, -10, 45]) cube([17, 2, 10]);
  52     }
  53 }
  54
  55 module x_end_base(vfillet=[3, 3, 3, 3], thru=true, len=40, offset=0){
  56
  57     difference(){
  58         union(){
  59             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]);
  60
  61             translate([0, 0, 4 - bushing_xy[0]]) {
  62                 //rotate([0, 0, 0]) translate([0, -9.5, 0])
  63                 translate([z_delta, 0, 0]) render(convexity = 5) linear(bushing_z, bearing_height);
  64                 // Nut trap
  65                 translate([-2, 18, 5]) cube_fillet([20, 14, 10], center = true, vertical=[8, 0, 0, 5]);
  66                 //}
  67             }
  68         }
  69         // here are bushings/bearings
  70         translate([z_delta, 0, 4 - bushing_xy[0]]) linear_negative(bushing_z, bearing_height);
  71
  72         // belt hole
  73         translate([-5.5 - 10 + 1.5, 22 - 9 + offset, 30]) cube([max(idler_width + 2, 11), 55, 27], center = true);
  74
  75         translate([-10 - bushing_xy[0], offset, 0]) {
  76             if(thru == true){
  77                 translate([0, -11, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  78                 translate([0, -11, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  79             } else {
  80                 translate([0, -7, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  81                 translate([0, -7, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  82             }
  83         }
  84         translate([0, 0, 5 - bushing_xy[0]]) {  // m5 nut insert
  85             translate([0, 17, 0]) rotate([0, 0, 10]){
  86                 //rod
  87                 #translate([0, 0, -1]) cylinder(h=(4.1 / 2 + 5), r=3, $fn=32);
  88                 //nut
  89                 translate([0, 0, 9]) cylinder(r=4.6, h=14.1, center = true, $fn=6);
  90
  91             }
  92         }
  93     }
  94     //threaded rod
  95     translate([0, 17, 0]) %cylinder(h = 70, r=2.5+0.2);
  96 }
  97
  98 module x_end_idler(){
  99     difference() {
 100         x_end_base(len=45 + z_delta / 3, offset=-10 - z_delta / 3);
 101         // idler hole
 102         translate([-20, -15 - z_delta / 2, 30]) {
 103             rotate([0, 90, 0]) cylinder(r=m4_diameter / 2, h=33, center=true, $fn=small_hole_segments);
 104             translate([15 - 2 * single_wall_width, 0, 0]) rotate([90, 0, 90]) cylinder(r=m4_nut_diameter_horizontal / 2, h=3, $fn=6);
 105
 106         }
 107         #translate([-6 - x_box_width, 11, 29.5 - (max(idler_bearing[0], 16) / 2)]) cube([x_box_width + 1, 11, 1.5 + max(idler_bearing[0], 16)]);
 108     }
 109         %translate([-14, -9, 30.5 - (max(idler_bearing[0], 16) / 2)]) x_tensioner();
 110 }
 111
 112 module x_tensioner(len=62, idler_height=max(idler_bearing[0], 16)) {
 113         idlermount(len=len, rod=m4_diameter / 2, idler_height=idler_height, narrow_len=46, narrow_width=idler_width + 2 - single_wall_width);
 114 }
 115
 116
 117 translate([-40, 0, 4 - bushing_xy[0]]) x_tensioner();
 118 mirror([1, 0, 0]) x_end_idler(thru=true);
 119 mirror([1, 0, 0]) translate([-50, 0, 0]) x_end_motor();
 120
 121 module pushfit_rod(diameter, length){
 122     cylinder(h = length, r=diameter/2, $fn=30);
 123     translate([0, -diameter/4, length/2]) cube([diameter, diameter/2, length], center = true);
 124
 125     translate([0, -diameter/2-1.2, length/2]) cube([diameter, 1, length], center = true);
 126 }
 127
 128 if (idler_bearing[3] == 1) {
 129     translate([-25, -30 - idler_bearing[0] / 2, 0]) {
 130         render() bearing_guide_inner();
 131         translate([idler_bearing[0]+10, 0, 0])
 132             render()bearing_guide_outer();
 133     }
 134 }