2 puts "0027818: Visualization - provide an interface to define highlight presentation properties"
3 puts "Test change of highlight properties for whole interactive context"
7 pload VISUALIZATION MODELING
14 vdisplay b -dispMode 1 b p
18 vviewparams -scale 17.8 -proj 0.892687 -0.331602 0.305206 -up -0.162521 0.394789 0.904284 -at 1.99 2.4 20.9
19 vselprops dynHighlight -transp 0.3 -color PALEGREEN2 -dispMode 1
22 if { [vreadpixel 285 212 name rgb] != "KHAKI3" } { puts "Error: highlighting of a box is not transparent!" }
25 if { [vreadpixel 285 212 name rgb] != "RED" } { puts "Error: highlighting of a box is not reset!" }
28 if { [vreadpixel 167 263 name rgb] != "DARKSEAGREEN2" } { puts "Error: highlighting of a cone is not transparent!" }
30 vdump $imagedir/${casename}.png