tests/bugs/vis/bug23012

   1 puts "================"
   2 puts "OCC23012"
   3 puts "================"
   4 puts ""
   5 #######################################################################################
   6 # Detection gives incorrect results
   7 ######################################################################################
   8
   9 set BugNumber OCC23012
  10
  11 catch {pload XDE}
  12
  13 set x1 210
  14 set y1 184
  15
  16 set x2 205
  17 set y2 180
  18
  19 stepread [locate_data_file OCC23012-Sample_3.stp] a *
  20 stepread [locate_data_file OCC23012-Sample_9.stp] b *
  21 vdisplay a_1 b_1
  22 vsetdispmode a_1 1
  23 vsetdispmode b_1 1
  24 vselprecision 0
  25
  26 set ColorBefore [vreadpixel ${x1} ${y1} rgb]
  27
  28 vmoveto ${x2} ${y2}
  29
  30 set ColorAfter [vreadpixel ${x2} ${y2} rgb]
  31
  32 if { "$ColorBefore" == "$ColorAfter" } {
  33     puts "OK ${BugNumber}"
  34 } else {
  35     puts "Faulty ${BugNumber}"
  36 }
  37
  38 vfit
  39 checkview -screenshot -3d -path ${imagedir}/${test_image}.png