0024351: Test cases for AIS dimension presentations to check arrow orientation, text...
[occt.git] / tests / bugs / vis / bug24133_2
CommitLineData
a6eb515f 1puts "============"
2puts "CR24133"
3puts "============"
4puts ""
5#######################################################################
6# Development of improvement of dimensions implementation
7# Angle dimension
8#######################################################################
9pload VISUALIZATION
10
11vinit
12vpoint angleP1 0 0 0
13vpoint angleP2 50 50 50
14vpoint angleP3 50 50 100
1d7ca641 15vdimension angle name=dim1 angleP1 angleP2 angleP3
a6eb515f 16vdisplay dim1
17vfit
18vmoveto 249 206
19
20set x_coord 249
21set y_coord 200
22
23checkcolor $x_coord $y_coord 0 1 1
24
25if { $stat != 1 } {
26 puts "Error : Highlighting of angle dimension with 2d text is wrong."
27}
d7bffd44 28vinit Viewer2/View2
29vdisplay angleP1 angleP2 angleP3
1d7ca641 30vdimension angle name=dim2 text=3d angleP1 angleP2 angleP3
a6eb515f 31vdisplay dim2
32vfit
33vmoveto 263 251
34
d7bffd44 35set x_coord 335
36set y_coord 319
a6eb515f 37
38checkcolor $x_coord $y_coord 0 1 1
39
40if { $stat != 1 } {
41 puts "Error : Highlighting of angle dimension with 3d text is wrong."
42}
43
44set only_screen 1