Das Netz besteht aus einer fertigen isosurface, die wir aus dem Insert-Menü haben.
Anschließend haben wir mit Hilfe einer while Schleife das Bild auf die richtige Größe gebracht, in dem wir das Netz 12,13 mal hintereinander eingefügt haben.
Zum Schluss haben wir das Netz mit einem schwarzen Rahmen umrandet.
Quelltext:
#declare Breite = 1.525;
#declare Laenge = 2.74;
#declare Netzlatte = box{<0,-0.01,0><0.01,0.01,Breite+0.3*1.4>}
#declare Netzpfosten = box{<-0.006,0,-0.005><0.006,0.15,0.005>}
#declare netz=isosurface {
function{
f_mesh1(
x,y,z,
0.30, // distance between neighboring threads in the x direction,
0.30, // distance between neighboring threads in the z direction,
0.15, // relative thickness in the x and z directions,
0.05, // amplitude of the weaving effect,
0.25 // relative thickness in the y direction
)
}
contained_by {box {<-1,-1,-1>,<1,1,1>}}
threshold 0.01
max_gradient 8
texture{ pigment{ color rgb <0.65,0.45,0.25>}
normal { bumps 0.15 scale 0.015}
finish { diffuse 0.9 specular 0.2 phong 0.7 }
}
rotate<0,0,90>
scale 1/12}
// end of isosurface
#declare netz1 = union{
#local Nr = 0; // start
#local EndNr = 12.13; // end
#while (Nr< EndNr)
object{netz translate<0,0,Nr*0.15>}
#local Nr = Nr + 1; // next Nr
#end //end of loop
object {Netzlatte translate <-0.005,0.15/2,-0.15*0.5>}
object {Netzlatte translate <-0.005,-0.15/2,-0.15*0.5>}
object {Netzpfosten translate <0,-0.15/2,-0.16/2>}
object {Netzpfosten translate <0,-0.15/2,Breite+0.15*2+0.12/2>}
}
//end of union
object {netz1 translate <0,0,-Breite>}