Mercurial > mplayer.hg
annotate TOOLS/edgeenh.fp @ 36920:40ad45360c8a
Replace old item 'potmeter' by new item 'pimage'.
Recent versions of the X11/GTK GUI didn't allow to control a potmeter,
because that didn't seem to make any sense.
In order to get rid of the confusing potmeter that doesn't distinguish
from a hpotmeter and in order to allow the more useful behaviour recent
versions of the X11/GTK GUI have been utilized (and because we're still
supporting item 'potmeter' for reasons of compatibility with old skins),
introduce new item 'pimage' that reuses most of the current potmeter
code.
Additionally, remove remaining code and documentation of 'potmeter'.
author | ib |
---|---|
date | Mon, 17 Mar 2014 12:29:46 +0000 |
parents | 7013c4222a19 |
children |
rev | line source |
---|---|
25761
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
1 !!ARBfp1.0 |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
2 # Custom YUV->RGB conversion program for MPlayer's -vo gl. |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
3 # Copyleft (C) Reimar Döffinger, 2005 |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
4 # Licensed under the GNU GPL v2 or later |
25770 | 5 # Usage: mplayer -vo gl:yuv=4:customprog=edgeenh.fp |
25761
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
6 # This is some custom edge-enhancement like effect. |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
7 # Try adjusting the gamma! |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
8 # program.env[0].xy contains the size of one source texel |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
9 PARAM strength = {0.5}; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
10 TEMP res, yuv, pos, tmp, sizes, center; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
11 SWZ sizes, program.env[0], x, y, 0, 0; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
12 TEX center.r, fragment.texcoord[0], texture[0], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
13 ADD pos, fragment.texcoord[0].xyxy, sizes.xwwy; # texels to the right and below |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
14 TEX tmp.r, pos.xyxy, texture[0], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
15 MAD yuv.r, center.rrrr, {4}, -tmp.rrrr; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
16 TEX tmp.r, pos.zwzw, texture[0], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
17 SUB yuv.r, yuv.rrrr, tmp.rrrr; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
18 SUB pos, fragment.texcoord[0].xyxy, sizes.xwwy; # texels to the left and above |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
19 TEX tmp.r, pos.xyxy, texture[0], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
20 SUB yuv.r, yuv.rrrr, tmp.rrrr; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
21 TEX tmp.r, pos.zwzw, texture[0], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
22 SUB yuv.r, yuv.rrrr, tmp.rrrr; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
23 MAD yuv.r, yuv.rrrr, strength, center.rrrr; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
24 TEX yuv.g, fragment.texcoord[1], texture[1], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
25 TEX yuv.b, fragment.texcoord[2], texture[2], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
26 # now do the normal YUV -> RGB conversion |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
27 MAD res, yuv.rrrr, {1.164, 1.164, 1.164, 0}, {-0.87416, 0.53133, -1.08599, 0.125}; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
28 MAD res.rgb, yuv.gggg, {0, -0.391, 2.018, 0}, res; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
29 MAD res.rgb, yuv.bbbb, {1.596, -0.813, 0, 0}, res; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
30 # do gamma texture lookup |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
31 TEX res.r, res.raaa, texture[3], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
32 ADD res.a, res.a, 0.25; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
33 TEX res.g, res.gaaa, texture[3], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
34 ADD res.a, res.a, 0.25; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
35 TEX res.b, res.baaa, texture[3], 2D; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
36 # move res into result, this allows easily commenting out some parts. |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
37 MOV result.color, res; |
8bb92a143435
Add the edge-enhancement filter based on edgedetect I had lying around.
reimar
parents:
diff
changeset
|
38 END |