0024387: Tests - use system-independent fonts in test cases
[occt.git] / tests / bugs / vis / bug24837_2
CommitLineData
0717ddc1 1puts "============"
2puts "CR24837_2"
3puts "============"
4puts ""
5#######################################################################
6# Visualization - revise design and implementation of connected Interactive Objects
7#######################################################################
8
6fb1a930 9vfont add [locate_data_file DejaVuSans.ttf] SansFont
10
0717ddc1 11pload MODELING VISUALIZATION
12box o1 -10 -10 -5 1 1 10
13box o2 10 10 -5 1 1 10
14box b1 0 0 0 1 2 3
15box b2 3 0 0 3 2 1
16vinit View1
17vclear
18vtop
19vsetdispmode 0
20vdisplay o1 o2
21vdisplay b1 b2
22vfit
6fb1a930 23vdrawtext tb1 "b1" -pos 0 -3 3 -color 1.0 0.098 0.098 -halign right -valign bottom -angle 000 -zoom 0 -height 14 -aspect regular -font SansFont
24vdrawtext tb2 "b2" -pos 3 0 3 -color 0.098 1.0 0.098 -halign right -valign bottom -angle 000 -zoom 0 -height 14 -aspect regular -font SansFont
25vdrawtext bc_1 "bc_1" -pos 0 -9 3 -color 1.0 0.8823 0.8823 -halign right -valign bottom -angle 000 -zoom 0 -height 14 -aspect regular -font SansFont
26vdrawtext bc_2 "bc_2" -pos 3 -6 3 -color 1.0 0.8823 0.8823 -halign right -valign bottom -angle 000 -zoom 0 -height 14 -aspect regular -font SansFont
0717ddc1 27vsetdispmode 1
28set anImage ${imagedir}/${casename}_2_1.png
29vdump ${anImage}
30
29e2c6d2 31vsetmaterial b1 b2 tb1 tb2 plastic
32vsetcolor b1 tb1 RED
33vsetcolor b2 tb2 GREEN
0717ddc1 34set anImage ${imagedir}/${casename}_2_2.png
35vdump ${anImage}
36
37vsetlocation b1 0 -3 0
29e2c6d2 38vconnect bc 0 -6 0 b1 b2 tb1 tb2
0717ddc1 39set anImage ${imagedir}/${casename}_2_3.png
40vdump ${anImage}