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

puts "==========="
puts "OCC23709"
puts "==========="
puts ""
##################################
# Redesign of hlrtest command
##################################

set x_coord 183
set y_coord 267

restore [locate_data_file bug23709_surfcone.brep] result
vinit
vdisplay result
vrotate 35 0 0
vfit
vhlr on
vhlrtype algo result

vaspects -setwidth 5
if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
  puts "Error : color is not yellow"
}

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
0a768f56	1	puts "==========="
	2	puts "OCC23709"
	3	puts "==========="
	4	puts ""
	5	##################################
	6	# Redesign of hlrtest command
	7	##################################
	8
	9	set x_coord 183
	10	set y_coord 267
	11
	12	restore [locate_data_file bug23709_surfcone.brep] result
	13	vinit
	14	vdisplay result
	15	vrotate 35 0 0
	16	vfit
	17	vhlr on
	18	vhlrtype algo result
	19
ccadc126	20	vaspects -setwidth 5
	21	if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
	22	puts "Error : color is not yellow"
	23	}
0a768f56	24
5747059b	25	checkview -screenshot -3d -path ${imagedir}/${test_image}.png