puts "============" puts "OCC21747" puts "============" puts "" ####################################################################### # Implementation of gradient background style # # vsetgradientbg: vsetgradientbg R1 G1 B1 R2 G2 B2 Type # R1\G1\B1 - First color [0..255] # R2\G2\B2 - Second color [0..255] # Type 0 to 8 # 0 = NONE, # 1 = HORIZONTAL, # 2 = VERTICAL, # 3 = DIAGONAL1, # 4 = DIAGONAL2, # 5 = CORNER1, # 6 = CORNER2, # 7 = CORNER3, # 8 = CORNER4 ####################################################################### set BugNumber OCC21747 vinit set R1 0 set G1 0 set B1 255 set R2 255 set G2 0 set B2 0 set Type 7 puts "${BugNumber}" puts "Type=CORNER3, Color from BLUE to RED, Direction from RIGHT BOTTOM CORNER" puts "R1=${R1} G1=${G1} B1=${B1} R2=${R2} G2=${G2} B2=${B2} Type=${Type}" vsetgradientbg ${R1} ${G1} ${B1} ${R2} ${G2} ${B2} ${Type} checkview -screenshot -3d -path ${imagedir}/${test_image}.png