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