2 puts "0024393: Visualization - objects position with enhanced precision"
5 pload MODELING VISUALIZATION
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
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
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
35 # check transformation persistence
37 vdisplay -top -trihedron topLeft 100 100 tt
40 vdisplay -top -dispMode 1 -trsfPers zoom -trsfPersPos 1000 0 0 zp
42 # check clippling planes
43 vclipplane pln -equation -1 0 0 1000 -set
45 # check positional lights
46 vlight pntlight -type POSITIONAL -pos 1000 0 0.001 -color RED1 -headlight 0
51 vdrawtext text Text -pos 0 0 0
52 vdisplay -top text -trsfPers zoomRotate -trsfPersPos 1000 0 0.001
54 vdump $::imagedir/${::casename}.png