0029528: Visualization, TKOpenGl - allow defining sRGB textures
[occt.git] / tests / v3d / viewcube / default
1 puts "=================================="
2 puts "0028954: Visualization - implement interactive object AIS_ViewCube for camera manipulations"
3 puts "Display and erase with default settings"
4 puts "=================================="
5
6 vclear
7 vinit View1
8
9 box b 15 20 70
10 vdisplay -dispMode 1 b
11 vaxo
12 vfit
13 vviewcube vc -fixedAnimation 1 -duration 0
14
15 vmoveto 70 340
16 if {[vreadpixel 70 340 name rgb] != "CYAN"} { puts "Error: Highlighting of view cube Side is wrong." }
17 vmoveto 0 0
18 vdump $imagedir/${casename}_axo.png
19
20 # check FRONT side
21 vselect 70 340
22 if {[vreadpixel 255 300 name rgb] != "BLACK"} { puts "Error: Position of FRONT camera is wrong." }
23 vdump $imagedir/${casename}_side.png
24
25 # check FRONT/TOP edge
26 vselect 100 270
27 if {[vreadpixel 100 300 name rgb] != "GRAY52"} { puts "Error: Position of FRONT-TOP camera is wrong." }
28 if {[vreadpixel 100 310 name rgb] != "CYAN"}   { puts "Error: Position of FRONT-TOP camera is wrong." }
29 vdump $imagedir/${casename}_edge.png
30
31 # Check vertex
32 vselect 140 310
33 if {[vreadpixel 100 290 name rgb] != "GRAY47"} { puts "Error: Position of TOP-FRONT-RIGHT camera is wrong." }
34 if {[vreadpixel 100 310 name rgb] != "CYAN"}   { puts "Error: Position of TOP-FRONT-RIGHT camera is wrong." }
35 if {[vreadpixel 100 320 name rgb] != "GRAY59"} { puts "Error: Position of TOP-FRONT-RIGHT camera is wrong." }
36 vdump $imagedir/${casename}_corner.png