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 rod_distance = 45;
  12
  13 module x_end_motor(){
  14
  15     x_end_idler([3,3,0,0], thru=false);
  16     /// motor dummy
  17     //%translate([21-5,-21-11,25]) cube([42,42,42], center = true);
  18
  19
  20     difference(){
  21         union(){
  22             translate([-13.5,-16,26]) cube_fillet([17,14,52], center = true, vertical=[0,0,3,3], top=[0,3,6,3]);
  23             translate([-10,-34,9]) intersection(){
  24                 cube_fillet([10,37,18], center = true, vertical=[0,0,0,0], top=[0,3,5,3]);
  25                 translate([-10/2,10,-26]) rotate([45,0,0]) cube_fillet([10,60,60], radius=2);
  26             }
  27             translate([-15, -32, 30.25]) rotate([90, 0, 0])  rotate([0, 90, 0]) nema17(places=[1,0,1,1], h=10);
  28         }
  29
  30         // motor screw holes
  31         translate([21-5,-21-11,30.25]){
  32             // belt hole
  33             translate([-30,11,0]) cube([10,26,20], center = true);
  34             //motor mounting holes
  35             translate([-29, 0, 0]) rotate([90, 0, 0])  rotate([0, 90, 0]) nema17(places=[1,0,1,1], holes=true, shadow=5, $fn=6, h=8);
  36         }
  37     }
  38     //smooth rod caps
  39     translate([-22, -10.5, 0]) cube([17, 2, 15]);
  40     translate([-22, -10.5, 45]) cube([17, 2, 10]);
  41 }
  42
  43
  44 module x_end_idler(vfillet=[3,3,3,3], thru=true){
  45     difference(){
  46         union(){
  47             difference(){
  48                 translate([-4.5-10+2-1,17.5-10+2,30]) cube_fillet([15+2,35+5,60], center = true, vertical=vfillet, top=[5,3,5,3]);
  49                 //#translate([0,0,26]) cube_fillet([17,13.8,80], center = true);
  50                 //#cylinder(r=5.1, h=80);
  51                 bushing_negative(60);
  52             }
  53             //rotate([0,0,0]) translate([0,-9.5,0])
  54             if (bearing_choice == 1) {
  55                 linear_bushing();
  56             } else {
  57                 linear_bearing();
  58             }
  59             // Nut trap
  60             difference(){
  61                 if ((bearing_type == 1) || (bushing_type == 2)) {
  62                 translate([-2,17.5,4]) cube_fillet([16,18,8], center = true, vertical=[3,0,0,0]);
  63                 } else {
  64                 translate([-2,17.5,4]) cube_fillet([16,18,8], center = true, vertical=[3,0,0,3]);
  65                 }
  66
  67                 //bottom hole
  68                 translate([0,17,-1]) cylinder(h = 4, r=2.45);
  69                 //nut slid in
  70                 translate([5,17,4]) cube([21,9.5,4.1], center = true);
  71
  72                 translate([0,17,6.5]) cylinder(h = 4, r=2.45);
  73             }
  74         }
  75
  76         // belt hole
  77         translate([-5.5-10+1.5,22-10,30]) cube([10,46,32], center = true);
  78
  79         if(thru == true){
  80             translate([-14,-11,6]) rotate([-90,0,0]) pushfit_rod(8,50);
  81             translate([-14,-11,rod_distance+6]) rotate([-90,0,0]) pushfit_rod(8,50);
  82         } else {
  83             translate([-14,-7,6]) rotate([-90,0,0]) pushfit_rod(8,50);
  84             translate([-14,-7,rod_distance+6]) rotate([-90,0,0]) pushfit_rod(8,50);
  85         }
  86
  87         // idler hole
  88         translate([0,17+7,30.25]) rotate([0,-90,0]) cylinder(h = 80, r=2.2, $fn=30);
  89
  90     }
  91
  92     //threaded rod
  93     translate([0,17,0]) %cylinder(h = 70, r=2.5);
  94
  95 }
  96 mirror([0,0,0]) x_end_idler(thru=true);
  97 // translate([40,40,0]) x_end_idler(thru=false);
  98 translate([40,0,0]) mirror([0,1,0]) x_end_motor();
  99
 100 module pushfit_rod(diameter,length){
 101     cylinder(h = length, r=diameter/2, $fn=30);
 102     translate([0,-diameter/4,length/2]) cube([diameter,diameter/2,length], center = true);
 103
 104     translate([0,-diameter/2-1.2,length/2]) cube([diameter,1,length], center = true);
 105 }