mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
293211aee0
A new command vbackground is created. Old background commands are made aliases for the newly created command (including vsetdefaultbg). Tests are modified using newly added command vbackground.
47 lines
1.2 KiB
Plaintext
Executable File
47 lines
1.2 KiB
Plaintext
Executable File
|
|
puts "================"
|
|
puts "OCC22906"
|
|
puts "================"
|
|
puts ""
|
|
#######################################################################################
|
|
# Gradient background is clipped by planes
|
|
######################################################################################
|
|
|
|
set BugNumber OCC22906
|
|
set x1 73
|
|
set y1 338
|
|
|
|
set x2 144
|
|
set y2 23
|
|
|
|
set x3 377
|
|
set y3 123
|
|
|
|
set x4 87
|
|
set y4 232
|
|
|
|
vinit
|
|
vbackground -gradient RED BLUE1 -gradientMode DIAGONAL2
|
|
set Color1 [vreadpixel ${x1} ${y1} rgb]
|
|
set Color2 [vreadpixel ${x2} ${y2} rgb]
|
|
set Color3 [vreadpixel ${x3} ${y3} rgb]
|
|
set Color4 [vreadpixel ${x4} ${y4} rgb]
|
|
vclipplane create pln1
|
|
vclipplane change pln1 equation 1 0 0 -0.1
|
|
vclipplane set pln1 view Driver1/Viewer1/View1
|
|
box b 100 100 100
|
|
vdisplay b
|
|
vsetdispmode 1
|
|
set ColorRes1 [vreadpixel ${x1} ${y1} rgb]
|
|
set ColorRes2 [vreadpixel ${x2} ${y2} rgb]
|
|
set ColorRes3 [vreadpixel ${x3} ${y3} rgb]
|
|
set ColorRes4 [vreadpixel ${x4} ${y4} rgb]
|
|
|
|
if { ${Color1} == ${ColorRes1} && ${Color2} == ${ColorRes2} && ${Color3} == ${ColorRes3} && ${Color4} == ${ColorRes4}} {
|
|
puts "OK ${BugNumber}"
|
|
} else {
|
|
puts "Faulty ${BugNumber}"
|
|
}
|
|
|
|
checkview -screenshot -3d -path ${imagedir}/${test_image}.png
|