Molecule
module molecule(ar=3, ac=4, ad=8, rr=0.5) {
for (x = [0:ac-1], y = [0:ac-1], z = [0:ac-1]) {
translate([x*ad, y*ad, z*ad]) sphere(ar);
}
for (i = [0:ac-1], j = [0:ac-1]) {
trc([i*ad, j*ad, 0], [0,0,0], rr=rr, h=ad*(ac-1));
trc([0, i*ad, j*ad], [0,90,0], rr=rr, h=ad*(ac-1));
trc([i*ad, 0, j*ad], [-90,0,0], rr=rr, h=ad*(ac-1));
}
}
module trc(tra, rot, rr, h) {
translate(tra)
rotate(rot)
cylinder(r=rr, h=h);
}
molecule(ac=2);