tests/3rdparty/text3d/A1

   1 puts "==========="
   2 puts "0026343: Visualization - Zoom persistent text with 3D orientation"
   3 puts ""
   4 puts "==========="
   5
   6 vfont add [locate_data_file DejaVuSans.ttf] SansFont
   7
   8 pload ALL
   9 vinit View1
  10 vclear
  11 vaxo
  12
  13 set x 10
  14 set y 50
  15 set z 30
  16
  17 box b $x $y $z
  18 vdisplay b
  19 vtrihedron tri0
  20
  21 vdrawtext t0 "Top text on plane yOz" -pos $x 0 $z -color green -height 20 -plane 1 0 0 0 1 0 -valign top -font SansFont
  22 vdrawtext t1 "Bottom text on plane yOz" -pos 0 $y 0 -color green -height 20 -plane -1 0 0 0 -1 0 -valign bottom -font SansFont
  23
  24 vdrawtext t2 "Some text on the top face" -pos $x/2 $y/2 $z -color red -height 20 -plane 0 0 1 0 1 0 -valign center -halign center -font SansFont
  25
  26 vdrawtext t3 "First line\nSecond line" -pos $x/2 0 $z/2 -color 0.0 0.0 1.0 -height 20 -plane 0 -1 0 0 0 1 -valign center -halign center -font SansFont
  27
  28 vfit
  29 vglinfo
  30 checkview -screenshot -3d -path ${imagedir}/${test_image}.png