mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
0d828ac838
Removed testgrids 'bugs/vis' and '3rdparty'; tests have been redistributed across other grids. Moved testgrid 'v3d/ivtk' into dedicated 'vtk/ivtk'. Added testgrid 'vselect' dedicated to 3D viewer picking/selection functionality and filled with tests from 'v3d/vertex', 'v3d/face' and similar groups. Added testgrid 'opengl' dedicated to OpenGL driver low-level functionality (GLSL programs and similar) and filled with tests from 'v3d/glsl', 'v3d/raytrace', '3rdparty/fonts', 'bugs/vis' (portion) and similar. Added testgrid 'opengles3' dedicated to OpenGL ES 3.0 driver low-level functionality and reusing tests from 'opengl' testgrid. Subgroup 'opengles3/raytrace' is disabled on Windows, as Ray-Tracing currently requires OpenGL ES 3.2. while ANGLE library implements only OpenGL ES 3.0. Added testgrid 'opengles2' dedicated to OpenGL ES 2.0 driver low-level functionality and reusing a limited subset of passing tests from 'opengl' testgrid. Currently testgrid is activated only on Windows platform when using ANGLE library (properietary OpenGL ES drivers do not allow creation of restricted 2.0 context). Test cases have been cleaned out to put bug description into log, to properly load necessary plugins and to explicitly dump viewer.
42 lines
801 B
Plaintext
42 lines
801 B
Plaintext
puts "============"
|
|
puts "OCC11615: Anisotropic scaling in 3D view"
|
|
puts "============"
|
|
puts ""
|
|
|
|
pload MODELING VISUALIZATION
|
|
|
|
box b 10 10 10
|
|
vinit View1
|
|
vdisplay b
|
|
vfit
|
|
vscale 1 1 1
|
|
|
|
set x1 [list 165 340 70]
|
|
set y1 [list 384 283 79]
|
|
vaspects -setwidth 5
|
|
puts ""
|
|
for {set i 0} {$i < 3} {incr i} {
|
|
set x_coord [lindex ${x1} $i]
|
|
set y_coord [lindex ${y1} $i]
|
|
if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
|
|
puts "Error : color is not yellow"
|
|
}
|
|
}
|
|
|
|
vscale 0.5 1.5 0.7
|
|
vfit
|
|
|
|
set x2 [list 80 390 25]
|
|
set y2 [list 390 218 167]
|
|
|
|
puts ""
|
|
for {set i 0} {$i < 3} {incr i} {
|
|
set x_coord [lindex ${x2} $i]
|
|
set y_coord [lindex ${y2} $i]
|
|
if { "[vreadpixel $x_coord $y_coord rgb name]" != "YELLOW" } {
|
|
puts "Error : color is not yellow"
|
|
}
|
|
}
|
|
|
|
vdump $imagedir/${casename}.png
|