/*///////////////////////////////////////////////////////////////////   
   ACCROCHE  CABLES  DE  PORTE  ou  mural
   
   Carrefour Numérique² La Villette PARIS - avec  OpenSCAD 2015.03
   BERNARD début 1 février 2020
    - Fixation sur une porte (mesurer l'épaisseur de la porte)
    - Fixation sur un mur (désactiver le crochet)
    Angle 30°à 20° : reborts au bout pas utile, au choix
   F6 : 57s ; 1mn32s ;


//////////////////////////////////////////////////////////////////////*/

//           -- VARIABLES A SAISIR --
//
Eporte=34;   //  Epaisseur de la porte + 2mm
Diam=40;    //  Diam de base des supports cable
h=60;
Angle=20;    //  Selon l'angle quelques corrections sont utile (rabote haut)
prec=0;      //  nb. facettes (0=défaut:30)
Epais=6;     //  epaisseur semelle et crochet
Decal=20;    //  dimension rebort à ajuster selon gout et besoin :
//   Decal 30°=26/28 ; 20°=18/20  ; 10°=10/12 ; 5°=6/10  0°=2/6
//   A suivre... calculer par le prg selon 'Angle' : Decal, rabote haut

//          -- PROGRAMME --

difference(){
union(){
// a) Support arrondi
for (i=[1:5]) {
  translate([i*40,0,0]) {    
  rotate([ 0, -Angle, 0]) {
    difference(){
        union(){
          cylinder(d=Diam,h=h,$fn=prec);   //  les supports
rotate([ 0, Angle, 0]) {translate([-Decal,0,42]) {cylinder(d=Diam+3, h=3,$fn=prec); }} // REBORT à désactiver éventuellement SI 'Angle' >= 20 !!!
            }  
    translate([0,0,-1]) { cylinder(d=Diam-Epais, h=h+4,$fn=prec); }  //  creuse
    translate([-6,-Diam/2-1,-1]) {cube([Diam/2+12,Diam+2, h+2]); }
} }
} }
translate([0,-Diam/2,-Epais]) {cube ([195,Diam,Epais]); }  // Semelle
//
//  CROCHET pour porte                2 lignes à désactiver SI fixation sur MUR (//)
 translate([0,-Diam/2,-Eporte-Epais*2]) {cube ([5,Diam,Eporte+Epais*2]); } //ligne1
 translate([0,-Diam/2,-Eporte-Epais*2]) {cube ([25,Diam,Epais]); }         //ligne2
}  // fin union
//
//  2 TROUS pour fixation sur mur
translate([30,0,-Epais-0.5]) { cylinder(d=5.2, h=Epais+1,$fn=prec); }
translate([190,0,-Epais-0.5]) { cylinder(d=5.2, h=Epais+1,$fn=prec); }
rotate([0,90,0]) {   //  Trou au dessus 
   translate([22,0,-1]) { cylinder(d=5.2, h=Epais+1,$fn=prec); }
}
//  Rabotage des exterieurs
translate([Epais,-Diam/2,-Epais*2]) {cube ([195,Diam,Epais]); } //    rabote bas
translate([-Epais*2,-Diam/2-3,h-15]) {cube ([205,Diam+4,Epais+10]); } // rabote haut
//translate([-Epais*2,-Diam/2-3,h-17]) {cube ([200,Diam+4,Epais+6]); } // rabote haut
translate([-10,-Diam/2-2.5,-48]) {cube ([210,4,95]); } //    rabote Y moins
translate([-10,Diam/2-1.5,-48]) {cube ([210,4,95]); } //    rabote Y plus
 }   //  FIN de programme