mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
dfa3d64f55
Files parse.rules corrected (point 2 in bug description) Adjusting testing cases for current state of master. Modified test cases CR23407_1 and CR23407_2
61 lines
1.5 KiB
Plaintext
Executable File
61 lines
1.5 KiB
Plaintext
Executable File
puts "============"
|
|
puts "CR23407"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# Draw face outlines for XDE objects
|
|
#######################################################################
|
|
pload QAcommands
|
|
pload XDEDRAW
|
|
|
|
set r_check 1
|
|
set g_check 0
|
|
set b_check 0
|
|
set x1 178
|
|
set y1 36
|
|
set x2 224
|
|
set y2 39
|
|
set x3 244
|
|
set y3 89
|
|
|
|
XNewDoc Doc1
|
|
ReadStep Doc1 [locate_data_file CR23407-screw.step]
|
|
XShow Doc1 0:1:1:1
|
|
XShowFaceBoundary Doc1 0:1:1:1 1 255 0 0 10 1
|
|
vfit
|
|
vsetdispmode 1
|
|
|
|
set color1 [ QAGetPixelColor ${x1} ${y1} ]
|
|
regexp {RED +: +([-0-9.+eE]+)} $color1 full rd1
|
|
regexp {GREEN +: +([-0-9.+eE]+)} $color1 full gr1
|
|
regexp {BLUE +: +([-0-9.+eE]+)} $color1 full bl1
|
|
set status1 0
|
|
if { $rd1 != $r_check || $gr1 != $g_check || $bl1 != $b_check } {
|
|
set status1 1
|
|
}
|
|
|
|
set color2 [ QAGetPixelColor ${x2} ${y2} ]
|
|
regexp {RED +: +([-0-9.+eE]+)} $color2 full rd2
|
|
regexp {GREEN +: +([-0-9.+eE]+)} $color2 full gr2
|
|
regexp {BLUE +: +([-0-9.+eE]+)} $color2 full bl2
|
|
set status2 0
|
|
if { $rd2 != $r_check || $gr2 != $g_check || $bl2 != $b_check } {
|
|
set status2 1
|
|
}
|
|
|
|
set color3 [ QAGetPixelColor ${x3} ${y3} ]
|
|
regexp {RED +: +([-0-9.+eE]+)} $color3 full rd3
|
|
regexp {GREEN +: +([-0-9.+eE]+)} $color3 full gr3
|
|
regexp {BLUE +: +([-0-9.+eE]+)} $color3 full bl3
|
|
set status3 0
|
|
if { $rd3 != $r_check || $gr3 != $g_check || $bl3 != $b_check } {
|
|
set status3 1
|
|
}
|
|
|
|
if { $status1 != 0 && $status2 != 0 && $status3 != 0 } {
|
|
puts "Error : color are not equal"
|
|
puts "Error : Boundary of face is not changed"
|
|
}
|
|
|
|
set 3dviewer 2
|