From: Lulu <Lulu@stratum0.org/mediawiki/>
Date: Thu, 15 May 2014 12:03:20 +0000 (+0000)
Subject: ScrabbleBrett OpenSCAD angefangen
X-Git-Url: https://git.rohieb.name/stratum0-wiki.git/commitdiff_plain/a59a17bc06ff588310f7ae3deb90600e25052694

ScrabbleBrett OpenSCAD angefangen
---

diff --git a/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw b/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw
new file mode 100644
index 000000000..e9f00dfda
--- /dev/null
+++ b/Gesellschaftsspiel-Replikator%2FScrabbleBrett.mw
@@ -0,0 +1,78 @@
+<PRE>
+
+// Scrabble Spielbrett
+// 2014-05-15 V1
+// by Stratum 0
+// License: WTFPL
+
+// $fn=20;
+
+Kante = 20;
+Kantenbreite = 2;
+Hoehe = 4;
+Randhoehe = 2;
+Abstand=0;
+Zaehler=1;
+Viertelfeld=8;
+
+
+for (i = [1:Viertelfeld])
+     {
+     for (j = [1:Viertelfeld])
+          {
+          translate([(Kante+Abstand)*i+Abstand,(Kante+Abstand)*j,0])  
+           { 
+            //Dreifacher Wortwert
+            if ((i==1) && (j==1)) {   Feld("red");   }
+            if ((i==1) && (j==8)) {   Feld("red");   }
+            if ((i==8) && (j==1)) {   Feld("red");   }
+            
+            //Doppelter Wortwert
+            if ((i==2) && (j==2)) {   Feld("pink");   }
+            if ((i==3) && (j==3)) {   Feld("pink");   }
+            if ((i==4) && (j==4)) {   Feld("pink");   }
+            if ((i==5) && (j==5)) {   Feld("pink");   }
+            if ((i==8) && (j==8)) {   Feld("pink");   }
+
+            // Dreifacher Buchstabenwert
+            if ((i==2) && (j==6)) {   Feld("blue");   }
+            if ((i==6) && (j==2)) {   Feld("blue");   }
+            if ((i==6) && (j==6)) {   Feld("blue");   }
+
+            // Doppelter Buchstabenwert
+            if ((i==7) && (j==7)) {   Feld("lightblue");   }
+            if ((i==3) && (j==7)) {   Feld("lightblue");   }
+            if ((i==7) && (j==3)) {   Feld("lightblue");   }
+            if ((i==8) && (j==4)) {   Feld("lightblue");   }
+            if ((i==4) && (j==8)) {   Feld("lightblue");   }
+            if ((i==1) && (j==4)) {   Feld("lightblue");   }
+            if ((i==4) && (j==1)) {   Feld("lightblue");   }
+
+            // ansonsten normales Feld
+            Feld("lightgreen");
+            
+        
+         }
+          } // End For J
+     } // End For I
+
+
+
+
+     // Basisfeld erstellen
+module Feld(Farbe)
+{
+    difference()
+    {    
+        cube([Kante, Kante, Hoehe+Randhoehe], center=false);
+
+        translate ([Kantenbreite,Kantenbreite,Hoehe-Randhoehe]) 
+            color (Farbe) 
+                cube([Kante-Kantenbreite-Kantenbreite, Kante-Kantenbreite-Kantenbreite, Hoehe+Randhoehe], center=false);
+ 
+    };
+   
+}
+
+
+</PRE>