a87752f3 |
1 | puts "========" |
2 | puts "OCC232" |
3 | puts "Pick filter does NOT work for TopAbs_COMPSOLID topology" |
4 | puts "========" |
5 | |
6 | vinit |
7 | OCC232 |
8 | vfit |
9 | |
10 | # selected point of first CompSolid |
11 | set x1 69 |
12 | set y1 204 |
13 | |
14 | set x2 116 |
15 | set y2 231 |
16 | |
17 | #set x3 160; set y3 257 - it's bad for lin,aki. |
18 | set x3 159 |
19 | set y3 256 |
20 | |
21 | # selected point of second CompSolid |
22 | set x4 298 |
23 | set y4 76 |
24 | |
25 | set x5 339 |
26 | set y5 100 |
27 | |
28 | set x6 381 |
29 | set y6 124 |
30 | |
31 | set Cyan_R 0 |
32 | set Cyan_G 1 |
33 | set Cyan_B 1 |
34 | |
35 | set Yellow_R 1 |
36 | set Yellow_G 1 |
37 | set Yellow_B 0 |
38 | |
39 | # There is not selection |
40 | puts "There is not selection" |
41 | catch {QAGetPixelColor $x1 $y1 $Yellow_R $Yellow_G $Yellow_B} result11 |
42 | catch {QAGetPixelColor $x2 $y2 $Yellow_R $Yellow_G $Yellow_B} result12 |
43 | catch {QAGetPixelColor $x3 $y3 $Yellow_R $Yellow_G $Yellow_B} result13 |
44 | catch {QAGetPixelColor $x4 $y4 $Yellow_R $Yellow_G $Yellow_B} result14 |
45 | catch {QAGetPixelColor $x5 $y5 $Yellow_R $Yellow_G $Yellow_B} result15 |
46 | catch {QAGetPixelColor $x6 $y6 $Yellow_R $Yellow_G $Yellow_B} result16 |
47 | |
48 | # Move a mouse |
49 | puts "Move a mouse" |
50 | QAMoveTo $x2 $y2 |
51 | QAMoveTo $x2 $y2 |
52 | |
53 | # Second box of first CompSolid is selected |
54 | puts "Second box of first CompSolid is selected" |
55 | catch {QAGetPixelColor $x1 $y1 $Yellow_R $Yellow_G $Yellow_B} result21 |
56 | catch {QAGetPixelColor $x3 $y3 $Yellow_R $Yellow_G $Yellow_B} result22 |
57 | catch {QAGetPixelColor $x4 $y4 $Yellow_R $Yellow_G $Yellow_B} result23 |
58 | catch {QAGetPixelColor $x5 $y5 $Yellow_R $Yellow_G $Yellow_B} result24 |
59 | catch {QAGetPixelColor $x6 $y6 $Yellow_R $Yellow_G $Yellow_B} result25 |
60 | |
61 | QAUpdateLights |
62 | catch {QAGetPixelColor $x2 $y2 $Cyan_R $Cyan_G $Cyan_B} result31 |
63 | |
64 | set IsFaulty 0 |
65 | if { [regexp "Faulty" $result11] == 1 } { |
66 | set IsFaulty 1 |
67 | } |
68 | if { [regexp "Faulty" $result12] == 1 } { |
69 | set IsFaulty 1 |
70 | } |
71 | if { [regexp "Faulty" $result13] == 1 } { |
72 | set IsFaulty 1 |
73 | } |
74 | if { [regexp "Faulty" $result14] == 1 } { |
75 | set IsFaulty 1 |
76 | } |
77 | if { [regexp "Faulty" $result15] == 1 } { |
78 | set IsFaulty 1 |
79 | } |
80 | if { [regexp "Faulty" $result16] == 1 } { |
81 | set IsFaulty 1 |
82 | } |
83 | if { [regexp "Faulty" $result21] == 1 } { |
84 | set IsFaulty 1 |
85 | } |
86 | if { [regexp "Faulty" $result22] == 1 } { |
87 | set IsFaulty 1 |
88 | } |
89 | if { [regexp "Faulty" $result23] == 1 } { |
90 | set IsFaulty 1 |
91 | } |
92 | if { [regexp "Faulty" $result24] == 1 } { |
93 | set IsFaulty 1 |
94 | } |
95 | if { [regexp "Faulty" $result25] == 1 } { |
96 | set IsFaulty 1 |
97 | } |
98 | if { [regexp "Faulty" $result31] == 1 } { |
99 | set IsFaulty 1 |
100 | } |
101 | |
102 | if {$IsFaulty != 0} { |
103 | puts "Error : OCC232" |
104 | } |
105 | |
106 | set only_screen 1 |