3bea4c16 |
1 | puts "TODO ?OCC11111 ALL: Faulty OCC12121" |
2 | |
3 | puts "================" |
4 | puts "OCC12121" |
5 | puts "================" |
6 | puts "" |
7 | ####################################################################################### |
8 | # Optimization of existing selection classes |
9 | ###################################################################################### |
10 | |
11 | set BugNumber OCC12121 |
12 | set x1 226 |
13 | set y1 154 |
14 | |
15 | set x2 300 |
16 | set y2 187 |
17 | |
18 | set x3 183 |
19 | set y3 269 |
20 | |
21 | set x_vertex_obj 330 |
22 | set y_vertex_obj 212 |
23 | set x_vertex_new 184 |
24 | set y_vertex_new 268 |
25 | |
26 | set x_edge_obj 296 |
27 | set y_edge_obj 155 |
28 | set x_edge_new 205 |
29 | set y_edge_new 240 |
30 | |
31 | set x_wire_obj 298 |
32 | set y_wire_obj 209 |
33 | set x_wire_new 55 |
34 | set y_wire_new 236 |
35 | |
36 | set x_face_obj 169 |
37 | set y_face_obj 146 |
38 | set x_face_new 204 |
39 | set y_face_new 238 |
40 | |
41 | set x_shell_obj 224 |
42 | set y_shell_obj 148 |
43 | set x_shell_new 230 |
44 | set y_shell_new 268 |
45 | |
46 | set x_solid_obj 329 |
47 | set y_solid_obj 218 |
48 | set x_solid_new 168 |
49 | set y_solid_new 256 |
50 | |
51 | set R_check 0 |
52 | set G_check 1 |
53 | set B_check 1 |
54 | |
55 | set x_refresh 10 |
56 | set y_refresh 10 |
57 | |
58 | restore [locate_data_file OCC12121-CrankArm.brep] obj |
59 | vinit |
60 | vdisplay obj |
61 | vconnectsh new 50 50 50 1 0 0 0 0 1 obj |
62 | vfit |
63 | vmoveto $x1 $y1 |
64 | set ColorObj1 [QAGetPixelColor ${x2} ${y2}] |
65 | set ColorNew1 [QAGetPixelColor ${x3} ${y3}] |
66 | |
67 | vselect $x1 $y1 |
68 | set ColorObj2 [QAGetPixelColor ${x2} ${y2}] |
69 | set ColorNew2 [QAGetPixelColor ${x3} ${y3}] |
70 | |
71 | puts "Check vconnectsh command" |
72 | set status_vconnectsh 0 |
73 | if { ${ColorObj1} == ${ColorNew1} && ${ColorObj2} == ${ColorNew2} } { |
74 | set status_vconnectsh 0 |
75 | } else { |
76 | set status_vconnectsh 1 |
77 | } |
78 | |
79 | vselect ${x_refresh} ${y_refresh} |
80 | vselmode 1 1 |
81 | vmoveto ${x_vertex_obj} ${y_vertex_obj} |
82 | checkcolor ${x_vertex_obj} ${y_vertex_obj} ${R_check} ${G_check} ${B_check} |
83 | vmoveto ${x_vertex_new} ${y_vertex_new} |
84 | checkcolor ${x_vertex_new} ${y_vertex_new} ${R_check} ${G_check} ${B_check} |
85 | |
86 | vselmode 1 0 |
87 | vselmode 2 1 |
88 | vmoveto ${x_edge_obj} ${y_edge_obj} |
89 | checkcolor ${x_edge_obj} ${y_edge_obj} ${R_check} ${G_check} ${B_check} |
90 | vmoveto ${x_edge_new} ${y_edge_new} |
91 | checkcolor ${x_edge_new} ${y_edge_new} ${R_check} ${G_check} ${B_check} |
92 | |
93 | vselmode 2 0 |
94 | vselmode 3 1 |
95 | vmoveto ${x_wire_obj} ${y_wire_obj} |
96 | checkcolor ${x_wire_obj} ${y_wire_obj} ${R_check} ${G_check} ${B_check} |
97 | vmoveto ${x_wire_new} ${y_wire_new} |
98 | checkcolor ${x_wire_new} ${y_wire_new} ${R_check} ${G_check} ${B_check} |
99 | |
100 | vselmode 3 0 |
101 | vselmode 4 1 |
102 | vmoveto ${x_face_obj} ${y_face_obj} |
103 | checkcolor ${x_face_obj} ${y_face_obj} ${R_check} ${G_check} ${B_check} |
104 | vmoveto ${x_face_new} ${y_face_new} |
105 | checkcolor ${x_face_new} ${y_face_new} ${R_check} ${G_check} ${B_check} |
106 | |
107 | vselmode 4 0 |
108 | vselmode 5 1 |
109 | vmoveto ${x_shell_obj} ${y_shell_obj} |
110 | checkcolor ${x_shell_obj} ${y_shell_obj} ${R_check} ${G_check} ${B_check} |
111 | vmoveto ${x_shell_new} ${y_shell_new} |
112 | checkcolor ${x_shell_new} ${y_shell_new} ${R_check} ${G_check} ${B_check} |
113 | |
114 | vselmode 5 0 |
115 | vselmode 6 1 |
116 | vmoveto ${x_solid_obj} ${y_solid_obj} |
117 | checkcolor ${x_solid_obj} ${y_solid_obj} ${R_check} ${G_check} ${B_check} |
118 | vmoveto ${x_solid_new} ${y_solid_new} |
119 | checkcolor ${x_solid_new} ${y_solid_new} ${R_check} ${G_check} ${B_check} |
120 | |
121 | vselmode 6 0 |
122 | vselmode obj 1 |
123 | vselect ${x_refresh} ${y_refresh} |
124 | |
125 | ##Resume |
126 | puts "" |
127 | if { ${status_vconnectsh} == 0 } { |
128 | puts "OK ${BugNumber}" |
129 | } else { |
130 | puts "Faulty ${BugNumber}" |
131 | } |
132 | |
133 | set only_screen 1 |