tests/bugs/vis/bug12121

   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 vconnect new 50 50 50 obj
  62 vfit
  63 vmoveto $x1 $y1
  64 set ColorObj1 [vreadpixel ${x2} ${y2} rgb]
  65 set ColorNew1 [vreadpixel ${x3} ${y3} rgb]
  66
  67 vselect $x1 $y1
  68 set ColorObj2 [vreadpixel ${x2} ${y2} rgb]
  69 set ColorNew2 [vreadpixel ${x3} ${y3} rgb]
  70
  71 puts "Check vconnect command"
  72 set status_vconnect 0
  73 if { ${ColorObj1} == ${ColorNew1} && ${ColorObj2} == ${ColorNew2} } {
  74     set status_vconnect 0
  75 } else {
  76     set status_vconnect 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_vconnect} == 1 } {
 128    puts "OK ${BugNumber}"
 129 } else {
 130    puts "Faulty ${BugNumber}"
 131 }
 132
 133 set only_screen 1