3 #include "cl_collision.h"
11 // LordHavoc: vertex arrays
13 float *aliasvertcolorbuf;
14 float *aliasvertcolor; // this may point at aliasvertcolorbuf or at vertex arrays in the mesh backend
15 float *aliasvert_svectors;
16 float *aliasvert_tvectors;
17 float *aliasvert_normals;
19 float *aliasvertcolor2;
21 zymbonematrix *zymbonepose;
23 mempool_t *gl_models_mempool;
25 void gl_models_start(void)
27 // allocate vertex processing arrays
28 gl_models_mempool = Mem_AllocPool("GL_Models");
29 aliasvertcolor = aliasvertcolorbuf = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
30 aliasvert_svectors = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
31 aliasvert_tvectors = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
32 aliasvert_normals = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4]));
33 aliasvertcolor2 = Mem_Alloc(gl_models_mempool, sizeof(float[MD2MAX_VERTS][4])); // used temporarily for tinted coloring
34 zymbonepose = Mem_Alloc(gl_models_mempool, sizeof(zymbonematrix[256]));
35 aliasvertusage = Mem_Alloc(gl_models_mempool, sizeof(int[MD2MAX_VERTS]));
38 void gl_models_shutdown(void)
40 Mem_FreePool(&gl_models_mempool);
43 void gl_models_newmap(void)
47 void GL_Models_Init(void)
49 R_RegisterModule("GL_Models", gl_models_start, gl_models_shutdown, gl_models_newmap);
52 void R_AliasLerpVerts(int vertcount, float *vertices, float *normals,
53 float lerp1, const trivertx_t *verts1, const vec3_t fscale1, const vec3_t translate1,
54 float lerp2, const trivertx_t *verts2, const vec3_t fscale2, const vec3_t translate2,
55 float lerp3, const trivertx_t *verts3, const vec3_t fscale3, const vec3_t translate3,
56 float lerp4, const trivertx_t *verts4, const vec3_t fscale4, const vec3_t translate4)
59 vec3_t scale1, scale2, scale3, scale4, translate;
60 const float *n1, *n2, *n3, *n4;
64 VectorScale(fscale1, lerp1, scale1);
67 VectorScale(fscale2, lerp2, scale2);
70 VectorScale(fscale3, lerp3, scale3);
73 VectorScale(fscale4, lerp4, scale4);
74 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3 + translate4[0] * lerp4;
75 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3 + translate4[1] * lerp4;
76 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3 + translate4[2] * lerp4;
78 for (i = 0;i < vertcount;i++)
80 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + verts4->v[0] * scale4[0] + translate[0];
81 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + verts4->v[1] * scale4[1] + translate[1];
82 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + verts4->v[2] * scale4[2] + translate[2];
83 n1 = m_bytenormals[verts1->lightnormalindex];
84 n2 = m_bytenormals[verts2->lightnormalindex];
85 n3 = m_bytenormals[verts3->lightnormalindex];
86 n4 = m_bytenormals[verts4->lightnormalindex];
87 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3 + n4[0] * lerp4;
88 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3 + n4[1] * lerp4;
89 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3 + n4[2] * lerp4;
92 verts1++;verts2++;verts3++;verts4++;
97 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2 + translate3[0] * lerp3;
98 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2 + translate3[1] * lerp3;
99 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2 + translate3[2] * lerp3;
101 for (i = 0;i < vertcount;i++)
103 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + verts3->v[0] * scale3[0] + translate[0];
104 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + verts3->v[1] * scale3[1] + translate[1];
105 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + verts3->v[2] * scale3[2] + translate[2];
106 n1 = m_bytenormals[verts1->lightnormalindex];
107 n2 = m_bytenormals[verts2->lightnormalindex];
108 n3 = m_bytenormals[verts3->lightnormalindex];
109 avn[0] = n1[0] * lerp1 + n2[0] * lerp2 + n3[0] * lerp3;
110 avn[1] = n1[1] * lerp1 + n2[1] * lerp2 + n3[1] * lerp3;
111 avn[2] = n1[2] * lerp1 + n2[2] * lerp2 + n3[2] * lerp3;
114 verts1++;verts2++;verts3++;
120 translate[0] = translate1[0] * lerp1 + translate2[0] * lerp2;
121 translate[1] = translate1[1] * lerp1 + translate2[1] * lerp2;
122 translate[2] = translate1[2] * lerp1 + translate2[2] * lerp2;
124 for (i = 0;i < vertcount;i++)
126 av[0] = verts1->v[0] * scale1[0] + verts2->v[0] * scale2[0] + translate[0];
127 av[1] = verts1->v[1] * scale1[1] + verts2->v[1] * scale2[1] + translate[1];
128 av[2] = verts1->v[2] * scale1[2] + verts2->v[2] * scale2[2] + translate[2];
129 n1 = m_bytenormals[verts1->lightnormalindex];
130 n2 = m_bytenormals[verts2->lightnormalindex];
131 avn[0] = n1[0] * lerp1 + n2[0] * lerp2;
132 avn[1] = n1[1] * lerp1 + n2[1] * lerp2;
133 avn[2] = n1[2] * lerp1 + n2[2] * lerp2;
142 translate[0] = translate1[0] * lerp1;
143 translate[1] = translate1[1] * lerp1;
144 translate[2] = translate1[2] * lerp1;
148 // general but almost never used case
149 for (i = 0;i < vertcount;i++)
151 av[0] = verts1->v[0] * scale1[0] + translate[0];
152 av[1] = verts1->v[1] * scale1[1] + translate[1];
153 av[2] = verts1->v[2] * scale1[2] + translate[2];
154 n1 = m_bytenormals[verts1->lightnormalindex];
155 avn[0] = n1[0] * lerp1;
156 avn[1] = n1[1] * lerp1;
157 avn[2] = n1[2] * lerp1;
166 for (i = 0;i < vertcount;i++)
168 av[0] = verts1->v[0] * scale1[0] + translate[0];
169 av[1] = verts1->v[1] * scale1[1] + translate[1];
170 av[2] = verts1->v[2] * scale1[2] + translate[2];
171 VectorCopy(m_bytenormals[verts1->lightnormalindex], avn);
180 skinframe_t *R_FetchSkinFrame(const entity_render_t *ent)
182 model_t *model = ent->model;
183 unsigned int s = (unsigned int) ent->skinnum;
184 if (s >= model->numskins)
186 if (model->skinscenes[s].framecount > 1)
187 return &model->skinframes[model->skinscenes[s].firstframe + (int) (cl.time * 10) % model->skinscenes[s].framecount];
189 return &model->skinframes[model->skinscenes[s].firstframe];
192 void R_LerpMDLMD2Vertices(const entity_render_t *ent, float *vertices, float *normals)
194 const md2frame_t *frame1, *frame2, *frame3, *frame4;
195 const trivertx_t *frame1verts, *frame2verts, *frame3verts, *frame4verts;
196 const model_t *model = ent->model;
198 frame1 = &model->mdlmd2data_frames[ent->frameblend[0].frame];
199 frame2 = &model->mdlmd2data_frames[ent->frameblend[1].frame];
200 frame3 = &model->mdlmd2data_frames[ent->frameblend[2].frame];
201 frame4 = &model->mdlmd2data_frames[ent->frameblend[3].frame];
202 frame1verts = &model->mdlmd2data_pose[ent->frameblend[0].frame * model->numverts];
203 frame2verts = &model->mdlmd2data_pose[ent->frameblend[1].frame * model->numverts];
204 frame3verts = &model->mdlmd2data_pose[ent->frameblend[2].frame * model->numverts];
205 frame4verts = &model->mdlmd2data_pose[ent->frameblend[3].frame * model->numverts];
206 R_AliasLerpVerts(model->numverts, vertices, normals,
207 ent->frameblend[0].lerp, frame1verts, frame1->scale, frame1->translate,
208 ent->frameblend[1].lerp, frame2verts, frame2->scale, frame2->translate,
209 ent->frameblend[2].lerp, frame3verts, frame3->scale, frame3->translate,
210 ent->frameblend[3].lerp, frame4verts, frame4->scale, frame4->translate);
213 void R_DrawQ1Q2AliasModelCallback (const void *calldata1, int calldata2)
215 int i, c, fullbright, pantsfullbright, shirtfullbright, colormapped, tex;
216 float pantscolor[3], shirtcolor[3];
217 float fog, ifog, colorscale;
222 skinframe_t *skinframe;
223 const entity_render_t *ent = calldata1;
224 int blendfunc1, blendfunc2;
226 R_Mesh_Matrix(&ent->matrix);
229 R_Mesh_ResizeCheck(model->numverts);
231 skinframe = R_FetchSkinFrame(ent);
233 fullbright = (ent->effects & EF_FULLBRIGHT) != 0;
238 VectorSubtract(ent->origin, r_origin, diff);
239 fog = DotProduct(diff,diff);
242 fog = exp(fogdensity/fog);
247 // fog method: darken, additive fog
248 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
249 // 2. render fog as additive
253 if (ent->effects & EF_ADDITIVE)
255 blendfunc1 = GL_SRC_ALPHA;
258 else if (ent->alpha != 1.0 || skinframe->fog != NULL)
260 blendfunc1 = GL_SRC_ALPHA;
261 blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
266 blendfunc2 = GL_ZERO;
269 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvert_normals);
270 memcpy(varray_texcoord[0], model->mdlmd2data_texcoords, model->numverts * sizeof(float[4]));
271 if (!skinframe->base && !skinframe->pants && !skinframe->shirt && !skinframe->glow)
274 memset(&m, 0, sizeof(m));
275 m.blendfunc1 = blendfunc1;
276 m.blendfunc2 = blendfunc2;
277 colorscale = r_colorscale;
278 if (gl_combine.integer)
281 m.texrgbscale[0] = 4;
283 m.tex[0] = R_GetTexture(r_notexture);
285 c_alias_polys += model->numtris;
286 for (i = 0;i < model->numverts * 4;i += 4)
288 varray_texcoord[0][i + 0] *= 8.0f;
289 varray_texcoord[0][i + 1] *= 8.0f;
291 R_LightModel(ent, model->numverts, varray_vertex, aliasvert_normals, varray_color, colorscale, colorscale, colorscale, false);
292 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
296 colormapped = !skinframe->merged || (ent->colormap >= 0 && skinframe->base && (skinframe->pants || skinframe->shirt));
299 // 128-224 are backwards ranges
300 c = (ent->colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12;
301 bcolor = (qbyte *) (&palette_complete[c]);
302 pantsfullbright = c >= 224;
303 VectorScale(bcolor, (1.0f / 255.0f), pantscolor);
304 c = (ent->colormap & 0xF0);c += (c >= 128 && c < 224) ? 4 : 12;
305 bcolor = (qbyte *) (&palette_complete[c]);
306 shirtfullbright = c >= 224;
307 VectorScale(bcolor, (1.0f / 255.0f), shirtcolor);
311 pantscolor[0] = pantscolor[1] = pantscolor[2] = shirtcolor[0] = shirtcolor[1] = shirtcolor[2] = 1;
312 pantsfullbright = shirtfullbright = false;
315 tex = colormapped ? R_GetTexture(skinframe->base) : R_GetTexture(skinframe->merged);
318 memset(&m, 0, sizeof(m));
319 m.blendfunc1 = blendfunc1;
320 m.blendfunc2 = blendfunc2;
321 colorscale = r_colorscale;
322 if (gl_combine.integer)
325 m.texrgbscale[0] = 4;
330 GL_Color(colorscale * ifog, colorscale * ifog, colorscale * ifog, ent->alpha);
332 R_LightModel(ent, model->numverts, varray_vertex, aliasvert_normals, varray_color, colorscale * ifog, colorscale * ifog, colorscale * ifog, false);
333 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
334 c_alias_polys += model->numtris;
335 blendfunc1 = GL_SRC_ALPHA;
341 if (skinframe->pants)
343 tex = R_GetTexture(skinframe->pants);
346 memset(&m, 0, sizeof(m));
347 m.blendfunc1 = blendfunc1;
348 m.blendfunc2 = blendfunc2;
349 colorscale = r_colorscale;
350 if (gl_combine.integer)
353 m.texrgbscale[0] = 4;
358 GL_Color(pantscolor[0] * colorscale * ifog, pantscolor[1] * colorscale * ifog, pantscolor[2] * colorscale * ifog, ent->alpha);
360 R_LightModel(ent, model->numverts, varray_vertex, aliasvert_normals, varray_color, pantscolor[0] * colorscale * ifog, pantscolor[1] * colorscale * ifog, pantscolor[2] * colorscale * ifog, false);
361 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
362 c_alias_polys += model->numtris;
363 blendfunc1 = GL_SRC_ALPHA;
367 if (skinframe->shirt)
369 tex = R_GetTexture(skinframe->shirt);
372 memset(&m, 0, sizeof(m));
373 m.blendfunc1 = blendfunc1;
374 m.blendfunc2 = blendfunc2;
375 colorscale = r_colorscale;
376 if (gl_combine.integer)
379 m.texrgbscale[0] = 4;
384 GL_Color(shirtcolor[0] * colorscale * ifog, shirtcolor[1] * colorscale * ifog, shirtcolor[2] * colorscale * ifog, ent->alpha);
386 R_LightModel(ent, model->numverts, varray_vertex, aliasvert_normals, varray_color, shirtcolor[0] * colorscale * ifog, shirtcolor[1] * colorscale * ifog, shirtcolor[2] * colorscale * ifog, false);
387 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
388 c_alias_polys += model->numtris;
389 blendfunc1 = GL_SRC_ALPHA;
396 tex = R_GetTexture(skinframe->glow);
399 memset(&m, 0, sizeof(m));
400 m.blendfunc1 = blendfunc1;
401 m.blendfunc2 = blendfunc2;
405 blendfunc1 = GL_SRC_ALPHA;
407 c_alias_polys += model->numtris;
408 GL_Color(ifog * r_colorscale, ifog * r_colorscale, ifog * r_colorscale, ent->alpha);
409 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
414 memset(&m, 0, sizeof(m));
415 m.blendfunc1 = GL_SRC_ALPHA;
416 m.blendfunc2 = GL_ONE;
417 m.tex[0] = R_GetTexture(skinframe->fog);
420 c_alias_polys += model->numtris;
421 GL_Color(fogcolor[0] * fog * r_colorscale, fogcolor[1] * fog * r_colorscale, fogcolor[2] * fog * r_colorscale, ent->alpha);
422 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
426 void R_Model_Alias_Draw(entity_render_t *ent)
428 if (ent->alpha < (1.0f / 64.0f))
429 return; // basically completely transparent
433 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_FetchSkinFrame(ent)->fog != NULL)
434 R_MeshQueue_AddTransparent(ent->origin, R_DrawQ1Q2AliasModelCallback, ent, 0);
436 R_DrawQ1Q2AliasModelCallback(ent, 0);
439 void R_Model_Alias_DrawFakeShadow (entity_render_t *ent)
444 float *v, planenormal[3], planedist, dist, projection[3], floororigin[3], surfnormal[3], lightdirection[3], v2[3];
446 lightdirection[0] = 0.5;
447 lightdirection[1] = 0.2;
448 lightdirection[2] = -1;
449 VectorNormalizeFast(lightdirection);
451 VectorMA(ent->origin, 65536.0f, lightdirection, v2);
452 if (CL_TraceLine(ent->origin, v2, floororigin, surfnormal, 0, false, NULL) == 1)
455 R_Mesh_Matrix(&ent->matrix);
458 R_Mesh_ResizeCheck(model->numverts);
460 memset(&m, 0, sizeof(m));
461 m.blendfunc1 = GL_SRC_ALPHA;
462 m.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
465 c_alias_polys += model->numtris;
466 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvert_normals);
468 // put a light direction in the entity's coordinate space
469 Matrix4x4_Transform3x3(&ent->inversematrix, lightdirection, projection);
470 VectorNormalizeFast(projection);
472 // put the plane's normal in the entity's coordinate space
473 Matrix4x4_Transform3x3(&ent->inversematrix, surfnormal, planenormal);
474 VectorNormalizeFast(planenormal);
476 // put the plane's distance in the entity's coordinate space
477 VectorSubtract(floororigin, ent->origin, floororigin);
478 planedist = DotProduct(floororigin, surfnormal) + 2;
480 dist = -1.0f / DotProduct(projection, planenormal);
481 VectorScale(projection, dist, projection);
482 for (i = 0, v = varray_vertex;i < model->numverts;i++, v += 4)
484 dist = DotProduct(v, planenormal) - planedist;
487 VectorMA(v, dist, projection, v);
489 GL_Color(0, 0, 0, 0.5);
490 R_Mesh_Draw(model->numverts, model->numtris, model->mdlmd2data_indices);
493 void R_Model_Alias_DrawShadowVolume(entity_render_t *ent, vec3_t relativelightorigin, float lightradius)
495 float projectdistance;
496 projectdistance = lightradius + ent->model->radius - sqrt(DotProduct(relativelightorigin, relativelightorigin));
497 if (projectdistance > 0.1)
499 R_Mesh_Matrix(&ent->matrix);
500 R_Mesh_ResizeCheck(ent->model->numverts * 2);
501 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvert_normals);
502 R_Shadow_Volume(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, ent->model->mdlmd2data_triangleneighbors, relativelightorigin, lightradius, projectdistance);
506 void R_Model_Alias_DrawLight(entity_render_t *ent, vec3_t relativelightorigin, vec3_t relativeeyeorigin, float lightradius, float *lightcolor)
509 float lightcolor2[3];
511 skinframe_t *skinframe;
512 R_Mesh_Matrix(&ent->matrix);
513 R_Mesh_ResizeCheck(ent->model->numverts);
514 R_LerpMDLMD2Vertices(ent, varray_vertex, aliasvert_normals);
515 Mod_BuildTextureVectorsAndNormals(ent->model->numverts, ent->model->numtris, varray_vertex, ent->model->mdlmd2data_texcoords, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals);
516 skinframe = R_FetchSkinFrame(ent);
518 // note: to properly handle fog this should scale the lightcolor into lightcolor2 according to 1-fog scaling
520 R_Shadow_SpecularLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, relativeeyeorigin, lightradius, lightcolor, NULL, NULL, NULL);
522 if (!skinframe->base && !skinframe->pants && !skinframe->shirt && !skinframe->glow)
524 R_Shadow_DiffuseLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, lightradius, lightcolor, r_notexture, NULL, NULL);
528 if (!skinframe->merged || (ent->colormap >= 0 && skinframe->base && (skinframe->pants || skinframe->shirt)))
530 // 128-224 are backwards ranges
531 // we only render non-fullbright ranges here
532 if (skinframe->pants && (ent->colormap & 0xF) < 0xE)
534 c = (ent->colormap & 0xF) << 4;c += (c >= 128 && c < 224) ? 4 : 12;
535 bcolor = (qbyte *) (&palette_complete[c]);
536 lightcolor2[0] = lightcolor[0] * bcolor[0] * (1.0f / 255.0f);
537 lightcolor2[1] = lightcolor[1] * bcolor[1] * (1.0f / 255.0f);
538 lightcolor2[2] = lightcolor[2] * bcolor[2] * (1.0f / 255.0f);
539 R_Shadow_DiffuseLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, lightradius, lightcolor2, skinframe->pants, skinframe->nmap, NULL);
542 // we only render non-fullbright ranges here
543 if (skinframe->shirt && (ent->colormap & 0xF0) < 0xE0)
545 c = (ent->colormap & 0xF0);c += (c >= 128 && c < 224) ? 4 : 12;
546 bcolor = (qbyte *) (&palette_complete[c]);
547 lightcolor2[0] = lightcolor[0] * bcolor[0] * (1.0f / 255.0f);
548 lightcolor2[1] = lightcolor[1] * bcolor[1] * (1.0f / 255.0f);
549 lightcolor2[2] = lightcolor[2] * bcolor[2] * (1.0f / 255.0f);
550 R_Shadow_DiffuseLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, lightradius, lightcolor2, skinframe->shirt, skinframe->nmap, NULL);
554 R_Shadow_DiffuseLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, lightradius, lightcolor, skinframe->base, skinframe->nmap, NULL);
557 if (skinframe->merged)
558 R_Shadow_DiffuseLighting(ent->model->numverts, ent->model->numtris, ent->model->mdlmd2data_indices, aliasvert_svectors, aliasvert_tvectors, aliasvert_normals, ent->model->mdlmd2data_texcoords, relativelightorigin, lightradius, lightcolor, skinframe->merged, skinframe->nmap, NULL);
561 int ZymoticLerpBones(int count, const zymbonematrix *bonebase, const frameblend_t *blend, const zymbone_t *bone)
564 float lerp1, lerp2, lerp3, lerp4;
565 zymbonematrix *out, rootmatrix, m;
566 const zymbonematrix *bone1, *bone2, *bone3, *bone4;
568 rootmatrix.m[0][0] = 1;
569 rootmatrix.m[0][1] = 0;
570 rootmatrix.m[0][2] = 0;
571 rootmatrix.m[0][3] = 0;
572 rootmatrix.m[1][0] = 0;
573 rootmatrix.m[1][1] = 1;
574 rootmatrix.m[1][2] = 0;
575 rootmatrix.m[1][3] = 0;
576 rootmatrix.m[2][0] = 0;
577 rootmatrix.m[2][1] = 0;
578 rootmatrix.m[2][2] = 1;
579 rootmatrix.m[2][3] = 0;
581 bone1 = bonebase + blend[0].frame * count;
582 lerp1 = blend[0].lerp;
585 bone2 = bonebase + blend[1].frame * count;
586 lerp2 = blend[1].lerp;
589 bone3 = bonebase + blend[2].frame * count;
590 lerp3 = blend[2].lerp;
594 bone4 = bonebase + blend[3].frame * count;
595 lerp4 = blend[3].lerp;
596 for (i = 0, out = zymbonepose;i < count;i++, out++)
598 // interpolate matrices
599 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3 + bone4->m[0][0] * lerp4;
600 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3 + bone4->m[0][1] * lerp4;
601 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3 + bone4->m[0][2] * lerp4;
602 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3 + bone4->m[0][3] * lerp4;
603 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3 + bone4->m[1][0] * lerp4;
604 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3 + bone4->m[1][1] * lerp4;
605 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3 + bone4->m[1][2] * lerp4;
606 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3 + bone4->m[1][3] * lerp4;
607 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3 + bone4->m[2][0] * lerp4;
608 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3 + bone4->m[2][1] * lerp4;
609 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3 + bone4->m[2][2] * lerp4;
610 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3 + bone4->m[2][3] * lerp4;
611 if (bone->parent >= 0)
612 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
614 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
625 for (i = 0, out = zymbonepose;i < count;i++, out++)
627 // interpolate matrices
628 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2 + bone3->m[0][0] * lerp3;
629 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2 + bone3->m[0][1] * lerp3;
630 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2 + bone3->m[0][2] * lerp3;
631 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2 + bone3->m[0][3] * lerp3;
632 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2 + bone3->m[1][0] * lerp3;
633 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2 + bone3->m[1][1] * lerp3;
634 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2 + bone3->m[1][2] * lerp3;
635 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2 + bone3->m[1][3] * lerp3;
636 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2 + bone3->m[2][0] * lerp3;
637 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2 + bone3->m[2][1] * lerp3;
638 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2 + bone3->m[2][2] * lerp3;
639 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2 + bone3->m[2][3] * lerp3;
640 if (bone->parent >= 0)
641 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
643 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
654 for (i = 0, out = zymbonepose;i < count;i++, out++)
656 // interpolate matrices
657 m.m[0][0] = bone1->m[0][0] * lerp1 + bone2->m[0][0] * lerp2;
658 m.m[0][1] = bone1->m[0][1] * lerp1 + bone2->m[0][1] * lerp2;
659 m.m[0][2] = bone1->m[0][2] * lerp1 + bone2->m[0][2] * lerp2;
660 m.m[0][3] = bone1->m[0][3] * lerp1 + bone2->m[0][3] * lerp2;
661 m.m[1][0] = bone1->m[1][0] * lerp1 + bone2->m[1][0] * lerp2;
662 m.m[1][1] = bone1->m[1][1] * lerp1 + bone2->m[1][1] * lerp2;
663 m.m[1][2] = bone1->m[1][2] * lerp1 + bone2->m[1][2] * lerp2;
664 m.m[1][3] = bone1->m[1][3] * lerp1 + bone2->m[1][3] * lerp2;
665 m.m[2][0] = bone1->m[2][0] * lerp1 + bone2->m[2][0] * lerp2;
666 m.m[2][1] = bone1->m[2][1] * lerp1 + bone2->m[2][1] * lerp2;
667 m.m[2][2] = bone1->m[2][2] * lerp1 + bone2->m[2][2] * lerp2;
668 m.m[2][3] = bone1->m[2][3] * lerp1 + bone2->m[2][3] * lerp2;
669 if (bone->parent >= 0)
670 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
672 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
685 for (i = 0, out = zymbonepose;i < count;i++, out++)
687 // interpolate matrices
688 m.m[0][0] = bone1->m[0][0] * lerp1;
689 m.m[0][1] = bone1->m[0][1] * lerp1;
690 m.m[0][2] = bone1->m[0][2] * lerp1;
691 m.m[0][3] = bone1->m[0][3] * lerp1;
692 m.m[1][0] = bone1->m[1][0] * lerp1;
693 m.m[1][1] = bone1->m[1][1] * lerp1;
694 m.m[1][2] = bone1->m[1][2] * lerp1;
695 m.m[1][3] = bone1->m[1][3] * lerp1;
696 m.m[2][0] = bone1->m[2][0] * lerp1;
697 m.m[2][1] = bone1->m[2][1] * lerp1;
698 m.m[2][2] = bone1->m[2][2] * lerp1;
699 m.m[2][3] = bone1->m[2][3] * lerp1;
700 if (bone->parent >= 0)
701 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &m.m[0][0], &out->m[0][0]);
703 R_ConcatTransforms(&rootmatrix.m[0][0], &m.m[0][0], &out->m[0][0]);
711 for (i = 0, out = zymbonepose;i < count;i++, out++)
713 if (bone->parent >= 0)
714 R_ConcatTransforms(&zymbonepose[bone->parent].m[0][0], &bone1->m[0][0], &out->m[0][0]);
716 R_ConcatTransforms(&rootmatrix.m[0][0], &bone1->m[0][0], &out->m[0][0]);
725 void ZymoticTransformVerts(int vertcount, float *vertex, int *bonecounts, zymvertex_t *vert)
729 zymbonematrix *matrix;
733 // FIXME: validate bonecounts at load time (must be >= 1)
734 // FIXME: need 4th component in origin, for how much of the translate to blend in
737 matrix = &zymbonepose[vert->bonenum];
738 out[0] = vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
739 out[1] = vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
740 out[2] = vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
748 matrix = &zymbonepose[vert->bonenum];
749 out[0] += vert->origin[0] * matrix->m[0][0] + vert->origin[1] * matrix->m[0][1] + vert->origin[2] * matrix->m[0][2] + matrix->m[0][3];
750 out[1] += vert->origin[0] * matrix->m[1][0] + vert->origin[1] * matrix->m[1][1] + vert->origin[2] * matrix->m[1][2] + matrix->m[1][3];
751 out[2] += vert->origin[0] * matrix->m[2][0] + vert->origin[1] * matrix->m[2][1] + vert->origin[2] * matrix->m[2][2] + matrix->m[2][3];
759 void ZymoticCalcNormals(int vertcount, float *vertex, float *normals, int shadercount, int *renderlist)
762 float *out, v1[3], v2[3], normal[3], s;
765 memset(normals, 0, sizeof(float) * vertcount * 3);
766 memset(aliasvertusage, 0, sizeof(int) * vertcount);
767 // parse render list and accumulate surface normals
776 v1[0] = vertex[a+0] - vertex[b+0];
777 v1[1] = vertex[a+1] - vertex[b+1];
778 v1[2] = vertex[a+2] - vertex[b+2];
779 v2[0] = vertex[c+0] - vertex[b+0];
780 v2[1] = vertex[c+1] - vertex[b+1];
781 v2[2] = vertex[c+2] - vertex[b+2];
782 CrossProduct(v1, v2, normal);
783 VectorNormalizeFast(normal);
784 // add surface normal to vertices
785 a = renderlist[0] * 3;
786 normals[a+0] += normal[0];
787 normals[a+1] += normal[1];
788 normals[a+2] += normal[2];
789 aliasvertusage[renderlist[0]]++;
790 a = renderlist[1] * 3;
791 normals[a+0] += normal[0];
792 normals[a+1] += normal[1];
793 normals[a+2] += normal[2];
794 aliasvertusage[renderlist[1]]++;
795 a = renderlist[2] * 3;
796 normals[a+0] += normal[0];
797 normals[a+1] += normal[1];
798 normals[a+2] += normal[2];
799 aliasvertusage[renderlist[2]]++;
803 // FIXME: precalc this
804 // average surface normals
821 void R_DrawZymoticModelMeshCallback (const void *calldata1, int calldata2)
823 float fog, ifog, colorscale;
825 int i, *renderlist, *elements;
828 const entity_render_t *ent = calldata1;
829 int shadernum = calldata2;
830 int numverts, numtriangles;
832 R_Mesh_Matrix(&ent->matrix);
834 // find the vertex index list and texture
835 renderlist = ent->model->zymdata_renderlist;
836 for (i = 0;i < shadernum;i++)
837 renderlist += renderlist[0] * 3 + 1;
838 texture = ent->model->zymdata_textures[shadernum];
840 numverts = ent->model->zymnum_verts;
841 numtriangles = *renderlist++;
842 elements = renderlist;
843 R_Mesh_ResizeCheck(numverts);
848 VectorSubtract(ent->origin, r_origin, diff);
849 fog = DotProduct(diff,diff);
852 fog = exp(fogdensity/fog);
857 // fog method: darken, additive fog
858 // 1. render model as normal, scaled by inverse of fog alpha (darkens it)
859 // 2. render fog as additive
863 memset(&mstate, 0, sizeof(mstate));
864 if (ent->effects & EF_ADDITIVE)
866 mstate.blendfunc1 = GL_SRC_ALPHA;
867 mstate.blendfunc2 = GL_ONE;
869 else if (ent->alpha != 1.0 || R_TextureHasAlpha(texture))
871 mstate.blendfunc1 = GL_SRC_ALPHA;
872 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
876 mstate.blendfunc1 = GL_ONE;
877 mstate.blendfunc2 = GL_ZERO;
879 colorscale = r_colorscale;
880 if (gl_combine.integer)
882 mstate.texrgbscale[0] = 4;
885 mstate.tex[0] = R_GetTexture(texture);
886 R_Mesh_State(&mstate);
887 ZymoticLerpBones(ent->model->zymnum_bones, (zymbonematrix *) ent->model->zymdata_poses, ent->frameblend, ent->model->zymdata_bones);
888 ZymoticTransformVerts(numverts, varray_vertex, ent->model->zymdata_vertbonecounts, ent->model->zymdata_verts);
889 ZymoticCalcNormals(numverts, varray_vertex, aliasvert_normals, ent->model->zymnum_shaders, ent->model->zymdata_renderlist);
890 memcpy(varray_texcoord[0], ent->model->zymdata_texcoords, ent->model->zymnum_verts * sizeof(float[4]));
892 R_LightModel(ent, numverts, varray_vertex, aliasvert_normals, varray_color, ifog * colorscale, ifog * colorscale, ifog * colorscale, false);
893 R_Mesh_Draw(numverts, numtriangles, elements);
894 c_alias_polys += numtriangles;
898 memset(&mstate, 0, sizeof(mstate));
899 mstate.blendfunc1 = GL_SRC_ALPHA;
900 mstate.blendfunc2 = GL_ONE_MINUS_SRC_ALPHA;
901 // FIXME: need alpha mask for fogging...
902 //mstate.tex[0] = R_GetTexture(texture);
903 R_Mesh_State(&mstate);
904 GL_Color(fogcolor[0] * r_colorscale, fogcolor[1] * r_colorscale, fogcolor[2] * r_colorscale, ent->alpha * fog);
905 R_Mesh_Draw(numverts, numtriangles, elements);
906 c_alias_polys += numtriangles;
910 void R_Model_Zymotic_Draw(entity_render_t *ent)
914 if (ent->alpha < (1.0f / 64.0f))
915 return; // basically completely transparent
919 for (i = 0;i < ent->model->zymnum_shaders;i++)
921 if (ent->effects & EF_ADDITIVE || ent->alpha != 1.0 || R_TextureHasAlpha(ent->model->zymdata_textures[i]))
922 R_MeshQueue_AddTransparent(ent->origin, R_DrawZymoticModelMeshCallback, ent, i);
924 R_DrawZymoticModelMeshCallback(ent, i);
928 void R_Model_Zymotic_DrawFakeShadow(entity_render_t *ent)
933 void R_Model_Zymotic_DrawLight(entity_render_t *ent, vec3_t relativelightorigin, float lightradius2, float lightdistbias, float lightsubtract, float *lightcolor)
938 void R_Model_Zymotic_DrawOntoLight(entity_render_t *ent)