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

puts "============"
puts "OCC6145"
puts "============"
puts ""
##################################################################
# Incorrect rendering of a transparent object
##################################################################

set BugNumber OCC6145

box b 200 100 100

plane p 20 20 50
pcylinder c1 p 10 80

tcopy c1 c2
ttranslate c2 40 0 0
tcopy c2 c3
ttranslate c3 40 0 0
tcopy c3 c4
ttranslate c4 40 0 0
tcopy c4 c5
ttranslate c5 40 0 0

compound c1 c2 c3 c4 c5 co
bcut r b co

vinit
vsetdispmode 1
vdisplay r
vfit

set x_coord 270
set y_coord 230

checkcolor $x_coord $y_coord 0.78 0.55 0.09

vsettransparency r 0.5

checkcolor $x_coord $y_coord 0.8 0.56 0.1

set RED_3 0.86274498701095581
set GREEN_3 0.61176401376724243
set BLUE_3 0.10196000337600708

checkview -screenshot -3d -path ${imagedir}/${test_image}.png
Commit	Line	Data
e54706ed	1	puts "============"
	2	puts "OCC6145"
	3	puts "============"
	4	puts ""
	5	##################################################################
	6	# Incorrect rendering of a transparent object
	7	##################################################################
	8
	9	set BugNumber OCC6145
	10
	11	box b 200 100 100
	12
	13	plane p 20 20 50
	14	pcylinder c1 p 10 80
	15
	16	tcopy c1 c2
	17	ttranslate c2 40 0 0
	18	tcopy c2 c3
	19	ttranslate c3 40 0 0
	20	tcopy c3 c4
	21	ttranslate c4 40 0 0
	22	tcopy c4 c5
	23	ttranslate c5 40 0 0
	24
	25	compound c1 c2 c3 c4 c5 co
67335dfc	26	bcut r b co
e54706ed	27
	28	vinit
	29	vsetdispmode 1
	30	vdisplay r
	31	vfit
e54706ed	32
	33	set x_coord 270
	34	set y_coord 230
	35
	36	checkcolor $x_coord $y_coord 0.78 0.55 0.09
	37
	38	vsettransparency r 0.5
e54706ed	39
	40	checkcolor $x_coord $y_coord 0.8 0.56 0.1
	41
	42	set RED_3 0.86274498701095581
	43	set GREEN_3 0.61176401376724243
	44	set BLUE_3 0.10196000337600708
	45
5747059b	46	checkview -screenshot -3d -path ${imagedir}/${test_image}.png