include <BOSL2/std.scad>

angle = 5;

wys = 500;
szer = 80;
t1 = 15;
t2 = 7.5;
spike_h = 20;

ile=10;

$fn=36;

for(i=[0,180]) {
    zrot(i) union() {
        left(szer/2) yrot(-angle) up(wys/2) cyl(h=wys, d=t1, rounding2=t1/2);
        left(szer/2) yrot(-angle) down(spike_h/2) cyl(h=spike_h, d2=t1, d1=0);
        for(j=[2:1:ile]) {
            up(j*((wys-t2*0.7)/ile)) yrot(-90) cyl(d=t2, h=2*(szer + t2), rounding=t2/2);
        }
    }
}