+ # bonds
+ if [ -n "$bcr" ]; then
+
+ if [ -z "$x0" ]; then
+
+ cat $file | grep '# \[B\]' | while read foo bar x1 y1 z1 x2 y2 z2 ; do
+ draw_bond $x1 $z1 $y1 $x2 $z2 $y2 $bcr
+ done
+
+ else
+
+ export x0 y0 z0 x1 y1 z1 bcr
+ cat $file | grep '# \[B\]' | awk '\
+ BEGIN {
+ x0=ENVIRON["x0"]; y0=ENVIRON["y0"]; z0=ENVIRON["z0"];
+ x1=ENVIRON["x1"]; y1=ENVIRON["y1"]; z1=ENVIRON["z1"];
+ bcr=ENVIRON["bcr"];
+ }
+ {
+ if(($3>=x0)&&($4>=y0)&&($5>=z0)&&\
+ ($3<=x1)&&($4<=y1)&&($5<=z1)) {
+ print "cylinder {";
+ print "<"$3","$5","$4">,";
+ print "<"$6","$8","$7">, "bcr;
+ print "pigment { color Blue }";
+ print "}";
+ }
+ }' >> temp.pov
+
+ fi
+ fi
+