2 |
|
# SCCSid "$SunId$ LBL" |
3 |
|
# |
4 |
|
# Make a nice view of an object |
5 |
< |
# Standard input is description made to fit in unit cube in positive quadrant |
5 |
> |
# Arguments are scene input files |
6 |
|
# |
7 |
– |
set objdir=/usr/local/lib/ray/lib |
7 |
|
set tmpdir=/usr/tmp |
9 |
– |
set vw="-vp 3 3 3 -vd -1 -1 -1 -vh 20 -vv 20" |
10 |
– |
set rview="rview -av .2 .2 .2 $vw $*" |
8 |
|
set octree=$tmpdir/ov$$.oct |
9 |
|
set tmpfiles="$octree" |
10 |
|
onintr quit |
11 |
|
|
12 |
< |
oconv $objdir/testroom - > $octree |
13 |
< |
$rview $octree |
12 |
> |
oconv - $argv[*]:q > $octree <<_EOF_ |
13 |
> |
void glow dim 0 0 4 .1 .1 .15 0 |
14 |
> |
dim source background 0 0 4 0 0 1 360 |
15 |
> |
void light bright 0 0 3 1000 1000 1000 |
16 |
> |
bright source sun1 0 0 4 1 .2 1 5 |
17 |
> |
bright source sun2 0 0 4 .3 1 1 5 |
18 |
> |
bright source sun3 0 0 4 -1 -.7 1 5 |
19 |
> |
_EOF_ |
20 |
> |
|
21 |
> |
set vp=`getinfo -d <$octree|rcalc -e '$1=$1-3.5*$4;$2=$2-3.5*$4;$3=$3+2.5*$4'` |
22 |
> |
|
23 |
> |
rview -av .2 .2 .2 -vp $vp -vd 1 1 -.5 -vv 15 -vh 15 $octree |
24 |
|
|
25 |
|
quit: |
26 |
|
rm -f $tmpfiles |