tests/v3d/materials/bug24855

   1 puts "========"
   2 puts "0024855: Revision of parameters of standard materials"
   3 puts "========"
   4
   5 # custom shapes
   6 set aShape [locate_data_file occ/Top.brep]
   7
   8 # setup 3D viewer content
   9 vinit View1 w=768 h=768
  10 vglinfo
  11
  12 vsetgradientbg 180 200 255 180 180 180 2
  13
  14 # display shape
  15 vlight -change 0 -dir 0.577 -0.577 -0.577
  16 restore $aShape s
  17 vdisplay -dispMode 1 s
  18 vfit
  19
  20 proc testmat {dirname filename} {
  21   foreach {aMatIter} {brass bronze copper gold jade neon_phc pewter obsidian plaster plastic satin silver steel stone chrome aluminium charcoal} {
  22     vsetmaterial -noredraw s $aMatIter
  23     vdump $dirname/${filename}_${aMatIter}.png
  24   }
  25 }
  26
  27 # material screenshots, Gouraud shading model (rasterization)
  28 vrenderparams -shadingModel GOURAUD
  29 testmat $imagedir $casename
  30
  31 # material screenshots, Phong shading model (rasterization)
  32 vrenderparams -shadingModel PHONG
  33 testmat $imagedir ${casename}_phong
  34
  35 # material screenshots, Ray-Tracing
  36 vrenderparams -raytrace -reflections -fsaa
  37 vtextureenv on 5
  38 testmat $imagedir ${casename}_rt