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