--- ray/src/util/glare.csh	1991/05/02 15:32:06	1.6
+++ ray/src/util/glare.csh	1991/05/08 11:08:01	1.10
@@ -85,6 +85,10 @@ With an octree, you should give the same options for -
 so forth as are used to render the scene.  Please enter them below.
 
 _EOF_
+		if ($picture != $nofile) then
+			echo "These are the parameters from the picture:"
+			getinfo $picture
+		endif
 		readvar rtargs
 		set fgargs=($fgargs $rtargs $octree)
 	endif
@@ -135,15 +139,11 @@ endif
 if ($?DISPLAY && $picture != $nofile) then
 	echo ""
 	echo "Displaying glare sources in '$picture'..."
-	xglaresrc $picture $glarefile >& /dev/null
-	if ($status) then
-		x11image =+0+0 -g 2.6 $picture &
-		sleep 40
-		xglaresrc $picture $glarefile
-	endif
+	xglaresrc $picture $glarefile
 endif
 set ndxnam=("Guth Visual Comfort Probability" "Guth Disability Glare Ratio" "CIE Glare Index")
 set ndxcom=("glarendx -t guth_vcp" "glarendx -t guth_dgr" "glarendx -t cie_cgi")
+set bcdlvl=(50 124 18.5)
 while ( 1 )
 	echo ""
 	echo "	0.  Quit"
@@ -185,6 +185,11 @@ include=line.plt
 include=polar.plt
 title="$ndxnam[$choice]"
 subtitle="$subtitle"
+Bdata=
+	0	$bcdlvl[$choice]
+	360	$bcdlvl[$choice]
+;
+Blabel="BCD level"
 Adata=
 _EOF_
 			getinfo - < $gndxfile >> $plotfile