Very basic import of modified Wilson TS/2 x-ends
[clinton/prusa3.git] / box_frame / extras / calibrate.scad
CommitLineData
c9d05980
VAH
1// PRUSA iteration3
2// Calibrating object
3// GNU GPL v3
4// Václav 'ax' Hůla <axtheb@gmail.com>
5
6include <../configuration.scad>
7use <../bushing.scad>
8
9use <../x-end.scad>
10
11intersection() {
12 difference() {
13 union(){
14 //central cube
15 translate([-10, -10, 0]) cube_fillet([20, 20, 20], top=[3, 0, 3, 0]);
16 //xy bearing. If the bearing is hard to put inside you are probably extruding too much fabric.
17 mirror([1, 0, 0]) translate([20, 0, 0]) linear_bearing();
18 //z smooth rod. See note above. You can adjust it in inc/conf_bushing.scad, but the problem is likely to be in machine.
19 translate([-12, 7, 0]) cube_fillet([24, 13, 4.5], vertical=[3, 3, 0, 0]);
20 translate([0, 18, 0]) cylinder(h=2.5, r=(bushing_z[0] + 5 * single_wall_width));
21 //z wall
22 translate([-11, -36, 0]) cube_fillet([5, 31, 20], top=[0, 0, 5, 7]);
23 //belt holder. Belt thickness is in configuration.scad
24 translate([14 + belt_thickness, -1, 10]) cube_fillet([8, 14, 20], center = true, vertical = [2,0,2,2], fn=8);
25 translate([5, 3, 0]) cube ([10, 3, 20]);
26
27 }
28
29 //xy bearing hole
30 mirror([1, 0, 0]) translate([20, 0, 0]) linear_bearing_negative();
31 //x smooth rod
32 translate([0, -11, 5 + bushing_xy[0]]) rotate([-90, 0, 0]) pushfit_rod(bushing_xy[0] * 2 + 0.2, 50);
33 //z smooth rod
fa3e3ae8 34 translate([0, 18, -1]) cylinder(h=20, r=bushing_z[0] + single_wall_width / 4);
c9d05980
VAH
35
36 //screw
37 translate([0, -20, 10]) rotate([0, -90, 0]) screw(head_drop=7, h=122, r_head=4.5);
38 //x carriage nut. Too bad its not parametrised (todo)
39 translate([-7,-29, 10]) rotate([90, 0, 0]) {
40 rotate([0, 90, 0]) cylinder(r=3.4, h=5, $fn=6, center=true);
41 rotate([0, 90, 0]) cylinder(r=1.8, h=22, center=true);
42
43 }
44 //belt
875ab7f7
VAH
45 translate([10, -2, 0]) belt(25);
46 #translate([10, -2, 0]) belt(25);
c9d05980
VAH
47
48
49 }
50 //Cut top to save plastic
51 translate([-50, -50, 0]) cube([100, 100, 20]);
52}