-// PRUSA iteration3
-// X ends
-// GNU GPL v3
-// Josef Průša <josefprusa@me.com>
-// Václav 'ax' Hůla <axtheb@gmail.com>
-// http://www.reprap.org/wiki/Prusa_Mendel
-// http://github.com/prusajr/PrusaMendel
-
-include <configuration.scad>
-use <bushing.scad>
-
-
-module x_end_motor(){
- mirror([0,1,0]) {
-
- x_end_base([3,3,0,0], thru=false);
- /// motor dummy
- //%translate([21-5,-21-11,25]) cube([42,42,42], center = true);
-
-
- difference(){
- union(){
- translate([-13.75,-15,26]) cube_fillet([17.5,12,52], center = true, vertical=[0,0,3,1.5], top=[0,3,6,3]);
- translate([-10,-34,9]) intersection(){
- cube_fillet([10,37,18], center = true, vertical=[0,0,0,0], top=[0,3,5,3]);
- translate([-10/2,10,-26]) rotate([45,0,0]) cube_fillet([10,60,60], radius=2);
- }
- translate([-15, -32, 30.25]) rotate([90, 0, 0]) rotate([0, 90, 0]) nema17(places=[1,0,1,1], h=10);
- }
-
- // motor screw holes
- translate([21-5,-21-11,30.25]){
- // belt hole
- translate([-30,11,0]) cube([10,26,20], center = true);
- //motor mounting holes
- 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);
- }
- }
- //smooth rod caps
- translate([-22, -10, 0]) cube([17, 2, 15]);
- translate([-22, -10, 45]) cube([17, 2, 10]);
- }
-}
-
-
-module x_end_base(vfillet=[3,3,3,3], thru=true, len=40){
- difference(){
- union(){
- difference(){
- translate([-13.75-0.5,-10+len/2,30]) cube_fillet([18.5,len,60], center = true, vertical=vfillet, top=[5,3,5,3]);
- bushing_negative(60);
- }
- //rotate([0,0,0]) translate([0,-9.5,0])
- if (bearing_choice == 1) {
- linear_bushing(60);
- } else {
- linear_bearing(60);
- }
- // Nut trap
- difference(){
- if ((bearing_choice != 1) || (bushing_type == 2)) {
- translate([-2,17.5,4]) cube_fillet([16,18,8], center = true, vertical=[3,0,0,0]);
- } else {
- translate([-2,17.5,4]) cube_fillet([16,18,8], center = true, vertical=[3,0,0,3]);
- }
-
- //bottom hole
-
- translate([0,17,-1]) cylinder(h = 4, r=2.75);
- //nut slid in
- #translate([3,17,4]) cube([9.2*2,9.2*sqrt(3/4)+0.4,4.1], center = true);
-
- translate([0,17,6.5]) cylinder(h = 4, r=2.75);
- }
- }
-
- // belt hole
- translate([-5.5-10+1.5,22-9,30]) cube([10,55,32], center = true);
-
- // change rod diameter to 8.4 if printing with ABS
- if(thru == true){
- translate([-14,-11,6]) rotate([-90,0,0]) pushfit_rod(8.1,50);
- translate([-14,-11,xaxis_rod_distance+6]) rotate([-90,0,0]) pushfit_rod(8.1,50);
- } else {
- translate([-14,-7,6]) rotate([-90,0,0]) pushfit_rod(8.1,50);
- translate([-14,-7,xaxis_rod_distance+6]) rotate([-90,0,0]) pushfit_rod(8.1,50);
- }
-
-
- }
-
- //threaded rod
- #translate([0,17,0]) %cylinder(h = 70, r=2.5+0.2);
-
-}
-
-
-module x_end_idler(){
- difference() {
- x_end_base(len=42+idler_size_inner_r);
- // idler hole
- translate([0,17+6+idler_size_inner_r,30.25-((bearing_type==0)? 3 : 0)]) rotate([0,-90,0]) cylinder(h = 80, r=idler_size_inner_r-0.2, $fn=30);
- if (bearing_type == 0)
- translate([-9,17+6+idler_size_inner_r,30.25-3]) {
- rotate([0,-90,0]) cylinder(h = 10, r=idler_size/2+4, $fn=30);
- translate([-5,10,0]) cube([10,20,idler_size+8], center=true);
- }
- }
-}
-
-mirror([0,0,0]) x_end_idler(thru=true);
-// translate([40,40,0]) x_end_idler(thru=false);
-translate([40,0,0]) x_end_motor();
-
-module pushfit_rod(diameter,length){
- cylinder(h = length, r=diameter/2, $fn=30);
- translate([0,-diameter/4,length/2]) cube([diameter,diameter/2,length], center = true);
-
- translate([0,-diameter/2-1.2,length/2]) cube([diameter,1,length], center = true);
-}
+// PRUSA iteration3
+// X end prototype
+// GNU GPL v3
+// Josef Průša <iam@josefprusa.cz> and contributors
+// http://www.reprap.org/wiki/Prusa_Mendel
+// http://prusamendel.org
+
+// Also includes code from Wilson and Wilson2, (c) Marty Rice
+// https://github.com/mjrice/wilson
+
+// todo: make x-end height global and make anything relying implicitly
+// on the height of the x-end use that for positioning.
+
+// bearing height, strain relief (&& maybe make dependent upon the bearing diameter)
+
+// major issues with rev 3
+
+// - motor side screw hole conflicts with switch / other rear mount is
+// inaccessible without removing the leadscrew from the nut
+
+// - New idler anti-pitching ribs are too big (new idler I wasn't
+// using is larger so the existing ones worked fine for that one...)
+// NOTE: new idler is meant for integrated toothed idler...
+
+use <bushing.scad>
+include <configuration.scad>
+
+pushfit_d = bushing_xy[0] * 2 + 0.25; //smooth_rod_d + 0.25;
+rod_distance = 50;
+x_box_height = 5 + rod_distance + bushing_xy[0] * 2 + 0.25;
+hex_nut_r = 4.75;
+thinwall = 3;
+
+module vertical_bushing_base(bushing){
+ bushing_size = bushing[1]*2 + 2 * thinwall;
+ translate(v=[-2-bushing_size/4,0,x_box_height/2]) cube(size = [4+bushing_size/2,bushing_size,x_box_height], center = true);
+ cylinder(h = x_box_height, r=bushing_size/2, $fn = 90);
+}
+
+module vertical_bushing_holes(bushing){
+ bushing_cut_extra = 0.2; // padding so it's not too tight
+ translate(v=[0,0,-4]) cylinder(h = x_box_height + 3, r=bushing[1] + bushing_cut_extra, $fn = 60);
+ translate(v=[0,0,x_box_height-4]) cylinder(h=x_box_height,r=bushing[1]-1,$fn=60);
+ // TODO: make translate(z) use x_box_height to correctly position slit
+ #rotate(a=[0,0,-50]) translate(v=[8,0,24/*was 31.5 mjr*/]) cube(size = [10,2 /*was 1 mjr*/ ,x_box_height+13], center = true);
+ translate([0,0,-1]) cylinder(h=9,r1=bushing[1]+thinwall/2+1,r2=4,$fn=60);
+ //#translate([0,0,49]) cylinder(h=9,r2=bushing[1]+thinwall/2,r1=4,$fn=60);
+}
+
+
+module nut_trap_base () {
+ cube(size=[16,21,8],center=true);
+ translate ([2,0,0]) cylinder(h=8,r=12.5,$fn=50,center=true);
+}
+
+module nut_trap () {
+ union() {
+ // center post of brass nut
+ cylinder(h=12,r=5.45,$fn=50,center=true);
+ // holes for m3 screws in brass nut
+ translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ #rotate([0,0,90]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ rotate([0,0,180]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ #rotate([0,0,270]) translate(v=[8,0,0]) cylinder(h=12,r=1.8,$fn=20,center=true);
+ }
+}
+
+module x_end_base(){
+// Main block
+height = x_box_height;
+// TODO: calculate correct translate(y) + cube(y) using size of bearing
+translate(v=[-15,-10,height/2]) cube(size = [17,45,height], center = true);
+// Bearing holder
+ vertical_bushing_base(bushing_z);
+//Nut trap
+ translate(v=[-4+zmotor_delta_x,-17-zmotor_delta_y,4]) nut_trap_base ();
+ // Cube
+// #translate(v=[-2-2,-17,4]) cube(size = [8,16,8], center = true);
+ // Hexagon
+// #translate(v=[0,-17,0]) rotate([0,0,30]) cylinder(h = 8, r=8, $fn = 6);
+}
+
+module x_end_holes(){
+ vertical_bushing_holes(bushing_z);
+ // Belt hole
+ translate(v=[-1,0,0]){
+ // Stress relief
+ translate(v=[-5.5-10+1.5,-bushing_z[1]-4,30]) cube(size = [20,1,28], center = true);
+ // Cut out for belt (this is NOT centered because the motor isn't centered)
+ difference(){
+ translate(v=[-5.5-10+1.5,-10,30]) cube(size = [10,46,28], center = true);
+
+ // Nice edges
+ translate(v=[-5.5-10+1.5,-10,30+23]) rotate([0,45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30+23]) rotate([0,-45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30-23]) rotate([0,45,0]) cube(size = [10,46,28], center = true);
+ translate(v=[-5.5-10+1.5,-10,30-23]) rotate([0,-45,0]) cube(size = [10,46,28], center = true);
+
+}
+}
+
+
+ pushrod_extra_z = 2.5;
+// Bottom pushfit rod
+#translate(v=[-15,-41.5,bushing_xy[0]+pushrod_extra_z]) rotate(a=[-90,0,0]) pushfit_rod(pushfit_d,50);
+// Top pushfit rod
+translate(v=[-15,-41.5,rod_distance+bushing_xy[0]+pushrod_extra_z]) rotate(a=[-90,0,0]) pushfit_rod(pushfit_d,50);
+// Nut trap
+translate(v=[zmotor_delta_x,-17-zmotor_delta_y,3]) rotate ([0, 0, 45]) nut_trap ();
+// #translate(v=[0,-17,-0.5]) cylinder(h = 4, r1=3.4, r2=2.9, $fn=25);
+// translate(v=[0,-17,3]) rotate([0,0,30]) cylinder(h = 10, r=hex_nut_r, $fn = 6);
+}
+
+
+// Final prototype
+module x_end_plain(){
+ difference(){
+ x_end_base();
+ x_end_holes();
+ }
+}
+
+x_end_plain();
+
+
+module pushfit_rod(diameter,length){
+ translate([0,-0.3,0]) cylinder(h = length, r=diameter/2, $fn=30);
+ translate([0,0.3,0]) cylinder(h = length, r=diameter/2, $fn=30);
+// difference(){
+// translate(v=[0,-diameter/2.85,length/2]) rotate([0,0,45]) cube(size = [diameter/2,diameter/2,length], center = true);
+// translate(v=[0,-diameter/4-diameter/2-0.4,length/2]) rotate([0,0,0]) cube(size = [diameter,diameter/2,length], center = true);
+// }
+
+}
+
HCoop / clinton / prusa3.git / blobdiff