puts "3D visualization performance tests"
puts "Interactive selection of sub-objects (FACES) by point-and-click for MeshVS_Mesh object in V3d View with 27 MeshVS_Mesh objects (+ AIS trihedron)"
puts "Object haves wireframe mode"


set dispmode 1
vsetdispmode m  ${dispmode}
vsetdispmode m2 ${dispmode}
vsetdispmode m3 ${dispmode}
vsetdispmode m4 ${dispmode}
vsetdispmode m5 ${dispmode}
vsetdispmode m6 ${dispmode}
vsetdispmode m7 ${dispmode}
vsetdispmode m8 ${dispmode}
vsetdispmode m9 ${dispmode}

vsetdispmode m11 ${dispmode}
vsetdispmode m12 ${dispmode}
vsetdispmode m13 ${dispmode}
vsetdispmode m14 ${dispmode}
vsetdispmode m15 ${dispmode}
vsetdispmode m16 ${dispmode}
vsetdispmode m17 ${dispmode}
vsetdispmode m18 ${dispmode}
vsetdispmode m19 ${dispmode}

vsetdispmode m21 ${dispmode}
vsetdispmode m22 ${dispmode}
vsetdispmode m23 ${dispmode}
vsetdispmode m24 ${dispmode}
vsetdispmode m25 ${dispmode}
vsetdispmode m26 ${dispmode}
vsetdispmode m27 ${dispmode}
vsetdispmode m28 ${dispmode}
vsetdispmode m29 ${dispmode}

vselmode m 8 1

dchrono tmr start

set x 267
set y 222
set x2 10
set y2 10
for {set i 1} {$i < 100} {incr i} {
    vselect $x $y
    vselect $x2 $y2
}