0024351: Test cases for AIS dimension presentations to check arrow orientation, text...
[occt.git] / tests / bugs / vis / bug24133_1
CommitLineData
a6eb515f 1puts "============"
2puts "CR24133"
3puts "============"
4puts ""
5#######################################################################
6# Development of improvement of dimensions implementation
7# Length dimension
8#######################################################################
9pload VISUALIZATION
10
11vinit
12vpoint lengthP1 0 0 0
13vpoint lengthP2 50 50 50
1d7ca641 14vdimension length name=dim1 plane=xoy lengthP1 lengthP2
a6eb515f 15vdisplay dim1
16vfit
d7bffd44 17vmoveto 82 254
a6eb515f 18
d7bffd44 19set x_coord 362
20set y_coord 102
a6eb515f 21checkcolor $x_coord $y_coord 0 1 1
22if { $stat != 1 } {
23 puts "Error : Highlighting of length dimension is wrong."
24}
25
26set only_screen 1