+static int coronapolyindex[6] = {0, 1, 2, 0, 2, 3};
+
+void R_DrawCoronas(void)
+{
+ int i;
+ rmeshinfo_t m;
+ float tvxyz[4][4], tvst[4][2], scale, viewdist, diff[3], dist;
+ rdlight_t *rd;
+ memset(&m, 0, sizeof(m));
+ m.transparent = false;
+ m.blendfunc1 = GL_SRC_ALPHA;
+ m.blendfunc2 = GL_ONE;
+ m.depthdisable = true; // magic
+ m.numtriangles = 2;
+ m.numverts = 4;
+ m.index = coronapolyindex;
+ m.vertex = &tvxyz[0][0];
+ m.vertexstep = sizeof(float[4]);
+ m.tex[0] = R_GetTexture(lightcorona);
+ m.texcoords[0] = &tvst[0][0];
+ m.texcoordstep[0] = sizeof(float[2]);
+ tvst[0][0] = 0;
+ tvst[0][1] = 0;
+ tvst[1][0] = 0;
+ tvst[1][1] = 1;
+ tvst[2][0] = 1;
+ tvst[2][1] = 1;
+ tvst[3][0] = 1;
+ tvst[3][1] = 0;
+ viewdist = DotProduct(r_origin, vpn);
+ for (i = 0;i < r_numdlights;i++)
+ {
+ rd = r_dlight + i;
+ dist = (DotProduct(rd->origin, vpn) - viewdist);
+ if (dist >= 24.0f)
+ {
+ // trace to a point just barely closer to the eye
+ VectorSubtract(rd->origin, vpn, diff);
+ if (TraceLine(r_origin, diff, NULL, NULL, 0) == 1)
+ {
+ scale = 1.0f / 65536.0f;//64.0f / (dist * dist + 1024.0f);
+ m.cr = rd->light[0] * scale;
+ m.cg = rd->light[1] * scale;
+ m.cb = rd->light[2] * scale;
+ m.ca = 1;
+ if (fogenabled)
+ {
+ VectorSubtract(rd->origin, r_origin, diff);
+ m.ca *= 1 - exp(fogdensity/DotProduct(diff,diff));
+ }
+ // make it larger in the distance to keep a consistent size
+ //scale = 0.4f * dist;
+ scale = 256.0f;
+ tvxyz[0][0] = rd->origin[0] - vright[0] * scale - vup[0] * scale;
+ tvxyz[0][1] = rd->origin[1] - vright[1] * scale - vup[1] * scale;
+ tvxyz[0][2] = rd->origin[2] - vright[2] * scale - vup[2] * scale;
+ tvxyz[1][0] = rd->origin[0] - vright[0] * scale + vup[0] * scale;
+ tvxyz[1][1] = rd->origin[1] - vright[1] * scale + vup[1] * scale;
+ tvxyz[1][2] = rd->origin[2] - vright[2] * scale + vup[2] * scale;
+ tvxyz[2][0] = rd->origin[0] + vright[0] * scale + vup[0] * scale;
+ tvxyz[2][1] = rd->origin[1] + vright[1] * scale + vup[1] * scale;
+ tvxyz[2][2] = rd->origin[2] + vright[2] * scale + vup[2] * scale;
+ tvxyz[3][0] = rd->origin[0] + vright[0] * scale - vup[0] * scale;
+ tvxyz[3][1] = rd->origin[1] + vright[1] * scale - vup[1] * scale;
+ tvxyz[3][2] = rd->origin[2] + vright[2] * scale - vup[2] * scale;
+ R_Mesh_DrawDecal(&m);
+ }
+ }
+ }
+}
+