| 45 |
|
q[| sed -n 's/^.* -aa \([.0-9][^ ]*\) .*$/\1/p']; |
| 46 |
|
my $ambacc=`$cmd`; |
| 47 |
|
die "Missing -aa setting in header\n" if (! $ambacc ); |
| 48 |
+ |
die "Zero -aa setting in header\n" if ($ambacc <= .00001); |
| 49 |
|
$scale *= $ambacc; |
| 50 |
|
my $ambfmt = ' |
| 51 |
|
void glow posglow |
| 56 |
|
posglow sphere position${recno} |
| 57 |
|
0 |
| 58 |
|
0 |
| 59 |
< |
4 ${px} ${py} ${pz} ${psiz} |
| 59 |
> |
4 ${ px } ${ py } ${ pz } ${ psiz } |
| 60 |
|
'; |
| 61 |
|
my $posgradfmt = ' |
| 62 |
|
void glow arrglow |
| 105 |
|
tipglow sphere atip |
| 106 |
|
0 |
| 107 |
|
0 |
| 108 |
< |
4 ${ cx1 } ${ cy1 } ${ cz1 } ${psiz/7} |
| 108 |
> |
4 ${ cx1 } ${ cy1 } ${ cz1 } ${psiz/7} |
| 109 |
|
' if ($dodirgrad); |
| 110 |
|
my $dirgradfmt=' |
| 111 |
|
void brightfunc dgpat |
