938d4544 |
1 | puts "============" |
2 | puts "CR24288" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # Provide a text flipping |
7 | # Test for text flipping after X rotation |
8 | ####################################################################### |
9 | pload VISUALIZATION |
10 | |
6fb1a930 |
11 | vfont add [locate_data_file DejaVuSans.ttf] SansFont |
12 | |
938d4544 |
13 | set m_pi 3,14 |
14 | set m_pi2 1,57 |
15 | vinit |
16 | vpoint radP1 0 0 0 |
17 | vpoint radP2 50 50 0 |
18 | vpoint radP3 100 0 0 |
19 | vcircle circle radP1 radP2 radP3 0 |
20 | vrotate 0 -$m_pi2 0 |
21 | verase radP1 radP2 radP3 |
6fb1a930 |
22 | vdimension dim -radius -text 3d -shapes circle -font SansFont |
938d4544 |
23 | vfit |
d7bffd44 |
24 | vmoveto 110 111 |
938d4544 |
25 | |
d7bffd44 |
26 | set x_coord 196 |
27 | set y_coord 196 |
938d4544 |
28 | checkcolor $x_coord $y_coord 0 1 1 |
29 | |
30 | if { $stat != 1 } { |
31 | puts "Error : Highlighting of radius dimension with 3d text before flipping is wrong." |
32 | } |
33 | |
34 | # X axis rotation |
35 | vrotate $m_pi 0 0 |
36 | vfit |
d7bffd44 |
37 | vmoveto 208 200 |
938d4544 |
38 | |
d7bffd44 |
39 | set x_coord 295 |
40 | set y_coord 113 |
938d4544 |
41 | checkcolor $x_coord $y_coord 0 1 1 |
42 | |
43 | if { $stat != 1 } { |
44 | puts "Error : Highlighting of radius dimension with 3d text with flipping after x rotation is wrong." |
45 | } |
46 | |
5747059b |
47 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |