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
  13 //height and width of the x blocks depend on x smooth rod radius
  14 x_box_height = 52 + 2 * bushing_xy[0];
  15 x_box_width = (bushing_xy[0] <= 4) ? 17.5 : bushing_xy[0] * 2 + 9.5;
  16
  17 module x_end_motor(){
  18
  19     mirror([0, 1, 0]) {
  20
  21         x_end_base([3, 3, 0, 0], thru=false);
  22
  23
  24         translate([0, -z_delta - 2, 0]) difference(){
  25             union(){
  26                 translate([-13.75, -14 + z_delta / 2, 30]) cube_fillet([17.5, 14 + z_delta, x_box_height], center = true, vertical=[0, 0, 3, 1.5], top=[0, 3, 6, 3], $fn=16);
  27                 translate([-10, -34, 9]) intersection(){
  28                     translate([0, 0, 0]) cube_fillet([10, 37, x_box_height - 42], center = true, vertical=[0, 0, 0, 0], top=[0, 3, 5, 3]);
  29                     translate([-10/2, 10, -26]) rotate([45, 0, 0]) cube_fillet([10, 60, 60], radius=2);
  30                     translate([0, 0, 21]) cube([10, 60, x_box_height], center = true);
  31                 }
  32                 translate([-15, -32, 30.25]) rotate([90, 0, 0])  rotate([0, 90, 0]) nema17(places=[1, 0, 1, 1], h=10);
  33             }
  34
  35             // motor screw holes
  36             translate([21-5, -21-11, 30.25]){
  37                 // belt hole
  38                 translate([-30, 11, 0]) cube([10, 36, 20], center = true);
  39                 //motor mounting holes
  40                 translate([-29, 0, 0]) rotate([0, 0, 0])  rotate([0, 90, 0]) nema17(places=[1, 1, 0, 1], holes=true, shadow=5, $fn=7, h=8);
  41             }
  42         }
  43         //smooth rod caps
  44         translate([-22, -10, 0]) cube([17, 2, 15]);
  45         translate([-22, -10, 45]) cube([17, 2, 10]);
  46     }
  47 }
  48
  49 module x_end_base(vfillet=[3, 3, 3, 3], thru=true, len=40){
  50
  51     difference(){
  52         union(){
  53             translate([-10 - bushing_xy[0], -10 + len / 2, 30]) cube_fillet([x_box_width, len, x_box_height], center=true, vertical=vfillet, top=[5, 3, 5, 3]);
  54
  55             translate([0, 0, 4 - bushing_xy[0]]) {
  56                 //rotate([0, 0, 0]) translate([0, -9.5, 0])
  57                 translate([z_delta, 0, 0]) linear(bushing_z, x_box_height);
  58                 // Nut trap
  59                 //difference(){
  60                 translate([-2, 17, 4]) cube_fillet([20, 16, 8], center = true, vertical=[6, 0, 0, 0], $fn=4);
  61                     //bottom hole
  62                 //}
  63             }
  64         }
  65         // here are bushings/bearings
  66         translate([z_delta, 0, 4 - bushing_xy[0]]) linear_negative(bushing_z, x_box_height);
  67
  68         // belt hole
  69         translate([-5.5-10+1.5, 22-9, 30]) cube([idler_width + 1, 55, 27], center = true);
  70
  71         translate([-10 - bushing_xy[0], 0, 0]) {
  72             if(thru == true){
  73                 translate([0, -11, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  74                 translate([0, -11, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  75             } else {
  76                 translate([0, -7, 6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  77                 translate([0, -7, xaxis_rod_distance+6]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
  78             }
  79         }
  80         translate([0, 0, 4 - bushing_xy[0]]) {  // m5 nut insert
  81                     translate([0, 17, -10]) rotate([0,0,45]){
  82                         cylinder(h = 40, r=2.75);
  83                         //nut slid in
  84                         translate([3, 0, 14]) cube([9.2*2, 9.2*sqrt(3/4)+0.4, 4.1], center = true);
  85                     }
  86         }
  87     }
  88     //threaded rod
  89     translate([0, 17, 0]) %cylinder(h = 70, r=2.5+0.2);
  90 }
  91
  92 module x_end_idler(){
  93     difference() {
  94         x_end_base(len=45);
  95         // idler hole
  96         translate([-14, 26, 29]) rotate([0, 90, 0]) {
  97             idler_assy(idler_bearing);
  98             translate([0,20,0])
  99                 cube([idler_assy_r_outer(idler_bearing) * 2, 40, idler_width + 1], center=true);
 100             if (idler_bearing[3]) {
 101                 %translate([0, 0, -(idler_width / 2)]) bearing_guide_outer();
 102                 %translate([0, 0, idler_width / 2]) mirror([0, 0, 1]) bearing_guide_inner();
 103             }
 104         }
 105     }
 106 }
 107
 108 mirror([0, 0, 0]) x_end_idler(thru=true);
 109 // translate([40, 40, 0]) x_end_idler(thru=false);
 110 translate([50, 0, 0]) x_end_motor();
 111
 112 module pushfit_rod(diameter, length){
 113     cylinder(h = length, r=diameter/2, $fn=30);
 114     translate([0, -diameter/4, length/2]) cube([diameter, diameter/2, length], center = true);
 115
 116     translate([0, -diameter/2-1.2, length/2]) cube([diameter, 1, length], center = true);
 117 }
 118
 119 if (idler_bearing[3] == 1) {
 120     translate([-25, -20 - idler_bearing[0] / 2, 0]) {
 121         render() bearing_guide_inner();
 122         translate([idler_bearing[0]+10, 0, 0])
 123             render()bearing_guide_outer();
 124     }
 125 }