2 Copyright (C) 1996-1997 Id Software, Inc.
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13 See the GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
24 rdlight_t r_dlight[MAX_DLIGHTS];
27 cvar_t r_lightmodels = {CVAR_SAVE, "r_lightmodels", "1"};
28 cvar_t r_vismarklights = {0, "r_vismarklights", "1"};
29 //cvar_t r_lightmodelhardness = {CVAR_SAVE, "r_lightmodelhardness", "1"};
31 static rtexture_t *lightcorona;
32 static rtexturepool_t *lighttexturepool;
34 void r_light_start(void)
38 qbyte pixels[32][32][4];
39 lighttexturepool = R_AllocTexturePool();
40 for (y = 0;y < 32;y++)
42 dy = (y - 15.5f) * (1.0f / 16.0f);
43 for (x = 0;x < 32;x++)
45 dx = (x - 15.5f) * (1.0f / 16.0f);
46 a = ((1.0f / (dx * dx + dy * dy + 0.2f)) - (1.0f / (1.0f + 0.2))) * 64.0f / (1.0f / (1.0f + 0.2));
48 pixels[y][x][0] = 255;
49 pixels[y][x][1] = 255;
50 pixels[y][x][2] = 255;
54 lightcorona = R_LoadTexture (lighttexturepool, "lightcorona", 32, 32, &pixels[0][0][0], TEXTYPE_RGBA, TEXF_PRECACHE | TEXF_ALPHA);
57 void r_light_shutdown(void)
59 lighttexturepool = NULL;
63 void r_light_newmap(void)
67 void R_Light_Init(void)
69 Cvar_RegisterVariable(&r_lightmodels);
70 //Cvar_RegisterVariable(&r_lightmodelhardness);
71 Cvar_RegisterVariable(&r_vismarklights);
72 R_RegisterModule("R_Light", r_light_start, r_light_shutdown, r_light_newmap);
80 void R_AnimateLight (void)
86 // 'm' is normal light, 'a' is no light, 'z' is double bright
87 i = (int)(cl.time * 10);
88 for (j = 0;j < MAX_LIGHTSTYLES;j++)
90 if (!cl_lightstyle[j].length)
92 d_lightstylevalue[j] = 256;
95 k = i % cl_lightstyle[j].length;
96 k = cl_lightstyle[j].map[k] - 'a';
98 d_lightstylevalue[j] = k;
103 void R_BuildLightList(void)
112 if (!r_dynamic.integer)
115 for (i = 0;i < MAX_DLIGHTS;i++)
120 rd = &r_dlight[r_numdlights++];
121 VectorCopy(cd->origin, rd->origin);
122 VectorScale(cd->color, cd->radius * 128.0f, rd->light);
123 rd->cullradius = (1.0f / 128.0f) * sqrt(DotProduct(rd->light, rd->light));
124 // clamp radius to avoid overflowing division table in lightmap code
125 if (rd->cullradius > 2048.0f)
126 rd->cullradius = 2048.0f;
127 rd->cullradius2 = rd->cullradius * rd->cullradius;
128 rd->lightsubtract = 1.0f / rd->cullradius2;
131 c_dlights++; // count every dlight in use
135 static int coronapolyindex[6] = {0, 1, 2, 0, 2, 3};
137 void R_DrawCoronas(void)
141 float tvxyz[4][4], tvst[4][2], scale, viewdist, diff[3], dist;
143 memset(&m, 0, sizeof(m));
144 m.transparent = false;
145 m.blendfunc1 = GL_SRC_ALPHA;
146 m.blendfunc2 = GL_ONE;
147 m.depthdisable = true; // magic
150 m.index = coronapolyindex;
151 m.vertex = &tvxyz[0][0];
152 m.vertexstep = sizeof(float[4]);
153 m.tex[0] = R_GetTexture(lightcorona);
154 m.texcoords[0] = &tvst[0][0];
155 m.texcoordstep[0] = sizeof(float[2]);
164 viewdist = DotProduct(r_origin, vpn);
165 for (i = 0;i < r_numdlights;i++)
168 dist = (DotProduct(rd->origin, vpn) - viewdist);
171 // trace to a point just barely closer to the eye
172 VectorSubtract(rd->origin, vpn, diff);
173 if (TraceLine(r_origin, diff, NULL, NULL, 0, true) == 1)
175 scale = 1.0f / 262144.0f;
176 //scale = 64.0f / (DotProduct(diff,diff) + 1024.0f);
177 m.cr = rd->light[0] * scale;
178 m.cg = rd->light[1] * scale;
179 m.cb = rd->light[2] * scale;
183 VectorSubtract(rd->origin, r_origin, diff);
184 m.ca *= 1 - exp(fogdensity/DotProduct(diff,diff));
186 scale = rd->cullradius * 0.25f;
187 tvxyz[0][0] = rd->origin[0] - vright[0] * scale - vup[0] * scale;
188 tvxyz[0][1] = rd->origin[1] - vright[1] * scale - vup[1] * scale;
189 tvxyz[0][2] = rd->origin[2] - vright[2] * scale - vup[2] * scale;
190 tvxyz[1][0] = rd->origin[0] - vright[0] * scale + vup[0] * scale;
191 tvxyz[1][1] = rd->origin[1] - vright[1] * scale + vup[1] * scale;
192 tvxyz[1][2] = rd->origin[2] - vright[2] * scale + vup[2] * scale;
193 tvxyz[2][0] = rd->origin[0] + vright[0] * scale + vup[0] * scale;
194 tvxyz[2][1] = rd->origin[1] + vright[1] * scale + vup[1] * scale;
195 tvxyz[2][2] = rd->origin[2] + vright[2] * scale + vup[2] * scale;
196 tvxyz[3][0] = rd->origin[0] + vright[0] * scale - vup[0] * scale;
197 tvxyz[3][1] = rd->origin[1] + vright[1] * scale - vup[1] * scale;
198 tvxyz[3][2] = rd->origin[2] + vright[2] * scale - vup[2] * scale;
206 =============================================================================
210 =============================================================================
218 static void R_OldMarkLights (vec3_t lightorigin, rdlight_t *rd, int bit, int bitindex, mnode_t *node)
220 float ndist, maxdist;
225 if (!r_dynamic.integer)
228 // for comparisons to minimum acceptable light
229 maxdist = rd->cullradius2;
232 if (node->contents < 0)
234 if (node->contents != CONTENTS_SOLID)
236 leaf = (mleaf_t *)node;
237 if (leaf->dlightframe != r_framecount) // not dynamic until now
239 leaf->dlightbits[0] = leaf->dlightbits[1] = leaf->dlightbits[2] = leaf->dlightbits[3] = leaf->dlightbits[4] = leaf->dlightbits[5] = leaf->dlightbits[6] = leaf->dlightbits[7] = 0;
240 leaf->dlightframe = r_framecount;
242 leaf->dlightbits[bitindex] |= bit;
247 ndist = PlaneDiff(lightorigin, node->plane);
249 if (ndist > rd->cullradius)
251 node = node->children[0];
254 if (ndist < -rd->cullradius)
256 node = node->children[1];
261 surf = currentrenderentity->model->surfaces + node->firstsurface;
262 for (i=0 ; i<node->numsurfaces ; i++, surf++)
264 int d, impacts, impactt;
265 float dist, dist2, impact[3];
266 if (surf->visframe != r_framecount)
269 if (surf->flags & SURF_PLANEBACK)
272 if (dist < -0.25f && !(surf->flags & SURF_LIGHTBOTHSIDES))
276 if (dist2 >= maxdist)
279 impact[0] = rd->origin[0] - surf->plane->normal[0] * dist;
280 impact[1] = rd->origin[1] - surf->plane->normal[1] * dist;
281 impact[2] = rd->origin[2] - surf->plane->normal[2] * dist;
283 impacts = DotProduct (impact, surf->texinfo->vecs[0]) + surf->texinfo->vecs[0][3] - surf->texturemins[0];
285 d = bound(0, impacts, surf->extents[0] + 16) - impacts;
290 impactt = DotProduct (impact, surf->texinfo->vecs[1]) + surf->texinfo->vecs[1][3] - surf->texturemins[1];
292 d = bound(0, impactt, surf->extents[1] + 16) - impactt;
299 d = DotProduct (impact, surf->texinfo->vecs[0]) + surf->texinfo->vecs[0][3] - surf->texturemins[0];
304 if (dist2 >= maxdist)
309 d -= surf->extents[0] + 16;
313 if (dist2 >= maxdist)
318 d = DotProduct (impact, surf->texinfo->vecs[1]) + surf->texinfo->vecs[1][3] - surf->texturemins[1];
323 if (dist2 >= maxdist)
328 d -= surf->extents[1] + 16;
332 if (dist2 >= maxdist)
338 if (surf->dlightframe != r_framecount) // not dynamic until now
340 surf->dlightbits[0] = surf->dlightbits[1] = surf->dlightbits[2] = surf->dlightbits[3] = surf->dlightbits[4] = surf->dlightbits[5] = surf->dlightbits[6] = surf->dlightbits[7] = 0;
341 surf->dlightframe = r_framecount;
343 surf->dlightbits[bitindex] |= bit;
346 if (((surf->flags & SURF_PLANEBACK) == 0) == ((PlaneDist(lightorigin, surf->plane)) >= surf->plane->dist))
348 if (surf->dlightframe != r_framecount) // not dynamic until now
350 surf->dlightbits[0] = surf->dlightbits[1] = surf->dlightbits[2] = surf->dlightbits[3] = surf->dlightbits[4] = surf->dlightbits[5] = surf->dlightbits[6] = surf->dlightbits[7] = 0;
351 surf->dlightframe = r_framecount;
353 surf->dlightbits[bitindex] |= bit;
358 if (node->children[0]->contents >= 0)
360 if (node->children[1]->contents >= 0)
362 R_OldMarkLights (lightorigin, rd, bit, bitindex, node->children[0]);
363 node = node->children[1];
368 node = node->children[0];
372 else if (node->children[1]->contents >= 0)
374 node = node->children[1];
380 static void R_NoVisMarkLights (rdlight_t *rd, int bit, int bitindex)
383 softwareuntransform(rd->origin, lightorigin);
385 R_OldMarkLights(lightorigin, rd, bit, bitindex, currentrenderentity->model->nodes + currentrenderentity->model->hulls[0].firstclipnode);
389 static void R_VisMarkLights (rdlight_t *rd, int bit, int bitindex)
391 static int lightframe = 0;
395 int i, k, m, c, leafnum;
396 msurface_t *surf, **mark;
400 float low[3], high[3], dist, maxdist;
402 if (!r_dynamic.integer)
405 model = currentrenderentity->model;
406 softwareuntransform(rd->origin, lightorigin);
408 if (!r_vismarklights.integer)
410 R_OldMarkLights(lightorigin, rd, bit, bitindex, model->nodes + model->hulls[0].firstclipnode);
414 pvsleaf = Mod_PointInLeaf (lightorigin, model);
417 Con_Printf("R_VisMarkLights: NULL leaf??\n");
418 R_OldMarkLights(lightorigin, rd, bit, bitindex, model->nodes + model->hulls[0].firstclipnode);
422 in = pvsleaf->compressed_vis;
425 // no vis info, so make all visible
426 R_OldMarkLights(lightorigin, rd, bit, bitindex, model->nodes + model->hulls[0].firstclipnode);
432 low[0] = lightorigin[0] - rd->cullradius;low[1] = lightorigin[1] - rd->cullradius;low[2] = lightorigin[2] - rd->cullradius;
433 high[0] = lightorigin[0] + rd->cullradius;high[1] = lightorigin[1] + rd->cullradius;high[2] = lightorigin[2] + rd->cullradius;
435 // for comparisons to minimum acceptable light
436 maxdist = rd->cullradius2;
438 row = (model->numleafs+7)>>3;
446 for (i = 0;i < 8;i++)
450 // warning to the clumsy: numleafs is one less than it should be, it only counts leafs with vis bits (skips leaf 0)
451 leafnum = (k << 3)+i+1;
452 if (leafnum > model->numleafs)
454 leaf = &model->leafs[leafnum];
455 if (leaf->visframe != r_framecount
456 || leaf->contents == CONTENTS_SOLID
457 || leaf->mins[0] > high[0] || leaf->maxs[0] < low[0]
458 || leaf->mins[1] > high[1] || leaf->maxs[1] < low[1]
459 || leaf->mins[2] > high[2] || leaf->maxs[2] < low[2])
461 if (leaf->dlightframe != r_framecount)
463 // not dynamic until now
464 leaf->dlightbits[0] = leaf->dlightbits[1] = leaf->dlightbits[2] = leaf->dlightbits[3] = leaf->dlightbits[4] = leaf->dlightbits[5] = leaf->dlightbits[6] = leaf->dlightbits[7] = 0;
465 leaf->dlightframe = r_framecount;
467 leaf->dlightbits[bitindex] |= bit;
468 if ((m = leaf->nummarksurfaces))
470 mark = leaf->firstmarksurface;
474 // if not visible in current frame, or already marked because it was in another leaf we passed, skip
475 if (surf->lightframe == lightframe)
477 surf->lightframe = lightframe;
478 if (surf->visframe != r_framecount)
480 dist = PlaneDiff(lightorigin, surf->plane);
481 if (surf->flags & SURF_PLANEBACK)
483 // LordHavoc: make sure it is infront of the surface and not too far away
484 if (dist < rd->cullradius && (dist > -0.25f || ((surf->flags & SURF_LIGHTBOTHSIDES) && dist > -rd->cullradius)))
487 int impacts, impactt;
488 float dist2, impact[3];
492 impact[0] = rd->origin[0] - surf->plane->normal[0] * dist;
493 impact[1] = rd->origin[1] - surf->plane->normal[1] * dist;
494 impact[2] = rd->origin[2] - surf->plane->normal[2] * dist;
497 d = DotProduct (impact, surf->texinfo->vecs[0]) + surf->texinfo->vecs[0][3] - surf->texturemins[0];
506 d -= surf->extents[0];
515 d = DotProduct (impact, surf->texinfo->vecs[1]) + surf->texinfo->vecs[1][3] - surf->texturemins[1];
524 d -= surf->extents[1];
535 impacts = DotProduct (impact, surf->texinfo->vecs[0]) + surf->texinfo->vecs[0][3] - surf->texturemins[0];
536 d = bound(0, impacts, surf->extents[0] + 16) - impacts;
541 impactt = DotProduct (impact, surf->texinfo->vecs[1]) + surf->texinfo->vecs[1][3] - surf->texturemins[1];
542 d = bound(0, impactt, surf->extents[1] + 16) - impactt;
549 if (surf->dlightframe != r_framecount) // not dynamic until now
551 surf->dlightbits[0] = surf->dlightbits[1] = surf->dlightbits[2] = surf->dlightbits[3] = surf->dlightbits[4] = surf->dlightbits[5] = surf->dlightbits[6] = surf->dlightbits[7] = 0;
552 surf->dlightframe = r_framecount;
554 surf->dlightbits[bitindex] |= bit;
569 void R_MarkLights(void)
572 for (i = 0;i < r_numdlights;i++)
573 R_VisMarkLights (r_dlight + i, 1 << (i & 31), i >> 5);
577 =============================================================================
581 =============================================================================
584 static int RecursiveLightPoint (vec3_t color, mnode_t *node, float x, float y, float startz, float endz)
586 int side, distz = endz - startz;
591 if (node->contents < 0)
592 return false; // didn't hit anything
594 switch (node->plane->type)
597 node = node->children[x < node->plane->dist];
600 node = node->children[y < node->plane->dist];
603 side = startz < node->plane->dist;
604 if ((endz < node->plane->dist) == side)
606 node = node->children[side];
609 // found an intersection
610 // mid = startz + (endz - startz) * (startz - node->plane->dist) / (startz - endz);
611 // mid = startz + distz * (startz - node->plane->dist) / (-distz);
612 // mid = startz + (-(startz - node->plane->dist));
613 // mid = startz - (startz - node->plane->dist);
614 // mid = startz + node->plane->dist - startz;
615 mid = node->plane->dist;
618 back = front = x * node->plane->normal[0] + y * node->plane->normal[1];
619 front += startz * node->plane->normal[2];
620 back += endz * node->plane->normal[2];
621 side = front < node->plane->dist;
622 if ((back < node->plane->dist) == side)
624 node = node->children[side];
627 // found an intersection
628 // mid = startz + (endz - startz) * ((front - node->plane->dist) / ((front - node->plane->dist) - (back - node->plane->dist)));
629 // mid = startz + (endz - startz) * ((front - node->plane->dist) / (front - back));
630 mid = startz + distz * (front - node->plane->dist) / (front - back);
634 // go down front side
635 if (node->children[side]->contents >= 0 && RecursiveLightPoint (color, node->children[side], x, y, startz, mid))
636 return true; // hit something
639 // check for impact on this node
640 if (node->numsurfaces)
645 surf = cl.worldmodel->surfaces + node->firstsurface;
646 for (i = 0;i < node->numsurfaces;i++, surf++)
648 if (!(surf->flags & SURF_LIGHTMAP))
649 continue; // no lightmaps
651 ds = (int) (x * surf->texinfo->vecs[0][0] + y * surf->texinfo->vecs[0][1] + mid * surf->texinfo->vecs[0][2] + surf->texinfo->vecs[0][3]);
652 dt = (int) (x * surf->texinfo->vecs[1][0] + y * surf->texinfo->vecs[1][1] + mid * surf->texinfo->vecs[1][2] + surf->texinfo->vecs[1][3]);
654 if (ds < surf->texturemins[0] || dt < surf->texturemins[1])
657 ds -= surf->texturemins[0];
658 dt -= surf->texturemins[1];
660 if (ds > surf->extents[0] || dt > surf->extents[1])
666 int maps, line3, size3, dsfrac = ds & 15, dtfrac = dt & 15, scale = 0, r00 = 0, g00 = 0, b00 = 0, r01 = 0, g01 = 0, b01 = 0, r10 = 0, g10 = 0, b10 = 0, r11 = 0, g11 = 0, b11 = 0;
667 line3 = ((surf->extents[0]>>4)+1)*3;
668 size3 = ((surf->extents[0]>>4)+1) * ((surf->extents[1]>>4)+1)*3; // LordHavoc: *3 for colored lighting
670 lightmap = surf->samples + ((dt>>4) * ((surf->extents[0]>>4)+1) + (ds>>4))*3; // LordHavoc: *3 for color
672 for (maps = 0;maps < MAXLIGHTMAPS && surf->styles[maps] != 255;maps++)
674 scale = d_lightstylevalue[surf->styles[maps]];
675 r00 += lightmap[ 0] * scale;g00 += lightmap[ 1] * scale;b00 += lightmap[ 2] * scale;
676 r01 += lightmap[ 3] * scale;g01 += lightmap[ 4] * scale;b01 += lightmap[ 5] * scale;
677 r10 += lightmap[line3+0] * scale;g10 += lightmap[line3+1] * scale;b10 += lightmap[line3+2] * scale;
678 r11 += lightmap[line3+3] * scale;g11 += lightmap[line3+4] * scale;b11 += lightmap[line3+5] * scale;
683 // LordHavoc: here's the readable version of the interpolation
684 // code, not quite as easy for the compiler to optimize...
686 // dsfrac is the X position in the lightmap pixel, * 16
687 // dtfrac is the Y position in the lightmap pixel, * 16
688 // r00 is top left corner, r01 is top right corner
689 // r10 is bottom left corner, r11 is bottom right corner
690 // g and b are the same layout.
691 // r0 and r1 are the top and bottom intermediate results
693 // first we interpolate the top two points, to get the top
695 r0 = (((r01-r00) * dsfrac) >> 4) + r00;
696 g0 = (((g01-g00) * dsfrac) >> 4) + g00;
697 b0 = (((b01-b00) * dsfrac) >> 4) + b00;
698 // then we interpolate the bottom two points, to get the
699 // bottom edge sample
700 r1 = (((r11-r10) * dsfrac) >> 4) + r10;
701 g1 = (((g11-g10) * dsfrac) >> 4) + g10;
702 b1 = (((b11-b10) * dsfrac) >> 4) + b10;
703 // then we interpolate the top and bottom samples to get the
704 // middle sample (the one which was requested)
705 r = (((r1-r0) * dtfrac) >> 4) + r0;
706 g = (((g1-g0) * dtfrac) >> 4) + g0;
707 b = (((b1-b0) * dtfrac) >> 4) + b0;
710 color[0] += (float) ((((((((r11-r10) * dsfrac) >> 4) + r10)-((((r01-r00) * dsfrac) >> 4) + r00)) * dtfrac) >> 4) + ((((r01-r00) * dsfrac) >> 4) + r00)) * (1.0f / 32768.0f);
711 color[1] += (float) ((((((((g11-g10) * dsfrac) >> 4) + g10)-((((g01-g00) * dsfrac) >> 4) + g00)) * dtfrac) >> 4) + ((((g01-g00) * dsfrac) >> 4) + g00)) * (1.0f / 32768.0f);
712 color[2] += (float) ((((((((b11-b10) * dsfrac) >> 4) + b10)-((((b01-b00) * dsfrac) >> 4) + b00)) * dtfrac) >> 4) + ((((b01-b00) * dsfrac) >> 4) + b00)) * (1.0f / 32768.0f);
714 return true; // success
719 node = node->children[side ^ 1];
721 distz = endz - startz;
723 // return RecursiveLightPoint (color, node->children[side ^ 1], x, y, mid, endz);
727 void R_CompleteLightPoint (vec3_t color, vec3_t p, int dynamic, mleaf_t *leaf)
734 leaf = Mod_PointInLeaf(p, cl.worldmodel);
736 if (leaf->contents == CONTENTS_SOLID)
738 color[0] = color[1] = color[2] = 0;
742 if (r_fullbright.integer || !cl.worldmodel->lightdata)
744 color[0] = color[1] = color[2] = 2;
748 color[0] = color[1] = color[2] = r_ambient.value * (2.0f / 128.0f);
749 RecursiveLightPoint (color, cl.worldmodel->nodes, p[0], p[1], p[2], p[2] - 65536);
751 if (dynamic && leaf->dlightframe == r_framecount)
753 dlightbits = leaf->dlightbits;
754 for (i = 0;i < r_numdlights;i++)
756 if (!(dlightbits[i >> 5] & (1 << (i & 31))))
759 VectorSubtract (p, rd->origin, dist);
760 f = DotProduct(dist, dist) + LIGHTOFFSET;
761 if (f < rd->cullradius2)
763 f = (1.0f / f) - rd->lightsubtract;
765 VectorMA(color, f, rd->light, color);
771 void R_ModelLightPoint (vec3_t color, vec3_t p, int *dlightbits)
774 leaf = Mod_PointInLeaf(p, cl.worldmodel);
775 if (leaf->contents == CONTENTS_SOLID)
777 color[0] = color[1] = color[2] = 0;
778 dlightbits[0] = dlightbits[1] = dlightbits[2] = dlightbits[3] = dlightbits[4] = dlightbits[5] = dlightbits[6] = dlightbits[7] = 0;
782 if (r_fullbright.integer || !cl.worldmodel->lightdata)
784 color[0] = color[1] = color[2] = 2;
785 dlightbits[0] = dlightbits[1] = dlightbits[2] = dlightbits[3] = dlightbits[4] = dlightbits[5] = dlightbits[6] = dlightbits[7] = 0;
789 color[0] = color[1] = color[2] = r_ambient.value * (2.0f / 128.0f);
790 RecursiveLightPoint (color, cl.worldmodel->nodes, p[0], p[1], p[2], p[2] - 65536);
792 if (leaf->dlightframe == r_framecount)
794 dlightbits[0] = leaf->dlightbits[0];
795 dlightbits[1] = leaf->dlightbits[1];
796 dlightbits[2] = leaf->dlightbits[2];
797 dlightbits[3] = leaf->dlightbits[3];
798 dlightbits[4] = leaf->dlightbits[4];
799 dlightbits[5] = leaf->dlightbits[5];
800 dlightbits[6] = leaf->dlightbits[6];
801 dlightbits[7] = leaf->dlightbits[7];
804 dlightbits[0] = dlightbits[1] = dlightbits[2] = dlightbits[3] = dlightbits[4] = dlightbits[5] = dlightbits[6] = dlightbits[7] = 0;
807 void R_LightModel(int numverts, float colorr, float colorg, float colorb, int worldcoords)
809 int i, j, nearlights = 0;
810 float color[3], basecolor[3], v[3], t, *av, *avn, *avc, a, number, f/*, hardness, hardnessoffset*/, dist2;
818 nearlight[MAX_DLIGHTS], *nl;
819 int modeldlightbits[8];
821 a = currentrenderentity->alpha;
822 if (currentrenderentity->effects & EF_FULLBRIGHT)
824 basecolor[0] = colorr;
825 basecolor[1] = colorg;
826 basecolor[2] = colorb;
830 if (r_lightmodels.integer)
832 R_ModelLightPoint(basecolor, currentrenderentity->origin, modeldlightbits);
836 // this code is unused for now
837 for (i = 0, sl = staticlight;i < staticlights && nearlights < MAX_DLIGHTS;i++, sl++)
839 if (TraceLine(currentrenderentity->origin, sl->origin, NULL, NULL, 0) == 1)
841 nl->fadetype = sl->fadetype;
842 nl->distancescale = sl->distancescale;
843 nl->radius = sl->radius;
844 // transform the light into the model's coordinate system
846 VectorCopy(sl->origin, nl->origin);
848 softwareuntransform(sl->origin, nl->origin);
849 VectorCopy(sl->color, nl->light);
850 nl->cullradius2 = 99999999;
851 nl->lightsubtract = 0;
857 for (i = 0;i < r_numdlights && nearlights < MAX_DLIGHTS;i++)
859 if (!(modeldlightbits[i >> 5] & (1 << (i & 31))))
861 if (currentrenderentity == r_dlight[i].ent)
863 f = (1.0f / LIGHTOFFSET) - nl->lightsubtract;
865 VectorMA(basecolor, f, r_dlight[i].light, basecolor);
869 // convert 0-255 radius coloring to 0-1, while also amplifying the brightness by 16
870 //if (TraceLine(currentrenderentity->origin, r_dlight[i].origin, NULL, NULL, 0) == 1)
872 // transform the light into the model's coordinate system
874 VectorCopy(r_dlight[i].origin, nl->origin);
876 softwareuntransform(r_dlight[i].origin, nl->origin);
877 nl->cullradius2 = r_dlight[i].cullradius2;
878 nl->light[0] = r_dlight[i].light[0] * colorr;
879 nl->light[1] = r_dlight[i].light[1] * colorg;
880 nl->light[2] = r_dlight[i].light[2] * colorb;
881 nl->lightsubtract = r_dlight[i].lightsubtract;
889 R_CompleteLightPoint (basecolor, currentrenderentity->origin, true, NULL);
891 basecolor[0] *= colorr;
892 basecolor[1] *= colorg;
893 basecolor[2] *= colorb;
894 avc = aliasvertcolor;
899 //hardness = r_lightmodelhardness.value;
900 //hardnessoffset = (1.0f - hardness);
901 for (i = 0;i < numverts;i++)
903 VectorCopy(basecolor, color);
904 for (j = 0, nl = &nearlight[0];j < nearlights;j++, nl++)
906 // distance attenuation
907 VectorSubtract(nl->origin, av, v);
908 dist2 = DotProduct(v,v);
909 if (dist2 < nl->cullradius2)
911 f = (1.0f / (dist2 + LIGHTOFFSET)) - nl->lightsubtract;
914 // directional shading
916 t = 1.0f / sqrt(dist2);
918 number = DotProduct(v, v);
919 *((long *)&t) = 0x5f3759df - ((* (long *) &number) >> 1);
920 t = t * (1.5f - (number * 0.5f * t * t));
922 // DotProduct(avn,v) * t is dotproduct with a normalized v,
923 // the hardness variables are for backlighting/shinyness
924 f *= DotProduct(avn,v) * t;// * hardness + hardnessoffset;
926 VectorMA(color, f, nl->light, color);
931 VectorCopy(color, avc);
940 for (i = 0;i < numverts;i++)
942 VectorCopy(basecolor, avc);