0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug24930
1 puts "============"
2 puts "OCC24930"
3 puts "============"
4 puts ""
5
6 pload QAcommands
7
8 box b 10 10 10
9 vinit
10 vdisplay b
11 vsetdispmode b 1
12 vfit
13
14 #
15 set anImage_1 ${imagedir}/${casename}_1.png
16 vdump ${anImage_1}
17 #
18
19 # Enable texture
20 vtexture b 0
21
22 #
23 set anImage_2 ${imagedir}/${casename}_2.png
24 vdump ${anImage_2}
25 #
26
27 # Set new color
28 vsetcolor b GREEN
29 # Check pixel color
30 checkcolor 205 180 0 0.64705884456634521 0
31
32 #
33 set anImage_3 ${imagedir}/${casename}_3.png
34 vdump ${anImage_3}
35 #
36 # Reset color
37 vunsetcolor b
38 # Check pixel color
39 checkcolor 205 180 0.608 0.431 0.071
40
41 #
42 set anImage_4 ${imagedir}/${casename}_4.png
43 vdump ${anImage_4}
44 #
45
46 # Set new material
47 vsetmaterial b silver
48 # Check pixel color
49 checkcolor 205 180 0.380 0.380 0.380
50
51 #
52 set anImage_5 ${imagedir}/${casename}_5.png
53 vdump ${anImage_5}
54 #
55
56 # Unset material
57 vunsetmaterial b
58 # Check pixel color
59 checkcolor 205 180 0.608 0.431 0.706
60
61 #
62 set anImage_6 ${imagedir}/${casename}_6.png
63 vdump ${anImage_6}
64 #