tests/bugs/vis/bug25103

   1 puts "============"
   2 puts "CR25103"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 #  Visualization - Regression in interactive detection
   7 #######################################################################
   8
   9 vinit
  10 vsetdispmode 1
  11
  12 box wall1 1 8 8
  13 box wall2 1 8 8
  14 box wall3 16 8 1
  15
  16 vdisplay wall1
  17 vdisplay wall2
  18 vdisplay wall3
  19
  20 vsetlocation wall1 -10 0 0
  21 vsetlocation wall2 5 0 0
  22 vsetlocation wall3 -10 0 -1
  23
  24 vsetmaterial wall1 stone
  25 vsetmaterial wall2 stone
  26 vsetmaterial wall3 pewter
  27
  28 vsetcolor wall1 red
  29 vsetcolor wall2 green
  30
  31 vfront
  32 vturnview 0 -0.3 0
  33 vfit
  34
  35 set anImage ${imagedir}/${casename}_1.png
  36 vdump ${anImage}
  37
  38 # The next line should highlight the green box (wall2) but it does not
  39 vmoveto 394 205
  40
  41 set anImage ${imagedir}/${casename}_2.png
  42 vdump ${anImage}
  43
  44 # The next line should not hit any object but it highlights the green box
  45 vmoveto 264 205
  46
  47 set anImage ${imagedir}/${casename}_3.png
  48 vdump ${anImage}