0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug23709_4
1 puts "==========="
2 puts "OCC23709"
3 puts "==========="
4 puts ""
5 ##################################
6 # Redesign of hlrtest command
7 ##################################
8
9 set x_coord 183
10 set y_coord 267
11
12 restore [locate_data_file bug23709_surfcone.brep] result
13 vinit
14 vdisplay result
15 vrotate 35 0 0
16 vfit
17 vhlr on
18 vhlrtype algo result
19
20 vaspects -setwidth 5
21 if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
22   puts "Error : color is not yellow"
23 }
24
25 checkview -screenshot -3d -path ${imagedir}/${test_image}.png