[occt.git] / tests / bugs / vis / bug27836

puts "========"
puts "Gradient background is lost at some camera positions"
puts "========"

# Test case setup the camera in such a position,
# so that background plane will be clipped by Z-range if not handled by Z-fit.

pload MODELING VISUALIZATION
box b 0 0 -100 100 90 10

vclear
vinit View1
vaxo
vbackground -gradient B4C8FF B4B4B4 -gradientMode VERTICAL
vzbufftrihedron
vdisplay -dispMode 1 b
vsetlocation b 0 0 1000
vfit

vviewparams -scale 6.66 -eye 48 43 -210 -at 50 45 -95

if { [vreadpixel 100 300 -rgb -name] != "GRAY75" } { puts "Error: gradient background is not displayed" }

vdump $imagedir/${casename}.png
Commit	Line	Data
71d8ccc7	1	puts "========"
	2	puts "Gradient background is lost at some camera positions"
	3	puts "========"
	4
	5	# Test case setup the camera in such a position,
	6	# so that background plane will be clipped by Z-range if not handled by Z-fit.
	7
	8	pload MODELING VISUALIZATION
	9	box b 0 0 -100 100 90 10
	10
	11	vclear
	12	vinit View1
	13	vaxo
aaf8d6a9	14	vbackground -gradient B4C8FF B4B4B4 -gradientMode VERTICAL
71d8ccc7	15	vzbufftrihedron
	16	vdisplay -dispMode 1 b
	17	vsetlocation b 0 0 1000
	18	vfit
	19
	20	vviewparams -scale 6.66 -eye 48 43 -210 -at 50 45 -95
	21
ba00aab7	22	if { [vreadpixel 100 300 -rgb -name] != "GRAY75" } { puts "Error: gradient background is not displayed" }
71d8ccc7	23
71d8ccc7	24	vdump $imagedir/${casename}.png