x-carriage.scad

   1 // PRUSA iteration3
   2 // X carriage
   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 // mounting plate
  12 use <extras/groovemount.scad>
  13
  14 carriage_l = 74;
  15 carriage_hole_to_side = 5;
  16 carriage_hole_height = 4;
  17
  18
  19 module x_carriage(){
  20     mirror([1,0,0]) {
  21         difference() {
  22             union() {
  23                 //upper bearing
  24                 rotate([0,0,180]) {
  25                     if (bearing_choice == 2) {
  26                         linear_bearing(fillet = true);
  27                     } else {
  28                         linear_bushing(27);
  29                     }
  30                 }
  31
  32                 //lower bearing
  33                 translate([xaxis_rod_distance,0,0]) {
  34                     if (bearing_choice == 2) {
  35                         linear_bearing(carriage_l, fillet = true);
  36                     } else {
  37                         linear_bushing(carriage_l);
  38                     }
  39                 }
  40
  41                 // main plate
  42                 //difference(){
  43                 translate([14,-10,0]) cube_fillet([xaxis_rod_distance - 19,6,carriage_l], radius=2);
  44                 translate([5.5,-10,0]) cube_fillet([xaxis_rod_distance - 11,6,28], radius=2);
  45
  46                 //translate([55,-17.5, 67]) rotate([0,70,0]) cube([80,60,60], center = true);
  47                 //}
  48
  49                 //reduce springiness
  50
  51                 translate([6,5,20]) cube([xaxis_rod_distance - 13,5,8]);
  52
  53
  54             translate([20,0,carriage_hole_to_side]) {
  55                 rotate([90,0,0]) cylinder(r=(carriage_hole_to_side > 5 ? 5 : carriage_hole_to_side), h=12, center=true);
  56                 }
  57             translate([20,0,carriage_l - carriage_hole_to_side]) {
  58                rotate([90,0,0]) cylinder(r=(carriage_hole_to_side > 5 ? 5 : carriage_hole_to_side), h=12, center=true);
  59                 }
  60
  61                 translate([45/2,0,0]){
  62
  63                     // belt dummy
  64                     %translate([0,0,carriage_l/2]) cube([20,6,carriage_l], center = true);
  65
  66                     //belt flat side
  67 *                    difference() {
  68                     translate([-13.5,0,carriage_l/2]) cube_fillet([7,14,carriage_l], vertical = [3,3,0,0], center = true);
  69                     translate([-45/2,0,0]) bushing_negative();
  70                     }
  71
  72                     difference(){
  73                         translate([-3.0,0,carriage_l/2]) cube_fillet([11,14,carriage_l], vertical = [2,2,0,0], center = true);
  74                         #translate([-3.5,0,(carriage_l+28)/2]) cube([13,10,20], center = true);
  75                         translate([-8.5, 0, 0]) cube([2, 10, 28*2+1], center = true);
  76                         translate([0,0,28]) intersection() {
  77                             for (i = [0 : (carriage_l-28)/belt_tooth_distance])
  78                             {
  79                                 translate([-8.5, 0, 1+i*belt_tooth_distance]) cube([2, 10, belt_tooth_distance*belt_tooth_stride], center = true);
  80                             }
  81                             translate([0, 0, carriage_l/2]) cube([20, 10, carriage_l], center = true);
  82                         }
  83                     }
  84
  85                 }
  86             }
  87             #translate([20,-2,carriage_hole_to_side]) {
  88                 rotate([90,0,0]) cylinder(r=2.2, h=22, center=true);
  89                 translate([0,3,0]) rotate([90,90,0]) cylinder(r=9/2, h=carriage_hole_height, $fn=6, center=true);
  90                 translate([0,3,-3]) cube([8,carriage_hole_height,8], center=true);
  91             }
  92             #translate([20,-2,carriage_l-carriage_hole_to_side]) {
  93                 rotate([90,0,0]) cylinder(r=2.2, h=22, center=true);
  94                 translate([0,3,0]) rotate([90,90,0]) cylinder(r=9/2, h=carriage_hole_height, $fn=6, center=true);
  95                 translate([0,3,3]) cube([8,carriage_hole_height,8], center=true);
  96             }
  97 #            translate([20,-10,(carriage_l+28)/2]) {
  98                 translate([0,0,m3_nut_diameter/-2]) cube([2,m3_nut_diameter_bigger,m3_nut_diameter]);
  99                 translate([0,m3_nut_diameter_bigger/2,0]){
 100                     rotate([0, 90,0]) cylinder(r=3.2/2,h=10);
 101                     rotate([0,-90,0]) cylinder(r=3.2/2,h=30);
 102                 }
 103             }
 104         }
 105     }
 106
 107     module holding_plate(){
 108         translate([13,-10,0]){
 109             difference(){
 110                 translate([2.5-13.8/2, -17.5,35]) cube([5,35,carriage_l], center = true);
 111                 translate([2.5-13.8/2, -17.5,35]) cube([7,25,25], center = true);
 112                 translate([0,-17.5, 35-25]) rotate([0,-90,0]) cylinder(h = 80, r=2.5, $fn=30);
 113                 translate([0,-17.5, 35+25]) rotate([0,-90,0]) cylinder(h = 80, r=2.5, $fn=30);
 114             }
 115
 116             %translate([-7, -18 ,carriage_l/2]) rotate([-90,0,90]) groovemount();
 117         }
 118     }
 119 }
 120
 121 module x_beltclamp(){
 122     translate([2,0,0]) difference(){
 123         cube_fillet([carriage_l-32,17,7]);
 124         translate([carriage_l-32,m3_nut_diameter_bigger,0]/2){
 125             cylinder(r=3.2/2,h=30);
 126             translate([0,0,7]) mirror([0,0,1]) screw(slant=false,r=1.7,head_drop=3);
 127
 128         }
 129     }
 130 }
 131
 132 x_carriage();
 133 translate([carriage_l/-2-10,12,0]) x_beltclamp();
 134 %translate([-13,-10,carriage_l]) rotate([90,90,90]) x_beltclamp();
 135 //holding_plate();