erste einfache Version des Gartentorriegels

diff --git a/Gartentorriegel/grandplatte_riegel_gartentor.scad b/Gartentorriegel/grandplatte_riegel_gartentor.scad
new file mode 100644 (file)
index 0000000..94c42be
--- /dev/null
+++ b/Gartentorriegel/grandplatte_riegel_gartentor.scad
@@ -0,0 +1,62 @@
+grundplatte_b=55.0;
+grundplatte_h=60.0;
+grundplatte_t=3.0;
+grundplatte_bohrung=2.0;
+bohrungsabstand=7;
+schiebelaenge=25;
+
+//grundplatte mit bohrungen
+difference () {
+       cube([grundplatte_b,grundplatte_h,grundplatte_t]);
+       translate([bohrungsabstand,bohrungsabstand,0]) {
+               cylinder(grundplatte_t,grundplatte_bohrung,grundplatte_bohrung,center=false,$fn=100);
+       }
+               translate([grundplatte_b-bohrungsabstand,bohrungsabstand,0]) {
+               cylinder(grundplatte_t,grundplatte_bohrung,grundplatte_bohrung,center=false,$fn=100);
+       }
+               translate([bohrungsabstand,grundplatte_h-bohrungsabstand,0]) {
+               cylinder(grundplatte_t,grundplatte_bohrung,grundplatte_bohrung,center=false,$fn=100);
+       }
+               translate([grundplatte_b-bohrungsabstand,grundplatte_h-bohrungsabstand,0]) {
+               cylinder(grundplatte_t,grundplatte_bohrung,grundplatte_bohrung,center=false,$fn=100);
+       }
+}
+
+//schiebergehäuse
+breite=grundplatte_b;
+hoehe=30;
+tiefe=16;
+rand_oben=5;
+rand_seiten=4;
+y=10;
+z=rand_oben;
+randabstand=5;
+difference() {
+       translate([0,grundplatte_h/2-hoehe/2,0]) {
+               difference () {
+                       cube([breite,hoehe,tiefe]);
+                       translate([0,rand_seiten,0]) {
+                               color("blue") cube([breite,hoehe-2*rand_seiten,tiefe-rand_oben]);               
+                       }
+               }
+       }
+       
+       translate ([breite-schiebelaenge-randabstand,grundplatte_h/2-y/2,tiefe-z]) {
+               color("red") cube([schiebelaenge,y,z]);
+       }
+}
+
+//riegel
+translate([0,-30,0]) {
+       difference() {
+               cube([breite+schiebelaenge,(hoehe-2*rand_seiten)-1,tiefe-rand_oben-grundplatte_t-1]);
+               translate([schiebelaenge-randabstand+schiebelaenge-z,((hoehe-2*rand_seiten)-1)/2-y/2,tiefe-rand_oben-grundplatte_t-1-z]) {
+                       color("black") cube([y-1,y-1,z]);
+               }
+       }
+}
+
+//pimpel
+translate([0,-50,0]) {
+       cube([y,y,z+20]);
+}
\ No newline at end of file