[occt.git] / tests / v3d / glsl / rendscale

puts "========"
puts "Rendering resolution scale factor"
puts "========"

set aFontFile ""
catch { set aFontFile [locate_data_file DejaVuSans.ttf] }

pload MODELING VISUALIZATION

set aLabelFont "Arial"
if { "$aFontFile" != "" } {
  vfont add "$aFontFile" SansFont
  set aLabelFont "SansFont"
}

box b 1 2 3
vclear
vclose ALL
vinit View1
vdisplay b
vfit
vpoint p 0 0 0
vzbufftrihedron
vdrawtext t Text2d -font $aLabelFont
vtrihedron tt
vdisplay -trsfPers zoom -trsfPersPos 1 0 0 tt
text2brep ttl "Top-Left" -font $aLabelFont -height 30 -pos 0 -30 0
vdisplay  ttl -2d topLeft -dispMode 1
vcolorscale cs -demo

vrenderparams -rendScale 1
vdump $::imagedir/${::casename}_100.png

vrenderparams -rendScale 0.5
vdump $::imagedir/${::casename}_050.png

vrenderparams -rendScale 0.75
vdump $::imagedir/${::casename}_075.png

vrenderparams -rendScale 2
vdump $::imagedir/${::casename}_200.png
Commit	Line	Data
56689b27	1	puts "========"
	2	puts "Rendering resolution scale factor"
	3	puts "========"
	4
	5	set aFontFile ""
	6	catch { set aFontFile [locate_data_file DejaVuSans.ttf] }
	7
	8	pload MODELING VISUALIZATION
	9
	10	set aLabelFont "Arial"
	11	if { "$aFontFile" != "" } {
	12	vfont add "$aFontFile" SansFont
	13	set aLabelFont "SansFont"
	14	}
	15
	16	box b 1 2 3
	17	vclear
8e0a2b19	18	vclose ALL
56689b27	19	vinit View1
	20	vdisplay b
	21	vfit
	22	vpoint p 0 0 0
	23	vzbufftrihedron
	24	vdrawtext t Text2d -font $aLabelFont
	25	vtrihedron tt
	26	vdisplay -trsfPers zoom -trsfPersPos 1 0 0 tt
	27	text2brep ttl "Top-Left" -font $aLabelFont -height 30 -pos 0 -30 0
	28	vdisplay ttl -2d topLeft -dispMode 1
	29	vcolorscale cs -demo
	30
	31	vrenderparams -rendScale 1
	32	vdump $::imagedir/${::casename}_100.png
	33
	34	vrenderparams -rendScale 0.5
	35	vdump $::imagedir/${::casename}_050.png
	36
	37	vrenderparams -rendScale 0.75
	38	vdump $::imagedir/${::casename}_075.png
	39
	40	vrenderparams -rendScale 2
	41	vdump $::imagedir/${::casename}_200.png