earring-stand: wip EclipPPlanCore

[reprap-play.git] / earring-stand.scad

diff --git a/earring-stand.scad b/earring-stand.scad
index ace6c7a17274e84fc4743278b10bdc758c66baa9..e87f1509fe3adb2850a72822f524158958932d70 100644 (file)
--- a/earring-stand.scad
+++ b/earring-stand.scad
@@ -38,4 +38,16 @@ module EclipLPlanCore(alpha){
   }
 }
 
-EclipLPlanCore(10);
+module EclipLPlan(alpha){
+  rotate(alpha) EclipLPlanCore(alpha);
+}
+
+module EclipPPlanCore(){
+  hull(){
+    circle(r0);
+    rotate(45) square([r0,r0]);
+  }
+}
+
+color("red") EclipLPlanCore(10);
+color("blue") EclipPPlanCore(10);