Commit | Line | Data |
---|---|---|
352ffd73 | 1 | puts "===============" |
2 | puts " GER61351 " | |
3 | puts "==================================" | |
4 | puts "CASE 1 :takes visual check " | |
5 | puts "==================================" | |
6 | ||
7 | vinit | |
8 | GER61351 RED2 | |
352ffd73 | 9 | |
10 | set x_coord 200 | |
11 | set y_coord 200 | |
12 | ||
ccadc126 | 13 | if {"[vreadpixel $x_coord $y_coord rgb name]" != "RED2"} { |
352ffd73 | 14 | puts "Error : Background color is NOT RED2." |
15 | } | |
16 | ||
17 | set only_screen 1 |