light system seems to work again
[dd2d.git] / data / shaders / srlight_blur_occ.frag
blobde47a4f1642ad26eecd3bb219ef2e3f4b47bc41e
1 /* DooM2D: Midnight on the Firing Line
2  * coded by Ketmar // Invisible Vector <ketmar@ketmar.no-ip.org>
3  * Understanding is not required. Only obedience.
4  *
5  * This program is free software: you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation, either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  */
18 #version 130
20 //#define DEBUG_RECT
22 #define PI 3.1415926
24 #define SEARCH_RADIUS  (4)
25 #define MIN_ALPHA  (0.05)
27 uniform sampler2D texLMap; // light texture of lightTexSize
28 uniform sampler2D texBg; // background
29 uniform sampler2D texOcc; // occluders
30 uniform vec2 lightTexSize; // x: lightSize; y: size of this texture
31 uniform vec2 mapPixSize;
32 uniform vec4 lightColor;
33 uniform vec2 lightPos;
36 bool hasLight (in vec2 txo, in float pixelStep) {
37   /*
38   vec2 txc = txo;
39   for (int dy = SEARCH_RADIUS*2; dy > 0; --dy) {
40     for (int dx = SEARCH_RADIUS*2; dx > 0; --dx) {
41       if (texture2D(texLMap, txc).a > MIN_ALPHA) return true;
42       txc.x += pixelStep;
43     }
44     txc.x = txo.x;
45     txc.y += pixelStep;
46   }
47   return false;
48   */
49   float pxs = pixelStep*(SEARCH_RADIUS*2);
50   vec2 txclu = txo-pxs;
51   vec2 txcld = vec2(txo.x-pxs, txo.y+pxs);
52   vec2 txcru = vec2(txo.x+pxs, txo.y-pxs);
53   vec2 txcrd = txo+pxs;
54   vec2 txcu = vec2(txo.x, txo.y-pxs);
55   vec2 txcd = vec2(txo.x, txo.y+pxs);
56   vec2 txcl = vec2(txo.x-pxs, txo.y);
57   vec2 txcr = vec2(txo.x+pxs, txo.y);
58   vec2 txcrStep = vec2(pixelStep, -pixelStep);
59   float pst2 = pixelStep*2;
60   for (int d = SEARCH_RADIUS; d > 0; --d) {
61     if (texture2D(texLMap, txclu).a > MIN_ALPHA) return true;
62     txclu += pst2;
63     if (texture2D(texLMap, txcld).a > MIN_ALPHA) return true;
64     txcld.x += pst2;
65     txcld.y -= pst2;
67     if (texture2D(texLMap, txcru).a > MIN_ALPHA) return true;
68     txcru.x -= pst2;
69     txcru.y += pst2;
70     if (texture2D(texLMap, txcrd).a > MIN_ALPHA) return true;
71     txcrd -= pst2;
73     if (texture2D(texLMap, txcu).a > MIN_ALPHA) return true;
74     txcu.y += pst2;
75     if (texture2D(texLMap, txcd).a > MIN_ALPHA) return true;
76     txcd.y -= pst2;
78     if (texture2D(texLMap, txcl).a > MIN_ALPHA) return true;
79     txcl.x += pst2;
80     if (texture2D(texLMap, txcr).a > MIN_ALPHA) return true;
81     txcr.x -= pst2;
82   }
83   return false;
87 //gl_FragCoord: in background
89 void main (void) {
90   vec2 vTexCoord0 = gl_TexCoord[0].xy; // in light texture (texLMap)
91   //vec2 btxy = gl_FragCoord.xy/mapPixSize;
92   // don't even ask me!
93   vec2 btxy = vec2(/*lightPos.x+*/gl_FragCoord.x, /*lightPos.y+gl_TexCoord[0].y*lightTexSize.x*/gl_FragCoord.y);
94   //btxy.y = mapPixSize.y-btxy.y;
95   btxy /= mapPixSize;
96   vec2 ocxy = vec2(btxy.x, 1.0-btxy.y);
97   vec4 color;
99 #ifdef DEBUG_RECT
100   vec4 bcolor = texture2D(texBg, btxy);
101   color = bcolor;
102   color.b = 1.0;
103   color.a = 0.4;
104   //if (texture2D(texOcc, ocxy).a <= 0.75) color.a = 0.1;
106   vec2 ourpos = gl_FragCoord.xy;
107   ourpos.y = mapPixSize.y-ourpos.y;
108   // distance from this point to light origin
109   float lit = clamp(1.0-(distance(ourpos, lightPos)/(lightTexSize.x/2.0)), 0.0, 1.0);
110   lit = smoothstep(0.1, 1.0, lit);
111   color.a = lit;
113   //if (texture2D(texOcc, ocxy).a <= 0.75) discard; // empty space
114   //float pixelStep = 1.0/lightTexSize.x;
115   //if (!hasLight(vTexCoord0, pixelStep)) discard;
116   /*
117   color.r = vTexCoord0.x;
118   color.g = 0;
119   color.b = 0;
120   color.a = 1.0;
121   */
122 #else
123   if (texture2D(texOcc, ocxy).a <= 0.75) discard; // empty space
125   // occluder hit; look for light in 8px radius
126   float pixelStep = 1.0/lightTexSize.y;
127   if (!hasLight(vTexCoord0, pixelStep)) discard;
128   // background
129   vec4 bcolor = texture2D(texBg, btxy);
130   // light is y-mirrored
131   vec2 ourpos = gl_FragCoord.xy;
132   ourpos.y = mapPixSize.y-ourpos.y;
133   // distance from this point to light origin
134   float lit = clamp(1.0-(distance(ourpos, lightPos)/(lightTexSize.x/2.0)), 0.0, 1.0);
135   lit = smoothstep(0.1, 1.0, lit);
136   if (lightColor.a == 0.0) {
137     color = bcolor*vec4(vec3(1.0), lit);
138   } else {
139     color = lightColor*lit;
140     color += bcolor*lit;
141     color.a = lit/2.0;
142   }
143 #endif
144   gl_FragColor = color;