/* Roland */

[stratum0-wiki.git] / Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw

diff --git a/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw b/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw
index 07666ae..2682a15 100644 (file)
--- a/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw
+++ b/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw
@@ -1,15 +1,23 @@
+
+[[Datei:Ein Viertel Scrabble-Brett.PNG|thumb|OpenSCAD Entwurf von einem Scrabble-Brett (ein Viertel)]]
+
+* Andere Anbieter: 
+**[http://www.amazon.com/Maxi-Aids-Tactile-Braille-Crossword-Puzzle-Game/dp/B004USI2H6/ref=pd_sim_t_10?ie=UTF8&refRID=1CRT5HWAZZD53CGR5XT8] 
+** [http://www.amazon.com/Deluxe-Scrabble-Game-Braille-Version/dp/B000YL1XEM/ref=pd_sim_hpc_7?ie=UTF8&refRID=1ZV6GKYKWP7PTT01XTER]
+
 <PRE>
 
 
-// Scrabble Spielbrett
-// 2014-05-15 V1.1
+// Scrabble Spielbrett 
+// (ein Viertel)
+// 2014-05-15 V1.2
 // by Stratum 0
 // License: WTFPL
 
 // $fn=20;
 
-Kante = 20;
-Kantenbreite = 2;
+Kante = 14;
+Kantenbreite = 1;
 Hoehe = 4;
 Randhoehe = 2;
 Abstand=0;
@@ -17,6 +25,19 @@ Zaehler=1;
 Viertelfeld=8;
 
 
+
+//Hauptprogramm
+
+intersection()
+{
+    ViertelBrett();
+    cube ([Kante*(Viertelfeld+0.5), Kante*(Viertelfeld+0.5), Kante*(Viertelfeld+0.5)]);    
+}
+
+
+module ViertelBrett()
+{
+
 for (i = [1:Viertelfeld])
      {
      for (j = [1:Viertelfeld])
@@ -56,9 +77,9 @@ for (i = [1:Viertelfeld])
      } // End For I
 
 
+}
 
-
-     // Basisfeld erstellen
+// Basisfeld erstellen
 module Feld(Farbe)
 {
     difference()
@@ -77,14 +98,14 @@ module Punkte(AnzahlPunkte)
 {
     if (AnzahlPunkte==2)
     {
-        translate ([Kante/3, Kante/3, Hoehe]) cylinder(Randhoehe/2,2,1);
-        translate ([Kante/3*2, Kante/3*2, Hoehe]) cylinder(Randhoehe/2,2,1); 
+        translate ([Kante/3, Kante/3, Hoehe-Randhoehe]) cylinder(Randhoehe/2,2,1, center=false);
+        translate ([Kante/3*2, Kante/3*2, Hoehe-Randhoehe]) cylinder(Randhoehe/2,2,1, center=false); 
     }
     if (AnzahlPunkte==3)
     {
-        translate ([Kante/4, Kante/4, Hoehe]) cylinder(Randhoehe/2,2,1);
-        translate ([Kante/4*2, Kante/4*2, Hoehe]) cylinder(Randhoehe/2,2,1); 
-        translate ([Kante/4*3, Kante/4*3, Hoehe]) cylinder(Randhoehe/2,2,1); 
+        translate ([Kante/4, Kante/4, Hoehe-Randhoehe]) cylinder(Randhoehe/2,2,1, center=false);
+        translate ([Kante/4*2, Kante/4*2, Hoehe-Randhoehe]) cylinder(Randhoehe/2,2,1, center=false); 
+        translate ([Kante/4*3, Kante/4*3, Hoehe-Randhoehe]) cylinder(Randhoehe/2,2,1, center=false); 
     }
 }
 
@@ -94,14 +115,14 @@ module Striche(AnzahlStriche)
 {
   if (AnzahlStriche==2)
     {
-        translate ([Kante/3, Kante/4, Hoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]);
-        translate ([Kante/3*2, Kante/4, Hoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
+        translate ([Kante/3-Kantenbreite/2, Kante/4, Hoehe-Randhoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]);
+        translate ([Kante/3*2-Kantenbreite/2, Kante/4, Hoehe-Randhoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
     }
     if (AnzahlStriche==3)
     {
-        translate ([Kante/4, Kante/4, Hoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]);
-        translate ([Kante/4*2, Kante/4, Hoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
-        translate ([Kante/4*3, Kante/4, Hoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
+        translate ([Kante/4, Kante/4, Hoehe-Randhoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]);
+        translate ([Kante/4*2, Kante/4, Hoehe-Randhoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
+        translate ([Kante/4*3, Kante/4, Hoehe-Randhoehe]) cube([Randhoehe/2,Kante/2,Randhoehe/2]); 
     }
 }