0027958: Visualization, AIS_Trihedron - add shaded presentation option
[occt.git] / tests / 3rdparty / export / A6
1 puts "============"
2 puts "OCC21091"
3 puts "OCC21450"
4 puts "============"
5 puts ""
6
7 vfont add [locate_data_file DejaVuSans.ttf] SansFont
8
9 vtrihedron trihedron
10
11 vpoint p1 -300 -300 -300
12 vdrawtext OC0 OpenCascade -pos -300 -300 -300 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
13
14 vpoint p2 -300 -300 -100
15 vdrawtext OC1 OpenCascade -pos -300 -300 -100 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
16
17 vpoint p3 -100 -100 -300
18 vdrawtext OC2 OpenCascade -pos -100 -100 -300 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
19
20 vpoint p4 -100 -100 -100
21 vdrawtext OC3 OpenCascade -pos -100 -100 -100 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
22
23
24 vpoint p5 -300 -100 -300
25 vdrawtext OC4 OpenCascade -pos -300 -100 -300 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
26
27 vpoint p6 -100 -300 -300
28 vdrawtext OC5 OpenCascade -pos -100 -300 -300 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
29
30 vpoint p7 -300 -100 -100
31 vdrawtext OC6 OpenCascade -pos -300 -100 -100 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
32
33 vpoint p8 -100 -300 -100
34 vdrawtext OC7 OpenCascade -pos -100 -300 -100 -color 0.0 1.0 0.0 -halign left -valign bottom -angle 000 -zoom 0 -height 15 -aspect regular -font SansFont
35
36 vaxis ax1 100 100 100 100 100 0
37
38 box a 110 110 110 200 200 200
39 vdisplay a
40
41 set aFile $imagedir/ExportToSVG.svg
42
43 set format SVG
44
45 set size 12120