b5ac8292 |
1 | puts "========" |
2 | puts "OCC22337" |
3 | puts "Test vprintview with new camera and shaders" |
4 | puts "========" |
5 | |
6 | pload ALL |
7 | vinit |
8 | box b 10 10 10 |
9 | vdisplay b |
10 | vrotate 1 0 0 |
11 | vfit |
12 | vsetdispmode 1 |
13 | |
14 | # test vprintview work |
15 | # make sure that the images with forced tiles and without are the same |
6b62b2da |
16 | vcamera -ortho |
b5ac8292 |
17 | vfit |
18 | set aTitle "ortho" |
19 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb |
20 | set aTitle "ortho-tiles" |
21 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb 1 256 256 |
22 | |
6b62b2da |
23 | vcamera -persp |
b5ac8292 |
24 | vfit |
25 | set aTitle "persp" |
26 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb |
27 | set aTitle "persp-tiles" |
28 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb 1 256 256 |
29 | |
30 | vshaderprog phong |
31 | |
6b62b2da |
32 | vcamera -ortho |
b5ac8292 |
33 | vfit |
34 | set aTitle "ortho-shader" |
35 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb |
36 | set aTitle "ortho-shader-tiles" |
37 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb 1 256 256 |
38 | |
6b62b2da |
39 | vcamera -persp |
b5ac8292 |
40 | vfit |
41 | set aTitle "persp-shader" |
42 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb |
43 | set aTitle "persp-shader-tiles" |
44 | vprintview 512 512 $imagedir/${casename}_${aTitle}.png rgb 1 256 256 |