1 puts "================"
3 puts "================"
5 ########################################################################################
6 # puts "Impossible to set different properties for different sides of a (sur)face"
7 ########################################################################################
16 restore [locate_data_file OCC1174.brep] a
29 set at_X 102.061817325836
30 set at_Y 169.436979868935
31 set at_Z 70.7572056943368
33 vviewparams -scale ${scale} -proj ${proj_X} ${proj_Y} ${proj_Z} -up ${up_X} ${up_Y} ${up_Z} -at ${at_X} ${at_Y} ${at_Z}
41 set ColorList1 [vreadpixel ${x_GREEN} ${y_GREEN} rgb]
42 set RED_1 [lindex $ColorList1 0]
43 set GREEN_1 [lindex $ColorList1 1]
44 set BLUE_1 [lindex $ColorList1 2]
46 set ColorList2 [vreadpixel ${x_BLUE} ${y_BLUE} rgb]
47 set RED_2 [lindex $ColorList2 0]
48 set GREEN_2 [lindex $ColorList2 1]
49 set BLUE_2 [lindex $ColorList2 2]
51 if {${RED_1} == 0 && ${GREEN_1} > 0 && ${BLUE_1} == 0} {
57 if {${RED_2} == 0 && ${GREEN_2} == 0 && ${BLUE_2} > 0} {
63 if {${IsGreen} == 1 && ${IsBlue} == 1} {
69 checkview -screenshot -3d -path ${imagedir}/${test_image}.png