puts "============" puts "CR24288" puts "============" puts "" ####################################################################### # Provide a text flipping # Test for text flipping after Y rotation ####################################################################### pload VISUALIZATION vfont add [locate_data_file DejaVuSans.ttf] SansFont set m_pi 3,14 set m_pi2 1,57 vinit vpoint radP1 0 0 0 vpoint radP2 50 50 0 vpoint radP3 100 0 0 vcircle circle radP1 radP2 radP3 0 vrotate 0 -$m_pi2 0 verase radP1 radP2 radP3 vdimension dim -radius -text 3d -shapes circle -font SansFont vfit vmoveto 110 111 set x_coord 196 set y_coord 196 checkcolor $x_coord $y_coord 0 1 1 if { $stat != 1 } { puts "Error : Highlighting of radius dimension with 3d text before flipping is wrong." } # Y axis rotation vrotate 0 $m_pi 0 vfit vmoveto 159 246 set x_coord 113 set y_coord 294 checkcolor $x_coord $y_coord 0 1 1 if { $stat != 1 } { puts "Error : Highlighting of radius dimension with 3d text with flipping after y rotation is wrong." } checkview -screenshot -3d -path ${imagedir}/${test_image}.png