0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug23539_2
1
2
3 puts "============"
4 puts "CR23539"
5 puts "============"
6 puts ""
7 #############################
8 ## Test case for polygonal shift selection
9 #############################
10
11 box a 10 10 10
12 box b 50 50 50 10 10 10
13 vinit
14 vdisplay a b
15 vfit
16 vselmode 2 1
17 vselect 0 0
18 vselect 58 300
19 vselect 300 200 300 60 400 60 407 150 1
20
21 set NbSelected1 [vnbselected]
22 if { ${NbSelected1} != 13 } {
23   puts "Error : Polygonal shift selection doesn't work properly"
24 }
25
26 vselect 350 120 1
27
28 set NbSelected1 [vnbselected]
29 if { ${NbSelected1} != 12 } {
30   puts "Error : (case 2)"
31 }
32
33 checkview -screenshot -3d -path ${imagedir}/${test_image}.png