0027986: Visualization - AIS_InteractiveContext::SetLocation() does not update dynami...
[occt.git] / tests / bugs / vis / bug21747_6
1 puts "============"
2 puts "OCC21747"
3 puts "============"
4 puts ""
5 #######################################################################
6 # Implementation of gradient background style 
7
8 # vsetgradientbg: vsetgradientbg R1 G1 B1 R2 G2 B2 Type
9 # R1\G1\B1 - First color [0..255]
10 # R2\G2\B2 - Second color [0..255]
11 # Type 0 to 8
12 # 0 = NONE,
13 # 1 = HORIZONTAL,
14 # 2 = VERTICAL,
15 # 3 = DIAGONAL1,
16 # 4 = DIAGONAL2,
17 # 5 = CORNER1,
18 # 6 = CORNER2,
19 # 7 = CORNER3,
20 # 8 = CORNER4
21 #######################################################################
22
23 set BugNumber OCC21747
24
25 vinit
26
27 set R1 255
28 set G1 0
29 set B1 0
30 set R2 0
31 set G2 0
32 set B2 255
33 set Type 3
34
35 puts "${BugNumber}"
36 puts "Type=DIAGONAL1, Color from RED to BLUE, Direction from LEFT TOP CORNER to RIGHT BOTTOM CORNER"
37 puts "R1=${R1} G1=${G1} B1=${B1} R2=${R2} G2=${G2} B2=${B2} Type=${Type}"
38
39 vsetgradientbg ${R1} ${G1} ${B1} ${R2} ${G2} ${B2} ${Type}
40
41 checkview -screenshot -3d -path ${imagedir}/${test_image}.png