--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/orig/objview.csh	Sat Apr 09 17:55:16 2011 +0100
@@ -0,0 +1,113 @@
+#!/bin/csh -f
+# RCSid: $Id: objview.csh,v 2.12 2009/01/13 22:19:25 greg Exp $
+#
+# Make a nice view of an object
+# Arguments are scene input files
+#
+set tmpdir=/tmp
+set octree=$tmpdir/ov$$.oct
+set lights=$tmpdir/lt$$.rad
+set rif=$tmpdir/ov$$.rif
+set ambf=$tmpdir/af$$.amb
+set tmpfiles="$octree $lights $rif $ambf"
+set raddev="x11"
+set up="Z"
+set vw="XYZ"
+set rendopts=""
+set opts=""
+while ($#argv > 0)
+	switch ($argv[1])
+	case -g*:
+		set usegl
+		breaksw
+	case -u:
+		shift argv
+		set up=$argv[1]
+		breaksw
+	case -s:
+	case -w:
+		set opts=($opts $argv[1])
+		breaksw
+	case -b*:
+		set rendopts=($rendopts -bv)
+		breaksw
+	case -v:
+		shift argv
+		set vw="$argv[1]"
+		breaksw
+	case -N:
+		shift argv
+		set opts=($opts -N $argv[1])
+		set radopt
+		breaksw
+	case -o:
+		shift argv
+		set raddev="$argv[1]"
+		set radopt
+		breaksw
+	case -V:
+	case -e:
+		set opts=($opts $argv[1])
+		set radopt
+		breaksw
+	case -S:
+		set opts=($opts $argv[1])
+		set glradopt
+		breaksw
+	case -*:
+		echo "Bad option: $argv[1]"
+		exit 1
+	default:
+		break
+	endsw
+	shift argv
+end
+if ( $#argv == 0 ) then
+	echo "No input files specified"
+	exit 1
+endif
+if ( $?usegl ) then
+	if ( $?radopt ) then
+		echo "bad option for glrad"
+		glrad
+		exit 1
+	endif
+else
+	if ( $?glradopt ) then
+		echo "bad option for rad"
+		rad
+		exit 1
+	endif
+endif
+
+onintr quit
+
+cat > $lights <<_EOF_
+void glow dim 0 0 4 .1 .1 .15 0
+dim source background 0 0 4 0 0 1 360
+void light bright 0 0 3 1000 1000 1000
+bright source sun1 0 0 4 1 .2 1 5
+bright source sun2 0 0 4 .3 1 1 5
+bright source sun3 0 0 4 -1 -.7 1 5
+_EOF_
+
+cat > $rif <<_EOF_
+scene= $argv[*]:q $lights
+EXPOSURE= .5
+UP= $up
+view= $vw
+OCTREE= $octree
+oconv= -f
+AMBF= $ambf
+render= $rendopts
+_EOF_
+
+if ( $?usegl ) then
+	glrad $opts $rif
+else
+	rad -o $raddev $opts $rif
+endif
+
+quit:
+rm -f $tmpfiles
+exit 0