Prepared branch for raising to master
[occt.git] / tests / bugs / vis / bug137_5
CommitLineData
e54706ed 1puts "========================"
2puts "OCC137"
3puts "========================"
4###############################################################
5#Patch description:
6#
7#MIT010717 : 3D selection management
8#>>> MIT010717 : Selection management
9#
10# * Package OpenGl (OpenGl_execstruct.c)
11#
12# @ Avoid drawing quality problem on selected face,
13# enable/disable Z offset on highlighted faces.
14#
15#>>> MIT010717 : drawing management
16#
17# * Package OpenGl (OpenGl_indexpolygon.c, ...)
18#
19# @ Avoid to undraw faces with confused points
20###############################################################
21puts "========================"
22
23vinit
24box b 10 10 10
25vdisplay b
26vfit
27vsetdispmode 1
28
29puts "Only bottom face should be highlighted."
30
31OCC137 1
32OCC137_z
33
34vselmode 4 1
35
36set x_coord 105
37set y_coord 350
38
39QAMoveTo $x_coord $y_coord
40QAMoveTo $x_coord $y_coord
41QAUpdateLights
42
43set x_coord 105
44set y_coord 340
45
46checkcolor $x_coord $y_coord 0 1 1
47
48QASetViewCharac 60.6309 7.07107 4.08248 0.592163 -0.60038 -0.537482 0.369921 -0.390032 0.843228 -3.28175 3.38875 3.0464
49set x_coord 105
50set y_coord 340
51
52checkcolor $x_coord $y_coord 0.78 0.54 0.09
53
54set only_screen 1