8fc41e14c37e5cefb79e6ec40324af450c860934
[occt.git] / tests / 3rdparty / fonts / B1
1 puts "============"
2 puts "OCC24181 Render text as BRep"
3 puts "============"
4 puts ""
5 pload MODELING
6 pload VISUALIZATION
7
8 vfont add [locate_data_file DejaVuSans.ttf] SansFont
9
10 set THE_TEXT "The quick brown fox\njumps over the lazy dog!"
11 set THE_FONT_NAME SansFont
12 set THE_FONT_SIZES {12 18 24}
13
14 vsetdispmode 1
15 vtop
16
17 set aLine 0
18 set aLineId 0
19 foreach aSize $THE_FONT_SIZES {
20   set aText "\[$aSize\] $THE_TEXT"
21
22   vpoint aPnt_$aSize 0.0 $aLine 0.0
23   vdrawtext "Line_$aLineId" $aText -pos 0.0 $aLine 0.0 -color 0.0 1.0 1.0 -halign left -valign top -angle 000 -zoom 1 -height $aSize -aspect bolditalic -font $THE_FONT_NAME
24
25   text2brep aBText_$aSize $aText -font $THE_FONT_NAME -height $aSize -aspect bolditalic -composite off -pos 0.0 $aLine 0.0 -valign topfirstline
26   vdisplay  aBText_$aSize
27   set aLine [expr $aLine - 4.0 * $aSize]
28   set aLineId [expr $aLineId + 1]
29 }
30
31 vfit
32
33 vglinfo
34 checkview -screenshot -3d -path ${imagedir}/${test_image}.png