825aa485 |
1 | puts "============" |
be7fc29e |
2 | puts "0026344: Visualization - provide a support of zoom persistent selection" |
825aa485 |
3 | puts "============" |
4 | puts "" |
5 | |
3fe9ce0e |
6 | vclear |
7 | vclose ALL |
825aa485 |
8 | vinit View1 w=409 h=409 |
9 | vtrihedron tri |
10 | vpan 50 50 |
11 | |
778cd667 |
12 | box bz1 25 25 25 |
13 | box bz2 25 25 25 |
14 | box br 100 100 100 |
15 | box bzr 50 25 20 |
16 | box bt 100 100 100 |
825aa485 |
17 | |
18 | # 1) Zoom persistence |
778cd667 |
19 | vpoint pz 200 200 200 |
825aa485 |
20 | |
778cd667 |
21 | vdisplay bz1 -dispMode 1 -highMode 1 -trsfPers zoom -trsfPersPos 200 200 200 |
22 | vdisplay bz2 -dispMode 1 -highMode 1 -trsfPers zoom -trsfPersPos 200 200 200 |
23 | vsetlocation bz2 -25 -25 -25 |
825aa485 |
24 | |
3fe9ce0e |
25 | vselect 0 0 |
26 | vselect 387 77 |
27 | if { [vreadpixel 387 77 rgb name] != "GRAY66" } { puts "Error picking zoom persistence object(s)" } |
825aa485 |
28 | |
3fe9ce0e |
29 | vselect 0 0 |
be7fc29e |
30 | vselect 330 120 410 50 |
3fe9ce0e |
31 | if { [vreadpixel 387 77 rgb name] != "GRAY66" || [vreadpixel 352 96 rgb name] != "GRAY66" } { puts "Error selecting zoom persistence object(s)" } |
825aa485 |
32 | |
825aa485 |
33 | # 2) Rotate persistence |
34 | |
778cd667 |
35 | vpoint pr -200 -200 -200 |
36 | vdisplay br -dispMode 1 -highMode 1 -trsfPers rotate -trsfPersPos -200 -200 -200 |
37 | vsetmaterial br PLASTIC |
3fe9ce0e |
38 | vselect 0 0 |
39 | vselect 160 200 |
40 | if { [vreadpixel 160 180 rgb name] != "WHITE" } { puts "Error picking rotate persistence object" } |
41 | |
42 | vselect 0 0 |
825aa485 |
43 | vselect 130 230 190 170 |
3fe9ce0e |
44 | if { [vreadpixel 160 180 rgb name] != "WHITE" } { puts "Error selecting rotate persistence object" } |
825aa485 |
45 | |
778cd667 |
46 | # 3) Zoom + Rotate persistence |
825aa485 |
47 | |
778cd667 |
48 | vpoint pzr -200 100 0 |
49 | vdisplay bzr -dispMode 1 -highMode 1 -trsfPers zoomRotate -trsfPersPos -200 100 0 |
50 | |
51 | vsetmaterial bzr PLASTIC |
3fe9ce0e |
52 | vselect 0 0 |
778cd667 |
53 | vselect 250 90 |
54 | if { [vreadpixel 250 90 rgb name] != "WHITE" } { puts "Error picking zoom-rotate persistence object" } |
3fe9ce0e |
55 | vselect 0 0 |
778cd667 |
56 | vselect 200 70 286 110 |
57 | if { [vreadpixel 250 90 rgb name] != "WHITE" } { puts "Error selecting zoom-rotate persistence object" } |
825aa485 |
58 | |
59 | # 4) Trihedron persistence |
60 | |
778cd667 |
61 | vdisplay bt -dispMode 1 -highMode 1 -trsfPers trihedron -trsfPersPos -1 -1 62 |
3fe9ce0e |
62 | vselect 0 0 |
63 | vselect 132 300 |
64 | if { [vreadpixel 132 300 rgb name] != "GRAY66" } { puts "Error picking trihedron persistence object" } |
65 | vselect 0 0 |
1d92133e |
66 | vselect 50 223 235 395 |
3fe9ce0e |
67 | if { [vreadpixel 132 300 rgb name] != "GRAY66" } { puts "Error selecting trihedron persistence object" } |
825aa485 |
68 | |
be7fc29e |
69 | vselect 50 410 410 50 |
949c9b7f |
70 | vstate -entities |
825aa485 |
71 | |
5747059b |
72 | checkview -screenshot -3d -path ${imagedir}/${test_image}.png |