tests/3rdparty/fonts/A3

   1 puts "============"
   2 puts "OCC23457 Text rendering performance"
   3 puts "Test case performs rendering of single huge text label"
   4 puts "============"
   5 puts ""
   6
   7 vfont add [locate_data_file DejaVuSans.ttf] SansFont
   8
   9 vtrihedron trihedr
  10
  11 set aFileHandle [open [locate_data_file screw.step] r]
  12 set aText [read $aFileHandle]
  13 close $aFileHandle
  14
  15 vpoint p0     0      0 -400
  16 vpoint p1     0  10000 -400
  17 vpoint p2  1000      0 -400
  18 vfit
  19
  20 vdrawtext text "$aText" -pos 100  100 -400 -color CYAN -halign left -valign bottom -angle 000 -zoom 1 -height 50 -aspect regular -font SansFont
  21
  22 vfps
  23
  24 vglinfo
  25 checkview -screenshot -3d -path ${imagedir}/${test_image}.png