Gesellschaftsspiel-Replikator/Domino V1

Aus Stratum 0
< Gesellschaftsspiel-Replikator
Version vom 13:57, 22. Jan. 2014 von Lulu (Diskussion | Beiträge)
(Unterschied) ← Nächstältere Version | Aktuelle Version (Unterschied) | Nächstjüngere Version → (Unterschied)
Wechseln zu:Navigation, Suche


// Blindendomino
// 2014-01-22 V1
// by Stratum 0
// License: WTF

// **************************************
// ** Dominos bitte *massiv* drucken!  **
// **************************************

$fn=20;
LangeKante=40;
KurzeKante=LangeKante/2;
Hoehe=LangeKante/8;
Ausschnitt=15;
Kerbe=2;
Punktpos=LangeKante/2-Kerbe;
Punkthoehe=Kerbe;
Punktbasis=2;
Punktspitze=0;
Punktabstand=4;


intersection()
{
sphere (LangeKante*0.8);
MyDomino();
}

module MyDomino()
{
CutDomino();
AddPoints();
}


module CutDomino()
{
difference()
{
     // Basisdomino erstellen
     cube([LangeKante, KurzeKante, Hoehe], center=true);

     // Ausschnitt für Einkerbungen erstellen
     // Rechte Seite

     color("red") translate ([LangeKante/4,0,Kerbe])  cube([Ausschnitt, Ausschnitt,Kerbe],center=true);

     // Ausschnitt für Einkerbungen erstellen
     // Linke Seite

     color("blue") translate ([-LangeKante/4,0,Kerbe])  cube([Ausschnitt, Ausschnitt,Kerbe],center=true);

  

};// End Difference
}; // End Module

// Punkte hinzufügen


module AddPoints(){

// Seite Z: 1

color("orange")  
translate([-LangeKante/4,0,Kerbe])  
cylinder(Punkthoehe,Punktbasis,Punktspitze);     

// Seite -Z: 6

color("cyan")  
translate([LangeKante/4+Punktabstand,0,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);

color("white")  
translate([LangeKante/4-Punktabstand,0,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);

color("green")  
translate([LangeKante/4+Punktabstand,Punktabstand,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);

color("blue")  
translate([LangeKante/4-Punktabstand,Punktabstand,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);

color("yellow")  
translate([LangeKante/4+Punktabstand,-Punktabstand,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);

color("black")  
translate([LangeKante/4-Punktabstand,-Punktabstand,Kerbe])  

cylinder(Punkthoehe,Punktbasis,Punktspitze);


}