File: fragment.arb

package info (click to toggle)
libopengl-perl 0.6704%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 1,988 kB
  • ctags: 1,979
  • sloc: perl: 10,008; ansic: 5,935; makefile: 101; sh: 51
file content (11 lines) | stat: -rw-r--r-- 283 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
 
!!ARBfp1.0
PARAM surfacecolor = program.local[5];
TEMP color;
MUL color, fragment.texcoord[0].y, 2.0;
ADD color, 1.0, -color;
ABS color, color;
ADD color, 1.01, -color;  # Some cards have a rounding error
MOV color.a, 1.0;
MUL color, color, surfacecolor;
MOV result.color, color;
END