tests/3rdparty/fonts/B3

   1 puts "============"
   2 puts "OCC24181 Render text as BRep (check alphabet)"
   3 puts "============"
   4 puts ""
   5 pload MODELING
   6 pload VISUALIZATION
   7
   8 vfont add [locate_data_file DejaVuSans.ttf] SansFont
   9
  10 set THE_FONT_NAME SansFont
  11 set THE_FONT_SIZE 24
  12 set THE_TEXT {
  13 `1234567890-=
  14 ~!@#$%^&*()_+
  15 qwertyuiop[]\\
  16 QWERTYUIOP{}|
  17 asdfghjkl;'
  18 ASDFGHJKL:"
  19 zxcvbnm,./
  20 ZXCVBNM<>?§
  21 }
  22
  23 text2brep aBTextN $THE_TEXT -font $THE_FONT_NAME -height $THE_FONT_SIZE -aspect regular -composite off
  24 text2brep aBTextC $THE_TEXT -font $THE_FONT_NAME -height $THE_FONT_SIZE -aspect regular -composite on
  25 checkshape aBTextN
  26 checkshape aBTextC
  27
  28 ttranslate aBTextC 220 0 0
  29 vsetdispmode 1
  30 vtop
  31 vdisplay aBTextN
  32 vdisplay aBTextC
  33
  34 vfit