ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/util/objpict.csh
Revision: 1.1
Committed: Wed Apr 24 18:27:09 1991 UTC (32 years, 11 months ago) by greg
Content type: application/x-csh
Branch: MAIN
Log Message:
Initial revision

File Contents

# Content
1 #!/bin/csh -f
2 # SCCSid "$SunId$ LBL"
3 #
4 # Make a nice multi-view picture of an object
5 # Standard input is description made to fit in unit cube in positive quadrant
6 #
7 set objdir=/usr/local/lib/ray/lib
8 set tmpdir=/usr/tmp
9 set xres=250
10 set yres=250
11 set rpict="rpict -av .2 .2 .2 -x $xres -y $yres $*"
12 set octree=$tmpdir/op$$.oct
13 set pict1=$tmpdir/op$$a.pic
14 set pict2=$tmpdir/op$$b.pic
15 set pict3=$tmpdir/op$$c.pic
16 set pict4=$tmpdir/op$$d.pic
17 set tmpfiles="$octree $pict1 $pict2 $pict3 $pict4"
18 onintr quit
19 set vw1="-vtl -vp 2 .5 .5 -vd -1 0 0 -vh 1 -vv 1"
20 set vw2="-vtl -vp .5 2 .5 -vd 0 -1 0 -vh 1 -vv 1"
21 set vw3="-vtl -vp .5 .5 2 -vd 0 0 -1 -vu -1 0 0 -vh 1 -vv 1"
22 set vw4="-vp 3 3 3 -vd -1 -1 -1 -vh 20 -vv 20"
23
24 oconv $objdir/testroom - > $octree
25 $rpict $vw1 $octree > $pict1
26 $rpict $vw2 $octree > $pict2
27 $rpict $vw3 $octree > $pict3
28 $rpict $vw4 $octree > $pict4
29 pcompos $pict3 0 $yres $pict4 $xres $yres $pict1 0 0 $pict2 $xres 0
30
31 quit:
32 rm -f $tmpfiles
33 exit 0