1 puts "TODO ?OCC11111 ALL: Faulty OCC12121"
3 puts "================"
5 puts "================"
7 #######################################################################################
8 # Optimization of existing selection classes
9 ######################################################################################
11 set BugNumber OCC12121
58 restore [locate_data_file OCC12121-CrankArm.brep] obj
61 vconnect new 50 50 50 obj
64 set ColorObj1 [QAGetPixelColor ${x2} ${y2}]
65 set ColorNew1 [QAGetPixelColor ${x3} ${y3}]
68 set ColorObj2 [QAGetPixelColor ${x2} ${y2}]
69 set ColorNew2 [QAGetPixelColor ${x3} ${y3}]
71 puts "Check vconnect command"
73 if { ${ColorObj1} == ${ColorNew1} && ${ColorObj2} == ${ColorNew2} } {
79 vselect ${x_refresh} ${y_refresh}
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}
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}
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}
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}
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}
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}
123 vselect ${x_refresh} ${y_refresh}
127 if { ${status_vconnect} == 1 } {
128 puts "OK ${BugNumber}"
130 puts "Faulty ${BugNumber}"