include<../sixinch_library.scad>
$fn = 50*1;

Part = "c"; // [a:All, b:FrontPlate, c:Cabinet, d:Lid, e:BackPlate, f:Handles]
Units = 4;
Depth = 100;

module pi_mount_holes() {    
    dimensions_x = [0, 58];
    dimensions_y = [0, 49];
    for(i=[0:1]){
        for(j=[0:1]){
            echo(i); echo(j);
            translate([dimensions_x[i],dimensions_y[j],0])
                screw();
        }
    }
}

module go(){
    {
        rotate([90,0,90])
        if(Part=="a"){
            frontplate(Units,[],[],[],[Units/2],[45],[45]);
            cabinet(Depth,Units,[45],[],[Units/2]);
            lid(Depth,Units,[45],[45]);        
            back_plate(Units,Depth,[45],[45],[Units/2],[],[]);
            handle(Units,false);   
        }else if(Part=="b"){
            frontplate(Units,[],[],[],[Units/2],[45],[45]);
        }else if(Part=="c"){
            cabinet(Depth,Units,[45],[],[Units/2]);
        }else if(Part=="d"){
            lid(Depth,Units,[45],[45]); 
        }else if(Part=="e"){
            back_plate(Units,Depth,[45],[45],[Units/2],[],[]);
        }else if(Part=="f"){
            handle(Units,true);
        }
    }
}

difference() {
    go();
    translate([13, 36, 0])
    pi_mount_holes();
    translate([-25, 0, -18])
    chimney();
}