// PRUSA iteration4
// Extruder idler
// GNU GPL v3
// Josef Průša <iam@josefprusa.cz> and contributors
// http://www.reprap.org/wiki/Prusa_Mendel
// http://prusamendel.org
 

module part()
{
 
    difference()
    {
        union()
        {
            // base shape
            translate([-11.5,42.5,-31.5])  cylinder( h=25, r=5, $fn=30 ); 
            translate([-17,12,-31.5]) cube([8,34,25.0]);   
            
            // pulley holders
            translate([-4,27,-22.75])  cylinder( h=1, r1=4, r2=3, $fn=30 ); 
            translate([-4,27,-27])  cylinder( h=4.25, r=4, $fn=30 ); 
            translate([-14,22,-26.75]) cube([10.5,10,4]);   
            translate([-16.5,22,-6.5]) cube([13,10,3]);   
            translate([-4,27,-6.5])  cylinder( h=3, r=4, $fn=30 ); 
            translate([-4,27,-7.25])  cylinder( h=0.75, r1=3, r2=4, $fn=30 ); 
        }

        // motor rim cut
        translate([7,27,-32.75])  cylinder( h=6, r=18, $fn=30 ); 
        
        // axis
        translate([-4,27,-32])  cylinder( h=40, r=1.5, $fn=30 ); 
    
        translate([-11.5,42.5,-32])  cylinder( h=30, r=1.7, $fn=30 ); 
        translate([-18,44,-32]) rotate([0,0,30]) cube([15,10,30]);   
        translate([-18,47,-32]) cube([15,10,30]);   
        translate([-16,0.5,-32]) rotate([0,0,30]) cube([15,10,30]);   
        translate([-18,3,-33]) cube([15,10,30]);   
        
        // idler nuts
        translate([-15,15.6,-39.4]) cube([2.1,5.8,16]);   
        translate([-15,15.6,-14.6]) cube([2.1,5.8,16]); 
      
        // idler screws
        translate([-18,18.5,-26.5]) rotate([0,90,0]) cylinder( h=45, r=1.7, $fn=30 );  
        translate([-18,18.5,-11.5]) rotate([0,90,0]) cylinder( h=45, r=1.7, $fn=30 );    
        translate([-18,18.5,-26.5]) rotate([0,90,0]) cylinder( h=2.5, r1=3, r2=1.7, $fn=30 );  
        translate([-18,18.5,-11.5]) rotate([0,90,0]) cylinder( h=2.5, r1=3, r2=1.7, $fn=30 );    

        translate([-12,18.5,-26.5]) rotate([0,90,0]) cylinder( h=4, r1=1.7, r2=2.2, $fn=30 );  
        translate([-12,18.5,-11.5]) rotate([0,90,0]) cylinder( h=4, r1=1.7, r2=2.2, $fn=30 );    

        translate([-5.3,16.2,-33]) rotate([0,0,30]) cube([5,5,40]); 
        translate([-7.8,33.5,-33]) rotate([0,0,-30]) cube([5,5,40]); 
        
        translate([-18,29,-17.6]) rotate([90,0,0]) rotate([0,90,0]) cylinder( h=10, r1=9, r2=6, $fn=6 );  
        
        // nice edges
        translate([-26,10,-2]) rotate([0,45,0]) cube([10,40,10]); 
        translate([-26,10,-35.5]) rotate([0,45,0]) cube([10,40,10]); 
        translate([-10,2,-35]) cube([20,20,50]); 
        
        //selective infill
        translate([-11,24,-5]) cube([5,6,0.2]); 
        translate([-11,24,-26]) cube([5,6,0.2]); 
        
        // filament sensor cleaning window
        translate([-20,43,-18.5])  rotate([90,0,90]) cylinder( h=15, r=3, $fn=30 ); 
        translate([-20,43,-21.5]) cube([21,10,6]);
    }
    
    difference()
    {    
        // side cut
        translate([-17,22,-8]) cube([4,17,4.5]);   
        translate([-9.5,33,-9]) rotate([0,0,45]) cube([10,10,6]);   
        
        // side cut edges
        translate([-26,10,1]) rotate([0,45,0]) cube([10,40,10]); 
        translate([-22.5,14,-10]) rotate([0,0,45]) cube([10,10,10]);     
        translate([-22.5,33,-10]) rotate([0,0,45]) cube([10,10,10]);     
    }
    
    translate([-11.5,28,-8]) rotate([0,0,45]) cube([3,6,4.5]);   
    
}

rotate([0,90,0]) part();