--- ray/src/gen/genpine.csh 1991/11/12 17:04:43 2.1 +++ ray/src/gen/genpine.csh 2011/01/24 04:28:06 2.4 @@ -1,5 +1,5 @@ #!/bin/csh -f -# SCCSid "$Id: genpine.csh,v 2.1 1991/11/12 17:04:43 greg Exp $ LBL" +# RCSid: $Id: genpine.csh,v 2.4 2011/01/24 04:28:06 greg Exp $ # # Generate a tree # Pine version 2 @@ -54,13 +54,13 @@ _EOF_ # # Next start seedling # -set tree=/usr/tmp/t$$ -set oldtree=/usr/tmp/ot$$ +set tree=/tmp/t$$ +set oldtree=/tmp/ot$$ set thisrad=.035 cat << _EOF_ > $tree void colorpict bark_pat -9 red green blue pinebark.pic cyl.cal cyl_match_u cyl_match_v -s $thisrad +9 red green blue pinebark.hdr cyl.cal cyl_match_u cyl_match_v -s $thisrad 0 2 1.5225225 1 @@ -99,7 +99,7 @@ while ($i < $nlevels) set move=`ev "(2*$aspect)^($i+1)"` set thisrad=`ev "$lastrad+$move*.015"` xform -ry `ev "25/($i+1)"` -t 0 0 $move $oldtree > $tree - echo void colorpict bark_pat 9 red green blue pinebark.pic \ + echo void colorpict bark_pat 9 red green blue pinebark.hdr \ cyl.cal cyl_match_u cyl_match_v -s $thisrad >> $tree echo 0 2 1.5225225 1 bark_pat alias my_bark_mat bark_mat >> $tree echo my_bark_mat cone level$i 0 0 8 0 0 0 0 0 \