0031682: Visualization - Prs3d_ShadingAspect::SetTransparency() has no effect with...
[occt.git] / tests / v3d / glsl / double_precision
1 puts "========"
2 puts "0024393: Visualization - objects position with enchanced precision"
3 puts "========"
4
5 pload MODELING VISUALIZATION
6 vclear
7 vinit View1
8 vaxo
9 vzbufftrihedron
10 circle c 0 0 0 0.001
11 mkedge e c
12 wire   w e
13 plane  s
14 mkface f0    s w
15 mkface f1000 s w
16 ttranslate f1000 1000 0 0
17 # Display object with pre-applied transformation.
18 # Result presentation is already corrupted
19 # AND it jumps while rotating the camera.
20 vpoint v1000 1000 0 0.001
21 vdisplay -dispMode 1 f1000
22 vfit
23
24 # Display object with external transformation.
25 # Result presentation jumps while rotating the camera.
26 vdisplay -dispMode 1 f0
27 vsetlocation f0 1000 0 0
28
29 # Display object with external transformation
30 # in Z-layer with translated Origin.
31 # Result presentation does not jump while rotating the camera.
32 vzlayer top -origin 1000 0 0
33 vdisplay -dispMode 1 -top f0
34
35 # check transformation persistence
36 vtrihedron tt
37 vdisplay -top -trihedron topLeft 100 100 tt
38
39 box zp 40 50 30
40 vdisplay -top -dispMode 1 -trsfPers zoom -trsfPersPos 1000 0 0 zp
41
42 # check clippling planes
43 vclipplane pln -equation -1 0 0 1000 -set
44
45 # check positional lights
46 vlight add positional pos 1000 0 0.001 color RED1 headlight 0
47
48 vremove f1000
49 vmoveto 220 220
50
51 vdrawtext text Text -pos 0 0 0
52 vdisplay -top text -trsfPers zoomRotate -trsfPersPos 1000 0 0.001
53
54 vdump $::imagedir/${::casename}.png