[occt.git] / tests / 3rdparty / text3d / A1

puts "==========="
puts "0026343: Visualization - Zoom persistent text with 3D orientation"
puts ""
puts "==========="

vfont add [locate_data_file DejaVuSans.ttf] SansFont

pload ALL
vinit View1
vclear
vaxo

set x 10
set y 50
set z 30

box b $x $y $z
vdisplay b
vtrihedron tri0

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
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

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

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

vfit
vglinfo
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
	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