0029074: Visualization, TKOpenGl - support Geometry Shader definition
[occt.git] / tests / v3d / glsl / texture_trsf
CommitLineData
79f4f036 1puts "========"
a6dee93d 2puts "Texture 2D transformation (UV coordinates generation)"
79f4f036 3puts "========"
4
8e0a2b19 5vclear
6vclose ALL
7vinit View1
8
79f4f036 9set aTexture [locate_data_file bug26122_texture_trsf_ref.png]
10pload MODELING VISUALIZATION
11box b 1 1 1
12explode b F
13vclear
14vclose ALL
15vinit View1 w=512 h=512
16vtop
17vsetdispmode 1
18vdisplay b_6
19vfit
20
21vcaps -ffp 1
22vtexture b_6 $aTexture -modulate off
23vdump $::imagedir/${::casename}_identity_ffp.png
24vcaps -ffp 0
25vdump $::imagedir/${::casename}_identity_glsl.png
26
27vcaps -ffp 1
28vtexture b_6 $aTexture -origin 0.0 0.0 -scale 1.25 0.5
29vdump $::imagedir/${::casename}_scale_ffp.png
30vcaps -ffp 0
31vdump $::imagedir/${::casename}_scale_glsl.png
32
33vcaps -ffp 1
34vtexture b_6 $aTexture -origin 0.25 -0.25 -scale 1.0 1.0
35vdump $::imagedir/${::casename}_translate_ffp.png
36vcaps -ffp 0
37vdump $::imagedir/${::casename}_translate_glsl.png
38
39vcaps -ffp 1
40vtexture b_6 $aTexture -origin 0.25 -0.25 -scale 1.1 0.8
41vdump $::imagedir/${::casename}_ffp.png
42vcaps -ffp 0
43vdump $::imagedir/${::casename}_glsl.png