| 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_ratio], 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(); |