/*
*******************************************
Objekt Info: Zauberwuerfel Einzelteile

*******************************************
Version: 27.07.2022 khf
*******************************************
*/

//***************   Auswahl   *************

//  1:Mittelteil aussen  2:Ecke  3: Halbes Innenteil
//  4:Halbe Kugel innen 5:Mittelteil innen 6: Einzelwuerfel aussen

              part = "4";

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

//***************   Libraries  ************

//keine

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

//***************  Parameter   *************
f = 60;   // Anzahl der Fragmente
d = 20;   // Abstand der Wuerfel
c = 0.25;  // Schnittanpassung fuer die Wuerfel
g = 0.25;  // Schnittanpassung fuer den Kern
b = 2-(c/2); // Kanten Rundung der Einzelteile
//*****************************************

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

s = 20-c;    // Konstante
//---------------------------------------------------------|
module rubikCube()
{
     // Kern d
     translate([0,0,0])

        piece_0(); // Kern

}
module piece_0() // Kern
{
   difference()
   {
      translate([0,0,0])
         sphere(d=35-g,$fn=f);
      translate([0,0,0])
         sphere(d=20,$fn=f);
      for(i=[[0,0,0],[0,90,0],[90,0,0],
             [0,180,0],[0,-90,0],[-90,0,0]])
         rotate([i[0],i[1],i[2]])
            translate([0,0,10])
               sphere(d=14+g,$fn=f);
      for(i=[[0,0,0],[0,90,0],[90,0,0],
             [0,180,0],[0,-90,0],[-90,0,0]])
         rotate([i[0],i[1],i[2]])
            translate([0,0,15])
               cylinder(h=5,d=10+g,center=true,$fn=f);
   }
}
//---------------------------------------------------------|

//---------------------------------------------------------|
module rubikCubep2()
{
                 piece_2(); // Ecke
}
//---------------------------------------------------------|
module rubikCubep3()
{
              piece_3(); // Ecken unten
}

//---------------------------------------------------------|

module piece_1() // Mittelteil
{
   union()
   {
      difference()
      {
         translate([0,0,0])
             block(s,b);
         translate([0,0,20])
            sphere(d=48+c,$fn=f);
      }
      translate([0,0,0])
         cylinder(h=18,d=10-c,center=true,$fn=f); //Evtl d anpassen!
      difference()
      {
         translate([0,0,10])
            sphere(d=14-c,$fn=f); //Evtl d anpassen! (Spiel im Mittelteil)

      }

   }
}

//---------------------------------------------------------|
module piece_2() // Rand
{
   difference()
   {
      union()
      {
         difference()
         {
            translate([0,0,0])
               block(s,b);
            translate([20,0,20])
               sphere(d=48+c,$fn=f);
         }
         intersection()
         {
            translate([20,0,20])
               sphere(d=48-c,$fn=f);
            translate([5,0,5])
               cube([20-c,10-c,20-c],center=true);
         }
         translate([2.5,0,2.5])
            cube([15-c,10-c,15-c],center=true);
      }
      translate([20,0,20])
         rotate([0,45,0])
            sphere(d=35+c,$fn=f);
   }
}
//---------------------------------------------------------|
module piece_3() // Ecke
{
   difference()
   {
      union()
      {
         translate([0,0,0])
            block(s,b);
         intersection()
         {
            translate([20,20,20])
               sphere(d=48-c,,$fn=f);
            translate([5,5,5])
               cube([20-c,20-c,20-c],center=true);
         }
      }
      translate([20,20,20])
        sphere(d=35+c,$fn=f);
   }
}
//---------------------------------------------------------|
module rubikCubeHalf()
{
   difference()
   {
      rotate([0,0,360*$t])
         translate([0,0,0])

            rubikCube();
             translate([0,50,0])
            color( "Red", 1.0 )
            cube([100,100,100],center=true);
   }
}
//---------------------------------------------------------|

//---------------------------------------------------------|
module block( // Einzelwuerfel
   s = 20,    // aeussere Groesse
   b = 2)     // Rundung
// - - - - - - - - - - - - - - - - - - - - - - - - - - -
{
   // Variablen
   c = s - (b * 2); // Kerngroesse des Wuerfels
   h = c / 2;       // Kernhaelfte
   union()
   {
      // aeussere Ecken
      for(r = [0:90:270])
         rotate([0,r,0])
            for(y = [h,-h])
               translate([h,y,h])
                  sphere(b,$fn=30); // Ecken
      // Aussenrand
      for(r = [0:90:270])
         rotate([0,r,0])
            for(y = [h,-h])
               translate([h,y,0])
                  cylinder(c,b,b,center=true,$fn=30); // Rand
      // Aussengrenzen (Achse y)
      for(r = [0:90:270])
         rotate([0,r,0])
            translate([h,0,h])
               rotate([90,0,0])
                  cylinder(c,b,b,center=true,$fn=30); // Rand
      // Aussenwaende
      for(r = [0:90:270])
         rotate([0,r,0])
            translate([b,0,0])
               cube([c,c,c],center=true); // Wuerfelflaechen
      // Aussenwaende (Achse y)
      for(y = [b,-b])
         translate([0,y,0])
            cube([c,c,c],center=true); // Wuerfelflaechen
   }
}
//---------------------------------------------------------|

print_part(); // Vorschau Einzelteile

module print_part()
 {
        if (part == "1") {
        rubikCubep2();
               }
    else if (part == "2") {
        rubikCubep3();
        }
    else if (part == "3") {
        rubikCubeHalf();
        }
    else if (part == "4") {
        rubikCubeHalf();
        }
    else if (part == "5") {
        piece_1();
        }
        else if (part == "6") {
        block();
        }
 }
//---------------------------------------------------------|


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

s = 20-c;    // Konstante
module rubikCube() //Vollansicht
{
     // Kern
     translate([0,0,0])
        piece_0(); // Kern des Wuerfels

     // 6 Kern-Teile
     for(r = [[0,0,-90]])
        rotate(r)
           translate([d,0,0])
              rotate([0,-90,0])
                 piece_1(); // Mittelteile Zentrum









}
//---------------------------------------------------------|
module rubikCubeHalf() //Schnittansicht
{
   difference()
   {
      rotate([0,0,360*$t])
         translate([0,0,0])
            rubikCube();
             translate([0,50,0])
             color( "Red", 1.0 )
             cube([100,100,100],center=true);
   }
}
//---------------------------------------------------------|
module piece_0() // Kern
{
   difference()
   {
      translate([0,0,0])
         sphere(d=35-g,$fn=f);
      translate([0,0,0])
         sphere(d=20,$fn=f);
      for(i=[[0,0,0],[0,90,0],[90,0,0],
             [0,180,0],[0,-90,0],[-90,0,0]])
         rotate([i[0],i[1],i[2]])
            translate([0,0,10])
               sphere(d=14+g,$fn=f);
      for(i=[[0,0,0],[0,90,0],[90,0,0],
             [0,180,0],[0,-90,0],[-90,0,0]])
         rotate([i[0],i[1],i[2]])
            translate([0,0,15])
               cylinder(h=5,d=10+g,center=true,$fn=f);
   }
}
//---------------------------------------------------------|
module piece_1() // Mittelteil
{
   union()
   {
      difference()
      {
         translate([0,0,0])
             block(s,b);
         translate([0,0,20])
            sphere(d=48+c,$fn=f);
      }
      translate([0,0,0])
         cylinder(h=18,d=9.5-c,center=true,$fn=f);
      difference()
      {
         translate([0,0,10])
            sphere(d=13.8-c,$fn=f);
         translate([0,0,20])
            sphere(d=19+c,center=true,$fn=f);
      }
      translate([0,0,10])
         support_1();
   }
}
//---------------------------------------------------------|
module piece_2() // Mitte aussen
{
   difference()
   {
      union()
      {
         difference()
         {
            translate([0,0,0])
               block(s,b);
            translate([20,0,20])
               sphere(d=48+c,$fn=f);
         }
         intersection()
         {
            translate([20,0,20])
               sphere(d=48-c,$fn=f);
            translate([5,0,5])
               cube([20-c,10-c,20-c],center=true);
         }
         translate([2.5,0,2.5])
            cube([15-c,10-c,15-c],center=true);
      }
      translate([20,0,20])
         rotate([0,45,0])
            sphere(d=35+c,$fn=f);
   }
}
//---------------------------------------------------------|
module piece_3() // Ecke
{
   difference()
   {
      union()
      {
         translate([0,0,0])
            block(s,b);
         intersection()
         {
            translate([20,20,20])
               sphere(d=48-c,,$fn=f);
            translate([5,5,5])
               cube([20-c,20-c,20-c],center=true);
         }
      }
      translate([20,20,20])
        sphere(d=35+c,$fn=f);
   }
}
//---------------------------------------------------------|

//---------------------------------------------------------|
module support_23() // Support 2 und 3
{
   for(x=[28,20,12,8,0,-8,-12,-20,-28])
      for(y=[28,-28])
         translate([x,y,0])
              cylinder(h=30,d=1,center=true,$fn=f);
   for(x=[28,-28])
      for(y=[20,12,8,0,-8,-12,-20])
         translate([x,y,0])
            cylinder(h=30,d=1,center=true,$fn=f);
   for(x=[20,12,8,-8,-12,-20,])
      for(y=[24,-24])
         translate([x,y,0])
              cylinder(h=30,d=1,center=true,$fn=f);
   for(x=[24,-24])
      for(y=[20,12,8,-8,-12,-20])
         translate([x,y,0])
            cylinder(h=30,d=1,center=true,$fn=f);
   for(x=[25,-25])
      translate([x,0,0])
         cylinder(h=30,d=1,center=true,$fn=f);
   for(y=[25,-25])
      translate([0,y,0])
         cylinder(h=30,d=1,center=true,$fn=f);
}
//---------------------------------------------------------|
module block( // Einzelwuerfel
   s = 20,    // aeussere Groesse
   b = 2)     // Rundung
// - - - - - - - - - - - - - - - - - - - - - - - - - - -
{
   // Variablen
   c = s - (b * 2); // Kerngroesse
   h = c / 2;       // Kernhaelfte
   union()
   {
      // aeussere Ecken des Wuerfels
      for(r = [0:90:270])
         rotate([0,r,0])
            for(y = [h,-h])
               translate([h,y,h])
                  sphere(b,$fn=30); // Wuerfelecken
      // Wuerfel-Aussenrand
      for(r = [0:90:270])
         rotate([0,r,0])
            for(y = [h,-h])
               translate([h,y,0])
                  cylinder(c,b,b,center=true,$fn=30); // Wuerfel Rand
      // Wuerfelaussengrenzen (Achse y)
      for(r = [0:90:270])
         rotate([0,r,0])
            translate([h,0,h])
               rotate([90,0,0])
                  cylinder(c,b,b,center=true,$fn=30); // Wuerfel Rand
      // Wuerfel-Aussenwaende
      for(r = [0:90:270])
         rotate([0,r,0])
            translate([b,0,0])
               cube([c,c,c],center=true); // Wuerfelflaechen
      // Wuerfelaussenwaende (Achse y)
      for(y = [b,-b])
         translate([0,y,0])
            cube([c,c,c],center=true); // Wuerfelflaechen
   }
}
//----------------------------------------------------