lepsi planter

diff --git a/openscad/planter4.scad b/openscad/planter4.scad
new file mode 100644 (file)
index 0000000..0ac34dc
--- /dev/null
+++ b/openscad/planter4.scad
@@ -0,0 +1,55 @@
+module planter_cavity(void=0, da=70, db=83) {
+       translate([0,0,15]) difference() {
+               cylinder(d1=da, d2=db, h=83, $fn=12);
+               if(void) translate([0,0,void/2]) cylinder(d1=da-void, d2=db-void, h=83, $fn=12);
+       }
+}
+
+module planter() {
+       difference() {
+               union() {
+               translate([0,0,15]) for (h = [0 : 1 : 2] ){
+                       translate([0,0,h*31.5])
+                       for (r = [0 : 40 : 360] ){
+                               rotate([90,90,r+20*(h%2)])
+                               difference() {
+                                       translate([0,0,40]) cylinder(d2=35, d1=66, h=10, $fn=6);
+                                       translate([0,0,49.2]) cylinder(d1=20, d2=100, h=10, $fn=6);
+                               }
+                       }
+               }
+               cylinder(d=90, h=94);
+           }
+
+               translate([0,0,-50]) cylinder(d=140, h=50);
+               translate([0,0,2.5*31+15]) cylinder(d=140, h=50);
+               planter_cavity();
+       }
+       
+}
+
+module planter_mold(half=0) {
+difference() {
+       union() {
+               //translate([0,0,0.1]) cylinder(d=110, h=100);
+               translate([0,0,90]) cylinder(d=103, h=7);
+               translate([0,0,0.001]) rotate([0,0,90])
+                       scale([1.04,1.04,1.001]) planter();
+               translate([-60,0,97/2]) cube([3,7,97], center=true);
+               translate([ 60,0,97/2]) cube([3,7,97], center=true);
+               translate([  0,0,97/2]) cube([120,4,96.99], center=true);
+       }
+       rotate([0,0,90]) planter();
+       rotate([0,0,90]) planter_cavity();
+       if(half == 1) translate([-100,0,0]) cube(200);
+       if(half == 2) translate([-100,-200,0]) cube(200);
+}
+}
+
+//planter();
+
+planter_cavity(3);
+rotate([180,0,0]) {
+       translate([0,-12,0]) planter_mold(half=1);
+       translate([0,12,0]) planter_mold(half=2);
+}
\ No newline at end of file