tests/perf/multi_object_selection/B8

   1 puts "3D visualization performance tests"
   2 puts "Interactive selection of sub-objects (EDGE) by point-and-click for AIS-object in V3d View with 27 AIS-objects (+ AIS trihedron)"
   3 puts "Object haves wireframe mode"
   4
   5
   6 vsetdispmode 0
   7 vselmode 2 1
   8
   9 dchrono tmr start
  10
  11 set x 262
  12 set y 205
  13 set x2 10
  14 set y2 10
  15 for {set i 1} {$i < 100} {incr i} {
  16     vselect $x $y
  17     vselect $x2 $y2
  18 }