tests/v3d/raytrace/bug26617

   1 puts "============"
   2 puts "CR26617"
   3 puts "============"
   4 puts ""
   5
   6 ##########################################################################################
   7 # Visualization, Ray Tracing - adopt progressive rendering Path Tracing for rendering stereoscopic pair
   8 ##########################################################################################
   9
  10 # custom shapes
  11 set aShape1 [locate_data_file occ/Top.brep]
  12 set aShape2 [locate_data_file occ/Bottom.brep]
  13
  14 # setup 3D viewer content
  15 vinit name=View1 w=512 h=512
  16 vglinfo
  17
  18 vvbo 0
  19 vsetdispmode 1
  20 vbackground -gradient B4C8FF B4B4B4 -gradientMode VERTICAL
  21 restore $aShape1 s1
  22 restore $aShape2 s2
  23 vdisplay s1 s2
  24 vsetmaterial s1 Silver
  25 vsetmaterial s2 Pewter
  26 vsetlocation s1 0.0 0.1 0.0
  27 vlight -change 0 -dir 0.577 -0.577 -0.577
  28
  29 # activate ray-tracing
  30 vrenderparams -raytrace
  31 vtextureenv on 5
  32 vrenderparams -reflections -gi
  33
  34 # activate stereo
  35 vstereo on
  36 vstereo -mode anaglyph
  37 vcamera -iod 0.1
  38 vfit