0024288: Provide flipping text for AIS_Dimensions
[occt.git] / tests / bugs / vis / bug24133_4
CommitLineData
a6eb515f 1puts "============"
2puts "CR24133"
3puts "============"
4puts ""
5#######################################################################
6# Development of improvement of dimensions implementation
7# Diameter dimension
8#######################################################################
9pload VISUALIZATION
10
11vinit
12vpoint diamP1 0 0 0
13vpoint diamP2 50 50 0
14vpoint diamP3 100 0 0
15vcircle circle diamP1 diamP2 diamP3 0
16verase diamP1 diamP2 diamP3
17vdim -diam -name=dim4 circle
18vdisplay dim4
19vfit
20vmoveto 208 205
21
22set x_coord 296
23set y_coord 257
24
25checkcolor $x_coord $y_coord 0 1 1
26
27if { $stat != 1 } {
28 puts "Error : Highlighting of diameter dimension with 2d text is wrong."
29}
30
31verase dim4
32vdim -diam -name=dim4 -text=3d circle
33vdisplay dim4
34vfit
35vmoveto 208 205
36
37set x_coord 296
38set y_coord 257
39
40checkcolor $x_coord $y_coord 0 1 1
41
42if { $stat != 1 } {
43 puts "Error : Highlighting of diameter dimension with 3d text is wrong."
44}
45
46set only_screen 1